Histórico da Página

...

SE PROCESSO="FERIAS"
ENTAO 0
SENAO
SE PROCESSO = 'DIFERENCA_FERIAS' E DISSIDIO = 0
ENTAO
VALORCODCALCULO(39)
SENAO
0
FIMSE

SE PROCESSO="FERIAS"
ENTAO 0
SENAO
SE PROCESSO = 'DIFERENCA_FERIAS' E DISSIDIO = 0
ENTAO
VALORCODCALCULO(56)
SENAO
0
FIMSE

Image Removed Image Removed

Cadastro do evento código de cálculo 39 e 56:

...

SE PROCESSO="FERIAS"'FERIAS' OR (PROCESSO = 'DIFERENCA_FERIAS' E DISSIDIO = 1)
ENTAO VALORCODCALCULO(39)
SENAO
SE PROCESSO = 'DIFERENCA_FERIAS' E DISSIDIO = 0
ENTAO VFER('B198')
SENAO
0
FIMSE

SE PROCESSO="FERIAS"'FERIAS' OR (PROCESSO = 'DIFERENCA_FERIAS' E DISSIDIO = 1)
ENTAO VALORCODCALCULO(39)/3
SENAO
SE PROCESSO = 'DIFERENCA_FERIAS' E DISSIDIO = 0
ENTAO VFER('B199')
SENAO
0
FIMSE

Incluir um evento do tipo Base de Cálculo com a fórmula acima para ser lançado no recibo de férias. O mesmo pode ser informado como evento adicional:

Image Modified Image Modified

Passo 3 - Cadastrar/Calcular as Férias. Recibo de Férias após o cálculo das Férias lançou os eventos de base e não lançou os eventos de provento referente ao pagamento de abono:

...

No parametrizado, na menu Férias | Fórmulas, inserimos uma fórmula que retorna o valor do 1/3 de férias devido, o valor do abono pecuniário e o valor de 1/3 de abono pecuniário. No nosso exemplo colocamos no campo para somar com férias vencidas:

Image RemovedImage Added 

Na fórmula utilizada, usamos a variável MV que retorna a soma do evento de base de cálculo B099, B198 e B199 pago durante o ano de 2021 e abatemos os eventos de proventos que serão usados para pagar o abono pecuniário, 1/3 de abono pecuniário e 1/3 de férias quando for o caso (Folha ou Rescisão). Assim, quando o pagamento for efetuado o mesmo não será mais somado na provisão:

