Changeset 28060

Timestamp:

May 20, 2010, 6:28:43 PM (16 years ago)

Author:

heather

Message:

added minidvodb.pro, it's not written yet

Location:

branches/haf_branches/ipp.20100512/ippTasks

Files:

• addstar.pro (modified) (3 diffs)
• minidvodb.pro (added)
• survey.pro (modified) (3 diffs)

branches/haf_branches/ipp.20100512/ippTasks/addstar.pro

@@ -7 +7 @@
 
 book init addPendingExp
-book init minidvodbPending
 
 macro addstar.status
@@ -46 +45 @@
 end
 
-macro minidvodb.status
-  book listbook minidvodbPending
-end
-
-macro minidvodb.reset
-  book init minidvodbPending
-end
-
-macro minidvodb.create.on
-  task minidvodb.create
-    active true
-  end
-end
-macro minidvodb.create.off
-  task minidvodb.create
-    active false
-  end
-end
 
 # this variable will cycle through the known database names
 $addstar_DB = 0
 $addstar_revert_DB = 0
-$minidvodb_DB = 0
-$minidvodb_revert_DB = 0
 
 
@@ -193 +172 @@
     $run = $run --minidvodb
     $run = $run --minidvodb_group
-        if ("$MINIDVODB_NAME" != "NULL")
+        if (("$MINIDVODB_NAME" != "NULL") && ("$MINIDVODB_NAME" != "(null)"))
            $run = $run --minidvodb_name  #have addstar_run.pl grab the 'active' name if it is NULL
         end

branches/haf_branches/ipp.20100512/ippTasks/survey.pro

@@ -207 +207 @@
 
 macro survey.add.addstar
-  if ($0 != 3)
-    echo "USAGE: survey.add.addstar (label) (dvodb)"
+  if ($0 != 4)
+    echo "USAGE: survey.add.addstar (label) (dvodb) (minidvodb_group)"
     break
   end
   book newpage SURVEY_ADDSTAR $1
   book setword SURVEY_ADDSTAR $1 DVODB $2
+  book setword SURVEY_ADDSTAR $1 MINIDVODB_GROUP $3
   book setword SURVEY_ADDSTAR $1 STATE PENDING
 end
@@ -638 +639 @@
     book setword SURVEY_ADDSTAR $label STATE DONE
     book getword SURVEY_ADDSTAR $label DVODB -var dvodb
+    book getword SURVEY_ADDSTAR $label MINIDVODB_GROUP -var minidvodb_group
   
  #   $run = addtool -definebyquery -destreaked -label $label -set_dvodb $dbodb
@@ -648 +650 @@
     end
     
-    $run = $run -definebyquery -destreaked -label $label -set_dvodb $dvodb
+    $run = $run -definebyquery -destreaked -label $label -set_dvodb $dvodb -set_minidvodb_group $minidvodb_group
     echo $run
     command $run