CarregaExamesPrevistosDep
Esta função não é utilizada em nenhum modelo da cópia. Fica disponível para ser utilizada em algum modelo específico de cliente que deseja considerar também os exames dos dependentes.
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: CarregaExamesPrevistosDep(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)
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. 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. |
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 */
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);
CarregaExamesPrevistosDep(xPrxIni, xPrxFim, xTipOrdAgr, xOriExa, xAbrExa,
xAbrFic, xAbrLoc, xAbrCar, xAbrTur, xAbrTcl, xAbrCad, xAbrFil, xAbrSit, EExaPPP);
xRet = RetExaCarregados("I", xTabOrg, xNumLoc, xNomLoc, xDesExa, xQtdRea,
xQtdAno, xQtdPre);
RetornaCodLoc(xNumLoc, xCodLoc);
Utilização: Esta função pode ser utilizada em modelos específicos, na seção Seleção, somente no gerador de relatórios. O retorno das informações carregadas nesta função é obtido através da função "RetExaCarregados".