Alguém conseguiu usar a SAT.DLL com xHarbour 1.0.0?

Projeto [x]Harbour - Compilador de código aberto compatível com o Clipper.

Moderador: Moderadores

Avatar do usuário
ANDRIL
Usuário Nível 5
Usuário Nível 5
Mensagens: 1299
Registrado em: 06 Jul 2004 00:44
Contato:

Alguém conseguiu usar a SAT.DLL com xHarbour 1.0.0?

Mensagem por ANDRIL »

Pessoal, fiz diversos testes com uso desta dll, consigo conectá-la porém seu retorno esta fora do padrão.

Veja este código:

Código: Selecionar todos

? "SAT.dll carregada",;
  hACBrDLL:= LoadLibrary( "c:\SAT\SAT.DLL" )  // LoadLibrary LoadLib32
  
  ? "consultar se sat esta ativo"
  B=DllCall(hACBrDLL,0x0020,"ConsultarSAT","335212")
  ? B (me retorna apenas um numero qualquer tipo 895400)
 
  ? "ativar sat"
  A=DllCall(hACBrDll,0x0020,"AtivarSAT","1","12345678","11111111111111","35")
  ? A (me retorna apenas um numero qualquer tipo 895422)
Alguém esta usando esta dll e esta obtendo o retorno correto via xharbour?

Ate+
Clipper 5.2e / Blinker 5.1 / Harbour 3.2 / GTwvg
marsp
Usuário Nível 1
Usuário Nível 1
Mensagens: 46
Registrado em: 11 Fev 2013 14:09

Alguém conseguiu usar a SAT.DLL com xHarbour 1.0.0?

Mensagem por marsp »

Andril

Boa tarde

Eu uso o exemplo do rochinha. A funcao ConsultarSAT esta funcionando e retornando certo, mas na funcao EnviarDadosVendas não tenho retorno trava a maquina e no Emulador diz que esta tudo normal como abaixo

[2014-01-10 12:55:18.380]:Iniciando Piloto SAT-CFe. v2.6.29
[2014-01-10 12:55:18.408]:Carregando configuracoes iniciais.
[2014-01-10 12:55:18.457]:Numero de Serie: 900000102
[2014-01-10 12:55:18.470]:EMULADOR DO SAT OFF LINE
[2014-01-10 12:55:18.522]:Debug ativado
[2014-01-10 12:55:18.534]:Carregando parametrizacoes.
[2014-01-10 12:55:18.902]:Sincronizando Relogio NTP.
[2014-01-10 12:55:18.912]:Aguardando Comunicacao.
[2014-01-10 12:55:29.337]:INICIO CONSULTA
[2014-01-10 12:55:29.345]:FIM CONSULTA
[2014-01-10 12:55:37.629]:INICIO EMISSAO
[2014-01-10 12:55:37.683]:Carregando CFe.
[2014-01-10 12:55:37.718]:Validando CFe.
[2014-01-10 12:55:37.733]:Completando CFe.
[2014-01-10 12:55:38.104]:Assinando CFe.
[2014-01-10 12:55:38.364]:EMITIDO COM SUCESSO

Não consigo achar o problema
Anexos
xxx.txt
(31.23 KiB) Baixado 58 vezes
Avatar do usuário
rochinha
Administrador
Administrador
Mensagens: 4664
Registrado em: 18 Ago 2003 20:43
Localização: São Paulo - Brasil
Contato:

Alguém conseguiu usar a SAT.DLL com xHarbour 1.0.0?

Mensagem por rochinha »

Amiguinhos,

Eu dei uma atualizada no código das funções para acesso ao SAT.DLL quem sabe ajuda.

Os testes que fiz usaram Harbour 0.45 e Harbour 3.2. Em relação ao xHarbour não testei com nenhuma delas, desculpem.
OPS! LINK QUEBRADO? Veja ESTE TOPICO antes e caso não encontre ENVIE seu email com link do tópico para [url=mailto://fivolution@hotmail.com]fivolution@hotmail.com[/url]. Agradecido.

@braços : ? )

A justiça divina tarda mas não falha, enquanto que a justiça dos homens falha porque tarda.
marsp
Usuário Nível 1
Usuário Nível 1
Mensagens: 46
Registrado em: 11 Fev 2013 14:09

Alguém conseguiu usar a SAT.DLL com xHarbour 1.0.0?

Mensagem por marsp »

Rochinha

A onde eu pego essas atualizações.

Obrigado
Avatar do usuário
rochinha
Administrador
Administrador
Mensagens: 4664
Registrado em: 18 Ago 2003 20:43
Localização: São Paulo - Brasil
Contato:

Alguém conseguiu usar a SAT.DLL com xHarbour 1.0.0?

Mensagem por rochinha »

Amiguinhos,

Neste tópico
OPS! LINK QUEBRADO? Veja ESTE TOPICO antes e caso não encontre ENVIE seu email com link do tópico para [url=mailto://fivolution@hotmail.com]fivolution@hotmail.com[/url]. Agradecido.

@braços : ? )

A justiça divina tarda mas não falha, enquanto que a justiça dos homens falha porque tarda.
Responder