Index: vhUnitTest/AXimpl/Admin/VKP/BevestigdKlantOrderIterator/Test.cls.xml
===================================================================
diff -u -r45490 -r45492
--- vhUnitTest/AXimpl/Admin/VKP/BevestigdKlantOrderIterator/Test.cls.xml	(.../Test.cls.xml)	(revision 45490)
+++ vhUnitTest/AXimpl/Admin/VKP/BevestigdKlantOrderIterator/Test.cls.xml	(.../Test.cls.xml)	(revision 45492)
@@ -36,9 +36,9 @@
 <Implementation><![CDATA[
 	#dim OrderApi As DOM.VKP.OrderAPI = ##class(vhTest.Mock.DOM.VKP.OrderAPI).%New()
 	
-	Set OrderA = ##class(vhTest.Utils.DOM.VKP.Order).%New().StandaardOrder()
+	#dim OrderA As vhTest.Utils.DOM.VKP.Order = ##class(vhTest.Utils.DOM.VKP.Order).StandaardOrder()
 	Do OrderA.IndienMethodCall("IsBevestigdKlantOrder").DanReturn($$$True)
-	Set OrderB = ##class(vhTest.Utils.DOM.VKP.Order).%New().StandaardOrder()
+	#dim OrderB As vhTest.Utils.DOM.VKP.Order = ##class(vhTest.Utils.DOM.VKP.Order).StandaardOrder()
 	Do OrderB.IndienMethodCall("IsBevestigdKlantOrder").DanReturn($$$True)
 	
 	Set Orders = ##class(%ListOfObjects).%New()
@@ -59,9 +59,9 @@
 <Implementation><![CDATA[
 	#dim OrderApi As DOM.VKP.OrderAPI = ##class(vhTest.Mock.DOM.VKP.OrderAPI).%New()
 	
-	Set OrderA = ##class(vhTest.Utils.DOM.VKP.Order).%New().StandaardOrder()
+	#dim OrderA As vhTest.Utils.DOM.VKP.Order = ##class(vhTest.Utils.DOM.VKP.Order).StandaardOrder()
 	Do OrderA.IndienMethodCall("IsBevestigdKlantOrder").DanReturn($$$True)
-	Set OrderB = ##class(vhTest.Utils.DOM.VKP.Order).%New().StandaardOrder()
+	#dim OrderB As vhTest.Utils.DOM.VKP.Order = ##class(vhTest.Utils.DOM.VKP.Order).StandaardOrder()
 	Do OrderB.IndienMethodCall("IsBevestigdKlantOrder").DanReturn($$$False)
 	
 	Set Orders = ##class(%ListOfObjects).%New()
@@ -82,7 +82,7 @@
 <Implementation><![CDATA[
 	#dim OrderApi As DOM.VKP.OrderAPI = ##class(vhTest.Mock.DOM.VKP.OrderAPI).%New()
 	
-	Set Order = ##class(vhTest.Utils.DOM.VKP.Order).%New().StandaardOrder()
+	#dim Order As vhTest.Utils.DOM.VKP.Order = ##class(vhTest.Utils.DOM.VKP.Order).StandaardOrder()
 	Do Order.IndienMethodCall("IsBevestigdKlantOrder").DanReturn($$$False)
 	
 	Set Orders = ##class(%ListOfObjects).%New()