RetAtividadesRiscoCargoPosto

Retorna uma lista com as atividades de risco de um posto ou um cargo, considerando o assinalamento das Atividades de Risco da tela de Configuração de Segurança do Trabalho (Segurança > Configurações de Segurança):

  1. A função retornará apenas as atividades ligadas aos itens de descrição de postos de trabalho e cargos (R017HDI e R024HDI) informados no PGR passado como parâmetro.
  2. A função retornará as atividades ligadas aos itens de descrição de postos de trabalho e cargos (R017HDI e R024HDI) informados no PGR passado como parâmetro e retornará também as atividades de risco definidas diretamente por posto de trabalho e cargo (R017RIS e R024RIS).
  3. A função retornará apenas as atividades ligadas diretamente por posto de trabalho e cargo (tabelas R017RIS e R024RIS).

Sintaxe: Funcao RetAtividadesRiscoCargoPosto(Numero xTipoAtividade, Numero xPPRA, Numero xEstrutura, Alfa xCodigo, Data xDatRef, Alfa xAcao, Alfa End xTituloAtividade, Alfa End xDescricaoAtividade);

Parâmetros:

Nome

Tipo

Descrição

xTipoAtividade

Numérico

Indica quais itens de descrição devem ser retornados:

  1. retorna itens do Cargo
  2. retorna itens do posto.

xPPRA

Numérico

Informar PGR que será utilizado para buscar a configuração das atividades de risco.

xEstrutura

Numérico

Estrutura do cargo ou posto de trabalho.

xCodigo

Alfa

Código do cargo ou posto de trabalho.

xDatRef

Data

Data de referência para buscar as atividades de risco.


xAcao

alfa

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


-> ‘CARREGAR’: ação que carrega os itens de descrição do PGR para o Posto ou Cargo informado na data de referência, posicionando no primeiro registro da lista.


-> ‘INICIO’: ação que posiciona a lista no primeiro registro.


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

xTituloAtividade

Alfa

Título da atividade na posição atual da lista.

xDescricaoAtividade

Alfa

Descrição da atividade na posição atual da lista.

Tipo de Retorno: Própria função - Retorna “0” (zero) quando não há registro na posição atual, e “1” (um) quando há registro na posição atual da lista.

Exemplo:

<div class="Code"><p class="p_1">@ Armazenar todas as atividades de um cargo em uma variável do tipo alfa @<br></br>Definir alfa CodCar;<br></br>Definir alfa xAtividadesCargo;<br></br>Definir alfa xRetornoTitulo;<br></br>Definir alfa xRetornoAtividades;<br></br><br></br>xRetAti = RetAtividadesRiscoCargoPosto(1, PGR, EstCar, CodCar, EDatRef, "CARREGAR", xRetornoTitulo, xRetornoAtividades); <br></br>Enquanto (xRetAti &#x3C;> 0)<br></br>inicio<br></br>xAtividadesCargo = xAtividadesCargo + xRetornoTitulo +": "+ xRetornoAtividades + ". ";<br></br>@ Verifica se há mais registros @<br></br>xRetAti = RetAtividadesRiscoCargoPosto(1, PGR, EstCar, CodCar, EDatRef, "PROXIMO", xRetornoTitulo, xRetornoAtividades);<br></br>fim; </p></div>

Utilização: Gerador de relatórios e editor de regras.

Disponível para o módulo: SM.

Este artigo ajudou você?