Index: APPS/Halux/PPS/LBXVerpakking/impl/DoosBerekenaar.cls.xml
===================================================================
diff -u -r33850 -r36198
--- APPS/Halux/PPS/LBXVerpakking/impl/DoosBerekenaar.cls.xml	(.../DoosBerekenaar.cls.xml)	(revision 33850)
+++ APPS/Halux/PPS/LBXVerpakking/impl/DoosBerekenaar.cls.xml	(.../DoosBerekenaar.cls.xml)	(revision 36198)
@@ -197,9 +197,8 @@
 		Set DoosLade.Diepte = DoosLosseOnderdelen.GeefExterneDiepte()
 	}
 	
-	if (DoosLosseOnderdelen.IsStandaardHuls) && ( ..GeenVerhoogdeOfVerlaagdeLade() ) && (##class(TECH.StringUtils).Equals(..IngegevenKenmerken.LadeHoogte,..Enum.LadeHoogte.N,..Enum.LadeHoogte.M)) {
-		set DoosLade.Diepte = DoosLade.Diepte + 1
-		set DoosLade.Breedte = DoosLade.Breedte + 1
+	If DoosLade.Hoogte < DoosLosseOnderdelen.GeefExterneHoogte() {
+		set DoosLade.Hoogte = ##class(TECH.Math).Ceil(DoosLosseOnderdelen.GeefExterneHoogte(),10)	
 	}
 ]]></Implementation>
 </Method>
Index: vhUnitTest/APPS/Halux/PPS/LBXVerpakking/TestDoos.cls.xml
===================================================================
diff -u -r33944 -r36198
--- vhUnitTest/APPS/Halux/PPS/LBXVerpakking/TestDoos.cls.xml	(.../TestDoos.cls.xml)	(revision 33944)
+++ vhUnitTest/APPS/Halux/PPS/LBXVerpakking/TestDoos.cls.xml	(.../TestDoos.cls.xml)	(revision 36198)
@@ -208,11 +208,25 @@
 	set LBXKenmerken.LadeHoogte = ##class(DOM.PM.enu.LBXLadeHoogte).M()
 	set LBXKenmerken.RugHoogte = ##class(DOM.PM.enu.LBXLadeHoogte).M()
 	
-	Do ..AssertDoos(..GeefDoosBerekenaar(LBXKenmerken, $$$ProductId).GeefDoosLade(), 90, 1278.8, 509.4)
+	Do ..AssertDoos(..GeefDoosBerekenaar(LBXKenmerken, $$$ProductId).GeefDoosLade(), 90, 1277.8, 508.4)
 	Do ..AssertStandaardOnderdelenDoosDiepte500(..GeefDoosBerekenaar(LBXKenmerken, $$$ProductId).GeefDoosLosseOnderdelen())
 ]]></Implementation>
 </Method>
 
+<Method name="Test: N Lade diepte 500">
+<Implementation><![CDATA[
+	#define ProductId 1000000
+	
+	#dim LBXKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken = ..MaakLadeCBreedEnDiep()
+	Set LBXKenmerken.LadeDiepte = ##class(DOM.PM.enu.LBXLadeDiepte).LadeDiepte500()
+	set LBXKenmerken.LadeHoogte = ##class(DOM.PM.enu.LBXLadeHoogte).N()
+	set LBXKenmerken.RugHoogte = ##class(DOM.PM.enu.LBXLadeHoogte).N()
+	
+	Do ..AssertDoos(..GeefDoosBerekenaar(LBXKenmerken, $$$ProductId).GeefDoosLade(), 90, 1277.8, 508.4)
+	Do ..AssertStandaardOnderdelenDoosDiepte500(..GeefDoosBerekenaar(LBXKenmerken, $$$ProductId).GeefDoosLosseOnderdelen())
+]]></Implementation>
+</Method>
+
 <Method name="Test: C Lade diepte 500">
 <Implementation><![CDATA[
 	#define ProductId 1000000
@@ -250,7 +264,7 @@
 	Set LBXKenmerken.RugHoogte = ##class(DOM.PM.enu.LBXLadeHoogte).M()
 	Set LBXKenmerken.LadeDiepte = ##class(DOM.PM.enu.LBXLadeDiepte).LadeDiepte550()
 	
-	Do ..AssertDoos(..GeefDoosBerekenaar(LBXKenmerken, $$$ProductId).GeefDoosLade(), 90, 1278.8, 559.4)
+	Do ..AssertDoos(..GeefDoosBerekenaar(LBXKenmerken, $$$ProductId).GeefDoosLade(), 90, 1277.8, 558.4)
 	Do ..AssertStandaardOnderdelenDoosDiepte550(..GeefDoosBerekenaar(LBXKenmerken, $$$ProductId).GeefDoosLosseOnderdelen())
 ]]></Implementation>
 </Method>