Index: APPS/Halux/PPS/MVXVerpakking/impl/DoosBerekenaar.cls.xml
===================================================================
diff -u -r68953 -r69027
--- APPS/Halux/PPS/MVXVerpakking/impl/DoosBerekenaar.cls.xml	(.../DoosBerekenaar.cls.xml)	(revision 68953)
+++ APPS/Halux/PPS/MVXVerpakking/impl/DoosBerekenaar.cls.xml	(.../DoosBerekenaar.cls.xml)	(revision 69027)
@@ -76,8 +76,12 @@
 <ReturnType>%Integer</ReturnType>
 <Implementation><![CDATA[
 	#define AfstandTussenCorpusEnInbouwBreedte 14
-	#Dim Breedte As %Integer = (..IngegevenKenmerken.InterneBreedte - $$$AfstandTussenCorpusEnInbouwBreedte)
+	#dim Breedte As %Integer = (..IngegevenKenmerken.InterneBreedte - $$$AfstandTussenCorpusEnInbouwBreedte) - 10
 	
+	If ..HeeftLODoos() && $$$Not(..HeeftHogeRugRecept()) {
+		Set Breedte = Breedte - 10
+	}
+	
 	Quit Breedte
 ]]></Implementation>
 </Method>
@@ -113,7 +117,7 @@
 	#dim FysiekeLadeHoogteMM As %Decimal =  LadeUtils.GeefFysiekeLadeHoogteMM(..IngegevenKenmerken.LadeHoogte, ..IngegevenKenmerken.IsBinnenlade)
 	
 	// Enkel afdekkappen -> geen LO doos
-	If (..HeeftFrontBevestiging() || ..HeeftGeleider() || ($$$Not(..IngegevenKenmerken.IsBinnenlade) && (..HeeftReling()))) {
+	If ..HeeftLODoos() {
 		If (..IngegevenKenmerken.LadeDiepte = ..Enum.LadeDiepte.LadeDiepte550) {
 			Set DoosLosseOnderdelen = ##class(APPS.Halux.PPS.Verpakking.utils.StandaardHulsDefinities).LadeDiepte550()
 		} Elseif (..IngegevenKenmerken.LadeDiepte = ..Enum.LadeDiepte.LadeDiepte500) {
@@ -133,10 +137,9 @@
 		
 			If (..HeeftGeleider()) {
 				#dim Geleider as APPS.Halux.PPS.Verpakking.Volume = ..GeefVolumeGeleider()
-				#dim LadeHeeftHogeRugRecept As %Boolean = ($$$Not(..IngegevenKenmerken.IsBinnenlade) && $$$Not(..IngegevenKenmerken.ZijwandType = ##class(DOM.PM.enu.MVXZijWandType).Pure()))
 				Set HeeftComplexeScheidingKarton = ($$$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 LadeHeeftHogeRugRecept {
+				If ..HeeftHogeRugRecept() {
 					Set FysiekeLadeHoogteMM = LadeUtils.GeefFysiekeLadeHoogteMM(..IngegevenKenmerken.ZijkantHoogte, ..IngegevenKenmerken.IsBinnenlade)
 				}
 				#dim IsMOfNLade As %Boolean = FysiekeLadeHoogteMM < 120
@@ -184,9 +187,7 @@
 <FormalSpec>DoosLade:APPS.Halux.PPS.TAORVerpakking.impl.DoosLade,DoosLosseOnderdelen:DOM.PM.Verpakking.DoosLosseOnderdelen</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
-	#dim LadeHeeftHogeRugRecept As %Boolean = ($$$Not(..IngegevenKenmerken.IsBinnenlade) && $$$Not(..IngegevenKenmerken.ZijwandType = ##class(DOM.PM.enu.MVXZijWandType).Pure()))
-	
-	If $$$Not(LadeHeeftHogeRugRecept) {
+	If $$$Not(..HeeftHogeRugRecept()) {
 		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)) {
@@ -259,6 +260,18 @@
 ]]></Implementation>
 </Method>
 
+<Method name="HeeftLODoos">
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit (..HeeftFrontBevestiging() || ..HeeftGeleider() || ($$$Not(..IngegevenKenmerken.IsBinnenlade) && (..HeeftReling())))
+]]></Implementation>
+</Method>
+
+<Method name="HeeftHogeRugRecept">
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit ($$$Not(..IngegevenKenmerken.IsBinnenlade) && $$$Not(..IngegevenKenmerken.ZijwandType = ##class(DOM.PM.enu.MVXZijWandType).Pure()))
+]]></Implementation>
+</Method>
+
 <Method name="GeefVolumeGeleider">
 <Private>1</Private>
 <ReturnType>DOM.PM.Verpakking.Volume</ReturnType>