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:

Definir Numero aEstPos;
Definir Alfa aPosTra;
Definir Alfa aDesAtv;
Definir Alfa aObsAte;
Definir Numero aAchou;
Definir Alfa xAtividades;
Definir Alfa xAtividade;

aEstPos = 1;
aPosTra = "BR_001";
xAtividades = "";
RetornaAtividadesRiscoPosto(aEstPos, aPosTra, DatSis, "CARREGAR", aDesAtv, aObsAte, aAchou);
Enquanto (aAchou = 1) {
xAtividade = "Descrição atividade: " + aDesAtv + " Observações: " + aObsAte;
Se (xAtividades = "") {
xAtividades = xAtividade;
} senao {
xAtividades = xAtividades + " " + xAtividade;
}
RetornaAtividadesRiscoPosto(aEstPos, aPosTra, DatSis, "PROXIMO", aDesAtv, aObsAte, aAchou);
}

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ê?