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.

The popup will be closed in 10 segundos...
The popup will be closed in 10 segundos...