Gestão de Pessoas - Manual do Usuário > Customizações > Funções > RetAdmSeg

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.