Index: DOM/PM/Verpakking/impl/DoosBerekenaar.cls.xml
===================================================================
diff -u -r31245 -r31474
--- DOM/PM/Verpakking/impl/DoosBerekenaar.cls.xml	(.../DoosBerekenaar.cls.xml)	(revision 31245)
+++ DOM/PM/Verpakking/impl/DoosBerekenaar.cls.xml	(.../DoosBerekenaar.cls.xml)	(revision 31474)
@@ -29,6 +29,11 @@
 <Private>1</Private>
 </Property>
 
+<Property name="ProductID">
+<Type>DOM.common.ProductID</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
 <FormalSpec>HalffabItemsBoom:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom,IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</FormalSpec>
 <ReturnType>%Status</ReturnType>
Index: APPS/Halux/PPS/LBXVerpakking/impl/DoosBerekenaar.cls.xml
===================================================================
diff -u -r31248 -r31474
--- APPS/Halux/PPS/LBXVerpakking/impl/DoosBerekenaar.cls.xml	(.../DoosBerekenaar.cls.xml)	(revision 31248)
+++ APPS/Halux/PPS/LBXVerpakking/impl/DoosBerekenaar.cls.xml	(.../DoosBerekenaar.cls.xml)	(revision 31474)
@@ -4,7 +4,7 @@
 <Description>
 Doosberekenaar voor LEGRABOX.  We gebruiken dezelfde dozen als voor TA'OR BOX, vandaar dat we
 het dependencies hebben op TA'OR BOX doosklassen.</Description>
-<Super>DOM.PM.Verpakking.impl.DoosBerekenaar</Super>
+<Super>DOM.PM.Verpakking.impl.DoosBerekenaar,DOM.PM.Maatwerk.LBX.impl.Base</Super>
 
 <Property name="IngegevenKenmerken">
 <Type>DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken</Type>
@@ -16,11 +16,6 @@
 <Private>1</Private>
 </Property>
 
-<Property name="ProductID">
-<Type>DOM.common.ProductID</Type>
-<Private>1</Private>
-</Property>
-
 <Method name="%OnNew">
 <FormalSpec>HalffabItemsBoom:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom,IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken,BreedteBepaler:APPS.PM.Maatwerk.impl.Verpakking.BreedteBepaler,ProductID:DOM.common.ProductID="ProductID"</FormalSpec>
 <ReturnType>%Status</ReturnType>
@@ -46,7 +41,7 @@
 
 <Method name="HeeftLadeIndividueleKartonverpakking">
 <ReturnType>%Boolean</ReturnType>
