Regra por processo 593 - Incluir receita médica
Esta regra será executada ao incluir uma receita médica.
Recursos utilizados: Na regra, os registros podem ser alterados diretamente através do comando 'TABELA.CAMPO', sendo que está disponível os campos da tabela R110MRC para leitura ou alteração dos valores e campos de usuário.
Exemplo:
Definir Alfa xNumRec;
Definir Alfa xMsg;
IntParaAlfa(R110MRC.NumRec, xNumRec);
xMsg = "Inseriu receita " + xNumRec + "(Regra de inserir receita médica)";
Se (R110MRC.NumRec <> 2)
Mensagem(Retorna, xMsg);
Senao
Cancel(1); /* Se for a receita de código 2 cancela regra */
Utilização: Esta regra por processo está relacionada aos procedimentos do atendimento médico no Medicina, e será chamada ao efetuar processamento na tela Medicina > Atendimentos > Atendimento - botão Receita e Medicina > Atendimentos > Receita Médica.