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

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

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 lCTB120MDF
	aRotina := ExecBlock("CTB120MDF", .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 / TESTE