Index: zTryout/PBO/TAXBOG/impl/Doos.cls.xml
===================================================================
diff -u -r29326 -r29721
--- zTryout/PBO/TAXBOG/impl/Doos.cls.xml	(.../Doos.cls.xml)	(revision 29326)
+++ zTryout/PBO/TAXBOG/impl/Doos.cls.xml	(.../Doos.cls.xml)	(revision 29721)
@@ -45,6 +45,21 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefKartonSpecificatieVlak">
+<FormalSpec>Orientatie:TECH.enu.Orientation,MaxInVerpakking:TECH.Integer=1</FormalSpec>
+<ReturnType>DOM.PM.Maatwerk.Calc.HF.impl.HFBulkPerOnderdeelGegroepeerdVerpakkingKartonSpecificatie</ReturnType>
+<Implementation><![CDATA[
+	#dim Lengte As TECH.Numeric
+	#dim Breedte As TECH.Numeric = ..Breedte
+	If Orientatie = ##class(TECH.enu.Orientation).Horizontal() {
+		Set Lengte = ..Diepte
+	} Else {
+		Set Lengte = ..Hoogte
+	}
+	quit ..GeefKartonSpecificatie(..DoosType.DoosMetDeksel,Lengte,Breedte,MaxInVerpakking)
+]]></Implementation>
+</Method>
+
 <Method name="GeefKartonSpecificatie">
 <FormalSpec>Benaming:DOM.PM.Verpakking.enu.BenamingVerpakkingsOnderdeel,Lengte:%Decimal,Breedte:%Decimal,MaxInVerpakking:TECH.Integer</FormalSpec>
 <Private>1</Private>
