Ir para conteúdo
  • Cadastre-se

dev botao

Boleto Bradesco recusado na homologação por falta de digito verifircador da agência no codigo de barras.


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

Recommended Posts

Postado (editado)

ao enviar arquivo de remessa e pdf para o Bradesco para homologar, foi recusado por falta do digito verificador da agência no codigo de barras. Alguem sabe como resolver isso?

 

Segue o codigo gerado pelo componente acbrboleto  e logo a baixo a forma que o banco informa ser correto. 

23790.21401 90000.000290 33002.217801 1 97690000002500 - codigo gerado pelo compoente acbr


23792.14701 90000.000290 33002.217801 1 97690000002500 - exigido pelo banco

Editado por walterfolly
  • Consultores
  • Solution
Postado

os cálculos de controle do componente estão corretos.

as informações de agencia que não estão informados para o mesmo correto.

image.png

Consultor SAC ACBr

Victor H Gonzales - Pandaaa
Ajude o Projeto ACBr crescer - Assine o SAC

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 !!

"Aprender é a única coisa que a mente nunca se cansa, nunca tem medo e nunca se arrepende” - Leonardo da Vinci

"Ter sucesso é falhar repetidamente, mas sem perder o entusiasmo"

Postado

O que eu posso estar preechendo de errado:

              ACBrBoleto1.Banco.TipoCobranca        := cobBradesco;
              ACBrBoleto1.Cedente.Nome              := DM_Geral.wEMPRESA;
              ACBrBoleto1.Cedente.CNPJCPF           := DM_Geral.wCNPJ;
              ACBrBoleto1.Cedente.Modalidade        := DM_Geral.qryCedente.FieldByName('modalidade').AsString;
              ACBrBoleto1.Cedente.Agencia           := trim(DM_Geral.qryCedente.FieldByName('agencia').AsString);
              ACBrBoleto1.Cedente.AgenciaDigito     := trim(DM_Geral.qryCedente.FieldByName('ag_digito').AsString);
              ACBrBoleto1.Cedente.CodigoCedente     := DM_Geral.qryCedente.FieldByName('convenio').AsString;
              ACBrBoleto1.Cedente.CodigoTransmissao := '';
              ACBrBoleto1.Cedente.Conta             := DM_Geral.qryCedente.FieldByName('conta').AsString;
              ACBrBoleto1.Cedente.ContaDigito       := DM_Geral.qryCedente.FieldByName('cc_digito').AsString;
              ACBrBoleto1.Cedente.DigitoVerificadorAgenciaConta := trim(DM_Geral.qryCedente.FieldByName('ag_digito').AsString);
              ACBrBoleto1.Cedente.CaracTitulo       := tcSimples;
              ACBrBoleto1.Cedente.ResponEmissao     := tbCliEmite;
              ACBrBoleto1.Cedente.TipoCarteira      := tctRegistrada;
              ACBrBoleto1.Cedente.Bairro            := DM_Geral.wBAIRRO;
              ACBrBoleto1.Cedente.Logradouro        := DM_Geral.wENDERECO;
              ACBrBoleto1.Cedente.Cidade            := DM_Geral.wCIDADE;
              ACBrBoleto1.Cedente.UF                := DM_Geral.wUF;
              ACBrBoleto1.Cedente.CEP               := DM_Geral.wCEP; 

  • Consultores
Postado
Em 14/06/2024 at 18:11, walterfolly disse:

O que eu posso estar preechendo de errado:

              ACBrBoleto1.Banco.TipoCobranca        := cobBradesco;
              ACBrBoleto1.Cedente.Nome              := DM_Geral.wEMPRESA;
              ACBrBoleto1.Cedente.CNPJCPF           := DM_Geral.wCNPJ;
              ACBrBoleto1.Cedente.Modalidade        := DM_Geral.qryCedente.FieldByName('modalidade').AsString;
              ACBrBoleto1.Cedente.Agencia           := trim(DM_Geral.qryCedente.FieldByName('agencia').AsString);
              ACBrBoleto1.Cedente.AgenciaDigito     := trim(DM_Geral.qryCedente.FieldByName('ag_digito').AsString);
              ACBrBoleto1.Cedente.CodigoCedente     := DM_Geral.qryCedente.FieldByName('convenio').AsString;
              ACBrBoleto1.Cedente.CodigoTransmissao := '';
              ACBrBoleto1.Cedente.Conta             := DM_Geral.qryCedente.FieldByName('conta').AsString;
              ACBrBoleto1.Cedente.ContaDigito       := DM_Geral.qryCedente.FieldByName('cc_digito').AsString;
              ACBrBoleto1.Cedente.DigitoVerificadorAgenciaConta := trim(DM_Geral.qryCedente.FieldByName('ag_digito').AsString);
              ACBrBoleto1.Cedente.CaracTitulo       := tcSimples;
              ACBrBoleto1.Cedente.ResponEmissao     := tbCliEmite;
              ACBrBoleto1.Cedente.TipoCarteira      := tctRegistrada;
              ACBrBoleto1.Cedente.Bairro            := DM_Geral.wBAIRRO;
              ACBrBoleto1.Cedente.Logradouro        := DM_Geral.wENDERECO;
              ACBrBoleto1.Cedente.Cidade            := DM_Geral.wCIDADE;
              ACBrBoleto1.Cedente.UF                := DM_Geral.wUF;
              ACBrBoleto1.Cedente.CEP               := DM_Geral.wCEP; 

2147 diz ao campo de agencia

Consultor SAC ACBr

Victor H Gonzales - Pandaaa
Ajude o Projeto ACBr crescer - Assine o SAC

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 !!

"Aprender é a única coisa que a mente nunca se cansa, nunca tem medo e nunca se arrepende” - Leonardo da Vinci

"Ter sucesso é falhar repetidamente, mas sem perder o entusiasmo"

  • Este tópico foi criado há 152 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.