Adequação obrigatória das customizações que utilizam informações de médias (RH)

Tempo aproximado para leitura: 05 min

01. DADOS GERAIS

02. SITUAÇÃO/REQUISITO

A partir da release 12.1.25 o alias TRP (arquivo temporário onde são gravados valores de médias) deixará de ser utilizado, de modo que será preciso utilizar a variável pública cTBLXMED que contém o Alias utilizado pelas rotinas de médias. 

Esta alteração tem reflexos em alguns pontos de entrada, desta forma as customizações precisam ser ajustadas. Os principais pontos de entrada são: GPALTTRP, GPMEDTRP, GPMOVSRC, GPXCOMIS, GPAVOSMED, GPXMEDPD, GPMEDPER, GPMEDARR, GPDERSRD, GPMEDTAR.

Todos os pontos de entradas e/ou roteiros de cálculos que fizerem uso do alias TRP devem ser ajustados para uso da variável pública cTBLXMED (exemplificações abaixo).

03. EXEMPLOS

Exemplificaremos a seguir o uso do ponto de entrada GPALTTRP com ajuste do alias.

Abaixo demonstramos a customização no formato antigo, onde era referenciado o arquivo temporário de médias através do alias TRP:

User Function GPALTTRP()

Local aArea := GetArea()

If TRP->RP_PD $ "210/220/300" 
nSalMedHr := (((SRA->RA_SALARIO * 0.80) / 14) / 7.33)
ElseIf TRP->RP_PD == "207"
nSalMedHr := (((SRA->RA_SALARIO * 0.20) / 14) / 7.33)
EndIf

RestArea(aArea)

Return()

Agora, a mesma customização com a substituição do alias TRP pelo novo alias (cTBLXMED):

User Function GPALTTRP()

Local aArea := GetArea()

If (cTBLXMED)->RP_PD $ "210/220/300" 
nSalMedHr := (((SRA->RA_SALARIO * 0.80) / 14) / 7.33)
ElseIf (cTBLXMED)->RP_PD == "207"
nSalMedHr := (((SRA->RA_SALARIO * 0.20) / 14) / 7.33)
EndIf

RestArea(aArea)

Return()

As customizações em fórmulas, roteiros de cálculo ou Rdmakes que executam funções e utilizam informações de médias devem ser ajustadas com o mesmo procedimento, substituindo o alias TRP pelo novo alias (cTBLXMED) conforme exemplo citado.