Este conteúdo não recebe atualizações, pois é referente a uma versão do sistema que foi descontinuada. Acesse a documentação da versão 6.10.3 aqui

CarregaExamesPrevistos

Esta função é utilizada no modelo da cópia (SMPC011.GER - Quadro III NR-7 Relatório Anual).
Esta função carrega os exames de todos os locais ou de uma abrangência, já a função CarregaExamesPrevistosLoc carrega os exames de um local por vez.

Observação

Esta função desconsidera os exames onde o campo Considera Quadro III estiver informado como "N - Não", na tela Exames (FR108EXA).

Sintaxe: CarregaExamesPrevistos(Numero xIni, Numero xFim, Alfa xOrd, Alfa xOri, Alfa xExa, Alfa xFic, Alfa xLoc, Alfa xCar, Alfa xTur, Alfa xTcl, Alfa xCad, Alfa xFil, Alfa xSit, Alfa xPPP, Alfa xConRea);

Parâmetros:

Nome Tipo Descrição
xIni Numérico Data inicial do período.
xFim Numérico Data final do período.
xOrd Alfa Tipo de ordenação e de agrupamento desejado. Determina o retorno do parâmetro "xDesExa" da função RetExaCarregados.
Posição 1 = Ordenação: 
'E' - Descrição do Exame;
'T' - Tipo de Origem do Exame;
'O' - Descrição da Origem;
'D' - Descrição do Exame + Descrição da Origem do Exame;
'X' - Descrição da Origem do Exame + Descrição do Exame.
Posição 2 = Agrupamento:
'C' - Código do Local;
'N' - Nome do Local.
Exemplo: "EC"; "EN"; "TC"; etc.
xOri Alfa Origem do exame.
xExa Alfa Abrangência de exame.
xFic Alfa Abrangência da ficha médica.
xLoc Alfa Abrangência de local.
xCar Alfa Abrangência de cargo.
xTur Alfa Abrangência de turno.
xTcl Alfa Abrangência de tipo de colaborador.
xCad Alfa Abrangência de cadastro.
xFil Alfa Abrangência de filial.
xSit Alfa Abrangência de situação.
xPPP Alfa Opção para carregar somente os Exames que são considerados no PPP
xConRea Alfa Indica se deve considerar ('S','N') os exames realizados no ano seguinte de acordo o período de referência passado na função. Quando for informado "N" irá desconsiderar os exames que estejam com Situação Exame = R-Realizado.

Exemplo:

xOriExa = "PD"; /* [P]eriódico e [D]emissional */
xAbrExa = EAbrExa;
xAbrFic = " ";
xAbrLoc = EAbrLoc;
xAbrCar = " ";
xAbrTur = " ";
xAbrTcl = " ";
xAbrCad = " ";
xAbrSit = " ";
xCodFil = R030FIL.CodFil;
xAbrFil = formatar (R030FIL.CodFil,"%4.0f");
EExaPPP = EExaPPP + "C"; /* Não irá listar os exames com situação cancelado */
xConRea = "S";
xTipOrdAgr = ETipOrd + ETipAgr;
/* ATENÇÃO: A carga dos exames REALIZADOS deve ser feita sempre ANTES da carga dos exames PREVISTOS */
CarregaExamesRealizados(xDatIni, xDatFim, xTipOrdAgr, xOriExa, xAbrExa, xAbrFic, xAbrLoc, xAbrCar, xAbrTur, xAbrTcl, xAbrCad, xAbrFil, xAbrSit, EExaPPP);
CarregaExamesPrevistos(xPrxIni, xPrxFim, xTipOrdAgr, xOriExa, xAbrExa, xAbrFic, xAbrLoc, xAbrCar, xAbrTur, xAbrTcl, xAbrCad, xAbrFil, xAbrSit, EExaPPP, xConRea);
xRet = RetExaCarregados("I", xTabOrg, xNumLoc, xNomLoc, xDesExa, xQtdRea, xQtdAno, xQtdPre);
RetornaCodLoc(xNumLoc, xCodLoc);

Utilização:

Esta função é específica do modelo SMPC011.GER do módulo SM (Segurança e Medicina) e é utilizada na seção Seleção. O retorno das informações carregadas nesta função é obtido através da função "RetExaCarregados".

Este artigo ajudou você?