Index: TECH/GlobalMultiDimIterator.cls.xml
===================================================================
diff -u -r3220 -r3221
--- TECH/GlobalMultiDimIterator.cls.xml	(.../GlobalMultiDimIterator.cls.xml)	(revision 3220)
+++ TECH/GlobalMultiDimIterator.cls.xml	(.../GlobalMultiDimIterator.cls.xml)	(revision 3221)
@@ -64,13 +64,15 @@
 </Method>
 
 <Method name="AtEnd">
-<FormalSpec>GlobalReference</FormalSpec>
+<FormalSpec>GlobalReference:%String</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
 <Implementation><![CDATA[
-	Set AtEnd=0
-	Quit:GlobalReference="" 1
-	For I=0:1:..InitialGlobalReferenceSubscriptLength
-	{
-		Set:$QSubscript(GlobalReference,I)'=$QSubscript(..InitialGlobalReference,I) AtEnd=1
+	Quit:(GlobalReference = "") $$$True
+	
+	#dim AtEnd As %Boolean = 0
+	#dim I As %String = ""
+	For I = 1 : 1 :..InitialGlobalReferenceSubscriptLength {
+		Set:$$$Not($qsubscript(GlobalReference,I)=$qsubscript(..InitialGlobalReference,I)) AtEnd=1
 	}
 	Quit AtEnd
 ]]></Implementation>