Problemas Acbrboleto Retorno Banco

[luisclaudio_jr]

Agencia\Conta do arquivo inválido

mesmo passando os dados 

 

 PASSANDO conta/agencia 

 

 

 DTM_FINAN.ACBrBoleto1.Cedente.CodigoCedente    := qryConta.FieldByname('CODIGO_COBRANCA').AsString;
  DTM_FINAN.ACBrBoleto1.Cedente.Agencia          := qryConta.FieldByname('CONTA_AGENCIA').AsString;
  DTM_FINAN.ACBrBoleto1.Cedente.AgenciaDigito    := qryConta.FieldByname('CONTA_AGENCIA_DIG').AsString;
  DTM_FINAN.ACBrBoleto1.Cedente.Conta            := qryConta.FieldByname('CONTA_NUMERO').AsString;
  DTM_FINAN.ACBrBoleto1.Cedente.ContaDigito      := qryConta.FieldByname('CONTA_NUMERO_DIG').AsString;


ACBRBANCODOBRASIL.pas 

 

Debugando nao chega em "Cedente.Conta"

 

o que DÁ ERRO DE Exception.Create(ACBrStr('Agencia\Conta do arquivo inválido'));

 

 

/<<<<<<< .mine
    //  if (not LeCedenteRetorno) and ((rAgencia <> OnlyNumber(Cedente.Agencia)) or
     //     (rConta <> OnlyNumber(Cedente.Conta))) then
     //    raise Exception.Create(ACBrStr('Agencia\Conta do arquivo inválido'));
//=======
      if (not LeCedenteRetorno) and
         ((rAgencia <> On


lyNumber(Cedente.Agencia)) or
          (rConta <> OnlyNumber(Cedente.Conta))) then
         raise Exception.Create(ACBrStr('Agencia\Conta do arquivo inválido'));

//>>>>>>> .r5130

Alguem já passou por isso?

 

 

 

[Juliomar Marchetti]

Pelo codigo que você colou , venho a crer  que você fez alterações próprias suas e ao efetuar o update no svn ele fez um merge

faz um teste, copia suas alterações e faz um revert no svn para que ele exclua e deixei tudo igual ao servidor

e dai tente rebuild em sua aplicação e veja se vai ocorrer o mesmo erro

[luisclaudio_jr]

Mesmo excluindo a rotina e solicitando a atualização, ela continua apontando esse erro!

[Juliomar Marchetti]

Acho que você deve recompilar os pacotes do ACBr

e depois um Rebuild em sua aplicação

[luisclaudio_jr]

Já fiz isso algumas vezes amigo, e mesmo assim o erro persiste!

[Juliomar Marchetti]

Verifica então a função LeCedenteRetorno

que tem ali no teste se não está retornando errado e dai ele ignora e já cria a exceção!

[csoft]

Apesar de antigo o post, também estava c/ esse problema, então serve p/ registro: atualize os fontes e altere p/ True a propriedade LeCedenteRetorno do componente ACBrBoleto1.