Index: openacs-4/contrib/obsolete-packages/acs-workflow/tcl/display-procs-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/acs-workflow/tcl/display-procs-oracle.xql,v diff -u -r1.2 -r1.3 --- openacs-4/contrib/obsolete-packages/acs-workflow/tcl/display-procs-oracle.xql 14 May 2001 23:16:08 -0000 1.2 +++ openacs-4/contrib/obsolete-packages/acs-workflow/tcl/display-procs-oracle.xql 19 Nov 2001 18:25:09 -0000 1.3 @@ -1,13 +1,14 @@ + oracle8.1.6 - + select p.party_id, acs_object.name(p.party_id) as name, - case when p.email = '' then '' else '(' || p.email || ')' end as email + case when p.email = '' then '' else '('||p.email||' end') as email from parties p where 0 < (select count(*) from users u, @@ -18,40 +19,13 @@ - - - - select p.party_id, - acs_object.name(p.party_id) as name, - case when p.email = '' then '' else '(' || p.email || ')' end as email - from parties p - where 0 < (select count(*) - from users u, - party_approved_member_map m - where m.party_id = p.party_id - and u.user_id = m.member_id) - - - - - - - - select acs_object.name(party_id) as name - from parties - where party_id = :value - - - - - - + select p.party_id, acs_object.name(p.party_id) as name, - decode(p.email, '', '', '('||p.email||')') as email + case when p.email = '' then '' else '('||p.email||' end') as email from parties p where 0 < (select count(*) from users u,