Index: DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFVerpakkingv001.cls.xml
===================================================================
diff -u -r29590 -r29721
--- DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFVerpakkingv001.cls.xml	(.../HFVerpakkingv001.cls.xml)	(revision 29590)
+++ DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFVerpakkingv001.cls.xml	(.../HFVerpakkingv001.cls.xml)	(revision 29721)
@@ -92,134 +92,144 @@
 	#dim Bodem As DOM.PM.Maatwerk.LadeInfo.Bodem = Lade.GeefBodems().GetAt(1)
 	if $IsObject(Bodem) {
 		; Bodem - BodemDoos
-		Set BuilderInput = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput).%New(Bodem,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid())
-		Set DoosBerekenaarInput = ##class(zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput).%New(Bodem,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid(),..BenamingVerpakkingen.Bodem)
+		Set BuilderInput = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput).%New(Bodem,..Context.GeefHoeveelheid())
+		Set DoosBerekenaarInput = ##class(zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput).%New(Bodem,..Context.GeefHoeveelheid(),..BenamingVerpakkingen.Bodem)
 		Do BuilderInput.ZetVerpakkingen(DoosBerekenaar.GeefVerpakkingen(DoosBerekenaarInput))
 		Do ..Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerd).%New(##this, BuilderInput))
 	
 		; Bodem - Deksel
-		Set BuilderInput = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput).%New(Bodem,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid())
-		Set DoosBerekenaarInput = ##class(zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput).%New(Bodem,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid(),..BenamingVerpakkingen.Deksel)
+		Set BuilderInput = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput).%New(Bodem,..Context.GeefHoeveelheid())
+		Set DoosBerekenaarInput = ##class(zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput).%New(Bodem,..Context.GeefHoeveelheid(),..BenamingVerpakkingen.Deksel)
 		Do BuilderInput.ZetVerpakkingen(DoosBerekenaar.GeefVerpakkingen(DoosBerekenaarInput))
 		Do ..Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerd).%New(##this, BuilderInput))
 	
 		; Bodem - Horizontaal tussenschot
-		Set BuilderInput = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput).%New(Bodem,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid())
-		Set DoosBerekenaarInput = ##class(zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput).%New(Bodem,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid(),..BenamingVerpakkingen.Deksel)
+		Set BuilderInput = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput).%New(Bodem,..Context.GeefHoeveelheid())
+		Set DoosBerekenaarInput = ##class(zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput).%New(Bodem,..Context.GeefHoeveelheid(),..BenamingVerpakkingen.Vlak)
+		Do DoosBerekenaar.ZetVlakOrientatie(##class(TECH.enu.Orientation).Horizontal())
 		Do BuilderInput.ZetVerpakkingen(DoosBerekenaar.GeefVerpakkingen(DoosBerekenaarInput))
 		Do ..Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdHorizontaalTussenschot).%New(##this, BuilderInput))
 	
 		; Bodem - Verticaal tussenschot
-		Set BuilderInput = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput).%New(Bodem,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid())
-		Set DoosBerekenaarInput = ##class(zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput).%New(Bodem,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid(),..BenamingVerpakkingen.Deksel)
+		Set BuilderInput = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput).%New(Bodem,..Context.GeefHoeveelheid())
+		Set DoosBerekenaarInput = ##class(zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput).%New(Bodem,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid(),..BenamingVerpakkingen.Vlak)
+		Do DoosBerekenaar.ZetVlakOrientatie(##class(TECH.enu.Orientation).Vertical())
 		Do BuilderInput.ZetVerpakkingen(DoosBerekenaar.GeefVerpakkingen(DoosBerekenaarInput))
 		Do ..Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdVerticaalTussenschot).%New(##this, BuilderInput))
 	}
 	
 	#dim Rug As DOM.PM.Maatwerk.LadeInfo.Rug = Lade.GeefRuggen().GetAt(1)
 	if $IsObject(Rug) {
 		; Rug - Bodemdoos
-		Set BuilderInput = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput).%New(Rug,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid())
-		Set DoosBerekenaarInput = ##class(zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput).%New(Rug,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid(),..BenamingVerpakkingen.Bodem)
+		Set BuilderInput = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput).%New(Rug,..Context.GeefHoeveelheid())
+		Set DoosBerekenaarInput = ##class(zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput).%New(Rug,..Context.GeefHoeveelheid(),..BenamingVerpakkingen.Bodem)
 		Do BuilderInput.ZetVerpakkingen(DoosBerekenaar.GeefVerpakkingen(DoosBerekenaarInput))
 		Do ..Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerd).%New(##this, BuilderInput))
 
 		; Rug - Dekseldoos
-		Set BuilderInput = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput).%New(Rug,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid())
-		Set DoosBerekenaarInput = ##class(zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput).%New(Rug,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid(),..BenamingVerpakkingen.Deksel)
+		Set BuilderInput = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput).%New(Rug,..Context.GeefHoeveelheid())
+		Set DoosBerekenaarInput = ##class(zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput).%New(Rug,..Context.GeefHoeveelheid(),..BenamingVerpakkingen.Deksel)
 		Do BuilderInput.ZetVerpakkingen(DoosBerekenaar.GeefVerpakkingen(DoosBerekenaarInput))
 		Do ..Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerd).%New(##this, BuilderInput))
 		
 		; Rug - Horizontaal tussenschot
-		Set BuilderInput = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput).%New(Rug,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid())
-		Set DoosBerekenaarInput = ##class(zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput).%New(Rug,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid(),..BenamingVerpakkingen.Deksel)
+		Set BuilderInput = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput).%New(Rug,..Context.GeefHoeveelheid())
+		Set DoosBerekenaarInput = ##class(zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput).%New(Rug,..Context.GeefHoeveelheid(),..BenamingVerpakkingen.Vlak)
+		Do DoosBerekenaar.ZetVlakOrientatie(##class(TECH.enu.Orientation).Horizontal())
 		Do BuilderInput.ZetVerpakkingen(DoosBerekenaar.GeefVerpakkingen(DoosBerekenaarInput))
 		Do ..Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdHorizontaalTussenschot).%New(##this, BuilderInput))
 		
 		; Rug - Verticaal tussenschot
-		Set BuilderInput = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput).%New(Rug,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid())
-		Set DoosBerekenaarInput = ##class(zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput).%New(Rug,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid(),..BenamingVerpakkingen.Deksel)
+		Set BuilderInput = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput).%New(Rug,..Context.GeefHoeveelheid())
+		Set DoosBerekenaarInput = ##class(zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput).%New(Rug,..Context.GeefHoeveelheid(),..BenamingVerpakkingen.Vlak)
+		Do DoosBerekenaar.ZetVlakOrientatie(##class(TECH.enu.Orientation).Vertical())
 		Do BuilderInput.ZetVerpakkingen(DoosBerekenaar.GeefVerpakkingen(DoosBerekenaarInput))
 		Do ..Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdVerticaalTussenschot).%New(##this, BuilderInput))
 	}
 	
 	#dim ZijkantLinks As DOM.PM.Maatwerk.LadeInfo.Zijkant = Lade.GeefZijkant(##class(DOM.PM.Maatwerk.Lade.enu.ZijkantRol).Links())
 	if $IsObject(ZijkantLinks) {
 		; Zijkant - Bodemdoos
-		Set BuilderInput = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput).%New(ZijkantLinks,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid())
-		Set DoosBerekenaarInput = ##class(zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput).%New(ZijkantLinks,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid(),..BenamingVerpakkingen.Bodem)
+		Set BuilderInput = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput).%New(ZijkantLinks,..Context.GeefHoeveelheid())
+		Set DoosBerekenaarInput = ##class(zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput).%New(ZijkantLinks,..Context.GeefHoeveelheid(),..BenamingVerpakkingen.Bodem)
 		Do BuilderInput.ZetVerpakkingen(DoosBerekenaar.GeefVerpakkingen(DoosBerekenaarInput))
 		Do ..Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerd).%New(##this, BuilderInput))
 
 		; Zijkant - Dekseldoos
-		Set BuilderInput = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput).%New(ZijkantLinks,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid())
-		Set DoosBerekenaarInput = ##class(zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput).%New(ZijkantLinks,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid(),..BenamingVerpakkingen.Deksel)
+		Set BuilderInput = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput).%New(ZijkantLinks,..Context.GeefHoeveelheid())
+		Set DoosBerekenaarInput = ##class(zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput).%New(ZijkantLinks,..Context.GeefHoeveelheid(),..BenamingVerpakkingen.Deksel)
 		Do BuilderInput.ZetVerpakkingen(DoosBerekenaar.GeefVerpakkingen(DoosBerekenaarInput))
 		Do ..Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerd).%New(##this, BuilderInput))
 		
 		; Zijkant - Horizontaal tussenschot
-		Set BuilderInput = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput).%New(ZijkantLinks,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid())
-		Set DoosBerekenaarInput = ##class(zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput).%New(ZijkantLinks,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid(),..BenamingVerpakkingen.Deksel)
+		Set BuilderInput = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput).%New(ZijkantLinks,..Context.GeefHoeveelheid())
+		Set DoosBerekenaarInput = ##class(zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput).%New(ZijkantLinks,..Context.GeefHoeveelheid(),..BenamingVerpakkingen.Vlak)
+		Do DoosBerekenaar.ZetVlakOrientatie(##class(TECH.enu.Orientation).Horizontal())
 		Do BuilderInput.ZetVerpakkingen(DoosBerekenaar.GeefVerpakkingen(DoosBerekenaarInput))
 		Do ..Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdHorizontaalTussenschot).%New(##this, BuilderInput))
 		
 		; Zijkant - Verticaal tussenschot
-		Set BuilderInput = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput).%New(ZijkantLinks,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid())
-		Set DoosBerekenaarInput = ##class(zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput).%New(ZijkantLinks,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid(),..BenamingVerpakkingen.Deksel)
+		Set BuilderInput = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput).%New(ZijkantLinks,..Context.GeefHoeveelheid())
+		Set DoosBerekenaarInput = ##class(zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput).%New(ZijkantLinks,..Context.GeefHoeveelheid(),..BenamingVerpakkingen.Vlak)
+		Do DoosBerekenaar.ZetVlakOrientatie(##class(TECH.enu.Orientation).Vertical())
 		Do BuilderInput.ZetVerpakkingen(DoosBerekenaar.GeefVerpakkingen(DoosBerekenaarInput))
 		Do ..Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdVerticaalTussenschot).%New(##this, BuilderInput))
 	}
 	
 	#dim ZijkantRechts As DOM.PM.Maatwerk.LadeInfo.Zijkant = Lade.GeefZijkant(##class(DOM.PM.Maatwerk.Lade.enu.ZijkantRol).Rechts())
 	if $IsObject(ZijkantRechts) {
 		; Zijkant - Bodemdoos
-		Set BuilderInput = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput).%New(ZijkantRechts,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid())
-		Set DoosBerekenaarInput = ##class(zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput).%New(ZijkantRechts,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid(),..BenamingVerpakkingen.Bodem)
+		Set BuilderInput = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput).%New(ZijkantRechts,..Context.GeefHoeveelheid())
+		Set DoosBerekenaarInput = ##class(zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput).%New(ZijkantRechts,..Context.GeefHoeveelheid(),..BenamingVerpakkingen.Bodem)
 		Do BuilderInput.ZetVerpakkingen(DoosBerekenaar.GeefVerpakkingen(DoosBerekenaarInput))
 		Do ..Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerd).%New(##this, BuilderInput))
 
 		; Zijkant - Dekseldoos
-		Set BuilderInput = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput).%New(ZijkantRechts,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid())
-		Set DoosBerekenaarInput = ##class(zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput).%New(ZijkantRechts,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid(),..BenamingVerpakkingen.Deksel)
+		Set BuilderInput = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput).%New(ZijkantRechts,..Context.GeefHoeveelheid())
+		Set DoosBerekenaarInput = ##class(zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput).%New(ZijkantRechts,..Context.GeefHoeveelheid(),..BenamingVerpakkingen.Deksel)
 		Do BuilderInput.ZetVerpakkingen(DoosBerekenaar.GeefVerpakkingen(DoosBerekenaarInput))
 		Do ..Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerd).%New(##this, BuilderInput))
 		
 		; Zijkant - Horizontaal tussenschot
-		Set BuilderInput = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput).%New(ZijkantRechts,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid())
-		Set DoosBerekenaarInput = ##class(zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput).%New(ZijkantRechts,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid(),..BenamingVerpakkingen.Deksel)
+		Set BuilderInput = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput).%New(ZijkantRechts,..Context.GeefHoeveelheid())
+		Set DoosBerekenaarInput = ##class(zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput).%New(ZijkantRechts,..Context.GeefHoeveelheid(),..BenamingVerpakkingen.Vlak)
+		Do DoosBerekenaar.ZetVlakOrientatie(##class(TECH.enu.Orientation).Horizontal())
 		Do BuilderInput.ZetVerpakkingen(DoosBerekenaar.GeefVerpakkingen(DoosBerekenaarInput))
 		Do ..Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdHorizontaalTussenschot).%New(##this, BuilderInput))
 		
 		; Zijkant - Verticaal tussenschot
-		Set BuilderInput = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput).%New(ZijkantRechts,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid())
-		Set DoosBerekenaarInput = ##class(zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput).%New(ZijkantRechts,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid(),..BenamingVerpakkingen.Deksel)
+		Set BuilderInput = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput).%New(ZijkantRechts,..Context.GeefHoeveelheid())
+		Set DoosBerekenaarInput = ##class(zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput).%New(ZijkantRechts,..Context.GeefHoeveelheid(),..BenamingVerpakkingen.Vlak)
+		Do DoosBerekenaar.ZetVlakOrientatie(##class(TECH.enu.Orientation).Vertical())
 		Do BuilderInput.ZetVerpakkingen(DoosBerekenaar.GeefVerpakkingen(DoosBerekenaarInput))
 		Do ..Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdVerticaalTussenschot).%New(##this, BuilderInput))
 	}
 	
 	#dim Front As DOM.PM.Maatwerk.LadeInfo.Front = Lade.GeefFronten().GetAt(1)
 	if $IsObject(Front) {
 		; Front - Bodemdoos
-		Set BuilderInput = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput).%New(Front,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid())
-		Set DoosBerekenaarInput = ##class(zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput).%New(Front,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid(),..BenamingVerpakkingen.Bodem)
+		Set BuilderInput = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput).%New(Front,..Context.GeefHoeveelheid())
+		Set DoosBerekenaarInput = ##class(zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput).%New(Front,..Context.GeefHoeveelheid(),..BenamingVerpakkingen.Bodem)
 		Do BuilderInput.ZetVerpakkingen(DoosBerekenaar.GeefVerpakkingen(DoosBerekenaarInput))
 		Do ..Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerd).%New(##this, BuilderInput))
 
 		; Front - Dekseldoos
-		Set BuilderInput = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput).%New(Front,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid())
-		Set DoosBerekenaarInput = ##class(zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput).%New(Front,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid(),..BenamingVerpakkingen.Deksel)
+		Set BuilderInput = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput).%New(Front,..Context.GeefHoeveelheid())
+		Set DoosBerekenaarInput = ##class(zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput).%New(Front,..Context.GeefHoeveelheid(),..BenamingVerpakkingen.Deksel)
 		Do BuilderInput.ZetVerpakkingen(DoosBerekenaar.GeefVerpakkingen(DoosBerekenaarInput))
 		Do ..Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerd).%New(##this, BuilderInput))
 
 		; Front - Horizontaal tussenschot
-		Set BuilderInput = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput).%New(Front,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid())
-		Set DoosBerekenaarInput = ##class(zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput).%New(Front,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid(),..BenamingVerpakkingen.Deksel)
+		Set BuilderInput = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput).%New(Front,..Context.GeefHoeveelheid())
+		Set DoosBerekenaarInput = ##class(zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput).%New(Front,..Context.GeefHoeveelheid(),..BenamingVerpakkingen.Vlak)
+		Do DoosBerekenaar.ZetVlakOrientatie(##class(TECH.enu.Orientation).Horizontal())
 		Do BuilderInput.ZetVerpakkingen(DoosBerekenaar.GeefVerpakkingen(DoosBerekenaarInput))
 		Do ..Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdHorizontaalTussenschot).%New(##this, BuilderInput))
 
 		; Front - Verticaal tussenschot
-		Set BuilderInput = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput).%New(Front,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid())
-		Set DoosBerekenaarInput = ##class(zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput).%New(Front,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid(),..BenamingVerpakkingen.Deksel)
+		Set BuilderInput = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput).%New(Front,..Context.GeefHoeveelheid())
+		Set DoosBerekenaarInput = ##class(zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput).%New(Front,..Context.GeefHoeveelheid(),..BenamingVerpakkingen.Vlak)
+		Do DoosBerekenaar.ZetVlakOrientatie(##class(TECH.enu.Orientation).Vertical())
 		Do BuilderInput.ZetVerpakkingen(DoosBerekenaar.GeefVerpakkingen(DoosBerekenaarInput))
 		Do ..Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdVerticaalTussenschot).%New(##this, BuilderInput))
 	}
@@ -230,10 +240,10 @@
 		Set Doos.Diepte = Lade.GeefDiepteInMM()
 		Set Doos.Breedte = 200
 		Set Doos.Hoogte = 120
-		#dim AantalDozen As TECH.Numeric = ##class(TECH.Math).Ceil(..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid()/10)
-		Do ..Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdOnderdelenDoos).%New(##this, Doos.GeefKartonSpecificatieBodem(), AantalDozen, ..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid()))
+		#dim AantalDozen As TECH.Numeric = ##class(TECH.Math).Ceil(..Context.GeefHoeveelheid()/10)
+		Do ..Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdOnderdelenDoos).%New(##this, Doos.GeefKartonSpecificatieBodem(), AantalDozen, ..Context.GeefHoeveelheid()))
 		Set Doos.Hoogte = 100
-		Do ..Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdOnderdelenDoos).%New(##this, Doos.GeefKartonSpecificatieDeksel(), AantalDozen, ..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid()))
+		Do ..Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdOnderdelenDoos).%New(##this, Doos.GeefKartonSpecificatieDeksel(), AantalDozen, ..Context.GeefHoeveelheid()))
 	}
 ]]></Implementation>
 </Method>
Index: vhTestFiles/UnitTests/APPS.PM.Maatwerk.End2End.TAOR/TestTAORGewoneLadePrijzen/TestStandaardLadeVerpakking/BulkPerOnderdeelGegroepeerdVandaag.txt
===================================================================
diff -u -r29701 -r29721
--- vhTestFiles/UnitTests/APPS.PM.Maatwerk.End2End.TAOR/TestTAORGewoneLadePrijzen/TestStandaardLadeVerpakking/BulkPerOnderdeelGegroepeerdVandaag.txt	(.../BulkPerOnderdeelGegroepeerdVandaag.txt)	(revision 29701)
+++ vhTestFiles/UnitTests/APPS.PM.Maatwerk.End2End.TAOR/TestTAORGewoneLadePrijzen/TestStandaardLadeVerpakking/BulkPerOnderdeelGegroepeerdVandaag.txt	(.../BulkPerOnderdeelGegroepeerdVandaag.txt)	(revision 29721)
@@ -27,7 +27,7 @@
 VersieNr	0
 
 *** HalffabItemKosten ***
-[SamengesteldKostItem] TotaleKost : 	52.244	EUR
+[SamengesteldKostItem] TotaleKost : 	52.089	EUR
 	[SamengesteldKostItem] Zijkant : 	7.795	EUR
 		[ActiviteitKostItem] 1x Zagen
 			Kost:	1.405	EUR
@@ -182,7 +182,7 @@
 			Tijd:	4.2s
 			Activiteit:	145
 			Details:	.0243 (kost per sec) * .1 (factor) * (42 (vast) + 0 (delta breedte) + 0 (delta diepte) + 0 (delta hoogte))
-	[SamengesteldKostItem] Materiaal : 	35.713	EUR
+	[SamengesteldKostItem] Materiaal : 	35.561	EUR
 		[StandaardHFKostItem] BodemOndersteuning
 			Kost:	1.215	EUR
 			Details:	1.2154 * 1
@@ -218,7 +218,7 @@
 			Details:	102.4400 * .0401
 			Product : 1039169 - HDP.13X2450X1250 RUG   NN
 		[SamengesteldKostItem] RugWandHouder : 	0.000	EUR
-		[SamengesteldKostItem] Verpakking : 	1.168	EUR
+		[SamengesteldKostItem] Verpakking : 	1.016	EUR
 			[StandaardHFKostItem] Bodem Horizontaal
 				Kost:	0.325	EUR
 				Details:	0.3252 * 1
@@ -247,9 +247,10 @@
 			[StandaardHFKostItem] Rug Horizontaal
 				Kost:	0.081	EUR
 				Details:	0.0406 * 2
-			[StandaardHFKostItem] Rug Verticaal
-				Kost:	0.057	EUR
-				Details:	0.5720 * .1
+			[BewerktHFKostItem] Rug Verticaal
+				Kost:	0.004	EUR
+				Details:	0.5720 * .0074
+				Product : 360508 - VFF.TB 95EB ZZCARTON   BR
 			[BewerktHFKostItem] Rug bodemdoos
 				Kost:	0.039	EUR
 				Details:	0.8613 * .0454
@@ -265,9 +266,10 @@
 			[StandaardHFKostItem] Zijkant_Links Horizontaal
 				Kost:	0.106	EUR
 				Details:	0.1064 * 1
-			[StandaardHFKostItem] Zijkant_Links Verticaal
-				Kost:	0.057	EUR
-				Details:	0.5720 * .1
+			[BewerktHFKostItem] Zijkant_Links Verticaal
+				Kost:	0.008	EUR
+				Details:	0.5720 * .0135
+				Product : 360508 - VFF.TB 95EB ZZCARTON   BR
 			[BewerktHFKostItem] Zijkant_Links bodemdoos
 				Kost:	0.037	EUR
 				Details:	0.8613 * .0431
