Ainda no Emulador e não quer imprimir o Extrato do Cfe...

[Mário Augusto Pisani]

Estou com o seguinte problema:  Criei uma rotina de arredondamento dos valores descontados, a partir de uma regra, pois o Delphi nunca trás o valor certo, com as duas casas decimais exatas... 

Consigo criar o XMl, mas ao mandar imprimir o Extrato, ele não o encontra e chega nessa tela:

Gostaria de saber porque isso acontece, e se há algo errado no trecho do procedimento gerar venda para trazer os valores exatos com arredondamento no arquivo xml. 

Antes ele chegou afirmar que  1.380,00 não é um valor real valido... Como ???

 

 

 

PROC GERAR VENDA.txt

Editado 9 Maio, 2022 por Mário Augusto Pisani

[Mário Augusto Pisani]

Em um novo teste com valor acima de R$1000,00, ele traz ... Exception - rlVenda: Erro durante a preparação do relatório
EConvertError('1.105,60' is not a valid floating point value) ...  Como que '1.105,60' não é um valor real valido, declarei como Double em Var no procedimento...

Editado 10 Maio, 2022 por Mário Augusto Pisani

[Juliomar Marchetti]

com o exemplo ocorre o mesmo?

se sim como reproduzir?

[Mário Augusto Pisani]

Bom dia Juliomar, então, quando uso valores (totais de itens com desconto), que vão até R$99,99 e de R$100,00 até R$999,99 ele cria o xml, envia, e cria/gera o Extrato como o seguinte:

Quando são valores a partir de R$1000,00, ele cria o xml, envia, mas não cria/gera o Extrato... ele informa no log de comandos que qualquer valor apartir de R$1.000,00 não é um ponto flutuante válido... No evento rlbDescItemBeforePrint da unit TACBrSATExtratoFortesFr, estou fazendo como segue no bloco de notas ...   Não entendo porque isso acontece, no Banco a coluna está como Double, e na declaração de variáveis do procedimento, declaro todas como Double.. 

Prcedimento antes de imprimir descontos.txt

[Juliomar Marchetti]

Anexa seu xml aqui pra mim ver uma coisa ele é de homologação certo?

 

[Mário Augusto Pisani]

Sim está configurado como Homologação.  Nesse os totais acima de R$50,00 sofrem 20% de desconto... 

 

AD35220511111111111111591234567890000436341784.xml

[Mário Augusto Pisani]

Depois de muito esforço consegui resolver.... Reverti o procedimento que eu tinha alterado e modifiquei no procedimento anterior da unit ACBrSATExtratoFortesFr do exemplo dos fontes.

Onde modifiquei consta no bloco de notas: => Onde modifiquei...   acrescentei o parâmetro: '0.00', antes só estava com Prod.VProd.   

Procedimento.txt

[Juliomar Marchetti]

No caso está contribuindo? se sim anexe as units alteradas ao tópico.

30 minutos atrás, Mário Augusto Pisani disse:

Depois de muito esforço consegui resolver.... Reverti o procedimento que eu tinha alterado e modifiquei no procedimento anterior da unit ACBrSATExtratoFortesFr do exemplo dos fontes.

Onde modifiquei consta no bloco de notas: => Onde modifiquei...   acrescentei o parâmetro: '0.00', antes só estava com Prod.VProd.   

Procedimento.txt 2 kB · 0 downloads