oracle8.1.6
select package_id,
package_key,
(select pretty_name from apm_package_types where package_key = p.package_key) as package_pretty_name,
apm_package_type.num_parameters(package_key) parameter_count,
node_id,
url,
parent_url,
name,
root_p,
mylevel - 1 as mylevel,
object_id,
object_name,
directory_p,
parent_id,
n_children,
decode(acs_permission.permission_p(object_id, :user_id, 'admin'), 't', 1, 0) object_admin_p
from apm_packages p,
(select node_id,
site_node.url(node_id) as url,
site_node.url(parent_id) as parent_url,
name,
(select count(*)
from site_nodes
where parent_id = n.node_id) as n_children,
decode(node_id, site_node.node_id('/'), 1, 0) as root_p,
level as mylevel,
object_id,
acs_object.name(object_id) as object_name,
directory_p,
parent_id
from site_nodes n
where (object_id is null
or exists (
select 1 from acs_object_party_privilege_map ppm
where ppm.object_id = n.object_id
and ppm.party_id = :user_id
and ppm.privilege = 'read'))
start with node_id = nvl(:root_id, site_node.node_id('/'))
connect by prior node_id = parent_id and parent_id in ([join $expand ", "])) site_map
where site_map.object_id = p.package_id (+)
order by url
select package_id,
ap.package_key,
ap.instance_name,
apm_package_type.num_parameters(ap.package_key) as parameter_count
from apm_packages ap,
apm_package_types
where ap.package_key = apm_package_types.package_key
and package_type = 'apm_service'
and not exists (select 1 from site_nodes sn where sn.object_id = package_id)
and exists (select 1 from acs_object_party_privilege_map ppm
where ppm.object_id = package_id and ppm.party_id = :user_id and ppm.privilege = 'admin')
order by instance_name