Index: vhUnitTest/APPS/Halux/PPS/Activiteit/impl/TAOR/Verpakking/WerklijstItemsMaker/MaakWerklijstItems/TestBulkPOG.cls.xml
===================================================================
diff -u -r37970 -r55792
--- vhUnitTest/APPS/Halux/PPS/Activiteit/impl/TAOR/Verpakking/WerklijstItemsMaker/MaakWerklijstItems/TestBulkPOG.cls.xml	(.../TestBulkPOG.cls.xml)	(revision 37970)
+++ vhUnitTest/APPS/Halux/PPS/Activiteit/impl/TAOR/Verpakking/WerklijstItemsMaker/MaakWerklijstItems/TestBulkPOG.cls.xml	(.../TestBulkPOG.cls.xml)	(revision 55792)
@@ -16,12 +16,8 @@
 	
 	#dim WerklijstItems As APPS.Halux.PPS.Activiteit.dto.ProductieSequentieWerklijstItemList = WerklijstItemsMaker.MaakWerklijstItems(WerklijstItemMakerInput)
 	
-	If $$$AssertEquals(WerklijstItems.Count(),15,"5x KartonSnijden , 5xPalletInhoudblad ,5x klantetiketten")  {
+	If $$$AssertEquals(WerklijstItems.Count(),3,"1x KartonSnijden , 1xPalletInhoudblad ,1x klantetiketten")  {
 		Do ..AssertKartonBodem(WerklijstItems.GetAt(1).UitvoeringInfo)
-		Do ..AssertKartonFront(WerklijstItems.GetAt(2).UitvoeringInfo)
-		Do ..AssertKartonRug(WerklijstItems.GetAt(3).UitvoeringInfo)
-		Do ..AssertKartonZijkant(WerklijstItems.GetAt(4).UitvoeringInfo, "Zijkant Links")
-		Do ..AssertKartonZijkant(WerklijstItems.GetAt(5).UitvoeringInfo, "Zijkant Rechts")
 		Do ..AssertInformatieIDs(WerklijstItems)
 	}
 ]]></Implementation>
@@ -36,33 +32,6 @@
 ]]></Implementation>
 </Method>
 
-<Method name="AssertKartonFront">
-<FormalSpec>KartonUI:APPS.Halux.PPS.Activiteit.impl.common.dto.KartonSnijdenUitvoeringInfo</FormalSpec>
-<Private>1</Private>
-<Implementation><![CDATA[
-	#dim VerwachteKartonSpecificatie As DOM.PM.Verpakking.dto.KartonSpecificatieBase = ..MaakBodemDoosKartonSpecificatie(590, 490, 195.5)
-	Do ..AssertKartonUI(KartonUI,VerwachteKartonSpecificatie, "Front")
-]]></Implementation>
-</Method>
-
-<Method name="AssertKartonRug">
-<FormalSpec>KartonUI:APPS.Halux.PPS.Activiteit.impl.common.dto.KartonSnijdenUitvoeringInfo</FormalSpec>
-<Private>1</Private>
-<Implementation><![CDATA[
-	#dim VerwachteKartonSpecificatie As DOM.PM.Verpakking.dto.KartonSpecificatieBase = ..MaakBodemDoosKartonSpecificatie(569, 334, 81)
-	Do ..AssertKartonUI(KartonUI,VerwachteKartonSpecificatie, "Rug")
-]]></Implementation>
-</Method>
-
-<Method name="AssertKartonZijkant">
-<FormalSpec>KartonUI:APPS.Halux.PPS.Activiteit.impl.common.dto.KartonSnijdenUitvoeringInfo,AssertOmschrijving:%String</FormalSpec>
-<Private>1</Private>
-<Implementation><![CDATA[
-	#dim VerwachteKartonSpecificatie As DOM.PM.Verpakking.dto.KartonSpecificatieBase = ..MaakBodemDoosKartonSpecificatie(495, 174.5, 148)
-	Do ..AssertKartonUI(KartonUI,VerwachteKartonSpecificatie, AssertOmschrijving)
-]]></Implementation>
-</Method>
-
 <Method name="AssertKartonUI">
 <FormalSpec>KartonUI:APPS.Halux.PPS.Activiteit.impl.common.dto.KartonSnijdenUitvoeringInfo,VerwachteKartonSpecificatie:DOM.PM.Verpakking.dto.KartonSpecificatieBase,Omschrijving:%String</FormalSpec>
 <Private>1</Private>
