Index: vhUnitTest/Utils/TECH/Persistent/KeyValuePairRepository/Test.cls.xml
===================================================================
diff -u -r34102 -r34105
--- vhUnitTest/Utils/TECH/Persistent/KeyValuePairRepository/Test.cls.xml	(.../Test.cls.xml)	(revision 34102)
+++ vhUnitTest/Utils/TECH/Persistent/KeyValuePairRepository/Test.cls.xml	(.../Test.cls.xml)	(revision 34105)
@@ -25,8 +25,8 @@
 	#dim KeyValuePairRepository As vhTest.Utils.TECH.Persistent.KeyValuePairRepository = ##class(vhTest.Utils.TECH.Persistent.KeyValuePairRepository).%New(,QueryAPISpy)
 	#dim KeyValuePair As vhTest.Utils.TECH.Persistent.KeyValuePair = KeyValuePairRepository.GeefViaKeyValue("DummyKey","DummyValue")
 	
-	Do $$$AssertEquals(KeyValuePair.Key, "DummyKey")
-	Do $$$AssertEquals(KeyValuePair.Value, "DummyValue")
+	Do $$$AssertEquals(KeyValuePair.Sleutel, "DummyKey")
+	Do $$$AssertEquals(KeyValuePair.Waarde, "DummyValue")
 ]]></Implementation>
 </Method>
 
@@ -38,8 +38,8 @@
 <Method name="VoegToeDummyKeyValuePair">
 <Implementation><![CDATA[
 	#dim KeyValuePair As vhTest.Utils.TECH.Persistent.KeyValuePair = ##class(vhTest.Utils.TECH.Persistent.KeyValuePair).%New()
-	Set KeyValuePair.Key = "DummyKey"
-	Set KeyValuePair.Value = "DummyValue"
+	Set KeyValuePair.Sleutel = "DummyKey"
+	Set KeyValuePair.Waarde = "DummyValue"
 
 	#dim KeyValuePairRepository As vhTest.Utils.TECH.Persistent.KeyValuePairRepository = ##class(vhTest.Utils.TECH.Persistent.KeyValuePairRepository).%New()
 	Do KeyValuePairRepository.Bewaar(KeyValuePair)