oracle8.1.6
begin
:1 := file_storage.new_file (
title => :title,
folder_id => :folder_id,
creation_user => :user_id,
creation_ip => :creation_ip,
indb_p => 't'
);
end;
begin
:1 := file_storage.new_file (
title => :title,
folder_id => :folder_id,
creation_user => :user_id,
creation_ip => :creation_ip,
indb_p => 'f'
);
end;
begin
:1 := file_storage.new_version (
filename => :filename,
description => :description,
mime_type => :mime_type,
item_id => :file_id,
creation_user => :user_id,
creation_ip => :creation_ip
);
end;
update cr_revisions
set content = empty_blob()
where revision_id = :version_id
returning content into :1
update cr_revisions
set content_length = dbms_lob.getlength(content)
where revision_id = :version_id
update cr_revisions
set filename = '$tmp_filename',
content_length = $tmp_size
where revision_id = :version_id