Clipper On Line • Ver Tópico - ACBRBoleto com ACBRPLUS

ACBRBoleto com ACBRPLUS

Discussão sobre ferramentas de apoio à programação (Clipper/[x]Harbour)

Moderador: Moderadores

 

ACBRBoleto com ACBRPLUS

Mensagempor marcos.gurupi » 28 Fev 2016 14:30

Caros, alguem usa essa solução do acbr. Estou tentando implementar e gostaria de uma ajuda. Fiz o arquivo ENT.TXT para enviar ao monitor, o monitor le o arq e responde OK, mas nada acontece. Segue anexo o arquivo ENT.TXT

Marcos Roberto

BOLETO.IncluirTitulos("
[titulo01]
NumeroDocumento=001234.02.DUP
NossoNumero=3030
Carteira=CR
ValorDocumento=225
Vencimento=25/02/2016
ValorMoraJuroso=0,50
DataDocumento=28/02/2016
DataPDocumento=28/02/2016
DataMoraJuroso=25/02/2016 10:00:00:0
DataProtesto=25/02/2016
ValorMoraJuros=0,50
PercentualMulta=02,00
LocalPagamento=Pagável em qualquer agência até o vencimento
Especie=DM
EspecieMod=R$
Sacado.NomeSacado=BARBOSA E LOBO LTDA - ME
Sacado.CNPJCPF=09325120000133
Sacado.Pessoa=1
Sacado.Logradouro=09325120000133
Sacado.Numero=S/N
Sacado.Bairro=PQ RES. SOL NASCENTE
Sacado.Cidade=GURUPI
Sacado.UF=TO
Sacado.CEP=77425100
Instrucao1=Mensagem instrucao 1
Instrucao2=Mensagem instrucao 2
Aceite=1
Parcela=1
TotalParcela=1
SeuNumero=001234.02.DUP
TipoDiasProtesto=1
TipoImpressao=1)
,"P")
Anexos
Ent.txt
(825 Bytes) Baixado 263 vezes
Marcos Roberto
NetService Software
marcos.gurupi
Usuário Nível 4

Usuário Nível 4
 
Mensagens: 930
Data de registro: 06 Jul 2004 11:53
Cidade/Estado: Gurupi-TO
Curtiu: 0 vez
Mens.Curtidas: 6 vezes

ACBRBoleto com ACBRPLUS

Mensagempor fladimir » 29 Fev 2016 20:49

Vc precisa antes do comando de incluir titulos ver algumas questões:

Saber se o CEDENTE.INI esta configurado se não estiver configure
Depois vc tem q mandar 1 comando para configurar os dados conforme o cedente.ini

eu aqui faço o seguinte mando um comando:

Boleto.LimparLista


Depois carrego o INI

Boleto.ConfigurarDados, cConteudoINI //"D:\Projetos\ACBR_Boleto\cedente.ini"


Depois crio 1 arquivo do título mandando imprimir

Boleto.IncluirTitulos("D:\Projetos\ACBR_Boleto\boletosicredi.ini","I")  // observe o parametro I no final q joga pra impressora default.


[]´s
Sun Tzu há mais de três mil anos cita nas epígrafes de seu livro “A Arte da Guerra“:

“Concentre-se nos pontos fortes, reconheça as fraquezas, agarre as oportunidades e proteja-se contra as ameaças”.
“Se não é vantajoso, nunca envie suas tropas; se não lhe rende ganhos, nunca utilize seus homens; se não é uma situação perigosa, nunca lute uma batalha precipitada”
.


Até 2017    Desktop Console [ Legado ] Harbour | MinGW | DBF | CDX | FastReport | MySQL


Novos Projetos:

   Desktop Visual           Windev Desktop
   Celular Android/iOS   Windev Mobile
   WEB                            Windev Web


Sejamos gratos a Deus.
Avatar de usuário

fladimir
Colaborador

Colaborador
 
Mensagens: 2434
Data de registro: 15 Nov 2006 19:21
Curtiu: 28 vezes
Mens.Curtidas: 157 vezes

ACBRBoleto com ACBRPLUS

