Index: DOM/VKP/impl/KlantDataBepaler.cls.xml
===================================================================
diff -u -r69131 -r70652
--- DOM/VKP/impl/KlantDataBepaler.cls.xml	(.../KlantDataBepaler.cls.xml)	(revision 69131)
+++ DOM/VKP/impl/KlantDataBepaler.cls.xml	(.../KlantDataBepaler.cls.xml)	(revision 70652)
@@ -489,6 +489,17 @@
 ]]></Implementation>
 </Method>
 
+<Method name="VerwerkDozon">
+<FormalSpec>DozonPersonality:DOM.common.DozonPersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..KlantDataDto = ##class(DOM.common.dto.KlantData).%New()
+	
+	#dim KlantData As DOM.VKP.impl.DozonKlantData = ..OpenKlantData(..KlantID, DozonPersonality)
+	
+	Do ..StelInKlantDataDtoVoorHandel(KlantData, DozonPersonality.GeefPrefix())
+]]></Implementation>
+</Method>
+
 <Method name="StelInKlantDataDtoVoorHandel">
 <FormalSpec>KlantData:DOM.VKP.impl.KlantData,HandelPrefix:%String</FormalSpec>
 <Private>1</Private>