QtdFer

Retorna a quantidade de feriados do colaborador.

Tipo: Numérico.

Exemplo:

@ Não deixa alterar a quantidade de feriados. @

 

vferatu = 0;
vpos = 1;

 

@ Conta os feriados atuais. @


enquanto (vpos <= 31)
inicio
  vhoralt = HorAlt[vpos];
  se (vhoralt = 9997)
    vferatu = vferatu + 1;
  vpos = vpos + 1;
fim;

Se (vferatu <> QtdFer)
  Mensagem(Erro, "Não Pode Alterar a quantidade de Feriados.");

Utilização: Somente na regra por processo 142 - Consistência por Colaborador na Tela de Gerenciar Horários.

Disponível para o módulo: Controle de Ponto e Refeitório.

Este artigo ajudou você?