Pessoal!
tive que implementar a impressao do vIPIDevol, no campo DESPESAS ACESSORIAS do danfe, conforme nota tecnica, para uso em emissao de notas de devolucao, emitidas por empresas do simples nacional, quando existir IPI a ser devolvido!
modifiquei a danfe no fortes, segue correção para analise!
aqui pra mim, funcionou perfeitamente!
procedure TfrlDANFeRLRetrato.Imposto;
var
LarguraCampo: integer;
begin
with FNFe.Total.ICMSTot do
begin
rllBaseICMS.Caption := FormatFloatBr(VBC );
rllValorICMS.Caption := FormatFloatBr(VICMS );
rllBaseICMSST.Caption := FormatFloatBr(VBCST );
rllValorICMSST.Caption := FormatFloatBr(VST );
rllTotalProdutos.Caption := FormatFloatBr(VProd );
rllValorFrete.Caption := FormatFloatBr(VFrete);
rllValorSeguro.Caption := FormatFloatBr(VSeg );
rllDescontos.Caption := FormatFloatBr(VDesc );
rllAcessorias.Caption := FormatFloatBr(VOutro + vIPIDevol); // <= inclusao do valor do vIPIDevol
rllValorIPI.Caption := FormatFloatBr(VIPI );
rllTotalNF.Caption := FormatFloatBr(VNF );
Se tiverem outra sugestao, ou posicionamento melhor para este, comentem!
Abraços
ACBrNFeDANFeRLRetrato.pas
ACBrNFeDANFeRLPaisagem.pas
ACBrNFeDANFeRLRetrato.dfm
ACBrNFeDANFeRLPaisagem.dfm