Arquivo Remessa - Banco Mercantil

[toninho]

  Estou tentando gerar Arquivo Remessa para o Banco Mercantil e o campo DataDesconto na Posição 174 - 179 - DATA LIMITE PARA CONCESSÃO DO
DESCONTO, sempre sai com a Data: 301299 alguem sabe me dizer o que é?

CobrancaCNAB400

CobrancaCNAB400_Mercantil.pdf

Editado 13 Janeiro, 2020 por toninho

[toninho]

2 horas atrás, toninho disse:

  Estou tentando gerar Arquivo Remessa para o Banco Mercantil e o campo DataDesconto na Posição 174 - 179 - DATA LIMITE PARA CONCESSÃO DO
DESCONTO, sempre sai com a Data: 301299 alguem sabe me dizer o que é?

CobrancaCNAB400

CobrancaCNAB400_Mercantil.pdf 244 kB · 0 downloads

Ja tentei desses dois jeito.

 with Titulo do begin

     DataDesconto      := 0;

     DataDesconto     := StrToDateDef('  /  /    ',0);

A data tem que sair 000000 no lugar de 301299, porque não existe desconto.

Editado 13 Janeiro, 2020 por toninho

[José M. S. Junior]

Boa tarde 

Precisa alterar no código fonte, aparentemente sempre está considerando que exista uma data para este campo. Se desejar alterar, anexe o fonte aqui, assim atualizamos no SVN.

[toninho]

Em 13/01/2020 at 16:26, José M. S. Junior disse:

Boa tarde 

Precisa alterar no código fonte, aparentemente sempre está considerando que exista uma data para este campo. Se desejar alterar, anexe o fonte aqui, assim atualizamos no SVN.

Boa tarde, alterei ACBrBancoMercantil, estava assim: FormatDateTime( 'ddmmyy', DataDesconto) agora ficou assim:IfThen(DataDesconto < EncodeDate(2000,01,01),'000000', FormatDateTime( 'ddmmyy', DataDesconto)) o meu funcionou normal.

 

Desde ja agradeço José M. S. Junior

ACBrBancoMercantil.pas

[José M. S. Junior]

Obrigado, será validado assim que possível.