Abrangências: | Microsiga Protheus 10 , Microsiga Protheus 11 |
Compatível Países: | Brasil |
Sistemas Operacionais: | Todos |
Compatível às Bases de Dados: | Todos |
Idiomas: | Português (Brasil) |
Ponto de entrada localizado na função WsNFeMnt. Por meio deste ponto é possível obter as informações que serão apresentadas no monitor faixa.
SPEDNFE.PRX
FISMNTNFE - Monitor Faixa da NF-e ( < cIdNfe> , < aNfeInf> ) --> Nill
Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
cIdNfe | Caracter | ID de identificação da Nota | X | ||||||||||||||
aNfeInf | Array of Record | Array com as informações do Monitor. | X |
#include "rwmake.ch"User Function FISMNTNFE()Local cIdNfe := PARAMIXB[1]Local aNfeInf := PARAMIXB[2]Local nLote := aNfeInf[1][1]Local dDataLote := aNfeInf[1][2]Local cHoraLote := aNfeInf[1][3]Local nReciboSef:= aNfeInf[1][4] Local cCodEnvLot:= aNfeInf[1][5]Local cMsgEnvLot:= aNfeInf[1][6]Local cCodRet := aNfeInf[1][7]Local cMsgRet := aNfeInf[1][8]Local cCodRetNfe:= aNfeInf[1][9] Local cMsgRetNfe:= aNfeInf[1][10] If Len(aNfeInf) > 0 msgalert("Ponto de Entrada FISMNTNFE"+ CHR(13) +"Nota Gerada " + CHR(13) + "Nota = " + cIdNfe +CHR(13)+"Cod Ret Nfe = " + cCodRetNfe + CHR(13) + "Msg Retorno NF-e = " + cMsgRetNfe ) Else msgalert("Ponto de Entrada FISMNTNFE sem notas geradas !! ")EndIF Return Nil