Utilizando a Função PAR no TOTVS RM Labore

A variável PAR apresenta funcionalidades interessantes, que combinada às Fórmulas e Consultas SQL, produzem grandes agregados nas rotinas da Folha de Pagamento, como exemplo: total de colaboradores do sexo feminino; total de colaboradores que foram admitidos no mês; complemento do histórico dos lançamentos contábeis e etc.

No TOTVS Folha de Pagamento, esta função retorna a seguinte expressão: mm-aaaa-cc-pp e seu retorno é do tipo string (alfanumérico):

mm - mês de competência;
aaaa - ano de competência;
cc - caixa da competência;
pp - período da competência.

Exemplo: 08-2013-01-00, onde:

Fórmula para Admitidos no Mês

Se AnoDt ( TabFunc ( 'DataAdmissao', 'D' ) ) = VAL(Substr(PAR,4,4)) e 
     MesDt ( TabFunc ( 'DataAdmissao', 'D' ) ) = VAL(Substr(PAR,1,2)) Entao
   1
Senao
   0
FimSe

Fórmula para Demitidos no Mês

Se AnoDt ( TabFunc ( 'DataDemissao', 'D' ) ) = VAL(Substr(PAR,4,4)) e
     MesDt ( TabFunc ( 'DataDemissao', 'D' ) ) = VAL(Substr(PAR,1,2)) Entao
   1
Senao
   0
FimSe

 

Um grande abraço a todos e até o próximo post.