Index: DOM/VKP/enu/BusinessType/Verwerker.cls.xml
===================================================================
diff -u
--- DOM/VKP/enu/BusinessType/Verwerker.cls.xml	(revision 0)
+++ DOM/VKP/enu/BusinessType/Verwerker.cls.xml	(revision 49389)
@@ -0,0 +1,40 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="DOM.VKP.enu.BusinessType.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>BusinessType:DOM.VKP.enu.BusinessType</FormalSpec>
+<Implementation><![CDATA[
+	If BusinessType = "B2B" {
+		Do ..VerwerkB2B()
+	} ElseIf BusinessType = "B2C" {
+		Do ..VerwerkB2C()
+	} Else {
+		Set Exceptie = ##class(TECH.Exceptions.EnumerationException).%New(BusinessType,"DOM.VKP.enu.BusinessType",$classname())
+		Do ##class(TECH.ExceptionHandler).Throw(Exceptie)
+	}
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkB2B">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkB2C">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: DOM/VKP/enu/BusinessType/AutoComplete.cls.xml
===================================================================
diff -u
--- DOM/VKP/enu/BusinessType/AutoComplete.cls.xml	(revision 0)
+++ DOM/VKP/enu/BusinessType/AutoComplete.cls.xml	(revision 49389)
@@ -0,0 +1,28 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="DOM.VKP.enu.BusinessType.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="B2B">
+<Type>%String</Type>
+<InitialExpression>"B2B"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="B2C">
+<Type>%String</Type>
+<InitialExpression>"B2C"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+</Class>
+
+
+</Export>