Usando Access

Gerar Arquivo Remessa do Banco Itaú

Nota importante: para ter acesso aos vídeos e arquivos exemplos deste site, adquira um dos planos apresentados abaixo. Você pode comprar em até 5x no Cartão de Crédito, através do Paypal. 

Veja como comprar e saiba mais sobre o material oferecido,  clicando aqui.

A partir de janeiro de 2017 será decretado o fim do boleto sem registro.  A Febraban (Federação Brasileira dos Bancos), através do Projeto Nova Plataforma de Cobrança, vem realizando mudanças importantes nas modalidades de boleto bancário. A proposta é trazer mais segurança e reduzir os prejuízos gerados pelas fraudes de boleto.

Custo(maior) - Na modalidade sem registro, há apenas o custo da liquidação, ou seja, a empresa paga ao banco uma taxa quando o boleto é pago. Se o boleto não é pago, não existe cobrança de taxa. Na modalidade com registro, porém, o banco pode cobrar, dependendo da negociação, diversas taxas, como de emissão, liquidação, permanência e protesto.  Assim, o custo deve subir de forma considerável, pelo menos em um primeiro momento.  Para os e-commerces, pode ser algo desastroso, principalmente para os pequenos, que não têm tanta margem para negociar com os bancos.  Imagina emitir boletos e pagar pela emissão de vendas que nem sequer foram concretizadas ainda.  Além de ter que contar com a desistência da compra que beira em torno de 50% (cinqüenta por cento).

Burocracia - Outro ponto é que, na modalidade de boleto com registro, é necessário que o banco receba este registro - ou seja, deverá ser enviado um arquivo de remessa. Este arquivo contém as informações dos boletos gerados. Outro ponto é que, para gerar os boletos com registro, torna-se obrigatório inserir o CNPJ ou o CPF. Mesmo quem já usa um sistema de gestão, que automatiza o do processo, vai precisar de um destes dados.

Segurança - Sem dúvida, na modalidade com registro, um dos ganhos será a segurança. Bancos, empresas e consumidores finais já sofreram com fraudes e isso não é nada agradável. Uma das razões para o fim do boleto sem registro são as fraudes. Como na modalidade com registro, tanto o emissor quanto o pagador têm de ser identificados, as chances de o consumidor cair em um golpe diminuem.

Montando o arquivo remessa de acordo com as regras do banco - O layout e o conteúdo do arquivo de remessa seguem a uma padronização que se encontra detalhada no manual CNAB400-ITAU.  O arquivo remessa é um txt que engloba informações do boleto, do pagador e do beneficiário.  O exemplo que ofereço segue o layout mínimo, contendo três linhas, que são:

Linha Header
Linha Detalhe
Linha Trailer

Todas as linhas devem possuir 400 posições.  As posições não preenchidas devem ser completadas com espaços em branco ou zeros, dependendo do tipo de informação.  Para completar as posições com espaços, utilizamos a função Space().  Por exemplo: - seguindo as especificações do manual, o campo nome do pagador tem que ter 30 caracteres.  Vamos supor que no campo nome do pagador seja preenchido AVELINO SAMPAIO.  Este nome possui um comprimento de 15 caracteres tendo então, pela regra a ser seguida, que completar os 15 caracteres restantes com espaços em branco.

AVELINO SAMPAIO & Space(30 - Len(AVELINO SAMPAIO))

A função Len() conta a quantidade de caracteres da string. Temos como resultado a linha abaixo.  Os asteriscos (*) estão representando os espaços em branco para você poder visualizar o comprimento do campo.

AVELINO*SAMPAIO***************

Certamente há nomes que ultrapassam os 30 caracteres, neste caso, incluiremos a função Left(), limitando assim, nos 30 caracteres. 

Left(me!pagador,30) 'limita o campo em até 30 caracteres

O nome é geralmente cadastrado em caixa baixa. Para passar o nome para caixa ALTA, usamos a função Format().  Exemplo:

Format("Avelino Sampaio",">") :::> AVELINO SAMPAIO

Vamos supor agora que o próximo campo da seqüência seja o CPF do pagador.  Nas especificações do manual, a posição deve possuir 14 algarismos, pois deve comportar tanto o CPF quanto o CNPJ, dependendo se é pessoa física ou jurídica.  Como exemplo vamos considerar o CPF 855.899.166-49 que possui 11 algarismos, devemos completar com mais três zeros a esquerda para atingir o comprimento obrigatório de 14 algarismos.  A sua montagem final deve ter o seguinte formato:  00085589916649

Se você armazenar o CPF no campo da tabela com os pontos(.) e traço(-), deverá extraí-los com a função Replace().

