community-core-procs-oracle.xql
DB Query file
Related Files
- packages/acs-tcl/tcl/community-core-procs.xql
- packages/acs-tcl/tcl/community-core-procs.tcl
- packages/acs-tcl/tcl/community-core-procs-postgresql.xql
- packages/acs-tcl/tcl/community-core-procs-oracle.xql
[ hide source ] | [ make this the default ]
File Contents
<?xml version="1.0"?>
<queryset>
<rdbms><type>oracle</type><version>8.1.6</version></rdbms>
<fullquery name="acs_user::delete.permanent_delete">
<querytext>
begin
acs.remove_user(
user_id => :user_id
);
end;
</querytext>
</fullquery>
<fullquery name="person::delete.delete_person">
<querytext>
begin
person.del(
person_id => :person_id
);
end;
</querytext>
</fullquery>
<fullquery name="acs_user::create_portrait.create_rel">
<querytext>
begin
:1 := acs_rel.new (
rel_type => 'user_portrait_rel',
object_id_one => :user_id,
object_id_two => :item_id);
end;
</querytext>
</fullquery>
<partialquery name="party::types_valid_for_rel_type_multirow.start_with_clause_party">
<querytext>
(object_type = 'group' or object_type = 'person')
</querytext>
</partialquery>
<partialquery name="party::types_valid_for_rel_type_multirow.start_with_clause">
<querytext>
object_type = :start_with
</querytext>
</partialquery>
<fullquery name="party::types_valid_for_rel_type_multirow.select_sub_rel_types">
<querytext>
select
types.pretty_name,
types.object_type,
types.tree_level,
types.indent,
case when valid_types.object_type = null then 0 else 1 end as valid_p
from
(select
t.pretty_name, t.object_type, level as tree_level,
replace(lpad(' ', (level - 1) * 4),
' ', ' ') as indent,
rownum as tree_rownum
from
acs_object_types t
connect by
prior t.object_type = t.supertype
start with
$start_with_clause ) types,
(select
object_type
from
rel_types_valid_obj_two_types
where
rel_type = :rel_type ) valid_types
where
types.object_type = valid_types.object_type(+)
order by tree_rownum
</querytext>
</fullquery>
</queryset>