Index: DOM/common/impl/GebruikerAPIimpl.cls.xml
===================================================================
diff -u -r58718 -r59335
--- DOM/common/impl/GebruikerAPIimpl.cls.xml	(.../GebruikerAPIimpl.cls.xml)	(revision 58718)
+++ DOM/common/impl/GebruikerAPIimpl.cls.xml	(.../GebruikerAPIimpl.cls.xml)	(revision 59335)
@@ -240,6 +240,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="VerwerkHahleOy">
+<FormalSpec>HahleOyPersonality:DOM.common.HahleOyPersonality</FormalSpec>
+<Implementation><![CDATA[	Do ..StelInDummyGebruiker()
+]]></Implementation>
+</Method>
+
 <Method name="StelInDummyGebruiker">
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
Index: vhTest/Mock/DOM/VKP/impl/KlantDataBepaler.cls.xml
===================================================================
diff -u -r59055 -r59335
--- vhTest/Mock/DOM/VKP/impl/KlantDataBepaler.cls.xml	(.../KlantDataBepaler.cls.xml)	(revision 59055)
+++ vhTest/Mock/DOM/VKP/impl/KlantDataBepaler.cls.xml	(.../KlantDataBepaler.cls.xml)	(revision 59335)
@@ -118,6 +118,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="VerwerkHahleOy">
+<FormalSpec>HahleOyPersonality:DOM.common.HahleOyPersonality</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("VerwerkHahleOy",HahleOyPersonality)
+]]></Implementation>
+</Method>
+
 <Method name="VerwerkHein">
 <FormalSpec>HeinPersonality:DOM.common.HeinPersonality</FormalSpec>
 <Implementation><![CDATA[	do ..VerwerkMethodCall("VerwerkHein",HeinPersonality)
Index: DOM/VKP/impl/KlantDataBepaler.cls.xml
===================================================================
diff -u -r59055 -r59335
--- DOM/VKP/impl/KlantDataBepaler.cls.xml	(.../KlantDataBepaler.cls.xml)	(revision 59055)
+++ DOM/VKP/impl/KlantDataBepaler.cls.xml	(.../KlantDataBepaler.cls.xml)	(revision 59335)
@@ -368,6 +368,17 @@
 ]]></Implementation>
 </Method>
 
+<Method name="VerwerkHahleOy">
+<FormalSpec>HahleOyPersonality:DOM.common.HahleOyPersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..KlantDataDto = ##class(DOM.common.dto.HandelKlantData).%New()
+	
+	#dim KlantData As DOM.VKP.impl.HahleOyKlantData = ..OpenKlantData(..KlantID, HahleOyPersonality)
+	
+	Do ..StelInKlantDataDtoVoorHandelAnoniem(KlantData, HahleOyPersonality.GeefPrefix())
+]]></Implementation>
+</Method>
+
 <Method name="StelInKlantDataDtoVoorHandel">
 <FormalSpec>KlantData:DOM.VKP.impl.KlantData,HandelPrefix:%String</FormalSpec>
 <Private>1</Private>
Index: vhTest/Fake/DOM/VKP/impl/KlantDataBepaler.cls.xml
===================================================================
diff -u -r59055 -r59335
--- vhTest/Fake/DOM/VKP/impl/KlantDataBepaler.cls.xml	(.../KlantDataBepaler.cls.xml)	(revision 59055)
+++ vhTest/Fake/DOM/VKP/impl/KlantDataBepaler.cls.xml	(.../KlantDataBepaler.cls.xml)	(revision 59335)
@@ -19,46 +19,45 @@
 <Implementation><![CDATA[]]></Implementation>
 </Method>
 
-<Method name="VerwerkDSGroup">
-<FormalSpec>DSGroupPersonality:DOM.common.DSGroupPersonality</FormalSpec>
+<Method name="VerwerkHahleOy">
+<FormalSpec>HahleOyPersonality:DOM.common.HahleOyPersonality</FormalSpec>
 <Implementation><![CDATA[
 ]]></Implementation>
 </Method>
 
+<Method name="VerwerkDSGroup">
+<FormalSpec>DSGroupPersonality:DOM.common.DSGroupPersonality</FormalSpec>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
 <Method name="VerwerkDeBisschop">
 <FormalSpec>DeBisschopPersonality:DOM.common.DeBisschopPersonality</FormalSpec>
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="VerwerkDeceuninckDeforce">
 <FormalSpec>DeceuninckDeforcePersonality:DOM.common.DeceuninckDeforcePersonality</FormalSpec>
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="VerwerkHaefeleDE">
 <FormalSpec>HaefeleDEPersonality:DOM.common.HaefeleDEPersonality</FormalSpec>
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="VerwerkKleiner">
 <FormalSpec>KleinerPersonality:DOM.common.KleinerPersonality</FormalSpec>
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="VerwerkLayer">
 <FormalSpec>LayerPersonality:DOM.common.LayerPersonality</FormalSpec>
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="VerwerkPierard">
 <FormalSpec>PierardPersonality:DOM.common.PierardPersonality</FormalSpec>
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="VerwerkBeslagteknikk">