Quantidade e Valor unitário não imprime.

[Rogerio de Jesus]

Hoje especificamente, parou do nada de imprimir a quantidade e valor unitário no Danfe Paisagem, no Retrato está OK!!

Atualizei os componente e mesmo assim nada.

Vi relatos no MANTIS a respeito, mas é de 2010 e nada ajudou a solucionar o problema.

Sabem doque se trata??

[juaumkiko]

Poste o XML, e me informe o caso do mantis relatado.

[Rogerio de Jesus]

Amigo, obrigado pela ajuda..

Está tudo OK com XML,

Debugando o ACBr,,

Existem essas linhas no DANFERLPaisagem... e a formatação não retorna nada e o qCom está com o valor

Linha +- 1605

cdsItens.FieldByName('CFOP').AsString := CFOP;

cdsItens.FieldByName('QTDE').AsString := NotaUtil.FormatFloat(qCom, sDisplayFormat[FCasasDecimaisqCom]);

cdsItens.FieldByName('VALOR').AsString := NotaUtil.FormatFloat(vUnCom, sDisplayFormat[FCasasDecimaisvUnCom]);

cdsItens.FieldByName('UNIDADE').AsString := UCom;

cdsItens.FieldByName('TOTAL').AsString := FormatFloat('###,###,###,##0.00', vProd);

Acredito que alguma coisa de formatação em NotaUtil.FormatFloat está errado.. pois retorna String vazia..

[Waldir Paim]

Passe pelo menos os valores dos campos;

Waldir Paim

[Rogerio de Jesus]

Passe pelo menos os valores dos campos;

Waldir Paim

Qtde = 5

Valor = 2

[Waldir Paim]

veja se assim funciona

procedure TfrlDANFeRLPaisagem.Itens;

procedure TfrlDANFeRLPaisagem.Itens;

var nItem : Integer ;

sCST, sBCICMS, sALIQICMS, sVALORICMS, sALIQIPI, sVALORIPI : String ;

begin

...

cdsItens.FieldByName('QTDE').AsString      := FormatFloat(format( sDisplayFormat ,[FCasasDecimaisqCom,0]),qCom);

//cdsItens.FieldByName('QTDE').AsString    := NotaUtil.FormatFloat(qCom, sDisplayFormat[FCasasDecimaisqCom]);

cdsItens.FieldByName('VALOR').AsString     := FormatFloat(format( sDisplayFormat ,FCasasDecimaisvUnCom,0]),vUnCom);

//cdsItens.FieldByName('VALOR').AsString   := NotaUtil.FormatFloat(vUnCom, sDisplayFormat[FCasasDecimaisvUnCom]);

...

Qualquer coisa só avisar!

Waldir Paim

[Rogerio de Jesus]

OK Bacana deu certo...

Muito obrigado..

Aproveitando postei algum tempo atráz uma correção que fiz a respeito de estar deslocando o 1o. item da 2o. página, por causa

do canhoto, até hoje, eu faz atualização e tenho que ficar mudando isso....

Como funciona, para quem mando esse tipo de correção para avaliação? Na época nínguem respondeu o Post.

+1 Muito obrigado.

[Waldir Paim]

Nessa correria de todos deve ter passado despercebido!

Posta a correção ai novamente, se for em Fortes estou fazendo algumas mudanças e em breve posto aqui para o pessoal avaliar.

Com certeza estamos num local bem democrático e suas alterações e as minhas serão adicionadas ao svn!

Abraço!

Waldir Paim