У меня так

G_Z 14.02.2007 19:50 / 14.02.2007 20:12

Для вывода деревьев и списков всегда есть два метода:
printTree и printTreeXML, к примеру.
Первый обрамляет корневыми тэгами и вызывает внутри них второй, а тот, в свою очередь печатает всё без абрамления.

Пример:

@printTree[hData]
$result[
	<tree>
		^printTreeXML[$hData](0)
	</tree>
]
@printTreeXML[hData;iParentID][tItems]
$tItems[$hData.$iParentID]
$result[
	^tItems.menu{
		<item id="$tItems.id">
			$tItems.text
			^printTreeXML[$hData]($tItems.id)
		</item>
	}
]

---