1 %RegisteredObject,TECH.Iterator 0 DOM.ProdRes.Reservatie list 1 DOM.ProdRes.Reservatie 1 %String 1 Reservatie:DOM.ProdRes.Reservatie,ProductID:%String 1 1 %Status Returns true if the iteration has more elements. %Boolean %CacheString 1 0) { Set Reservatie = ..TeVerwerken.GetAt(..TeVerwerken.Count()) Do ..TeVerwerken.RemoveAt(..TeVerwerken.Count()) Set KindReservatieIterator = Reservatie.GeefKindReservatieIterator() While (KindReservatieIterator.HasNext()) { Do ..TeVerwerken.Insert(KindReservatieIterator.Next()) } If (Reservatie.GeefProductID() = ..ProductID) { Set ..Volgende = Reservatie } Else { Do ..BepaalVolgende() } } ]]>