...
<tablePane 
	id="tpMenu" 
	tableName="wrk.Menu" 
	valueColumn="ID"
	pageSize="20" 
	useSnapshot="true" 
	caption="Меню" 
	onselectrow='zenPage.Select(zenThis.getValue("ID"))'
	ondblclick='zenPage.Run(zenThis.getValue("ID"));' 
	sql="Select ID,Name From wrk.Menu Order by Prio"
>
	...
</tablePane>
...
<fieldSet legend="Переместить">
	<button 
		id="bUp" 
		caption="Выше" 
		onclick="zenPage.Up();" 
		controlClass="btn"
	/>
	<button 
		id="bDown" 
		caption="Ниже" 
		onclick="zenPage.Down();" 
		controlClass="btn"
	/>
</fieldSet>
...
/// Элемент вверх
Method Up() [ Language = javascript ]
{
	var cn=zenPage.getComponentById('cnMenu')
	var id = cn.getModelId();
	if (id=='') {
		alert('Нужно выбрать элемент...')
		return
	}
	zenPage.cUp(id)
	zenPage.getComponentById('tpMenu').executeQuery();
}

/// Перемещение элемента вверх
Method cUp(Id) [ ZenMethod ]
{
	s sql="Select ID From wrk.Menu as c Where c.Prio = (Select max(a.Prio) From wrk.Menu as a Where a.Prio < (Select b.Prio From wrk.Menu as b Where b.ID=?))"
	s ors=##class(%ResultSet).%New("%DynamicQuery:SQL")
	s ok=ors.Prepare(sql)
	s:ok ok=ors.Execute(Id)
	if ors.Next() {
		d UP
	}
	d ors.Close()
	q ok
UP // Перемещение элемента
	s id=ors.Get("ID")
	q:id=""
	d ##class(wrk.Menu).SwapPrio(id,Id)
	q
}
...

/// Обмен приоритетами
ClassMethod SwapPrio(Id1 As %String, Id2 As %String) As %String
{
	s o1=##class(wrk.Menu).%OpenId(Id1)
	s o2=##class(wrk.Menu).%OpenId(Id2)
	s val=o1.Prio
	s o1.Prio=o2.Prio
	s o2.Prio=val
	d o1.%Save()
	d o1.%Close()
	d o2.%Save()
	d o2.%Close()
}

var temp = zenPage.cUp(id);

if (temp ||  1 = 1 ) zenPage.getComponentById('tpMenu').executeQuery();

zenPage.getComponentById('tpMenu').executeQuery();

/// Перемещение элемента вверх
Method cUp(Id) As %String [ ZenMethod ]
...
/// Перемещение элемента вверх
Method cDown(Id) As %String [ ZenMethod ]

var val=zenPage.cDown(id)
if (val== 1 ){
	zenPage.getComponentById('tpMenu').executeQuery();
}