(MV(0,'2021','B099') + MV(0,'2021', 'B199')+ MV(0,'2021','B198')) - (MV(0, '2021', '6005') + MV(0, '2021', '6015') + MV(0, '2021', '6006') + MV(0, '2021', '6016') + MV(0, '2021', 'P020') + MV(0,'2021', 'P199') + MV(0, '2021', 'P198')

Ao gerar a provisão, o valor pago de férias no mês foi informado e o valor retornado pelo fórmula somado ao campo de provisão de férias vencidas.

...

Após o pagamento do Abono pecuniário e 1/3 de abono pecuniário que será exemplificado no tópico abaixo, a provisão não considerou o valor do Abono pecuniário e 1/3 de abono pecuniário:

Image RemovedImage Added

Pagamento do Abono pecuniário e 1/3 de abono pecuniário

O pagamento de do abono pecuniário e 1/3 de abono pecuniário, deverá  deverão  ocorrer até dia 20/12, devendo as tributações ocorrer na competência/caixa em que o pagamento for efetuado. 

Outro ponto levantado foi que, cCaso a realização da remuneração de do pagamento do abono pecuniário e 1/3 de abono pecuniário não seja pago sejam pagos antes de vencer o próximo período aquisitivo, irá caracterizar como férias em dobro, devido aquele período não ter sido quitado.

No modulo da Folha de Pagamento, o mesmo pode ser feito usando evento calculado por fórmula e lançado diretamente no envelope do funcionário, através dos processos disponibilizados pelo folha, como Grupo de Eventos, Entrada de dados, Eventos Programados, etc.

Abaixo, exemplificaremos o pagamento com a Sugestão de Fórmula:

lançamento direto no envelope - Grupo de Eventos

Fórmula para pagamento de Abono Pecuniário e 1/3 de Fériasabono pecuniário. Usando a função MV abaixo irá considerar o evento de Base de Cálculo lançado no envelope acima durante o ano de 20202021:

MV (0, '2021', 'B198')

MV (0, '2021', 'B199')

Criado o evento de provento e inserido a fórmula no campo de valor:

Image Added

Image AddedImage Removed

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

Image Removed

Pagamento de Abono pecuniário em dobroImage Added

Para pagamento de Abono Pecuniário Férias 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. A Consulta SQL está exemplificada no Pagamento de Abono Pecuniário e 1/3 de Abono Pecuniário Vencidas neste link.

Fórmula para pagamento de Abono Pecuniário em Dobro:

DECL FIMPERAQUIS1;
DECL DATAPGTOFERIAS;
DECL DATAINICIOFERIAS;
DECL VALOREVENTO;
DECL CH;
DECL QUANTDIAS;
 
SETVAR (CH, '');
 
SE EXECSQL('DTFIMPERVENC_2') = 1;
ENTAO
REPITA
SE RESULTSQL('DTFIMPERVENC_2','CHAPA') = CHAPA
ENTAO
SETVAR (CH, CHAPA);
SETVAR (FIMPERAQUIS1, RESULTSQL('DTFIMPERVENC_2','FIMPERAQUIS'));
SETVAR (DATAPGTOFERIAS, RESULTSQL('DTFIMPERVENC_2','DATAPAGTO'));
SETVAR (DATAINICIOFERIAS, RESULTSQL('DTFIMPERVENC_2','DATAINICIO'));
SETVAR (VALOREVENTO, RESULTSQL('DTFIMPERVENC_2','VALOR'));
FIMSE
ATE PROXREGSQL('DTFIMPERVENC_2') = FALSO;
FIMSE;
SE CH <> CHAPA
ENTAO
0
SENAO
 
SETVAR (QUANTDIAS, SUBTRAIDATAS(MTDATA(01,MES,ANO),FIMPERAQUIS1));
 
SE QUANTDIAS > 365 E (DATAPGTOFERIAS >= MTDATA(28,04,2021) E DATAPGTOFERIAS <= MTDATA(25,08,2021))
ENTAO
VALOREVENTO * ARRED(QUANTDIAS/365);
FIMSE;
FIMSE;

Associando a Formula acima em um evento de provento:

Image Added

Fórmula para pagamento de 1/3 de Abono Pecuniário em 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
SENAO 
SETVAR (QUANTDIAS, SUBTRAIDATAS(MTDATA(01,MES,ANO),FIMPERAQUIS1));
 
SE QUANTDIAS > 365 E (DATAPGTOFERIAS >= MTDATA(2728,04,2021) E DATAPGTOFERIAS <= MTDATA(25,08,2021))
ENTAO
VALOREVENTO * ARRED(QUANTDIAS/365);
FIMSE;
FIMSE;

Associando a fórmula em um evento:Image RemovedFórmula acima em um evento de provento:

Image Added

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, através do Grupo de eventos:

Image Added

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

Para o processo de diferença de férias, o sistema calcula os eventos de Código de Cálculo 39 e 56. Neste caso não é necessário criar uma fórmula para que o mesmo seja calculado. Usando o processo de diferença e marcando a opção 'Não' para dissídio o sistema irá calcular e lançar os valores de devidos nos eventos de Código de Cálculo 59 e 176:

Image Added

Após executar, os eventos com os valores de Abono de Férias e 1/3 de abono de férias foram lançados:

Image Added

Calculo de Diferença de Férias - Dissídio

Para o calculo de diferença a fórmula sugerida não calcula os eventos de Código de Cálculo 39 e 56 quando é um cálculo por dissídio, pois caso a fórmula não tratasse o tipo de cálculo, será lançado todo o valor integral do que não foi pago no recibo de férias. Desta forma, na fórmula do eventos de base, é feito o cálculo somente da diferença devida. 

Para os casos onde teve evento de base sugerido lançados no recibo de férias para armazenar o valor do Abono pecuniário e 1/3  abono pecuniário de férias que será pago até dia 20/12, deverá ser informado um evento de diferença que irá armazenar o valor. Iremos da uma sugestão que atenda os usuários que lançaram o evento de base no recibo de férias e informaram o evento no parametrizador.

No evento B198, incluir o evento para ser lançado do evento de diferença, também como base:

Image Added

No evento B199, incluir o evento para ser lançado do evento de diferença, também como base:

Image Added

Ao calcular a diferença para um funcionário que teve o evento B198 e B1988 lançado no recibo de férias, no calculo da diferença o mesmo é considerado e calculado a diferença, lançando os evento de BD97 e BD98 com os valores da diferença:

Image Added