Index: Tools/Test/Manager.cls.xml
===================================================================
diff -u -r2770 -r2815
--- Tools/Test/Manager.cls.xml	(.../Manager.cls.xml)	(revision 2770)
+++ Tools/Test/Manager.cls.xml	(.../Manager.cls.xml)	(revision 2815)
@@ -304,6 +304,11 @@
 	} else {
 		set IsValid = $zconvert(ClassName,"L") [ $zconvert(SubString,"L")
 	}
+	
+	if IsValid {
+		#dim LastPart = ##class(TECH.StringUtils).GetLastPart(ClassName,".")
+		set:(LastPart?2.3A3.4N) IsValid = +$get(^SYS("RunAcceptanceTest",LastPart))	
+	}
 	quit IsValid
 ]]></Implementation>
 </Method>