Index: DOM/PM/enu/TBXRugHoogte.cls.xml
===================================================================
diff -u -r29059 -r38306
--- DOM/PM/enu/TBXRugHoogte.cls.xml	(.../TBXRugHoogte.cls.xml)	(revision 29059)
+++ DOM/PM/enu/TBXRugHoogte.cls.xml	(.../TBXRugHoogte.cls.xml)	(revision 38306)
@@ -1,9 +1,7 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="DOM.PM.enu.TBXRugHoogte">
-<ClassType>datatype</ClassType>
-<ProcedureBlock>1</ProcedureBlock>
-<Super>%String</Super>
+<Super>TECH.Enumeration</Super>
 
 <Parameter name="VALUELIST">
 <Default>;N;M;K;B;C;D;G;X35;X40</Default>
@@ -15,54 +13,63 @@
 
 <Method name="N">
 <ClassMethod>1</ClassMethod>
+<ReturnType>DOM.PM.enu.TBXRugHoogte</ReturnType>
 <Implementation><![CDATA[	Quit "N"
 ]]></Implementation>
 </Method>
 
 <Method name="M">
 <ClassMethod>1</ClassMethod>
+<ReturnType>DOM.PM.enu.TBXRugHoogte</ReturnType>
 <Implementation><![CDATA[	Quit "M"
 ]]></Implementation>
 </Method>
 
 <Method name="K">
 <ClassMethod>1</ClassMethod>
+<ReturnType>DOM.PM.enu.TBXRugHoogte</ReturnType>
 <Implementation><![CDATA[	Quit "K"
 ]]></Implementation>
 </Method>
 
 <Method name="C">
 <ClassMethod>1</ClassMethod>
+<ReturnType>DOM.PM.enu.TBXRugHoogte</ReturnType>
 <Implementation><![CDATA[	Quit "C"
 ]]></Implementation>
 </Method>
 
 <Method name="D">
 <ClassMethod>1</ClassMethod>
+<ReturnType>DOM.PM.enu.TBXRugHoogte</ReturnType>
 <Implementation><![CDATA[	Quit "D"
 ]]></Implementation>
 </Method>
 
 <Method name="B">
 <ClassMethod>1</ClassMethod>
+<ReturnType>DOM.PM.enu.TBXRugHoogte</ReturnType>
 <Implementation><![CDATA[	Quit "B"
 ]]></Implementation>
 </Method>
 
 <Method name="G">
 <ClassMethod>1</ClassMethod>
+<ReturnType>DOM.PM.enu.TBXRugHoogte</ReturnType>
 <Implementation><![CDATA[	Quit "G"
 ]]></Implementation>
 </Method>
 
 <Method name="X35">
 <ClassMethod>1</ClassMethod>
+<ReturnType>DOM.PM.enu.TBXRugHoogte</ReturnType>
 <Implementation><![CDATA[	Quit "X35"
 ]]></Implementation>
 </Method>
 
 <Method name="X40">
 <ClassMethod>1</ClassMethod>
+<ReturnType>DOM.PM.enu.TBXRugHoogte</ReturnType>
 <Implementation><![CDATA[	Quit "X40"
 ]]></Implementation>
 </Method>
Index: DOM/PM/Maatwerk/TBX/impl/BaseEnums.cls.xml
===================================================================
diff -u -r38305 -r38306
--- DOM/PM/Maatwerk/TBX/impl/BaseEnums.cls.xml	(.../BaseEnums.cls.xml)	(revision 38305)
+++ DOM/PM/Maatwerk/TBX/impl/BaseEnums.cls.xml	(.../BaseEnums.cls.xml)	(revision 38306)
@@ -34,6 +34,10 @@
 <Property name="ProductieWijze">
 <Type>DOM.PM.enu.TBXProductieWijze.AutoComplete</Type>
 </Property>
+
+<Property name="RugHoogte">
+<Type>DOM.PM.enu.TBXRugHoogte.AutoComplete</Type>
+</Property>
 </Class>
 
 
