Multa e Juros FCP

[FabioTellini]

Boa tarde.

Estou com uma situação na impressão da guia da GNRE onde os valores de JurosFCP e MultaFCP não estão sendo somados nos campos de Juros e Multa.

Na rotina TdmACBrGNREFR.CarregaDados está da seguinte forma:
FieldByName('Juros').AsCurrency                := Juros;
FieldByName('Multa').AsCurrency                := Multa;

Com isso os valores na guia não batem, conforme anexo 1.

 

Fiz a seguinte alteração na rotina deixando da seguinte forma:
FieldByName('Juros').AsCurrency                := Juros + JurosFCP;
FieldByName('Multa').AsCurrency                := Multa + MultaFCP;

Dessa forma os valores na guia bateram, conforme anexo 2.

Segue arquivo para validação.

Obrigado.

ACBrGNREGuiaFRDM.pas

[Diego Foliene]

Obrigado pela contribuição, em breve será validada para possível inclusão ao svn #TK-4864.

[Diego Foliene]

Bom dia!

Por favor, pode enviar para [email protected] o XML que utilizou para realizarmos um teste?

Não se esqueça de colocar no corpo do e-mail o link deste tópico para posterior identificação.

[Diego Foliene]

Bom dia!

Como não dispomos de dados oficiais para geração de um XML, a disponibilização do arquivo para testes é importante para que possamos dar andamento na análise de sua contribuição.

[FabioTellini]

Boa noite. 

Segue arquivos.

Obrigado.

20240208181329-env-lot.xml 2411159355-pro-rec.xml

[Diego Foliene]

12 horas atrás, FabioTellini disse:

Boa noite. 

Segue arquivos.

Obrigado.

20240208181329-env-lot.xml 1.25 kB · 0 downloads 2411159355-pro-rec.xml 2.85 kB · 0 downloads

Obrigado!

Vamos realizar testes com os mesmos e retornamos aqui com qualquer novidade