Histórico da Página

01. DADOS GERAIS

Produto:

Solucoes_totvs

Solucao	TOTVS Prestadores de Serviços Terceirização

Solucoes_totvs_cross

SolucaoCross

Solucoes_totvs_parceiros

SolucaoParceiros

Solucoes_totvs_parceirosexptotvs

SolucaoParcsExpsTOTVS

Linha de Produto:

Linhas_totvs

Segmento	Distribuição
Region	Construção Projetos
Linha	Linha Protheus

Segmento:

Segmentos_totvs

Segmento	Serviços

Módulo:

Prestadores de Serviço

Função:

TECA351.PRW- Geração de Benefícios para o RH

Ticket:

9466483

Requisito/Story/Issue (informe o requisito relacionado) :

DSERSGS-9152

02. SITUAÇÃO/REQUISITO

Necessidade de um PE para alterar o cabeçalho e itens de benefícios.

03. SOLUÇÃO

Ponto de Entrada

Descrição:

Microsiga Protheus®

Localização:

Serviços

Programa Fonte:

TECA351.PRW

Função:

At351EnvRH, At351ExcRh

Parâmetros

Nome

Tipo

Descrição

aCabec

Array

Array para informações sobre o cabeçalho dos benefícios, segue estrutura por posição.

01 - Filial -

ACABEC[1][1]: "RA_FILIAL"

ACABEC[1][2]:" D MG 01"

ACABEC[1][3] :NIL

02 - Matrícula -

ACABEC[2][1]: "RA_MAT"

ACABEC[2][2]: "001075"

ACABEC[2][3]: NIL

03 - Período

ACABEC[3][1]: "CPERIODO"

ACABEC[3][2]: "202008"

ACABEC[3][3]: NIL

04 - Roteiro

ACABEC[4][1]: "CROTEIRO"

ACABEC[4][2]: "FOL"

ACABEC[4][3]: NIL

05 - Número do pagamento

ACABEC[5][1]: "CNUMPAGTO"

ACABEC[5][2]: "01"

ACABEC[5][3]: NIL

aItensFinal

Array

Array contendo os itens dos benefícios para inclusão:

01 - Filial

AITENSFINAL[1][1][1]: "RGB_FILIAL"

AITENSFINAL[1][1][2]: "01"

AITENSFINAL[1][1][3]: NIL

02 - Matrícula

AITENSFINAL[1][2][1]: "RGB_MAT"

AITENSFINAL[1][2][2]: "001075"

AITENSFINAL[1][2][3]: NIL

03 -Código da Verba

AITENSFINAL[1][3][1]: "RGB_PD"

AITENSFINAL[1][3][2]: "781"

AITENSFINAL[1][3][3]: NIL

04 - Tipo da Informação

AITENSFINAL[1][4][1]: "RGB_TIPO1"

AITENSFINAL[1][4][2]: "V"

AITENSFINAL[1][4][3]: NIL

05 - Valor

AITENSFINAL[1][5][1]: "RGB_VALOR"

AITENSFINAL[1][5][2]: 550

AITENSFINAL[1][5][3]: NIL

06 - Centro de Custo

AITENSFINAL[1][6][1]: "RGB_CC"

AITENSFINAL[1][6][2]: "000000000"

AITENSFINAL[1][6][3]: NIL

07 - Número do Pagamento

AITENSFINAL[1][7][1]: "RGB_SEMANA"

AITENSFINAL[1][7][2]: "01"

AITENSFINAL[1][7][3]: NIL

08 - Data de Referência

AITENSFINAL[1][7][1]: "RGB_DTREF"

AITENSFINAL[1][7][2]: 01/01/2021

AITENSFINAL[1][7][3]: NIL

Array contendo os itens dos benefícios para exclusão:

01 - Filial

AITENSFINAL[1][1][1]: "RGB_FILIAL"

AITENSFINAL[1][1][2]: "01"

AITENSFINAL[1][1][3]: NIL

02 - Matrícula

AITENSFINAL[1][2][1]: "RGB_MAT"

AITENSFINAL[1][2][2]: "001075"

AITENSFINAL[1][2][3]: NIL

03 - Período

AITENSFINAL[1][3][1]: "RGB_PERIOD"

