Histórico da Página
01. DADOS GERAIS
Produto: |
| ||||
---|---|---|---|---|---|
Linha de Produto: |
| ||||
Segmento: |
| ||||
Módulo: | Gestão de Pessoal (SIGAGPE) | ||||
Função: | Cadastro de Funcionários (GPEA010) Transferência (GPEA180) | ||||
País: | Brasil |
02. VISÃO GERAL
Ponto de Entrada posicionado após a gravação dos registros de Funcionários. (GPEA010)
...
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 GP010AGRV() Local nOpc :=Paramixb[1] Local lGrava :=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 |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas