Index: DOM/VKP/enu/SfsKlant/AutoComplete.cls.xml
===================================================================
diff -u -r56968 -r57959
--- DOM/VKP/enu/SfsKlant/AutoComplete.cls.xml	(.../AutoComplete.cls.xml)	(revision 56968)
+++ DOM/VKP/enu/SfsKlant/AutoComplete.cls.xml	(.../AutoComplete.cls.xml)	(revision 57959)
@@ -15,6 +15,13 @@
 <Transient>1</Transient>
 <ReadOnly>1</ReadOnly>
 </Property>
+
+<Property name="Herzog">
+<Type>%String</Type>
+<InitialExpression>"SFS_100682"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
 </Class>
 
 
Index: DOM/VKP/enu/SfsKlant/Verwerker.cls.xml
===================================================================
diff -u -r56968 -r57959
--- DOM/VKP/enu/SfsKlant/Verwerker.cls.xml	(.../Verwerker.cls.xml)	(revision 56968)
+++ DOM/VKP/enu/SfsKlant/Verwerker.cls.xml	(.../Verwerker.cls.xml)	(revision 57959)
@@ -14,6 +14,8 @@
 <Implementation><![CDATA[
 	If SfsKlant = "SFS_123456" {
 		Do ..VerwerkAlpnach()
+	} ElseIf SfsKlant = "SFS_100682" {
+		Do ..VerwerkHerzog()
 	} Else {
 		Set Exceptie = ##class(TECH.Exceptions.EnumerationException).%New(SfsKlant,"DOM.VKP.enu.SfsKlant",$classname())
 		Do ##class(TECH.ExceptionHandler).Throw(Exceptie)
@@ -26,6 +28,12 @@
 <Private>1</Private>
 <Implementation><![CDATA[]]></Implementation>
 </Method>
+
+<Method name="VerwerkHerzog">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
 </Class>
 
 
Index: DOM/VKP/enu/SfsKlant.cls.xml
===================================================================
diff -u -r56968 -r57959
--- DOM/VKP/enu/SfsKlant.cls.xml	(.../SfsKlant.cls.xml)	(revision 56968)
+++ DOM/VKP/enu/SfsKlant.cls.xml	(.../SfsKlant.cls.xml)	(revision 57959)
@@ -4,7 +4,7 @@
 <Super>TECH.Enumeration</Super>
 
 <Parameter name="VALUELIST">
-<Default>,SFS_123456</Default>
+<Default>,SFS_123456,SFS_100682</Default>
 </Parameter>
 
 <Method name="Alpnach">
@@ -13,6 +13,13 @@
 <Implementation><![CDATA[	Quit "SFS_123456"
 ]]></Implementation>
 </Method>
+
+<Method name="Herzog">
+<ClassMethod>1</ClassMethod>
+<ReturnType>DOM.VKP.enu.SfsKlant</ReturnType>
+<Implementation><![CDATA[	Quit "SFS_100682"
+]]></Implementation>
+</Method>
 </Class>