Histórico da Página

#INCLUDE "totvs.ch"

/*/{Protheus.doc} User Function F667USERMENU
    (long_description)
    @type  Function
    @author Cassio S Dias
    @since 29/11/2023
    @version 12.1.2310
    @return aBotoesPe, ARRAY
    @see (links_or_referenceshttps://tdn.totvs.com/x/NH4pM)
    /*/
    
User Function F667USERMENU() as ARRAY

	Local aBotoesPe as ARRAY

    aBotoesPe   :=  {}
	
    Aadd(aBotoesPE,{'MENSAGEM',{|| u_TestMenu() },'Mais um Botão'}) //Adicionado um botão na EnchoiceBar

Return aBotoesPe



user Function TestMenu()

	Local cMsg as Character 
    cMsg := "Passou pelo Ponto de Entrada FA666MENU"

	MSGINFO( cMsg, "Novo botao do P.E FA666MENU" )

Return Nil