Jump to content

Promoção de Natal SAC Mensal

Contrate e ganhe 1 Kit agenda + Caneta
Saiba mais

LANÇAMENTO
Curso Completo - Dominando o ACBrMonitor

Conheça o Curso

Balança SM100 performance surpreendente

Tecnologia Japonesa   Teclado e Visor resistentes a água
Consumo inteligente de etiquetas   Baixo custo de manutenção
Comunicação Ethernet e WIFI independentes

Saiba mais

Impressora de Etiquetas ELGIN - L42 PRO

Protocolos PPLA, PPLB, ZPL, EPL (automático)
Porta USB padrão Opcionais: Ethernet, Serial, Paralela
Sensor de Etiquetas Móvel Garantia de 18 meses

Saiba mais

Devanir Frasao

Erro ao gerar PDF

Recommended Posts

Olá boa tarde!

Estou com problemas ao gerar um PDF, ao tentar executar a rotina abaixo, simplesmente aparece que o VB6 parou de responder, no Exe acontece a mesma coisa, travando o sistema.

Estou usando da seguinte forma.

                     bufferLen = 256
                     buffer = String$(bufferLen, " ")
                     
                     retorno = SAT_GerarPDFExtratoVenda("C:\ACBR_SAT\Vendas\201905\21\AD41190582373077000171599000043240004616856902.xml", "C:\ACBR_SAT\PDF\teste.pdf", buffer, bufferLen)
                     CheckResult retorno
                     
                     SetResposta buffer, bufferLen

 

 

Share this post


Link to post
Share on other sites

Poderia postar o log da lib para analisarmos ?

Acabei de testar com o demo em VB6 e não tive erro algum.


Consultor SAC ACBr Rafael Dias
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Desenvolvedor ACBrLib.

 

Share this post


Link to post
Share on other sites

Você esta usando a ultima versão do svn ou a ultima versão disponível para download ?


Consultor SAC ACBr Rafael Dias
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Desenvolvedor ACBrLib.

 

Share this post


Link to post
Share on other sites
1 hora atrás, Rafael Dias disse:

Você esta usando a ultima versão do svn ou a ultima versão disponível para download ?

Qual seria a última versão ? e como verifico a versão que estou utilizando ?

Share this post


Link to post
Share on other sites

O que eu quis saber é se você baixou na sessão downloads ou se você compilou a mesma visto que esta usando a dll diretamente em vez de usar a classe de alto nível.

Por favor teste com esta nova versão que enviei agora.
2019.5.22.1

  • Like 1

Consultor SAC ACBr Rafael Dias
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Desenvolvedor ACBrLib.

 

Share this post


Link to post
Share on other sites
19 horas atrás, Rafael Dias disse:

O que eu quis saber é se você baixou na sessão downloads ou se você compilou a mesma visto que esta usando a dll diretamente em vez de usar a classe de alto nível.

Por favor teste com esta nova versão que enviei agora.
2019.5.22.1

Continuo com o mesmo problema.

Enviei o anexo do log e do erro.

E abaixo esta o codigo de programação que estou utilizando, onde sera que estou errando ?

                      bufferLen = 256
                      buffer = String$(bufferLen, " ")
                      
                      retorno = SAT_ConsultarSAT(buffer, bufferLen)
                      'CheckResult ret
           
                      SetResposta buffer, bufferLen
                      
                      retornoString = GetToken(RTBRESPOSTAS.Text, 2, "|")
                      
                      
                      If retornoString <> "08000" Then
                         MsgBox RTBRESPOSTAS.Text
                         Exit Function
                      End If
        
                     bufferLen = 256
                     buffer = String$(bufferLen, " ")
                     

                     'O ERRO ACONTECE NESSA LINHA ABAIXO E TRAVA O SISTEMA CONFORME ANEXO.
                     retorno = SAT_GerarPDFExtratoVenda(VENDAS!VEN_CAMINHOXML, Parametros!PAR_CAMINHOACBR & "\PDF\" & Numero_da_venda & ".pdf", buffer, bufferLen)
                     CheckResult retorno
                     
                     SetResposta buffer, bufferLen
                     
                               
                     retorno = SAT_DesInicializar()
                     CheckResult retorno

Screenshot_1.jpg

ACBrLibSAT-20190523.log

Share this post


Link to post
Share on other sites

Consegue reproduzir o erro com o demo ?
Poste seu acbrlib.ini, fazendo favor.

  • Like 1

Consultor SAC ACBr Rafael Dias
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Desenvolvedor ACBrLib.

 

Share this post


Link to post
Share on other sites

 

14 horas atrás, Rafael Dias disse:

Consegue reproduzir o erro com o demo ?
Poste seu acbrlib.ini, fazendo favor.

Olá boa tarde!

Fui executar pelo demo e não consigo mais abrir o mesmo, fica me retornando o seguinte erro no vb6 "bad dll calling convention" (no meu outro projeto funciona normalmente)

O que posso fazer para ajustar esse problema ?

Share this post


Link to post
Share on other sites

Este erro significa que você esta usando a dll errada, você deve usar a dll StdCall e não a Cdecl.


Consultor SAC ACBr Rafael Dias
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Desenvolvedor ACBrLib.

 

Share this post


Link to post
Share on other sites

×
×
  • Create New...