Index: openacs-4/packages/assessment/tcl/as-section-procs.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/tcl/as-section-procs.xql,v diff -u -r1.3 -r1.4 --- openacs-4/packages/assessment/tcl/as-section-procs.xql 10 Dec 2004 11:42:23 -0000 1.3 +++ openacs-4/packages/assessment/tcl/as-section-procs.xql 22 Dec 2004 20:52:17 -0000 1.4 @@ -49,4 +49,44 @@ + + + + select s.as_item_id, r.title, r.description, i.subtext, m.required_p, m.max_time_to_complete + from as_session_items s, as_items i, as_item_section_map m, cr_revisions r + where s.session_id = :session_id + and s.section_id = :section_id + and i.as_item_id = s.as_item_id + and r.revision_id = i.as_item_id + and m.as_item_id = s.as_item_id + and m.section_id = s.section_id + order by s.sort_order + + + + + + + + select i.as_item_id, ci.name, cr.title, cr.description, i.subtext, + m.required_p, m.max_time_to_complete, m.fixed_position + from as_item_section_map m, as_items i, cr_revisions cr, cr_items ci + where cr.revision_id = i.as_item_id + and i.as_item_id = m.as_item_id + and m.section_id = :section_id + and ci.item_id = cr.item_id + order by m.sort_order + + + + + + + + insert into as_session_items (session_id, section_id, as_item_id, sort_order) + values (:session_id, :section_id, :as_item_id, :count) + + + +