@@ -47,10 +47,11 @@
     get-prev-run-ids
     get-run-ids-matching-target
     get-runs-by-patt
     get-steps-data
     get-steps-for-test
+    read-test-data
     login
     testmeta-get-record
     have-incompletes?
     synchash-get
     ))
@@ -226,10 +227,13 @@
 
 	    ;; STEPS
 	    ((get-steps-data)               (apply db:get-steps-data dbstruct params))
 	    ((get-steps-for-test)           (apply db:get-steps-for-test dbstruct params))
 
+	    ;; TEST DATA
+	    ((read-test-data)               (apply db:read-test-data dbstruct params))
+
 	    ;; MISC
 	    ((have-incompletes?)            (apply db:have-incompletes? dbstruct params))
 	    ((login)                        (apply db:login dbstruct params))
 	    ((general-call)                 (let ((stmtname   (car params))
 						  (run-id     (cadr params))