Cnpj\cpf Do Arquivo Inválido

[FabioMachado]

Boa Noite! Estou tentando recepcionar os arquivos de retorno do banco Itaú mais me retorna o erro CNPJ\CPF do Arquivo Inválido. Ja olhei no arquivo e está correto.

 

Estou fazendo algo errado?

 

    ACBrBoletoRetorno.Cedente.TipoInscricao:=pFisica;
    ACBrBoletoRetorno.Cedente.Nome:=sqlCadBAN_NOME_CEDENTE.AsString;
    ACBrBoletoRetorno.Cedente.CodigoCedente:=sqlCadBAN_CODIGO_CEDENTE.AsString;
    ACBrBoletoRetorno.Cedente.Agencia:=sqlCadBAN_AGENCIA.AsString;
    ACBrBoletoRetorno.Cedente.AgenciaDigito:=sqlCadBAN_AGENCIA_DIGITO.AsString;
    ACBrBoletoRetorno.Cedente.Conta:=sqlCadBAN_CONTA.AsString;
    ACBrBoletoRetorno.Cedente.ContaDigito:=sqlCadBAN_DIGITO_CONTA.AsString;
    ACBrBoletoRetorno.Cedente.CNPJCPF:=sqlCadBAN_CPF_CNPJ_CEDENTE.AsString;
    ACBrBoletoRetorno.Banco.Nome:=sqlCadBAN_NOME.AsString;
    ACBrBoletoRetorno.Banco.Numero:=sqlCadBAN_NR.AsInteger;

    dlgOpen1.FileName  := '';
    dlgOpen1.Title := 'Selecione o arquivo de retorno';

    if dlgOpen1.Execute then
      begin
      ACBrBoletoRetorno.DirArqRetorno  :=  ExtractFilePath(dlgOpen1.FileName);
      ACBrBoletoRetorno.NomeArqRetorno :=  ExtractFileName(dlgOpen1.FileName);
      end;

    ACBrBoletoRetorno.LerRetorno;

 

CN03074A.txt

Editado 8 Julho, 2014 por FabioMachado