Ponto-de-Entrada: GPA050OK - Validação da programação de férias
Abrangências: | Microsiga Protheus 10 |
Versões: | Microsiga Protheus 10 |
Compatível Países: | Todos |
Sistemas Operacionais: | Todos |
Compatível às Bases de Dados: | Todos |
Idiomas: | Português (Brasil) , Português (Portugal) , Espanhol , Inglês |
Descrição:
Possibilita validar a confirmação da operação de inclusão/alteração/exclusão do registro de programação de férias.
Programa Fonte
GPEA050.PRX
Sintaxe
GPA050OK - Validação da programação de férias ( [ ParamIXB ] ) --> lRet
Parâmetros:
Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
ParamIXB | Array of Record | Elemento 1 - Identifica a operação selecionada pelo usuário a partir do menu de opções da rotina. Sendo ativas apenas as opções de atualização(inclusão/alteração) e exclusão da programação de férias.Elemento 2 - Informa se o registro de programação de férias para o empregado existe na base de dados. Esta informação é util no caso do primeiro elemento ser de atualização da programação. |
Retorno
-
lRet(logico)
- .T. Confirma a operação;.F. Não confirma a operação.
Observações
Através da variável ParamIXB são passados dois elementos, conforme descritos neste documento. A customização deve interpretar essas informações e determinar se a operação deve prosseguir, retornando um conteúdo lógico correspondente.
Exemplos
#INCLUDE 'RWMAKE.CH'#INCLUDE 'PROTHEUS.CH'USER FUNCTION GPA050OK() Local nOpc := ParamIXB[1] // 4 - Deleta / 3-AtualizaLocal lExiste := ParamIXB[2] // .T. - Encontrou programacao de ferias para o empregado / .F. - Nao encontrouLocal lRet := .F.IF nOpc == 4 IF lExiste MsgAlert('Elimina') Endif ElseIF nOpc == 3 IF lExiste MsgAlert('Altera') Else MsgAlert('Inclui') Endif Endif lRet := MsgYesNo("Prossegue com a operacao ?") Return(lRet)
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas