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