Index: openacs-4/packages/assessment/tcl/as-session-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/tcl/as-session-procs.xql,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/assessment/tcl/as-session-procs.xql	22 Feb 2008 23:42:33 -0000	1.4
+++ openacs-4/packages/assessment/tcl/as-session-procs.xql	29 Aug 2008 19:03:52 -0000	1.5
@@ -69,6 +69,26 @@
 	</querytext>
 </fullquery>
 
+<fullquery name="as::session::response_as_email.session_items">
+      <querytext>
+      
+    select i.as_item_id, i.subtext, cr.title, cr.description, ci.name,
+	   ism.required_p, ism.section_id, ism.sort_order, i.feedback_right,
+	   i.feedback_wrong, ism.max_time_to_complete, ism.points, s.subject_id
+    from as_items i, cr_revisions cr, cr_items ci, as_item_section_map ism,
+         as_session_items si, as_sessions s
+    where ci.item_id = cr.item_id
+    and cr.revision_id = i.as_item_id
+    and i.as_item_id = ism.as_item_id
+    and ism.section_id = si.section_id
+    and ism.as_item_id = si.as_item_id
+    and si.session_id = :session_id
+    and s.session_id = si.session_id
+    order by si.sort_order
+    
+      </querytext>
+</fullquery>
+
 </queryset>