Index: TECH/SourceCodeUtils.cls.xml =================================================================== diff -u -r946 -r974 --- TECH/SourceCodeUtils.cls.xml (.../SourceCodeUtils.cls.xml) (revision 946) +++ TECH/SourceCodeUtils.cls.xml (.../SourceCodeUtils.cls.xml) (revision 974) @@ -1,9 +1,9 @@ - + 1 %RegisteredObject -62173,36075.248007 +62185,50033.438475 62118,40201.414242 0 @@ -25,6 +25,9 @@ set CSPFilename = ##class(TECH.CSP.CSPApplicatie).GetPhysicalFilename(InternalName) if $length(CSPFilename) set Exists = ##class(%File).Exists(CSPFilename) } + if ItemType = "project" { + set Exists = $data(^oddPROJECT(..StripExtension(InternalName)))>0 + } quit Exists ]]> @@ -82,5 +85,5 @@ ]]> - +