Index: DOM/VKP/impl/KlantDataBepaler.cls.xml
===================================================================
diff -u -r58267 -r58354
--- DOM/VKP/impl/KlantDataBepaler.cls.xml	(.../KlantDataBepaler.cls.xml)	(revision 58267)
+++ DOM/VKP/impl/KlantDataBepaler.cls.xml	(.../KlantDataBepaler.cls.xml)	(revision 58354)
@@ -258,6 +258,39 @@
 ]]></Implementation>
 </Method>
 
+<Method name="VerwerkRini">
+<FormalSpec>RiniPersonality:DOM.common.RiniPersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..KlantDataDto = ##class(DOM.common.dto.HandelKlantData).%New()
+	
+	#dim KlantData As DOM.VKP.impl.RiniKlantData = ..OpenKlantData(..KlantID, RiniPersonality)
+	
+	Do ..StelInKlantDataDtoVoorHandelAnoniem(KlantData, RiniPersonality.GeefPrefix())
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkFurnifit">
+<FormalSpec>FurnifitPersonality:DOM.common.FurnifitPersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..KlantDataDto = ##class(DOM.common.dto.HandelKlantData).%New()
+	
+	#dim KlantData As DOM.VKP.impl.FurnifitKlantData = ..OpenKlantData(..KlantID, FurnifitPersonality)
+	
+	Do ..StelInKlantDataDtoVoorHandelAnoniem(KlantData, FurnifitPersonality.GeefPrefix())
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkYachtSupplier">
+<FormalSpec>YachtSupplierPersonality:DOM.common.YachtSupplierPersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..KlantDataDto = ##class(DOM.common.dto.HandelKlantData).%New()
+	
+	#dim KlantData As DOM.VKP.impl.YachtSupplierKlantData = ..OpenKlantData(..KlantID, YachtSupplierPersonality)
+	
+	Do ..StelInKlantDataDtoVoorHandelAnoniem(KlantData, YachtSupplierPersonality.GeefPrefix())
+]]></Implementation>
+</Method>
+
 <Method name="StelInKlantDataDtoVoorHandel">
 <FormalSpec>KlantData:DOM.VKP.impl.KlantData,HandelPrefix:%String</FormalSpec>
 <Private>1</Private>