RetExaCarregadosGHE

Retorna os Exames Realizados/Anormais/Previstos. Esta função é específica do modelo SMPC011 e é utilizada na seção Subtitulo_Filial com os parâmetros xTipOpe = “I” e “P”. É utilizada também na seção Detalhe com o parâmetro xTipOpe = “P”.

Sua funcionalidade depende das funções CarregaExamesPrevistosGHE e CarregaExamesRealizadosGHE.

Sintaxe: RetExaCarregadosGHE(Alfa xTipOpe, Numero End xCodPRA, Alfa End xDesGHE, Alfa End xDesExa, Numero End xQtdRea, Numero End xQtdAno, Numero End xQtdPre);

Parâmetros:

Nome

Tipo

Descrição

xTipOpe

Alfa

Usado para acessar o início e os próximos registros carregados nas funções

CarregaExamesPrevistosLoc

e

CarregaExamesRealizadosLoc

. Seu valor pode ser “I” = Início e “P” = Próximo.

Retorno:

Nome

Tipo

Descrição

xCodPRA

Numérico

Retorno do PGR.

xDesGHE

Numérico

Retorno da Descrição do GHE

xDesExa

Alfa

Retorna a Descrição do Exame/Tipo da Origem/Descrição da Origem.

xQtdRea

Numérico

Retorno com a quantidade de exames realizados.

xQtdAno

Numérico

Retorno com a quantidade de exames anormais.

xQtdPre

Numérico

Retorno com a quantidade de exames previstos.

Exemplo:

<div class="Code"><p>Definir Alfa EAbrExa;</p><p>Definir Alfa EAbrLoc;</p><p>Definir Alfa EExaPPP;</p><p>Definir Alfa EConRea;</p><p>Definir Alfa ETipOrd;</p><p>Definir Alfa ETipAgr;</p><p>Definir Alfa xAbrFil;</p><p>Definir Alfa EAbrGHE;</p><p>Definir Alfa xDesGHE;</p><p>Definir Alfa xDesExa;</p><p>Definir Alfa xOriExa;</p><p>Definir Alfa xTipOrdAgr;</p><p>Definir Numero xCodPRA;</p><p>Definir Numero xQtdRea;</p><p>Definir Numero xQtdAno;</p><p>Definir Numero xQtdPre;</p><p>Definir Numero xRet;</p><p>xOriExa = "PD"; /* [P]eriódico e [D]emissional */</p><p>xAbrFil = formatar (R030FIL.CodFil,"%4.0f");</p><p>EExaPPP = EExaPPP + "C"; /* Não irá listar os exames com situação cancelado */</p><p>xTipOrdAgr = ETipOrd + ETipAgr;</p><p>MontaData(1, 1, 2015, xDatIni);</p><p>MontaData(1, 12, 2015, xDatFim);</p><p>MontaData(1, 1, 2015, xPrxIni);</p><p>MontaData(1, 12, 2015, xPrxFim);</p></div>

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).

**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

Este artigo ajudou você?