Verifiquei um problema na leitura do retorno CNAB 240 do Bradesco em que no caso de importar mais de um arquivo em sequencia a partir do segundo sempre dava o erro: "Tamanho Máximo do Nosso Número é: 10".
Pois bem, pelo manual o tamanho máximo é 11 e no construtor da classe já é inicializada a propriedade "fpTamanhoMaximoNossoNum := 11;", só que, na rotina "TACBrBancoBradesco.LerRetorno240" ao final da mesma havia a linha:
ACBrBanco.TamanhoMaximoNossoNum := 10;
...e portanto, na importação seguinte ocorria o erro. Havia também uma linha atribuindo 11 antes do início do "For.." e que estava comentada, a qual removi para evitar mais confusão.
Aproveitando a alteração também adicionei na rotina "TACBrBancoBradesco.GerarRegistroTransacao240" mais três códigos de ocorrência que não estavam previstos:
toRemessaDispensarMulta : ATipoOcorrencia := '15';
toRemessaNegativacaoSemProtesto : ATipoOcorrencia := '45';
toRemessaBaixaTituloNegativadoSemProtesto : ATipoOcorrencia := '46';
Em anexo unit alterada para, na medida do possível subir para o SVN.
Desde já agradeço.
ACBrBancoBradesco.pas