Versões comparadas

Versão antiga 6

changes.mady.by.user Mario Ianagui

Gravado em

comparado com

Nova versão 7

changes.mady.by.user Mario Ianagui

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

  • No OnCalc do campo ComplementoICMS (criado no relatório):

    Bloco de código
    begin
// Complemento o campo AjusteICMSSubst é salvo negativo. Quando positivo é ressarcimento e não precisa imprimir
  if (NaturezaOperacaoEmp['GeraICMSRetidoFonte']= 1) and (ItensNF['ajusteICMSSubst']< 0) then begin
      Value := FormatCurrencyDecimals(((ItensNF['ajusteICMSSubst']* ItensNF['qtde']) * -1),false,1);
  end else begin
    ^ Value  Value:= 0;
  end;
end;


Onde FormatCurrencyDecimals(((ItensNF['ajusteICMSSubst']* ItensNF['qtde']) * -1),false,1);

...