Index: TECH/OBJ/Validator.cls.xml =================================================================== diff -u -r28 -r321 --- TECH/OBJ/Validator.cls.xml (.../Validator.cls.xml) (revision 28) +++ TECH/OBJ/Validator.cls.xml (.../Validator.cls.xml) (revision 321) @@ -1,10 +1,10 @@ - + + TECH.Error,vhLib.Macro 1 %RegisteredObject -0 vhLib.Logger @@ -17,10 +17,7 @@ set lbClassAndMethod = ##class(TECH.ClassUtils).GetCallingMethod() set ClassName = $listget(lbClassAndMethod,1) set Method = $listget(lbClassAndMethod,2) - if '##class(TECH.ClassUtils).IsValidReturnTypeForMethod(.Value,ClassName,Method) { - Set Info = "ClassName: "_ClassName_$$$CRLF_"Method: "_Method - $$$ThrowError($$$errInvalidOutput,Info) - } + Do ##class(TECH.ClassUtils).ValidateReturnTypeForMethod(.Value,ClassName,Method) quit ]]> @@ -58,4 +55,6 @@ ]]> + +