@@ -33,10 +33,13 @@
 ;;(declare (uses archive))
 ;; (declare (uses filedb))
 
 (declare (uses commonmod))
 (import commonmod)
+
+(declare (uses dbmod))
+(import dbmod)
 
 ;;(include "common_records.scm")
 ;;(include "key_records.scm")
 (include "db_records.scm") ;; provides db:test-get-id
 ;;(include "run_records.scm")