Versões comparadas

Chave

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

...

Bloco de código
titleFórmula - Provisão de 1/3 de férias e 1/3 de abono pecuniário
MV (0,'2021','B099') + MV (0,'2021', 'B199') - MV(0, '2021', '6005') - (0, '2021', '6015') - MV(0, '2021', '6006') - MV(0, '2021', '6016') - MV(0, '2021', 'P020') - MV (0,'2021', 'P199')

...

Ao fazer o lançamento dos eventos para a Folha, incluído o evento acima, o mesmo foi calculado:

/* rever a fórmula abaixo para abono*/

Para pagamento de Férias Abono Pecuniário em dobro, criamos um exemplo de sugestão de fórmula, que verifica se o valor pendente a se quitado já ultrapassou dois período vencidos de férias, considerando o primeiro dia da competência atual:

Bloco de código
titleFórmula - Pagamento de Férias de 1/3 de Abono Pecuniário Dobro
DECL FIMPERAQUIS1;
DECL DATAPGTOFERIAS;
DECL DATAINICIOFERIAS;
DECL VALOREVENTO;
DECL CH;
DECL QUANTDIAS;

SETVAR (CH, '');

SE EXECSQL('DTFIMPERVENC_1') = 1;
ENTAO
REPITA
SE RESULTSQL('DTFIMPERVENC_1','CHAPA') = CHAPA
ENTAO
SETVAR (CH, CHAPA);
SETVAR (FIMPERAQUIS1, RESULTSQL('DTFIMPERVENC_1','FIMPERAQUIS'));
SETVAR (DATAPGTOFERIAS, RESULTSQL('DTFIMPERVENC_1','DATAPAGTO'));
SETVAR (DATAINICIOFERIAS, RESULTSQL('DTFIMPERVENC_1','DATAINICIO'));
SETVAR (VALOREVENTO, RESULTSQL('DTFIMPERVENC_1','VALOR'));
FIMSE
ATE PROXREGSQL('DTFIMPERVENC_1') = FALSO;
FIMSE;
SE CH <> CHAPA
ENTAO
0

SENAO

SETVAR (QUANTDIAS, SUBTRAIDATAS(MTDATA(01,MES,ANO),FIMPERAQUIS1));

SE QUANTDIAS > 365 E (DATAPGTOFERIAS >= MTDATA(2827,04,2021) E DATAPGTOFERIAS <= MTDATA(2625,08,2021))
ENTAO
VALOREVENTO * ARRED(QUANTDIAS/365);
FIMSE;
FIMSE;

Associando a fórmula em um evento:

Image Removed

Lançado o evento de férias em dobro, para um funcionário onde o pagamento foi feito após o vencimento de dois períodos aquisitivos: 

Image Removed

Image Added


Lançamento usando o processo de Diferença de Férias

Criamos a fórmula para pagamento de 1/3 de férias:

...

...

titleFórmula - Pagamento de 1/3 de Férias

...

SE PROCESSO = 'DIFERENCA_FERIAS'
ENTAO
VALORCODCALCULO(40)
SENAO
0
FIMSE

Associar a fórmula no evento de diferença e inserir o mesmo em Eventos Adicionais Globais de férias. O evento deve ser do tipo provento e ter prioridade 70. 

Image Removed

Image Removed

Executar o processo de diferença de Férias, marcando a opção dissídio não:

Image RemovedImage Added

Após executar a diferença, foi calculado o evento adicional global com o valor do 1/3 devido:

Image Removed

 /*Validar estas dicas*/

...

iconfalse
titleObservação

...

de

...

CC 56, lançando a diferença no CC 176:

Image Added

...


 /*Validar estas este cálculo*/

...