Index: DOM/PM/enu/TBXRugHoogte/AutoComplete.cls.xml
===================================================================
diff -u -r43562 -r65699
--- DOM/PM/enu/TBXRugHoogte/AutoComplete.cls.xml	(.../AutoComplete.cls.xml)	(revision 43562)
+++ DOM/PM/enu/TBXRugHoogte/AutoComplete.cls.xml	(.../AutoComplete.cls.xml)	(revision 65699)
@@ -65,17 +65,19 @@
 <ReadOnly>1</ReadOnly>
 </Property>
 
+<Property name="X38">
+<Type>%String</Type>
+<InitialExpression>"X38"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
 <Property name="X40">
 <Type>%String</Type>
 <InitialExpression>"X40"</InitialExpression>
 <Transient>1</Transient>
 <ReadOnly>1</ReadOnly>
 </Property>
-
-<Storage name="Default">
-<Type>%Library.CacheSerialState</Type>
-<StreamLocation>^DOM.PM.enu.TBF5FB.AutoCompleteS</StreamLocation>
-</Storage>
 </Class>
 
 
Index: DOM/PM/enu/TBXZijwandVerhogingRelingKleur/AutoComplete.cls.xml
===================================================================
diff -u -r65352 -r65699
--- DOM/PM/enu/TBXZijwandVerhogingRelingKleur/AutoComplete.cls.xml	(.../AutoComplete.cls.xml)	(revision 65352)
+++ DOM/PM/enu/TBXZijwandVerhogingRelingKleur/AutoComplete.cls.xml	(.../AutoComplete.cls.xml)	(revision 65699)
@@ -23,6 +23,13 @@
 <ReadOnly>1</ReadOnly>
 </Property>
 
+<Property name="OG">
+<Type>%String</Type>
+<InitialExpression>"OG"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
 <Property name="SW">
 <Type>%String</Type>
 <InitialExpression>"SW"</InitialExpression>
