Index: TECH/Iterator.cls.xml
===================================================================
diff -u -r1074 -r33937
--- TECH/Iterator.cls.xml	(.../Iterator.cls.xml)	(revision 1074)
+++ TECH/Iterator.cls.xml	(.../Iterator.cls.xml)	(revision 33937)
@@ -35,5 +35,9 @@
 <Abstract>1</Abstract>
 <ReturnType>%CacheString</ReturnType>
 </Method>
+
+<Method name="Reset">
+<Abstract>1</Abstract>
+</Method>
 </Class>
 </Export>
Index: TECH/ArrayOneDimIterator.cls.xml
===================================================================
diff -u -r2812 -r33937
--- TECH/ArrayOneDimIterator.cls.xml	(.../ArrayOneDimIterator.cls.xml)	(revision 2812)
+++ TECH/ArrayOneDimIterator.cls.xml	(.../ArrayOneDimIterator.cls.xml)	(revision 33937)
@@ -2,7 +2,7 @@
 <Export generator="Cache" version="9">
 <Class name="TECH.ArrayOneDimIterator">
 <ProcedureBlock>1</ProcedureBlock>
-<Super>Iterator,%RegisteredObject</Super>
+<Super>TECH.Iterator,%RegisteredObject</Super>
 <ClassDefinitionError>0</ClassDefinitionError>
 
 <Property name="Array">
@@ -48,17 +48,17 @@
 ]]></Implementation>
 </Method>
 
-<UDLText name="T">
-<Content><![CDATA[
-// Returns the list key of the current object
-
-]]></Content>
-</UDLText>
-
 <Method name="Key">
+<Description>
+Returns the list key of the current object</Description>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[	Quit ..Key
 ]]></Implementation>
 </Method>
+
+<Method name="Reset">
+<Implementation><![CDATA[	set ..Key = ""
+]]></Implementation>
+</Method>
 </Class>
 </Export>