Histórico da Página

01. DADOS GERAIS

Produto:

Solucoes_totvs_cross

SolucaoCross	TOTVS RH

Linha de Produto:

Linhas_totvs

Linha	Linha Protheus

Segmento:

Segmentos_totvs

Segmento	RH

Módulo:

Gestão de Pessoal (SIGAGPE)

Função:

Gestão de Funcionários (GPEA011)

País:

Brasil

Ponto de Entrada que permite incluir mais opções de atalhos no Menu Principal da rotina de Gestão de Funcionários (aRotina).

Tipo	Conteúdo
Vetor	Vetor contendo os atalhos adicionais a serem incorporados no menu da Rotina.

Estrutura do vetor:

Posição	Conteúdo
1	Nome que aparecerá no Cabeçalho da Rotina.
2	Nome da rotina associada.
3	Reservado.
4	Tipo de transação a ser efetuada.
5	Nível de acesso.
6	Habilita menu funcional.

Bloco de código

#INCLUDE

Portuguese

#INCLUDE

'PROTHEUS.CH'



User Function GPE11ROT()


Local aButtons := {}


Local aSubMenu := {}

 


//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!" )


Return