Mensagempor marcos.gurupi » 02 Mar 2016 18:51

Ok, seguindo os passos no final ele deve imprimir?
Marcos Roberto
NetService Software
marcos.gurupi
Usuário Nível 4

Usuário Nível 4
 
Mensagens: 930
Data de registro: 06 Jul 2004 11:53
Cidade/Estado: Gurupi-TO
Curtiu: 0 vez
Mens.Curtidas: 6 vezes

ACBRBoleto com ACBRPLUS

Mensagempor paiva_dbdc » 02 Mar 2016 21:03

sim.

vc tem opção de gerar o PDF e depois mandar ele abrir

ou já mandar imprimir e setar no acbrmonitor para ele imprimir em PDF

uso setar a impressão em PDF + fácil por usar em TS e o acbr pode ou NAO estar instalado no servidor.

uso o cobrebemx + muito complicado o suporte

o acbr boleto da de 10 em simplicidade de uso

PAiva
paiva_dbdc
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 342
Data de registro: 12 Nov 2012 08:58
Cidade/Estado: uberlandia mg
Curtiu: 0 vez
Mens.Curtidas: 6 vezes

ACBRBoleto com ACBRPLUS

Mensagempor GilmarDalantonia » 28 Jan 2017 13:16

Boa Tarde... estou com esse mesmo problema... fiz uma função de teste, antes de cria-la definitivamente no sistema, mas ocorre o mesmo problema... da Ok em tudo mas nao imprime e nem gera pdf, estou usando clipper 5.3

vou enviar o conteudo da função... se alguem poder ajudar eu agradeço

