Index: vhUnitTest/APPS/Halux/PPS/LBXVerpakking/TestDoos.cls.xml
===================================================================
diff -u -r67728 -r72575
--- vhUnitTest/APPS/Halux/PPS/LBXVerpakking/TestDoos.cls.xml	(.../TestDoos.cls.xml)	(revision 67728)
+++ vhUnitTest/APPS/Halux/PPS/LBXVerpakking/TestDoos.cls.xml	(.../TestDoos.cls.xml)	(revision 72575)
@@ -69,13 +69,6 @@
 	Do $$$AssertTrue(DoosBerekenaar.HeeftFrontBevestiging())
 
 	Do $$$AssertEquals(DoosBerekenaar.GeefKartonSpecificaties().Kinderen.Count(), 2) // er moet een losse onderdeeldoos zijn voor afdekkappen, frontbevestiging
-	
-	#dim DoosLosseOnderdelen As DOM.PM.Verpakking.DoosLosseOnderdelen = DoosBerekenaar.GeefDoosLosseOnderdelen()
-	
-	Do $$$AssertEquals(DoosLosseOnderdelen.BreedteCorpusProfiel, 10)
-	Do $$$AssertEquals(DoosLosseOnderdelen.Diepte, 270)
-	Do $$$AssertEquals(DoosLosseOnderdelen.Breedte, 38.4)
-	Do $$$AssertEquals(DoosLosseOnderdelen.BreedteAndere, 20)
 ]]></Implementation>
 </Method>
 
@@ -149,18 +142,8 @@
 	#dim LBXKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken = ..MaakLadeMSmalEnOndiep()
 	#dim DoosBerekenaar as APPS.Halux.PPS.LBXVerpakking.impl.DoosBerekenaar = ..GeefDoosBerekenaar(LBXKenmerken)
 	#dim DoosLade as DOM.PM.Verpakking.impl.Doos = DoosBerekenaar.GeefDoosLade()
-	#dim DoosLosseOnderdelen as DOM.PM.Verpakking.DoosLosseOnderdelen = DoosBerekenaar.GeefDoosLosseOnderdelen()
 	
-	Do ..AssertDoos(DoosBerekenaar.GeefDoosLade() , 90 , 346.8 , 278.4)
-		
-	Do $$$AssertEquals(DoosLosseOnderdelen.Hoogte, 81.6)
-	Do $$$AssertEquals(DoosLosseOnderdelen.Breedte, 88.4)
-	Do $$$AssertEquals(DoosLosseOnderdelen.Diepte, 270)
-	Do $$$AssertEquals(DoosLosseOnderdelen.GeefExterneHoogte(), 90)
-	Do $$$AssertEquals(DoosLosseOnderdelen.GeefExterneBreedte(), 96.8)
-	Do $$$AssertEquals(DoosLosseOnderdelen.GeefExterneDiepte(), 278.4)
-	Do $$$AssertEquals(DoosLosseOnderdelen.BreedteCorpusProfiel, 60) // Geleider zit met kortste kant in breedte van de doos
-	Do $$$AssertEquals(DoosLosseOnderdelen.BreedteAndere, 20)
+	Do ..AssertDoos(DoosBerekenaar.GeefDoosLade() , 90 , 381.8 , 284)
 ]]></Implementation>
 </Method>
 
@@ -170,18 +153,8 @@
 	Set LBXKenmerken.IsBinnenlade = $$$True
 	
 	#dim DoosBerekenaar as APPS.Halux.PPS.LBXVerpakking.impl.DoosBerekenaar = ..GeefDoosBerekenaar(LBXKenmerken)
-	#dim DoosLosseOnderdelen as DOM.PM.Verpakking.DoosLosseOnderdelen = DoosBerekenaar.GeefDoosLosseOnderdelen()
 