AITENSFINAL[1][3][2]: "202008"

AITENSFINAL[1][3][3] :NIL

04 - Roteiro

AITENSFINAL[1][4][1]: "RGB_ROTEIR"
AITENSFINAL[1][4][2]: "001"
AITENSFINAL[1][4][3] :NIL

05 - Número do Pagamento

AITENSFINAL[1][5][1]: "RGB_SEMANA"

AITENSFINAL[1][5][2]: "01"

AITENSFINAL[1][5][3]: NIL

06 - Centro de Custo

AITENSFINAL[1][6][1]: "RGB_CC"

AITENSFINAL[1][6][2]: "000000000"

AITENSFINAL[1][6][3]: NIL

07 -Código da Verba

AITENSFINAL[1][7][1]: "RGB_PD"

AITENSFINAL[1][7][2]: "781"

AITENSFINAL[1][7][3]: NIL

08 - Tipo da Informação

AITENSFINAL[1][8][1]: "RGB_TIPO1"

AITENSFINAL[1][8][2]: "V"

AITENSFINAL[1][8][3]: NIL

09 - Valor

AITENSFINAL[1][9][1]: "RGB_VALOR"

AITENSFINAL[1][9][2]: 550

AITENSFINAL[1][9][3]: NIL

10 - Data de Referência

AITENSFINAL[1][7][1]: "RGB_DTREF"

AITENSFINAL[1][7][2]: 01/01/2021

AITENSFINAL[1][7][3]: NIL

nOpc

numérico

operação que está sendo realizada 3- Inclusão; 4- Alteração; 5- Exclusão

Retorno:

{aCabec, aItensFinal}

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24

#INCLUDE 'protheus.ch'
#INCLUDE 'parmtype.ch'
#INCLUDE "FWMVCDEF.CH"

User Function AT351Alt()

Local aCabec := PARAMIXB[1]// array do cabeçalho
Local aItensFinal := PARAMIXB[2]// array com os itens
Local nOpc := PARAMIXB[3]//

operação que está sendo realizada 3

operação que está sendo realizada 3-

Inclusão - 4 - Alteração 5 - Exclusão

Inclusão; 4- Alteração; 5- Exclusão
Local nI := 0

For nI := 1 to Len(aItensFinal)
If nOpc

If nOpc

== 3 .OR. nopc == 4

aItensFinal

aItensFinal [

1

nI][5][2] := 890 //alterando o valor do benefício

ElseIf nOpc

ElseIf nOpc == 5

aItensFinal

aItensFinal [

1

nI][9][2] := 890 //deletando o valor do /benefício

EndIf

EndIf
Next nI

Return {aCabec, aItensFinal}

Este exemplo demostrando a alteração do valor do benefício quando há integração com o RH, ao ser enviado para a rotina de lançamentos por funcionários (GPEA580).

O retorno desta função sempre deverá ser um array com duas posições, sendo a primeira o cabeçalho e a segunda posição os itens, caso o retorno não seja um array com duas posições, o processo pode ocorrer de forma indevida.

04. DEMAIS INFORMAÇÕES

Não há.

05. ASSUNTOS RELACIONADOS

Não há;

HTML

<style>
div.theme-default .ia-splitter #main {
    margin-left: 0px;
}
.ia-fixed-sidebar, .ia-splitter-left {
    display: none;
}
#main {
    padding-left: 10px;
    padding-right: 10px;
    overflow-x: hidden;
}

.aui-header-primary .aui-nav,  .aui-page-panel {
    margin-left: 0px !important;
}
.aui-header-primary .aui-nav {
    margin-left: 0px !important;
}

.aui-tabs.horizontal-tabs>.tabs-menu>.menu-item.active-tab a::after { 
	background: #FF9900; !important 
}

.menu-item.active-tab { 
	border-bottom: none !important; 
}

</style>

Árvore de páginas

Versões comparadas

Versão antiga 6

Nova versão Atual

Chave

01. DADOS GERAIS

02. SITUAÇÃO/REQUISITO

03. SOLUÇÃO

Ponto de Entrada

04. DEMAIS INFORMAÇÕES

05. ASSUNTOS RELACIONADOS