Histórico da Página

Conforme a MP1046 Art. 7º Para as 8º, A conversão de 1/3 do período de férias  de que trata o caput em abono pecuniário dependerá do empregador, hipótese em que o pagamento poderá ser efetuado até a data de que tratar o art. 7º: O adicional de um terço relativo às férias concedidas durante o estado de calamidade pública período a que se refere o art. 1º , o empregador poderá optar por efetuar o pagamento do adicional de um terço de férias após poderá ser pago após a sua concessão, a critério do empregador, até a data em que é devida a gratificação natalina prevista no art. 1º da Lei nº 4.749, de 12 de agosto de agosto de 1965. Com relação ao abono

Para atender a determinação do Art 8º, o Módulo TOTVS Folha de Pagamento disponibiliza o recurso de fórmulas que pode ser configurado pelo usuário para que não calculo 1/3 de férias abono pecuniário caso seja opção do empregador.

Abaixo iremos exemplificar como proceder:

Cálculo de Férias

Passo 1 - Criar a fórmula conforme o exemplo abaixo e vincular no evento de código de cálculo 4039 e 56:

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(4056)
SENAO
0
FIMSE

...

Passo 2 - Cadastro do evento código de cálculo 4039 e 56:

Image Removed

Passo 3 - Recibo de Férias Após o cálculo das Férias

Image Removed

Passo 4: Criar um evento de Base de Cálculo que calcula 1/3 de férias do evento lançado no envelope de pagamento:

Exemplo de fórmula:

(C('0041')+C('0042'))/3

Image Removed

Passo 5: Após lançar as férias, lançar o evento do envelope de pagamento para que o mesmo armazene o valor devido do 1/3 de férias para que seja considerado para pagamento futuramente:

Image Added Image Added

Passo 2: Criar a Fórmula para incluir em um evento de base para armazenar o valor devido de Abono pecuniário e 1/3 de abono, que será pago posteriormente.

SE PROCESSO='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' 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 Added Image Added

Image Added

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:

Image Added

Image Added

Passo 4: Lançar Férias. Os eventos de base também será lançado no envelope do funcionário:

Image AddedImage Removed

Provisão de Férias

Após o pagamento das férias, o período aquisitivo é fechado. E mesmos naqueles casos onde não são fechados, o processo de provisão considera somente como devido os avos restantes, não contabilizando o passado. No caso do abono pecuniário e 1/3 de abono pecuniário que não foi pago junto com as férias, o sistema não entende que este existe este debito não contabilizado provisionando o valor devido.

Para solucionar este cenário gerando a provisão com o valor devido, poderá usar o recuso disponibilizado o módulo Folha de Pagamento disponibiliza no parametrizador o recurso de  fórmulas, que permite informar uma fórmula para adicionar no valor de férias vencidas ou proporcionais no final da geração da provisão.

Abaixo exemplificarmos uma sugestão de Fórmula para que seja somada na provisão de Férias:Provisão do funcionário antes da demissão. O mesmo tinha 12 avos de direito com valor total de 2666,67

Calculamos e lançamos as férias para o funcionário conforme o exemplo acima. Foi lançado somente os dias de férias e não lançamos o adicional de Fériasabono pecuniário, 1/3 de abono pecuniário e 1/3 de férias. Para facilitar a identificação do adicional devido, inserimos o evento de base de cálculo no envelope do funcionário com o valor do 1/3 de fériasos respectivos valores.

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 2020 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,'2020'2021', 'B199')+ MV(0,'2021','B099B198')) - (MV(0, '20202021', '6005') -+ MV(0, '2021', '6015') + MV(0, '20202021', '6006') - MV + MV(0, '2021', '6016') + MV(0, '20202021', '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.

Image RemovedImage Added

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 fériasabono 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 fériasabono 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 não seja pago de abono pecuniário não 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, '20202021', 'B099B199')

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

Image Added

Image RemovedImage Added

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

Image RemovedImage Added

Para pagamento de 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(2228,0304,20202021) E DATAPGTOFERIAS <= MTDATA(2225,0708,20202021))
ENTAO
VALOREVENTO * ARRED(QUANTDIAS/365);
FIMSE;
FIMSE;

Associando a fórmula Formula acima 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

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

de provento:

Image Added

Fórmula Criamos a fórmula para pagamento de 1/3 de fériasAbono Pecuniário em Dobro:

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 Removed

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

Image Removed

...

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(28,04,2021) E DATAPGTOFERIAS <= MTDATA(25,08,2021))
ENTAO
VALOREVENTO * ARRED(QUANTDIAS/365);
FIMSE;
FIMSE;

Associando a Fó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.

Passo 1:  Alterar a fórmula de base sugerida para o evento B099:

SE PROCESSO = 'FOLHA'
ENTAO
(C('0041')+ C('0042'))/3
SENAO
SE PROCESSO = 'FERIAS' OR PROCESSO = 'DIFERENCA_FERIAS'
ENTAO
VALORCODCALCULO(40)
FIMSE

...

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

Image Removed

Passo 3: Inserir o evento de B099 no parametrizador, Férias | Eventos Adicionais Globais:

Image Added

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

Image AddedImage Removed

Ao calcular a diferença para um funcionário que teve o evento B099 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 o os evento de B100 com o valor da diferença:

Image Removed  Image Removed

Se o evento de base B099 não foi calculado no recibo, mas somente no envelope após o lançamento das férias, neste caso sugerimos inserir uma fórmula no evento de diferença (B100) que irá recalcular o mesmo na segunda fase do processo de cálculo de diferença, considerando o evento de diferença lançado no envelope. No exemplo abaixo, a fórmula considera o evento de CC 45 e divide por 3:

Image Removed

No envelope original o evento B099 foi inserido através do grupo de eventos:

Image Removed

No cálculo da diferença, como o mesmo foi colocado no parametrizador e associado um evento de diferença que contém a fórmula, na segunda fase do processo o mesmo foi recalculado:

Image Removed Image Removed

BD97 e BD98 com os valores da diferença:

Image Added