Regra por processo 94 - Exclusão de avaliação de conhecimento
Esta regra é executada na exclusão das avaliações de Conhecimento, sendo sempre executada antes da exclusão.
Recursos utilizados: É possível ler os campos de usuário da
tabela R077ACT(Avaliação de Conhecimentos-Avaliação).
Esta regra utiliza as variáveis de sistema TipoAvaGer e TipoAvaReg, conforme
segue:
- TipoAvaGer = 'C' - Inclusão coletiva, através da tela de geração de avaliações.
- TipoAvaGer = 'I' - Inclusão individual, através da tela de cadastro da avaliação.
- Quando a variável TipoAvaReg for igual a 'P', será possível alterar o registro da tabela R077APA.
- Quando a variável TipoAvaReg for igual a 'C', será possível alterar o registro da tabela R077ACT.
- Quando a variável TipoAvaReg for igual a 'E', será possível alterar o registro da tabela R079AEA.
Comando Cancel: É possível impedir a exclusão
através do uso do Cancel(1) na regra.
Exemplo:
/* Exemplo simples com o uso da variável de sistema TipoAvaReg e campo de
usuário. */
Definir Alfa xMsg;
Definir Alfa xCampoUsu;
Se (TipoAvaReg = 'C')
xCampoUsu = R077ACT.USU_TESTE;
Senao
Se (TipoAvaReg = 'P')
xCampoUsu = R077APA.USU_TESTE;
Senao
Se (TipoAvaReg = 'E')
xCampoUsu = R079AEA.USU_TESTE;
xMsg = "Campo de Usuário = " + xCampoUsu + "[&OK]";
Mensagem(Retorna, xMsg);
Utilização: Esta regra por processo está relacionada à rotina de exclusão de avaliações do CS e TR, tanto pela tela de cadastramento individual como pela tela de exclusão do lote na geração coletiva.