Ir para conteúdo
  • Cadastre-se

dev botao

Problemas Retorno Cef


mkvendas2006
Ver Solução Respondido por mkvendas2006,
  • Este tópico foi criado há 4096 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Boa Tarde,

 

Estou com problemas no retorno da Caixa Economica Federeal CNAB 240:

 

 

Ele está pegando a agencia com um zero na frente:

 

rAgencia     := trim(Copy(ARetorno[0],53,5));

 

Onde o correto é rAgencia     := trim(Copy(ARetorno[0],54,4));

 

Conforme está no manual, o Nº da conta ele pega no arquivo o código do cendete tb errado.

 

Parei minha rotina por ai, posso corrigir isso no .pas e postar para voces?

Vocês estão conseguindo usar essa rotina sem alterar nada?

 

 

Maicon

 
Link para o comentário
Compartilhar em outros sites

  • Administradores

Bom dia. 

 

Veja oque diz o manual do banco:

 

Agência Mantenedora da Conta Posição Inicial:53  Posição Final:57 Quantidade de Dígitos:5

 

 
Agência Mantenedora da Conta
Código adotado pelo Banco responsável pela conta, para identificar a qual unidade está vinculada a conta
corrente.
Tamanho 5 posições. Preencher com zero a esquerda.
 
Considerando essa orientação a rotina está correta, caso haja um novo manual por favor anexe aqui para ser analisado.
 
Att.
 
 
 
Consultora SAC ACBr

Juliana Tamizou

Gerente de Projetos ACBr / Diretora de Marketing AFRAC
Ajude o Projeto ACBr crescer - Seja Pro

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.  Discord

Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil


Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

Link para o comentário
Compartilhar em outros sites

Sim,

 

Olhando pelo Manual tudo certo, o problema que estou enfrentando é aqui:

 

 

 

        MAg :=   OnlyNumber(Cedente.Agencia); //Minha var para obter o valor no Debug
        MConta :=  OnlyNumber(Cedente.Conta);
 
     if (not LeCedenteRetorno) and ((rAgencia <> OnlyNumber(Cedente.Agencia)) or
         (rConta <> OnlyNumber(Cedente.Conta))) then
        raise Exception.Create(ACBrStr('Agencia\Conta do arquivo inválido'));
 

 

No caso da agencia ele tira o 0 do cadastro e cai no Exception devido o OnlyNumber;

 

No caso da conta a mesma coisa acima, e ele ta pegando o codigo cedente, devo preencher o Código cedente na conta também? 

 

 

 

Maicon

Link para o comentário
Compartilhar em outros sites

  • Administradores

Bom dia.

 

Na verdade baseado nos testes que fiz com seu arquivo o único problema estava relacionado a conta, pois esta unit não utiliza esta propriedade apenas o CodigoCedente.

 

Estão disponíveis no svn os fontes com um ajustes para que seja feita a validação de forma correta destas informações, após efetuar a atualização do componente o arquivo será processado.

 

Att.

Consultora SAC ACBr

Juliana Tamizou

Gerente de Projetos ACBr / Diretora de Marketing AFRAC
Ajude o Projeto ACBr crescer - Seja Pro

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.  Discord

Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil


Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

Link para o comentário
Compartilhar em outros sites

Boa Tarde Juliana,

 

Observei que mudou alguma coisa, mas ainda falta um detalhe:

 

 

     if (not LeCedenteRetorno) and ((rAgencia <> OnlyNumber(Cedente.Agencia)) or
         (rConta <> OnlyNumber(Cedente.Conta))) then
        raise Exception.Create(ACBrStr('Agencia\Conta do arquivo inválido'));
 
 
Quando da o OnlyNumber ele retira os zeros a esquerda aonde que não fecha.
 
E a Conta quando lê do arquivo precisa pular os 3 primeiros algarismos, pois eles é a operação 870 ou 003. Pois no arquivo tá lendo: 87000000051
 
 
Alterando isso irá resolver, 


Maicon
 
 
Link para o comentário
Compartilhar em outros sites

  • Administradores

Boa tarde.

 

As alterações que fiz foram na unit CaixaEconomica, apesar de estarem corretas não é oque você deve usar.

Está disponível no svn a correção para a unit CaixaEconomicaSicob, onlynumber não remove os "0", oque estava causando o problema era o fato de não estar definido para esta classe o tamanho correto dos campos Agência e Conta..

 

Att.

Consultora SAC ACBr

Juliana Tamizou

Gerente de Projetos ACBr / Diretora de Marketing AFRAC
Ajude o Projeto ACBr crescer - Seja Pro

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.  Discord

Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil


Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

Link para o comentário
Compartilhar em outros sites

  • Este tópico foi criado há 4096 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.