Ir para conteúdo
  • Cadastre-se

dev botao

Na impressão da GNRE 2.0 não estava somando o valor do FECP no total da guia.


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

Recommended Posts

Boa tarde.

Na impressão da GNRE 2.0 não estava somando o valor do FECP no total da guia.

Na unit ACBrGNReGuiaRLRetrato.pas na rotina RLBand1BeforePrint foram alteradas as linhas abaixo.

RLLabel28.Caption := FormatFloat('R$ ,0.00',  FGNRe.ValorPrincipal + FGNRe.ValorFECP);
RLLabel36.Caption := FormatFloat('R$ ,0.00',( FGNRe.ValorPrincipal + 
                                              FGNRe.AtualizacaoMonetaria+
                                              FGNRe.Juros +
                                              FGNRe.Multa +
                                              FGNRe.ValorFECP));
                                              
Na unit ACBrGNREGuiasRetorno, rotina LerXML foi adicionadas as linhas abaixo.

if Leitor.rAtributo('tipo=', 'valor') = '12' then
   GNRERetorno.ValorFECP := Leitor.rCampo(tcDe2, 'valor');                                              
                                              
Segue arquivos para validação.

Obrigado.

ACBrGNReGuiaRLRetrato.pas ACBrGNREGuiasRetorno.pas

Link para o comentário
Compartilhar em outros sites

  • Este tópico foi criado há 1210 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.
Visitante
Este tópico está agora fechado para novas respostas
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.