Problema ao realizar retorno do arquivos do Santander

[Felippi]

Ao realizar o retorno dos arquivos do santader me deparei com um problema,

Ao ler o arquivo na parte de movimentações no meu sistema está passando a agencia correta 0300...

No arquivo na posicao 18-22 esta a agencia 0300 porem no ACBRSantader, está desta forma.

rAgencia := PadLeft(OnlyNumber(Copy(ARetorno[1],18,3)),fpTamanhoAgencia,'0');

Ele está lendo somente os 3 digitos apos a posição 18, vindo 030, como o fpTamanhoAgencia é 4 ele joga para 0030;

Isto está certo ? deveria realmente ser 3 digitos ou 4, ja que o fpTamanhoAgencia vem como 4?

Por este motivo não estou conseguindo realizar o retorno ja que ele diz que a agencia que esta vindo do arquivo difere do que passei para o componente.

Obrigado..

[Antonio Gomes]

Geralmente agencia é com 4 digitos...

Corrija a unit e manda para o pessoal subir a correção.

[Felippi]

Alterado arquivo para 4 digitos..

Por favor se alguem puder subir, fico muito agradecido..

Muito Obrigado..

Espero poder ajudar..

ACBrBancoSantander.pas