Index: DOM/CRM/impl/DataM/DataMKlant.cls.xml
===================================================================
diff -u -r1328 -r1334
--- DOM/CRM/impl/DataM/DataMKlant.cls.xml	(.../DataMKlant.cls.xml)	(revision 1328)
+++ DOM/CRM/impl/DataM/DataMKlant.cls.xml	(.../DataMKlant.cls.xml)	(revision 1334)
@@ -163,7 +163,7 @@
 		$$$ThrowError($$$errGeneralError,"Er is geen KlantNummer ingevuld, kan object niet saven.")	
 	}
 	
-	If (..AlgemeneGegevensDirty || ..BetalingsGegevens2Dirty || ..BetalingsGegevens3Dirty || ..Opmerkingen1Dirty || ..Opmerkingen2Dirty || ..Node7Dirty)
+	If (..AlgemeneGegevensDirty || ..BetalingsGegevens1Dirty || ..BetalingsGegevens2Dirty || ..BetalingsGegevens3Dirty || ..Opmerkingen1Dirty || ..Opmerkingen2Dirty || ..Node7Dirty)
 	{
 		Set OudeKlantIndex = $PIECE(^DKL("K","KL.A",..KlantNummer,0),"\",31)
 		
@@ -283,8 +283,10 @@
 <Implementation><![CDATA[
 	Set KlantIndex = ..GeefKlantIndexKKL()
 	Set KlantNummer = ..GeefNummer()
-	Merge ^KKL(KlantIndex) = ^KKL(OudeKlantIndex) //^DKL("K","KL.A",KlantNummer) 
-	Kill ^KKL(OudeKlantIndex)
+	If (KlantIndex '= OudeKlantIndex){
+		Merge ^KKL(KlantIndex) = ^KKL(OudeKlantIndex) 
+		Kill ^KKL(OudeKlantIndex)
+	}
 ]]></Implementation>
 </Method>