@@ -435,10 +435,12 @@
 
 (define (rmt:get-count-tests-running-for-testname run-id testname)
   (assert (number? run-id) "FATAL: Run id required.")
   (rmt:send-receive 'get-count-tests-running-for-testname run-id (list run-id testname)))
 
+(define (rmt:get-all-state-status-counts-for-test run-id test-name item-path item-state-in item-status-in)
+  (rmt:send-receive 'get-all-state-status-counts-for-test run-id (list run-id test-name item-path item-state-in item-status-in)))
 (define (rmt:get-count-tests-running-in-jobgroup run-id jobgroup)
   (assert (number? run-id) "FATAL: Run id required.")
   (rmt:send-receive 'get-count-tests-running-in-jobgroup run-id (list run-id jobgroup)))
 
 (define (rmt:set-state-status-and-roll-up-run run-id state status)