Index: APPS/VKP/impl/KlantDataBewaarder.cls.xml
===================================================================
diff -u -r59320 -r75106
--- APPS/VKP/impl/KlantDataBewaarder.cls.xml	(.../KlantDataBewaarder.cls.xml)	(revision 59320)
+++ APPS/VKP/impl/KlantDataBewaarder.cls.xml	(.../KlantDataBewaarder.cls.xml)	(revision 75106)
@@ -76,6 +76,26 @@
 ]]></Implementation>
 </Method>
 
+<Method name="VerwerkOPO">
+<FormalSpec>OPOPersonality:DOM.common.OPOPersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..KlantData = ..GeefKlantData(..KlantDataDto.ID, OPOPersonality)
+	
+	Do ..ValideerKlantId(..KlantDataDto.ID, OPOPersonality)
+	Do ..ConverteerKlantData(..KlantData, ..KlantDataDto)
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkMartens">
+<FormalSpec>MartensPersonality:DOM.common.MartensPersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..KlantData = ..GeefKlantData(..KlantDataDto.ID, MartensPersonality)
+	
+	Do ..ValideerKlantId(..KlantDataDto.ID,MartensPersonality)
+	Do ..ConverteerKlantData(..KlantData, ..KlantDataDto)
+]]></Implementation>
+</Method>
+
 <Method name="VerwerkHaefeleBE">
 <FormalSpec>HaefeleBEPersonality:DOM.common.HaefeleBEPersonality</FormalSpec>
 <Implementation><![CDATA[
@@ -106,6 +126,86 @@
 ]]></Implementation>
 </Method>
 
+<Method name="VerwerkHaefeleIT">
+<FormalSpec>HaefeleITPersonality:DOM.common.HaefeleITPersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..KlantData = ..GeefKlantData(..KlantDataDto.ID, HaefeleITPersonality)
+	
+	Do ..ValideerKlantId(..KlantDataDto.ID, HaefeleITPersonality)
+	Do ..ConverteerKlantData(..KlantData, ..KlantDataDto)
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkHaefeleAT">
+<FormalSpec>HaefeleATPersonality:DOM.common.HaefeleATPersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..KlantData = ..GeefKlantData(..KlantDataDto.ID, HaefeleATPersonality)
+	
+	Do ..ValideerKlantId(..KlantDataDto.ID, HaefeleATPersonality)
+	Do ..ConverteerKlantData(..KlantData, ..KlantDataDto)
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkHaefeleSE">
+<FormalSpec>HaefeleSEPersonality:DOM.common.HaefeleSEPersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..KlantData = ..GeefKlantData(..KlantDataDto.ID, HaefeleSEPersonality)
+	
+	Do ..ValideerKlantId(..KlantDataDto.ID, HaefeleSEPersonality)
+	Do ..ConverteerKlantData(..KlantData, ..KlantDataDto)
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkHaefeleFI">
+<FormalSpec>HaefeleFIPersonality:DOM.common.HaefeleFIPersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..KlantData = ..GeefKlantData(..KlantDataDto.ID, HaefeleFIPersonality)
+	
+	Do ..ValideerKlantId(..KlantDataDto.ID, HaefeleFIPersonality)
+	Do ..ConverteerKlantData(..KlantData, ..KlantDataDto)
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkHaefeleNO">
+<FormalSpec>HaefeleNOPersonality:DOM.common.HaefeleNOPersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..KlantData = ..GeefKlantData(..KlantDataDto.ID, HaefeleNOPersonality)
+	
+	Do ..ValideerKlantId(..KlantDataDto.ID, HaefeleNOPersonality)
+	Do ..ConverteerKlantData(..KlantData, ..KlantDataDto)
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkHaefeleFR">
+<FormalSpec>HaefeleFRPersonality:DOM.common.HaefeleFRPersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..KlantData = ..GeefKlantData(..KlantDataDto.ID, HaefeleFRPersonality)
+	
+	Do ..ValideerKlantId(..KlantDataDto.ID, HaefeleFRPersonality)
+	Do ..ConverteerKlantData(..KlantData, ..KlantDataDto)
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkHaefeleDK">
+<FormalSpec>HaefeleDKPersonality:DOM.common.HaefeleDKPersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..KlantData = ..GeefKlantData(..KlantDataDto.ID, HaefeleDKPersonality)
+	
+	Do ..ValideerKlantId(..KlantDataDto.ID, HaefeleDKPersonality)
+	Do ..ConverteerKlantData(..KlantData, ..KlantDataDto)
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkHaefeleCH">
+<FormalSpec>HaefeleCHPersonality:DOM.common.HaefeleCHPersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..KlantData = ..GeefKlantData(..KlantDataDto.ID, HaefeleCHPersonality)
+	
+	Do ..ValideerKlantId(..KlantDataDto.ID, HaefeleCHPersonality)
+	Do ..ConverteerKlantData(..KlantData, ..KlantDataDto)
+]]></Implementation>
+</Method>
+
 <Method name="VerwerkHein">
 <FormalSpec>HeinPersonality:DOM.common.HeinPersonality</FormalSpec>
 <Implementation><![CDATA[
@@ -366,6 +466,96 @@
 ]]></Implementation>
 </Method>
 
