Index: openacs-4/packages/workflow/workflow.info =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/workflow/workflow.info,v diff -u -r1.14 -r1.15 --- openacs-4/packages/workflow/workflow.info 30 Jan 2004 15:59:20 -0000 1.14 +++ openacs-4/packages/workflow/workflow.info 15 Mar 2004 14:04:25 -0000 1.15 @@ -8,7 +8,7 @@ t workflow - + Lars Pind Peter Marklund A Tcl API for creating and managing workflows. @@ -23,7 +23,7 @@ <p> For more information, see: <a href="http://www.collaboraid.biz/developer/workflow-spec">the workflow specification</a>. - + Index: openacs-4/packages/workflow/tcl/case-procs-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/workflow/tcl/case-procs-oracle.xql,v diff -u -r1.9 -r1.10 --- openacs-4/packages/workflow/tcl/case-procs-oracle.xql 5 Feb 2004 10:37:33 -0000 1.9 +++ openacs-4/packages/workflow/tcl/case-procs-oracle.xql 15 Mar 2004 14:04:06 -0000 1.10 @@ -74,14 +74,14 @@ workflow_actions a, cr_items i, acs_objects io, - cc_users iou, + acs_users_all iou, cr_revisions r, workflow_case_log_data d where l.case_id = :case_id and l.action_id = a.action_id and i.item_id = l.entry_id and io.object_id = i.item_id - and iou.user_id = io.creation_user + and iou.user_id (+) = io.creation_user and r.revision_id = i.live_revision and d.entry_id (+) = l.entry_id order by creation_date Index: openacs-4/packages/workflow/tcl/case-procs-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/workflow/tcl/case-procs-postgresql.xql,v diff -u -r1.8 -r1.9 --- openacs-4/packages/workflow/tcl/case-procs-postgresql.xql 5 Feb 2004 10:37:33 -0000 1.8 +++ openacs-4/packages/workflow/tcl/case-procs-postgresql.xql 15 Mar 2004 14:04:06 -0000 1.9 @@ -71,8 +71,8 @@ from workflow_case_log l join workflow_actions a using (action_id) join cr_items i on (i.item_id = l.entry_id) join - acs_objects io on (io.object_id = i.item_id) join - cc_users iou on (iou.user_id = io.creation_user) join + acs_objects io on (io.object_id = i.item_id) left outer join + acs_users_all iou on (iou.user_id = io.creation_user) join cr_revisions r on (r.revision_id = i.live_revision) left outer join workflow_case_log_data d using (entry_id) where l.case_id = :case_id Index: openacs-4/packages/workflow/tcl/case-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/workflow/tcl/case-procs.tcl,v diff -u -r1.29 -r1.30 --- openacs-4/packages/workflow/tcl/case-procs.tcl 5 Feb 2004 10:37:33 -0000 1.29 +++ openacs-4/packages/workflow/tcl/case-procs.tcl 15 Mar 2004 14:04:06 -0000 1.30 @@ -1861,7 +1861,11 @@ @author Lars Pind (lars@collaboraid.biz) } { if { ![exists_and_not_null user_id] } { - set user_id [ad_conn user_id] + if { ![ad_conn isconnected] } { + set user_id 0 + } else { + set user_id [ad_conn user_id] + } } if { [empty_string_p $case_id] || [empty_string_p $action_id] } {