Index: Tools/Mock/MockCreator.cls.xml
===================================================================
diff -u -r835 -r866
--- Tools/Mock/MockCreator.cls.xml	(.../MockCreator.cls.xml)	(revision 835)
+++ Tools/Mock/MockCreator.cls.xml	(.../MockCreator.cls.xml)	(revision 866)
@@ -97,11 +97,12 @@
 		set Method.ReturnType = ..MockClass.Name
 		set Method.FormalSpec = ""
 		set Method.ClassMethod = 1
-		#dim APIClassName As %String = $piece(..Class.Name,".",$length(..Class.Name,"."))
+		set Method.SequenceNumber=1
 		
+		#dim APIClassName As %String = ##class(TECH.StringUtils).GetLastPart(..Class.Name,".")
 		do Method.Implementation.WriteLine($char(9)_"do ##class("_..GetContextClassName()_").Instance().Push"_APIClassName_"ClassName("""_..MockClass.Name_""")")
 		do Method.Implementation.WriteLine($char(9)_"quit ##class("_..GetContextClassName()_").Instance().Geef"_APIClassName_"()")
-		
+
 		do Method.%Save()
 	}
 ]]></Implementation>
@@ -132,6 +133,7 @@
 	set MockMethod.parent = ..MockClass
 	set MockMethod.ReturnType = Method.ReturnType
 	set MockMethod.FormalSpec = Method.FormalSpec
+	set MockMethod.SequenceNumber=2
 	
 	#dim CacheCommando As %String = $select($length(Method.ReturnType)>0:"quit",1:"do")