Histórico da Página
01. DADOS GERAIS
Produto: |
| ||||
---|---|---|---|---|---|
Linha de Produto: |
| ||||
Segmento: |
| ||||
Módulo: | Gestão de Pessoal (SIGAGPE) | ||||
Função: | Gestão Cadastro de Funcionários (GPEA010) Transferência ( GPEA011GPEA180) | ||||
País: | Brasil |
02. VISÃO GERAL
Ponto de Entrada que permite incluir mais opções de atalhos no Menu Principal da rotina de Gestão de Funcionários (aRotina).
03. RETORNO
...
Vetor contendo os atalhos adicionais a serem incorporados no menu da Rotina.
Estrutura do vetor:
...
Nome da rotina associada.
...
posicionado após a gravação dos registros de Funcionários. (GPEA010)
Também executado na rotina de Transferências (GPEA180), e da mesma forma posicionado após a gravação do registro do Funcionário (SRA), porém, com algumas diferenças.
Para o cenário de Transferência, o Ponto de Entrada só será executado caso a mesma tenha sido efetuada com sucesso, atendendo aos critérios abaixo:
- em casos de Transferência entre Filiais do mesmo grupo de empresas;
- ou em casos de mudança de Centro de Custos;
- ou em casos de mudança de Departamento;
- ou em casos de mudança de Matrícula;
- ou em casos de mudança de Processo;
- ou em casos de mudança de Posto, e MV_ORGCFG="1" (uso do módulo SIGAORG);
- ou em casos de mudança de Item/Classe de Valor.
- Além dos cenários acima citados, o Ponto de Entrada só será executado caso:
- ocorra a gravação de campos complementares, durante a Transferência;
- ou esteja sendo usado o módulo SIGAORG (MV_ORGCFG="1").
Obs.: a variável lGrava já estará com o valor .T. (verdadeiro), demonstrando que o cadastro do Funcionário foi gravado corretamente durante o processo da Transferência.
Parâmetros:
Nome | Tipo | Descrição |
---|---|---|
nOpc | Numérico | Determina qual o tipo de operação está sendo realizado no cadastro. ( 3=Inclusão; 4=Alteração; 5=Exclusão; 7=Cópia) |
lGrava | Lógico | Determina se a gravação do registro do Funcionário (SRA) foi realizado com sucesso. |
03. RETORNO
Não possui
...
.
04. EXEMPLO
Bloco de código | ||||||||||
---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||
#INCLUDE 'PROTHEUS.CH' User Function GPE11ROTGP010AGRV() Local nOpc aButtons := {}Paramixb[1] Local aSubMenulGrava := {} //Cria subMenu para um botão aSubMenu := { { "Teste 01" ,"u_subRot1" , 0 , 2, 0},; { "Teste 02" ,"u_subRot2" , 0 , 3, 0},; { "Teste 03" ,"u_subRot3" , 0 , 4, 0} } //Cria botao que chama a funcao diretamente aAdd( aButtons, { "Teste", "u_teste" ,0, 2,,.F. }) //Cria botao semelhante aos demais, com submenus aadd( aButtons, { "Teste Submenu", aSubMenu , 0 , 2} ) Return aButtons // Funções de usuário para apresentação de mensagens User Function Teste() Alert ("Teste PE GPE11ROT para criação de menu simples!" ) Return User Function subRot1() Alert ("Teste 01 do PE GPE11ROT para criação de subMenu!" ) Return User Function subRot2() Alert ("Teste 02 do PE GPE11ROT para criação de subMenu!" ) Return User Function subRot3() Alert ("Teste 03 do PE GPE11ROT para criação de subMenu!" )Paramixb[2] // Testando se a gravação deu certo If lGrava // Testando a chamada de alteração de Funcionário. If FWIsInCallStack("GPEA010") If nOpc==3 Alert ("Teste de Inclusão do PE GP010AGRV chamado pelo Cadastro de Funcionários!" ) ElseIf nOpc==4 Alert ("Teste de Alteração do PE GP010AGRV chamado pelo Cadastro de Funcionários!" ) ElseIf nOpc==5 Alert ("Teste de Exclusão do PE GP010AGRV chamado pelo Cadastro de Funcionários!" ) ElseIf nOpc==7 Alert ("Teste de Cópia do PE GP010AGRV chamado pelo Cadastro de Funcionários!" ) Endif Endif // Testando a chamada via Transferência de Funcionário. If FWIsInCallStack("GPEA180") Alert ("Teste PE GP010AGRV chamado pela Transferência de Funcionários!" ) Endif Endif Return |