Regra por processo 243 - Excluir curso aperfeiçoamento
Esta regra é executada ao excluir um curso de aperfeiçoamento em Tabelas/Cursos/Cursos Aperfeiçoamento. Na regra, os registros podem ser consultados diretamente através do comando 'TABELA.CAMPO', sendo que estão disponíveis os campos da tabela R128CUA (Cursos Aperfeiçoamento) para leitura, inclusive campo de usuário.
Ejemplo:
Definir Cursor Cur_R128ASS;
xCodAss = R128CUA.CodAss;
Cur_R128ASS.SQL "SELECT ASSIDI FROM R128ASS WHERE CODASS = :xCodAss";
Cur_R128ASS.AbrirCursor();
Se (Cur_R128ASS.Achou)
{
Se (Cur_R128ASS.AssIdi = "S")
Mensagem(Erro, "Não é permitido excluir cursos cujo assunto seja Idiomas.");
}
Cur_R128ASS.FecharCursor();
Disponível para os módulos: Módulos que possuem o cadastro de cursos de aperfeiçoamento (CS, RS, SM e TR).
English
Español