@@ -283,9 +285,10 @@
 			[StandaardHFKostItem] Zijkant_Rechts Horizontaal
 				Kost:	0.106	EUR
 				Details:	0.1064 * 1
-			[StandaardHFKostItem] Zijkant_Rechts Verticaal
-				Kost:	0.057	EUR
-				Details:	0.5720 * .1
+			[BewerktHFKostItem] Zijkant_Rechts Verticaal
+				Kost:	0.008	EUR
+				Details:	0.5720 * .0135
+				Product : 360508 - VFF.TB 95EB ZZCARTON   BR
 			[BewerktHFKostItem] Zijkant_Rechts bodemdoos
 				Kost:	0.037	EUR
 				Details:	0.8613 * .0431
@@ -320,7 +323,7 @@
 			Details:	54.9700 * .1479
 			Product : 1038761 - HDP.06X2450X1250BO-ZK  NN
 	[ProcentueelKostItem] Rework 2%
-		Kost:	1.024	EUR
+		Kost:	1.021	EUR
 		Details:	2% op kostitem TotaleKost 
 
 *** HalffabItems ***
@@ -341,15 +344,15 @@
 H	BEW	Verpakking.Onderdelendoos - Bodem	0,06378727114210985179	360508	VFF.TB 95EB ZZCARTON   BR	Verpakking	0,1	Lengte=696.8
 H	BEW	Verpakking.Onderdelendoos - Deksel	0,03661726242371403662	360508	VFF.TB 95EB ZZCARTON   BR	Verpakking	0,1	Lengte=400
 H	STD	Verpakking.Rug Horizontaal	2	1234463	VPK.TUSSRUG    TAXBLK   B	Horizontaal tussenschot
-H	STD	Verpakking.Rug Verticaal	0,1	360508	VFF.TB 95EB ZZCARTON   BR	Verticaal tussenschot
+H	BEW	Verpakking.Rug Verticaal	0,007414995640802092415	360508	VFF.TB 95EB ZZCARTON   BR	Verpakking	0,1	Lengte=81
 H	BEW	Verpakking.Rug bodemdoos	0,04540540540540540541	353743	VFF.TB143EB ZZCARTON   BR	Rug bodemdoos	0,1	Lengte=496
 H	BEW	Verpakking.Rug dekseldoos	0,06177332170880557977	360508	VFF.TB 95EB ZZCARTON   BR	Rug dekseldoos	0,1	Lengte=674.8
 H	STD	Verpakking.Zijkant_Links Horizontaal	1	1230395	VPK.TUSSZB     TAXBLK   B	Horizontaal tussenschot
-H	STD	Verpakking.Zijkant_Links Verticaal	0,1	360508	VFF.TB 95EB ZZCARTON   BR	Verticaal tussenschot
+H	BEW	Verpakking.Zijkant_Links Verticaal	0,01354838709677419355	360508	VFF.TB 95EB ZZCARTON   BR	Verpakking	0,1	Lengte=148
 H	BEW	Verpakking.Zijkant_Links bodemdoos	0,04307105492589363557	353743	VFF.TB143EB ZZCARTON   BR	Zijkant_Links bodemdoos	0,1	Lengte=470.5
 H	BEW	Verpakking.Zijkant_Links dekseldoos	0,07170575414123801221	360508	VFF.TB 95EB ZZCARTON   BR	Zijkant_Links dekseldoos	0,1	Lengte=783.3
 H	STD	Verpakking.Zijkant_Rechts Horizontaal	1	1230395	VPK.TUSSZB     TAXBLK   B	Horizontaal tussenschot
-H	STD	Verpakking.Zijkant_Rechts Verticaal	0,1	360508	VFF.TB 95EB ZZCARTON   BR	Verticaal tussenschot
+H	BEW	Verpakking.Zijkant_Rechts Verticaal	0,01354838709677419355	360508	VFF.TB 95EB ZZCARTON   BR	Verpakking	0,1	Lengte=148
 H	BEW	Verpakking.Zijkant_Rechts bodemdoos	0,04307105492589363557	353743	VFF.TB143EB ZZCARTON   BR	Zijkant_Rechts bodemdoos	0,1	Lengte=470.5
 H	BEW	Verpakking.Zijkant_Rechts dekseldoos	0,07170575414123801221	360508	VFF.TB 95EB ZZCARTON   BR	Zijkant_Rechts dekseldoos	0,1	Lengte=783.3
 H	STD	ZijkantBestukkingVooraan.Haakstuk_2	4	972777	ZF7.7W07   KLAPPE 100  ZN	Zijkantbestukking vooraan, Haakstuk, M
Index: DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFVerpakkingv001BulkPerOnderdeelGegroepeerdVerticaalTussenschot.cls.xml
===================================================================
diff -u -r29240 -r29721
--- DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFVerpakkingv001BulkPerOnderdeelGegroepeerdVerticaalTussenschot.cls.xml	(.../HFVerpakkingv001BulkPerOnderdeelGegroepeerdVerticaalTussenschot.cls.xml)	(revision 29240)
+++ DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFVerpakkingv001BulkPerOnderdeelGegroepeerdVerticaalTussenschot.cls.xml	(.../HFVerpakkingv001BulkPerOnderdeelGegroepeerdVerticaalTussenschot.cls.xml)	(revision 29721)
@@ -1,31 +1,78 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdVerticaalTussenschot">
-<Super>DOM.PM.Maatwerk.Calc.HF.IHalffabItemBuilder,DOM.PM.Maatwerk.LadeInfo.enu.LadeOnderdeel.Verwerker</Super>
+<Super>DOM.PM.Maatwerk.Calc.HF.IBewerktHalffabItemBuilder,DOM.PM.Maatwerk.LadeInfo.enu.LadeOnderdeel.Verwerker</Super>
 
