Correção Registro E3

[RauberGabri]

Opa galera, terminei minha homologação, segue uma correção que fiz em relação ao PAF

 

Na função

function TACBrPAF.SaveToFile_RegistrosPAF(Arquivo: String): Boolean;

O acbr sempre mandava escrever o e3, mesmo que não tivesse sido enviado um registro e3 coloquei um if pra que quando não for preenchido informação ele não escrever a linha vazia.

Está hoje assim:

Citar

FPAF_E.WriteRegistroE3;

Ajustei pra ficar assim:

Citar

if FPAF_E.RegistroE3.DT_EST > 0 then
  begin
    FPAF_E.WriteRegistroE3;
  end;

Se quiserem fazer esse ajuste, fiquem a vontade

Abraços

[Juliomar Marchetti]

Boa tarde

basta anexar que efetuamos o merge teste e subimos no svn.

[RauberGabri]

Segue unit alterada.

 

ACBrPAF.pas

[Juliomar Marchetti]

No svn a correção.

Obrigado.