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.