-	Do ..AssertDoos(DoosBerekenaar.GeefDoosLade() , 200 , 1224.4 , 608.4)
-	
-	Do $$$AssertEquals(DoosLosseOnderdelen.Hoogte, 60)
-	Do $$$AssertEquals(DoosLosseOnderdelen.Breedte, 186.6)
-	Do $$$AssertEquals(DoosLosseOnderdelen.Diepte, 600)
-	Do $$$AssertEquals(DoosLosseOnderdelen.GeefExterneHoogte(), 60 + (2 * ..#KartonDikte))
-	Do $$$AssertEquals(DoosLosseOnderdelen.GeefExterneBreedte(), 195) 
-	Do $$$AssertEquals(DoosLosseOnderdelen.GeefExterneDiepte(), 600 + (2 * ..#KartonDikte))
-	Do $$$AssertEquals(DoosLosseOnderdelen.BreedteCorpusProfiel, 67)
-	Do $$$AssertEquals(DoosLosseOnderdelen.BreedteAndere, DoosLosseOnderdelen.Breedte - 67 - (2 * ..#KartonDikte))
+	Do ..AssertDoos(DoosBerekenaar.GeefDoosLade() , 200 , 1244.4 , 614)
 ]]></Implementation>
 </Method>
 
@@ -206,7 +179,7 @@
 	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, 1288.8, 515)
+	Do ..AssertDoos(..GeefDoosBerekenaar(LBXKenmerken, $$$ProductId).GeefDoosLade(), 90, 1287.8, 514)
 	Do ..AssertStandaardOnderdelenDoosDiepte500(..GeefDoosBerekenaar(LBXKenmerken, $$$ProductId).GeefDoosLosseOnderdelen())
 ]]></Implementation>
 </Method>
@@ -220,7 +193,7 @@
 	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, 1288.8, 465)
+	Do ..AssertDoos(..GeefDoosBerekenaar(LBXKenmerken, $$$ProductId).GeefDoosLade(), 90, 1287.8, 464)
 	Do ..AssertStandaardOnderdelenDoosDiepte450(..GeefDoosBerekenaar(LBXKenmerken, $$$ProductId).GeefDoosLosseOnderdelen())
 ]]></Implementation>
 </Method>
@@ -234,7 +207,7 @@
 	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, 1288.8, 515)
+	Do ..AssertDoos(..GeefDoosBerekenaar(LBXKenmerken, $$$ProductId).GeefDoosLade(), 90, 1287.8, 514)
 	Do ..AssertStandaardOnderdelenDoosDiepte500(..GeefDoosBerekenaar(LBXKenmerken, $$$ProductId).GeefDoosLosseOnderdelen())
 ]]></Implementation>
 </Method>
@@ -248,7 +221,7 @@
 	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, 1288.8, 465)
+	Do ..AssertDoos(..GeefDoosBerekenaar(LBXKenmerken, $$$ProductId).GeefDoosLade(), 90, 1287.8, 464)
 	Do ..AssertStandaardOnderdelenDoosDiepte450(..GeefDoosBerekenaar(LBXKenmerken, $$$ProductId).GeefDoosLosseOnderdelen())
 ]]></Implementation>
 </Method>
@@ -290,7 +263,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, 1288.8, 565)
+	Do ..AssertDoos(..GeefDoosBerekenaar(LBXKenmerken, $$$ProductId).GeefDoosLade(), 90, 1287.8, 564)
 	Do ..AssertStandaardOnderdelenDoosDiepte550(..GeefDoosBerekenaar(LBXKenmerken, $$$ProductId).GeefDoosLosseOnderdelen())
 ]]></Implementation>
 </Method>
@@ -304,46 +277,11 @@
 	Set LBXKenmerken.RugHoogte = ##class(DOM.PM.enu.LBXLadeHoogte).M()
 	Set LBXKenmerken.LadeDiepte = ##class(DOM.PM.enu.LBXLadeDiepte).LadeDiepte400()
 	
