Index: openacs-4/packages/workflow/tcl/action-procs-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/workflow/tcl/action-procs-oracle.xql,v diff -u -r1.9 -r1.10 --- openacs-4/packages/workflow/tcl/action-procs-oracle.xql 5 Feb 2004 10:37:33 -0000 1.9 +++ openacs-4/packages/workflow/tcl/action-procs-oracle.xql 23 Nov 2017 14:43:09 -0000 1.10 @@ -2,16 +2,6 @@ oracle8.1.6 - - - insert into workflow_actions - (action_id, workflow_id, sort_order, short_name, pretty_name, pretty_past_tense, - edit_fields, assigned_role, always_enabled_p, description, description_mime_type, timeout_seconds) - values (:action_id, :workflow_id, :sort_order, :short_name, :pretty_name, :pretty_past_tense, - :edit_fields, :assigned_role_id, :always_enabled_p, :description, :description_mime_type, :timeout_seconds) - - - timeout_seconds @@ -51,26 +41,5 @@ order by a.sort_order - - - - select nvl(max(sort_order),0) + 1 - from workflow_action_callbacks - where action_id = :action_id - - - - - insert into workflow_action_allowed_roles - select :action_id, - (select role_id - from workflow_roles - where workflow_id = :workflow_id - and short_name = :allowed_role) as role_id - from dual - - - - Index: openacs-4/packages/workflow/tcl/action-procs-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/workflow/tcl/action-procs-postgresql.xql,v diff -u -r1.11 -r1.12 --- openacs-4/packages/workflow/tcl/action-procs-postgresql.xql 11 Mar 2004 16:49:37 -0000 1.11 +++ openacs-4/packages/workflow/tcl/action-procs-postgresql.xql 23 Nov 2017 14:43:09 -0000 1.12 @@ -34,32 +34,12 @@ a.description, a.description_mime_type, extract (days from a.timeout) * 86400 + extract (hours from a.timeout) * 3600 + - extract (minutes from a.timeout) * 60 + extract (seconds from a.timeout) as timeout_seconds + extract (minutes from a.timeout) * 60 + extract (seconds from a.timeout) as timeout_seconds from workflow_actions a left outer join workflow_fsm_actions fa on (a.action_id = fa.action_id) where a.workflow_id = :workflow_id order by a.sort_order - - - - select coalesce(max(sort_order),0) + 1 - from workflow_action_callbacks - where action_id = :action_id - - - - - insert into workflow_action_allowed_roles - select :action_id, - (select role_id - from workflow_roles - where workflow_id = :workflow_id - and short_name = :allowed_role) as role_id - - - - 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.10 -r1.11 --- openacs-4/packages/workflow/tcl/action-procs.xql 9 Dec 2003 15:46:43 -0000 1.10 +++ openacs-4/packages/workflow/tcl/action-procs.xql 23 Nov 2017 14:43:09 -0000 1.11 @@ -145,5 +145,24 @@ + + + select coalesce(max(sort_order),0) + 1 + from workflow_action_callbacks + where action_id = :action_id + + + + + + insert into workflow_action_allowed_roles + select :action_id, + (select role_id + from workflow_roles + where workflow_id = :workflow_id + and short_name = :allowed_role) as role_id + + +