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 + + + +