Index: vhUnitTest/AX/Uitgaand/PM/BehoeftePlanning/impl/BehoeftePlanningDixfConverter/Test.cls.xml
===================================================================
diff -u -r43224 -r43369
--- vhUnitTest/AX/Uitgaand/PM/BehoeftePlanning/impl/BehoeftePlanningDixfConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 43224)
+++ vhUnitTest/AX/Uitgaand/PM/BehoeftePlanning/impl/BehoeftePlanningDixfConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 43369)
@@ -8,12 +8,12 @@
 <Default>1000</Default>
 </Parameter>
 
-<Property name="ConsoleStub">
+<Property name="Console">
 <Type>TECH.Console.Console</Type>
 <Private>1</Private>
 </Property>
 
-<Property name="UtilsStub">
+<Property name="Utils">
 <Type>AXimpl.Utils</Type>
 <Private>1</Private>
 </Property>
@@ -33,10 +33,13 @@
 <Method name="OnBeforeOneTest">
 <FormalSpec>aTestName:%String</FormalSpec>
 <Implementation><![CDATA[
-	do ##super(aTestName)
-	Set ..ConsoleStub = ##class(vhTest.Mock.TECH.Console.Console).%New()
-	Set ..UtilsStub = ##class(vhTest.Mock.AXimpl.Utils).%New()
+	Do ##super(aTestName)
+	#dim ConsoleStub = ##class(vhTest.Mock.TECH.Console.Console).%New()
+	#dim UtilsStub = ##class(vhTest.Mock.AXimpl.Utils).%New()
+		
 	Set ..VoorraadInstellingCalculator = ##class(vhTest.Fake.AX.Uitgaand.PM.VrijgegProduct.impl.VoorraadInstellingCalculator).%New()
+	Set ..Console = ConsoleStub
+	Set ..Utils = UtilsStub
 ]]></Implementation>
 </Method>
 
