Index: TECH/GlobalIterator.cls.xml
===================================================================
diff -u -r1243 -r1245
--- TECH/GlobalIterator.cls.xml	(.../GlobalIterator.cls.xml)	(revision 1243)
+++ TECH/GlobalIterator.cls.xml	(.../GlobalIterator.cls.xml)	(revision 1245)
@@ -49,6 +49,7 @@
 </Method>
 
 <Method name="HasNext">
+<Final>1</Final>
 <ReturnType>%Boolean</ReturnType>
 <Implementation><![CDATA[
 	#dim HasNext As %Boolean = $$$True
@@ -75,6 +76,7 @@
 </Method>
 
 <Method name="Reset">
+<Final>1</Final>
 <Implementation><![CDATA[
 	If ..HeeftDefaultStartPositie() || ($Data(@..Global@(..StartPos)) = 0) {
 		Set ..HuidigePos = $Order(@..Global@(..StartPos))
@@ -92,27 +94,31 @@
 </Method>
 
 <Method name="IsEindPositieGroterDanHuidigePositie">
+<Final>1</Final>
 <Private>1</Private>
 <ReturnType>%Boolean</ReturnType>
 <Implementation><![CDATA[	Quit ..EindPos]..HuidigePos
 ]]></Implementation>
 </Method>
 
 <Method name="HeeftDefaultEindPositie">
+<Final>1</Final>
 <Private>1</Private>
 <ReturnType>%Boolean</ReturnType>
 <Implementation><![CDATA[	Quit ..EindPos = ..#DefaultEindPos
 ]]></Implementation>
 </Method>
 
 <Method name="HeeftDefaultStartPositie">
+<Final>1</Final>
 <Private>1</Private>
 <ReturnType>%Boolean</ReturnType>
 <Implementation><![CDATA[	Quit ..StartPos = ..#DefaultStartPos
 ]]></Implementation>
 </Method>
 
 <Method name="ZitOpLaatstePositieInGlobal">
+<Final>1</Final>
 <Private>1</Private>
 <ReturnType>%Boolean</ReturnType>
 <Implementation><![CDATA[	Quit ..HuidigePos=..#DefaultEindPos