GerSolExa_ConsultarListaExames

Permite percorrer a lista de exames a serem apresentados na tela Gera Solicitação/Agendamento, chamada a partir da tela Geração de Solicitação de Exames (FRGERSOL).

Sintaxe: GerSolExa_ConsultarListaExames(Alfa TipOpe, Numero End NumEmp, Numero End CodFic, Numero End CodExa, Data End DatSol);

Parâmetros:

Nome

Tipo

Descrição

TipOpe

Alfa

Tipo de Operação: “I - Início” ou “P - Próximo”

NumEmp

Numérico

Retorna o código da empresa

CodFic

Numérico

Retorna o código da ficha médica

CodExa

Numérico

Retorna o código do exame

DatSol

Data

Retorna a data da solicitação do exame

Exemplo:

<div class="Code"><p>xTem = GerSolExa_ConsultarListaExames("I", xNumEmp, xCodFic, xCodExa, xDatSol);<br></br>Enquanto (xTem = 0) {<br></br> Se ((xNumEmp = 1) e (xCodFic = 1010003))<br></br> { GerSolExa_RemoverExameLista(); }<br></br> xTem = GerSolExa_ConsultarListaExames("P", xNumEmp, xCodFic, xCodExa, xDatSol);<br></br>}</p></div>

Utilização: Regra vinculada ao processo 885 - Geração de Solicitação de Exames.

Este artigo ajudou você?