@@ -49,8 +52,8 @@
 
 <Method name="Test: Zijn alle defaults goed voor Halux">
 <Implementation><![CDATA[
-	Do ..UtilsStub.IndienMethodCall("ConvertReqGroupId",$$$ElkeWaarde,$$$ElkeWaarde).DanReturn("ReqGroupId")
-	Do ..ConsoleStub.IndienMethodCall("WriteLine",$$$ElkeWaarde).DanReturn("Oeps")
+	Do ..Utils.IndienMethodCall("ConvertReqGroupId",$$$ElkeWaarde,$$$ElkeWaarde).DanReturn("ReqGroupId")
+	Do ..Console.IndienMethodCall("WriteLine",$$$ElkeWaarde).DanDoeNiks()
 	
 	#dim AxProductBehoefte As AX.Uitgaand.PM.Product.impl.Product = ..GeefTeConverterenProductBehoefte()
 
@@ -67,8 +70,8 @@
 
 <Method name="Test: Zijn alle defaults goed voor Van Hoecke">
 <Implementation><![CDATA[
-	Do ..UtilsStub.IndienMethodCall("ConvertReqGroupId",$$$ElkeWaarde,$$$ElkeWaarde).DanReturn("ReqGroupId")
-	Do ..ConsoleStub.IndienMethodCall("WriteLine",$$$ElkeWaarde).DanReturn("Oeps")
+	Do ..Utils.IndienMethodCall("ConvertReqGroupId",$$$ElkeWaarde,$$$ElkeWaarde).DanReturn("ReqGroupId")
+	Do ..Console.IndienMethodCall("WriteLine",$$$ElkeWaarde).DanDoeNiks()
 	
 	#dim AxProductBehoefte As AX.Uitgaand.PM.Product.impl.Product = ..GeefTeConverterenProductBehoefte()
 
@@ -85,8 +88,8 @@
 
 <Method name="Test: Het AX veld ItemId is het IdentNummer">
 <Implementation><![CDATA[
-	Do ..UtilsStub.IndienMethodCall("ConvertReqGroupId",$$$ElkeWaarde,$$$ElkeWaarde).DanReturn("ReqGroupId")
-	Do ..ConsoleStub.IndienMethodCall("WriteLine",$$$ElkeWaarde).DanReturn("Oeps")
+	Do ..Utils.IndienMethodCall("ConvertReqGroupId",$$$ElkeWaarde,$$$ElkeWaarde).DanReturn("ReqGroupId")
+	Do ..Console.IndienMethodCall("WriteLine",$$$ElkeWaarde).DanDoeNiks()
 	
 	#dim AxProductBehoefte As AX.Uitgaand.PM.Product.impl.Product = ..GeefTeConverterenProductBehoefte()
 	Set AxProductBehoefte.Basis.IdentNummer = "1.234.567.8"
@@ -103,14 +106,14 @@
 
 <Method name="Test: MinInventOnhand is de VeiligheidsVoorraad volgens de VoorraadInstellingCalculator indien groter dan 0">
 <Implementation><![CDATA[
-	Do ..UtilsStub.IndienMethodCall("ConvertReqGroupId",$$$ElkeWaarde,$$$ElkeWaarde).DanReturn("ReqGroupId")
-	Do ..ConsoleStub.IndienMethodCall("WriteLine",$$$ElkeWaarde).DanReturn("Oeps")
+	Do ..Utils.IndienMethodCall("ConvertReqGroupId",$$$ElkeWaarde,$$$ElkeWaarde).DanReturn("ReqGroupId")
+	Do ..Console.IndienMethodCall("WriteLine",$$$ElkeWaarde).DanDoeNiks()
 	
 	#dim VoorraadInstelling As AX.Uitgaand.PM.VrijgegProduct.impl.VoorraadInstelling = ..VoorraadInstellingCalculator.Calculate()
-	set VoorraadInstelling.VeiligheidsVoorraad = 5
+	Set VoorraadInstelling.VeiligheidsVoorraad = 5
 	
-	set ..VoorraadInstellingCalculator = ##class(vhTest.Mock.AX.Uitgaand.PM.VrijgegProduct.impl.VoorraadInstellingCalculator).%New()
-	do ..VoorraadInstellingCalculator.IndienMethodCall("Calculate",..#ProductId).DanReturn(VoorraadInstelling)
+	Set ..VoorraadInstellingCalculator = ##class(vhTest.Mock.AX.Uitgaand.PM.VrijgegProduct.impl.VoorraadInstellingCalculator).%New()
+	Do ..VoorraadInstellingCalculator.IndienMethodCall("Calculate",..#ProductId).DanReturn(VoorraadInstelling)
 	
 	#dim AxProductBehoefte As AX.Uitgaand.PM.Product.impl.Product = ..GeefTeConverterenProductBehoefte()
 	
@@ -126,14 +129,14 @@
 
 <Method name="Test: MinInventOnhand is ScanType indien groter dan 0 als de VeiligheidsVoorraad volgens de VoorraadInstellingCalculator NIET groter dan 0 is">
 <Implementation><![CDATA[
-	Do ..UtilsStub.IndienMethodCall("ConvertReqGroupId",$$$ElkeWaarde,$$$ElkeWaarde).DanReturn("ReqGroupId")
-	Do ..ConsoleStub.IndienMethodCall("WriteLine",$$$ElkeWaarde).DanReturn("Oeps")
+	Do ..Utils.IndienMethodCall("ConvertReqGroupId",$$$ElkeWaarde,$$$ElkeWaarde).DanReturn("ReqGroupId")
+	Do ..Console.IndienMethodCall("WriteLine",$$$ElkeWaarde).DanDoeNiks()
 	
 	#dim VoorraadInstelling As AX.Uitgaand.PM.VrijgegProduct.impl.VoorraadInstelling = ..VoorraadInstellingCalculator.Calculate()
-	set VoorraadInstelling.VeiligheidsVoorraad = 0
+	Set VoorraadInstelling.VeiligheidsVoorraad = 0
 	
-	set ..VoorraadInstellingCalculator = ##class(vhTest.Mock.AX.Uitgaand.PM.VrijgegProduct.impl.VoorraadInstellingCalculator).%New()
-	do ..VoorraadInstellingCalculator.IndienMethodCall("Calculate",..#ProductId).DanReturn(VoorraadInstelling)
+	Set ..VoorraadInstellingCalculator = ##class(vhTest.Mock.AX.Uitgaand.PM.VrijgegProduct.impl.VoorraadInstellingCalculator).%New()
+	Do ..VoorraadInstellingCalculator.IndienMethodCall("Calculate",..#ProductId).DanReturn(VoorraadInstelling)
 	
 	#dim AxProductBehoefte As AX.Uitgaand.PM.Product.impl.Product = ..GeefTeConverterenProductBehoefte()
 	Set AxProductBehoefte.Basis.ScanType = 7
@@ -150,14 +153,14 @@
 
 <Method name="Test: MinInventOnhand is leeg indien de VeiligheidsVoorraad volgens de VoorraadInstellingCalculator NIET groter dan 0 is en ScanType NIET groter dan 0 is">
 <Implementation><![CDATA[
-	Do ..UtilsStub.IndienMethodCall("ConvertReqGroupId",$$$ElkeWaarde,$$$ElkeWaarde).DanReturn("ReqGroupId")
-	Do ..ConsoleStub.IndienMethodCall("WriteLine",$$$ElkeWaarde).DanReturn("Oeps")
+	Do ..Utils.IndienMethodCall("ConvertReqGroupId",$$$ElkeWaarde,$$$ElkeWaarde).DanReturn("ReqGroupId")
+	Do ..Console.IndienMethodCall("WriteLine",$$$ElkeWaarde).DanDoeNiks()
 	
 	#dim VoorraadInstelling As AX.Uitgaand.PM.VrijgegProduct.impl.VoorraadInstelling = ..VoorraadInstellingCalculator.Calculate()
-	set VoorraadInstelling.VeiligheidsVoorraad = 0
+	Set VoorraadInstelling.VeiligheidsVoorraad = 0
 	
-	set ..VoorraadInstellingCalculator = ##class(vhTest.Mock.AX.Uitgaand.PM.VrijgegProduct.impl.VoorraadInstellingCalculator).%New()
-	do ..VoorraadInstellingCalculator.IndienMethodCall("Calculate",..#ProductId).DanReturn(VoorraadInstelling)
+	Set ..VoorraadInstellingCalculator = ##class(vhTest.Mock.AX.Uitgaand.PM.VrijgegProduct.impl.VoorraadInstellingCalculator).%New()
+	Do ..VoorraadInstellingCalculator.IndienMethodCall("Calculate",..#ProductId).DanReturn(VoorraadInstelling)
 	
 	#dim AxProductBehoefte As AX.Uitgaand.PM.Product.impl.Product = ..GeefTeConverterenProductBehoefte()
 	Set AxProductBehoefte.Basis.ScanType = 0
@@ -174,14 +177,14 @@
 
 <Method name="Test: Als MinInventOnhand leeg is dan wordt deze informatie weggeschreven in de console">
 <Implementation><![CDATA[
-	Do ..UtilsStub.IndienMethodCall("ConvertReqGroupId",$$$ElkeWaarde,$$$ElkeWaarde).DanReturn("ReqGroupId")
-	Do ..ConsoleStub.VerwachtMethodCall("WriteLine",$$$ElkeWaarde).DanReturn("Oeps")
+	Do ..Utils.IndienMethodCall("ConvertReqGroupId",$$$ElkeWaarde,$$$ElkeWaarde).DanReturn("ReqGroupId")
+	Do ..Console.VerwachtMethodCall("WriteLine",$$$ElkeWaarde).DanDoeNiks()
 	
 	#dim VoorraadInstelling As AX.Uitgaand.PM.VrijgegProduct.impl.VoorraadInstelling = ..VoorraadInstellingCalculator.Calculate()
-	set VoorraadInstelling.VeiligheidsVoorraad = 0
+	Set VoorraadInstelling.VeiligheidsVoorraad = 0
 	
-	set ..VoorraadInstellingCalculator = ##class(vhTest.Mock.AX.Uitgaand.PM.VrijgegProduct.impl.VoorraadInstellingCalculator).%New()
-	do ..VoorraadInstellingCalculator.IndienMethodCall("Calculate",..#ProductId).DanReturn(VoorraadInstelling)
+	Set ..VoorraadInstellingCalculator = ##class(vhTest.Mock.AX.Uitgaand.PM.VrijgegProduct.impl.VoorraadInstellingCalculator).%New()
+	Do ..VoorraadInstellingCalculator.IndienMethodCall("Calculate",..#ProductId).DanReturn(VoorraadInstelling)
 	
 	#dim AxProductBehoefte As AX.Uitgaand.PM.Product.impl.Product = ..GeefTeConverterenProductBehoefte()
 	Set AxProductBehoefte.Basis.ScanType = 0
@@ -192,20 +195,20 @@
 	
 	#dim ConvertedProductBehoefte As AXdixf.BehoeftePlanning.BehoeftePlanning = Converter.Convert(AxProductBehoefte,Vestiging)
 	
-	Do ..ConsoleStub.Verifieer()
+	Do ..Console.Verifieer()
 ]]></Implementation>
 </Method>
 
 <Method name="Test: MaxInventOnhand is hetzelfde als MinInventOnhand">
 <Implementation><![CDATA[
-	Do ..UtilsStub.IndienMethodCall("ConvertReqGroupId",$$$ElkeWaarde,$$$ElkeWaarde).DanReturn("ReqGroupId")
-	Do ..ConsoleStub.IndienMethodCall("WriteLine",$$$ElkeWaarde).DanReturn("Oeps")
+	Do ..Utils.IndienMethodCall("ConvertReqGroupId",$$$ElkeWaarde,$$$ElkeWaarde).DanReturn("ReqGroupId")
+	Do ..Console.IndienMethodCall("WriteLine",$$$ElkeWaarde).DanDoeNiks()
 	
 	#dim VoorraadInstelling As AX.Uitgaand.PM.VrijgegProduct.impl.VoorraadInstelling = ..VoorraadInstellingCalculator.Calculate()
-	set VoorraadInstelling.VeiligheidsVoorraad = 0
+	Set VoorraadInstelling.VeiligheidsVoorraad = 0
 	
-	set ..VoorraadInstellingCalculator = ##class(vhTest.Mock.AX.Uitgaand.PM.VrijgegProduct.impl.VoorraadInstellingCalculator).%New()
-	do ..VoorraadInstellingCalculator.IndienMethodCall("Calculate",..#ProductId).DanReturn(VoorraadInstelling)
+	Set ..VoorraadInstellingCalculator = ##class(vhTest.Mock.AX.Uitgaand.PM.VrijgegProduct.impl.VoorraadInstellingCalculator).%New()
+	Do ..VoorraadInstellingCalculator.IndienMethodCall("Calculate",..#ProductId).DanReturn(VoorraadInstelling)
 	
 	#dim AxProductBehoefte As AX.Uitgaand.PM.Product.impl.Product = ..GeefTeConverterenProductBehoefte()
 	Set AxProductBehoefte.Basis.ScanType = 9
@@ -222,8 +225,8 @@
 
 <Method name="Test: Voor bepaling ReqGroupId wordt ConvertReqGroupId van Utils gecalld">
 <Implementation><![CDATA[
-	Do ..ConsoleStub.IndienMethodCall("WriteLine",$$$ElkeWaarde).DanReturn("Oeps")
-	Do ..UtilsStub.VerwachtMethodCall("ConvertReqGroupId",$$$ElkeWaarde,$$$ElkeWaarde).DanReturn("ReqGroupId")
+	Do ..Console.IndienMethodCall("WriteLine",$$$ElkeWaarde).DanDoeNiks()
+	Do ..Utils.VerwachtMethodCall("ConvertReqGroupId",$$$ElkeWaarde,$$$ElkeWaarde).DanReturn("ReqGroupId")
 	
 	#dim AxProductBehoefte As AX.Uitgaand.PM.Product.impl.Product = ..GeefTeConverterenProductBehoefte()
 
@@ -234,7 +237,7 @@
 	#dim ConvertedProductBehoefte As AXdixf.BehoeftePlanning.BehoeftePlanning = Converter.Convert(AxProductBehoefte,Vestiging)
 	
 	Do $$$AssertEquals(ConvertedProductBehoefte.ReqGroupId,"ReqGroupId")
-	Do ..UtilsStub.Verifieer()
+	Do ..Utils.Verifieer()
 ]]></Implementation>
 </Method>
 
@@ -243,15 +246,15 @@
 <ReturnType>AX.Uitgaand.PM.Product.impl.Product</ReturnType>
 <Implementation><![CDATA[
 	Set AxProductBehoefte = ##class(AX.Uitgaand.PM.Product.impl.Product).%New()
-	do AxProductBehoefte.BasisSetObjectId(..#ProductId)
-	quit AxProductBehoefte
+	Do AxProductBehoefte.BasisSetObjectId(..#ProductId)
+	Quit AxProductBehoefte
 ]]></Implementation>
 </Method>
 
 <Method name="GeefConverter">
 <Private>1</Private>
 <ReturnType>AX.Uitgaand.PM.BehoeftePlanning.impl.BehoeftePlanningDixfConverter</ReturnType>
-<Implementation><![CDATA[	quit ##class(AX.Uitgaand.PM.BehoeftePlanning.impl.BehoeftePlanningDixfConverter).%New(..VoorraadInstellingCalculator,..UtilsStub,..ConsoleStub)
+<Implementation><![CDATA[	Quit ##class(AX.Uitgaand.PM.BehoeftePlanning.impl.BehoeftePlanningDixfConverter).%New(..VoorraadInstellingCalculator,..Utils,..Console)
 ]]></Implementation>
 </Method>
 </Class>