Linha Microsiga Protheus

Árvore de páginas

CONTEÚDO

  1. Visão Geral
  2. Parâmetros
  3. Exemplo de Utilização
  4. Opção na rotina
    1. Outras Ações / PE


01. VISÃO GERAL


Esse documento visa demostrar um exemplo do ponto de entrada CT040MNU que permite adicionar novas opções de menu ao browser da rotina.

Observação


Este ponto de entrada é chamado no momento da criação dos menus padrões da rotina.

02. PARÂMETROS


Parâmetro

Tipo

Descrição

Obrigatório

PARAMIXB[1]ArrayNome do menuSim

03. EXEMPLO DE UTILIZAÇÃO


Exemplo do Ponto de Entrada 
#Include 'Protheus.ch'
#Include 'FWMVCDef.ch'

User Function CT040MNU()
Local aMenu := Paramixb[1] //Contem opçoes original do menu

//adiciona botão no menu
aAdd(aMenu, {"Copia" , U_COPIA(),0 ,7} )

Return aMenu

Observação

O ponto de entrada retorna a variável aMenus contendo todas as opções do menu.

Evento de chamada do Ponto de Entrada 
If ExistBlock("CT040MNU")
	aRotina := ExecBlock("CT040MNU",.F.,.F.,{aRotina})
Endif

04. OPÇÃO NA ROTINA


Opção inserida via ponto de entrada exibida no menu de opções:

Outras Ações / Copia