Index: Tools/Mock/MockCreator.cls.xml =================================================================== diff -u -r648 -r652 --- Tools/Mock/MockCreator.cls.xml (.../MockCreator.cls.xml) (revision 648) +++ Tools/Mock/MockCreator.cls.xml (.../MockCreator.cls.xml) (revision 652) @@ -35,11 +35,19 @@ set ..Class = ##class(%Dictionary.ClassDefinition).%OpenId(ClassName) if ..HasToUpdateMock() { - + #dim MockClassName As %String = ..GetMockClassName(ClassName) + + write !,"updating "_MockClassName set ..MockClass = ..OpenOrCreate(MockClassName ,ClassName) + set Description = ##class(%GlobalCharacterStream).%New() + + do Description.WriteLine("Deze klasse werd automatisch gegenereerd en onderhouden - lokale aanpassingen zijn niet nodig.") + do Description.WriteLine("Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt") + + set ..MockClass.Description = Description.Read() do ..MockClass.Methods.Clear() set itMethods = ##class(TECH.ListIterator).%New(..Class.Methods)