Index: openacs-4/packages/assessment/tcl/as-assessment-procs-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/tcl/as-assessment-procs-oracle.xql,v
diff -u -r1.8.2.2 -r1.8.2.3
--- openacs-4/packages/assessment/tcl/as-assessment-procs-oracle.xql	2 May 2006 12:53:09 -0000	1.8.2.2
+++ openacs-4/packages/assessment/tcl/as-assessment-procs-oracle.xql	17 May 2006 15:53:56 -0000	1.8.2.3
@@ -71,4 +71,22 @@
 	</querytext>
 </fullquery>
 
+<fullquery name="as::assessment::new.update_clobs">
+    <querytext>
+      update as_assessments set
+      instructions=empty_clob(),consent_page=empty_clob()
+      where assessment_id=:as_assessment_id
+      returning instructions, consent_page into :1, :2
+    </querytext>
+</fullquery>
+
+<fullquery name="as::assessment::edit.update_clobs">
+    <querytext>
+      update as_assessments set
+      instructions=empty_clob(),consent_page=empty_clob()
+      where assessment_id=:new_rev_id
+      returning instructions, consent_page into :1, :2
+    </querytext>
+</fullquery>
+  
 </queryset>