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.