Problemas com casas decimais qCom vUnCom

[menezesbr]

Boa tarde, por gentileza, estou tendo problemas com emissão de vendas do SAT. Quando envio valores inteiros para os campos qCom, vUnCom, cCFeLei12741, me gera o erro no sat de valores dos campos inválidos.

 

Observei que quando mando por exemplo um produto que custa 2,00 reais, ele tira o 00 e estava mandando 002 e retornando erro.

Consegui solucionar o problema alterando a unit pcnGerador.pas alterando a linha 876

ConteudoProcessado := StringReplace(FloatToString(valorDBl),',','.',[rfReplaceAll]);

para

ConteudoProcessado := StringReplace(FloatToStrF(valorDBl,ffNumber,TamMax,NumeroDecimais),',','.',[rfReplaceAll]);

 

Porem gostaria de saber se existe algum outro jeito ou pode ser atualizado isso no ACBr

Coloquei em anexo a alteração que fiz.

 pcnGerador.rar

Grato pela atenção

 

 

 

[Daniel Simoes]

Não compreendi qual é exatamente o problema... Poderia por favor exemplificar melhor ?

Dê um exemplo de código...

Como está sendo gerado o XML ?

Como deveria ser gerado ?

[menezesbr]

Bom dia Daniel, quando faço uma vendo e o valor do produto é 120,00 e quantidade 1 ele esta gerando o xml assim:
(vou marcar em negrito onde estão apresentando os erros)
 

<prod>
            <cProd>ACBR001</cProd>
            <cEAN>6291041500213</cEAN>
            <xProd>Assinatura SAC</xProd>
            <NCM>99</NCM>
            <CFOP>5120</CFOP>
            <uCom>UN</uCom>
            <qCom>000001</qCom>
            <vUnCom>0120</vUnCom>
            <indRegra>A</indRegra>
            <vDesc>0001</vDesc>
            <obsFiscoDet xCampoDet="campo">
               <xTextoDet>texto</xTextoDet>
            </obsFiscoDet>
         </prod>

Além de erros nos campos de vcfelei12741 e vItem12741

Para resolver isso mudei a Unit como falei na mensagem anterior mas gostaria de saber se existe alguma outra forma.

Obrigado

Abraços

 

 

Editado 4 Julho, 2015 por menezesbr

[Daniel Simoes]

Não consegui reproduzir o problema no "Trunk2"

Execute o binário já compilado e Gere uma Venda...