Estou processando arquivo de retorno do Sicoob, padrão CNAB240 e encontrei algumas divergências entre o Layout de 15/12/2017 e o ACBR.
fpTamanhoMaximoNossoNum := 7; // pelo manual é 9+DV tamanho10
leitura de informações do retorno estão erradas na procedure TACBrBancoob.LerRetorno240(ARetorno: TStringList);
NossoNumero := Copy(Linha,40,7); => correto Copy(Linha,38,10);
Carteira := Copy(Linha,40,2); => correto Copy(Linha,58,1);
esta é uma linha do arquivo de retorno
7560001300001T 0203069000000012157010000000502901014 12018040148 10042018000000000010500756030690 090000000376344963xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx00000000000000000000000000000000046
13.3T 38 57 20 - Alfa Nosso Número
14.3T 58 58 1 - Num Carteira
LAYOUT ATUALIZADO EM 15/12/2017
"Nosso Número:
NumTitulo - 10 posições (1 a 10)
Parcela - 02 posições (11 a 12) - ""01"" se parcela única
Modalidade - 02 posições (13 a 14) - vide planilha ""Contracapa"" deste arquivo
Tipo Formulário - 01 posição (15 a 15):
Em branco - 05 posições (16 a 20)"
Layouts_para_troca_de_informações.xls