EICSI400 - EIC - Solicitação de Importação

Salve salve....

Ponto de entrada EICSI400 - ( EIC - Solicitação de Importação )

Nome do Fonte: xEICSI400.tlpp

                           
#INCLUDE "TOTVS.CH"

/*/{Protheus.doc} EICSI400
Solicitação de Importação

@type      function
@author      Eurai Rapelli
@since       2023.01.01
/*/
User Function EICSI400()
	Local cPonto  := '' as character
	Local xRet    := .T.

	If ValType(PARAMIXB) == "C"
		cPonto := PARAMIXB
	ElseIf ValType(PARAMIXB) == "A"
		cPonto := PARAMIXB[01]
	Endif


	If cPonto == "ALTERA_CAMPOS" 
        aAdd(aCpos,"W1_XITEM")

	Endif

Return( xRet )

Gostou? Compartilhe com seus amigos e deixe um comentário! 😎  

Um abraço, e até a próxima