Index: openacs-4/packages/assessment/tcl/as-assessment-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/tcl/as-assessment-procs.xql,v
diff -u -r1.8 -r1.9
--- openacs-4/packages/assessment/tcl/as-assessment-procs.xql 18 Jan 2005 12:42:36 -0000 1.8
+++ openacs-4/packages/assessment/tcl/as-assessment-procs.xql 23 Jan 2005 18:10:48 -0000 1.9
@@ -99,6 +99,20 @@
+
+
+
+ select count(*) as total_tries, max(session_id) as last_session_id
+ from as_sessions s, cr_revisions r, cr_revisions r2
+ where s.subject_id = :subject_id
+ and s.completed_datetime is not null
+ and s.assessment_id = r.revision_id
+ and r.item_id = r2.item_id
+ and r2.revision_id = :assessment_id
+
+
+
+