Regra por processo 594 - Alterar receita médica

Esta regra será executada ao alterar 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.

<div class="Code"><p>Definir Alfa xNumRec;<br></br>Definir Alfa xMsg;<br></br><br></br>IntParaAlfa(R110MRC.NumRec, xNumRec);<br></br>xMsg = "Alterou receita " + xNumRec + "(Regra de alterar receita médica)";<br></br><br></br>Se (R110MRC.NumRec &#x3C;> 3)<br></br>Mensagem(Retorna, xMsg);<br></br>Senao<br></br>Cancel(1); /* Se for a receita de código 3 cancela regra */<br></br><br></br>R110MRC.Usu_Teste = 9; </p></div>

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.