Index: APPS/Halux/PPS/LBXVerpakking/impl/DoosBerekenaar.cls.xml
===================================================================
diff -u -r67304 -r67578
--- APPS/Halux/PPS/LBXVerpakking/impl/DoosBerekenaar.cls.xml	(.../DoosBerekenaar.cls.xml)	(revision 67304)
+++ APPS/Halux/PPS/LBXVerpakking/impl/DoosBerekenaar.cls.xml	(.../DoosBerekenaar.cls.xml)	(revision 67578)
@@ -134,16 +134,28 @@
 			Set DoosLosseOnderdelen = ##class(APPS.Halux.PPS.Verpakking.utils.StandaardHulsDefinities).LadeDiepte500()
 		} elseif (..IngegevenKenmerken.LadeDiepte = ..Enum.LadeDiepte.LadeDiepte450) {
 			Set DoosLosseOnderdelen = ##class(APPS.Halux.PPS.Verpakking.utils.StandaardHulsDefinities).LadeDiepte450()
-		} Elseif (..IngegevenKenmerken.LadeDiepte = ..Enum.LadeDiepte.LadeDiepte400) {
-			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()
 		} Else {
 			Set DoosLosseOnderdelen = ##class(APPS.Halux.PPS.Verpakking.impl.DoosLosseOnderdelen).%New()
-			Set DoosLosseOnderdelen.BreedteAndere = 43
-			Set DoosLosseOnderdelen.BreedteCorpusProfiel = 65
+			Set DoosLosseOnderdelen.BreedteAndere = ..GeefBreedteAndereLosseOnderdelen()
+			Set DoosLosseOnderdelen.BreedteCorpusProfiel = 10
 			Set DoosLosseOnderdelen.Diepte = ..IngegevenKenmerken.LadeDiepte
-			Set DoosLosseOnderdelen.Hoogte = 80
+			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)
 		}
 	}