Bom dia pessoal, estou com um problema um pouco estranho, ao fazer o retorno de todos os bancos funciona perfeitamente, mas ao tentar fazer do banco bradesco ele pega o nosso número em branco em todos os títulos, vi que que um usuário postou a um tempo atrás no fórum com o mesmo problema, mas infelizmente não postou como fez pra resolver.
Segue código que uso pra ler o retorno:
ACBrBoleto := TACBrBoleto.Create(Self);
ACBrBoleto.LeCedenteRetorno := True;
AcbrBoleto.NomeArqRetorno := NomeArquivoRetorno;
AcbrBoleto.LerRetorno;
NovoPortador := '';
For i := 0 to AcbrBoleto.ListadeBoletos.Count - 1 do
Begin
If Trim(AcbrBoleto.ListadeBoletos.Objects[i].SeuNumero) <> '' Then
Begin
Numero := TStringList.Create;
ExtractStrings(['-'], [], PWideChar(AcbrBoleto.ListadeBoletos.Objects[i].SeuNumero), Numero);
Titulo := Numero[0];
Parcela := Numero[1];
Serie := Numero[2];
End;
Essa linha sempre retorna uma string vazia ser for Bradesco: ' '
AcbrBoleto.ListadeBoletos.Objects[i].SeuNumero
Vou anexar o arquivo de retorno.
Agradeço a ajuda.
CB140500.RET