Cadastro de invoice antecipada.
User Function EICEV100()
Local cParamIXB
If ValType(ParamIXB) == "A"
cParamIXB:= ParamIXB[1]
Else
cParamIXB:= ParamIXB
EndIf
Do Case
Case cParamIXB == "ANTES_EXCLUI_EW4"
IF EW4->EW4_HAWB == 'XPTO'
lVldExcPE :=.T. // retorna .t. para continuar com a exclusão
lVldExcPrd:=.F. //não executa a validação padrão
EndIf
Case cParamIXB == "CRIA_BOTAO"
MsgInfo("Entrou no ponto de entrada 'CRIA_BOTAO'.")
aAdd(aRotina,{"Botão Customizado", "MsgInfo('Botão Customizado')", 0,2})
Case cParamIXB == "AJUSTA_BROWSE"
MsgInfo("Entrou no ponto de entrada 'AJUSTA_BROWSE'.")
Case cParamIXB == "ANTES_GRAVA_EW4"
MsgInfo("Entrou no ponto de entrada 'ANTES_GRAVA_EW4'.")
Case cParamIXB == "DEPOIS_GRAVA_EW4"
MsgInfo("Entrou no ponto de entrada 'DEPOIS_GRAVA_EW4'.")
Case cParamIXB == "GRVWORK"
MsgInfo("Entrou no ponto de entrada 'GRVWORK'.")
Case cParamIXB == "ANTES_GRAVA_EW5"
MsgInfo("Entrou no ponto de entrada 'ANTES_GRAVA_EW5'.")
Case cParamIXB == "DEPOIS_GRAVA_EW5"
MsgInfo("Entrou no ponto de entrada 'DEPOIS_GRAVA_EW5'.")
Case cParamIXB == "VALIDA_CAMPOS"
MsgInfo("Entrou no ponto de entrada 'VALIDA_CAMPOS'.")
lSair := .F.
EndCase
Return Nil
| Ação | Descrição |
|---|---|
| CRIA_BOTAO | Quando o ponto de entrada "EICEV100" estiver passando no parâmetro "Paramixb", o conteúdo "CRIA_BOTAO" permitirá a inclusão de novos botões no menu da rotina. Esta customização utilizará a variavel privada "aRotina". |
| AJUSTA_BROWSE | Quando o ponto de entrada "EICEV100" estiver passando no parâmetro "Paramixb", o conteúdo "AJUSTA_BROWSE" permitirá a customização do browse da rotina. |
| ANTES_GRAVA_EW4 | Quando o ponto de entrada "EICEV100" estiver passando no parâmetro "Paramixb", o conteúdo "ANTES_GRAVA_EW4" permitirá a customização da rotina antes da gravação da tabela EW4. |
| DEPOIS_GRAVA_EW4 | Quando o ponto de entrada "EICEV100" estiver passando no parâmetro "Paramixb", o conteúdo "DEPOIS_GRAVA_EW4" permitirá a customização da rotina depois da gravação da tabela EW4. |
| GRVWORK | Quando o ponto de entrada "EICEV100" estiver passando no parâmetro "Paramixb", o conteúdo "GRVWORK" permitirá a gravação customizada da tabela temporaria WORK. |
| ANTES_GRAVA_EW5 | Quando o ponto de entrada "EICEV100" estiver passando no parâmetro "Paramixb", o conteúdo "ANTES_GRAVA_EW4" permitirá a customização da rotina antes da gravação da tabela EW5. |
| DEPOIS_GRAVA_EW5 | Quando o ponto de entrada "EICEV100" estiver passando no parâmetro "Paramixb", o conteúdo "DEPOIS_GRAVA_EW5" permitirá a customização da rotina depois da gravação da tabela EW5. |
| VALIDA_CAMPOS | Quando o ponto de entrada "EICEV100" estiver passando no parâmetro "Paramixb", o conteúdo "VALIDA_CAMPOS" permitirá a customização da validação dos campos da rotina. Esta validação utilizará a variavel privada "lSair". |
| Parâmetro | Nome | Tipo | Pode alterar | Descrição |
|---|---|---|---|---|
| CRIA_BOTAO | aRotina | Array | Sim | Array utilizado para incluir novos botões no menu da rotina. |
| VALIDA_CAMPOS | lSair | Lógico | Sim | Boolean utilizado para validar campos customizados. |
| ANTES_EXCLUI_EW4 | lVldExcPrd | Lógica | Sim | Valor default igual a true, se retornar false indica ao sistema que não deve passar pelas validações padrão da exclusão do registro. |
| ANTES_EXCLUI_EW4 | lVldExcPE | Lógico | Sim | Valor default igual a true, se retornar false indica ao sistema que a exclusão foi invalidada pelo ponto de entrada. |