oracle8.1.6
begin
:1 := file_storage.new_root_folder(
package_id => :package_id,
folder_name => :pretty_name,
description => :description
);
end;
begin
:1 := file_storage.get_root_folder(
package_id => :package_id
);
end;
begin
:1 := file_storage.new_folder(
name => :name,
folder_name => :pretty_name,
parent_id => :parent_id,
creation_user => :creation_user,
creation_ip => :creation_ip
);
end;
begin
content_folder.rename(
folder_id => :folder_id,
label => :name
);
end;
select fc.*
from (select fs_objects.object_id,
fs_objects.name,
fs_objects.live_revision,
fs_objects.type,
to_char(fs_objects.last_modified, 'Month DD YYYY HH24:MI') as last_modified,
fs_objects.content_size,
fs_objects.url,
fs_objects.key,
fs_objects.sort_key,
case when fs_objects.last_modified >= (sysdate - :n_past_days) then 1 else 0 end as new_p,
acs_permission.permission_p(fs_objects.object_id, :user_id, 'admin') as admin_p,
acs_permission.permission_p(fs_objects.object_id, :user_id, 'delete') as delete_p,
acs_permission.permission_p(fs_objects.object_id, :user_id, 'write') as write_p
from fs_objects
where fs_objects.parent_id = :folder_id) fc
where 't' = (select acs_permission.permission_p(fc.object_id, :user_id, 'read') from dual)
order by fc.sort_key,
fc.name
begin
:1 := file_storage.get_folder_name(:folder_id);
end;
select count(*)
from cr_items
where item_id in (select item_id
from cr_items
connect by prior item_id = parent_id
start with item_id = :item_id)
and acs_permission.permission_p(item_id, :user_id, :privilege) = 'f'
select item_id as child_item_id
from cr_items
connect by prior item_id = parent_id
start with item_id = :item_id
select count(*)
from cr_revisions
where item_id = :child_item_id
and acs_permission.permission_p(revision_id, :user_id, :privilege) = 'f'
begin
:1 := file_storage.get_title(:item_id);
end;
select case when file_storage.get_content_type(i.item_id) = 'content_folder'
then :folder_url || '?' || :extra_vars || '&folder_id='
else :file_url || '?' || :extra_vars || '&file_id='
end || i.item_id,
file_storage.get_title(i.item_id)
from cr_items i
where item_id not in (select i2.item_id
from cr_items i2
connect by prior i2.parent_id = i2.item_id
start with i2.item_id = :root_folder_id)
connect by prior i.parent_id = i.item_id
start with item_id = :start_id
order by level desc