Index: DOM/PM/enu/TBXRugHoogte/AutoComplete.cls.xml
===================================================================
diff -u
--- DOM/PM/enu/TBXRugHoogte/AutoComplete.cls.xml	(revision 0)
+++ DOM/PM/enu/TBXRugHoogte/AutoComplete.cls.xml	(revision 38306)
@@ -0,0 +1,77 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="DOM.PM.enu.TBXRugHoogte.AutoComplete">
+<Description>
+Deze klasse werd automatisch gegenereerd en onderhouden - lokale aanpassingen zijn niet nodig.
+Een hercompilatie van de Enumeratie - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt
+De enumeratie Eigenschapn moeten als type de enumeratieklasse zelf terug geven. De enumeratieklasse moet afleiden van TECH.Enumeration</Description>
+<ClassType>serial</ClassType>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>%SerialObject</Super>
+
+<Property name="B">
+<Type>%String</Type>
+<InitialExpression>"B"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="C">
+<Type>%String</Type>
+<InitialExpression>"C"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="D">
+<Type>%String</Type>
+<InitialExpression>"D"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="G">
+<Type>%String</Type>
+<InitialExpression>"G"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="K">
+<Type>%String</Type>
+<InitialExpression>"K"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="M">
+<Type>%String</Type>
+<InitialExpression>"M"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="N">
+<Type>%String</Type>
+<InitialExpression>"N"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="X35">
+<Type>%String</Type>
+<InitialExpression>"X35"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="X40">
+<Type>%String</Type>
+<InitialExpression>"X40"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+</Class>
+
+
+</Export>
Index: DOM/PM/enu/TBXRugHoogte/Verwerker.cls.xml
===================================================================
diff -u
--- DOM/PM/enu/TBXRugHoogte/Verwerker.cls.xml	(revision 0)
+++ DOM/PM/enu/TBXRugHoogte/Verwerker.cls.xml	(revision 38306)
@@ -0,0 +1,96 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="DOM.PM.enu.TBXRugHoogte.Verwerker">
+<Description>
+Deze klasse werd automatisch gegenereerd en onderhouden - lokale aanpassingen zijn niet nodig.
+Een hercompilatie van de Enumeratie - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt
+De enumeratie methoden moeten als type de enumeratieklasse zelf terug geven. De enumeratieklasse moet afleiden van TECH.Enumeration</Description>
+<Abstract>1</Abstract>
+<ProcedureBlock>1</ProcedureBlock>
+
+<Method name="Verwerk">
+<Final>1</Final>
+<FormalSpec>TBXRugHoogte:DOM.PM.enu.TBXRugHoogte</FormalSpec>
+<Implementation><![CDATA[
+	If TBXRugHoogte = "B" {
+		Do ..VerwerkB()
+	} ElseIf TBXRugHoogte = "C" {
+		Do ..VerwerkC()
+	} ElseIf TBXRugHoogte = "D" {
+		Do ..VerwerkD()
+	} ElseIf TBXRugHoogte = "G" {
+		Do ..VerwerkG()
+	} ElseIf TBXRugHoogte = "K" {
+		Do ..VerwerkK()
+	} ElseIf TBXRugHoogte = "M" {
+		Do ..VerwerkM()
+	} ElseIf TBXRugHoogte = "N" {
+		Do ..VerwerkN()
+	} ElseIf TBXRugHoogte = "X35" {
+		Do ..VerwerkX35()
+	} ElseIf TBXRugHoogte = "X40" {
+		Do ..VerwerkX40()
+	} Else {
+		Set Exceptie = ##class(TECH.Exceptions.EnumerationException).%New(TBXRugHoogte,"DOM.PM.enu.TBXRugHoogte",$classname())
+		Do ##class(TECH.ExceptionHandler).Throw(Exceptie)
+	}
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkB">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkC">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkD">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkG">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkK">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkM">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkN">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkX35">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkX40">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>