Regra por processo 628 - Alterar histórico de formação

Esta regra será executada ao Alterar Histórico de Formação.

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 R124HCF para leitura ou alteração dos valores, salvo campos chaves onde não poderão ser alterados.

Ejemplo:

@ --------------------------------------------- @
@| Regra Alterar Histórico de Formação |@
@ --------------------------------------------- @

Definir Alfa Texto;

Se (OriHisFor = 1) /* Verifica se a regra foi chamada pela tela de Curso Aperfeiçoamento - Formação*/
inicio
Texto = "Histórico";
NumEmp = r124hcf.NumEmp;
TipCol = r124hcf.TipCol;
NumCad = r124hcf.NumCad;
CodCuf = r124hcf.CodCuf;
SeqHcf = r124hcf.SeqHcf;
PerIni = r124hcf.PerIni;
Cancel(1); /*cancela a regra*/
fim
senao
Se (OriHisFor = 2) /* Verifica se a regra foi chamada pela tela de Cadastro Histórico de Curso */
inicio
Texto = "Histórico Geral";
NumEmp = r124hcf.NumEmp;
TipCol = r124hcf.TipCol;
NumCad = r124hcf.NumCad;
CodCuf = r124hcf.CodCuf;
SeqHcf = r124hcf.SeqHcf;
PerIni = r124hcf.PerIni;
r124hcf.SitCuf = 1; /* Altera valor do campo por Regra */
orden;

Utilização: Esta regra por processo está relacionada aos Histórico de Formação do colaborador, e será chamada ao Excluir um registro nas seguintes telas: Curso Aperfeiçoamento - Guia Formação (Módulos: CS,RS,TR), Cadastro Histórico de Curso (Módulos: CS,TR) e Copiar Históricos (Módulo: TR)