Index: openacs-4/packages/assessment/tcl/as-checks-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/tcl/as-checks-procs.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/assessment/tcl/as-checks-procs.tcl	25 Jan 2005 22:03:44 -0000	1.5
+++ openacs-4/packages/assessment/tcl/as-checks-procs.tcl	26 Jan 2005 23:14:29 -0000	1.6
@@ -302,11 +302,14 @@
     
 } {
     
-    db_foreach section_checks {} {
+    set section_checks [db_list_of_lists section_checks { }]
+    ns_log notice "$section_checks"
+    foreach check $section_checks  {
+	set check_sql [lindex $check 1]
 	set perform [db_string check_sql $check_sql]
-	if {$action_p == "t"} {
+	if {[lindex $check 2] == "t"} {
 	    if {$perform == 1} {
-		as::assessment::check::action_exec -inter_item_check_id $inter_item_check_id -session_id $session_id
+		as::assessment::check::action_exec -inter_item_check_id [lindex $check 0] -session_id $session_id
 	    }
 	}
     }
@@ -452,3 +455,12 @@
     set display_info $action
     return $display_info
 }
+
+ad_proc -public as::assessment::check::copy_checks{
+    {-section_id:required}
+    {-new_section_id:required}
+} {
+    
+} {
+
+}
\ No newline at end of file
Index: openacs-4/packages/assessment/tcl/as-checks-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/tcl/as-checks-procs.xql,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/assessment/tcl/as-checks-procs.xql	25 Jan 2005 20:43:05 -0000	1.2
+++ openacs-4/packages/assessment/tcl/as-checks-procs.xql	26 Jan 2005 23:14:29 -0000	1.3
@@ -237,7 +237,7 @@
 
 <fullquery name="as::assessment::check::eval_i_checks.section_checks">
       <querytext>
-        select * from as_inter_item_checks c,as_action_map am where c.inter_item_check_id=am.inter_item_check_id and am.action_perform='i' and  section_id_from=:section_id order by am.order_by
+        select c.inter_item_check_id,c.check_sql,action_p from as_inter_item_checks c,as_action_map am where c.inter_item_check_id=am.inter_item_check_id and am.action_perform='i' and  section_id_from=:section_id order by am.order_by
       </querytext>
 </fullquery>