Index: openacs-4/packages/workflow/tcl/state-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/workflow/tcl/state-procs.xql,v
diff -u -N -r1.1 -r1.2
--- openacs-4/packages/workflow/tcl/state-procs.xql	21 Jan 2003 18:06:00 -0000	1.1
+++ openacs-4/packages/workflow/tcl/state-procs.xql	3 Feb 2003 12:23:01 -0000	1.2
@@ -1,31 +1,51 @@
 <?xml version="1.0"?>
 <queryset>
 
+  <fullquery name="workflow::state::fsm::new.select_sort_order_p">
+    <querytext>
+        select count(*)
+        from   workflow_fsm_states
+        where  workflow_id = :workflow_id
+        and    sort_order = :sort_order
+    </querytext>
+  </fullquery>
+
+  <fullquery name="workflow::state::fsm::new.update_sort_order">
+    <querytext>
+        update workflow_fsm_states
+        set    sort_order = sort_order + 1
+        where  workflow_id = :workflow_id
+        and    sort_order >= :sort_order
+    </querytext>
+  </fullquery>
+
   <fullquery name="workflow::state::fsm::new.do_insert">
     <querytext>
         insert into workflow_fsm_states
-                (state_id, workflow_id, sort_order, short_name, pretty_name)
-         values (:state_id, :workflow_id, :sort_order, :short_name, :pretty_name)
+                (state_id, workflow_id, sort_order, short_name, pretty_name, hide_fields)
+         values (:state_id, :workflow_id, :sort_order, :short_name, :pretty_name, :hide_fields)
     </querytext>
   </fullquery>
 
   <fullquery name="workflow::state::fsm::get.state_info">
     <querytext>
-        select workflow_id,
+        select state_id,
+               workflow_id,
                sort_order,
                short_name,
-               pretty_name 
-        from workflow_fsm_states
-        where state_id = :state_id
+               pretty_name,
+               hide_fields
+        from   workflow_fsm_states
+        where  state_id = :state_id
     </querytext>
   </fullquery>
 
   <fullquery name="workflow::state::fsm::get_id.select_id">
     <querytext>
         select state_id 
-        from workflow_fsm_states
-        where short_name = :short_name
-        and   workflow_id = :workflow_id
+        from   workflow_fsm_states
+        where  short_name = :short_name
+        and    workflow_id = :workflow_id
     </querytext>
   </fullquery>