Data Arquivo Remessa CNAB240 Banco ABC Brasil

[wilsonaaugusto]

Bom dia!

Na geração do arquivo remessa CNAB240 do banco ABC Brasil (ACBrBancoABCBrasil.pas), é usado a variável "sDataMoraJuros" para a Data do juros de mora (posições 119 - 126 do segmento P) e para Data da multa (posições 067 - 074 do segmento R). Acredito que a data da multa deveria ser estar em uma variável diferente; para isso eu preencho a propriedade "DataMulta" do título. Olhei os fontes de outros bancos e asa datas são tratadas separadas e no fonte do ABC Brasil não  houve esse tratamento.

Vou alterar aqui para enviar, mas queria saber se essa alteração poderia ser feita por vocês para novas versões?

 

[Juliomar Marchetti]

Tem explicação para isso

mas anexe por favor a sua sugestão

[wilsonaaugusto]

No ACBrBancoABCBrasil,pas, eu trocaria o trecho:

    IfThen((PercentualMulta > 0), '2', '1') + // 066 - 066 / Código da multa
    sDataMoraJuros + // 067 - 074 / Data da multa
    IfThen(PercentualMulta > 0,
      IntToStrZero(round(PercentualMulta * 10000), 15),
      IntToStrZero(0, 15)) + // 075 - 089 / Valor/Percentual a ser aplicado

por

    IfThen((PercentualMulta > 0), '2', '1') + // 066 - 066 / Código da multa
    IfThen((PercentualMulta > 0),
      FormatDateTime('ddmmyyyy', DataMulta), '00000000') + // 67 - 74 Se cobrar informe a data para iniciar a cobrança ou informe zeros se não cobrar
    IfThen(PercentualMulta > 0,
      IntToStrZero(round(PercentualMulta * 10000), 15),
      IntToStrZero(0, 15)) + // 075 - 089 / Valor/Percentual a ser aplicado

Peguei o trecho usado no ACBrBancoSantander.pas.

Obrigado pela atenção.

 

[José M. S. Junior]

Boa tarde, vamos atualizar. Obrigado!

[wilsonaaugusto]

Bom dia!

Obrigado pela atenção.

Complementando, peço para alterarem o seguinte trecho, também:

- Onde está     IfThen((PercentualMulta > 0), '2', '1') + // 066 - 066 / Código da multa

- mudar para     IfThen((PercentualMulta > 0), '2', '0') + // 066 - 066 / Código da multa

Obrigado

 

 

[wilsonaaugusto]

Bom dia!

Gostaria de saber se as alterações foram feitas e atualizadas para eu poder fazer o update.

Obrigado.

[José M. S. Junior]

Bom dia, atualizado no SVN, obrigado!