Regra por processo 314 - Após efetivar proposta salarial
Este recurso não está disponível no Gestão de Pessoas | HCM GO UP. Saiba mais.
Esta regra por processo será executada após efetivar a proposta salarial. Estarão disponíveis os campos da tabela R076PSA e também os campos de usuário desta tabela.
Esta regra não permite cancelar a efetivação da proposta. Para isso deve-se utilizar a regra por processo 559 - Antes Efetivar Proposta Salarial.
Exemplo:
/* Busca qual era o último salário do colaborador antes da efetivação da proposta
e grava no campo de usuário R076PSA.USU_SALANT */
definir data xDatEfe;
definir data xDatRef;
xNumEmp = R076PSA.NumEmp;
xTipCol = R076PSA.TipCol;
xNumCad = R076PSA.NumCad;
xDatEfe = R076PSA.DatEfe;
xDatRef = xDatEfe - 1;
RetSalEmp(xNumEmp, xTipCol, xNumCad, xDatRef);
xValSal = SalEmp;
definir alfa xUpdate;
SQL_Criar(xUpdate);
SQL_DefinirComando(xUpdate, "UPDATE R076PSA SET USU_SALANT = :ValSal \
WHERE NUMEMP = :NumEmp \
AND TIPCOL = :TipCol \
AND NUMCAD = :NumCad \
AND DATALT = :DatEfe");
SQL_DefinirFlutuante(xUpdate, "ValSal", xValSal);
SQL_DefinirInteiro(xUpdate, "NumEmp", xNumEmp);
SQL_DefinirInteiro(xUpdate, "TipCol", xTipCol);
SQL_DefinirInteiro(xUpdate, "NumCad", xNumCad);
SQL_DefinirData(xUpdate, "DatEfe", xDatEfe);
SQL_AbrirCursor(xUpdate);
SQL_FecharCursor(xUpdate);
SQL_Destruir(xUpdate);
Utilização: Tela de Efetivação de Propostas de Salário (CS: Propostas/Salários/Efetivar)
Disponível para o módulo: CS.