VerDatFer

Procura se a data específica é um feriado para o colaborador. Para isto, verifica pela filial e pela escala.

Sintaxe: VerDatFer(Numero aNumEmp, Numero aTipCol, Numero aNumCad, Numero aData);

Parâmetros:

Nome Tipo Descrição
aNumEmp Numérico Código da Empresa.
aTipCol Numérico Tipo de Colaborador.
aNumCad Numérico Cadastro do Colaborador.
aData Numérico Data na qual deseja-se saber se existe feriado ou não.

Tipo de retorno: Se a data for feriado,  retornará 1. Caso contrário, retornará 0.

Exemplo: 

/* Deseja-se verificar se a Data de Admissão de um Colaborador é feriado */


xDiaFer = VerDatFer (R034Fun.NumEmp, R034Fun.TipCol, R034Fun.NumCad, R034Fun.DatAdm);
Se (xDiaFer = 1)
@ Ações caso a data seja feriado @
Senao
@ Ações caso a data NÃO seja feriado @

Utilização: Gerador de Relatórios e Regras.

Este artigo ajudou você?