Index: DOM/VKP/impl/KlantDataBepaler.cls.xml
===================================================================
diff -u -r59335 -r63827
--- DOM/VKP/impl/KlantDataBepaler.cls.xml	(.../KlantDataBepaler.cls.xml)	(revision 59335)
+++ DOM/VKP/impl/KlantDataBepaler.cls.xml	(.../KlantDataBepaler.cls.xml)	(revision 63827)
@@ -153,6 +153,28 @@
 ]]></Implementation>
 </Method>
 
+<Method name="VerwerkHaefeleSE">
+<FormalSpec>HaefeleSEPersonality:DOM.common.HaefeleSEPersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..KlantDataDto = ##class(DOM.common.dto.KlantData).%New()
+	
+	#dim KlantData As DOM.VKP.impl.HaefeleSEKlantData = ..OpenKlantData(..KlantID, HaefeleSEPersonality)
+	
+	Do ..StelInKlantDataDtoVoorHandel(KlantData, HaefeleSEPersonality.GeefPrefix())
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkHaefeleFI">
+<FormalSpec>HaefeleFIPersonality:DOM.common.HaefeleFIPersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..KlantDataDto = ##class(DOM.common.dto.KlantData).%New()
+	
+	#dim KlantData As DOM.VKP.impl.HaefeleDEKlantData = ..OpenKlantData(..KlantID, HaefeleFIPersonality)
+	
+	Do ..StelInKlantDataDtoVoorHandel(KlantData, HaefeleFIPersonality.GeefPrefix())
+]]></Implementation>
+</Method>
+
 <Method name="VerwerkKisch">
 <FormalSpec>KischPersonality:DOM.common.KischPersonality</FormalSpec>
 <Implementation><![CDATA[