Index: openacs-4/packages/acs-subsite/tcl/application-group-procs-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/tcl/application-group-procs-oracle.xql,v diff -u -N -r1.1 -r1.1.2.1 --- openacs-4/packages/acs-subsite/tcl/application-group-procs-oracle.xql 6 May 2001 21:40:21 -0000 1.1 +++ openacs-4/packages/acs-subsite/tcl/application-group-procs-oracle.xql 10 Apr 2002 02:26:20 -0000 1.1.2.1 @@ -3,7 +3,7 @@ oracle8.1.6 - + select case when exists ( @@ -23,7 +23,7 @@ - + select case when exists ( @@ -43,7 +43,7 @@ - + select case when exists ( @@ -58,7 +58,7 @@ - + select case when exists ( @@ -73,7 +73,7 @@ - + begin @@ -87,25 +87,25 @@ - + select ag.group_id as parent_group_id from application_groups ag, apm_packages, (select object_id, rownum as tree_rownum from site_nodes - start with node_id = :node_id + start with node_id = :parent_node_id connect by node_id = prior parent_id) nodes where nodes.object_id = apm_packages.package_id and apm_packages.package_id = ag.package_id - and rownum=1 + and tree_rownum=1 - + begin @@ -126,7 +126,7 @@ - + begin