-	Do ..AssertDoos(..GeefDoosBerekenaar(LBXKenmerken, $$$ProductId).GeefDoosLade(), 90, 1288.8, 415)
+	Do ..AssertDoos(..GeefDoosBerekenaar(LBXKenmerken, $$$ProductId).GeefDoosLade(), 90, 1287.8, 414)
 	Do ..AssertStandaardOnderdelenDoosDiepte400(..GeefDoosBerekenaar(LBXKenmerken, $$$ProductId).GeefDoosLosseOnderdelen())
 ]]></Implementation>
 </Method>
 
-<Method name="Test afmeting Breedte andere van de LO doos MLade met Tip-on Blumotion geleider">
-<Implementation><![CDATA[
-	#dim LBXKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken = ..MaakLadeMSmalEnOndiep()
-	Set LBXKenmerken.GeleiderTechnologie = ##class(DOM.PM.enu.LBXGeleiderTechnologie).TIPONBLUMOTION()
-	
-	#Dim DoosBerekenaar as APPS.Halux.PPS.LBXVerpakking.impl.DoosBerekenaar = ..GeefDoosBerekenaar(LBXKenmerken)
-	#dim DoosLosseOnderdelen as DOM.PM.Verpakking.DoosLosseOnderdelen = DoosBerekenaar.GeefDoosLosseOnderdelen()	
-	
-	Do $$$AssertEquals(DoosLosseOnderdelen.BreedteAndere, 20)
-]]></Implementation>
-</Method>
-
-<Method name="Test afmetingen van de doos en de LO doos KLade met Tip-on Blumotion geleider en set van meenemers en eenheden">
-<Implementation><![CDATA[
-	#dim LBXKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken = ..MaakLadeMSmalEnOndiep()
-	Set LBXKenmerken.LadeHoogte = ##class(DOM.PM.enu.LBXLadeHoogte).K()
-	Set LBXKenmerken.RugHoogte = ##class(DOM.PM.enu.LBXLadeHoogte).K()
-	Set LBXKenmerken.GeleiderTechnologie = ##class(DOM.PM.enu.LBXGeleiderTechnologie).TIPONBLUMOTION()
-	
-	#Dim DoosBerekenaar as APPS.Halux.PPS.LBXVerpakking.impl.DoosBerekenaar = ..GeefDoosBerekenaar(LBXKenmerken)
-	#dim DoosLosseOnderdelen as DOM.PM.Verpakking.DoosLosseOnderdelen = DoosBerekenaar.GeefDoosLosseOnderdelen()
-	
-	Do ..AssertDoos(DoosBerekenaar.GeefDoosLade(), 140, 318.4, 278.4)
-
-	Do $$$AssertEquals(DoosLosseOnderdelen.Breedte, 126.6)
-	Do $$$AssertEquals(DoosLosseOnderdelen.BreedteCorpusProfiel, 67)
-	Do $$$AssertEquals(DoosLosseOnderdelen.BreedteAndere,51.2)
-	Do $$$AssertEquals(DoosLosseOnderdelen.Diepte, 270)
-	Do $$$AssertEquals(DoosLosseOnderdelen.Hoogte, 60)
-	Do $$$AssertEquals(DoosLosseOnderdelen.GeefExterneHoogte(), 60 + (2 * ..#KartonDikte))
-	Do $$$AssertEquals(DoosLosseOnderdelen.GeefExterneDiepte(), 270 + (2 * ..#KartonDikte))
-	Do $$$AssertEquals(DoosLosseOnderdelen.GeefExterneBreedte(), 126.6 + (2 * ..#KartonDikte))
-]]></Implementation>
-</Method>
-
 <Method name="TestKartonSpecs">
 <Implementation><![CDATA[
 	#dim LBXKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken = ..MaakLadeCBreedEnDiep()
@@ -358,12 +296,12 @@
 		
 		Set AantalSpecs = AantalSpecs + 1
 		If (KartonSpec.BenamingVerpakkingsOnderdeel = ##class(DOM.PM.Verpakking.enu.BenamingVerpakkingsOnderdeel).DoosMetDeksel()) {
-			Do $$$AssertEquals(+$J(KartonSpec.NodigeBreedte, 0, 0), 1681, "Breedte van DoosMetDeksel")
-			Do $$$AssertEquals(+$J(KartonSpec.NodigeLengte, 0, 0), 1961, "Lengte van DoosMetDeksel")
+			Do $$$AssertEquals(+$J(KartonSpec.NodigeBreedte, 0, 0), 1692, "Breedte van DoosMetDeksel")
+			Do $$$AssertEquals(+$J(KartonSpec.NodigeLengte, 0, 0), 1981, "Lengte van DoosMetDeksel")
 			Do $$$AssertEquals(KartonSpec.KartonSamenstelling, ##class(DOM.PM.Verpakking.enu.KartonSamenstelling).Dun(), "Kartonsamenstelling = EB")
 		} ElseIf (KartonSpec.BenamingVerpakkingsOnderdeel = ##class(DOM.PM.Verpakking.enu.BenamingVerpakkingsOnderdeel).DoosLosseOnderdelen()) {
-			Do $$$AssertEquals(+$J(KartonSpec.NodigeBreedte, 0, 0), 820, "Breedte van DoosLosseOnderdelen")
-			Do $$$AssertEquals(+$J(KartonSpec.NodigeLengte, 0, 0), 513, "Lengte van DoosLosseOnderdelen")
+			Do $$$AssertEquals(+$J(KartonSpec.NodigeBreedte, 0, 0), 860, "Breedte van DoosLosseOnderdelen")
+			Do $$$AssertEquals(+$J(KartonSpec.NodigeLengte, 0, 0), 467, "Lengte van DoosLosseOnderdelen")
 			Do $$$AssertEquals(KartonSpec.KartonSamenstelling, ##class(DOM.PM.Verpakking.enu.KartonSamenstelling).Dun(), "Kartonsamenstelling = EB")
 		} Else {
 			Do $$$AssertTrue(0, "Alleen DoosMetDeksel en Losse onderdelen zijn mogelijk")
Index: APPS/Halux/PPS/LBXVerpakking/impl/DoosBerekenaar.cls.xml
===================================================================
diff -u -r67727 -r72575
--- APPS/Halux/PPS/LBXVerpakking/impl/DoosBerekenaar.cls.xml	(.../DoosBerekenaar.cls.xml)	(revision 67727)
+++ APPS/Halux/PPS/LBXVerpakking/impl/DoosBerekenaar.cls.xml	(.../DoosBerekenaar.cls.xml)	(revision 72575)
@@ -128,7 +128,11 @@
 	// Enkel afdekkappen -> geen LO doos
 	If (..HeeftFrontBevestiging() || ..HeeftGeleider()) {
 			
-		If (..IngegevenKenmerken.LadeDiepte = ..Enum.LadeDiepte.LadeDiepte550) {
+		If (..IngegevenKenmerken.LadeDiepte = ..Enum.LadeDiepte.LadeDiepte650) {
+			Set DoosLosseOnderdelen = ##class(APPS.Halux.PPS.Verpakking.utils.StandaardHulsDefinities).LadeDiepte650()
+		} Elseif (..IngegevenKenmerken.LadeDiepte = ..Enum.LadeDiepte.LadeDiepte600) {
+			Set DoosLosseOnderdelen = ##class(APPS.Halux.PPS.Verpakking.utils.StandaardHulsDefinities).LadeDiepte600()
+		} Elseif (..IngegevenKenmerken.LadeDiepte = ..Enum.LadeDiepte.LadeDiepte550) {
 			Set DoosLosseOnderdelen = ##class(APPS.Halux.PPS.Verpakking.utils.StandaardHulsDefinities).LadeDiepte550()
 		} Elseif (..IngegevenKenmerken.LadeDiepte = ..Enum.LadeDiepte.LadeDiepte500) {
 			Set DoosLosseOnderdelen = ##class(APPS.Halux.PPS.Verpakking.utils.StandaardHulsDefinities).LadeDiepte500()
@@ -138,28 +142,16 @@
 			Set DoosLosseOnderdelen = ##class(APPS.Halux.PPS.Verpakking.utils.StandaardHulsDefinities).LadeDiepte400()
 		} Elseif (..IngegevenKenmerken.LadeDiepte = ..Enum.LadeDiepte.LadeDiepte350) {
 			Set DoosLosseOnderdelen = ##class(APPS.Halux.PPS.Verpakking.utils.StandaardHulsDefinities).LadeDiepte350()
+		} Elseif (..IngegevenKenmerken.LadeDiepte = ..Enum.LadeDiepte.LadeDiepte300) {
+			Set DoosLosseOnderdelen = ##class(APPS.Halux.PPS.Verpakking.utils.StandaardHulsDefinities).LadeDiepte300()
+		} Elseif (..IngegevenKenmerken.LadeDiepte = ..Enum.LadeDiepte.LadeDiepte270) {
+			Set DoosLosseOnderdelen = ##class(APPS.Halux.PPS.Verpakking.utils.StandaardHulsDefinities).LadeDiepte270()
 		} Else {
 			Set DoosLosseOnderdelen = ##class(APPS.Halux.PPS.Verpakking.impl.DoosLosseOnderdelen).%New()
 			Set DoosLosseOnderdelen.BreedteAndere = ..GeefBreedteAndereLosseOnderdelen()
-			Set DoosLosseOnderdelen.BreedteCorpusProfiel = 10
+			Set DoosLosseOnderdelen.BreedteCorpusProfiel = 65
 			Set DoosLosseOnderdelen.Diepte = ..IngegevenKenmerken.LadeDiepte
-			Set DoosLosseOnderdelen.Hoogte = 50
-		
-			If (..HeeftGeleider()) {
-				#Dim Geleider as APPS.Halux.PPS.Verpakking.Volume = ..GeefVolumeGeleider()
-				
-				#define IsMOfNLade (..GeefFysiekeLadeHoogteMM() < 120)
-				If ($$$IsMOfNLade && (Geleider.Hoogte < Geleider.Breedte) && (Geleider.Breedte < ..GeefFysiekeLadeHoogteMM())) {
-					Set DoosLosseOnderdelen.Hoogte = Geleider.Breedte
-					Set DoosLosseOnderdelen.BreedteCorpusProfiel = Geleider.Hoogte
-				} Else {
-					Set DoosLosseOnderdelen.Hoogte = Geleider.Hoogte
-					Set DoosLosseOnderdelen.BreedteCorpusProfiel = Geleider.Breedte
-				}
-				
-				Set DoosLosseOnderdelen.Diepte=Geleider.Diepte
-			}
-			Do ..VergrootDoosLosseOnderdelenTotZijkantHoogte(DoosLosseOnderdelen)
+			Set DoosLosseOnderdelen.Hoogte = 80
 		}
 	}
 	
@@ -171,14 +163,8 @@
 <Private>1</Private>
 <ReturnType>TECH.Numeric</ReturnType>
 <Implementation><![CDATA[
-	#dim Breedte As TECH.Numeric = 20
-	If (..ZitOnderdeelInEindproduct(..Enum.Rol.TiponBlumotionEenheid)) {
-		#define TiponBlumotionEenheidBreedte 75
-		Set Breedte = $$$TiponBlumotionEenheidBreedte
-	} ElseIf (..ZitOnderdeelInEindproduct(..Enum.Rol.TiponBlumotionMeenemer)) {
-		#define TiponBlumotionMeenemerBreedte 68
-		Set Breedte = $$$TiponBlumotionMeenemerBreedte
-	}
+	#dim Breedte As TECH.Numeric = 40
+	
 	Quit Breedte
 ]]></Implementation>
 </Method>
@@ -188,13 +174,7 @@
 <Private>1</Private>
 <Implementation><![CDATA[
 	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)) {
-			Set DoosLade.Breedte = DoosLade.Breedte + DoosLosseOnderdelen.GeefExterneHoogte()
-			Set DoosLade.Hoogte = DoosLosseOnderdelen.GeefExterneBreedte() + 5
-		} Else {
-			Set DoosLade.Breedte = DoosLade.Breedte + DoosLosseOnderdelen.GeefExterneBreedte()
-		}
+		Set DoosLade.Breedte = DoosLade.Breedte + DoosLosseOnderdelen.GeefExterneBreedte()
 	} Else {
 		Set DoosLade.Breedte = DoosLade.Breedte + DoosLosseOnderdelen.GeefExterneHoogte()
 	}
@@ -203,13 +183,8 @@
 		Set DoosLade.Diepte = DoosLosseOnderdelen.GeefExterneDiepte()
 		Set:(DoosLosseOnderdelen.IsStandaardHuls) DoosLade.Diepte = ##class(TECH.Math).Ceil(DoosLade.Diepte) + 5
 	}
-	
-	if (DoosLosseOnderdelen.IsStandaardHuls) && ( ..IsGeenVerhoogdeOfVerlaagdeLade() ) && (##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 (DoosLosseOnderdelen.IsStandaardHuls) && (##class(TECH.StringUtils).Equals(..IngegevenKenmerken.LadeHoogte,..Enum.LadeHoogte.N, ..Enum.LadeHoogte.M)) {
+	If (DoosLosseOnderdelen.IsStandaardHuls) && (##class(TECH.StringUtils).Equals(..IngegevenKenmerken.LadeHoogte,..Enum.LadeHoogte.N, ..Enum.LadeHoogte.M)) {
 		Set DoosLade.Breedte = DoosLade.Breedte + 10
 	}
 	
@@ -264,21 +239,9 @@
 	#Dim Hoogte As %Numeric
 	#Dim Diepte As %Numeric = ..IngegevenKenmerken.LadeDiepte
 	
-	If (..IngegevenKenmerken.GeleiderTechnologie = ..Enum.GeleiderTechnologie.TIPON) {
-		Set Breedte = 70
-		Set Hoogte = 57
-	} Else {
-		Set Breedte = 67
-		Set Hoogte = 60
-	}
+	Set Breedte = 65
+	Set Hoogte = 80
 	
-	If (..IngegevenKenmerken.Draagkracht >= 50) {
-		#define RobuustereGeleiderExtraBreedte 5
-		Set Breedte = Breedte + $$$RobuustereGeleiderExtraBreedte
-		#define RobuustereGeleiderExtraHoogte 5
-		Set Hoogte = Hoogte + $$$RobuustereGeleiderExtraHoogte
-	}
-	
 	Quit ..GeefVolume(Diepte, Breedte, Hoogte)
 ]]></Implementation>
 </Method>
Index: APPS/Halux/PPS/Verpakking/utils/StandaardHulsDefinities.cls.xml
===================================================================
diff -u -r67305 -r72575
--- APPS/Halux/PPS/Verpakking/utils/StandaardHulsDefinities.cls.xml	(.../StandaardHulsDefinities.cls.xml)	(revision 67305)
+++ APPS/Halux/PPS/Verpakking/utils/StandaardHulsDefinities.cls.xml	(.../StandaardHulsDefinities.cls.xml)	(revision 72575)
@@ -3,6 +3,48 @@
 <Class name="APPS.Halux.PPS.Verpakking.utils.StandaardHulsDefinities">
 <Super>TECH.RegisteredObject</Super>
 
+<Method name="LadeDiepte700">
+<ClassMethod>1</ClassMethod>
+<ReturnType>APPS.Halux.PPS.Verpakking.impl.DoosLosseOnderdelen</ReturnType>
+<Implementation><![CDATA[
+	set DoosLosseOnderdelen = ##class(APPS.Halux.PPS.Verpakking.impl.DoosLosseOnderdelen).%New()
+	set DoosLosseOnderdelen.IsStandaardHuls = $$$true 
+	set DoosLosseOnderdelen.BreedteAndere = 40
+	set DoosLosseOnderdelen.BreedteCorpusProfiel = 65
+	set DoosLosseOnderdelen.Diepte = 700
+	set DoosLosseOnderdelen.Hoogte = 80
+	quit DoosLosseOnderdelen
+]]></Implementation>
+</Method>
+
+<Method name="LadeDiepte650">
+<ClassMethod>1</ClassMethod>
+<ReturnType>APPS.Halux.PPS.Verpakking.impl.DoosLosseOnderdelen</ReturnType>
+<Implementation><![CDATA[
+	set DoosLosseOnderdelen = ##class(APPS.Halux.PPS.Verpakking.impl.DoosLosseOnderdelen).%New()
+	set DoosLosseOnderdelen.IsStandaardHuls = $$$true 
+	set DoosLosseOnderdelen.BreedteAndere = 40
+	set DoosLosseOnderdelen.BreedteCorpusProfiel = 65
+	set DoosLosseOnderdelen.Diepte = 650
+	set DoosLosseOnderdelen.Hoogte = 80
+	quit DoosLosseOnderdelen
+]]></Implementation>
+</Method>
+
+<Method name="LadeDiepte600">
+<ClassMethod>1</ClassMethod>
+<ReturnType>APPS.Halux.PPS.Verpakking.impl.DoosLosseOnderdelen</ReturnType>
+<Implementation><![CDATA[
+	set DoosLosseOnderdelen = ##class(APPS.Halux.PPS.Verpakking.impl.DoosLosseOnderdelen).%New()
+	set DoosLosseOnderdelen.IsStandaardHuls = $$$true 
+	set DoosLosseOnderdelen.BreedteAndere = 40
+	set DoosLosseOnderdelen.BreedteCorpusProfiel = 65
+	set DoosLosseOnderdelen.Diepte = 600
+	set DoosLosseOnderdelen.Hoogte = 80
+	quit DoosLosseOnderdelen
+]]></Implementation>
+</Method>
+
 <Method name="LadeDiepte550">
 <ClassMethod>1</ClassMethod>
 <ReturnType>APPS.Halux.PPS.Verpakking.impl.DoosLosseOnderdelen</ReturnType>
@@ -72,6 +114,34 @@
 	quit DoosLosseOnderdelen
 ]]></Implementation>
 </Method>
+
+<Method name="LadeDiepte300">
+<ClassMethod>1</ClassMethod>
+<ReturnType>APPS.Halux.PPS.Verpakking.impl.DoosLosseOnderdelen</ReturnType>
+<Implementation><![CDATA[
+	set DoosLosseOnderdelen = ##class(APPS.Halux.PPS.Verpakking.impl.DoosLosseOnderdelen).%New()
+	set DoosLosseOnderdelen.IsStandaardHuls = $$$true 
+	set DoosLosseOnderdelen.BreedteAndere = 40
+	set DoosLosseOnderdelen.BreedteCorpusProfiel = 65
+	set DoosLosseOnderdelen.Diepte = 300
+	set DoosLosseOnderdelen.Hoogte = 80
+	quit DoosLosseOnderdelen
+]]></Implementation>
+</Method>
+
+<Method name="LadeDiepte270">
+<ClassMethod>1</ClassMethod>
+<ReturnType>APPS.Halux.PPS.Verpakking.impl.DoosLosseOnderdelen</ReturnType>
+<Implementation><![CDATA[
+	set DoosLosseOnderdelen = ##class(APPS.Halux.PPS.Verpakking.impl.DoosLosseOnderdelen).%New()
+	set DoosLosseOnderdelen.IsStandaardHuls = $$$true 
+	set DoosLosseOnderdelen.BreedteAndere = 40
+	set DoosLosseOnderdelen.BreedteCorpusProfiel = 65
+	set DoosLosseOnderdelen.Diepte = 270
+	set DoosLosseOnderdelen.Hoogte = 80
+	quit DoosLosseOnderdelen
+]]></Implementation>
+</Method>
 </Class>