Index: vhUnitTest/APPS/EC/Winkelkar/WinkelkarControleur/ControleerWinkelkar/LBX/TestTIPONUitfasering.cls.xml
===================================================================
diff -u -r40593 -r40730
--- vhUnitTest/APPS/EC/Winkelkar/WinkelkarControleur/ControleerWinkelkar/LBX/TestTIPONUitfasering.cls.xml	(.../TestTIPONUitfasering.cls.xml)	(revision 40593)
+++ vhUnitTest/APPS/EC/Winkelkar/WinkelkarControleur/ControleerWinkelkar/LBX/TestTIPONUitfasering.cls.xml	(.../TestTIPONUitfasering.cls.xml)	(revision 40730)
@@ -18,12 +18,20 @@
 </Method>
 
 <Method name="Test: Legrabox met BLUMOTION - geen exceptie verwacht">
-<Implementation><![CDATA[	Do ..ControleerWinkelkar(##class(DOM.PM.enu.LBXLadeDiepte).LadeDiepte500(), ##class(DOM.PM.enu.LBXGeleiderTechnologie).BLUMOTION())
+<Implementation><![CDATA[
+	#dim LadeDiepteIterator As TECH.ListIterator = ##class(DOM.PM.enu.LBXLadeDiepte).ValueListIterator()
+	While LadeDiepteIterator.HasNext() {
+		Do ..ControleerWinkelkar(LadeDiepteIterator.Next(), ##class(DOM.PM.enu.LBXGeleiderTechnologie).BLUMOTION())
+	}
 ]]></Implementation>
 </Method>
 
 <Method name="Test: Legrabox met TIPONBLUMOTION - geen exceptie verwacht">
-<Implementation><![CDATA[	Do ..ControleerWinkelkar(##class(DOM.PM.enu.LBXLadeDiepte).LadeDiepte500(), ##class(DOM.PM.enu.LBXGeleiderTechnologie).TIPONBLUMOTION())
+<Implementation><![CDATA[
+	#dim LadeDiepteIterator As TECH.ListIterator = ##class(DOM.PM.enu.LBXLadeDiepte).ValueListIterator()
+	While LadeDiepteIterator.HasNext() {
+		Do ..ControleerWinkelkar(LadeDiepteIterator.Next(), ##class(DOM.PM.enu.LBXGeleiderTechnologie).TIPONBLUMOTION())
+	}
 ]]></Implementation>
 </Method>