+<Property name="KartonSpecificatie">
+<Type>DOM.PM.Maatwerk.Calc.HF.impl.HFBulkPerOnderdeelGegroepeerdVerpakkingKartonSpecificatie</Type>
+</Property>
+
 <Property name="Input">
 <Type>DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput</Type>
 <Private>1</Private>
 </Property>
 
-<Property name="ProductID">
-<Type>%Integer</Type>
-<InitialExpression>360508</InitialExpression>
-<Private>1</Private>
-</Property>
-
 <Method name="%OnNew">
 <FormalSpec>SamengesteldHalffabItemBuilder:DOM.PM.Maatwerk.Calc.HF.ISamengesteldHalffabItemBuilder,Input:DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
+	Set ..KartonSpecificatie = Input.Verpakkingen.GetAt(1).KartonSpecificatie
 	Set ..Input = Input
 	Set ..Rol = Input.Naam_" Verticaal" 
 	Quit ##super(SamengesteldHalffabItemBuilder)
 ]]></Implementation>
 </Method>
 
+<Method name="GeefBewerkteDimensies">
+<Private>1</Private>
+<ReturnType>%ListOfDataTypes</ReturnType>
+<Implementation><![CDATA[
+	Set Dimensies = ##class(%ListOfDataTypes).%New()
+	Do Dimensies.Insert(##class(DOM.PM.enu.BewerkingDimensie).Lengte())
+	Quit Dimensies
+]]></Implementation>
+</Method>
+
+<Method name="GeefTeBekomenAfmetingPerBewerkteDimensie">
+<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</FormalSpec>
+<Private>1</Private>
+<ReturnType>%ArrayOfDataTypes</ReturnType>
+<ReturnTypeParams>ELEMENTTYPE="%Decimal"</ReturnTypeParams>
+<Implementation><![CDATA[
+	Set Dimensies = ##class(%ArrayOfDataTypes).%New()
+	Do Dimensies.SetAt(..KartonSpecificatie.NodigeLengte,##class(DOM.PM.enu.BewerkingDimensie).Lengte())
+	Quit Dimensies
+]]></Implementation>
+</Method>
+
+<Method name="GeefHalffabListFilters">
+<Private>1</Private>
+<ReturnType>%ListOfObjects</ReturnType>
+<Implementation><![CDATA[
+ 	Set Filters = ##class(%ListOfObjects).%New()
+ 	Do Filters.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.Filter.HFListFilterKleinsteGroterDan).%New("Kartonbreedte", ..KartonSpecificatie.NodigeBreedte))
+ 	Quit Filters
+]]></Implementation>
+</Method>
+
+<Method name="GenereerKenmerken">
+<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</FormalSpec>
+<ReturnType>%ArrayOfDataTypes</ReturnType>
+<Implementation><![CDATA[
+	Set SelectieKenmerken = ##class(%ArrayOfDataTypes).%New()
+	Do SelectieKenmerken.SetAt(..KartonSpecificatie.KartonSamenstelling,"Samenstelling")
+	Quit SelectieKenmerken
+]]></Implementation>
+</Method>
+
+<Method name="GeefRolVoorHalffabSelectie">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit "Verpakking"
+]]></Implementation>
+</Method>
+
 <Method name="BuilderMoetWerken">
 <FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,Context:DOM.PM.Maatwerk.Calc.HF.HalffabContext</FormalSpec>
 <Private>1</Private>
@@ -37,31 +84,44 @@
 <Method name="GeefHalffabListToItemProcessor">
 <Private>1</Private>
 <ReturnType>DOM.PM.Maatwerk.Calc.HF.IHalffabListToItemProcessor</ReturnType>
-<Implementation><![CDATA[	Quit ##class(DOM.PM.Maatwerk.Calc.HF.impl.Processor.HFItemProcessorExactEen).%New()
+<Implementation><![CDATA[	Quit ##class(DOM.PM.Maatwerk.Calc.HF.impl.Processor.HFItemProcessorExactEenBewerkt).%New("DOM.PM.Maatwerk.Calc.HF.BewerktHalffabItem")
 ]]></Implementation>
 </Method>
 
-<Method name="BerekenHalffabLijst">
-<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,Context:DOM.PM.Maatwerk.Calc.HF.HalffabContext</FormalSpec>
-<ReturnType>%ListOfObjects</ReturnType>
-<ReturnTypeParams>ELEMENTTYPE="DOM.PM.Maatwerk.Calc.HF.Halffab"</ReturnTypeParams>
+<Method name="GeefTeBekomenAantal">
+<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Decimal</ReturnType>
+<Implementation><![CDATA[	Quit ..GeefAantalVerpakkingen(..Input.Verpakkingen)/..GeefMaximaalAantalInVerpakking(..Input.Verpakkingen)
+]]></Implementation>
+</Method>
+
+<Method name="GeefAantalVerpakkingen">
+<FormalSpec>Verpakkingen:%ListOfObjects</FormalSpec>
+<Private>1</Private>
 <Implementation><![CDATA[
-	Set Lijst = ##class(%ListOfObjects).%New()
-	Do:$length(..ProductID) Lijst.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Halffab.HalffabVerpakkingBulkPerOnderdeelGegroepeerdVerticaalTussenschot).%New(..ProductID))
-	Quit Lijst
+	#dim Aantal As TECH.Integer = 0
+	set Iterator = ##class(TECH.ListIterator).%New(Verpakkingen)
+	While Iterator.HasNext() {
+		#dim Verpakking As DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput.Verpakking = Iterator.Next()
+		Set Aantal = Aantal + Verpakking.Aantal
+	}
+	Quit Aantal
 ]]></Implementation>
 </Method>
 
