Index: openacs-4/packages/project-manager/tcl/role-procs-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/project-manager/tcl/role-procs-oracle.xql,v diff -u -r1.1 -r1.1.2.1 --- openacs-4/packages/project-manager/tcl/role-procs-oracle.xql 29 Apr 2005 17:43:37 -0000 1.1 +++ openacs-4/packages/project-manager/tcl/role-procs-oracle.xql 30 Nov 2005 06:47:37 -0000 1.1.2.1 @@ -1,8 +1,9 @@ - oracle8.0 +oracle9.2 + SELECT role_id @@ -12,12 +13,53 @@ - + SELECT one_line || ' (' || substr(one_line,1,1) || ')' as one_line, role_id FROM pm_roles ORDER BY role_id + + + + SELECT + one_line || ' (' || substr(one_line, 1, 1) || ')' as one_line, + role_id + FROM + pm_roles r + WHERE NOT EXISTS + (SELECT 1 + FROM + pm_project_assignment pa + WHERE + r.role_id = pa.role_id and + pa.project_id = :project_item_id and + pa.party_id = :party_id) + ORDER BY + role_id + + + + + + SELECT + one_line || ' (' || substr(one_line, 1, 1) || ')' as one_line, + role_id + FROM + pm_roles r + WHERE NOT EXISTS + (SELECT 1 + FROM + pm_task_assignment ta + WHERE + r.role_id = ta.role_id and + ta.task_id = :task_item_id and + ta.party_id = :party_id) + ORDER BY + role_id + + +