Páginas

DICAS 2524 WINDEV WEBDEV MOBILE ACBR 182 MDFE Validar






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













Bom dia, Seja bem vindos a mais uma video Aula. Essa Aula está sendo Gravada no dia 03 12 2019.
Dica 2524. Método usado para validar os mdfe assinados através do componente ACBrMDFe.

DICAS 2524 - WINDEV WEBDEV MOBILE - ACBR 182 - MDFE_Validar

Doaçao Amarildo Matos - Link da doação: https://streamelements.com/amarildo_matos/tip


Compartilhe Canal Youtube Amarildo Matos
Amarildo, desde 1990 ensinando Desenvolvimento de Sistemas, tornando
sonhos em realidades.



========================
// btn NFE ASSINAR VALIDAR XML MDFE
bRETORNO is boolean=ACBR_INICIALIZAR("ACBrMDFe32.dll","MDFE_Inicializar")
IF bRETORNO=True THEN
EDT_RESPOSTA=ACBR_CARREGARINI("ACBrMDFe32.dll","MDFE_CarregarINI",EDT_INI)
IF EDT_RESPOSTA=0 THEN // carregou com sucesso
EDT_RESPOSTA=ACBR_Assinar("ACBrMDFe32.dll","MDFE_Assinar","MDFE_UltimoRetorno")
IF EDT_RESPOSTA=0 THEN

EDT_RESPOSTA=ACBR_Validar("ACBrMDFe32.dll","MDFE_Validar","MDFE_UltimoRetorno")
IF EDT_RESPOSTA=0 THEN
EDT_RESPOSTA+=CR+"ASSINADO E VALIDADO COM SUCESSO"
ELSE
Info("ERRO AO VALIDAR MDFE"+CR+EDT_RESPOSTA)
END

    ELSE
        Info("ERRO AO ASSINAR"+EDT_RESPOSTA)
END
ELSE
EDT_RESPOSTA+=CR+"ERRO CARREGAR INI"
END
ELSE
EDT_RESPOSTA="erro inicializar"
END
ACBR_FINALIZAR("ACBrMDFe32.dll","MDFE_Finalizar")
===============
PROCEDURE ACBR_Validar(sRecebe_nome_dll is string="",sRecebe_nome_metodo is string="", ...
                       recebe_ultimo_Retorno is string="")
gnretorno_acbr=API(sRecebe_nome_dll,sRecebe_nome_metodo)
//gnretorno_acbr=API("ACBrNFe32.DLL","NFE_Validar")
IF gnretorno_acbr=0 THEN // 0 = VALIDOU COM SUCESSO
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 Validar"
    texto+=CR+ACBR_ULTIMO_RETORNO(sRecebe_nome_dll,recebe_ultimo_Retorno)
    RESULT texto
END
//https://acbr.sourceforge.io/ACBrLib/NFE_Validar.html
// NFE_Validar;
//texto+=CR+ACBR_ULTIMO_RETORNO("ACBrNFe32.DLL","NFE_UltimoRetorno")
================
PROCEDURE ACBR_LIMPA_LISTA(recebe_nome_dll is string="",recebe_nome_metodo is string="")
gnretorno_acbr=API(recebe_nome_dll,recebe_nome_metodo)
IF gnretorno_acbr=0 THEN // 0 = Limpou a lista com sucesso
RESULT "0"
ELSE
texto is string="Limpa Lista-Erro Retorno ["+gnretorno_acbr+"]"+CR
IF gnretorno_acbr=-1 THEN texto+=" Indica que a biblioteca não foi inicializada "+CR
IF gnretorno_acbr=-10 THEN texto+=" Indica que houve erro ao limpar a lista."+CR
texto+="Dll->"+recebe_nome_dll+CR
texto+="Metodo->"+recebe_nome_metodo+CR

Info("ERRO RETORNO LIMPA LISTA")
RESULT texto

END

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



























DICAS 2477 WINDEV WEBDEV MOBILE ACBR 167 ACBR LIB CTE CarregarXML
DICAS 2479 WINDEV WEBDEV MOBILE ACBR 168 ACBR LIB CTE ObterXml
DICAS 2482 WINDEV WEBDEV MOBILE ACBR 169 ACBR LIB CTE Assinar
DICAS 2486 WINDEV WEBDEV MOBILE ACBR 170 ACBR LIB Fazendo Modificacoes R..
DICAS 2488 WINDEV WEBDEV MOBILE ACBR 171 ACBR LIB CTE Validar
DICAS 2490 WINDEV WEBDEV MOBILE ACBR 172 ACBR LIB CTE Enviar
DICAS 2493 WINDEV WEBDEV MOBILE ACBR 173 ACBR LIB CTE Consultar
DICAS 2497 WINDEV WEBDEV MOBILE ACBR 174 ACBR LIB CTE Cancelar
DICAS 2499 WINDEV WEBDEV MOBILE ACBR 175 ACBR LIB CTE ImprimirPDF
DICAS 2505 WINDEV WEBDEV MOBILE ACBR 176 CTE ImprimirPDF 2a parte
DICAS 2508 WINDEV WEBDEV MOBILE ACBR 177 MDFe Inicializar E Finalizar
DICAS 2511 WINDEV WEBDEV MOBILE ACBR 178 MDFE CarregarINI
DICAS 2515 WINDEV WEBDEV MOBILE ACBR 179 MDFE CarregarXML
DICAS 2519 WINDEV WEBDEV MOBILE ACBR 180 MDFe ObterXml
DICAS 2522 WINDEV WEBDEV MOBILE ACBR 181 MDFE Assinar
DICAS 2524 WINDEV WEBDEV MOBILE ACBR 182 MDFE Validar
DICAS 2527 WINDEV WEBDEV MOBILE ACBR 183 MDFE LimparLista

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