Index: vhUnitTest/TECH/Persistentie/GlobalNode/Test.cls.xml
===================================================================
diff -u -r2321 -r2323
--- vhUnitTest/TECH/Persistentie/GlobalNode/Test.cls.xml	(.../Test.cls.xml)	(revision 2321)
+++ vhUnitTest/TECH/Persistentie/GlobalNode/Test.cls.xml	(.../Test.cls.xml)	(revision 2323)
@@ -107,6 +107,32 @@
 	Do $$$AssertEquals(0, $Data(^vhUnitTestTECHGlobal(1, "a")))
 ]]></Implementation>
 </Method>
+
+<Method name="Test Reload PersistentNode na wijziging in de onderliggende global">
+<Implementation><![CDATA[
+	Do $$$AssertEquals(..Node.GeefPiece(1),"de eerste waarde", "Initiele waarde")
+	
+	Set ^vhUnitTestTECHGlobal(1,"a")="WaardeInGlobalGewijzigd"
+	Do $$$AssertEquals(..Node.GeefPiece(1),"de eerste waarde", "Na wijziging global, maar nog geen Reload()")
+
+	Do ..Node.Reload()
+	
+	Do $$$AssertEquals(..Node.GeefPiece(1),"WaardeInGlobalGewijzigd", "De waarde na Reload()")
+]]></Implementation>
+</Method>
+
+<Method name="Test Reload PersistentNode na wijziging via de Node.ZetPiece">
+<Implementation><![CDATA[
+	Do $$$AssertEquals(..Node.GeefPiece(1),"de eerste waarde", "Initiele waarde")
+	
+	Do ..Node.ZetPiece(1,"NieuweWaarde")
+	Do $$$AssertEquals(..Node.GeefPiece(1),"NieuweWaarde", "de waarde na de ZetPiece.")
+	
+	Do ..Node.Reload()
+	
+	Do $$$AssertEquals(..Node.GeefPiece(1),"de eerste waarde", "De waarde na Reload()")
+]]></Implementation>
+</Method>
 </Class>