RetornaAtividadesRiscoPosto

Obtém de um determinado posto de trabalho, em uma determinada data, suas respectivas atividades de risco. Consolida as atividades por item de descrição de posto (R017HDI), por GHE(R583REV) e diretamente por posto (R017RIS) conforme os assinalamentos “Atividade de Risco” (R000SEG), “Atividade Posto”, “Atividade GHE” (R583CAD).


Sintaxe: RetornaAtividadesRiscoPosto(Numero aEstPos, Alfa aPosTra, Data aDatRef, Alfa aAcao, Alfa End aDesAtv, Alfa End aObsAte, Numero End aAchou);

Parâmetros:

Nome

Tipo

Descrição

aEstPos

Numérico

Estrutura do posto

aPosTra

Alfa

Posto de trabalho

aDatRef

Data

Data de referência

aAcao

Alfa

Indica a ação que a função deve executar:

-> ‘CARREGAR’: ação que carrega as atividades de risco

-> ‘PROXIMO’: ação que posiciona a lista no próximo registro

aDesAtv

Alfa

Retorna a descrição da atividade

aObsAte

Alfa

Retorna a descrição detalhada da atividade

aAchou

Numero

Retorna:

-> 1 se encontrou atividades de risco

-> 0 se não encontrou atividades de risco

Exemplo:

<div class="Code"><p>Definir Numero aEstPos;<br></br>Definir Alfa aPosTra;<br></br>Definir Alfa aDesAtv;<br></br>Definir Alfa aObsAte;<br></br>Definir Numero aAchou;<br></br>Definir Alfa xAtividades;<br></br>Definir Alfa xAtividade;<br></br><br></br>aEstPos = 1;<br></br>aPosTra = "BR_001";<br></br>xAtividades = "";<br></br>RetornaAtividadesRiscoPosto(aEstPos, aPosTra, DatSis, "CARREGAR", aDesAtv, aObsAte, aAchou);<br></br>Enquanto (aAchou = 1) {<br></br>xAtividade = "Descrição atividade: " + aDesAtv + " Observações: " + aObsAte;<br></br>Se (xAtividades = "") {<br></br>xAtividades = xAtividade;<br></br>} senao {<br></br>xAtividades = xAtividades + " " + xAtividade;<br></br>}<br></br>RetornaAtividadesRiscoPosto(aEstPos, aPosTra, DatSis, "PROXIMO", aDesAtv, aObsAte, aAchou);<br></br>}</p></div>

Utilização: Editor de regras e gerador de relatórios.

Disponível para o módulo: Todos os módulos do Gestão de Pessoas | HCM.

Este artigo ajudou você?