Index: DOM/PM/enu/TBXPlaatMateriaal/AutoComplete.cls.xml
===================================================================
diff -u
--- DOM/PM/enu/TBXPlaatMateriaal/AutoComplete.cls.xml	(revision 0)
+++ DOM/PM/enu/TBXPlaatMateriaal/AutoComplete.cls.xml	(revision 65699)
@@ -0,0 +1,56 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="DOM.PM.enu.TBXPlaatMateriaal.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="HaluxAfgewerkt">
+<Type>%String</Type>
+<InitialExpression>"HA"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="HaluxStroken">
+<Type>%String</Type>
+<InitialExpression>"HS"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="HaluxVerzaagd">
+<Type>%String</Type>
+<InitialExpression>"HZ"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="KlantAfgewerkt">
+<Type>%String</Type>
+<InitialExpression>"KA"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="KlantStroken">
+<Type>%String</Type>
+<InitialExpression>"KS"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="KlantVerzaagd">
+<Type>%String</Type>
+<InitialExpression>"KZ"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+</Class>
+
+
+</Export>
Index: DOM/PM/enu/TBXRugHoogte/Verwerker.cls.xml
===================================================================
diff -u -r38306 -r65699
--- DOM/PM/enu/TBXRugHoogte/Verwerker.cls.xml	(.../Verwerker.cls.xml)	(revision 38306)
+++ DOM/PM/enu/TBXRugHoogte/Verwerker.cls.xml	(.../Verwerker.cls.xml)	(revision 65699)
@@ -28,6 +28,8 @@
 		Do ..VerwerkN()
 	} ElseIf TBXRugHoogte = "X35" {
 		Do ..VerwerkX35()
+	} ElseIf TBXRugHoogte = "X38" {
+		Do ..VerwerkX38()
 	} ElseIf TBXRugHoogte = "X40" {
 		Do ..VerwerkX40()
 	} Else {
@@ -85,6 +87,12 @@
 <Implementation><![CDATA[]]></Implementation>
 </Method>
 
+<Method name="VerwerkX38">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
 <Method name="VerwerkX40">
 <Abstract>1</Abstract>
 <Private>1</Private>
Index: DOM/PM/enu/TBXZijwandVerhogingInschuifElementKleur.cls.xml
===================================================================
diff -u -r65352 -r65699
--- DOM/PM/enu/TBXZijwandVerhogingInschuifElementKleur.cls.xml	(.../TBXZijwandVerhogingInschuifElementKleur.cls.xml)	(revision 65352)
+++ DOM/PM/enu/TBXZijwandVerhogingInschuifElementKleur.cls.xml	(.../TBXZijwandVerhogingInschuifElementKleur.cls.xml)	(revision 65699)
@@ -4,7 +4,7 @@
 <Super>TECH.Enumeration</Super>
 
 <Parameter name="VALUELIST">
-<Default>;FG8;8FZ8;AluMG;AluSW;AluBZ;ZV</Default>
+<Default>;FG8;FZ8;AluMG;AluSW;AluBZ;ZV</Default>
 </Parameter>
 
 <Parameter name="DISPLAYLIST">
Index: DOM/PM/enu/TBXPlaatMateriaal/Verwerker.cls.xml
===================================================================
diff -u
--- DOM/PM/enu/TBXPlaatMateriaal/Verwerker.cls.xml	(revision 0)
+++ DOM/PM/enu/TBXPlaatMateriaal/Verwerker.cls.xml	(revision 65699)
@@ -0,0 +1,72 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="DOM.PM.enu.TBXPlaatMateriaal.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>TBXPlaatMateriaal:DOM.PM.enu.TBXPlaatMateriaal</FormalSpec>
+<Implementation><![CDATA[
+	If TBXPlaatMateriaal = "HA" {
+		Do ..VerwerkHaluxAfgewerkt()
+	} ElseIf TBXPlaatMateriaal = "HS" {
+		Do ..VerwerkHaluxStroken()
+	} ElseIf TBXPlaatMateriaal = "HZ" {
+		Do ..VerwerkHaluxVerzaagd()
+	} ElseIf TBXPlaatMateriaal = "KA" {
+		Do ..VerwerkKlantAfgewerkt()
+	} ElseIf TBXPlaatMateriaal = "KS" {
+		Do ..VerwerkKlantStroken()
+	} ElseIf TBXPlaatMateriaal = "KZ" {
+		Do ..VerwerkKlantVerzaagd()
+	} Else {
+		Set Exceptie = ##class(TECH.Exceptions.EnumerationException).%New(TBXPlaatMateriaal,"DOM.PM.enu.TBXPlaatMateriaal",$classname())
+		Do ##class(TECH.ExceptionHandler).Throw(Exceptie)
+	}
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkHaluxAfgewerkt">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkHaluxStroken">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkHaluxVerzaagd">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkKlantAfgewerkt">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkKlantStroken">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkKlantVerzaagd">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: DOM/PM/enu/TBXZijwandVerhogingRelingKleur/Verwerker.cls.xml
===================================================================
diff -u -r65352 -r65699
--- DOM/PM/enu/TBXZijwandVerhogingRelingKleur/Verwerker.cls.xml	(.../Verwerker.cls.xml)	(revision 65352)
+++ DOM/PM/enu/TBXZijwandVerhogingRelingKleur/Verwerker.cls.xml	(.../Verwerker.cls.xml)	(revision 65699)
@@ -16,6 +16,8 @@
 		Do ..VerwerkBZ()
 	} ElseIf TBXZijwandVerhogingRelingKleur = "MG" {
 		Do ..VerwerkMG()
+	} ElseIf TBXZijwandVerhogingRelingKleur = "OG" {
+		Do ..VerwerkOG()
 	} ElseIf TBXZijwandVerhogingRelingKleur = "SW" {
 		Do ..VerwerkSW()
 	} Else {
@@ -37,6 +39,12 @@
 <Implementation><![CDATA[]]></Implementation>
 </Method>
 
+<Method name="VerwerkOG">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
 <Method name="VerwerkSW">
 <Abstract>1</Abstract>
 <Private>1</Private>
Index: DOM/PM/enu/TBXDesigncode.cls.xml
===================================================================
diff -u -r41947 -r65699
--- DOM/PM/enu/TBXDesigncode.cls.xml	(.../TBXDesigncode.cls.xml)	(revision 41947)
+++ DOM/PM/enu/TBXDesigncode.cls.xml	(.../TBXDesigncode.cls.xml)	(revision 65699)
@@ -6,7 +6,7 @@
 <Super>%String</Super>
 
 <Parameter name="VALUELIST">
-<Default>,A,B,F,I,MA,S</Default>
+<Default>,A,B,F,I,MA,MT,S</Default>
 </Parameter>
 
 <Method name="Antaro">
Index: DOM/PM/enu/TBXPlaatMateriaal.cls.xml
===================================================================
diff -u
--- DOM/PM/enu/TBXPlaatMateriaal.cls.xml	(revision 0)
+++ DOM/PM/enu/TBXPlaatMateriaal.cls.xml	(revision 65699)
@@ -0,0 +1,58 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="DOM.PM.enu.TBXPlaatMateriaal">
+<Super>TECH.Enumeration</Super>
+
+<Parameter name="VALUELIST">
+<Default>;HA;HS;HZ;KA;KS;KZ</Default>
+</Parameter>
+
+<Parameter name="DISPLAYLIST">
+<Default>;HaluxAfgewerkt;HaluxStroken;HaluxVerzaagd;KlantAfgewerkt;KlantStroken;KlantVerzaagd</Default>
+</Parameter>
+
+<Method name="HaluxAfgewerkt">
+<ClassMethod>1</ClassMethod>
+<ReturnType>DOM.PM.enu.TBXPlaatMateriaal</ReturnType>
+<Implementation><![CDATA[	Quit "HA"
+]]></Implementation>
+</Method>
+
+<Method name="HaluxStroken">
+<ClassMethod>1</ClassMethod>
+<ReturnType>DOM.PM.enu.TBXPlaatMateriaal</ReturnType>
+<Implementation><![CDATA[	Quit "HS"
+]]></Implementation>
+</Method>
+
+<Method name="HaluxVerzaagd">
+<ClassMethod>1</ClassMethod>
+<ReturnType>DOM.PM.enu.TBXPlaatMateriaal</ReturnType>
+<Implementation><![CDATA[	Quit "HZ"
+]]></Implementation>
+</Method>
+
+<Method name="KlantAfgewerkt">
+<ClassMethod>1</ClassMethod>
+<ReturnType>DOM.PM.enu.TBXPlaatMateriaal</ReturnType>
+<Implementation><![CDATA[	Quit "KA"
+]]></Implementation>
+</Method>
+
+<Method name="KlantStroken">
+<ClassMethod>1</ClassMethod>
+<ReturnType>DOM.PM.enu.TBXPlaatMateriaal</ReturnType>
+<Implementation><![CDATA[	Quit "KS"
+]]></Implementation>
+</Method>
+
+<Method name="KlantVerzaagd">
+<ClassMethod>1</ClassMethod>
+<ReturnType>DOM.PM.enu.TBXPlaatMateriaal</ReturnType>
+<Implementation><![CDATA[	Quit "KZ"
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: DOM/PM/enu/TBXZijwandVerhogingRelingKleur.cls.xml
===================================================================
diff -u -r65352 -r65699
--- DOM/PM/enu/TBXZijwandVerhogingRelingKleur.cls.xml	(.../TBXZijwandVerhogingRelingKleur.cls.xml)	(revision 65352)
+++ DOM/PM/enu/TBXZijwandVerhogingRelingKleur.cls.xml	(.../TBXZijwandVerhogingRelingKleur.cls.xml)	(revision 65699)
@@ -4,11 +4,11 @@
 <Super>TECH.Enumeration</Super>
 
 <Parameter name="VALUELIST">
-<Default>;MG;SW;BZ</Default>
+<Default>;MG;SW;BZ;OG</Default>
 </Parameter>
 
 <Parameter name="DISPLAYLIST">
-<Default>;MG;SW;BZ</Default>
+<Default>;MG;SW;BZ;OG</Default>
 </Parameter>
 
 <Method name="MG">
@@ -31,6 +31,13 @@
 <Implementation><![CDATA[	Quit "BZ"
 ]]></Implementation>
 </Method>
+
+<Method name="OG">
+<ClassMethod>1</ClassMethod>
+<ReturnType>DOM.PM.enu.TBXZijwandVerhogingRelingKleur</ReturnType>
+<Implementation><![CDATA[	Quit "OG"
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: DOM/PM/enu/TBXRugHoogte.cls.xml
===================================================================
diff -u -r38306 -r65699
--- DOM/PM/enu/TBXRugHoogte.cls.xml	(.../TBXRugHoogte.cls.xml)	(revision 38306)
+++ DOM/PM/enu/TBXRugHoogte.cls.xml	(.../TBXRugHoogte.cls.xml)	(revision 65699)
@@ -4,11 +4,11 @@
 <Super>TECH.Enumeration</Super>
 
 <Parameter name="VALUELIST">
-<Default>;N;M;K;B;C;D;G;X35;X40</Default>
+<Default>;N;M;K;B;C;D;G;X35;X38;X40</Default>
 </Parameter>
 
 <Parameter name="DISPLAYLIST">
-<Default>;53;68;100;119;151;183;35;40</Default>
+<Default>;53;68;100;119;151;183;35;38;40</Default>
 </Parameter>
 
 <Method name="N">
@@ -67,6 +67,13 @@
 ]]></Implementation>
 </Method>
 
+<Method name="X38">
+<ClassMethod>1</ClassMethod>
+<ReturnType>DOM.PM.enu.TBXRugHoogte</ReturnType>
+<Implementation><![CDATA[	Quit "X38"
+]]></Implementation>
+</Method>
+
 <Method name="X40">
 <ClassMethod>1</ClassMethod>
 <ReturnType>DOM.PM.enu.TBXRugHoogte</ReturnType>