Index: openacs-4/packages/workflow/tcl/action-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/workflow/tcl/action-procs.xql,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/workflow/tcl/action-procs.xql	20 Jan 2003 15:45:00 -0000	1.3
+++ openacs-4/packages/workflow/tcl/action-procs.xql	21 Jan 2003 18:06:00 -0000	1.4
@@ -85,6 +85,23 @@
     </querytext>
   </fullquery>
 
+  <fullquery name="workflow::action::callback_insert.select_sort_order">
+    <querytext>
+        select coalesce(max(sort_order)) + 1
+        from   workflow_action_callbacks
+        where  action_id = :action_id
+    </querytext>
+  </fullquery>
+
+  <fullquery name="workflow::action::callback_insert.insert_callback">
+    <querytext>
+        insert into workflow_action_callbacks (action_id, acs_sc_impl_id, sort_order)
+        values (:action_id, :acs_sc_impl_id, :sort_order)
+    </querytext>
+  </fullquery>
+
+
+
   <fullquery name="workflow::action::fsm::new.insert_fsm_action">
     <querytext>
         insert into workflow_fsm_actions