Imprimindo 2 vezes o troco

[Ricardo De Luca]

boa noite estou fazendo impressão da nfce versão 4.00 porem ta saindo repetido o troco conforme a quantidade de forma de pagamento estou utilizando fastreport estou utilizando o DANFeNFCe[Reduzida].fr3 e DANFeNFCe4_10.fr3.

[Ricardo De Luca]

achei um solução alterei o DANFeNFCe[Reduzida].fr3  acrescentando uma variável ipagCount 

var

   iPagCount: integer;

 

procedure frxReport1OnStartReport(Sender: TfrxComponent);
begin
  iPagcount := 0;                               
end;

procedure DadosPagamentoOnBeforePrint(Sender: TfrxComponent);
begin
  Inc(iPagCount);   

  if iPagCount=DadosPagamento.DataSet.recordcount then begin
     if <CalculoImposto."vTroco"> > 0 then
        ChildTroco.Visible := true;
  end else
     ChildTroco.Visible := false;
end;

segue em anexo o arquivo alterado.

DANFeNFCe[Reduzida]alterado.fr3

[Juliomar Marchetti]

No svn a sugestão.

obrigado.