GeraSolExames
Gera uma solicitação de exames para ser usada na regra da tela Gerar Solicitação e Consulta de Próximos Exames.
Sintaxe: GeraSolExames (Numero NumEmp, Numero CodFic, Numero CodExa, Numero DatSol, Numero DatRes, Numero OriExa, Numero CodOem, Numero OemExa, Numero CodAte, Alfa Motivo);
Parâmetros:
Nome | Tipo | Descrição |
NumEmp | Numérico | Código da Empresa. |
CodFic | Numérico | Código da Ficha Médica. |
CodExa | Numérico | Código do Exame. |
DatSol | Numérico | Data da Solicitação. |
DatRes | Numérico | Data do Resultado do Exame. |
OriExa | Numérico | Origem do Exame. |
CodOem | Numérico | Cadastro do Convênio. |
OemExa | Numérico | Entidade de Realização do Exame. |
CodAte | Numérico | Código do Atendente. |
Motivo | Alfa | Motivo para a tela de Consulta dos Próximos Exames. |
Tipo de Retorno: 0 = Gravou e 1 = Erro.
Retorno da regra no Cancel: 1 = Cancela o Exame Original e 0 = Continua com a Gravação.
Exemplo:
Definir Numero Retorno;
Retorno = GeraSolExames (R108RES.NumEmp, R108RES.CodFic, 1, R108RES.DatSol, R108RES.DatRes, R108RES.OriExa, R108RES.CodOem, R108RES.OemExa, R108RES.CodAte, "Teste Regra");
Utilização: Gerador de relatórios e editor de regras.