Bom dia, Seja bem vindos a mais uma video Aula. Essa Aula está sendo Gravada no dia 14 11 2019.
Dica 2473. Inicio ACBrCTe32 AcbrLib dll com Windev.
DICAS 2473 - WINDEV WEBDEV MOBILE - ACBR 164 - ACBR LIB -
https://windevdesenvolvimento.blogspot.com/2019/11/dicas-2473-windev-webdev-mobile-acbr.html
========================
// btn_inicializar_finalizar
bResposta is boolean=ACBR_INICIALIZAR("ACBrCTe32.dll","CTE_Inicializar")
IF bResposta=True THEN
// COMANDOS
END
ACBR_FINALIZAR("ACBrCTe32.dll","CTE_Finalizar")
// https://acbr.sourceforge.io/ACBrLib/CTE_Inicializar.html
// https://acbr.sourceforge.io/ACBrLib/CTE_Finalizar.html
========================
PROCEDURE ACBR_INICIALIZAR(sRecebe_nome_dll is string="",sRecebe_nome_metodo is string="")
//gnretorno_acbr=API("ACBrNFe32.DLL","NFE_Inicializar",StringToUTF8(gsarquivo_ini),"")
gnretorno_acbr=API(sRecebe_nome_dll,sRecebe_nome_metodo,StringToUTF8(gsarquivo_ini),"")
IF gnretorno_acbr=0 THEN
RESULT True
ELSE
texto is string="Erro Retorno"+" - "+gnretorno_acbr
IF gnretorno_acbr=-1 THEN texto+=" Indica que houve falhas na finalização da biblioteca "
IF gnretorno_acbr=-5 THEN texto+=" Indica que não foi possível localizar o arquivo INI informado "
IF gnretorno_acbr=-6 THEN texto+=" Indica que não foi possível encontrar o diretório do arquivo INI "
RESULT texto
END
======================
PROCEDURE ACBR_FINALIZAR(sRecebe_nome_dll is string="",sRecebe_nome_metodo is string="")
//https://acbr.sourceforge.io/ACBrLib/NFE_Finalizar.html
//gnretorno_acbr=API("ACBrNFe32.DLL","NFE_Finalizar")
gnretorno_acbr=API(sRecebe_nome_dll,sRecebe_nome_metodo)
IF gnretorno_acbr=0 THEN
RESULT True
ELSE
texto is string="Erro Retorno"+" - "+gnretorno_acbr
IF gnretorno_acbr=-2 THEN texto+=" Indica que houve falhas na finalização da biblioteca"
Info("ERRO FINALIZAR DLL"+texto)
RESULT texto
END
========================
============================
Nenhum comentário:
Postar um comentário