oracle8.1.6
select case when exists (
select 1
from application_group_element_map
where package_id = :package_id
and element_id = :party_id
union all
select 1
from application_groups
where package_id = :package_id
and group_id = :party_id
) then 1 else 0 end
from dual
select case when exists (
select 1
from application_group_element_map
where package_id = :package_id
and element_id = :party_id
union all
select 1
from application_groups
where package_id = :package_id
and group_id = :party_id
) then 1 else 0 end
from dual
select case when exists (
select 1
from application_group_element_map
where package_id = :package_id
and rel_id = :rel_id
) then 1 else 0 end
from dual
select case when exists (
select 1
from application_group_segments
where package_id = :package_id
and segment_id = :segment_id
) then 1 else 0 end
from dual
begin
:1 := application_group.group_id_from_package_id (
package_id => :package_id,
no_complain_p => :no_complain_p
);
end;
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 = :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 tree_rownum=1
begin
:1 := application_group.new (
group_id => :group_id,
object_type => :group_type,
group_name => :group_name,
package_id => :package_id,
context_id => :context_id,
creation_user => :creation_user,
creation_ip => :creation_ip,
email => :email,
url => :url
);
end;
begin
:1 := composition_rel.new (
rel_type => 'composition_rel',
object_id_one => :parent_group_id,
object_id_two => :group_id,
creation_user => :creation_user,
creation_ip => :creation_ip
);
end;