Tempo aproximado para leitura: 00:02:00 min
Dúvida
Utilização do ponto de entrada GP070ANT.
Ambiente
TOTVS RH - TOTVS RH (Linha Protheus) - Gestão de Pessoal - Todas as versões.
Solução
01. Visão Geral
Ponto de Entrada que permite alterar a data-base das férias e a quantidade de dias de férias antecipadas no cálculo de Provisão de Férias.
Programa Fonte
GPEM070.PRX
Sintaxe
GP070ANT - Férias Antecipadas ( [ PARAMIXB[1] ], [ PARAMIXB[2] ], [ PARAMIXB[3] ] ) --> aDados
02. Exemplos de Utilização:
Exemplos:
User Function GP070ANT()
Local cFilP := AllTrim( TPR->PR_FILIAL )
Local cMatP := AllTrim( TPR->PR_MAT )
Local aSaveSRH := {}
Local aDados := {}
Local dDtBasF := ParamIxb[1] //Data Base Ferias
Local dDtPerAq := ParamIxb[2] //Data de Referencia para Calculo
//Se a database de ferias eh maior que a data de referencia
If dDtBasF > dDtPerAq
If cFilP == "01" .And. cMatP == "000015"
aSaveSRH := SRH->(GetArea())
dbSelectArea("SRH")
If SRH->( dbSeek( cFilP + cMatP ) ) //Se Inicio das ferias ocorreu antes de terminar o periodo aquisitivo.
If SRH->RH_DATAINI < SRH->RH_DBASEAT //Quantidade de dias de ferias + abono pecuniario do recibo
aAdd( aDados, 30 ) //Data de inicio do periodo aquisitivo das ferias
aAdd( aDados, CTOD("17/02/2008") )
Alert("Passou pelo Ponto de Entrada: GP070ANT")
Endif
Endif
RestArea(aSaveSRH)
EndIf
EndIf
Return(aDados)
03. Parâmetros
Outras Ações / Ações relacionadas
|
Nome
|
Tipo
|
Descrição
|
Default
|
Obrigatório
|
Referencia
|
|---|---|---|---|---|---|
| PARAMIXB[1] | Array of Record | Data Base de Férias. | |||
| PARAMIXB[2] | Array of Record | Data de Referência para cálculo. | |||
| PARAMIXB[3] | Array of Record | Dias de Férias Antecipadas. |
04. Retorno
aDados()
Vetor com dois elementos contendo no primeiro elemento a quantidade de dias de férias, e no segundo a data de início do período aquisitivo.
Exemplo:
aDados := { nDiasAnt, dData }
Onde:
nDiasAnt: Dias de férias antecipadas
dData: Data de início do período aquisitivo.
05. Tabelas Utilizadas:
-
Na execução do cálculo de Provisão, o sistema trabalha com a tabela temporária TPR que é alimentada com os dados do cadastro de Funcionários (SRA).
Portanto, esta tabela pode ser utilizada se houver a necessidade de avaliar algum funcionário durante o cálculo. Segue a relação dos principais campos da tabela TPR:
TPR->PR_FILIAL (Filial)
TPR->PR_MAT (Matrícula)
TPR->PR_NOME (Nome)
TPR->PR_CC (Centro de Custo)
TPR->PR_ADMISSA (Data de Admissão)
TPR->PR_DEMISSA (Data de Demissão)
Saiba Mais:
https://tdn.totvs.com/pages/viewpage.action?pageId=642630397
0 Comentários