oracle8.1.6
declare
begin
acs_permission.grant_permission(
object_id => :object_id,
grantee_id => :party_id,
privilege => :privilege
);
end;
declare
begin
acs_permission.revoke_permission(
object_id => :object_id,
grantee_id => :party_id,
privilege => :privilege
);
end;
select acs_object.name(:object_id)
from dual
update acs_objects
set security_inherit_p = case when security_inherit_p = 't'
then 'f'
else 't'
end
where object_id = :object_id
begin
:1 := acs_permission.permission_p(:object_id, :party_id, :privilege);
end;