Retorno Bradesco - Nosso Número em Branco

[JhoyAscari]

 

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

[JhoyAscari]

Fiquei quebrando a cabeça e não tinha conseguido resolver, após postar creio que descobri o problema, tinha baseado meu retorno no exemplo que alguém postou no fórum e naquele exemplo estavam pegando o campo "SeuNumero", mas creio que o campo correto a ser pego é o "NumeroDocumento", aí ele retorna as informações corretas, ficando assim:

 

AcbrBoleto.ListadeBoletos.Objects[i].NumeroDocumento

 

De qualquer forma muito obrigado!

[José M. S. Junior]

Obrigado pelo retorno.