Gestão de Pessoas - Manual do Usuário > Customizações > Regras > Regras por Processo > Regra por processo 625 - Alterar histórico de aperfeiçoamento

Regra por processo 625 - Alterar histórico de aperfeiçoamento

Esta regra será executada ao Alterar Histórico de Aperfeiçoamento.

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

Exemplo:

@ --------------------------------------------- @
@| Regra Alterar Histórico de Aperfeiçoamento |@
@ --------------------------------------------- @

Definir Alfa Texto;

Se (OriHisApe = 1)                /* Verifica se a regra foi chamada pela tela de Curso Aperfeiçoamento - Aperfeiçoamento */
inicio
      Texto = "Histórico";
      NumEmp = r124hcr.NumEmp;
      TipCol = r124hcr.TipCol;
      NumCad = r124hcr.NumCad;
     CodCua = r124hcr.CodCua;
     SeqHcr = r124hcr.SeqHcr;
     PerIni = r124hcr.PerIni;
    Cancel(1);                           /*cancela a regra*/
fim
senao
   Se (OriHisApe = 2)                        /* Verifica se a regra foi chamada pela tela de Cadastro Histórico de Curso */
   inicio
         Texto = "Histórico Geral";
         NumEmp = r124hcr.NumEmp;
         TipCol = r124hcr.TipCol;
         NumCad = r124hcr.NumCad;
        CodCua = r124hcr.CodCua;
        SeqHcr = r124hcr.SeqHcr;
        PerIni = r124hcr.PerIni;
        r124hcr.SitCua = 1;                  /* Altera valor do campo por Regra */
fim;

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