Index: vhTest/Utils/ECON/PM/Maatwerk/dto/TbxKenmerken.cls.xml
===================================================================
diff -u -r39543 -r39544
--- vhTest/Utils/ECON/PM/Maatwerk/dto/TbxKenmerken.cls.xml	(.../TbxKenmerken.cls.xml)	(revision 39543)
+++ vhTest/Utils/ECON/PM/Maatwerk/dto/TbxKenmerken.cls.xml	(.../TbxKenmerken.cls.xml)	(revision 39544)
@@ -69,7 +69,7 @@
 	#dim TbxKenmerken As ECON.PM.Maatwerk.dto.TbxKenmerken = ..StandaardLade()
 	
 	Set TbxKenmerken.Toepassing = ##class(ECON.PM.Maatwerk.enu.TBXToepassing).Spoelbak()
-	Set TbxKenmerken.UitsparingData.UitsparingAantal = 1
+	Set TbxKenmerken.UitsparingData.UitsparingAantal = ##class(ECON.PM.Maatwerk.enu.TBXUitsparingAantal).Enkel()
 	Set TbxKenmerken.UitsparingData.X.Breedte = 147
 	Set TbxKenmerken.UitsparingData.X.Hoogte = "M"
 	Set TbxKenmerken.UitsparingData.X.Materiaal = ##class(ECON.PM.Maatwerk.enu.TBXRugwandMateriaal).Hout()
@@ -93,7 +93,7 @@
 	#dim TbxKenmerken As ECON.PM.Maatwerk.dto.TbxKenmerken = ..StandaardLade()
 	
 	Set TbxKenmerken.Toepassing = ##class(ECON.PM.Maatwerk.enu.TBXToepassing).SifonTypeBlum()
-	Set TbxKenmerken.UitsparingData.UitsparingAantal = 1
+	Set TbxKenmerken.UitsparingData.UitsparingAantal = ##class(ECON.PM.Maatwerk.enu.TBXUitsparingAantal).Enkel()
 	Set TbxKenmerken.UitsparingData.X.Breedte = 225
 	Set TbxKenmerken.UitsparingData.X.Hoogte = "M"
 	Set TbxKenmerken.UitsparingData.X.Materiaal = ##class(ECON.PM.Maatwerk.enu.TBXRugwandMateriaal).Hout()
@@ -117,7 +117,7 @@
 	#dim TbxKenmerken As ECON.PM.Maatwerk.dto.TbxKenmerken = ..StandaardLade()
 	
 	Set TbxKenmerken.Toepassing = ##class(ECON.PM.Maatwerk.enu.TBXToepassing).SifonTypeBlum()
-	Set TbxKenmerken.UitsparingData.UitsparingAantal = 2
+	Set TbxKenmerken.UitsparingData.UitsparingAantal = ##class(ECON.PM.Maatwerk.enu.TBXUitsparingAantal).Dubbel()
 	Set TbxKenmerken.UitsparingData.M.Breedte = 240
 	Set TbxKenmerken.UitsparingData.M.Hoogte = "M"
 	Set TbxKenmerken.UitsparingData.M.Materiaal = ##class(ECON.PM.Maatwerk.enu.TBXRugwandMateriaal).Hout()
Index: ECON/PM/Maatwerk/enu/TBXUitsparingAantal/Verwerker.cls.xml
===================================================================
diff -u
--- ECON/PM/Maatwerk/enu/TBXUitsparingAantal/Verwerker.cls.xml	(revision 0)
+++ ECON/PM/Maatwerk/enu/TBXUitsparingAantal/Verwerker.cls.xml	(revision 39544)
@@ -0,0 +1,40 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="ECON.PM.Maatwerk.enu.TBXUitsparingAantal.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>TBXUitsparingAantal:ECON.PM.Maatwerk.enu.TBXUitsparingAantal</FormalSpec>
+<Implementation><![CDATA[
+	If TBXUitsparingAantal = "Dubbel" {
+		Do ..VerwerkDubbel()
+	} ElseIf TBXUitsparingAantal = "Enkel" {
+		Do ..VerwerkEnkel()
+	} Else {
+		Set Exceptie = ##class(TECH.Exceptions.EnumerationException).%New(TBXUitsparingAantal,"ECON.PM.Maatwerk.enu.TBXUitsparingAantal",$classname())
+		Do ##class(TECH.ExceptionHandler).Throw(Exceptie)
+	}
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkDubbel">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkEnkel">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: ECON/PM/Maatwerk/enu/TBXUitsparingAantal.cls.xml
===================================================================
diff -u
--- ECON/PM/Maatwerk/enu/TBXUitsparingAantal.cls.xml	(revision 0)
+++ ECON/PM/Maatwerk/enu/TBXUitsparingAantal.cls.xml	(revision 39544)
@@ -0,0 +1,30 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="ECON.PM.Maatwerk.enu.TBXUitsparingAantal">
+<Super>TECH.Enumeration</Super>
+
+<Parameter name="VALUELIST">
+<Default>;Enkel;Dubbel</Default>
+</Parameter>
+
+<Parameter name="DISPLAYLIST">
+<Default>;Enkel;Dubbel</Default>
+</Parameter>
+
+<Method name="Enkel">
+<ClassMethod>1</ClassMethod>
+<ReturnType>ECON.PM.Maatwerk.enu.TBXUitsparingAantal</ReturnType>
+<Implementation><![CDATA[	Quit "Enkel"
+]]></Implementation>
+</Method>
+
+<Method name="Dubbel">
+<ClassMethod>1</ClassMethod>
+<ReturnType>ECON.PM.Maatwerk.enu.TBXUitsparingAantal</ReturnType>
+<Implementation><![CDATA[	Quit "Dubbel"
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: ECON/PM/Maatwerk/enu/TBXUitsparingAantal/AutoComplete.cls.xml
===================================================================
diff -u
--- ECON/PM/Maatwerk/enu/TBXUitsparingAantal/AutoComplete.cls.xml	(revision 0)
+++ ECON/PM/Maatwerk/enu/TBXUitsparingAantal/AutoComplete.cls.xml	(revision 39544)
@@ -0,0 +1,28 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="ECON.PM.Maatwerk.enu.TBXUitsparingAantal.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="Dubbel">
+<Type>%String</Type>
+<InitialExpression>"Dubbel"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="Enkel">
+<Type>%String</Type>
+<InitialExpression>"Enkel"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+</Class>
+
+
+</Export>