Gestão de Pessoas - Manual do Usuário > Customizações > Regras > Regras por Processo > Regra por processo 553 - Consistir resultado de exame

Regra por processo 553 - Consistir resultado de exame

A regra por processo 553 tem a finalidade de validar/consistir a entrada de dados na tela do cadastro de resultados de exames. Esta regra será ativada sempre que mudar o registro ou ao sair da tela, o que poderá acontecer pelo botões de navegação, ou ao digitar outro exame e sair dos campos chaves ou pelo botão Sair.

Recursos utilizados: Estão disponíveis para esta regra por processo as seguintes tabelas:

R108RES, R110FIC, R034FUN - Somente quando a ficha médica (R110FIC.TipAtn) for do tipo Colaborador ou Dependente.
R036DEP - Somente quando a ficha médica (R110FIC.TipAtn) for do tipo Dependente.
R122BEX - Somente quando a ficha médica (R110FIC.TipAtn) for do tipo candidato.

Exemplo: A regra determina que alguns campos não poderão ficar sem informação. Ao selecionar outro exame, será apresentada uma mensagem de crítica da regra que impedirá a saída do cadastro atual, forçando o correto preenchimento do cadastro ou simplesmente continuar.

Definir Alfa xStr;
Se(R108RES.OriExa = 2)
{
Se((R110FIC.NumCad = 3) e (R110FIC.TipAtn = 1))
{
xStr = R034FUN.NomFun;
Mensagem(Retorna,"Colab 3, usou R034FUN");
}
Se((R110FIC.NumCad = 24) e (R110FIC.TipAtn = 2))
{
xStr = R034FUN.NomFun;
xStr = R036DEP.NomDep;
Mensagem(Retorna,"Colab 24/Dep 1, usou R034FUN e R036DEP");
}
Se((R110FIC.NumCan = 2) e (R110FIC.TipAtn = 4))
{
xStr = R122CEX.NomCan;
Mensagem(Retorna,"Cand 2, usou R122CEX");
}
}

Utilização:

Telas no SM: Medicina > PCMSO > Resultados e Medicina > Audiometria > Resultados.
Telas do RS: Colaboradores > Exames e Candidatos > Exames.

Disponível para os módulos: SM e RS.