Impressão De Boleto Sem Vencimento E Valor

[Veltman]

Boa tarde!

 

Consigo gerar um boleto sem vencimento e sem valor?

 

Informações:

Preciso gerar boletos como se fosse aqueles boletos pré-impressos, onde o vendedor vai estar com eles em mãos e vai preencher na hora, quem é o sacado, vencimento e valor.

Atualmente ao gerar o boleto sem vencimento, na linha digitável está aparecendo um valor negativo e no vencimento 30/12/1899

 

Não encontrei propriedade que pudesse desabilitar estas opções.

 

Em anexo estou enviando modelo do boleto que saiu impresso.

 

Att.

Veltman

 

 

[Juliana Tamizou]

Bom dia.

 

Atualmente o ACBrBoleto não tem suporte a esse tipo de boleto.

Seria algo como as faturas e cartão de crédito?

 

Att.

[lbvaleriano]

Tenho essa mesma necessidade.

 

No meu caso o objetivo são boletos para doações expontâneas. Vou fazer as alterações, testar e posto aqui, tudo bem?

 

Abraços

[Juliana Tamizou]

Bom dia.

 

Iremos aguardar, qualquer dúvida pode perguntar pelo fórum tb.

 

 

Att.

[lbvaleriano]

Boa tarde,

 

As alterações que fiz foram nos arquivos ACBrBoleto.pas, ACBrBoletoFCQuickFr.pas e ACBrCaixaEconomicaSICOB.pas.

 

ACBrBoleto.pas;

- inclui o atributo fTipoVencimento (1=normal, 2=a vista e 3=na apresentação) na classe TACBrTitulo

- inclui a propriedade TipoVencimento para tratar o atributo fTipoVencimento

- Alterei o construtor da classe TACBrTitulo para iniciar o atributo fTipoVencimento com 1 (normal)

 

ACBrBoletoFCQuickFr.pas:

 

- Antes da impressão do detalhe inclui um case para tratar o tipo de vencimento (1=imprime o vencimento normal, 2=imprime "A VISTA" ou 3=imprime "NA APRESENTAÇÃO)

- Alterei a string de formatação de ValorDocumento para '###,###,##0.00;-###,###,##0.00; '

 

ACBrCaixaEconomicaSICOB.pas:

- Inclui a variável local aVencimentoStr na função GerarRegistroTransacao240

- Inclui um case para tratar esse variável conforme o manual do SICOB do banco (data de vencimento para normal, '11111111' para a vista e '99999999' para na apresentação)

- Alterei a linha de geração do registro do arquivo de remessa para usar a variável a aVencimentoStr

 

Essas foram as alterações que fiz e ainda estou testando, está imprimindo normalmente, mas quero fazer um pagamento de um boleto para ter certeza. Como alterei classes e métodos, não anexei os arquivos ainda, mas se você quiser para ir dando uma olhada Juliana, posso anexar sem problemas.

 

Fiz as alterações apenas para a Caixa, mas futuramente devo fazer para o Bradesco também.

 

Att.

[Juliana Tamizou]

Bom dia.

 

Oque seria o vencimento AVista?

 

Att.

[lbvaleriano]

Bem, conceitualmente, segundo esse link http://books.google.com.br/books?id=n31u4GIIMQIC&pg=PA214&lpg=PA214&dq=vencimento+a+vista+na+apresentação&source=bl&ots=8Ag7qH65VJ&sig=6UElIVpVCQQCplhzknW5YcHk6ak&hl=pt-BR&sa=X&ei=c8CDUfqQKoPM9ATOpYDIAw&ved=0CDMQ6AEwAQ#v=onepage&q=vencimento%20a%20vista%20na%20apresentação&f=false

 

Vencimento "A Vista" e "Na Apresentação" são sinônimos. Entretanto, todos os bancos que já trabalhei (Bradesco, CEF, BB e Santander) utilizam strings diferentes na geração do arquivo de remessa, como visto acima no caso da CEF.

 

Mantive essa lógica na implementação porque vai que um dia o banco decide fazer uso disso.

 

Att.

[lbvaleriano]

Boa tarde, 

 

Informo que a FEBRABAN não vai mais permitir a emissão de boletos sem vencimento e sem valor conforme eu venho utilizando. Foi por esse motivo que não enviei as alterações que havia feito nos arquivos. 

 

Maiores informações nesse link: http://www.febraban.org.br/Acervo1.asp?id_texto=1993&id_pagina=82&palavra=boleto

 

Att.

[antdroid]

Alguém já  emite boleto pré-impresso eles são aceitos até hoje , só que são impresso no banco. Alguma Dica?

[antdroid]

Encontrei uma solução espero que ajude quem precisar

Coloquei a data de vencimento como 00/00/0000 e ocultei os campos de vencimento e valor do Fast Report do Boleto.

Segue a função para converter um string em data, espero que ajude.

 

Vencimento        := AnyStringToDate('YYYY-MM-DD', '0000-00-00');

function TFrmBoletoPreImpressoLista.AnyStringToDate(fmt, dt: String): TDateTime;
var
  fs : TFormatSettings;
begin
     fs := TFormatSettings.Create;
  fs.ShortDateFormat := fmt;

  result := StrToDateDef(dt, 0, fs);
end;

Fica a dica

 

[ajdlima]

Em 13/09/2017 at 12:14, antdroid disse:

Encontrei uma solução espero que ajude quem precisar

Coloquei a data de vencimento como 00/00/0000 e ocultei os campos de vencimento e valor do Fast Report do Boleto.

Segue a função para converter um string em data, espero que ajude.

 

Vencimento        := AnyStringToDate('YYYY-MM-DD', '0000-00-00');

function TFrmBoletoPreImpressoLista.AnyStringToDate(fmt, dt: String): TDateTime;
var
  fs : TFormatSettings;
begin
     fs := TFormatSettings.Create;
  fs.ShortDateFormat := fmt;

  result := StrToDateDef(dt, 0, fs);
end;

Fica a dica

 

oi amigo me chama no whats preciso de ajuda 65-999316060