Olá pessoal!
Preciso de uma ajuda. Se alguem usa a função Boleto do ACBrMonitor,
Estou tentando implantar uso do Boleto no ACBrMonitor.
Estou com dificuldades para entender o processo.
Envio o comando para inclusão de um titulo da seguinte forma:
boleto.incluirTitulos("[TITULO1
NumeroDocumento=64035
NossoNumero=14/000119-8
Carteira=1234
ValorDocumento=120.000000
Sacado.NomeSacado=LAUDELINO SCARMAGNANI
Sacado.CNPJCPF=453618199-72
Sacado.Logradouro=R GETULIO VARGAS
Sacado.Numero=2536
Sacado.Bairro=CIDADE ALT
Sacado.Complemento=
Sacado.Cidade=MEDIANEIRA
Sacado.UF=PR
Sacado.CEP=85884000
Mensagem=APOS VENCIMENTO COBRAR MORA DIARIA DE R$2.00/APOS VENCIMENTO COBRAR MULTA DE 2,00%
Vencimento=14/03/2014
O ACBrMonitor me retorna:
OK:
Então, envio o comando de impressão:
Boleto.Imprimir
O ACBrMonitor me retorna:
ERRO: Lista de Boletos está vazia
O que está errado, ou faltando para que o boleto seja impresso?
Abraços.
Laudelino
ACBrMonitor - Boleto
Moderador: Moderadores
-
Laudelino Scarmagnani
- Usuário Nível 3

- Mensagens: 303
- Registrado em: 07 Fev 2007 10:54
- Toledo
- Administrador

- Mensagens: 3133
- Registrado em: 22 Jul 2003 18:39
- Localização: Araçatuba - SP
- Contato:
ACBrMonitor - Boleto
Laudelino, eu não uso o ACBrMonitor, mas de acordo com o manual o comando seria:
BOLETO.incluirTitulos("[TITULO1]
NumeroDocumento=64035
NossoNumero=14/000119-8
Carteira=1234
ValorDocumento=120.000000
Sacado.NomeSacado=LAUDELINO SCARMAGNANI
Sacado.CNPJCPF=453618199-72
Sacado.Logradouro=R GETULIO VARGAS
Sacado.Numero=2536
Sacado.Bairro=CIDADE ALT
Sacado.Complemento=
Sacado.Cidade=MEDIANEIRA
Sacado.UF=PR
Sacado.CEP=85884000
Mensagem=APOS VENCIMENTO COBRAR MORA DIARIA DE R$2.00/APOS VENCIMENTO COBRAR MULTA DE 2,00%
Vencimento=14/03/2014")
Abraços,
BOLETO.incluirTitulos("[TITULO1]
NumeroDocumento=64035
NossoNumero=14/000119-8
Carteira=1234
ValorDocumento=120.000000
Sacado.NomeSacado=LAUDELINO SCARMAGNANI
Sacado.CNPJCPF=453618199-72
Sacado.Logradouro=R GETULIO VARGAS
Sacado.Numero=2536
Sacado.Bairro=CIDADE ALT
Sacado.Complemento=
Sacado.Cidade=MEDIANEIRA
Sacado.UF=PR
Sacado.CEP=85884000
Mensagem=APOS VENCIMENTO COBRAR MORA DIARIA DE R$2.00/APOS VENCIMENTO COBRAR MULTA DE 2,00%
Vencimento=14/03/2014")
Abraços,
Toledo - Clipper On Line
toledo@pctoledo.com.br
Harbour 3.2/MiniGui/HwGui
Faça uma doação para o fórum, clique neste link: http://www.pctoledo.com.br/doacao
toledo@pctoledo.com.br
Harbour 3.2/MiniGui/HwGui
Faça uma doação para o fórum, clique neste link: http://www.pctoledo.com.br/doacao
-
Laudelino Scarmagnani
- Usuário Nível 3

- Mensagens: 303
- Registrado em: 07 Fev 2007 10:54
ACBrMonitor - Boleto
Ok, Toledo. Não havia me atentado a isso. Funcionou! Muito obrigado!
Abraços.
Laudelino
Abraços.
Laudelino
-
Laudelino Scarmagnani
- Usuário Nível 3

- Mensagens: 303
- Registrado em: 07 Fev 2007 10:54
ACBrMonitor - Boleto
Toledo,
desculpe, denovo.
Envio ao ACBrMonitor o comando
ValorDocumento=123,11
Porém, imprime 12,00
Se eu enviar
ValorDocumento=123.11
Não imprime o valor
No exemplo está
ValorDocumento=100,50
Nao consegui encontrar o problema.
desculpe, denovo.
Envio ao ACBrMonitor o comando
ValorDocumento=123,11
Porém, imprime 12,00
Se eu enviar
ValorDocumento=123.11
Não imprime o valor
No exemplo está
ValorDocumento=100,50
Nao consegui encontrar o problema.
-
GilmarDalantonia
- Usuário Nível 1

- Mensagens: 44
- Registrado em: 11 Dez 2014 16:42
- Localização: Adamantina/SP
ACBrMonitor - Boleto
Boa tarde... estou usando o acbrmonitorplus para gerar boletos, devo estar fazendo algo errado, pois na hr q gero a remessa, ele gera a quantidade de registros q tem no arquivo, mas os dados são só do primeiro registro... se alguém poder me ajudar, fico grato... meu fonte ta assim...
limpaLista()
ConfigurarDados()
If nErro=.f.; Sele 10; RstEnv(TlAnt1);Return 2; Endif
*-------------------------
IncluirTitulo()
If nErro=.f.; Sele 10; RstEnv(TlAnt1);Return 2; Endif
*-------------------------
ImprimirBoleto()
If nErro=.f.; Sele 10; RstEnv(TlAnt1);Return 2; Endif
*-------------------------
GerarRemessas()
If nErro=.f.; Sele 10; RstEnv(TlAnt1);Return 2; Endif
pessoal... ja resolvi, mas obrigado assim mesmo
limpaLista()
ConfigurarDados()
If nErro=.f.; Sele 10; RstEnv(TlAnt1);Return 2; Endif
*-------------------------
IncluirTitulo()
If nErro=.f.; Sele 10; RstEnv(TlAnt1);Return 2; Endif
*-------------------------
ImprimirBoleto()
If nErro=.f.; Sele 10; RstEnv(TlAnt1);Return 2; Endif
*-------------------------
GerarRemessas()
If nErro=.f.; Sele 10; RstEnv(TlAnt1);Return 2; Endif
pessoal... ja resolvi, mas obrigado assim mesmo
ACBrMonitor - Boleto
lAUDELINO veja se ajuda
[titulo1]
NumeroDocumento=00047901SC
NossoNumero=00000395
Carteira=101
ValorDocumento=290,00
Vencimento=03/03/2017
DataDocumento=03/03/2017
DataProcessamento=03/03/2017
DataAbatimento=
DataDesconto=
LocalPagamento=Pagavel em qualquer agencia bancaria ate o vencimento
EspecieDoc=DM
EspecieMod=R$
Sacado.NomeSacado=DNA
Sacado.Pessoa=1
Sacado.CNPJCPF=12345678901234
Sacado.Logradouro=AV 20 DE AGOSTO 2059
Sacado.Numero=02059
Sacado.Bairro=CENTRO
Sacado.Complemento=
Sacado.Cidade=CIDADE
Sacado.UF=GO
Sacado.CEP=77777.000
Sacado.Email=
Mensagem=Emissao em: 03/03/2017 REF 20/02/2017
PercentualMulta=2,00
ValorMoraJuros=0,39
Aceite=1
OcorrenciaOriginal=0
Parcela=01
TotalParcelas=01
SeuNumero=00000395
[titulo1]
NumeroDocumento=00047901SC
NossoNumero=00000395
Carteira=101
ValorDocumento=290,00
Vencimento=03/03/2017
DataDocumento=03/03/2017
DataProcessamento=03/03/2017
DataAbatimento=
DataDesconto=
LocalPagamento=Pagavel em qualquer agencia bancaria ate o vencimento
EspecieDoc=DM
EspecieMod=R$
Sacado.NomeSacado=DNA
Sacado.Pessoa=1
Sacado.CNPJCPF=12345678901234
Sacado.Logradouro=AV 20 DE AGOSTO 2059
Sacado.Numero=02059
Sacado.Bairro=CENTRO
Sacado.Complemento=
Sacado.Cidade=CIDADE
Sacado.UF=GO
Sacado.CEP=77777.000
Sacado.Email=
Mensagem=Emissao em: 03/03/2017 REF 20/02/2017
PercentualMulta=2,00
ValorMoraJuros=0,39
Aceite=1
OcorrenciaOriginal=0
Parcela=01
TotalParcelas=01
SeuNumero=00000395