postgresql7.1 select file_storage__new_root_folder ( :package_id, :pretty_name, -- label :name, -- name :description ) select file_storage__get_root_folder(:package_id); select content_folder__edit_name( :folder_id, null, :name, null ); select cr_items.item_id as object_id, cr_items.name from cr_items where cr_items.parent_id = :folder_id and acs_permission__permission_p(cr_items.item_id, :user_id, 'read') postgresql8.4 select fs_objects.object_id, fs_objects.name, fs_objects.title, fs_objects.live_revision, fs_objects.type, to_char(fs_objects.last_modified, 'YYYY-MM-DD HH24:MI:SS') as last_modified_ansi, fs_objects.content_size, fs_objects.url, fs_objects.key, fs_objects.sort_key, fs_objects.file_upload_name, fs_objects.title, case when fs_objects.last_modified >= (now() - interval '$n_past_days 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 and acs_permission__permission_p(fs_objects.object_id, :user_id, 'read') order by fs_objects.sort_key, fs_objects.name select file_storage__get_folder_name(:folder_id); select count(*) from cr_items c1, cr_items c2 where c2.item_id = :item_id and c1.tree_sortkey between c2.tree_sortkey and tree_right(c2.tree_sortkey) and not acs_permission__permission_p(c1.item_id, :user_id, :privilege) select c1.item_id as child_item_id from cr_items c1, cr_items c2 where c2.item_id = :item_id and c1.tree_sortkey between c2.tree_sortkey and tree_right(c2.tree_sortkey) order by c1.tree_sortkey select count(*) from cr_revisions where item_id = :child_item_id and acs_permission__permission_p(revision_id, :user_id, :privilege) = 'f' select file_storage__get_title(:item_id) select (case when file_storage__get_content_type(i.item_id) = 'content_folder' then :folder_url || '?folder_id=' else :file_url || '?file_id=' end) || i.item_id || :extra_vars, file_storage__get_title(i.item_id) from (select tree_ancestor_keys(cr_items_get_tree_sortkey(:start_id)) as tree_sortkey) parents, (select tree_sortkey from cr_items where item_id = :root_folder_id) root, cr_items i where i.tree_sortkey = parents.tree_sortkey and i.tree_sortkey > root.tree_sortkey order by i.tree_sortkey asc select lob from cr_revisions where revision_id = $live_revision select content from cr_revisions where revision_id = :live_revision select file_storage__new_file ( :name, :parent_id, :creation_user, :creation_ip, :indbp, :item_id, :package_id ) select file_storage__delete_version( :item_id, :version_id ); select file_storage__delete_file( :item_id ); select content_folder__del(:folder_id, :cascade_p) begin perform acs_object__update_last_modified (:parent_id,:creation_user,:creation_ip); perform acs_object__update_last_modified(:item_id,:creation_user,:creation_ip); return null; end; With RECURSIVE items AS ( select cr.item_id from cr_items cr where cr.item_id = :folder_id UNION ALL select cr.parent_id from cr_items cr, items where items.item_id = cr.item_id ) select r.package_id, r.folder_id as root_folder_id from items i, fs_root_folders r where r.folder_id = i.item_id select content_revision__new ( :title, -- title :description, -- description now(), -- publish_date :mime_type, -- mime_type null, -- ns_language :content_body, -- text :item_id, -- item_id null, now(), -- creation_date :creation_user, -- creation_user :creation_ip, -- creation_ip null, :package_id -- package_id ) update cr_revisions set mime_type = :mime_type, lob = [set __lob_id [db_string get_lob_id "select empty_lob()"]] where revision_id = :revision_id update cr_revisions set content_length = lob_length(lob) where revision_id = :revision_id begin perform acs_object__update_last_modified (:parent_id,:creation_user,:creation_ip); perform acs_object__update_last_modified(:item_id,:creation_user,:creation_ip); return null; end; select file_storage__new_file ( :name, :parent_id, :creation_user, :creation_ip, :indbp, :item_id, :package_id )