English
Español
RetornaQtdColGHE
Função que retorna os dados que foram carregados na função CarregaQtdColGHE. Esses dados estão armazenados numa lista interna do sistema.
Sintaxe: RetornaQtdColGHE(Alfa xPosicao, Numero end xTurno, Numero end xDe, Numero end xAte, Numero end xQtdM, Numero end xQtdF)
Parâmetros:
Nome | Tipo | Descrição |
xPosicao | Alfa | Usado para posicionar no início da lista e percorrê-la (INICIO/PROXIMO). |
xTurno | Numérico | Turno em que estão agrupados os colaboradores. |
xDe | Numérico | Início da faixa etária. |
xAte | Numérico | Término da faixa etária. |
xQtdM | Numérico | Quantidade de colaboradores do sexo Masculino. |
xQtdF | Numérico | Quantidade de colaboradores do sexo Feminino. |
Tipo de Retorno: A própria função também retornará a quantidade total (soma de xQtdM com xQtdF) de colaboradores. Ver exemplo.
Exemplo:
<div class="Code"><p style="font-family: 'Courier New';font-size: 10pt;">xInd = 1;</p><p style="font-family: 'Courier New';font-size: 10pt;"><br></br>Enquanto (xInd < 4)<br></br>inicio<br></br></p><p style="font-family: 'Courier New';font-size: 10pt;">se (xInd = 1)<br></br>{<br></br></p><p style="font-family: 'Courier New';font-size: 10pt;">xFxDe = 0;<br></br>xFxAte = 18;</p><p style="font-family: 'Courier New';font-size: 10pt;">}</p><p style="font-family: 'Courier New';font-size: 10pt;">senao<br></br>se (xInd = 2)<br></br>{</p><p style="font-family: 'Courier New';font-size: 10pt;">xFxDe = 19;<br></br>xFxAte = 46;</p><p style="font-family: 'Courier New';font-size: 10pt;">}<br></br></p><p style="font-family: 'Courier New';font-size: 10pt;">senao<br></br>se (xInd = 3)<br></br>{</p><p style="font-family: 'Courier New';font-size: 10pt;">xFxDe = 47;<br></br>xFxAte = 99;</p><p style="font-family: 'Courier New';font-size: 10pt;">}</p><p style="font-family: 'Courier New';font-size: 10pt;">@ Busca a quantidade de colaboradores agrupando por Turno/Faixa Etária @</p><p style="font-family: 'Courier New';font-size: 10pt;">CarregaQtdColGHE(3, R583GHE.CODPRA, R583GHE.CODGHE, EDatRef, EAbrFil, xFxDe, xFxAte);</p><p style="font-family: 'Courier New';font-size: 10pt;">xQtdCol = RetornaQtdColGHE("INICIO", xTurno, xDe, xAte, xQtdM, xQtdF);</p><p style="font-family: 'Courier New';font-size: 10pt;">@ Seta os valores retornados para os controles @</p><p style="font-family: 'Courier New';font-size: 10pt;">Enquanto (xTurno <> 0)<br></br>inicio</p><p style="font-family: 'Courier New';font-size: 10pt;">FTurno = xTurno;</p><p style="font-family: 'Courier New';font-size: 10pt;">FFxDe = xDe;</p><p style="font-family: 'Courier New';font-size: 10pt;">FFxAte = xAte;</p><p style="font-family: 'Courier New';font-size: 10pt;">FQtdM = xQtdM;</p><p style="font-family: 'Courier New';font-size: 10pt;">FQtdF = xQtdF;</p><p style="font-family: 'Courier New';font-size: 10pt;">FTotal = xQtdCol;</p><p style="font-family: 'Courier New';font-size: 10pt;">ListaSecao("Adicional_Info");</p><p style="font-family: 'Courier New';font-size: 10pt;">xQtdCol = RetornaQtdColGHE("PROXIMO", xTurno, xDe, xAte, xQtdM, xQtdF);</p><p style="font-family: 'Courier New';font-size: 10pt;">fim;</p><p style="font-family: 'Courier New';font-size: 10pt;">fim;</p></div>
Utilização: Gerador de relatórios e editor de regras.
Disponível para o módulo: SM.
English
Español
