Regra por processo 667 - Inserir reserva individual
Recursos utilizados: Esta regra será utilizada em:
- Treinamento/Reservas/Cadastro Individual. Esta opção de menu é disponibilizada de acordo com o campo Administração Reserva de Curso = 1-Por Participante em Diversos/Assinalamentos. Disponibilizado suporte a campo de usuário da R132RPA e todos os campos poderão ser alterados, exceto os da chave.
- Em Treinamento/Reservas/Geração Coletiva. Não foi disponibilizado suporte a campo de usuário. Nesta tela foi implementado o botão log para visualizar possíveis erros durante a geração coletiva.
- Em Treinamento/Reservas/Conversão. Não foi disponibilizado suporte a campo de usuário. Não será permitido alterar os campos da chave e os campos OriRes e CodUsu, via regra, pois estes campos são controlados pelo sistema.
- Nas Avaliações de Desempenho (CS/TR). Não foi disponibilizado suporte a campo de usuário. Não será permitido alterar os campos da chave e os campos OriRes e CodUsu, via regra, pois estes campos são controlados pelo sistema.
- No PDI - Plano de desenvolvimento individual em Avaliação/Consultar (CSWEB). Disponibilizado suporte a campo de usuário. Não será permitido alterar os campos da chave e os campos OriRes e CodUsu, via regra, pois estes campos são controlados pelo sistema.
- Em Treinamento/Diagnósticos/Cadastro. A regra será executada antes de inserir
reserva individual através do botão gerar reserva, disponível na pasta Curso
Aperfeiçoamento. Não foi disponibilizado suporte a campo de usuário. Não será
permitido alterar os campos da chave e os campos OriRes e CodUsu, via regra,
pois estes campos são controlados pelo sistema.
Em Orçamento/Orçamento - a regra será executada antes de inserir reserva individual - através do botão gerar reserva, disponível na pasta Curso Participantes. Não foi disponibilizado suporte a campo de usuário. Não será permitido alterar os campos da chave e os campos OriRes e CodUsu, via regra, pois estes campos são controlados pelo sistema.
Comando Cancel: Na execução das regras poderão ser utilizados os comandos: Cancel(1) e
Cancel(2).
Exemplo:
Definir Cursor Cur_R140NPC;
xOriRpp = OriRppRes;
@ Neste caso só irá fazer as consistências, se a regra for executada pela tela
de cadastro de reserva individual @
Se (xOriRpp = 1)
{
xCodCua = R132RPA.CodCua;
xNumEmp = R132RPA.NumEmp;
xTipCol = R132RPA.TipCol;
xNumCad = R132RPA.NumCad;
@ Verifica se o colaborador é desistente de alguma turma deste curso @
Cur_R140NPC.SQL "SELECT CODCUA FROM R140NPC WHERE CODCUA = :xCodCua AND
NUMEMP = :xNumEmp AND TIPCOL = :xTipCol AND NUMCAD = :xNumCad
AND SITCUA = 3";
Cur_R140NPC.AbrirCursor();
Se (Cur_R140NPC.Achou)
{
Mensagem(Erro, "Não é permitido fazer reservas para um
colaborador que já desistiu do curso!");
}
Cur_R140NPC.FecharCursor();
}
Observações:
- A função Mensagem(Erro, "") não deve ser utilizada quando a regra estiver sendo executada no ambiente web.
- Pela variável OriRppRes, permite identificar a tela que originou a chamada da regra.
Disponível para os módulos: TR e CS.