Jump to content

Assista click.png tectoy.png

C6 chamada_c6.png botao.png

Vdesc - Erro Classe Acbrnfedanfefrdm


  • Este tópico foi criado há 2562 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Caros amigos do versionamento,

Antes de reportar este erro, atualizei meus fontes hoje para verificação.

 

 

neste if da linha 571 da classe citada acima, verifiquei o erro de conversão, causado pela string "%", pois o campo vDesc e do tipo float.

          if FDANFEClassOwner.ImprimirDescPorc then
          begin
            if vDesc > 0 then
               FieldByName('vDesc').AsString := DFeUtil.FormatFloat(((vDesc*100) / (VUnCom * QCom))) + '%'
               //FieldByName('vDesc').AsString := DFeUtil.FormatFloat(RoundTo(100 - ((((VUnCom * QCom) - vDesc) / (VUnCom * QCom)) * 100), -1)) + '%'
            else
               FieldByName('vDesc').AsString := DFeUtil.FormatFloat(vDesc);
          end
 
 
A classe já esta em anexo com a correção, apenas removi o percentual que causa o erro.
 
Após verificação deste erro, percebi que a classe "DANFeNFCeA4.fr3" esta com erro e não mostrando o desconto por item. Mais tarde vou ver se consigo corrigir o erro posto a correção.
 
Att: Mauro Augusto.

ACBrNFeDANFEFRDM.pas

Mauro Augusto Souza Lima / Sócio Desenvolvedor

Tels : (24) 2246-0548 - 2246-3051

www.limatech.com.br

limatech.png

Link to comment
Share on other sites

×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.