Histórico da Página
Descrição | EECAP101 - Pedido de Exportação | ||||||||||||||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Observações | Ponto de Entrada para customização de funções no fonte EECAP101. | ||||||||||||||||||||||||||||||
Exemplos | User Function EECAP101() Local cParam := If(Type("ParamIxb") = "A",ParamIxb[1],If(Type("ParamIxb") = "C",ParamIxb,"")) Local nRecNoEET If cParam == "NOT_DIALOG" MsgInfo("Entrou no ponto de entrada 'NOT_DIALOG. Variavel 'nOpcPE' = " + cValToChar(nOpcPE)) EndIf If cParam == "TROCA_FILIAL_NOTA" cFilFatNf := EE9->EE9_MSFIL MSGINFO("Entrou no ponto de entrada 'TROCA_FILIAL_NOTA'") Endif IF cParam == "TROCA_PERCOM_VLCOM" MSGINFO("Entrou no ponto de entrada 'TROCA_PERCOM_VLCOM'") Endif If cParam == "COMIS_TOT" /*Exemplo de uso do ponto de entrada para alterar o campo de valor a ser considerado na apuração da comissão*/
EndIf If cParam == "VALID_AG_COM" /* //aborta a inclusão EndIf EndIf If cParam == "PE_GRV_EET" MsgInfo("Ponto de Entrada EECAP101, parâmetro PE_GRV_EET", "PE_GRV_EET") nRecNoEET:= ParamIxb[2] //RecNo da tabela EET registrado na tabela temporária WorkDe. Quando for 0, é uma nova despesa (inclusão); quando for diferente de 0, é uma atualização de despesa (alteração) If nRecNoEET == 0 //Customização na inclusão de uma despesa EndIf EndIf
| ||||||||||||||||||||||||||||||
Preview | |||||||||||||||||||||||||||||||
Idioma | Português(Brasil) | ||||||||||||||||||||||||||||||
Versões | Microsiga_Protheus 11 e 12 | ||||||||||||||||||||||||||||||
Sistemas Operacionais Suportados | Todos | ||||||||||||||||||||||||||||||
Compatível com as Bases de Dados | Todas | ||||||||||||||||||||||||||||||
Parâmetros |
| ||||||||||||||||||||||||||||||
Retorno | |||||||||||||||||||||||||||||||
Eventos de chamada do Ponto de Entrada | |||||||||||||||||||||||||||||||
Variáveis |
| ||||||||||||||||||||||||||||||
Programa Fonte | EECAP101.PRW |