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