Index: APPS/Halux/PPS/MVXVerpakking/impl/DoosBerekenaar.cls.xml
===================================================================
diff -u -r68912 -r68929
--- APPS/Halux/PPS/MVXVerpakking/impl/DoosBerekenaar.cls.xml	(.../DoosBerekenaar.cls.xml)	(revision 68912)
+++ APPS/Halux/PPS/MVXVerpakking/impl/DoosBerekenaar.cls.xml	(.../DoosBerekenaar.cls.xml)	(revision 68929)
@@ -131,12 +131,14 @@
 			If (..HeeftGeleider()) {
 				#dim Geleider as APPS.Halux.PPS.Verpakking.Volume = ..GeefVolumeGeleider()
 				#dim LadeUtils As DOM.PM.Maatwerk.Lade.LadeUtils = ##class(DOM.DomeinContext).Instance().GeefMaatwerkCalcAPI().GeefLadeUtils(..GeefLadeVariant())
-				#dim FysiekeLadeHoogteMM As %Decimal = ..GeefFysiekeLadeHoogteMM()
-				#dim IsMOfNLade As %Boolean = FysiekeLadeHoogteMM < 120
+				#dim FysiekeLadeHoogteMM As %Decimal =  LadeUtils.GeefFysiekeLadeHoogteMM(..IngegevenKenmerken.LadeHoogte, ..IngegevenKenmerken.IsBinnenlade)				
+				#dim LadeHeeftHogeRugRecept As %Boolean = ($$$Not(..IngegevenKenmerken.IsBinnenlade) && $$$Not(..IngegevenKenmerken.ZijwandType = ##class(DOM.PM.enu.MVXZijWandType).Pure()))
+				#dim HeeftComplexeScheidingKarton As %Boolean = ($$$Not(..IngegevenKenmerken.IsBinnenlade) && ((..HalffabItemsBoom.BevatRol(##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).InschuifElementZijkant()) || ..HalffabItemsBoom.BevatRol(##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).Boxcap()) || ..HalffabItemsBoom.BevatRol(##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).BoxcoverVoor()) || ..HalffabItemsBoom.BevatRol(##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).BoxcoverAchter()))))
 				
-				If ($$$Not(..IngegevenKenmerken.IsBinnenlade) && (..HeeftReling())) {
+				If LadeHeeftHogeRugRecept {
 					Set FysiekeLadeHoogteMM = LadeUtils.GeefFysiekeLadeHoogteMM(..IngegevenKenmerken.ZijkantHoogte, ..IngegevenKenmerken.IsBinnenlade)
 				}
+				#dim IsMOfNLade As %Boolean = FysiekeLadeHoogteMM < 120
 				
 				If (IsMOfNLade && (Geleider.Hoogte < Geleider.Breedte) && (Geleider.Breedte < FysiekeLadeHoogteMM)) {
 					Set DoosLosseOnderdelen.Hoogte = Geleider.Breedte
@@ -146,9 +148,14 @@
 					Set DoosLosseOnderdelen.BreedteCorpusProfiel = Geleider.Breedte
 				}
 				
-				Set DoosLosseOnderdelen.Diepte=Geleider.Diepte
+				Set DoosLosseOnderdelen.Diepte = Geleider.Diepte
 			}
-			Do ..VergrootDoosLosseOnderdelenTotZijkantHoogte(DoosLosseOnderdelen)
+			
+			If (HeeftComplexeScheidingKarton) && (DoosLosseOnderdelen.Hoogte < 101) && $$$Not(DoosLosseOnderdelen.IsStandaardHuls) {
+				Set DoosLosseOnderdelen.Hoogte = 101 //91 (hoogte M) + 10 (extra Hoogte voor recept V1 boxkap)
+			}
+			
+			Do ..VergrootDoosLosseOnderdelenTotZijkantHoogte(DoosLosseOnderdelen, FysiekeLadeHoogteMM)
 		}
 	}
 	
@@ -176,6 +183,8 @@
 <FormalSpec>DoosLade:APPS.Halux.PPS.TAORVerpakking.impl.DoosLade,DoosLosseOnderdelen:DOM.PM.Verpakking.DoosLosseOnderdelen</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
+	#dim HeeftComplexeScheidingKarton As %Boolean = ($$$Not(..IngegevenKenmerken.IsBinnenlade) && ((..HalffabItemsBoom.BevatRol(##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).InschuifElementZijkant()) || ..HalffabItemsBoom.BevatRol(##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).Boxcap()) || ..HalffabItemsBoom.BevatRol(##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).BoxcoverVoor()) || ..HalffabItemsBoom.BevatRol(##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).BoxcoverAchter()))))
+	
 	If (DoosLade.Hoogte < DoosLosseOnderdelen.GeefExterneBreedte()) {
 		// Uitzondering voor K-hoogte TOB: LO doos toch op zijn kant ipv plat => ladedoos verhogen
 		If ((..IngegevenKenmerken.LadeHoogte = ..Enum.LadeHoogte.K) && (..IngegevenKenmerken.GeleiderTechnologie = ..Enum.GeleiderTechnologie.TIPONBLUMOTION)) {
@@ -205,9 +214,26 @@
 	If DoosLade.Hoogte < DoosLosseOnderdelen.GeefExterneHoogte() {
 		set DoosLade.Hoogte = ##class(TECH.Math).Ceil(DoosLosseOnderdelen.GeefExterneHoogte(),10)	
 	}
+	
+	If (HeeftComplexeScheidingKarton) && (DoosLade.Hoogte < (101 + (2*4.2))) {
+		Set DoosLade.Hoogte = (101 + (2*4.2)) //91 (hoogte M) + 10 (extra Hoogte voor recept V1 boxkap) + 2*kartondikte
+	}
 ]]></Implementation>
 </Method>
 
+<Method name="VergrootDoosLosseOnderdelenTotZijkantHoogte">
+<FormalSpec>DoosLosseOnderdelen:APPS.Halux.PPS.Verpakking.impl.DoosLosseOnderdelen,FysiekeLadeHoogteMM:%Decimal</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	If ((FysiekeLadeHoogteMM < 120) && (DoosLosseOnderdelen.GeefExterneHoogte() < FysiekeLadeHoogteMM))	{
+		Do DoosLosseOnderdelen.ZetExterneHoogte(FysiekeLadeHoogteMM)
+	} 
+	ElseIf (DoosLosseOnderdelen.GeefExterneBreedte() < FysiekeLadeHoogteMM) {
+		Set DoosLosseOnderdelen.BreedteAndere = DoosLosseOnderdelen.BreedteAndere + (FysiekeLadeHoogteMM - DoosLosseOnderdelen.GeefExterneBreedte() - 5)
+	}
+]]></Implementation>
+</Method>
+
 <Method name="HeeftFrontBevestiging">
 <ReturnType>%Boolean</ReturnType>
 <Implementation><![CDATA[	Quit (..ZitOnderdeelInEindproduct(..Enum.Rol.FrontBevestigingBoven) || ..ZitOnderdeelInEindproduct(..Enum.Rol.FrontBevestigingOnder))