Gestão de Pessoas - Manual do Usuário > Customizações > Regras > Regras por Processo > Regra por processo 44 - Alterar propostas salariais

Regra por processo 44 - Alterar propostas salariais

Esta regra por processo será chamada antes de alterar as propostas salariais. Permite utilização de campos de usuário.

Recursos utilizados: Disponibiliza a tabela R076PSA.

Comando Cancel: É possível cancelar o processo via regra utilizando cancel(1) por exemplo.

Exemplo:

xNumEmp = R076PSA.NumEmp;
xTipCol = R076PSA.TipCol;
xNumCad = R076PSA.NumCad;

definir data xDatRef;
xDatRef = R076PSA.DatAlt;

@ Verifica se o colaborador está demitido na data da proposta @
definir cursor CUR_R038AFA;
CUR_R038AFA.SQL "SELECT R038AFA.NUMCAD FROM R038AFA, R010SIT \

WHERE R038AFA.NUMEMP = :xNumEmp \
AND R038AFA.TIPCOL = :xTipCol \
AND R038AFA.NUMCAD = :xNumCad \
AND R038AFA.DATAFA = (SELECT MAX(AFA.DATAFA) FROM R038AFA AFA \

WHERE AFA.NUMEMP = R038AFA.NUMEMP \
AND AFA.TIPCOL = R038AFA.TIPCOL \
AND AFA.NUMCAD = R038AFA.NUMCAD \
AND AFA.DATAFA <= :xDatRef) \

AND R010SIT.CODSIT = R038AFA.SITAFA \
AND R010SIT.TIPSIT = 7";

CUR_R038AFA.AbrirCursor();
se (CUR_R038AFA.Achou) {
cancel(1);
}

Utilização:

Proposta de Alteração Salarial - CS: Propostas/Salários/Cadastro
Aprovar/Rejeitar Coletivamente Propostas de Salário - CS: Propostas/Salários/Aprovar/Rejeitar/Coletiva
Geração Coletiva de Proposta de Salário ou Cargo - CS: Propostas/Gerar
Lançamentos - CS: Propostas/Salários/Lançamento
Reajustar Estruturas - CS: Salários/Estrutura/Reajustar

Disponível para os módulos: CS.