Arquivo de Remessa com 444 posições.

[FabioTellini]

Boa tarde.
Alguns clientes estão tendo a necessidade de enviar a chave da nfe no arquivo de remessa para o banco.

Banco ONIX
http://onixcredit.com.br/tutoriais/TUTORIAL_PARA_IMPORTACAO_CNAB_ONIX.pdf

Banco SOFISA
https://tdn.totvs.com/pages/releaseview.action?pageId=505758869

No caso do banco ONIX, eles usam o padrão do banco Bradesco CNAB400 adicionando 44 posições que será usado para envio da chave da NFe, criando um "CNAB444".

Fiz pequenas alterações:

* No arquivo ACBrBoleto.pas adicionei o tipo c444 (TACBrLayoutRemessa = (c400, c240, c444)) e adicionei a propriedade ChaveNFE na classe TACBrTitulo.

* No arquivo ACBrBancoBradesco.pas, rotina GerarRegistroTransacao400 adicionei a validação do layout (if LayoutRemessa = c444 then wLinha := wLinha + Copy(ChaveNFe,1,44)) para adicionar a chave da nfe no arquivo.

Segue arquivos para análise.

ACBrBoleto.pas ACBrBancoBradesco.pas

[BigWings]

O Bradesco vai aceitar o arquivo com 444 posições?

[FabioTellini]

Para o banco Bradesco uso LayoutRemessa = c400, dessa forma o arquivo só vai ter 400 posições.

[FabioTellini]

Estou pensando em um possível problema nessa alteração.

Vou fazer um novo teste e escrevo aqui.

[José M. S. Junior]

Bom dia, se possível anexe a documentação atualizada do Bradesco que prevê esse layout.

[PbNew_Sistemas]

tb estou precisando disso.

na verdade esse arquivo não vai diretamente para o banco. existe uma Asset por trás. que recebe esse cnab444 processa no sistema deles e reenvia para o banco o cnab400.

essas Asset assumem a cobrança, fazem desconto de título, etc. 

essa prática tem sido cada vez mais usada pelas empresas. e esse Layout 444 esta sendo utilizado como um padrão de todas as Assets.

Editado 3 Fevereiro, 2021 por prevedello_sistemas

[FabioTellini]

Bom dia.

Fiz mais um ajuste no arquivo ACBrBoleto.pas, nos meus testes a chave da NFe foi adicionada no arquivo.

Na minha aplicação eu configuro o componente da seguinte forma:

- ACBrBoleto.LayoutRemessa      := c444;

- Titulo.ChaveNFe := '35000000000000000001111111111111';

Segue arquivo com alterações.ACBrBoleto.pas

[BigWings]

Acho que nesse caso está havendo um desvio de finalidade.

O componente tem que se basear nos manuais dos bancos para os quais o arquivo é gerado e não em intermediários.

Sem documentação clara fica difícil de manter.

Quem precisa gerar o arquivo para a financeira pode abrir o TXT da remessa e acrescentar a chave.

[Juliomar Marchetti]

Ou se não quer também ocorrer problemas faz um class helpers do delphi e usa a unit onde estiver usando o ACBrBoleto

afim de evitar que fique com componente sem atualizações.