Flow.Offerte,DOM.EC.OL.Verlanglijst 1 LijnVisitor 0 Verlanglijst 1 %ArrayOfObjects 1 %Boolean %Boolean 1 Verlanglijst:Verlanglijst,MakeGroup:%Boolean,Verbose:%Boolean=0 1 1 %Status Product:LijnProductGA ignore",! ]]> Product:LijnProduct Tekst:LijnTekst GroepKey:%String GroepLijn Groep=", Groep1,! Do ..Groepen.SetAt(Groep1, GroepNaam) // We zetten de eerste lijn in een subgroep om groep nesting te testen Set Groep = ##class(GroepLijn).%New(GroepNaam_"sub"_$RANDOM(100)) Do Groep1.VoegToe(Groep) } Quit Groep ]]>