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 -r1.5 -r1.6
--- openacs-4/packages/workflow/tcl/state-procs.xql 9 Dec 2003 15:46:43 -0000 1.5
+++ openacs-4/packages/workflow/tcl/state-procs.xql 23 Jan 2004 11:02:27 -0000 1.6
@@ -38,15 +38,17 @@
- select workflow_id,
- state_id,
- sort_order,
- short_name,
- pretty_name,
- hide_fields
- from workflow_fsm_states
- where workflow_id = :workflow_id
- order by sort_order
+ select s.workflow_id,
+ s.state_id,
+ s.sort_order,
+ s.short_name,
+ s.pretty_name,
+ s.hide_fields,
+ s.parent_action_id,
+ (select short_name from workflow_actions where action_id = s.parent_action_id) as parent_action
+ from workflow_fsm_states s
+ where s.workflow_id = :workflow_id
+ order by s.sort_order
@@ -58,4 +60,20 @@
+
+
+ delete from workflow_fsm_action_en_in_st
+ where state_id = :state_id
+ and assigned_p = :assigned_p
+
+
+
+
+
+ insert into workflow_fsm_action_en_in_st
+ (action_id, state_id, assigned_p)
+ values (:enabled_action_id, :state_id, :assigned_p)
+
+
+