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 -r1.3 -r1.3.2.1
--- openacs-4/packages/evaluation/tcl/evaluation-procs.xql 4 Apr 2005 18:22:36 -0000 1.3
+++ openacs-4/packages/evaluation/tcl/evaluation-procs.xql 31 May 2005 23:13:10 -0000 1.3.2.1
@@ -101,5 +101,80 @@
+
+
+
+
+ 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
+
+
+
+