Index: Tools/CompileEnumerator.cls.xml =================================================================== diff -u -r1613 -r1912 --- Tools/CompileEnumerator.cls.xml (.../CompileEnumerator.cls.xml) (revision 1613) +++ Tools/CompileEnumerator.cls.xml (.../CompileEnumerator.cls.xml) (revision 1912) @@ -36,7 +36,7 @@ If ('VraagBevestiging) || (Input = "Y") { w !!,"Compileren ...",!! - Do $SYSTEM.OBJ.CompileList(.mdToCompile,"cfvko1",.ErrorLog) + Do $SYSTEM.OBJ.CompileList(.mdToCompile,"cfvko1rby",.ErrorLog) } } Else @@ -61,13 +61,10 @@ { Set ClassDefinition = ##class(TECH.ClassInfo.ClassDefinition).%New(ClassName) If $IsObject(ClassDefinition) { - If (ClassDefinition.IsPersistent()) + If (..BevatProperty(ClassDefinition, EnumeratorKlasse)) { - If (..BevatProperty(ClassDefinition, EnumeratorKlasse)) - { - Set mdToCompile(ClassName_".cls")="" - w "Gebruikt in persistente klasse: "_ClassName,! - } + Set mdToCompile(ClassName_".cls")="" + w "Gebruikt als property in klasse: "_ClassName,! } If (ClassDefinition.IsWebservice())