Index: openacs-4/packages/evaluation/tcl/evaluation-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/evaluation/tcl/evaluation-procs.xql,v
diff -u -N -r1.1.2.1 -r1.1.2.2
--- openacs-4/packages/evaluation/tcl/evaluation-procs.xql 17 Nov 2004 23:58:17 -0000 1.1.2.1
+++ openacs-4/packages/evaluation/tcl/evaluation-procs.xql 8 Jun 2005 22:07:45 -0000 1.1.2.2
@@ -13,5 +13,81 @@
+
+
+
+
+ select et.task_id,
+ et.weight as task_weight
+ from evaluation_tasksi et
+ where et.grade_item_id = (select item_id from cr_revisions where revision_id=:grade_id)
+ and content_revision__is_live(et.task_id) = true
+
+
+
+
+
+
+
+ select grade_id, weight
+ from evaluation_grades
+
+
+
+
+
+ update evaluation_tasks set points=:points
+ where task_id=:task_id
+
+
+
+
+
+
+ select task_id from evaluation_tasks
+
+
+
+
+
+
+
+ update evaluation_tasks set perfect_score=:perfect_score
+ where task_id=:task_id
+
+
+
+
+
+ select task_id from evaluation_tasks
+
+
+
+
+
+
+
+ update evaluation_tasks set relative_weight=:relative_weight
+ where task_id=:task_id
+
+
+
+
+
+ select task_id from evaluation_tasks
+
+
+
+
+
+
+
+ update evaluation_tasks set forums_related_p=:forums_related_p
+ where task_id=:task_id
+
+
+
+
+