I know about multidimensional properties. But at this pint they aren't even listed as an option in the Wizard. And I'm not sure they are that useful for modern applications. I would guess their use was to transition applications from hierarchical model to object model. 

> Hi @Iryna Mykhailova and welcome to the Tutorials Contest.

Why, thank you 

Both %SQLQuery and %Query are class queries. As for the Studio - I do believe it's the easiest way for people who start working with IRIS to get acquainted with the technology!

You are right, I forgot to keep in mind that I have a parameter for the second example. I will correct it to reflect that I'm looking for people older than the exact age. Thanks for the heads-up!

Before:

Query GetAllOlderThan(Age As %Integer = 65) As %Query(ROWSPEC = "Name:%Name,Age:%Integer") [ SqlProc ]
{
}

ClassMethod GetAllOlderThanExecute(ByRef qHandle As %Binary, Age As %Integer = 65) As %Status
{
    set qHandle = $lb($random(200), 0)
    Quit $$$OK
}

ClassMethod GetAllOlderThanClose(ByRef qHandle As %Binary) As %Status [ PlaceAfter = GetAllOlderThanExecute ]
{
    set qHandle = ""
    Quit $$$OK
}

ClassMethod GetAllOlderThanFetch(ByRef qHandle As %Binary, ByRef Row As %List, ByRef AtEnd As %Integer = 0) As %Status [ PlaceAfter = GetAllOlderThanExecute ]
{
    if $ListGet(qHandle, 2) = $ListGet(qHandle, 1)
    {
       Set Row = ""
       set AtEnd = 1
    } else
    {
       Set Row = $Lb(##class(%PopulateUtils).Name(), ##class(%PopulateUtils).Integer(18, 90))
       set $list(qHandle, 2) = $list(qHandle, 2) + 1
    }
    Quit $$$OK
}

After:

Query GetAllOlderThan(Age As%Integer = 65) As%Query(ROWSPEC = "Name:%Name,Age:%Integer") [ SqlProc ]
{
}

ClassMethod GetAllOlderThanExecute(ByRef qHandle As%Binary, Age As%Integer = 65) As%Status
{
    set qHandle = $lb($random(200), 0, Age)
    Quit$$$OK
}

ClassMethod GetAllOlderThanClose(ByRef qHandle As%Binary) As%Status [ PlaceAfter = GetAllOlderThanExecute ]
{
    set qHandle = ""Quit$$$OK
}

ClassMethod GetAllOlderThanFetch(ByRef qHandle As%Binary, ByRef Row As%List, ByRef AtEnd As%Integer = 0) As%Status [ PlaceAfter = GetAllOlderThanExecute ]
{
	if$ListGet(qHandle, 2) = $ListGet(qHandle, 1)
	{
		Set Row = ""set AtEnd = 1
	} else
	{
    	Set Row = $Lb(##class(%PopulateUtils).Name(), ##class(%PopulateUtils).Integer($ListGet(qHandle, 3), 90))
    	set$list(qHandle, 2) = $list(qHandle, 2) + 1
	}
    Quit$$$OK
}

}

Hmm, probably InterSystems folks were doing something. Works OK now.

I know, but it's not a question of examples, it's more a question of appreciation. There was another one interesting quiz question that actually prompted me to write this idea, I just don't remember what it was about. So, I think it would bring pleasure to authors of quiz questions to see that others like their work.

Thanks, I told her to reach out to WRC.

@Wan-Ju.Yu thanks a lot for looking into it.