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.