Index: vhUnitTest/APPS/Halux/PPS/TAORVerpakking/TestDoos.cls.xml
===================================================================
diff -u -r30573 -r32925
--- vhUnitTest/APPS/Halux/PPS/TAORVerpakking/TestDoos.cls.xml	(.../TestDoos.cls.xml)	(revision 30573)
+++ vhUnitTest/APPS/Halux/PPS/TAORVerpakking/TestDoos.cls.xml	(.../TestDoos.cls.xml)	(revision 32925)
@@ -141,29 +141,30 @@
 ]]></Implementation>
 </Method>
 
-<Method name="TestLageLadeMetStandaardOnderdelenHuls">
+<Method name="TestLadeMetStandaardOnderdelenHuls">
 <Implementation><![CDATA[
 	set ..TAORKenmerken.LadeDiepte = ..Enum.LadeDiepte.LadeDiepte550
 	
-	do ..AssertStandaardHuls(..TAORKenmerken, 90, 678.8)
-]]></Implementation>
-</Method>
-
-<Method name="TestNLadeMetStandaardOnderdelenHuls">
-<Implementation><![CDATA[
-	set ..TAORKenmerken.LadeDiepte = ..Enum.LadeDiepte.LadeDiepte550
+	#define ProductId 1000000
+	set ^zStandaardHuls($$$ProductId) = 1
+	
 	set ..TAORKenmerken.LadeHoogte = ..Enum.LadeHoogte.N
+	do ..AssertDoosLade(..TAORKenmerken, $$$ProductId,88.4, 679.8, 559.4)
+	do ..AssertStandaardOnderdelenDoos(..TAORKenmerken, $$$ProductId)
 	
-	do ..AssertStandaardHuls(..TAORKenmerken, 88.4, 678.8)
-]]></Implementation>
-</Method>
-
-<Method name="TestHogeLadeMetStandaardOnderdelenHuls">
-<Implementation><![CDATA[
+	set ..TAORKenmerken.LadeHoogte = ..Enum.LadeHoogte.M
+	do ..AssertDoosLade(..TAORKenmerken, $$$ProductId,90, 679.8, 559.4)
+	do ..AssertStandaardOnderdelenDoos(..TAORKenmerken, $$$ProductId)
+	
+	set ..TAORKenmerken.LadeHoogte = ..Enum.LadeHoogte.C
+	do ..AssertDoosLade(..TAORKenmerken, $$$ProductId,180 , 645.4,558.4)
+	do ..AssertStandaardOnderdelenDoos(..TAORKenmerken, $$$ProductId)
+	
 	set ..TAORKenmerken.LadeHoogte = ..Enum.LadeHoogte.F
-	set ..TAORKenmerken.LadeDiepte = ..Enum.LadeDiepte.LadeDiepte550
+	do ..AssertDoosLade(..TAORKenmerken, $$$ProductId,245, 645.4,558.4)
+	do ..AssertStandaardOnderdelenDoos(..TAORKenmerken, $$$ProductId)
 	
-	do ..AssertStandaardHuls(..TAORKenmerken, 245, 645.4)
+	Kill ^zStandaardHuls($$$ProductId)
 ]]></Implementation>
 </Method>
 
@@ -215,32 +216,35 @@
 ]]></Implementation>
 </Method>
 
-<Method name="AssertStandaardHuls">
-<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken,VerwachteHoogte:TECH.Numeric,VerwachteBreedte:TECH.Numeric</FormalSpec>
+<Method name="AssertDoosLade">
+<FormalSpec>LBXKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken,ProductId:%String,VerwachteHoogte:TECH.Numeric,VerwachteBreedte:TECH.Numeric,VerwachteDiepte:TECH.Numeric</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
-	set ^zStandaardHuls(1000000) = 1
+	#dim DoosLade as DOM.PM.Verpakking.impl.Doos = ..GeefDoosBerekenaar(LBXKenmerken,ProductId).GeefDoosLade()
 	
