User Function EICIN100()
Local lRet := .F.
Local cParam:= ""
Local aIndices := {}
Local cTabela := aIndices[1][1]
If Type("ParamIXB") == "C"
cParam := PARAMIXB
Else
cParam := PARAMIXB[1]
aIndices := PARAMIXB[2] //Índices do padrão apenas para consulta, não será possível manipular este Array
Endif
If cParam == "ANTES_VALID"
MsgInfo("Entrou no ponto de entrada:'ANTES_VALID'.")
ElseIf cParam == "GRVFD1"
MsgInfo("Entrou no ponto de entrada:'GRVFD1'.")
ElseIf cParam == "CRIA_INDICE"
//Siga abaixo o modelo para inclusão de índices
If cTabela == "Int_DE" //por padrão a posição [1][1] refere-se a tabela, mesmo se tiverem mais linhas no Array serão da mesma tabela
aAdd(aIndCustom, {"NDEDADOS","NDEHOUSE+NDEDADOS"})
msginfo("Entrou no ponto de entrada 'CRIA_INDICE' e adicionou indice na tabela Int_DE")
EndIf
EndIf
Return lRet |