存储过程执行DDL语句提示ORA-01031错误：权限不足

过程执行DDL语句提示ORA-01031错误

[sql]
--创建测试用户
create user hat identified by hat default tablespace dolphin;
www.2cto.com
--授权限
grant connect,resource to hat;

--查看hat用户的角色权限
select * from dba_role_privs where grantee='HAT';
GRANTEE GRANTED_ROLE ADM DEF
------------------------------ ------------------------------ --- ---
HAT RESOURCE NO YES
HAT CONNECT NO YES

--查看resource角色的权限
select * from role_sys_privs where role='RESOURCE';

ROLE PRIVILEGE ADM
------------------------------ ---------------------------------------- ---
RESOURCE CREATE SEQUENCE NO
RESOURCE CREATE TRIGGER NO
RESOURCE CREATE CLUSTER NO
RESOURCE CREATE PROCEDURE NO
RESOURCE CREATE TYPE NO
RESOURCE CREATE OPERATOR NO
RESOURCE CREATE TABLE NO--注意
RESOURCE CREATE INDEXTYPE NO

--创建存储过程
create or replace procedure p_createtable
as
v_sql varchar2(100);
begin
v_sql := 'create table t_createtable(id integer,name varchar2(10))';
execute immediate v_sql;
end;

--执行过程
begin
p_createtable();
end;
ORA-01031: insufficient privileges
ORA-06512: at "HAT.P_CREATETABLE", line 6
ORA-06512: at line 2

--查看hat用户的系统权限
select * from dba_sys_privs where grantee='HAT';
无数据

--授予hat用户create table的权限
grant create table to hat;

--查看hat用户的系统权限
select * from dba_sys_privs where grantee='HAT';
GRANTEE PRIVILEGE ADM
------------------------------ ---------------------------------------- ---
HAT CREATE TABLE NO

--执行过程
begin
p_createtable();
end;
执行成功
www.2cto.com
总结，角色resource里也包括了create table的权限，但是执行过程(该过程为一个创建表的过程)报错，而我们直接给用户hat授予create table权限，执行该过程则成功执行，

此处说明用户的角色权限是不可以继承到存储过程里面的，只有对用户授予直接的系统权限，存储过程才可继承。

我们在看看撤销create table权限
revoke create table from hat;

--再次查询hat用户的权限
select * from dba_sys_privs where grantee='HAT';
无数据

--再次执行过程
begin
p_createtable();
end;
ORA-01031: insufficient privileges
ORA-06512: at "HAT.P_CREATETABLE", line 6
ORA-06512: at line 2
仍然报错，正好验证了上面的说法。
www.2cto.com
那么，除了直接为用户授予create table的权限外，还有没有其它的方法呢？
--修改存储过程，添加authid current_user选项
create or replace procedure p_createtable
authid current_user
as
v_sql varchar2(100);
begin
v_sql := 'create table t_createtable(id integer,name varchar2(10))';
execute immediate v_sql;
end;

--执行存储过程
begin
p_createtable();
end;
执行成功

总结，如果想让用户的角色权限可以继承到存储过程，那么创建存储过程时加上authid current_user即可。