Acbr Boleto - Cobrança Sicredi

[daniel_mirassol]

Analisando o fonte do banco Sicredi encontrei alguns inconsistências, gostaria de saber se posso corrigir ?

Aguardo resposta dos moderadores .

 

No aguardo.

[Juliana Tamizou]

Boa noite.

 

Você pode realizar as alterações que julgar necessárias e então anexar o arquivo alterado e o manual utilizado como base para as alterações. Após análise das alterações as mesmas poderão ser comitadas.

 

Att.

[vinicius_santos]

Boa tarde Juliana,

Na procedure TACBrBancoSicredi.GerarRegistroTransacao400, existe a seguinte linha:

     if trim(CodigoMora) = '' then
       CodigoMora := 'A';

Porém a classe TACBrTitulo no construtor da classe já seta o fCodigoMora = 12.

Se o usuário não preencher o CodigoMora os arquivos de remessa do Sicred ficam errados já que o CodigoMora fica com 2 caracteres ao invés de um.

Fiz a seguinte alteração:

 

if (trim(CodigoMora) = '') or ( ( trim(CodigoMora) <> 'A' ) and ( trim(CodigoMora) <> 'B' ) ) then

  CodigoMora := 'A';

 

Deixando como está o arquivo de remessa está ficando com 401 posições no arquivo de remessa.

 

[Juliana Tamizou]

Boa noite.

A alteração está no svn com algumas alterações.

Att.