Index: BL/PPS/TBX/OptiBox.cls.xml
===================================================================
diff -u -r34511 -r34515
--- BL/PPS/TBX/OptiBox.cls.xml	(.../OptiBox.cls.xml)	(revision 34511)
+++ BL/PPS/TBX/OptiBox.cls.xml	(.../OptiBox.cls.xml)	(revision 34515)
@@ -980,12 +980,7 @@
 	. . Set Params("LOHOOGTE") = LosseOnderdelenDoos.Hoogte
 	. . Set Params("LODIEPTE") = LosseOnderdelenDoos.Diepte
 	. . Set Params("LOCP") = LosseOnderdelenDoos.BreedteCorpusProfiel
-	. If ( (LD=500) && $Data(^zStandaardHuls(PRNr)) ) Do
-	. . Set LosseOnderdelenDoos = ##class(APPS.Halux.PPS.Verpakking.utils.StandaardHulsDefinities).LadeDiepte500()
-	. . Set Params("LOBREEDTE") = 117
-	. . Set Params("LOHOOGTE") = LosseOnderdelenDoos.Hoogte
-	. . Set Params("LODIEPTE") = LosseOnderdelenDoos.Diepte
-	. . Set Params("LOCP") = LosseOnderdelenDoos.BreedteCorpusProfiel
+	. Else  Do
 	. . If LC="N" Do ; lage rug
 	. . . Set Params("LOBREEDTE")=87 ; binnenmaten
 	. . . Set:Params("LOBREEDTE")>$$$LoBreedteMax Params("LOBREEDTE")=$$$LoBreedteMax ; max. voor onderdelen bij bv. voorraadbinnenladen
@@ -1008,14 +1003,7 @@
 	. . Set Params("BREEDTE")=Params("BREEDTE")+Params("LOHOOGTE")+(3*$$$KartonDikte)
 	
 	Set:..VoorgesnedenHuls(PRNr) Params("LOQTY")=-1
-	
-	if $$$Not(Params("LOQTY")=-1) {
-		if ( (LD=500) && $Data(^zStandaardHuls(PRNr)) ) {
-			set Params("LOQTY")=-1 
-		} elseif (LD=550) && (LosseOnderdelenDoos.IsStandaardHuls ) {
-			set Params("LOQTY")=-1 
-		}
-	}
+	if $$$Not(Params("LOQTY")=-1) set:LosseOnderdelenDoos.IsStandaardHuls Params("LOQTY")=-1
 ]]></Implementation>
 </Method>