Index: openacs-4/packages/workflow/tcl/case-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/workflow/tcl/case-procs.xql,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/workflow/tcl/case-procs.xql	5 Mar 2003 17:18:10 -0000	1.6
+++ openacs-4/packages/workflow/tcl/case-procs.xql	28 Aug 2003 09:41:59 -0000	1.7
@@ -84,6 +84,33 @@
     </querytext>
   </fullquery>
 
+  <fullquery name="workflow::case::add_log_data.insert_log_data">
+    <querytext>
+      insert into workflow_case_log_data
+        (entry_id, key, value)
+      values
+        (:entry_id, :key, :value)
+    </querytext>
+  </fullquery>
+
+  <fullquery name="workflow::case::get_log_data_by_key.select_log_data">
+    <querytext>
+      select value
+      from   workflow_case_log_data
+      where  entry_id = :entry_id
+      and    key = :key
+    </querytext>
+  </fullquery>
+
+  <fullquery name="workflow::case::get_log_data.select_log_data">
+    <querytext>
+      select key, value
+      from   workflow_case_log_data
+      where  entry_id = :entry_id
+      order  by key
+    </querytext>
+  </fullquery>
+
   <fullquery name="workflow::case::role::get_callbacks.select_callbacks">
     <querytext>
       select impl.impl_name