-<Implementation><![CDATA[	Quit (..IngegevenKenmerken.VerpakkingType = ##class(DOM.PM.enu.LBXVerpakkingType).V1())
+<Implementation><![CDATA[	Quit (..IngegevenKenmerken.VerpakkingType = ..Enum.VerpakkingType.V1)
 ]]></Implementation>
 </Method>
 
@@ -119,7 +114,7 @@
 	// Enkel afdekkappen -> geen LO doos
 	If (..HeeftFrontBevestiging() || ..HeeftGeleider()) {
 			Set DoosLosseOnderdelen = ##class(APPS.Halux.PPS.TAORVerpakking.impl.DoosLosseOnderdelen).%New()
-		If ..IngegevenKenmerken.LadeDiepte = ##class(DOM.PM.enu.LBXLadeDiepte).LadeDiepte550() && $Data(^zStandaardHuls(..ProductID)) {
+		If ((..IngegevenKenmerken.LadeDiepte = ..Enum.LadeDiepte.LadeDiepte550) && $Data(^zStandaardHuls(..ProductID))) {
 			Set DoosLosseOnderdelen.BreedteAndere = 40
 			Set DoosLosseOnderdelen.BreedteCorpusProfiel = 65
 			Set DoosLosseOnderdelen.Diepte = 550
@@ -157,10 +152,10 @@
 <ReturnType>TECH.Numeric</ReturnType>
 <Implementation><![CDATA[
 	#dim Breedte As TECH.Numeric = 20
-	If ..ZitOnderdeelInEindproduct(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).TiponBlumotionEenheid()) {
+	If (..ZitOnderdeelInEindproduct(..Enum.Rol.TiponBlumotionEenheid)) {
 		#define TiponBlumotionEenheidBreedte 75
 		Set Breedte = $$$TiponBlumotionEenheidBreedte
-	} ElseIf ..ZitOnderdeelInEindproduct(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).TiponBlumotionMeenemer()) {
+	} ElseIf (..ZitOnderdeelInEindproduct(..Enum.Rol.TiponBlumotionMeenemer)) {
 		#define TiponBlumotionMeenemerBreedte 68
 		Set Breedte = $$$TiponBlumotionMeenemerBreedte
 	}
@@ -174,7 +169,7 @@
 <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 = ##class(DOM.PM.enu.LBXLadeHoogte).K()) && (..IngegevenKenmerken.GeleiderTechnologie = ##class(DOM.PM.enu.LBXGeleiderTechnologie).TIPONBLUMOTION())) {
+		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 {
@@ -190,49 +185,40 @@
 ]]></Implementation>
 </Method>
 
-<Method name="IsGeleiderTechnologieTipon">
-<Private>1</Private>
-<ReturnType>%Boolean</ReturnType>
-<Implementation><![CDATA[	Quit (..IngegevenKenmerken.GeleiderTechnologie = ##class(DOM.PM.enu.LBXGeleiderTechnologie).TIPON())
-]]></Implementation>
-</Method>
-
 <Method name="HeeftAfdekkappen">
 <ReturnType>%Boolean</ReturnType>
-<Implementation><![CDATA[
-	Quit ..ZitOnderdeelInEindproduct(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).AfdekkapBinnen())
-		|| ..ZitOnderdeelInEindproduct(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).AfdekkapBuiten())
+<Implementation><![CDATA[	Quit (..ZitOnderdeelInEindproduct(..Enum.Rol.AfdekkapBinnen) || ..ZitOnderdeelInEindproduct(..Enum.Rol.AfdekkapBuiten))
 ]]></Implementation>
 </Method>
 
 <Method name="HeeftFrontBevestiging">
 <ReturnType>%Boolean</ReturnType>
-<Implementation><![CDATA[	Quit ..ZitOnderdeelInEindproduct(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).FrontBevestiging())
+<Implementation><![CDATA[	Quit ..ZitOnderdeelInEindproduct(..Enum.Rol.FrontBevestiging)
 ]]></Implementation>
 </Method>
 
 <Method name="HeeftGeleider">
 <ReturnType>%Boolean</ReturnType>
-<Implementation><![CDATA[	Quit ..ZitOnderdeelInEindproduct(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).Geleider())
+<Implementation><![CDATA[	Quit ..ZitOnderdeelInEindproduct(..Enum.Rol.Geleider)
 ]]></Implementation>
 </Method>
 
 <Method name="HeeftOpvullijst">
 <ReturnType>%Boolean</ReturnType>
-<Implementation><![CDATA[	Quit ..ZitOnderdeelInEindproduct(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).Opvullijst())
+<Implementation><![CDATA[	Quit ..ZitOnderdeelInEindproduct(..Enum.Rol.Opvullijst)
 ]]></Implementation>
 </Method>
 
 <Method name="HeeftZijstabilisering">
 <ReturnType>%Boolean</ReturnType>
-<Implementation><![CDATA[	Quit ..ZitOnderdeelInEindproduct(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).Zijstabilisering())
+<Implementation><![CDATA[	Quit ..ZitOnderdeelInEindproduct(..Enum.Rol.Zijstabilisering)
 ]]></Implementation>
 </Method>
 
 <Method name="HeeftTransportBeveiliging">
 <Private>1</Private>
 <ReturnType>%Boolean</ReturnType>
-<Implementation><![CDATA[	Quit ..ZitOnderdeelInEindproduct(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).TransportZekerheid())
+<Implementation><![CDATA[	Quit ..ZitOnderdeelInEindproduct(..Enum.Rol.TransportZekerheid)
 ]]></Implementation>
 </Method>
 
@@ -244,7 +230,7 @@
 	#Dim Hoogte As %Numeric
 	#Dim Diepte As %Numeric = ..IngegevenKenmerken.LadeDiepte
 	
-	If (..IsGeleiderTechnologieTipon()) {
+	If (..IngegevenKenmerken.GeleiderTechnologie = ..Enum.GeleiderTechnologie.TIPON) {
 		Set Breedte = 70
 		Set Hoogte = 57
 	} Else {
Index: DOM/PM/Maatwerk/LBX/impl/BaseEnums.cls.xml
===================================================================
diff -u -r31443 -r31474
--- DOM/PM/Maatwerk/LBX/impl/BaseEnums.cls.xml	(.../BaseEnums.cls.xml)	(revision 31443)
+++ DOM/PM/Maatwerk/LBX/impl/BaseEnums.cls.xml	(.../BaseEnums.cls.xml)	(revision 31474)
@@ -23,6 +23,10 @@
 <Type>DOM.PM.enu.LBXKlasse.AutoComplete</Type>
 </Property>
 
+<Property name="LadeDiepte">
+<Type>DOM.PM.enu.LBXLadeDiepte.AutoComplete</Type>
+</Property>
+
 <Property name="LadeHoogte">
 <Type>DOM.PM.enu.LBXLadeHoogte.AutoComplete</Type>
 </Property>
Index: APPS/Halux/PPS/TAORVerpakking/impl/DoosBerekenaar.cls.xml
===================================================================
diff -u -r31248 -r31474
--- APPS/Halux/PPS/TAORVerpakking/impl/DoosBerekenaar.cls.xml	(.../DoosBerekenaar.cls.xml)	(revision 31248)
+++ APPS/Halux/PPS/TAORVerpakking/impl/DoosBerekenaar.cls.xml	(.../DoosBerekenaar.cls.xml)	(revision 31474)
@@ -1,18 +1,13 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="APPS.Halux.PPS.TAORVerpakking.impl.DoosBerekenaar">
-<Super>DOM.PM.Verpakking.impl.DoosBerekenaar</Super>
+<Super>DOM.PM.Verpakking.impl.DoosBerekenaar,DOM.PM.Maatwerk.TAX.impl.Base</Super>
 
 <Property name="IngegevenKenmerken">
 <Type>DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken</Type>
 <Private>1</Private>
 </Property>
 
-<Property name="ProductID">
-<Type>DOM.common.ProductID</Type>
-<Private>1</Private>
-</Property>
-
 <Method name="%OnNew">
 <FormalSpec>HalffabItemsBoom:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom,IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken,ProductID:DOM.common.ProductID="ProductID"</FormalSpec>
 <ReturnType>%Status</ReturnType>
@@ -44,7 +39,7 @@
 
 <Method name="HeeftLadeIndividueleKartonverpakking">
 <ReturnType>%Boolean</ReturnType>
-<Implementation><![CDATA[	Quit ..IngegevenKenmerken.VerpakkingType = ##class(DOM.PM.enu.TAORVerpakkingType).V1()
+<Implementation><![CDATA[	Quit ..IngegevenKenmerken.VerpakkingType = ..Enum.VerpakkingType.V1
 ]]></Implementation>
 </Method>
 
@@ -74,7 +69,7 @@
 <Method name="HeeftOpvullijst">
 <Private>1</Private>
 <ReturnType>%Boolean</ReturnType>
-<Implementation><![CDATA[	Quit ..ZitOnderdeelInEindproduct(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).Opvullijst())
+<Implementation><![CDATA[	Quit ..ZitOnderdeelInEindproduct(..Enum.Rol.Opvullijst)
 ]]></Implementation>
 </Method>
 
@@ -84,10 +79,11 @@
 <Implementation><![CDATA[
 	#Dim LadeUtils As DOM.PM.Maatwerk.Lade.LadeUtils.impl.TAORLadeUtils = ##class(DOM.PM.Maatwerk.Lade.LadeUtils.impl.TAORLadeUtils).%New()
 	#Dim FysiekeLadeHoogteMM As %Decimal = LadeUtils.GeefFysiekeLadeHoogteMM(..IngegevenKenmerken.LadeHoogte, ..IngegevenKenmerken.IsBinnenlade)
-	#Dim DoosLosseOnderdelen As APPS.Halux.PPS.TAORVerpakking.impl.DoosLosseOnderdelen = ""
-	If ..HeeftGlijder() || ..HeeftBodemOndersteuningDieMoetVerpaktWorden() {
+	#Dim DoosLosseOnderdelen As DOM.PM.Verpakking.DoosLosseOnderdelen = ""
+	
+	If (..HeeftGlijder() || ..HeeftBodemOndersteuningDieMoetVerpaktWorden()) {
 		Set DoosLosseOnderdelen = ##class(APPS.Halux.PPS.TAORVerpakking.impl.DoosLosseOnderdelen).%New()
-		If (..IngegevenKenmerken.LadeDiepte = ##class(DOM.PM.enu.TAORLadeDiepte).LadeDiepte550()) && $Data(^zStandaardHuls(..ProductID)) {
+		If ((..IngegevenKenmerken.LadeDiepte = ..Enum.LadeDiepte.LadeDiepte550) && $Data(^zStandaardHuls(..ProductID))) {
 			Set DoosLosseOnderdelen.BreedteAndere = 40
 			Set DoosLosseOnderdelen.BreedteCorpusProfiel = 65
 			Set DoosLosseOnderdelen.Diepte = 550
@@ -138,21 +134,21 @@
 <Method name="HeeftGlijder">
 <Private>1</Private>
 <ReturnType>%Boolean</ReturnType>
-<Implementation><![CDATA[	Quit ..ZitOnderdeelInEindproduct(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).Glijder())
+<Implementation><![CDATA[	Quit ..ZitOnderdeelInEindproduct(..Enum.Rol.Glijder)
 ]]></Implementation>
 </Method>
 
 <Method name="IsGlijderTypeTandem">
 <Private>1</Private>
 <ReturnType>%Boolean</ReturnType>
-<Implementation><![CDATA[	Quit (..IngegevenKenmerken.GlijderType = ##class(DOM.PM.enu.TAORGlijderType).Tandem())
+<Implementation><![CDATA[	Quit (..IngegevenKenmerken.GlijderType = ..Enum.GlijderType.Tandem)
 ]]></Implementation>
 </Method>
 
 <Method name="IsGlijderTypeMovento">
 <Private>1</Private>
 <ReturnType>%Boolean</ReturnType>
-<Implementation><![CDATA[	Quit (..IngegevenKenmerken.GlijderType = ##class(DOM.PM.enu.TAORGlijderType).Movento())
+<Implementation><![CDATA[	Quit (..IngegevenKenmerken.GlijderType = ..Enum.GlijderType.Movento)
 ]]></Implementation>
 </Method>
 
@@ -191,15 +187,15 @@
 <Method name="HeeftBodemOndersteuningDieMoetVerpaktWorden">
 <Private>1</Private>
 <ReturnType>%Boolean</ReturnType>
-<Implementation><![CDATA[	Quit (..ZitOnderdeelInEindproduct(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).BodemOndersteuning()) && $$$Not(..IngegevenKenmerken.IsBinnenlade))
+<Implementation><![CDATA[	Quit (..ZitOnderdeelInEindproduct(..Enum.Rol.BodemOndersteuning) && $$$Not(..IngegevenKenmerken.IsBinnenlade))
 ]]></Implementation>
 </Method>
 
 <Method name="GeefVolumeBodemOndersteuning">
 <Private>1</Private>
 <ReturnType>DOM.PM.Verpakking.Volume</ReturnType>
 <Implementation><![CDATA[
-	#Dim HalffabItem As DOM.PM.Maatwerk.Calc.HF.IHalffabItem = ..HalffabItemsBoom.GeefHalffabItem(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).BodemOndersteuning())
+	#Dim HalffabItem As DOM.PM.Maatwerk.Calc.HF.IHalffabItem = ..HalffabItemsBoom.GeefHalffabItem(..Enum.Rol.BodemOndersteuning)
 	#Dim Diepte As %Numeric = ..IngegevenKenmerken.LadeDiepte - 7
 	#Dim Breedte As %Numeric = 50
 	#Dim Hoogte As %Numeric = $CASE(HalffabItem.Aantal, 1:18, 2:22, 3:36, :45)