Consultar Status Operacional - SAT

[lucdepaula]

Bom dia!

Não sei onde estou errando, estou com um sat dimep ativo para produção, quando envio o comando para "Consultar SAT" ele retorna o status mas quando envio "Consultar Status Operacional" ele trava o meu sistema, teste no demo do ACBRSAT lá funciona normal, eu copie as rotinas do demo e está acontecendo somente no meu, alguém passou por algo parecido ou pode me ajudar, talvez não estou enviando todos os parâmetros para consulta. Agradeço desde já pela ajuda...

[Daniel Simoes]

Possíveis causas:

- DLL do fabricante errada ou faltando arquivos

- modelo errado no ACBrSAT

[lucdepaula]

Estou usando o modelo no acbrsat 'Dinamico_stdcall' e a dll da dimep "dllsat.dll" mas eu consigo realizar a função consultar sat ele trava é na outra consultar status operacional.

[lucdepaula]

Alguém poderia me passar qual os parametros que tenho que enviar para realizar a consulta do status operacional para conferir se estou passando todos...

[Daniel Simoes]

Estude os fontes do Demo SATTeste em Exemplos 

[lucdepaula]

Resolvi, estava informando os dados errados. Obrigado a todos pela ajuda!

[araujolops]

Bom dia,

Estou com problemas na função "ACBrSAt.ConsultarStatusOperacional", mas somente quando Compilo em Modo Release. 
No modo debug está funcionando sem problemas, inclusive com os retornos correto. (Isso no emulador da receita).

Não está nem respeitando o try. (Assim está na minha aplicação)
            try
                ACBrSAt.ConsultarStatusOperacional;
            except
                Application.MessageBox('Problemas com o SAT. Verifique...', 'Aviso', mb_Ok + mb_IconExclamation);
                Exit;
            end;

Obs.: Os testes estão sendo feitos no emulador da receita. Os Fontes estão todos atualizados.
            
No ACBrSAT.pas

na Linha 1063 (Como está em modo release estou sem opção de debugar, então estou usando o showmessage).
 showmessage('erro 1') ; aqui nessa linha abaixo da erro dizendo que o aplicativo parou de funcionar. e se quero debugar ou fechar o programa.
  if EstaVazio(Retorno) then
    Retorno := fsSATClass.ConsultarStatusOperacional;
 showmessage('erro 2') ;

Windows 10 64 e Delphi XE7.            
            

Obrigado.

Editado 9 Dezembro, 2016 por araujolops
Já Resolvi o problema

[Juliomar Marchetti]

Boa tarde

mude para o trecho abaixo e veja se ele funciona em release!

lembre-se de recompilar os componentes após altera e então seu projeto

 

try
	ACBrSAt.ConsultarStatusOperacional;
except
	Application.MessageBox('Problemas com o SAT. Verifique...', 'Aviso', mb_Ok + mb_IconExclamation);
	raise
end; 

 

[araujolops]

17 minutos atrás, Juliomar Marchetti disse:

Boa tarde

mude para o trecho abaixo e veja se ele funciona em release!

lembre-se de recompilar os componentes após altera e então seu projeto

 

try
	ACBrSAt.ConsultarStatusOperacional;
except
	Application.MessageBox('Problemas com o SAT. Verifique...', 'Aviso', mb_Ok + mb_IconExclamation);
	raise
end; 

 

Obrigado por responder.

Mas também não dá certo.

Mas nesse como estou usando o Emulador da Receita, e SatDinamico_StdCall e compilado com  Release Dá erro, precisando mudar para SatDinamico_Cdecl.

A curiosidade, é que compilando em modo debug não apresenta o erro mencionado.

Mas obrigado...