| Produto: | TOTVS RH
|
|---|---|
| Linha de Produto: | Linha Protheus |
| Segmento: | RH |
| Módulo: | GESTÃO DE PESSOAS (SIGAGPE) |
| Função: | INTEGRAÇÃO FOLHA (GPEM009) |
| Ticket: | |
| Requisito/Story/Issue (informe o requisito relacionado) : | DRHPAG-44774 |
| Pacotes | 12.1.17:https://r.totvs.io/p/1013814 ; 12.1.23:https://r.totvs.io/p/1013815 ; 12.1.25:https://r.totvs.io/p/1013816 ; 12.1.27:https://r.totvs.io/p/1013817 ; |
Necessidade da gravação de campo na tabela RGB ao efetuar a integração de benefícios para a folha.
Criação do ponto de entrada GPM19RGB na integração dos roteiros BEN, PLS, RTF, VAL, VEX, VRF e VTR para permitir o preenchimento de qualquer campo da tabela RGB ao efetuar a integração.
O ponto de entrada é executado dentro do bloco de gravação da tabela RGB e será possível alterar a gravação do conteúdo de qualquer campo da tabela RGB. Não há necessidade de lock e unlock porque o ponto já será executado no bloco de gravação da tabela.
O ponto de entrada recebe 5 parâmetros:
#INCLUDE "PROTHEUS.CH"
User Function GPM19RGB()
Local aAreaSRA := SRA->( GetArea() )
Local cRotInt := PARAMIXB[1]//Roteiro
Local cFilSRA := PARAMIXB[2]//Filial do funcionáriop
Local cMatSRA := PARAMIXB[3]//Matrícula do funcionário
Local cPerFol := PARAMIXB[4]//Período
Local cSemFol := PARAMIXB[5]//Semana
SRA->( dbSetOrder(1) )
If cRotInt $ "BEN/PLA/RTF/VAL/VEX/VRF/VTR" .And. SRA->( dbSeek( cFilSRA+cMatSRA ) ) .And. SRA->RA_TPCONTR == "3"
RGB->RGB_CONVOC := 'XPTO'
EndIf
ALERT("Passou pelo GPM19RGB")
RestArea(aAreaSRA)
Return
Não se aplica
Não se aplica