CarregaExamesRealizadosGHE
Esta função carrega todos os exames realizados pelos colaboradores, conforme as abrangências definidas, agrupando as informações por GHE.
Observação
Esta função desconsidera os resultados de exames onde o campo Considera Quadro III estiver informado como "N - Não", na tela Resultados Exames (FR108RES).
Sintaxe: CarregaExamesRealizadosGHE(Numero xIni, Numero xFim, Alfa xOrd, Alfa xOri, Alfa xExa, Alfa xLoc, Alfa xFil, Numero xPRA, Alfa xGHE, Alfa xPPP_xSitExa);
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. |
xOri | Alfa | Origem do exame. |
xExa | Alfa | Abrangência de exame. |
xLoc | Alfa | Abrangência de local. |
xFil | Alfa | Abrangência de filial. |
xPRA | Alfa | Abrangência de PPRA. |
xGHE | Alfa | Abrangência de GHE. |
xPPP_xSitExa | Alfa | Opção para carregar somente os Exames que são considerados no PPP, e também pode ser informado o valor 'C' para que não sejam listado exames com situação 'C-Cancelado'. Ex.: xPPP_xSitExa = 'NC' - Neste caso o 'N' não irá carregar somente os Exames que são considerados no PPP e o 'C' irá desconsiderar os exames de situação Cancelado. Sendo obrigatório apenas o valor a ser considerado no PPP, que é 'S' ou 'N'. |
Exemplo:
Definir Alfa EAbrExa;
Definir Alfa EAbrLoc;
Definir Alfa EExaPPP;
Definir Alfa EConRea;
Definir Alfa ETipOrd;
Definir Alfa ETipAgr;
Definir Alfa xAbrFil;
Definir Alfa EAbrGHE;
Definir Alfa xDesGHE;
Definir Alfa xDesExa;
Definir Alfa xOriExa;
Definir Alfa xTipOrdAgr;
Definir Numero xCodPRA;
Definir Numero xQtdRea;
Definir Numero xQtdAno;
Definir Numero xQtdPre;
Definir Numero xRet;
xOriExa = "PD"; /* [P]eriódico e [D]emissional */
xAbrFil = formatar (R030FIL.CodFil,"%4.0f");
EExaPPP = EExaPPP + "C"; /* Não irá listar os exames com situação cancelado */
xTipOrdAgr = ETipOrd + ETipAgr;
MontaData(1, 1, 2015, xDatIni);
MontaData(1, 12, 2015, xDatFim);
MontaData(1, 1, 2015, xPrxIni);
MontaData(1, 12, 2015, xPrxFim);
Utilização: Esta função é utilizada no modelo SMPC011 do módulo SM (Segurança e Medicina), na seção Subtitulo_Filial (Evento Depois Imprimir). O retorno das informações carregadas nesta função é obtido através da função "RetExaCarregadosGHE".
Observação:A carga dos exames realizados deve ser feita sempre antes da carga dos exames previstos:
CarregaExamesRealizadosGHE(xDatIni, xDatFim, xTipOrdAgr, xOriExa, EAbrExa, EAbrLoc, xAbrFil, xCodPRA, EAbrGHE, EExaPPP);
CarregaExamesPrevistosGHE(xPrxIni, xPrxFim, xTipOrdAgr, xOriExa, EAbrExa, EAbrLoc, xAbrFil, xCodPRA, EAbrGHE, EExaPPP, EConRea);
xRet = RetExaCarregadosGHE("I", xCodPRA, xDesGHE, xDesExa, xQtdRea, xQtdAno, xQtdPre).
Disponível para os módulos:Segurança e Medicina