Index: vhUnitTest/TECH/GlobalMultiDimIterator/Test.cls.xml
===================================================================
diff -u -r3134 -r3221
--- vhUnitTest/TECH/GlobalMultiDimIterator/Test.cls.xml	(.../Test.cls.xml)	(revision 3134)
+++ vhUnitTest/TECH/GlobalMultiDimIterator/Test.cls.xml	(.../Test.cls.xml)	(revision 3221)
@@ -125,6 +125,19 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: Niet tot het einde lopen maar enkel tot">
+<Implementation><![CDATA[
+	set ^vhUnitTest.TECH.GlobalMultiDimIterator(1,1)="SkippedNode"
+	set ^vhUnitTest.TECH.GlobalMultiDimIterator(2,1)="Node2"
+	set ^vhUnitTest.TECH.GlobalMultiDimIterator(3,1)="SkippedNode"
+	
+	set Iterator = ##class(TECH.GlobalMultiDimIterator).%New("^vhUnitTest.TECH.GlobalMultiDimIterator(2)")
+	do $$$AssertTrue(Iterator.HasNext())
+	do $$$AssertEquals(Iterator.Next(),"Node2")
+	do $$$AssertFalse(Iterator.HasNext())
+]]></Implementation>
+</Method>
+
 <Method name="DeleteData">
 <Private>1</Private>
 <Implementation><![CDATA[	kill @..#DataGlobal