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	Descripción
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	Fecha	Retorna a data da solicitação do exame

Ejemplo:

xTem = GerSolExa_ConsultarListaExames("I", xNumEmp, xCodFic, xCodExa, xDatSol);
Enquanto (xTem = 0) {
Se ((xNumEmp = 1) e (xCodFic = 1010003))
{ GerSolExa_RemoverExameLista(); }
xTem = GerSolExa_ConsultarListaExames("P", xNumEmp, xCodFic, xCodExa, xDatSol);
}

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