Ponto-de-Entrada: GP240VAL - Situações Complementares no Cad. Afastamentos
Versões: | Microsiga Protheus 12 |
Compatível Países: | Todos |
Compatível às Bases de Dados: | Todos |
Descrição:
O ponto de entrada tem como objetivo validar situações complementares ao padrão da rotina na inclusão do cadastro de afastamentos.
Programa Fonte:
GPEA240.PRX
Sintaxe:
GP240VAL - Situações Complementares no Cad. Afastamentos ( [ Paramixb[1] ] ) --> lRetPE
Parâmetros:
Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
Paramixb[1] | Object | Submodelo de edição por grid do modelo de dados do Cadastro do Afastamento (GPEA240_SR8). |
Retorno
lRetPE
- (logico)
- Indica se a linha está ok ou não.
Observações
A validação criada pelo ponto de entrada só será executada se a validação padrão do sistema indicar que a linha está Ok.
Dentro do componente oGrid é possível acessar dados do aHeader/aCols para captura das informações conforme linha posicionada.
Exemplo:
#INCLUDE "Protheus.CH"
#INCLUDE 'RWMAKE.CH'
User Function GP240VAL()
Local aArea := GetArea()
Local oGrid := Paramixb[1]
Local lRet := .T.
If oGrid:GetValue("R8_PROADIC") == "2" // Cálcula Dias Proporcionais igual a '2=Não'
Help( , , 'HELP', , "Nao calcula Dias Proporcionais" , 1, 0 )
lRet := .F.
EndIf
RestArea(aArea)
Return (lRet)
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas