Histórico da Página

#INCLUDE 'TOTVS.CH'
#INCLUDE 'PROTHEUS.CH'
  
User Function MA650BUT()
	Local aRotNew := {}
	Local nX      := 0
	//Não declarar o array aRotina

	//Neste exemplo irá retirar //Adiciona um novo item no menu principal do MATA650aAdd(aRotinao botão da opção Encerrar Ordem
	For nX := 1 to Len(aRotina)
    	If aRotina[nX,1] != 'Encerrar Ordem'
        	Aadd(aRotNew, {aRotina[nX,1],aRotina[nX,2],aRotina[nX,3],aRotina[nX,4],aRotina[nX,5],aRotina[nX,6]})
      	EndIf
    Next nX
	
	//Neste exemplo irá adicionar o botão da opção Texto do Item
    aAdd(aRotNew,{'Texto do Item','Nova_funcao( )',0,5,0,nil })


Return aRotinaaRotNew