Index: Tools/CompileEnumerator.cls.xml
===================================================================
diff -u -r1912 -r2245
--- Tools/CompileEnumerator.cls.xml (.../CompileEnumerator.cls.xml) (revision 1912)
+++ Tools/CompileEnumerator.cls.xml (.../CompileEnumerator.cls.xml) (revision 2245)
@@ -63,8 +63,15 @@
If $IsObject(ClassDefinition) {
If (..BevatProperty(ClassDefinition, EnumeratorKlasse))
{
- Set mdToCompile(ClassName_".cls")=""
- w "Gebruikt als property in klasse: "_ClassName,!
+ set IsGenerated = ##class(TECH.SourceCodeUtils).IsGeneratedCode(ClassName_".cls",.GeneratedBy)
+ if IsGenerated {
+ w "Gebruikt als property in klasse "_ClassName_" ( gegenereerd door "_GeneratedBy_" )",!
+ Set mdToCompile(GeneratedBy_".cls")=""
+ }
+ else {
+ w "Gebruikt als property in klasse: "_ClassName,!
+ Set mdToCompile(ClassName_".cls")=""
+ }
}
If (ClassDefinition.IsWebservice())
@@ -123,10 +130,9 @@
}
}
}
- }
- }
-
- Quit
+ }
+}
+Quit
]]>
Index: TECH/SourceCodeUtils.cls.xml
===================================================================
diff -u -r1569 -r2245
--- TECH/SourceCodeUtils.cls.xml (.../SourceCodeUtils.cls.xml) (revision 1569)
+++ TECH/SourceCodeUtils.cls.xml (.../SourceCodeUtils.cls.xml) (revision 2245)
@@ -70,6 +70,29 @@
]]>
+
+1
+
+%Boolean
+
+
+
1
InternalName:%String