segunda-feira, 18 de novembro de 2019

DICAS 2482 WINDEV WEBDEV MOBILE ACBR 169 ACBR LIB CTE Assinar























Bom dia, Seja bem vindos a mais uma video Aula. Essa Aula está sendo Gravada no dia 18 11 2019.
Dica 2482. Método usado para assinar os conhecimentos carregados no componente ACBrCTe.

DICAS 2482 - WINDEV WEBDEV MOBILE - ACBR 169 - ACBR LIB - CTE_Assinar



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

PROCEDURE ACBR_Assinar(sRecebe_nome_dll is string="",sRecebe_nome_metodo is string="")

//gnretorno_acbr=api("ACBrNFe32.DLL","NFE_Assinar")
gnretorno_acbr=API(sRecebe_nome_dll,sRecebe_nome_metodo)
IF gnretorno_acbr=0 THEN
//assinou com sucesso=0
RESULT("0")
ELSE
texto is string="Erro Retorno ["+gnretorno_acbr+"]"
IF gnretorno_acbr=-1 THEN texto+=" Indica que a biblioteca não foi inicializada "
IF gnretorno_acbr=-10 THEN texto+=" Indica que houve erro ao Assinar"
RESULT texto
END
=======================

// btn  ASSINAR xml
bRETORNO is boolean=ACBR_INICIALIZAR("ACBrCTe32.dll","CTE_Inicializar")
IF bRETORNO=True THEN
EDT_RESPOSTA=ACBR_CARREGARINI("ACBrCTe32.dll","CTE_CarregarINI",EDT_INI)
IF EDT_RESPOSTA=0 THEN
EDT_RESPOSTA=ACBR_Assinar("ACBrCTe32.dll","CTE_Assinar")
IF EDT_RESPOSTA=0 THEN
EDT_RESPOSTA+=CR+"ASSINADO COM SUCESSO"
    ELSE
        Info("ERRO AO ASSINAR"+CR+EDT_RESPOSTA)
END
ELSE
Info("ERRO AO CARREGAR INI")
END
END
ACBR_FINALIZAR("ACBrCTe32.dll","CTE_Finalizar")



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







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





























Ao vivo 2483 - 17/11/2019 15:00 - Amarildo Desenvolvimento Diversos



TESTE
TESTE
TESTE
TESSETET
SETSET
SETES
T

Ao vivo 2481 - 17/11/2019 07:30 - Amarildo Desenvolvimento Diversos



TESTE
TESTE
TESTE
TESSETET
SETSET
SETES
T

Teste

Teste
teste