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.6 -r1.7
--- openacs-4/packages/workflow/tcl/case-procs-oracle.xql 11 Dec 2003 21:40:16 -0000 1.6
+++ openacs-4/packages/workflow/tcl/case-procs-oracle.xql 9 Jan 2004 15:47:53 -0000 1.7
@@ -5,17 +5,20 @@
select c.case_id,
+ c.top_case_id,
c.workflow_id,
- c.object_id,
+ top.object_id,
s.state_id,
s.short_name as state_short_name,
s.pretty_name as pretty_state,
s.hide_fields as state_hide_fields
from workflow_cases c,
+ workflow_cases top,
workflow_case_fsm cfsm,
workflow_fsm_states s
where c.case_id = :case_id
and cfsm.case_id = c.case_id
+ and top.case_id = c.top_case_id
and s.state_id (+) = cfsm.current_state
@@ -99,8 +102,7 @@
- select a.action_id,
- a.timeout_seconds
+ select a.action_id
from workflow_cases c,
workflow_actions a
where c.case_id = :case_id