RetornaCodigoRiscosGHE
Função que retorna as principais informações dos laudos dos perigos/fatores de risco 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 | Descrição |
---|---|---|
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 PGR. |
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 perigo/fator de risco. |
Exemplo:
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.