Gestão de Pessoas - Manual do Usuário > Customizações > Funções > GerSolExa_ConsultarListaExames

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:

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.