Index: DOM/VKP/impl/KlantDataBepaler.cls.xml
===================================================================
diff -u -r67229 -r69131
--- DOM/VKP/impl/KlantDataBepaler.cls.xml	(.../KlantDataBepaler.cls.xml)	(revision 67229)
+++ DOM/VKP/impl/KlantDataBepaler.cls.xml	(.../KlantDataBepaler.cls.xml)	(revision 69131)
@@ -131,6 +131,17 @@
 ]]></Implementation>
 </Method>
 
+<Method name="VerwerkMartens">
+<FormalSpec>MartensPersonality:DOM.common.MartensPersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..KlantDataDto = ##class(DOM.common.dto.KlantData).%New()
+	
+	#dim KlantData As DOM.VKP.impl.OPOKlantData = ..OpenKlantData(..KlantID, MartensPersonality)
+	
+	Do ..StelInKlantDataDtoVoorHandel(KlantData, MartensPersonality.GeefPrefix())
+]]></Implementation>
+</Method>
+
 <Method name="VerwerkHaefeleBE">
 <FormalSpec>HaefeleBEPersonality:DOM.common.HaefeleBEPersonality</FormalSpec>
 <Implementation><![CDATA[