Pe cadastro de dependentes - validação da linha do a cols

2
GP020LOK– Validação da linha de dados do cadastro de dependentes Ir para o final dos metadados Ir para o início dos metadados 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 User Function Maior30(aLinha)Local nPosNasc := GdFieldPos("RB_DTNASC") Local nIdade Local lRet:=

Transcript of Pe cadastro de dependentes - validação da linha do a cols

Page 1: Pe   cadastro de dependentes - validação da linha do a cols

GP020LOK– Validação da linha de dados do cadastro d e dependentes Ir para o final dos metadados Ir para o início dos metadados 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 d e 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 aCampo s

User Function Maior30(aLinha)Local nPosNasc := GdFi eldPos("RB_DTNASC") Local nIdade Local lRet:=

Page 2: Pe   cadastro de dependentes - validação da linha do a cols

.T.nIdade := Year(dDataBase) - Year(aLinha[nPosNasc]) nIdade

aLinha[nPosNasc] ) ), nIdade- 1,nIdade)if nIdade >= 30

Confirmar (S)im / (N) não ? ") endifReturn (lRet)

Variáveis

Nome Tipo Escopo

Array of Record Global

totvs

Year(aLinha[nPosNasc]) nIdade := IIF( ( Month( dDataBase )< Month(

1,nIdade)if nIdade >= 30 lRet:= APMSGYESNO("Esse dependente é maior

Confirmar (S)im / (N) não ? ") endifReturn (lRet)

Pode Alterar descrição

Não

Seu voto:

Resultados:

0 votos

:= IIF( ( Month( dDataBase )< Month(

lRet:= APMSGYESNO("Esse dependente é maior que 30.