strCPF = "855.899.166-49"
strCPF = replace(strCPF,".","") :::> 855899166-49 'tira os pontos
strCPF = replace(strCPF,"-","") :::> 85589916649 'tira o traço

Ou podemos aninhar a função Replace() desta forma:

strCPF = Replace(Replace(strCPF,".",""),"-","") :::> 85589916649

Para acrescentarmos zeros a esquerda, utilizamos a função String().  Exemplo:

String(14 - Len(strCpf),"0") & strCpf 'temos como resultado 00085589916649

A seqüência final deste exemplo, fica com o aspecto apresentado abaixo. É bom lembrar que os asteriscos (*) estão representando os espaços em branco.

AVELINO*SAMPAIO***************00085589916649

O manual recomenda tirar os acentos. Você pode usar a função strConv() para retirar os acentos.

strConv("Luís Gonçalves Cândido", 2, 1049) :::> luis goncalves candido

Agora, analise o código exemplo, que monta a seqüência com o nome do pagador e o seu respectivo CPF e gera o arquivo txt.

Faça o login aqui para ter acesso ao código.

Bem, espero que com as informações aqui apresentadas, você possa acompanhar o código original, oferecido no aplicativo exemplo abaixo.

Analisando a montagem do arquivo de remessa

Para verificar se as informações estão nas posições certas, elaborei um relatório para você analisar, enquanto você estiver testando e adaptando o seu projeto.  Abra o formulário frmBoleto e clique no botão Analisar Linhas Remessa.

Observe no relatório abaixo que os espaços em branco necessários estão representados pelos asteriscos (*). 

Nomenclaturas - O número "9" representa o campo numérico e a letra "x" o campo string.  O valor entre parênteses é o comprimento do campo.  Exemplo:

x(15) - Uma string com 15 caracteres de comprimento.

9(4) - Um número com 4 algarismos de comprimento.

Observe no relatório o campo Nome Da Empresa x(30).  Faça a contagem dos caracteres, incluindo os asteriscos (*) e confirme se tem os 30 caracteres obrigatórios.

Vamos supor que o campo Código do Banco 9(3) esteja com seguinte resultado:

*341 

O Asterisco significa que existe um espaço aonde não poderia ter, uma vez que o campo é numérico e deve possuir apenas 3 algarismos de comprimento.  Isso significa que algum campo anterior está acima do comprimento permitido, empurrando o espaço para o campo seguinte e assim alterando toda a estrutura. 

Abrindo e verificando o arquivo txt.

Ao analisar o arquivo txt, atente para o final das linhas e verifique o seu perfeito alinhamento que indica quando todas as linhas estão com as 400 posições.

Gerando o arquivo remessa no aplicativo exemplo

Ao rodar o aplicativo será exibida a tela abaixo, mostrando o formulário Controle de Aluguéis:

Com o mouse, selecione o senhorio > selecione o inquilino > Dê dois cliques do mouse sobre a linha (veja a seta), abra o boleto já criado ou clique no botão "Gerar novo boleto" para o inquilino selecionado.

O formulário de preenchimento de boleto será exibido, conforme imagem abaixo:

Após o preenchimento do formulário, clique no botão "Analisar Linhas Remessa".  Depois da análise do relatório e tudo estando OK, clique no botão "Gerar  Remessa", assim o arquivo será salvo na pasta remessas. 

Para testar o arquivo remessa no site do Itaú siga os seguintes passos:

- Abra o site Itaú e entre na sua conta

- No Menu, clique em Cobrança

- Na seção "transferência de arquivo" clique em Remessa.  Será aberto um formulário

- Clique no botão "Escolher Ficheiro".  Vá até a pasta Remessas do seu aplicativo Access e selecione a remessa que deseja subir.

- No campo produto selecione "cobrança-400"

- Na opção ambiente selecione TESTE.

- clique no botão confirmar

Download

Para entrar no modo estrutura, mantenha pressionada a tecla SHIFT na inicialização.

Para visualizar o Painel de Controle, utilize a tecla F11.

BoletoItauRemessa.zip

Sucesso!

Os dez artigos mais visitados

MontaRibbons v.7.0 - Assistente completo para criar ribbons no Access

Vídeo - Controle personalizado de Acesso de Usuários

Vídeo - Aprenda sobre filtragens

Vídeo - Segurança máxima, usando o OPEN

Uma ajuda para quem está começando um negócio ou um projeto

Integrando o Access com Servidor MySQL - Introdução

Desabilitando a faixa(ribbon) superior do Access

Vídeo - Programação de relatórios - Parte 1

Como carregar o seu menu sem que ele vá para lista de suplementos

Adquira o kit UsandoAccess e aprenda em alta velocidade

| Home | Vídeos | Tutoriais | Dicas | Ribbons | Suporte | Downloads | Contato | Artigo |