RetAdmSeg

Carrega variáveis de sistema com as informações de qual administradora, seguridade e percentual que o colaborador possui em determinada data e como retorno da função a quantidade de registros que o sistema leu para o colaborador.

Sintaxe: RetAdmSeg(Numero aNumEmp, Numero aTipCol, Numero aNumCad, Numero DatRef, Numero end aQtdLido);

Parâmetros:

Nome Tipo Descrição
aNumEmp Numérico Empresa do colaborador.
aTipcol Numérico Tipo colaborador.
aNumCad Numérico Cadastro do colaborador.
DatRef Numérico Data que se deseja saber as informações.
aQtdLido Numérico Quantidade de registros lidos pelo sistema.

Exemplo:

@ ---- Exemplo de regra no evento Seleção de um relatório ---- @
@ Quando encontrar algum registro na função e for do empregado @
@ 177 da empresa 707, então guarda os retornos deste colaborador @
@ nos vetores definidos na regra @

Definir Numero RetAdmSeg[100];
Definir Numero RetPerSeg[100];
Definir Numero RetCodSeg[100];

RetAdmSeg(R034FUN.NumEmp, R034FUN.TipCol, R034FUN.NumCad, DatSis, aQtdLido);
x = 1;
Enquanto (aQtdLido <> 0)
inicio
Se ((R034FUN.NumEmp = 707) e (R034FUN.TipCol = 1) e (R034FUN.NumCad = 177))
inicio
RetAdmSeg[x] = AdmSeg[x];
RetCodSeg[x] = CodSeg[x];
RetPerSeg[x] = PerSeg[x];
x++;
aQtdLido--;
fim;
fim;
.......

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

Este artigo ajudou você?