Salve salve....
Ponto de entrada EICOR100- ( Envio ao Siscomex)
EICOR100-EICOR100 - PE Geral
#INCLUDE "TOTVS.CH"
/*/{Protheus.doc} EICOR100
PE Geral
@type function
@author Eurai Rapelli
@since 2023.01.01
/*/
User Function EICOR100()
Local cPonto := ''
Local xRet := .T.
If ValType(PARAMIXB) == "C"
cPonto := PARAMIXB
ElseIf ValType(PARAMIXB) == "A"
cPonto := PARAMIXB[01]
Endif
If cPonto == "ITEB"
ElseIf cPonto == "ITEC"
ElseIf cPonto == "ITEZ"
ElseIf cPonto == "MARCADESMA"
ElseIf cPonto == "ANTES_CRIA_ARQ"
EndIf
Return( xRet )
Gostou? Compartilhe com seus amigos e deixe um comentário! 😎
Um abraço, e até a próxima