Index: APPS/Halux/PPS/TAORVerpakking/impl/KartonSnijService.cls.xml
===================================================================
diff -u -r33477 -r56939
--- APPS/Halux/PPS/TAORVerpakking/impl/KartonSnijService.cls.xml	(.../KartonSnijService.cls.xml)	(revision 33477)
+++ APPS/Halux/PPS/TAORVerpakking/impl/KartonSnijService.cls.xml	(.../KartonSnijService.cls.xml)	(revision 56939)
@@ -18,6 +18,11 @@
 <Private>1</Private>
 </Property>
 
+<Property name="IngegevenKenmerken">
+<Type>DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
 <FormalSpec>ProductID:%String</FormalSpec>
 <Private>1</Private>
@@ -29,9 +34,10 @@
 	#dim MaatwerkProduct As DOM.PM.MaatwerkProduct = ProductTypeAPI.GeefMaatwerkProduct(ProductID)
 	#dim HalffabItemsBoom As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = MaatwerkProduct.GeefHalffabItemsBoom(##class(DOM.PM.Maatwerk.Calc.Common.enu.BerekeningWijze).ProductieAansturing())
 	
+	Set ..IngegevenKenmerken = MaatwerkProduct.GeefProductSpecificatie().GeefIngegevenKenmerken()
 	Set ..ProductID = ProductID
 	Set ..Optibox = ##class(BL.Prod.OptiBox.Optimize).%New()
-	Set ..DoosBerekenaar = ##class(APPS.Halux.PPS.TAORVerpakking.impl.DoosBerekenaar).%New(HalffabItemsBoom, MaatwerkProduct.GeefProductSpecificatie().GeefIngegevenKenmerken(), ProductID)
+	Set ..DoosBerekenaar = ##class(APPS.Halux.PPS.TAORVerpakking.impl.DoosBerekenaar).%New(HalffabItemsBoom, ..IngegevenKenmerken, ProductID)
 	
 	Quit $$$OK
 ]]></Implementation>
@@ -41,7 +47,12 @@
 <FormalSpec>BaseRef:%String="",CallBack:%List,SnijPrioriteit:%Integer,MachineID:BL.Prod.OptiBox.enu.SnijMachine,Qty:%Integer</FormalSpec>
 <Implementation><![CDATA[
 	#dim DoosLade As APPS.Halux.PPS.TAORVerpakking.impl.DoosLade = ..DoosBerekenaar.GeefDoosLade()
-	If $IsObject(DoosLade) Do DoosLade.Snij(..Optibox,BaseRef, ..ProductID, .CallBack, .SnijPrioriteit, .MachineID,.Qty)
+	If $IsObject(DoosLade) Do DoosLade.Snij(..Optibox, BaseRef, ..ProductID, .CallBack, .SnijPrioriteit, .MachineID, .Qty)
+	
+	If ((..IngegevenKenmerken.VerpakkingType = ##class(DOM.PM.enu.TAORVerpakkingType).FlatpackProbox()) && (..IngegevenKenmerken.IsBinnenlade)) {
+		#dim DoosLadeFlatpackProboxFront As APPS.Halux.PPS.TAORVerpakking.impl.DoosLade = ..DoosBerekenaar.GeefDoosLadeFlatpackProboxFront()
+		If $IsObject(DoosLadeFlatpackProboxFront) Do DoosLadeFlatpackProboxFront.Snij(..Optibox, BaseRef, ..ProductID, .CallBack, .SnijPrioriteit, .MachineID, .Qty)
+	}
 ]]></Implementation>
 </Method>
 
@@ -59,6 +70,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="HeeftDoosLadeFlatpackProboxFront">
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit $IsObject(..DoosBerekenaar.GeefDoosLadeFlatpackProboxFront())
+]]></Implementation>
+</Method>
+
 <Method name="HeeftDoosLosseOnderdelen">
 <ReturnType>%Boolean</ReturnType>
 <Implementation><![CDATA[	Quit $IsObject(..DoosBerekenaar.GeefDoosLosseOnderdelen())