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;
(select fs_folders_and_files.file_id,
'f' as url_p,
't' as versioned_p,
fs_folders_and_files.name,
fs_folders_and_files.live_revision,
fs_folders_and_files.type,
to_char(fs_folders_and_files.last_modified, 'YYYY-MM-DD HH24:MI') as last_modified,
case when fs_folders_and_files.last_modified >= (sysdate - :n_past_days) then 1 else 0 end as new_p,
fs_folders_and_files.content_size,
decode(acs_permission.permission_p(fs_folders_and_files.file_id, :user_id, 'write'), 'f', 0, 1) as write_p,
decode(acs_permission.permission_p(fs_folders_and_files.file_id, :user_id, 'delete'), 'f', 0, 1) as delete_p,
decode(acs_permission.permission_p(fs_folders_and_files.file_id, :user_id, 'admin'), 'f', 0, 1) as admin_p
from fs_folders_and_files
where fs_folders_and_files.parent_id = :folder_id
and 't' = acs_permission.permission_p(fs_folders_and_files.file_id, :user_id, 'read'))
union
(select fs_simple_objects.object_id as file_id,
't' as url_p,
'f' as versioned_p,
fs_simple_objects.name,
0 as live_revision,
'url' as type,
NULL as last_modified,
0 as new_p,
0 as content_size,
decode(acs_permission.permission_p(fs_simple_objects.object_id, :user_id, 'write'), 'f', 0,1) as write_p,
decode(acs_permission.permission_p(fs_simple_objects.object_id, :user_id, 'delete'), 'f', 0, 1) as delete_p,
decode(acs_permission.permission_p(fs_simple_objects.object_id, :user_id, 'admin'), 'f', 0, 1) as admin_p
from fs_simple_objects
where folder_id= :folder_id
and 't' = acs_permission.permission_p(fs_simple_objects.object_id, :user_id, 'read'))
order by 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 'index?folder_id='
else 'file?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 =
file_storage.get_root_folder([ad_conn package_id]))
connect by prior i.parent_id = i.item_id
start with item_id = :start_id
order by level desc