Páginas

▼

quinta-feira, 28 de novembro de 2019

DICAS 2508 WINDEV WEBDEV MOBILE ACBR 177 MDFe Inicializar E Finalizar





Doação Para Amarildo matos - https://streamelements.com/amyteste/tip





ErpMatos - TgsSistemas
skype:amarildo.matos.informatica
email: amarildo.matos@gmail.com
whats: 51984197742
Youtube: Amarildo Matos
http://www.amarildomatos.com.br
https://groups.google.com/forum/#!forum/amarildowindev

www.windev.com
https://www.pcsoft.fr/webinaires.htm?p=forumpcs
https://forum.pcsoft.fr/fr-FR/pcsoft.br.windev/page/1.awp
https://www.windev.com/windev/WD-Express.htm
https://www.windev.com/windevmobile/WM-Express.htm
http://windevdesenvolvimento.blogspot.com.br/2017/07/menu-blog.html






Bom dia, Seja bem vindos a mais uma video Aula. Essa Aula está sendo Gravada no dia 28 11 2019.
Dica 2508. Método usado para inicializar e Finalizar Mdfe acbr lib.

DICAS 2508 - WINDEV WEBDEV MOBILE - ACBR 177 - MDFe_Inicializar e Finalizar



===============

// BTN MDFE INICIALIZAR E FINALIZAR

bRETORNO is boolean=ACBR_INICIALIZAR("ACBrMDFe32.dll","MDFE_Inicializar")
IF bRETORNO=True THEN

EDT_RESPOSTA="Inicializou"

ELSE
   EDT_RESPOSTA="erro inicializar"
END
ACBR_FINALIZAR("ACBrMDFe32.dll","MDFE_Finalizar")
EDT_RESPOSTA+=CR+"Finalizou"

===============

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),StringToUTF8(sChaveCrypt))
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="")
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


=============























============================







às

Nenhum comentário:

Postar um comentário