Index: openacs-4/packages/workflow/tcl/workflow-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/workflow/tcl/workflow-procs.xql,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/workflow/tcl/workflow-procs.xql 12 Feb 2003 14:23:15 -0000 1.5
+++ openacs-4/packages/workflow/tcl/workflow-procs.xql 5 Mar 2003 17:18:10 -0000 1.6
@@ -10,6 +10,12 @@
+
+
+ select count(*) from workflows where workflow_id = :workflow_id
+
+
+
select w.workflow_id,
@@ -65,15 +71,7 @@
where workflow_id = :workflow_id
-
-
-
- select coalesce(max(sort_order),0) + 1
- from workflow_callbacks
- where workflow_id = :workflow_id
-
-
-
+
insert into workflow_callbacks (workflow_id, acs_sc_impl_id, sort_order)