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 CT100MNU 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 CTB100MNU()
Local aParam := PARAMIXB[1] //Contem opções original do menu

//adiciona botão no menu
aAdd(aParam,{"Copia","U_TESTE" ,0,9})

Return aParam

Observação

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

Evento de chamada do Ponto de Entrada 
If ExistBlock("CTB100MNU")
	aRotina := ExecBlock("CTB100MNU",.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