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.18 -r1.19
--- openacs-4/packages/assessment/tcl/as-checks-procs.xql 2 Mar 2005 22:35:28 -0000 1.18
+++ openacs-4/packages/assessment/tcl/as-checks-procs.xql 3 Mar 2005 22:46:41 -0000 1.19
@@ -293,61 +293,21 @@
-
-
- select action_id,order_by,user_message,action_perform from as_action_map where inter_item_check_id=:inter_item_check_id
-
-
-
-
- select action_id,order_by,user_message,action_perform from as_action_map where inter_item_check_id=:inter_item_check_id
-
-
-
-
- insert into as_action_map (inter_item_check_id,action_id,order_by,user_message,action_perform) values
- (:insert_p,:action_id,:order_by,:user_message,:action_perform)
+
+
+ update as_inter_item_checks set section_id_from=:new_section_id where inter_item_check_id=:inter_item_check_id
-
+
- insert into as_action_map (inter_item_check_id,action_id,order_by,user_message,action_perform) values
- (:insert_p,:action_id,:order_by,:user_message,:action_perform)
+ update as_inter_item_checks set check_sql=:check_sql where inter_item_check_id=:inter_item_check_id
-
-
- select parameter_id,value,item_id from as_param_map
- where inter_item_check_id=:inter_item_check_id
-
-
-
-
-
- select parameter_id,value,item_id from as_param_map
- where inter_item_check_id=:inter_item_check_id
-
-
-
-
-
-
- insert into as_param_map (parameter_id,value,item_id,inter_item_check_id) values (:parameter_id,:value,:item_id,:insert_p)
-
-
-
-
-
- insert into as_param_map (parameter_id,value,item_id,inter_item_check_id) values (:parameter_id,:value,:item_id,:insert_p)
-
-
-
-
select inter_item_check_id from as_inter_item_checks where section_id_to =:section_id