BOLETO.ConfigurarDados("[Cedente]
Nome=S?o Jo?o LTDA.
CNPJCPF= 08.066.416/0001-14
Logradouro=Rua Evaristo Mendes
Numero=200
Bairro=Centro
Cidade=Tatui
CEP=18.270-000
Complemento=Sala 10
UF=SP
RespEmis=0
TipoPessoa=1
CodigoCedente=123456
LayoutBol=3
CaracTitulo=0
[Conta]
Conta=99999
DigitoConta=9
Agencia=9999
DigitoAgencia=9
[Banco]
Numero=237
CNAB=1
IndiceACBr=5
")
OK:
BOLETO.IncluirTitulos("[Titulo1]
NumeroDocumento=000010
NossoNumero=0000001
Carteira=20
ValorDocumento=100,50
Vencimento=10/09/2010
ValorMoraJuros=0,50
DataDocumento=10/08/2010
DataProcessamento=10/08/2010
DataAbatimento=05/09/2010
DataDesconto=07/09/2010
DataMoraJuros=12/09/2010
DataProtesto=10/10/2010
ValorAbatimento=5,00
ValorDesconto=0,50
ValorMoraJuros=0,55
ValorIOF=3,50
ValorOutrasDespesas=2,50
PercentualMulta=05,00
LocalPagamento=Pag?vel em qualquer ag?ncia banc?ria mesmo ap?s o vencimento
Especie=DM
EspecieMod=R$
Sacado.NomeSacado=Sacado Teste
Sacado.CNPJCPF=999.999.999.99
Sacado.Pessoa=0
Sacado.Logradouro=Rua Jose Rodrigues
Sacado.Numero=100
Sacado.Bairro=Jardim Moderno
Sacado.Complemento=Casa
Sacado.Cidade=Tatui
Sacado.UF=SP
Sacado.CEP=18277.500
Sacado.Email=teste@email.com
Mensagem=teste1|teste2
Instrucao1=10
Instrucao2=11
Aceite=1
OcorrenciaOriginal=0
Parcela=1
TotalParcelas=1
SeuNumero=000020
TipoDiasProtesto=1
TipoImpressao=1
","P")
OK:
BOLETO.Imprimir
OK:
GilmarDalantonia
Usuário Nível 1

Usuário Nível 1
 
Mensagens: 44
Data de registro: 11 Dez 2014 15:42
Cidade/Estado: Adamantina/SP
Curtiu: 2 vezes
Mens.Curtidas: 0 vez

ACBRBoleto com ACBRPLUS

Mensagempor janio » 29 Jan 2017 15:46

Tenho usado, e tem funcionado, a seguinte sequencia de comandos:

BOLETO.LimparLista
BOLETO.IncluirTitulos("[Titulo1]'...
BOLETO.GerarPDF

Daí ele cria um pdf (boleto.pdf) na pasta do plus com os boletos incluídos

Jânio

BOLETO.LimparLista
OK:
BOLETO.IncluirTitulos("[Titulo1]
NumeroDocumento=68-01
NossoNumero=5                   
Carteira=1
ValorDocumento=53,44
Sacado.NomeSacado=ROSELENE DA SILVA PEREIRA SOUSA
Sacado.CNPJCPF=851.142.353-20
Sacado.Logradouro=RUA 13 DE MAIO
Sacado.Numero=141
Sacado.Bairro=CENTRO
Sacado.Complemento=
Sacado.Cidade=UBAJARA
Sacado.UF=CE
Sacado.CEP=62350000
Mensagem=CONSIDERAR QUITADO SO APOS COMPENSACAO DO(S) CHEQU E PELO BANCO SACADO. COBRA MULTA DE 2% E PROTESTAR NO 2O. DIA UTIL
ValorMoraJuros=0,05
Vencimento=25/04/2017
")
OK:
BOLETO.GerarPDF
OK:
fui...
e-mail:janioaguiar@yahoo.com.br
msn: janio_aguiar@hotmail.com
xHarbour1.2.1/Harbour3.2 + wvg + hwgui + Mediator + MySql
Avatar de usuário

janio
Colaborador

Colaborador
 
Mensagens: 1835
Data de registro: 06 Jul 2004 07:43
Cidade/Estado: UBAJARA - CE
Curtiu: 8 vezes
Mens.Curtidas: 68 vezes

ACBRBoleto com ACBRPLUS

Mensagempor dbdc5554 » 29 Jan 2017 18:32

eu uso assim

x_comando_1 = 'BOLETO.LimparLista'
x_comando_2 = 'BOLETO.ConfigurarDados("'+temai_29+':\acbrNfemonitor\cedente.ini")'
x_comando_3 = 'BOLETO.IncluirTitulos( "'+temai_29+':\acbrNfemonitor\titulos.ini")'
x_comando_4 = 'BOLETO.Imprimir'
x_comando_5 = 'BOLETO.GerarPDF'

acbr_comandar_nfe(x_comando_1)
acbr_comandar_nfe(x_comando_2)
acbr_comandar_nfe(x_comando_3)

acbr_comandar_nfe(x_comando_5)

acbr_comandar_nfe(x_comando_4)
dbdc5554
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 149
Data de registro: 03 Dez 2012 07:49
Cidade/Estado: uberlandia-MG
Curtiu: 0 vez
Mens.Curtidas: 1 vez

ACBRBoleto com ACBRPLUS

Mensagempor GilmarDalantonia » 30 Jan 2017 08:28

Bom dia amigos... obrigado pela ajuda... corrigi conforme o exemplo de vcs e deu certo... obrigado mesmo
GilmarDalantonia
Usuário Nível 1

Usuário Nível 1
 
Mensagens: 44
Data de registro: 11 Dez 2014 15:42
Cidade/Estado: Adamantina/SP
Curtiu: 2 vezes
Mens.Curtidas: 0 vez

ACBRBoleto com ACBRPLUS

Mensagempor dbdc5554 » 05 Fev 2017 16:31

como ficou o esquema de cobrança registrada ?

os boletos NÃO registrados vão ser recebidos em OUTROS bancos ate quando e ate que valor ?

parece que tem uma tabela de faixas de valores

auguem tem a tabela ?

obrigado

paiva
dbdc5554
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 149
Data de registro: 03 Dez 2012 07:49
Cidade/Estado: uberlandia-MG
Curtiu: 0 vez
Mens.Curtidas: 1 vez

ACBRBoleto com ACBRPLUS

Mensagempor rubens » 05 Fev 2017 17:27

Paiva conforme a Febraban
https://portal.febraban.org.br/pagina/3150/1094/pt-br/servicos-novo-plataforma-boletos

Todos os boletos com valor:
Data de início de validação
Igual ou acima de R$ 50.000,00 - 10.07.2017
Igual ou acima de R$ 2.000,00 - 11.09.2017
Igual ou acima de R$ 500,00 - 09.10.2017
Igual ou acima de R$ 200,00 - 13.11.2017
Boletos de todos os valores - 11.12.2017


Rubens
"Eu e minha casa servimos ao Senhor e você ???"
Avatar de usuário

rubens
Colaborador

Colaborador
 
Mensagens: 1518
Data de registro: 16 Ago 2003 09:05
Cidade/Estado: Nova Xavantina - MT
Curtiu: 77 vezes
Mens.Curtidas: 104 vezes

ACBRBoleto com ACBRPLUS

Mensagempor jelias » 13 Fev 2018 19:52

Olá amigos,

Estou implantando o ACBrBoleto em meu sistema e estou com uma dúvida.

Devo montar um ENT.TXT para cada comando para o ACBR ou posso montar um único arquivo com vários comandos, exemplo:

ENT.TXT
BOLETO.LimparLista
BOLETO.ConfigurarDados("c:\cedente.ini" )
BOLETO.IncluirTitulos("c:\titulos.ini","P")

Irei imprimir os boletos no mesmo instante da emissão da NF-e.

Outro exemplo, será gerar o arquivo de remessas no final do dia.

ENT.TXT
BOLETO.LimparLista
BOLETO.ConfigurarDados("c:\cedente.ini" )
BOLETO.IncluirTitulos("c:\titulos.ini")
BOLETO.GerarRemessa("c:\remessa\",1,000001.rem )


Saudações,

Júlio.
xHarbour 1.2.1 (simplex) + BCC 5.8.2 + Hwgui + SQLRDD
Clipper 5.2e / Blinker 7
Júlio Cézar Elias
e-mail: jelias@tpnet.psi.br
jelias
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 249
Data de registro: 27 Ago 2008 11:32
Cidade/Estado: Minas Gerais
Curtiu: 0 vez
Mens.Curtidas: 16 vezes

ACBRBoleto com ACBRPLUS

Mensagempor rubens » 22 Dez 2019 18:42

Olá..

Alguem sabe dizer se para gerar vários titulos eu tenho que gerar um arquivo .ini com todos os títulos ou se tenho que usar o comando BOLETO.IncluirTitulos para cada titulo?

Aqui estou tentando usar o comando para cada titulo... Já tentei enviar tudo em comando só também... mas tb não gera..
22/12/2019 18:39:40 - BOLETO.LimparLista()
22/12/2019 18:39:40 - OK:
22/12/2019 18:39:40 - BOLETO.SetDiretorioArquivo("C:\DataNovo\Boleto\PDF\","0000128397.pdf")
22/12/2019 18:39:40 - ATENÇÃO: Chave RSA Privada NÃO pode ser lida no arquivo "swh.ini".

22/12/2019 18:39:40 - OK: C:\DataNovo\Boleto\PDF\0000128397.pdf
22/12/2019 18:39:40 - BOLETO.IncluirTitulos("[Titulo1]
NumeroDocumento=128397-1 
NossoNumero=23571
Carteira=9
ValorDocumento=174,34
Vencimento=06/11/2017
DataDocumento=07/10/2017
DataProcessamento=07/10/2017
EspecieDoc=DM
EspecieMod=R$
Sacado.NomeSacado=KAMILA G DE SOUZA                       
Sacado.CNPJCPF=   .   .   - 
Sacado.Logradouro=CDL                                               
Sacado.Numero=002 
Sacado.Bairro=UNIAO               
Sacado.Cidade=NOVA XAVANTINA     
Sacado.UF=MT
Sacado.CEP=78.690-000
Sacado.Email=                                                 
Mensagem=                                             
PercentualMulta=2,00
CodigodeMora=1
DataMoraJuros=07/11/2017
ValorMoraJuros=0,93
Aceite=1
Parcela=1
TotalParcelas=1"
)
22/12/2019 18:39:40 - ATENÇÃO: Chave RSA Privada NÃO pode ser lida no arquivo "swh.ini".

22/12/2019 18:39:40 - OK:
22/12/2019 18:39:40 - BOLETO.IncluirTitulos("[Titulo2]
NumeroDocumento=2128397-1 
NossoNumero=23571
Carteira=9
ValorDocumento=174,34
Vencimento=06/11/2017
DataDocumento=07/10/2017
DataProcessamento=07/10/2017
EspecieDoc=DM
EspecieMod=R$
Sacado.NomeSacado=KAMILA G DE SOUZA                       
Sacado.CNPJCPF=   .   .   - 
Sacado.Logradouro=CDL                                               
Sacado.Numero=002 
Sacado.Bairro=UNIAO               
Sacado.Cidade=NOVA XAVANTINA     
Sacado.UF=MT
Sacado.CEP=78.690-000
Sacado.Email=                                                 
Mensagem=                                             
PercentualMulta=2,00
CodigodeMora=1
DataMoraJuros=07/11/2017
ValorMoraJuros=0,93
Aceite=1
Parcela=1
TotalParcelas=1"
)
22/12/2019 18:39:40 - ERRO: Erro ao ler arquivo de entrada ou parametro incorreto.
22/12/2019 18:39:40 - BOLETO.GerarPDF()
22/12/2019 18:39:40 - OK:
22/12/2019 18:39:40 - BOLETO.GerarRemessa("C:\DataNovo\Boleto\Remessa\")
22/12/2019 18:39:40 - OK:


Obrigado
"Eu e minha casa servimos ao Senhor e você ???"
Avatar de usuário

rubens
Colaborador

Colaborador
 
Mensagens: 1518
Data de registro: 16 Ago 2003 09:05
Cidade/Estado: Nova Xavantina - MT
Curtiu: 77 vezes
Mens.Curtidas: 104 vezes

ACBRBoleto com ACBRPLUS

Mensagempor rubens » 26 Dez 2019 09:23

Bom dia...

Resolvido..
é só gerar numeração sequencial dentro do mesmo comando incluirtitulos...

Rubens
"Eu e minha casa servimos ao Senhor e você ???"
Avatar de usuário

rubens
Colaborador

Colaborador
 
Mensagens: 1518
Data de registro: 16 Ago 2003 09:05
Cidade/Estado: Nova Xavantina - MT
Curtiu: 77 vezes
Mens.Curtidas: 104 vezes

ACBRBoleto com ACBRPLUS

Mensagempor Linguagemclipper » 03 Set 2020 12:00

Alguém poderia anexar um PDF mostrando como fica esse boleto em PDF?
Eu tenho uma função que escreví no xHarbour que gera boletos também, mas ele não desenha o boleto, coloca a imagem de um boleto em branco e escreve por cima nos campos como se estivesse preenchendo um formulário e por fim imprime o código de barras no padrão Febraban. É o SIBRA.
Fiquei curioso como funciona isso aí.
Usando xHarbour v1.2.3 Rev. 10264 + BCC 5.8, Elchs' LetoDBf, DBFCDX e SIBRA para imprimir relatórios.
Avatar de usuário

Linguagemclipper
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 214
Data de registro: 16 Abr 2016 17:33
Cidade/Estado: Maceió/AL
Curtiu: 38 vezes
Mens.Curtidas: 12 vezes




Retornar para Ferramentas de Apoio

Quem está online

Usuários vendo este fórum: Nenhum usuário registrado online e 0 visitantes


Ola Amigo, espero que meu site e forum tem lhe beneficiado, com exemplos e dicas de programacao.
Entao divulgue o link da Doacao abaixo para seus amigos e redes sociais ou faça uma doacao para o site forum...
MUITO OBRIGADO PELA SUA DOACAO!
Faça uma doação para o forum
cron
v
Olá visitante, seja bem-vindo ao Fórum Clipper On Line!
Efetue o seu login ou faça o seu Registro