@@ -111,9 +80,9 @@
 	While (Iterator.HasNext()) {
 		#dim WerklijstItem As APPS.Halux.PPS.Activiteit.dto.ProductieSequentieWerklijstItem = Iterator.Next()
 	
-		If ($Increment(Counter) <= 5) {
+		If ($Increment(Counter) <= 1) {
 			Do $$$AssertEquals(WerklijstItem.InformatieID, "TAOR.Verpakking.KartonSnijden")
-		} ElseIf Counter <=10 {
+		} ElseIf Counter <=2 {
 			Do $$$AssertEquals(WerklijstItem.InformatieID, "TAOR.PalletInhoud")
 		} Else {
 			Do $$$AssertEquals(WerklijstItem.InformatieID, "TAOR.KlantEtiket")
Index: vhUnitTest/APPS/Halux/PPS/Activiteit/impl/TAOR/Verpakking/WerklijstItemsMaker/MaakWerklijstItems/TestLosseComponentenInBulk.cls.xml
===================================================================
diff -u -r37970 -r55792
--- vhUnitTest/APPS/Halux/PPS/Activiteit/impl/TAOR/Verpakking/WerklijstItemsMaker/MaakWerklijstItems/TestLosseComponentenInBulk.cls.xml	(.../TestLosseComponentenInBulk.cls.xml)	(revision 37970)
+++ vhUnitTest/APPS/Halux/PPS/Activiteit/impl/TAOR/Verpakking/WerklijstItemsMaker/MaakWerklijstItems/TestLosseComponentenInBulk.cls.xml	(.../TestLosseComponentenInBulk.cls.xml)	(revision 55792)
@@ -3,12 +3,12 @@
 <Class name="vhUnitTest.APPS.Halux.PPS.Activiteit.impl.TAOR.Verpakking.WerklijstItemsMaker.MaakWerklijstItems.TestLosseComponentenInBulk">
 <Super>vhUnitTest.APPS.Halux.PPS.Activiteit.impl.TAOR.Verpakking.WerklijstItemsMaker.MaakWerklijstItems.Base</Super>
 
-<Method name="TestTussenschotAanwezigInBoomMaarNietInWerklijstItemsVoorKartonSnijdenData">
+<Method name="TestHorizontaalKartonAanwezigInBoomMaarNietInWerklijstItemsVoorKartonSnijdenData">
 <Implementation><![CDATA[
 	#dim Aantal As %Integer = 10
 	#dim WerklijstItemsMaker As APPS.Halux.PPS.Activiteit.impl.TAOR.Verpakking.WerklijstItemsMaker = ##class(APPS.Halux.PPS.Activiteit.impl.TAOR.Verpakking.WerklijstItemsMaker).%New()
 	
-	Set ..Kenmerken.ProductieWijze = ..Enum.ProductieWijze.ZijkantLinks
+	Set ..Kenmerken.ProductieWijze = ..Enum.ProductieWijze.Bodem
 	Set ..HalffabItemsBoom = ..GeefHalffabItemsBoom(..Kenmerken, Aantal)
 	
 	#dim WerklijstItemMakerInput As APPS.Halux.PPS.Activiteit.impl.common.WerklijstItemMakerInput = ..MaakWerklijstItemMakerInput()
@@ -17,24 +17,23 @@
 
 	#dim WerklijstItems As APPS.Halux.PPS.Activiteit.dto.ProductieSequentieWerklijstItemList= WerklijstItemsMaker.MaakWerklijstItems(WerklijstItemMakerInput)
 
-	Do ..AssertTussenschotAanwezigInBoom(..HalffabItemsBoom)
-	Do ..AssertTussenschotNietInWerklijstItems(WerklijstItems)
+	Do ..AssertHorizontaalKartonAanwezigInBoom(..HalffabItemsBoom)
+	Do ..AssertHorizontaalKartonNietInWerklijstItems(WerklijstItems)
 ]]></Implementation>
 </Method>
 
-<Method name="AssertTussenschotAanwezigInBoom">
+<Method name="AssertHorizontaalKartonAanwezigInBoom">
 <FormalSpec>HalffabItemsBoom:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
-	Do $$$AssertTrue(HalffabItemsBoom.BevatRol("Verpakking->Zijkant_Links Verticaal"))
-	// Assert andere rollen 
-	Do $$$AssertTrue(HalffabItemsBoom.BevatRol("Verpakking->Zijkant_Links bodemdoos"))
-	Do $$$AssertTrue(HalffabItemsBoom.BevatRol("Verpakking->Zijkant_Links dekseldoos"))
-	Do $$$AssertTrue(HalffabItemsBoom.BevatRol("Verpakking->Zijkant_Links Horizontaal"))
+	Do $$$AssertTrue(HalffabItemsBoom.BevatRol("Verpakking->Bodem Horizontaal"))
+	// Extra asserts
+	Do $$$AssertTrue(HalffabItemsBoom.BevatRol("Verpakking->Bodem bodemdoos"))
+	Do $$$AssertTrue(HalffabItemsBoom.BevatRol("Verpakking->Bodem dekseldoos"))
 ]]></Implementation>
 </Method>
 
-<Method name="AssertTussenschotNietInWerklijstItems">
+<Method name="AssertHorizontaalKartonNietInWerklijstItems">
 <FormalSpec>WerklijstItems:APPS.Halux.PPS.Activiteit.dto.ProductieSequentieWerklijstItemList</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[