-<Method name="PostProcessHalffabItem">
-<FormalSpec><![CDATA[&HalffabItem:DOM.PM.Maatwerk.Calc.HF.ConcreetHalffabItem,IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken,Context:DOM.PM.Maatwerk.Calc.HF.HalffabContext,&HalffabList:%ListOfObjects]]></FormalSpec>
+<Method name="GeefMaximaalAantalInVerpakking">
+<FormalSpec>Verpakkingen:%ListOfObjects</FormalSpec>
+<Private>1</Private>
+<ReturnType>TECH.Integer</ReturnType>
 <Implementation><![CDATA[
-	Set VerpakkingenIt = ##class(TECH.ListIterator).%New(..Input.Verpakkingen)
-	#dim TotaalAantalVerticaleTussenSchotten As TECH.Integer = 0
-	While VerpakkingenIt.HasNext() {
-		#dim Verpakking As DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput.Verpakking = VerpakkingenIt.Next()
-		Set TotaalAantalVerticaleTussenSchotten = TotaalAantalVerticaleTussenSchotten+(Verpakking.KartonSpecificatie.AantalStapels-1)
+	#dim Max As TECH.Integer = 0
+	set Iterator = ##class(TECH.ListIterator).%New(Verpakkingen)
+	While Iterator.HasNext() {
+		#dim Verpakking As DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput.Verpakking = Iterator.Next()
+		Set Max = Max + (Verpakking.Aantal * Verpakking.KartonSpecificatie.MaxInVerpakking)
 	}
-	Set HalffabItem.Aantal  = (TotaalAantalVerticaleTussenSchotten*..Input.TotaalAantalVerpakkingen)/..Input.TotaalTeVerpakken
+	Quit Max
 ]]></Implementation>
 </Method>
 </Class>
Index: vhTestFiles/UnitTests/APPS.PM.Maatwerk.End2End.TAOR/TestTAORGewoneLadePrijzen/TestStandaardBinnenladeVerpakking/BulkPerOnderdeelGegroepeerdVandaag.txt
===================================================================
diff -u -r29701 -r29721
--- vhTestFiles/UnitTests/APPS.PM.Maatwerk.End2End.TAOR/TestTAORGewoneLadePrijzen/TestStandaardBinnenladeVerpakking/BulkPerOnderdeelGegroepeerdVandaag.txt	(.../BulkPerOnderdeelGegroepeerdVandaag.txt)	(revision 29701)
+++ vhTestFiles/UnitTests/APPS.PM.Maatwerk.End2End.TAOR/TestTAORGewoneLadePrijzen/TestStandaardBinnenladeVerpakking/BulkPerOnderdeelGegroepeerdVandaag.txt	(.../BulkPerOnderdeelGegroepeerdVandaag.txt)	(revision 29721)
@@ -27,7 +27,7 @@
 VersieNr	0
 
 *** HalffabItemKosten ***
-[SamengesteldKostItem] TotaleKost : 	69.293	EUR
+[SamengesteldKostItem] TotaleKost : 	69.138	EUR
 	[SamengesteldKostItem] Zijkant : 	7.795	EUR
 		[ActiviteitKostItem] 1x Zagen
 			Kost:	1.405	EUR
@@ -237,7 +237,7 @@
 			Tijd:	4.2s
 			Activiteit:	145
 			Details:	.0243 (kost per sec) * .1 (factor) * (42 (vast) + 0 (delta breedte) + 0 (delta diepte) + 0 (delta hoogte))
-	[SamengesteldKostItem] Materiaal : 	46.428	EUR
+	[SamengesteldKostItem] Materiaal : 	46.276	EUR
 		[StandaardHFKostItem] BodemOndersteuning
 			Kost:	1.215	EUR
 			Details:	1.2154 * 1
@@ -290,7 +290,7 @@
 			Details:	102.4400 * .0401
 			Product : 1039169 - HDP.13X2450X1250 RUG   NN
 		[SamengesteldKostItem] RugWandHouder : 	0.000	EUR
-		[SamengesteldKostItem] Verpakking : 	1.431	EUR
+		[SamengesteldKostItem] Verpakking : 	1.279	EUR
 			[StandaardHFKostItem] Bodem Horizontaal
 				Kost:	0.325	EUR
 				Details:	0.3252 * 1
@@ -334,9 +334,10 @@
 			[StandaardHFKostItem] Rug Horizontaal
 				Kost:	0.081	EUR
 				Details:	0.0406 * 2
-			[StandaardHFKostItem] Rug Verticaal
-				Kost:	0.057	EUR
-				Details:	0.5720 * .1
+			[BewerktHFKostItem] Rug Verticaal
+				Kost:	0.004	EUR
+				Details:	0.5720 * .0074
+				Product : 360508 - VFF.TB 95EB ZZCARTON   BR
 			[BewerktHFKostItem] Rug bodemdoos
 				Kost:	0.039	EUR
 				Details:	0.8613 * .0454
@@ -352,9 +353,10 @@
 			[StandaardHFKostItem] Zijkant_Links Horizontaal
 				Kost:	0.106	EUR
 				Details:	0.1064 * 1
-			[StandaardHFKostItem] Zijkant_Links Verticaal
-				Kost:	0.057	EUR
-				Details:	0.5720 * .1
+			[BewerktHFKostItem] Zijkant_Links Verticaal
+				Kost:	0.008	EUR
+				Details:	0.5720 * .0135
+				Product : 360508 - VFF.TB 95EB ZZCARTON   BR
 			[BewerktHFKostItem] Zijkant_Links bodemdoos
 				Kost:	0.037	EUR
 				Details:	0.8613 * .0431
@@ -370,9 +372,10 @@
 			[StandaardHFKostItem] Zijkant_Rechts Horizontaal
 				Kost:	0.106	EUR
 				Details:	0.1064 * 1
-			[StandaardHFKostItem] Zijkant_Rechts Verticaal
-				Kost:	0.057	EUR
-				Details:	0.5720 * .1
+			[BewerktHFKostItem] Zijkant_Rechts Verticaal
+				Kost:	0.008	EUR
+				Details:	0.5720 * .0135
+				Product : 360508 - VFF.TB 95EB ZZCARTON   BR
 			[BewerktHFKostItem] Zijkant_Rechts bodemdoos
 				Kost:	0.037	EUR
 				Details:	0.8613 * .0431
@@ -407,7 +410,7 @@
 			Details:	54.9700 * .1479
 			Product : 1038761 - HDP.06X2450X1250BO-ZK  NN
 	[ProcentueelKostItem] Rework 2%
-		Kost:	1.359	EUR
+		Kost:	1.356	EUR
 		Details:	2% op kostitem TotaleKost 
 
 *** HalffabItems ***
@@ -436,15 +439,15 @@
 H	BEW	Verpakking.Onderdelendoos - Bodem	0,06378727114210985179	360508	VFF.TB 95EB ZZCARTON   BR	Verpakking	0,1	Lengte=696.8
 H	BEW	Verpakking.Onderdelendoos - Deksel	0,03661726242371403662	360508	VFF.TB 95EB ZZCARTON   BR	Verpakking	0,1	Lengte=400
 H	STD	Verpakking.Rug Horizontaal	2	1234463	VPK.TUSSRUG    TAXBLK   B	Horizontaal tussenschot
-H	STD	Verpakking.Rug Verticaal	0,1	360508	VFF.TB 95EB ZZCARTON   BR	Verticaal tussenschot
+H	BEW	Verpakking.Rug Verticaal	0,007414995640802092415	360508	VFF.TB 95EB ZZCARTON   BR	Verpakking	0,1	Lengte=81
 H	BEW	Verpakking.Rug bodemdoos	0,04540540540540540541	353743	VFF.TB143EB ZZCARTON   BR	Rug bodemdoos	0,1	Lengte=496
 H	BEW	Verpakking.Rug dekseldoos	0,06177332170880557977	360508	VFF.TB 95EB ZZCARTON   BR	Rug dekseldoos	0,1	Lengte=674.8
 H	STD	Verpakking.Zijkant_Links Horizontaal	1	1230395	VPK.TUSSZB     TAXBLK   B	Horizontaal tussenschot
-H	STD	Verpakking.Zijkant_Links Verticaal	0,1	360508	VFF.TB 95EB ZZCARTON   BR	Verticaal tussenschot
+H	BEW	Verpakking.Zijkant_Links Verticaal	0,01354838709677419355	360508	VFF.TB 95EB ZZCARTON   BR	Verpakking	0,1	Lengte=148
 H	BEW	Verpakking.Zijkant_Links bodemdoos	0,04307105492589363557	353743	VFF.TB143EB ZZCARTON   BR	Zijkant_Links bodemdoos	0,1	Lengte=470.5
 H	BEW	Verpakking.Zijkant_Links dekseldoos	0,07170575414123801221	360508	VFF.TB 95EB ZZCARTON   BR	Zijkant_Links dekseldoos	0,1	Lengte=783.3
 H	STD	Verpakking.Zijkant_Rechts Horizontaal	1	1230395	VPK.TUSSZB     TAXBLK   B	Horizontaal tussenschot
-H	STD	Verpakking.Zijkant_Rechts Verticaal	0,1	360508	VFF.TB 95EB ZZCARTON   BR	Verticaal tussenschot
+H	BEW	Verpakking.Zijkant_Rechts Verticaal	0,01354838709677419355	360508	VFF.TB 95EB ZZCARTON   BR	Verpakking	0,1	Lengte=148
 H	BEW	Verpakking.Zijkant_Rechts bodemdoos	0,04307105492589363557	353743	VFF.TB143EB ZZCARTON   BR	Zijkant_Rechts bodemdoos	0,1	Lengte=470.5
 H	BEW	Verpakking.Zijkant_Rechts dekseldoos	0,07170575414123801221	360508	VFF.TB 95EB ZZCARTON   BR	Zijkant_Rechts dekseldoos	0,1	Lengte=783.3
 H	STD	ZijkantBestukkingVooraan.Haakstuk_2	4	972777	ZF7.7W07   KLAPPE 100  ZN	Zijkantbestukking vooraan, Haakstuk, M
Index: zTryout/PBO/TAXBOG/impl/DoosBerekenaar.cls.xml
===================================================================
diff -u -r29326 -r29721
--- zTryout/PBO/TAXBOG/impl/DoosBerekenaar.cls.xml	(.../DoosBerekenaar.cls.xml)	(revision 29326)
+++ zTryout/PBO/TAXBOG/impl/DoosBerekenaar.cls.xml	(.../DoosBerekenaar.cls.xml)	(revision 29721)
@@ -39,13 +39,19 @@
 <Private>1</Private>
 </Property>
 
+<Property name="Orientatie">
+<Type>TECH.enu.Orientation</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="GeefVerpakkingen">
 <Final>1</Final>
 <FormalSpec>Input:zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput</FormalSpec>
 <ReturnType>DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput.Verpakking</ReturnType>
 <Implementation><![CDATA[
 	set ..LadeOnderdeel = Input.LadeOnderdeel
 	set ..AantalOnderdelen = Input.AantalOnderdelen
+	Set ..Orientatie = ""
 	
 	Do ..BerekenDoos()
 	set ..Verpakkingen = ##class(%ListOfObjects).%New()
@@ -111,6 +117,10 @@
 ]]></Implementation>
 </Method>
 
+<Method name="ZetVlakOrientatie">
+<FormalSpec>Orienatie:TECH.enu.Orientation</FormalSpec>
+</Method>
+
 <Method name="VerwerkBodem">
 <Final>1</Final>
 <Private>1</Private>
@@ -141,7 +151,8 @@
 <Method name="VerwerkVlak">
 <Final>1</Final>
 <Private>1</Private>
-<Implementation><![CDATA[]]></Implementation>
+<Implementation><![CDATA[	Set ..KartonSpecificatie = ..Doos.GeefKartonSpecificatieVlak(..Orientatie, ..DoosGrootte)
+]]></Implementation>
 </Method>
 
 <Method name="VerwerkWikkel">