@@ -59,10 +59,11 @@
   update-mutex
   updaters 
   updating
   uidat ;; needs to move to tabdat at some time
   hide-not-hide-tabs
+  target
   )
 
 (define (dboard:commondat-make)
   (make-dboard:commondat
    curr-tab-num:         0
@@ -70,19 +71,41 @@
    please-update:        #t
    update-mutex:         (make-mutex)
    updaters:             (make-hash-table)
    updating:             #f
    hide-not-hide-tabs:   #f
+   target:               ""
    ))
 
 ;; RADT => Matrix defstruct addition
 (defstruct dboard:graph-dat
     ((id           #f) : string)
     ((color        #f) : vector)
     ((flag         #t) : boolean)
     ((cell         #f) : number)
     )
+
+;; RA => returns the tabdat stored at hashkey passed in commondat-tabdats table (e.g. 0 gives summary)
+;;
+(define (dboard:common-get-tabdat commondat #!key (tab-num #f))
+  (let* ((tnum (or tab-num
+		   (dboard:commondat-curr-tab-num commondat)
+		   0)) ;; tab-num value is curr-tab-num value in passed commondat
+	 (ht   (dboard:commondat-tabdats commondat))
+	 (res  (hash-table-ref/default ht tnum #f)))
+    (or res
+	(let ((new-tabdat  (dboard:tabdat-make-data)))
+	  (hash-table-set! ht tnum new-tabdat)
+	  new-tabdat))))
+
+;; RA => sets the tabdat passed to the hashkey at commondat:tabdats hash table
+;;
+(define (dboard:common-set-tabdat! commondat tabnum tabdat)
+  (hash-table-set!
+   (dboard:commondat-tabdats commondat)
+   tabnum
+   tabdat))
 
 ;; data for runs, tests etc. was used in run summary?
 ;;
 (defstruct dboard:runsdat
   ;; new system