I dont know what Im missing here but its not work at all with $QUERY and @ indirection. Still is undefined even I converted local varaible into process private global.

Method setLayout(layout) As %Status
{
	MERGE ^||layout = layout

	SET node = ""
	FOR
	{
		SET node = $QUERY(@^||layout)
		QUIT:node=""
		W node,"",@node,!

	}


	QUIT $$$OK
}

Obviously I was still trying to apply pattern from $ORDER . This one works.

SET node = $QUERY(^||layout(""))

	WHILE (node '= "")
	{
		W !, node
		SET node = $QUERY(@node)
	}

That approuch I was trying, but I got always an error of undefined so I gave up.

ClassMethod test(array)
{
    SET value = ""

    FOR
    {
        SET value = $QUERY(@array)
        QUIT:value=""

        W value,"=",@array,!
    }

    QUIT
}

DO ##class(intranet.util.xml).test(.a)

<UNDEFINED>test+4^intranet.util.xml.1 *array