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

CarregaQtdeColGHE

Função que busca a quantidade de colaboradores de determinado PPRA/GHE podendo agrupá-los por Turno, Faixa Etária, Turno/Faixa Etária. O resultado é divido entre o sexo masculino e feminino.

Os dados são armazenados numa lista interna, sendo que para recuperá-los é necessário utilizar a função RetornaQtdColGHE.

Sintaxe: CarregaQtdColGHE(Numero xTipo, Numero xCodPRA, Numero xCodGHE, Numero xData, Alfa xAbrFil, Numero xDe, Numero xAte)

Parâmetros:

Nome	Tipo	Descrição
xTipo	Numérica	Forma que são agrupados os colaboradores (1-Turno, 2-Faixa Etária, 3-Turno/Faixa Etária).
xCodPRA	Numérica	Código do PPRA.
xCodGHE	Numérica	Código do GHE - Grupo Homogêneo de Exposição.
xData	Numérica	Data de referência.
xAbrFil	Alfanumérica	Abrangência de filial.
xDe	Numérica	Início da faixa etária.
xAte	Numérica	Término da faixa etária.

Exemplo:

xInd = 1;

Enquanto (xInd < 4)
inicio

se (xInd = 1)
{

xFxDe = 0;
xFxAte = 18;

}

senao
se (xInd = 2)
{

xFxDe = 19;
xFxAte = 46;

}

senao
se (xInd = 3)
{

xFxDe = 47;
xFxAte = 99;

}

@ Busca a quantidade de colaboradores agrupando por Turno/Faixa Etária @

CarregaQtdColGHE(3, R583GHE.CODPRA, R583GHE.CODGHE, EDatRef, EAbrFil, xFxDe, xFxAte);

xQtdCol = RetornaQtdColGHE("INICIO", xTurno, xDe, xAte, xQtdM, xQtdF);

@ Seta os valores retornados para os controles @

Enquanto (xTurno <> 0)
inicio

FTurno = xTurno;

FFxDe = xDe;

FFxAte = xAte;

FQtdM = xQtdM;

FQtdF = xQtdF;

FTotal = xQtdCol;

ListaSecao("Adicional_Info");

xQtdCol = RetornaQtdColGHE("PROXIMO", xTurno, xDe, xAte, xQtdM, xQtdF);

fim;

Utilização: Gerador de Relatórios

Disponível para o módulo: SM.