Ir para conteúdo
  • Cadastre-se

dev botao

Recommended Posts

Postado

Eu atualizei o ACBr, reconstrui o Lazarus, e setei o valor 810 para a propriedade LayoutVersaoArquivo

image.png.c4216fd7a4d743c94afc6c9348a8375e.png

 

Gerei um boleto com o NossoNumero com 8 posições: 72500001

Porem, tanto na remessa, quanto no boleto impresso saiu o digito verificador:

image.png.eafb0331374e2d6aa004c26bae9b96f0.png

 

image.png.ccbdbdeb818b4adbe3d7f39467d640a5.png

 

Sendo assim o banco recusou o arquivo cnab.

image.png.b0122440f3ac417e5582540b6e5252f3.png

 

 

 

 

 

 

 

 

  • Consultores
Postado

Consegue testar com o programa exemplo por favor.
Como temos ele em comum.

Curiosidade, se é sequencial pq vc esta enviando 72500001
pq vai limitar o numero de boletos.. vc nao envia em sequencial ?
0000001, 000002... pq vc vai limitar a seus numeros de boleto e quando chegar no 999999 ?
se o ou o ultimo boleto enviado foi 7249999?

Vou testar aqui no meu exemplo tbm

 

 

Consultor SAC ACBr

Daniel de Morais (Infocotidiano)
Ajude o Projeto ACBr crescer - Assine o SAC

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

Postado

image.thumb.png.e50118055c16a1860180cf15c64b4d1e.png

 

 

O meu DEMO esta estranho, os arquivos estão na pasta, mais ao abrir o projeto ele não mostra nem form e nem unit, já apaguei a pasta do DEMO e baixei de novo e não adiantou....

 

image.png.e8b1d883fce19f845966a4a52aa18cab.png

Postado (editado)

Eu achei um erro no meu código

eu estava atribuindo:

DM.Boleto.Banco.LayoutVersaoArquivo := 810;

Antes de

DM.Boleto.Banco.TipoCobranca := cobBancoob;

Inverti a sequencia e parou de gerar o digito verificador

Adcionalmente fiz como vc sugeriu, 00000001 para o nosso numero

A impressão ficou OK

image.png.5210558f6c793e3704733a058e96ed96.png

Porem o banco está recusando a remessa:

image.png.e283f7922129a2a743f1ce2107f22fed.png

Eu não posso continuar dfazendo da forma anterior, usando 7 digitos e não preenchendo LayoutVersaoArquivo := 810 ?

Desta forma estava funcionando com o unit que vc havia me passado ontem....

 

 

Editado por cefantacini
Postado

Apenas complementando a mensagem anterior o problema da recusa se deu exatamente pelo numero 00000001, que provavelmente já foi utilizado, sendo assim:

Colocando o preenchimento do componente na sequencia abaixo:

DM.Boleto.Banco.TipoCobranca := cobBancoob;

DM.Boleto.Banco.LayoutVersaoArquivo := 810;

Gerei o boleto com 8 digitos, a impressão ficou OK, enviei para o banco, o banco aceitou, gerei uma segunda via do boleto no site do banco, a linha digitável ficou igual a linha digitável gerada pelo ACBr.

Vou fazer o pagamento do mesmo e verificar se o crédito entra na conta, tendo essa informação informo aqui.

Visitante
Este tópico está agora fechado para novas respostas
×
×
  • 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.