Ajuste no arquivo ACBrBancoUnicredES.pas para a homologação com o UNICred CNAB 240

[Giovani Da Cruz]

Boa tarde!

 

Verificamos a necessidade de realizar um ajuste, no arquivo ACBrBancoUnicredES.pas para utilizar a opção "Dias para Negativação" 

O problema ocorre que ao montar o arquivo de remessa, o mesmo utiliza o mesmo valor para dias de protesto e dias de negativação.

 

{ Dias para protesto / Negativação }
    ADias := '00';
    if Length(ACodProtesto) > 0 then
    begin
      if ACodProtesto[1] in ['1', '2'] then // protesto
      begin
        ADias := PadLeft(IntToStr(DiasDeProtesto), 2, '0');
      end;

      if ACodProtesto[1] in ['4', '5'] then  // negativação
      begin
        ADias := PadLeft(IntToStr(DiasDeNegativacao), 2, '0');
      end;
    end;

 

Também colocamos um ajuste para o código correto para a questão da negativação.

if ACodProtesto = '7' then
    begin
      ACodProtesto := '4';
    end;

 

Com esta versão do arquivo, consegui homologar para CNAB 240. Gostaria de disponibilizar o arquivo para ver se pode ser útil ao projeto.

ACBrBancoUnicredES.pas

[Juliana Tamizou]

Bom dia @Giovani Da Cruz

Em primeiro lugar, obrigada pela contribuição, são sempre muito bem vindas.

Por favor anexe também o manual do banco que trata estas mudanças, assim mantemos no repositório a documentação atualizada.

At.

[Giovani Da Cruz]

Bom dia @Juliana Tamizou, segue em anexo o manual utilizado.

 

Atenciosamente 

Giovani Da Cruz

1685563119393-gr---cob136---cobranca-web---layout-cnab-240---remessapdf.pdf

[Juliana Tamizou]

Obrigado pela contribuição, em breve será validada para possível inclusão ao svn

TK-4881

[Daniel InfoCotidiano]

Por favor atualize seus fontes, pelo SVN do ACBr... 

Já subimos para o nosso repositório de fontes, modificações que podem corrigir algum dos itens referentes a esse tópico...

Por favor atualize seus fontes, faça testes, e se possível comente em uma nova resposta, se o problema foi resolvido...

Dúvidas, sobre o uso do SVN ?  Clique aqui e veja um vídeo