Retorno Sicoob 240 Erro NumeroDocumento

[sandrojapa]

Bom dia, na rotina LerRetorno240 do banco sicoob, na hora de pegar o NumeroDocumento está pegando apenas 7 digitos e pelo que vi no layoult está com 15 dígitos.

NumeroDocumento             := copy(Linha,59,7);

teria que ser: 

NumeroDocumento             := copy(Linha,59,15);

Aqui eu modifiquei direto no fonte do ACBR e funcionou.

Estou passando essas informações para correções no componente se necessário.

Segue em anexo o layoult do sicoob.

Layouts para troca de informações_.xls

Editado 29 Abril, 2016 por sandrojapa

[Juliana Tamizou]

Boa tarde.

Realmente parece ser caso de correção, por favor anexe a unit alterada.

Att.

[sandrojapa]

Segue em anexo a unit,

Correção feita na linha 512.

att,

Sandro Campos.

ACBrBancoBancoob.pas

[Juliana Tamizou]

Boa noite.

Alteração disponível  no svn.

Att.