English
Español
CarregaExamesPrevistosGHE
Esta função carrega e totaliza todos os exames previstos, conforme as abrangências definidas, agrupando as informações por GHE.
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: CarregaExamesPrevistosGHE(Numero xIni, Numero xFim, Alfa xOrd, Alfa xOri, Alfa xExa, Alfa xLoc, Alfa xFil, Numero xPRA, Alfa xGHE, 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. |
| 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 PGR. |
| xGHE | Alfa | Abrangência de GHE. |
| 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:
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
English
Español