-	#dim DoosBerekenaar As APPS.Halux.PPS.TAORVerpakking.impl.DoosBerekenaar = ..GeefDoosBerekenaar(IngegevenKenmerken, 1000000)
-	#dim DoosLade As APPS.Halux.PPS.TAORVerpakking.impl.DoosLade = DoosBerekenaar.GeefDoosLade()
-	#dim DoosLosseOnderdelen As APPS.Halux.PPS.TAORVerpakking.impl.DoosLosseOnderdelen = DoosBerekenaar.GeefDoosLosseOnderdelen()
-	
-	do $$$AssertEquals(DoosLade.Breedte, VerwachteBreedte)
-	do $$$AssertEquals(DoosLade.Hoogte, VerwachteHoogte)
-	do $$$AssertEquals(DoosLade.Diepte, 558.4)
-	do $$$AssertEquals(DoosLosseOnderdelen.Hoogte, 80)
-	do $$$AssertEquals(DoosLosseOnderdelen.Breedte, 65 + 40 + (4 * ..#KartonDikte) - (2 * ..#KartonDikte))
-	do $$$AssertEquals(DoosLosseOnderdelen.Diepte, 550)
-	do $$$AssertEquals(DoosLosseOnderdelen.GeefExterneHoogte(), 80 + (2 * ..#KartonDikte))
-	do $$$AssertEquals(DoosLosseOnderdelen.GeefExterneBreedte(), 65 + 40 + (4 * ..#KartonDikte))
-	do $$$AssertEquals(DoosLosseOnderdelen.GeefExterneDiepte(), 550 + (2 * ..#KartonDikte))
-	do $$$AssertEquals(DoosLosseOnderdelen.BreedteCorpusProfiel, 65)
-	do $$$AssertEquals(DoosLosseOnderdelen.BreedteAndere, 40)
-	
-	kill ^zStandaardHuls(1000000)
+	Do $$$AssertEquals(DoosLade.Breedte, VerwachteBreedte)
+	Do $$$AssertEquals(DoosLade.Hoogte, VerwachteHoogte)
+	Do $$$AssertEquals(DoosLade.Diepte, VerwachteDiepte)
 ]]></Implementation>
 </Method>
 
+<Method name="AssertStandaardOnderdelenDoos">
+<FormalSpec>LBXKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken,ProductId:%String</FormalSpec>
+<Implementation><![CDATA[
+	#dim DoosLosseOnderdelen as DOM.PM.Verpakking.DoosLosseOnderdelen = ..GeefDoosBerekenaar(LBXKenmerken,ProductId).GeefDoosLosseOnderdelen()
+
+	Do $$$AssertEquals(DoosLosseOnderdelen.IsStandaardHuls,$$$true)
+	Do $$$AssertEquals(DoosLosseOnderdelen.Hoogte, 80)
+	Do $$$AssertEquals(DoosLosseOnderdelen.Breedte, 65 + 40 + (4 * ..#KartonDikte) - (2 * ..#KartonDikte))
+	Do $$$AssertEquals(DoosLosseOnderdelen.Diepte, 550)
+	Do $$$AssertEquals(DoosLosseOnderdelen.GeefExterneHoogte(), 80 + (2 * ..#KartonDikte)) // LO doos is plat en breed
+	Do $$$AssertEquals(DoosLosseOnderdelen.GeefExterneBreedte(), 65 + 40 + (4 * ..#KartonDikte)) // Verbreed tot ladehoogte - 5mm
+	Do $$$AssertEquals(DoosLosseOnderdelen.GeefExterneDiepte(), 550 + (2 * ..#KartonDikte))
+	Do $$$AssertEquals(DoosLosseOnderdelen.BreedteCorpusProfiel, 65)
+	Do $$$AssertEquals(DoosLosseOnderdelen.BreedteAndere, 40)
+]]></Implementation>
+</Method>
+
 <Method name="GeefDoosBerekenaar">
 <FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken,ProductID:DOM.common.ProductID="ProductID"</FormalSpec>
 <Private>1</Private>
Index: vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/TestStandaardHulzen/OptiboxRequests_Verpakking.txt
===================================================================
diff -u -r32574 -r32925
--- vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/TestStandaardHulzen/OptiboxRequests_Verpakking.txt	(.../OptiboxRequests_Verpakking.txt)	(revision 32574)
+++ vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/TestStandaardHulzen/OptiboxRequests_Verpakking.txt	(.../OptiboxRequests_Verpakking.txt)	(revision 32925)
@@ -75,15 +75,15 @@
   <BOX>
     <BOXDEF>
       <BOXSELECT>TAORBOX V1 SELFSTANDING</BOXSELECT>
-      <DEPTH>558.4</DEPTH>
+      <DEPTH>559.4</DEPTH>
       <HEIGHT>90</HEIGHT>
       <LEVEL>BIT</LEVEL>
       <OPTITYPE>BOX</OPTITYPE>
       <PLACE>PALLET</PLACE>
       <PRODUCT>TA4M D LI7L550x600   NNNN</PRODUCT>
       <REF>TAOR.222222.9</REF>
       <WEIGHT>0</WEIGHT>
-      <WIDTH>715.8</WIDTH>
+      <WIDTH>716.8</WIDTH>
     </BOXDEF>
   </BOX>
   <PRIORITY>9</PRIORITY>
@@ -98,15 +98,15 @@
   <BOX>
     <BOXDEF>
       <BOXSELECT>TAORBOX V1 SELFSTANDING</BOXSELECT>
-      <DEPTH>558.4</DEPTH>
+      <DEPTH>559.4</DEPTH>
       <HEIGHT>88.4</HEIGHT>
       <LEVEL>BIT</LEVEL>
       <OPTITYPE>BOX</OPTITYPE>
       <PLACE>PALLET</PLACE>
       <PRODUCT>TA4N D LI7K550x600   NNNN</PRODUCT>
       <REF>TAOR.222222.10</REF>
       <WEIGHT>0</WEIGHT>
-      <WIDTH>715.8</WIDTH>
+      <WIDTH>716.8</WIDTH>
     </BOXDEF>
   </BOX>
   <PRIORITY>9</PRIORITY>
Index: APPS/Halux/PPS/LBXVerpakking/impl/DoosBerekenaar.cls.xml
===================================================================
diff -u -r31474 -r32925
--- APPS/Halux/PPS/LBXVerpakking/impl/DoosBerekenaar.cls.xml	(.../DoosBerekenaar.cls.xml)	(revision 31474)
+++ APPS/Halux/PPS/LBXVerpakking/impl/DoosBerekenaar.cls.xml	(.../DoosBerekenaar.cls.xml)	(revision 32925)
@@ -109,12 +109,13 @@
 <Private>1</Private>
 <ReturnType>DOM.PM.Verpakking.DoosLosseOnderdelen</ReturnType>
 <Implementation><![CDATA[
-	#Dim DoosLosseOnderdelen As APPS.Halux.PPS.Verpakking.DoosLosseOnderdelen = ""
+	#Dim DoosLosseOnderdelen As DOM.PM.Verpakking.DoosLosseOnderdelen = ""
 	
 	// Enkel afdekkappen -> geen LO doos
 	If (..HeeftFrontBevestiging() || ..HeeftGeleider()) {
 			Set DoosLosseOnderdelen = ##class(APPS.Halux.PPS.TAORVerpakking.impl.DoosLosseOnderdelen).%New()
 		If ((..IngegevenKenmerken.LadeDiepte = ..Enum.LadeDiepte.LadeDiepte550) && $Data(^zStandaardHuls(..ProductID))) {
+			Set DoosLosseOnderdelen.IsStandaardHuls = $$$true 
 			Set DoosLosseOnderdelen.BreedteAndere = 40
 			Set DoosLosseOnderdelen.BreedteCorpusProfiel = 65
 			Set DoosLosseOnderdelen.Diepte = 550
@@ -182,6 +183,11 @@
 	If DoosLade.Diepte < DoosLosseOnderdelen.GeefExterneDiepte() {
 		Set DoosLade.Diepte = DoosLosseOnderdelen.GeefExterneDiepte()
 	}
+	
+	if DoosLosseOnderdelen.IsStandaardHuls && ##class(TECH.StringUtils).Equals(..IngegevenKenmerken.LadeHoogte,..Enum.LadeHoogte.N,..Enum.LadeHoogte.M) {
+		set DoosLade.Diepte = DoosLade.Diepte + 1
+		set DoosLade.Breedte = DoosLade.Breedte + 1
+	}
 ]]></Implementation>
 </Method>
 
Index: APPS/Halux/PPS/TAORVerpakking/impl/DoosBerekenaar.cls.xml
===================================================================
diff -u -r31480 -r32925
--- APPS/Halux/PPS/TAORVerpakking/impl/DoosBerekenaar.cls.xml	(.../DoosBerekenaar.cls.xml)	(revision 31480)
+++ APPS/Halux/PPS/TAORVerpakking/impl/DoosBerekenaar.cls.xml	(.../DoosBerekenaar.cls.xml)	(revision 32925)
@@ -84,6 +84,7 @@
 	If (..HeeftGlijder() || ..HeeftBodemOndersteuningDieMoetVerpaktWorden()) {
 		Set DoosLosseOnderdelen = ##class(APPS.Halux.PPS.TAORVerpakking.impl.DoosLosseOnderdelen).%New()
 		If ((..IngegevenKenmerken.LadeDiepte = ..Enum.LadeDiepte.LadeDiepte550) && $Data(^zStandaardHuls(..ProductID))) {
+			Set DoosLosseOnderdelen.IsStandaardHuls = $$$true
 			Set DoosLosseOnderdelen.BreedteAndere = 40
 			Set DoosLosseOnderdelen.BreedteCorpusProfiel = 65
 			Set DoosLosseOnderdelen.Diepte = 550
@@ -220,6 +221,11 @@
 	If (DoosLade.Diepte < DoosLosseOnderdelen.GeefExterneDiepte()) {
 		Set DoosLade.Diepte = DoosLosseOnderdelen.GeefExterneDiepte()
 	}
+
+	if DoosLosseOnderdelen.IsStandaardHuls && ##class(TECH.StringUtils).Equals(..IngegevenKenmerken.LadeHoogte,..Enum.LadeHoogte.N,..Enum.LadeHoogte.M) {
+		set DoosLade.Diepte = DoosLade.Diepte + 1
+		set DoosLade.Breedte = DoosLade.Breedte + 1
+	}
 ]]></Implementation>
 </Method>
 </Class>
Index: DOM/PM/Verpakking/DoosLosseOnderdelen.cls.xml
===================================================================
diff -u -r29318 -r32925
--- DOM/PM/Verpakking/DoosLosseOnderdelen.cls.xml	(.../DoosLosseOnderdelen.cls.xml)	(revision 29318)
+++ DOM/PM/Verpakking/DoosLosseOnderdelen.cls.xml	(.../DoosLosseOnderdelen.cls.xml)	(revision 32925)
@@ -12,6 +12,10 @@
 <Type>%Decimal</Type>
 </Property>
 
+<Property name="IsStandaardHuls">
+<Type>%Boolean</Type>
+</Property>
+
 <Method name="GeefExterneDiepte">
 <Abstract>1</Abstract>
 <ReturnType>%Decimal</ReturnType>
Index: vhUnitTest/APPS/Halux/PPS/LBXVerpakking/TestDoos.cls.xml
===================================================================
diff -u -r32363 -r32925
--- vhUnitTest/APPS/Halux/PPS/LBXVerpakking/TestDoos.cls.xml	(.../TestDoos.cls.xml)	(revision 32363)
+++ vhUnitTest/APPS/Halux/PPS/LBXVerpakking/TestDoos.cls.xml	(.../TestDoos.cls.xml)	(revision 32925)
@@ -183,33 +183,53 @@
 
 <Method name="TestHogeLadeMetStandaardHulsBijLadeDiepte550">
 <Implementation><![CDATA[
+	#define ProductId 1000000
+	Set ^zStandaardHuls($$$ProductId) = 1
+
 	#dim LBXKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken = ..MaakLadeCBreedEnDiep()
 	Set LBXKenmerken.LadeDiepte = ##class(DOM.PM.enu.LBXLadeDiepte).LadeDiepte550()
-	Do ..StandaardHulsTest(LBXKenmerken, 180, 1244.4)
+	
+	Do ..AssertDoosLade(LBXKenmerken, $$$ProductId, 180, 1244.4, 558.4)
+	Do ..AssertStandaardOnderdelenDoos(LBXKenmerken,$$$ProductId)
+	
+	Kill ^zStandaardHuls(1000000)
 ]]></Implementation>
 </Method>
 
 <Method name="TestLageLadeMetStandaardHulsBijLadeDiepte550">
 <Implementation><![CDATA[
+	#define ProductId 1000000
+	Set ^zStandaardHuls($$$ProductId) = 1
+	
 	#dim LBXKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken = ..MaakLadeCBreedEnDiep()
 	Set LBXKenmerken.LadeHoogte = ##class(DOM.PM.enu.LBXLadeHoogte).M()
 	Set LBXKenmerken.LadeDiepte = ##class(DOM.PM.enu.LBXLadeDiepte).LadeDiepte550()
-	Do ..StandaardHulsTest(LBXKenmerken, 90, 1277.8)
+	
+	Do ..AssertDoosLade(LBXKenmerken, $$$ProductId, 90, 1278.8, 559.4)
+	Do ..AssertStandaardOnderdelenDoos(LBXKenmerken,$$$ProductId)
+	
+	Kill ^zStandaardHuls($$$ProductId)
 ]]></Implementation>
 </Method>
 
-<Method name="StandaardHulsTest">
-<FormalSpec>LBXKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken,VerwachteHoogte:TECH.Numeric,VerwachteBreedte:TECH.Numeric</FormalSpec>
+<Method name="AssertDoosLade">
+<FormalSpec>LBXKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken,ProductId:%String,VerwachteHoogte:TECH.Numeric,VerwachteBreedte:TECH.Numeric,VerwachteDiepte:TECH.Numeric</FormalSpec>
+<Private>1</Private>
 <Implementation><![CDATA[
-	Set ^zStandaardHuls(1000000) = 1
+	#dim DoosLade as DOM.PM.Verpakking.impl.Doos = ..GeefDoosBerekenaar(LBXKenmerken,ProductId).GeefDoosLade()
 	
-	#Dim DoosBerekenaar as APPS.Halux.PPS.LBXVerpakking.impl.DoosBerekenaar = ..GeefDoosBerekenaar(LBXKenmerken,1000000)
-	#dim DoosLade as DOM.PM.Verpakking.impl.Doos = DoosBerekenaar.GeefDoosLade()
-	#dim DoosLosseOnderdelen as DOM.PM.Verpakking.DoosLosseOnderdelen = DoosBerekenaar.GeefDoosLosseOnderdelen()
-
 	Do $$$AssertEquals(DoosLade.Breedte, VerwachteBreedte)
 	Do $$$AssertEquals(DoosLade.Hoogte, VerwachteHoogte)
-	Do $$$AssertEquals(DoosLade.Diepte, 558.4)
+	Do $$$AssertEquals(DoosLade.Diepte, VerwachteDiepte)
+]]></Implementation>
+</Method>
+
+<Method name="AssertStandaardOnderdelenDoos">
+<FormalSpec>LBXKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken,ProductId:%String</FormalSpec>
+<Implementation><![CDATA[
+	#dim DoosLosseOnderdelen as DOM.PM.Verpakking.DoosLosseOnderdelen = ..GeefDoosBerekenaar(LBXKenmerken,ProductId).GeefDoosLosseOnderdelen()
+
+	Do $$$AssertEquals(DoosLosseOnderdelen.IsStandaardHuls,$$$true)
 	Do $$$AssertEquals(DoosLosseOnderdelen.Hoogte, 80)
 	Do $$$AssertEquals(DoosLosseOnderdelen.Breedte, 65 + 40 + (4 * ..#KartonDikte) - (2 * ..#KartonDikte))
 	Do $$$AssertEquals(DoosLosseOnderdelen.Diepte, 550)
@@ -218,8 +238,6 @@
 	Do $$$AssertEquals(DoosLosseOnderdelen.GeefExterneDiepte(), 550 + (2 * ..#KartonDikte))
 	Do $$$AssertEquals(DoosLosseOnderdelen.BreedteCorpusProfiel, 65)
 	Do $$$AssertEquals(DoosLosseOnderdelen.BreedteAndere, 40)
-	
-	Kill ^zStandaardHuls(1000000)
 ]]></Implementation>
 </Method>