Histórico da Página
...
Portuguese | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Ponto-de-Entrada: GP240VAL - Situações Complementares no Cad. Afastamentos
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:
Array of Record | Linha da Getdados do cadastro do afastamento
Retorno lRetPE
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. Estrutura do array recebido: Exemplos //Exemplo abaixo, se o tipo do afastamento for P - Doença superior a 15 dias #INCLUDE 'PROTHEUS.CH'User Function GP240VAL()Local aArea := GetArea()Local aCols := Paramixb[1]Local lRet := .T.//Alert("Passou pelo PE GP240VAL")If aCols[3] == "P" .And. aCols[6] == " "//Tipo Afastamento-/-Cod. Afastamento RAIS lRet := MsgNoYes("RAIS em branco. Continuar?")EndIfRestArea(aArea)Return (lRet) Dentro do componente oGrid é possível acessar dados do aHeader/aCols para captura das informações conforme linha posicionada. Exemplo: #INCLUDE "Protheus.CH"
|