oracle8.1.6
begin
:1 := acs_message.new (
message_id => :comment_id,
title => :title,
mime_type => :comment_mime_type,
data => empty_blob(),
context_id => :context_id,
creation_user => :user_id,
creation_ip => :creation_ip,
is_live => :is_live
);
end;
select content_item.get_latest_revision(:comment_id) as revision_id
from dual
update cr_revisions
set content = empty_blob()
where revision_id = :revision_id
returning content into :1
begin
acs_permission.grant_permission (
object_id => :comment_id,
grantee_id => :user_id,
privilege => 'read'
);
acs_permission.grant_permission (
object_id => :comment_id,
grantee_id => :user_id,
privilege => 'write'
);
end;