RetornaCodigoRiscosGHE

Função que retorna as principais informações dos laudos dos agentes de riscos do Grupo Homogêneo de Exposição (GHE), alimentados pela função de programador CarregaRiscosGHE.

A função RetornaCodigoRiscosGHE pode ser utilizada quando se faz necessário buscar alguma informação da tabela GHE - Revisão do GHE - Laudo (R583LAU) e esta, por sua vez, é retornada pela função RetornaRiscosGHE. A função RetornaCodigoRiscosGHE retorna os campos-chave da tabela, usando-os para viabilizar a busca nesta tabela.

Sintaxe: RetornaCodigoRiscosGHE(Alfa Posicao, Numero End CodPRA, Numero End CodGHE, Alfa End RevGHE, Numero End CodAgt);

Parámetros:

Nome	Tipo	Descripción
Posicao	Alfanumérico	Contém a posição de seleção dos dados. Os valores possíveis são: INICIO ou PROXIMO.
End CodPRA	Numérico	Código do PPRA.
End CodGHE	Numérico	Código do GHE.
End RevGHE	Alfanumérico	Código da revisão do GHE.
End CodAgt	Numérico	Código do agente de risco.

Ejemplo:

xNumEmp = 1;
xTipCol = 1;
xNumCad = 1;
xConRis = "T";

CarregaRiscosGHE(xdatate, xNumEmp, xTipCol, xNumCad, 0, 0, 0, "", 0, 0, xConRis);

xRet = RetornaCodigoRiscosGHE("INICIO", xCodPRA, xCodGHE, xRevGHE, xCodAgt);

Enquanto (xRet = 1)

{ FCodAgt = xCodAgt; xRet = RetornaCodigoRiscosGHE("PROXIMO", xCodPRA, xCodGHE, xRevGHE, xCodAgt); }

Utilização: Gerador de Relatórios.

Disponível para os módulos: Segurança do Trabalho, Medicina Ocupacional.