AdicionarHistoricoEscala

Esta função tem como objetivo adicionar registros de históricos de escala em uma lista em memória, para então carregá-los na guia Escalas/Horário das telas de Ficha Registro (Colaboradores > Ficha Registro > Portaria 41) e Informações Gerais (Colaboradores > Ficha Registro > Informações Gerais).

Observação

Esta função apenas deve ser utilizada na regra por processo 871 - Carregar escalas do colaborador.

Sintaxe: AdicionarHistoricoEscala(Data xDatAlt, Numero xCodEsc, Alfa xNomEsc, Numero xHorSem, Numero xHorDsr)

Parâmetros:

Nome Tipo

Descrição

xDatAlt

Data

Data de alteração da escala do colaborador.
xCodEsc Numérico Código da nova escala do colaborador.
xNomEsc Alfa Nome da escala do colaborador.
xHorSem Numérico Quantidade de horas semanais.
xHorDsr Numérico Quantidade de horas de DSR.

Observação

O parâmetro xNomEsc pode ser utilizado com textos de até 260 caracteres e o xCodEsc com 9 dígitos. Nos parâmetros xHorSem e xHorDsr deve-se informar um valor em minutos. Exemplo: para representar 44 horas, deve-se informar 2640 minutos.

 

Exemplo: Buscar o Complemento Salarial do funcionário em horas, na data de hoje.

Definir Data xData;

Definir Numero xCodEsc;

Definir Alfa xNomEsc;

Definir Numero xHorSem;

Definir Numero xHorDsr;

 

xNumEmp = R034FUN.NumEmp;

xTipCol = R034FUN.TipCol;

xNumCad = R034FUN.NumCad;

 

Se ((xNumEmp = 1) e (xTipCol = 1) e (xNumCad = 1))

Inicio

DataHoje(xData);

xCodEsc = 9999;

xNomEsc = "Nome da escala";

xHorSem = 44;

xHorDsr = 12;

AdicionarHistoricoEscala(xData, xCodEsc, xNomEsc, xHorSem, xHorDsr);

Fim;

Utilização: Editor de Regras. Esta função deve ser utilizada na regra por processo 871 - Carregar escalas do colaborador.

Disponível para o módulo: Administração de Pessoal.

Este artigo ajudou você?