RetExaCarregados

Função que retorna os Exames Realizados/Anormais/Previstos.

Esta função é específica do modelo SMPC011 e é utilizada na seção Seleção com o parâmetro xTipOpe = “I”. É utilizada também na seção Detalhe com o parâmetro xTipOpe = “P”. A vantagem desta função em relação a sua antecessora (RetExaCarregadosLoc) é que a antiga carrega os exames de um local por vez, e esta carrega todos os locais ou de uma abrangência.

Sua funcionalidade depende das funções “CarregaExamesPrevistos” e “CarregaExamesRealizados”.

Sintaxe: RetExaCarregados(Alfa xTipOpe, Numero End xTabOrg, Numero End xNumLoc, Alfa End xNomLoc, Alfa End xDesExa, Numero End xQtdRea, Numero End xQtdAno, Numero End xQtdPre)

Parâmetros:

Nome

Tipo

Descrição

xTipOpe

Alfa

Parâmetro 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.

xTabOrg

Numérico

Retorno do Organograma.

xNumLoc

Numérico

Retorno do Local onde o exame foi realizado.

xNomLoc

Alfa

Retorno do Nome do Local onde o exame foi realizado.

xDesExa

Alfa

Parâmetro do tipo Alfa que 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.

Tipo do Retorno: Preenche as variáveis xTabOrg, xNumLoc, xNomLoc, xDesExa, xQtdRea, xQtdAno e xQtdPre.

Exemplo:

<div class="Code"><p>/* = Seção Seleção = */</p><p>xRet = RetExaCarregados("I", xTabOrg, xNumLoc, xNomLoc, xDesExa, xQtdRea, xQtdAno, xQtdPre);</p><p>Se (xRet &#x3C;> 0)</p><p> Cancel(1);</p><p></p><p>/* = Seção Detalhe = */</p><p>Enquanto (xRet = 0)</p><p>{</p><p> AlteraControle("DEDesOri","Descrição",xDesExa);</p><p> FANroExa = xQtdRea;</p><p> FANroAno = xQtdAno;</p><p> FANroPrx = xQtdPre;</p><p> ListaSecao("Adicional_1");</p><p> xRet = RetExaCarregados("P", xTabOrg, xNumLoc, xNomLoc, xDesExa, xQtdRea, xQtdAno, xQtdPre);</p><p>}</p></div>

Utilização: Gerador de relatórios.

Este artigo ajudou você?