Ponto-de-Entrada: GP020LOK– Validação da linha de dados do cadastro de dependentes
Abrangências: | Microsiga Protheus 10 , Microsiga Protheus 11 |
Versões: | Microsiga Protheus 10 , Microsiga Protheus 11 |
Compatível Países: | Brasil |
Sistemas Operacionais: | Todos |
Compatível às Bases de Dados: | Todos |
Idiomas: | Português (Brasil) |
Descrição:
No cadastro de dependentes, esse ponto de entrada é executado na validação da linha de dados digitada após as validações padrões da rotina. A customização poderá determinar a continuação do processo ou o retorno para a linha de dados corrente.
Programa Fonte
GPEA020.PRX
Sintaxe
GP020LOK– Validação da linha de dados do cadastro de dependentes ( [ ParamIXB ] ) --> lRet
Parâmetros:
Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
ParamIXB | Array of Record | Variável do tipo private com 2 elementos:Elemento 1 - Corresponde ao conteúdo da linha de dados corrente. É cópia da variavel aCols[n].Elemento 2 - Corresponde ao cabeçalho da linha de dados corrente. É cópia da variável aHeader. |
Retorno
-
lRet(logico)
- .T. - determina que as validações foram realizadas e não foram detectadas não conformidades. O processamento prossegue..F. - foram encontradas incoerências durante a validação e o processamento não prossegue sendo necessário realizar as correções dos dados digitados.
Exemplos
#INCLUDE "Protheus.CH"User function GP020LOK()Local lRet:= .T.Local aLinha := ParamIXB[1] Local aCampos := ParamIXB[2] //--Mensagem para dependentes maiores que 30 (nessa hipotese impede registro do dependente)lRet:=U_Maior30(aLinha)Return(lRet) User Function Maior30(aLinha)Local nPosNasc := GdFieldPos("RB_DTNASC") Local nIdade Local lRet:= .T.nIdade := Year(dDataBase) - Year(aLinha[nPosNasc]) nIdade := IIF( ( Month( dDataBase )< Month( aLinha[nPosNasc] ) ), nIdade-1,nIdade)if nIdade >= 30 lRet:= APMSGYESNO("Esse dependente é maior que 30. Confirmar (S)im / (N) não ? ") endifReturn (lRet)
Variáveis
Nome | Tipo | Escopo | Pode Alterar | descrição | ||||||||||
Array of Record | Global | Não |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas