leitura do retorno santander erro de CNPJ\CPF do arquivo inválido

[Rafael jorge]

Estou tentando ler o retorno do santander, o problema é que ele esta pegando um caracter a mais no cnpj o que da o erro CNPJ\CPF do arquivo inválido.
eu corrigi a linha 893
original:
 

  case StrToIntDef(Copy(ARetorno[0],17,1),0) of
    1: rCNPJCPF := Copy(ARetorno[0],22,11);
    2: rCNPJCPF := Copy(ARetorno[0],18,15);
  else
   rCNPJCPF := Copy(ARetorno[0],18,15);
  end;

modifiquei para:
 

  case StrToIntDef(Copy(ARetorno[0],17,1),0) of
    1: rCNPJCPF := Copy(ARetorno[0],22,11);
    2: rCNPJCPF := Copy(ARetorno[0],19,14);
  else
   rCNPJCPF := Copy(ARetorno[0],18,15);
  end;

a unit altera esta anexada tambem

ACBrBancoSantander.pas

[Rafael jorge]

em anexo o retorno utilizado para testes do retorno.

COBST_LMZ3_02_031017P_MOV.TXT

[Denis Queiroz]

Conforme já tinha postado anteriormente....

 

Veja este link

Postei a solução amigo, espero que seja útil.

Editado 20 Outubro, 2017 por Denis Queiroz

[Rafael jorge]

2 horas atrás, Denis Queiroz disse:

Conforme já tinha postado anteriormente....

 

Veja este link

Postei a solução amigo, espero que seja útil.

Realmente nao tinha visto teu post. e olha que é o primeiro da lista.
mas pelo menos a gente resolveu essa bronca.

[Denis Queiroz]

Pois é, vi que resolveram hoje e já está no SVN, mas também não ví este link

Mudaram outra coisa referente a multa também e tive problemas com o Santander, se você usa Multa recomendo Passar o Campo DataMulta também, pois agora é separado.

Basta passar a mesma data onde você cobra a Mora, ao menos eu fiz assim no meu caso, Vencimento + 1.