+<Method name="VerwerkDozon">
+<FormalSpec>DozonPersonality:DOM.common.DozonPersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..KlantData = ..GeefKlantData(..KlantDataDto.ID, DozonPersonality)
+	
+	Do ..ValideerKlantId(..KlantDataDto.ID, DozonPersonality)
+	Do ..ConverteerKlantData(..KlantData, ..KlantDataDto)
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkBlumPL">
+<FormalSpec>BlumPLPersonality:DOM.common.BlumPLPersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..KlantData = ..GeefKlantData(..KlantDataDto.ID, BlumPLPersonality)
+	
+	Do ..ValideerKlantId(..KlantDataDto.ID, BlumPLPersonality)
+	Do ..ConverteerKlantData(..KlantData, ..KlantDataDto)
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkMeurer">
+<FormalSpec>MeurerPersonality:DOM.common.MeurerPersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..KlantData = ..GeefKlantData(..KlantDataDto.ID, MeurerPersonality)
+	
+	Do ..ValideerKlantId(..KlantDataDto.ID, MeurerPersonality)
+	Do ..ConverteerKlantData(..KlantData, ..KlantDataDto)
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkHaefeleES">
+<FormalSpec>HaefeleESPersonality:DOM.common.HaefeleESPersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..KlantData = ..GeefKlantData(..KlantDataDto.ID, HaefeleESPersonality)
+	
+	Do ..ValideerKlantId(..KlantDataDto.ID, HaefeleESPersonality)
+	Do ..ConverteerKlantData(..KlantData, ..KlantDataDto)
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkOPODuitsland">
+<FormalSpec>OPODePersonality:DOM.common.OPODePersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..KlantData = ..GeefKlantData(..KlantDataDto.ID, OPODePersonality)
+	
+	Do ..ValideerKlantId(..KlantDataDto.ID, OPODePersonality)
+	Do ..ConverteerKlantData(..KlantData, ..KlantDataDto)
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkBlumCZ">
+<FormalSpec>BlumCZPersonality:DOM.common.BlumCZPersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..KlantData = ..GeefKlantData(..KlantDataDto.ID, BlumCZPersonality)
+	
+	Do ..ValideerKlantId(..KlantDataDto.ID, BlumCZPersonality)
+	Do ..ConverteerKlantData(..KlantData, ..KlantDataDto)
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkOstermannBE">
+<FormalSpec>OstermannBEPersonality:DOM.common.OstermannBEPersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..KlantData = ..GeefKlantData(..KlantDataDto.ID, OstermannBEPersonality)
+	
+	Do ..ValideerKlantId(..KlantDataDto.ID, OstermannBEPersonality)
+	Do ..ConverteerKlantData(..KlantData, ..KlantDataDto)
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkOstermannNL">
+<FormalSpec>OstermannNLPersonality:DOM.common.OstermannNLPersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..KlantData = ..GeefKlantData(..KlantDataDto.ID, OstermannNLPersonality)
+	
+	Do ..ValideerKlantId(..KlantDataDto.ID, OstermannNLPersonality)
+	Do ..ConverteerKlantData(..KlantData, ..KlantDataDto)
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkOstermannDE">
+<FormalSpec>OstermannDEPersonality:DOM.common.OstermannDEPersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..KlantData = ..GeefKlantData(..KlantDataDto.ID, OstermannDEPersonality)
+	
+	Do ..ValideerKlantId(..KlantDataDto.ID, OstermannDEPersonality)
+	Do ..ConverteerKlantData(..KlantData, ..KlantDataDto)
+]]></Implementation>
+</Method>
+
 <Method name="GeefKlantData">
 <FormalSpec>KlantId:TECH.String,Personality:DOM.common.Personality</FormalSpec>
 <Private>1</Private>