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.