Index: db.scm
==================================================================
--- db.scm
+++ db.scm
@@ -3190,12 +3190,12 @@
                                   (let ((statuses (db:get-all-item-statuses db run-id test-name)))
                                     (if (equal? state "COMPLETED")
                                         (cons status statuses)
                                         statuses))
                                   *common:std-statuses* >))
-              (newstate          (car all-curr-states))
-              (newstatus         (car all-curr-statuses)))
+              (newstate          (if (null? all-curr-states) "NOT_STARTED" (car all-curr-states)))
+              (newstatus         (if (null? all-curr-statuses) "n/a" (car all-curr-statuses))))
          (db:test-set-state-status-by-id dbstruct run-id test-id newstate newstatus #f))))))
         
 (define db:roll-up-pass-fail-counts db:roll-up-items-state-status)
 
 ;; call with state = #f to roll up with out accounting for state/status of this item