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