Index: TECH/Error.inc.rou
===================================================================
diff -u -r28 -r321
--- TECH/Error.inc.rou	(.../Error.inc.rou)	(revision 28)
+++ TECH/Error.inc.rou	(.../Error.inc.rou)	(revision 321)
@@ -39,7 +39,7 @@
 #define chkRequiredParameter(%p)                 If '$length($get(%p)) $$$ThrowError($$$errParameterRequired,"%p")
 #define chkIsObject(%obj)                        If '$isobject(%obj) $$$ThrowError($$$errObjectExpected,"%obj")
 #define chkValidateObject(%obj)                  Set sc=%obj.%ValidateObject()  If $$$ISERR(sc) $$$ThrowErrorStatus($$$errObjectValidationFailed,"%obj",sc)
-#define chkValidateDataType(%dt,%p)				 if '##class(%dt).IsValidDT(%p) $$$ThrowError($$$errInvalidInput,%p)	
+#define chkValidateDataType(%dt,%p)				 if '##class(%dt).IsValid(%p) $$$ThrowError($$$errInvalidInput,%p)	
 #define chkMaxLength(%var,%maxlength)			 if $length(%var) > %maxlength $$$ThrowError($$$errInvalidInput,%var_": "_$length(%var)_">"_%maxlength)	
  
 #define CreateStdErrorObject					 set %vhLastError = ##class(TECH.Error.ErrorObject).%New() 
@@ -61,4 +61,6 @@
 #define errObjectValidationFailed                "3000:ObjectValidationFailed" 
 #define errSaveFailed                            "3001:SaveFailed" 			
  
-#define errUserError                             "5000:UserError"
\ No newline at end of file
+#define errUserError                             "5000:UserError"
+
+