Index: DOM/PM/enu/TBXZijwandVerhogingType.cls.xml
===================================================================
diff -u -r38314 -r65325
--- DOM/PM/enu/TBXZijwandVerhogingType.cls.xml (.../TBXZijwandVerhogingType.cls.xml) (revision 38314)
+++ DOM/PM/enu/TBXZijwandVerhogingType.cls.xml (.../TBXZijwandVerhogingType.cls.xml) (revision 65325)
@@ -4,11 +4,11 @@
TECH.Enumeration
-;Laag;Reling;Boxside;Boxcap;Boxcover;InschuifElement
+;Laag;Reling;Boxside;Boxcap;Boxcover;InschuifElement;Zonder
-;Laag;Reling;Boxside;Boxcap;Boxcover;InschuifElement
+;Laag;Reling;Boxside;Boxcap;Boxcover;InschuifElement;Zonder
@@ -52,6 +52,13 @@
+
+
+1
+DOM.PM.enu.TBXZijwandVerhogingType
+
+
Index: DOM/PM/enu/TBXZijwandVerhogingType/Verwerker.cls.xml
===================================================================
diff -u -r38314 -r65325
--- DOM/PM/enu/TBXZijwandVerhogingType/Verwerker.cls.xml (.../Verwerker.cls.xml) (revision 38314)
+++ DOM/PM/enu/TBXZijwandVerhogingType/Verwerker.cls.xml (.../Verwerker.cls.xml) (revision 65325)
@@ -24,6 +24,8 @@
Do ..VerwerkLaag()
} ElseIf TBXZijwandVerhogingType = "Reling" {
Do ..VerwerkReling()
+ } ElseIf TBXZijwandVerhogingType = "Zonder" {
+ Do ..VerwerkZonder()
} Else {
Set Exceptie = ##class(TECH.Exceptions.EnumerationException).%New(TBXZijwandVerhogingType,"DOM.PM.enu.TBXZijwandVerhogingType",$classname())
Do ##class(TECH.ExceptionHandler).Throw(Exceptie)
@@ -66,6 +68,12 @@
1
+
+
+1
+1
+
+
Index: DOM/PM/enu/TBXZijwandVerhogingType/AutoComplete.cls.xml
===================================================================
diff -u -r43532 -r65325
--- DOM/PM/enu/TBXZijwandVerhogingType/AutoComplete.cls.xml (.../AutoComplete.cls.xml) (revision 43532)
+++ DOM/PM/enu/TBXZijwandVerhogingType/AutoComplete.cls.xml (.../AutoComplete.cls.xml) (revision 65325)
@@ -51,10 +51,12 @@
1
-
-%Library.CacheSerialState
-^DOM.PM.enu.TB6AE5.AutoCompleteS
-
+
+%String
+"Zonder"
+1
+1
+