Linha RM

Atalhos

Páginas filhas
  • MP 936/1.045 - Redução Proporcional de Jornada de Trabalho e Salário

Versões comparadas

Versão antiga 34

changes.mady.by.user Shirley Martins Muniz

Gravado em

comparado com

Nova versão 35

changes.mady.by.user Shirley Martins Muniz

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Bloco de código
titleFórmula - Referência de dias Trabalhados considerando a Jornada Reduzida
DECL QUANTDIAS;
DECL QUANTDIASRETORNO;
DECL QUANTMES;
DECL DATARETORNO;
DECL JORMENSAL;
DECL PERC;
SETVAR (QUANTDIAS, SUBTRAIDATAS(TABFUNC('DTACORDOBEM','D'),MTDATA(01,MES,ANO)));
SETVAR (QUANTMES , TABFUNC('MESESDURACAOBEM','I'));
SETVAR (DATARETORNO, (TABFUNC('DTACORDOBEM','D')+ (QUANTMES*30)));
SETVAR (QUANTDIASRETORNO, SUBTRAIDATAS(MTDATA(30,MES,ANO), DATARETORNO));
SETVAR (JORMENSAL, TABFUNC('JORNADAMENSAL','I'));
SETVAR (PERC, TABFUNC('PERCENTUALREDUCAOBEM', 'I'));

SE QUANTDIAS > 0;
(((JORMENSAL - (JORMENSAL * (PERC/100))) + (((JORMENSAL * (PERC/100))/ ND) * QUANTDIAS)) /(JORMENSAL/ND))
SENAO
SE QUANTDIASRETORNO > 0 E (DATARETORNO > MTDATA(01,MES,ANO) E DATARETORNO < MTDATA(30,MES,ANO));
(((JORMENSAL - (JORMENSAL * (PERC/100))) + (((JORMENSAL * (PERC/100))/ ND) * QUANTDIASRETORNO)) /(JORMENSAL/ND))
SENAO
SE QUANTDIAS < 0 E QUANTDIASRETORNO < 0;
(JORMENSAL - (JORMENSAL * (PERC/100))) /(JORMENSAL/ND)
SENAO
JORMENSAL/(JORMENSAL/ND)
A fórmula foi inserida no evento de CC 2, campo fórmula de referência: 
...
 Bloco de código
titleFórmula - Referência de horas Trabalhados considerando a Jornada Reduzida
DECL QUANTDIAS;
DECL QUANTDIASRETORNO;
DECL QUANTMES;
DECL DATARETORNO;
DECL JORMENSAL;
DECL PERC;
SETVAR (QUANTDIAS, SUBTRAIDATAS(TABFUNC('DTACORDOBEM','D'),MTDATA(01,MES,ANO)));
SETVAR (QUANTMES , TABFUNC('MESESDURACAOBEM','I'));
SETVAR (DATARETORNO, (TABFUNC('DTACORDOBEM','D')+ (QUANTMES*30)));
SETVAR (QUANTDIASRETORNO, SUBTRAIDATAS(MTDATA(30,MES,ANO), DATARETORNO));
SETVAR (JORMENSAL, TABFUNC('JORNADAMENSAL','I'));
SETVAR (PERC, TABFUNC('PERCENTUALREDUCAOBEM', 'I'));

SE QUANTDIAS > 0 E (TABFUNC('DTACORDOBEM','D') > MTDATA(01,MES,ANO) E TABFUNC('DTACORDOBEM','D') < MTDATA(30,MES,ANO));
((JORMENSAL - (JORMENSAL * (PERC/100))) + (((JORMENSAL * (PERC/100))/ ND) * QUANTDIAS))
SENAO
SE QUANTDIASRETORNO > 0 E (DATARETORNO > MTDATA(01,MES,ANO) E DATARETORNO < MTDATA(30,MES,ANO));
((JORMENSAL - (JORMENSAL * (PERC/100))) + (((JORMENSAL * (PERC/100))/ ND) * QUANTDIASRETORNO)) 
SENAO
SE QUANTDIAS < 0 E QUANTDIASRETORNO < 0;
JORMENSAL - (JORMENSAL * (PERC/100))
SENAO
JORMENSAL
...