Index: vhUnitTest/APPS/Halux/PPS/Activiteit/impl/TAOR/Verpakking/WerklijstItemsMaker/MaakWerklijstItems/Base.cls.xml
===================================================================
diff -u
--- vhUnitTest/APPS/Halux/PPS/Activiteit/impl/TAOR/Verpakking/WerklijstItemsMaker/MaakWerklijstItems/Base.cls.xml	(revision 0)
+++ vhUnitTest/APPS/Halux/PPS/Activiteit/impl/TAOR/Verpakking/WerklijstItemsMaker/MaakWerklijstItems/Base.cls.xml	(revision 30684)
@@ -0,0 +1,80 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.APPS.Halux.PPS.Activiteit.impl.TAOR.Verpakking.WerklijstItemsMaker.MaakWerklijstItems.Base">
+<Abstract>1</Abstract>
+<Super>vhUnitTest.DOM.PM.Maatwerk.TAX.Base</Super>
+
+<Parameter name="DummyProductID">
+<Type>%String</Type>
+<Default>UT_ProductID</Default>
+</Parameter>
+
+<Parameter name="DummyToeleveringID">
+<Type>%String</Type>
+<Default>UT_ToeleveringID</Default>
+</Parameter>
+
+<Parameter name="DummyToeleveringLijnID">
+<Type>%String</Type>
+</Parameter>
+
+<Method name="InitMocks">
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim ProductTypeAPIStub As vhTest.Mock.DOM.PM.ProductTypeAPI = ##class(vhTest.Mock.DOM.PM.ProductTypeAPI).MockInstance()
+		Set ProductStub = ##class(vhTest.Mock.DOM.PM.MaatwerkProduct).%New()
+		Do ProductStub.IndienMethodCall("GeefDossierCode").DanReturn("Dummy-DOSSIER-Code")
+	Do ProductTypeAPIStub.IndienMethodCall("GeefMaatwerkProduct", ..#DummyProductID).DanReturn(ProductStub)
+	
+	#dim ToeleveringAPIStub As vhTest.Mock.DOM.AKP.ToeleveringAPI = ##class(vhTest.Mock.DOM.AKP.ToeleveringAPI).MockInstance()
+		#dim DummyToeleveringLijn As DOM.AKP.ProductToeleveringLijn = ##class(vhTest.Dummy.DOM.AKP.ProductToeleveringLijn).%New()
+	Do ToeleveringAPIStub.IndienMethodCall("GeefToeleveringLijn",..#DummyToeleveringID,..#DummyToeleveringLijnID).DanReturn(DummyToeleveringLijn)
+	
+	#dim ProductieAPIStub As vhTest.Mock.APPS.Halux.ProductieAPI = ##class(vhTest.Mock.APPS.Halux.ProductieAPI).MockInstance()
+		Set BatchServiceStub = ##class(vhTest.Fake.APPS.Halux.common.BatchService).%New()
+	Do ProductieAPIStub.IndienMethodCall("GeefBatchService").DanReturn(BatchServiceStub)
+	Do ProductieAPIStub.IndienMethodCall("GeefUitvoeringInfoInvuller").DanReturn(##class(APPS.Halux.PPS.impl.UitvoeringInfoInvuller).%New())
+]]></Implementation>
+</Method>
+
+<Method name="GeefWerklijstItemMakerInput">
+<FormalSpec>Verpakking:DOM.PM.enu.TAORVerpakkingType,Aantal:%String=1</FormalSpec>
+<Private>1</Private>
+<ReturnType>APPS.Halux.PPS.Activiteit.impl.common.WerklijstItemMakerInput</ReturnType>
+<Implementation><![CDATA[
+	#dim TAORKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken = ..MaakIngegevenKenmerken(Verpakking)
+	#dim HalffabItemsBoom As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = ..GeefHalffabItemsBoom(TAORKenmerken, Aantal)
+	Quit ..MaakWerklijstItemMakerInput(TAORKenmerken,HalffabItemsBoom)
+]]></Implementation>
+</Method>
+
+<Method name="MaakIngegevenKenmerken">
+<FormalSpec>Verpakking:DOM.PM.enu.TAORVerpakkingType</FormalSpec>
+<Private>1</Private>
+<ReturnType>DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken</ReturnType>
+<Implementation><![CDATA[
+	#dim TAORKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken).StandaardBinnenladeVerpaktIn(Verpakking)
+	Quit TAORKenmerken
+]]></Implementation>
+</Method>
+
+<Method name="MaakWerklijstItemMakerInput">
+<FormalSpec>TAORKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken,HalffabItemsBoom:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom</FormalSpec>
+<Private>1</Private>
+<ReturnType>APPS.Halux.PPS.Activiteit.impl.common.WerklijstItemMakerInput</ReturnType>
+<Implementation><![CDATA[
+	Set Activiteit = ##class(vhTest.Dummy.APPS.Halux.PPS.Activiteit.Activiteit).%New()
+	Set ProductieSequentieItem = ##class(vhTest.Mock.APPS.Halux.common.ProductieSequentieItem).%New()
+	Set ProductieSequentieItem.ProductID = ..#DummyProductID
+	Set ProductieSequentieItem.ToeleveringID = ..#DummyToeleveringID
+	Do ProductieSequentieItem.IndienMethodCall("GeefIngegevenKenmerken").DanReturn(TAORKenmerken)
+	Do ProductieSequentieItem.IndienMethodCall("GeefHalffabItemsBoom").DanReturn(HalffabItemsBoom)
+	Do ProductieSequentieItem.IndienMethodCall("GeefProductieLijn").DanReturn(##class(APPS.Halux.common.enu.ProductieLijn).Een())
+	Set WerklijstItemMakerInput = ##class(APPS.Halux.PPS.Activiteit.impl.common.WerklijstItemMakerInput).%New(Activiteit,ProductieSequentieItem)
+	Quit WerklijstItemMakerInput
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhUnitTest/APPS/Halux/PPS/Activiteit/impl/TAOR/Verpakking/WerklijstItemsMaker/MaakWerklijstItems/TestLosseComponenten.cls.xml
===================================================================
diff -u -r30647 -r30684
--- vhUnitTest/APPS/Halux/PPS/Activiteit/impl/TAOR/Verpakking/WerklijstItemsMaker/MaakWerklijstItems/TestLosseComponenten.cls.xml	(.../TestLosseComponenten.cls.xml)	(revision 30647)
+++ vhUnitTest/APPS/Halux/PPS/Activiteit/impl/TAOR/Verpakking/WerklijstItemsMaker/MaakWerklijstItems/TestLosseComponenten.cls.xml	(.../TestLosseComponenten.cls.xml)	(revision 30684)
@@ -1,22 +1,8 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="vhUnitTest.APPS.Halux.PPS.Activiteit.impl.TAOR.Verpakking.WerklijstItemsMaker.MaakWerklijstItems.TestLosseComponenten">
-<Super>vhUnitTest.DOM.PM.Maatwerk.TAX.Base</Super>
+<Super>vhUnitTest.APPS.Halux.PPS.Activiteit.impl.TAOR.Verpakking.WerklijstItemsMaker.MaakWerklijstItems.Base</Super>
 
-<Parameter name="DummyProductID">
-<Type>%String</Type>
-<Default>UT_ProductID</Default>
-</Parameter>
-
-<Parameter name="DummyToeleveringID">
-<Type>%String</Type>
-<Default>UT_ToeleveringID</Default>
-</Parameter>
-
-<Parameter name="DummyToeleveringLijnID">
-<Type>%String</Type>
-</Parameter>
-
 <Method name="Test">
 <Implementation><![CDATA[
 	Set WerklijstItemsMaker = ##class(APPS.Halux.PPS.Activiteit.impl.TAOR.Verpakking.WerklijstItemsMaker).%New()
@@ -30,7 +16,6 @@
 	
 	Do $$$AssertEquals(WerklijstItems.Count(),5,"Totaal van 43 karton + 20 etiketten")
 		
-	;d $system.OBJ.Dump(WerklijstItems.GetAt(1))
 	Do ..AssertKartonBodem(WerklijstItems.GetAt(1).UitvoeringInfo)
 	Do ..AssertKartonFront(WerklijstItems.GetAt(2).UitvoeringInfo)
 	Do ..AssertKartonRug(WerklijstItems.GetAt(3).UitvoeringInfo)
@@ -153,45 +138,6 @@
 	Quit KartonSpecificatie
 ]]></Implementation>
 </Method>
-
-<Method name="InitMocks">
-<Private>1</Private>
-<Implementation><![CDATA[
-	#dim ProductTypeAPIStub As vhTest.Mock.DOM.PM.ProductTypeAPI = ##class(vhTest.Mock.DOM.PM.ProductTypeAPI).MockInstance()
-		Set ProductStub = ##class(vhTest.Mock.DOM.PM.MaatwerkProduct).%New()
-		Do ProductStub.IndienMethodCall("GeefDossierCode").DanReturn("Dummy-DOSSIER-Code")
-	Do ProductTypeAPIStub.IndienMethodCall("GeefMaatwerkProduct", ..#DummyProductID).DanReturn(ProductStub)
-	
-	#dim ToeleveringAPIStub As vhTest.Mock.DOM.AKP.ToeleveringAPI = ##class(vhTest.Mock.DOM.AKP.ToeleveringAPI).MockInstance()
-		#dim DummyToeleveringLijn As DOM.AKP.ProductToeleveringLijn = ##class(vhTest.Dummy.DOM.AKP.ProductToeleveringLijn).%New()
-	Do ToeleveringAPIStub.IndienMethodCall("GeefToeleveringLijn",..#DummyToeleveringID,..#DummyToeleveringLijnID).DanReturn(DummyToeleveringLijn)
-	
-	#dim ProductieAPIStub As vhTest.Mock.APPS.Halux.ProductieAPI = ##class(vhTest.Mock.APPS.Halux.ProductieAPI).MockInstance()
-		Set BatchServiceStub = ##class(vhTest.Fake.APPS.Halux.common.BatchService).%New()
-	Do ProductieAPIStub.IndienMethodCall("GeefBatchService").DanReturn(BatchServiceStub)
-	Do ProductieAPIStub.IndienMethodCall("GeefUitvoeringInfoInvuller").DanReturn(##class(APPS.Halux.PPS.impl.UitvoeringInfoInvuller).%New())
-]]></Implementation>
-</Method>
-
-<Method name="GeefWerklijstItemMakerInput">
-<FormalSpec>Verpakking:DOM.PM.enu.TAORVerpakkingType,Aantal:%String=1</FormalSpec>
-<Private>1</Private>
-<ReturnType>APPS.Halux.PPS.Activiteit.impl.common.WerklijstItemMakerInput</ReturnType>
-<Implementation><![CDATA[
-	#dim TAORKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken).StandaardBinnenladeVerpaktIn(Verpakking)
-	#dim HalffabItemsBoom As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = ..GeefHalffabItemsBoom(TAORKenmerken, Aantal)
-
-	Set Activiteit = ##class(vhTest.Dummy.APPS.Halux.PPS.Activiteit.Activiteit).%New()
-	Set ProductieSequentieItem = ##class(vhTest.Mock.APPS.Halux.common.ProductieSequentieItem).%New()
-	Set ProductieSequentieItem.ProductID = ..#DummyProductID
-	Set ProductieSequentieItem.ToeleveringID = ..#DummyToeleveringID
-	Do ProductieSequentieItem.IndienMethodCall("GeefIngegevenKenmerken").DanReturn(TAORKenmerken)
-	Do ProductieSequentieItem.IndienMethodCall("GeefHalffabItemsBoom").DanReturn(HalffabItemsBoom)
-	Do ProductieSequentieItem.IndienMethodCall("GeefProductieLijn").DanReturn(##class(APPS.Halux.common.enu.ProductieLijn).Een())
-	Set WerklijstItemMakerInput = ##class(APPS.Halux.PPS.Activiteit.impl.common.WerklijstItemMakerInput).%New(Activiteit,ProductieSequentieItem)
-	Quit WerklijstItemMakerInput
-]]></Implementation>
-</Method>
 </Class>