01. DADOS GERAIS

02. SITUAÇÃO/REQUISITO

• Este Ponto de Entrada pertence ao fonte EICIN100.PRW. Ele deve ser utilizado para a customização da Rotina de Integrações de Arquivo de Texto.

03. SOLUÇÃO

• Localizado no fonte EICIN100.PRW. Uso na rotina de Carta de Crédito que pode ser acessada através do menu Atualizações > Miscelânea > Int. Despachante

04. DEMAIS INFORMAÇÕES

• Não há.

05. ASSUNTOS RELACIONADOS

• Não há.

06. EXEMPLO

User Function EICIN100()
Local lRet := .F.
Local cParam:= ""
Local aIndices := {}

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 manipuar 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 aIndices[1][1] == "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