Botão dentro de Outras ações

Olá Luscas, segue exemplo do PE MA415MNU(https://tdn.totvs.com/display/public/PROT/MA415MNU)

#Include 'Protheus.ch'
/*/{Protheus.doc} User Function MA415MNU
    (
    Ponto de entrada disparado antes da abertura do Browse, caso Browse inicial da rotina esteja habilitado, ou antes da apresentação do Menu de opções, caso Browse inicial esteja desabilitado.  
    Para habilitar ou desabilitar o Browse, entre na rotina, clique em Configurações/Browse Inicial e selecione
    a opção desejada:
    Sim - Habilitar Browse Inicial
    Não - Desabilitar Browse Inicial 
    Este ponto de entrada pode ser utilizado para inserir novas opções no array aRotina.
    ----------- Elementos contidos por dimensao ------------
    1. Nome a aparecer no cabecalho                           
    2. Nome da Rotina associada                                
    3. Usado pela rotina                                       
    4. Tipo de Transacao a ser efetuada                        
       1 - Pesquisa e Posiciona em um Banco de Dados           
       2 - Simplesmente Mostra os Campos                       
       3 - Inclui registros no Bancos de Dados                 
       4 - Altera o registro corrente                          
       5 - Remove o registro corrente do Banco de Dados        
       6 - Altera determinados campos sem incluir novos Regs
    )
    @type  Function
    @author Leandro Lemos
    @since 06/06/2023
    @version P12
    @param param_name, param_type, param_descr
    @return return_var, return_type, return_description
    @example
    (examples)
    @see (https://tdn.totvs.com/display/public/PROT/MA415MNU)
    /*/
User Function MA415MNU()
    Local aSub1     := {}
    Local aSub2     := {}

    aAdd(aRotina,{"Primeiro Nivel","u_primNivel()"      ,0,3,0,Nil})

    aAdd(aSub1,{"Rotina 1"  ,"u_rotina1()"              ,0,3,0,.F.})
    aAdd(aRotina, {"Sub Menu 1", aSub1, 0, 1})

    aAdd(aSub2,{"Rotina 2"                ,"u_rotina2()"  ,0,3,0,.F.})
    aAdd(aRotina, {"Sub Menu 2", aSub2, 0, 1})

Return aRotina