有个网友问我，如何授予某个用户只能查看某些存储过程的定义权限，而不能让用户去修改、执行存储过程。看似简单的问题，却因为从没有碰到这样的需求。花了点时间才梳理、总结清楚。

关于ORACLE账号的权限问题，一般分为两种权限：

系统权限: 允许用户执行特定的数据库动作，如创建表、创建索引、创建存储过程等

对象权限: 允许用户操纵一些特定的对象，如读取视图，可更新某些列、执行存储过程等

像这种查看存储过程定义的权限为对象权限，但是我们还是首先来看看关于存储过程的系统权限吧：

PRIVILEGENAMEPROPERTY

-----------------------------------------------------------

-140CREATEPROCEDURE0

-141CREATEANYPROCEDURE0

-142ALTERANYPROCEDURE0

-143DROPANYPROCEDURE0

-144EXECUTEANYPROCEDURE0

-241DEBUGANYPROCEDURE0

如上所示，关于存储过程的系统权限一般有六种： CREATE PROCEDURE、CREATE ANY PROCEDURE、 ALTER ANY PROCEDURE、DROP ANY PROCEDURE、 EXECUTE ANY PROCEDURE、DEBUG ANY PROCEDURE. 那么关于存储过程的对象权限又有那些呢? 如下例子所示，在用户ESCMUSER下创建存储过程PROC_TEST

CREATEORREPLACEPROCEDUREESCMUSER.PROC_TEST

AS

BEGIN

DBMS_OUTPUT.PUT_LINE('Itisonlytest');

END;

使用system用户创建用户TEMP，如下所示

SQL>createusertempidentifiedbytemp;

Usercreated.

SQL>grantconnect,resourcetotemp;

Grantsucceeded.

在用户ESCMUSER下将存储过程PROC_TEST的所有权限授予给用户TEMP。 那么我们发现存储过程的对象权限只有EXECUTE、DEBUG权限

SQL>COLGRANTEEFORA12;

SQL>COLTABLE_NAMEFORA30;

SQL>COLGRANTORFORA12;

SQL>COLPRIVILEGEFORA8;

SQL>SELECT*FROMUSER_TAB_PRIVS_MADEWHEREGRANTEE='TEMP';


GRANTEETABLE_NAMEGRANTORPRIVILEGEGRAHIE

----------------------------------------------------------------------------

TEMPPROC_TESTESCMUSERDEBUGNONO

TEMPPROC_TESTESCMUSEREXECUTENONO


SQL>

将存储过程PORC_TEST的权限从TEMP用户收回，然后授予用户TEMP关于存储过程PROC_TEST的DEBUG权限

SQL>REVOKEALLONPROC_TESTFROMTEMP;

SQL>GRANTDEBUGONPROC_TESTTOTEMP;

那么TEMP用户此时执行存储过程报权限不足

SQL>SETSERVEROUTON;

SQL>EXECescmuser.proc_test;

beginescmuser.proc_test;end;

ORA-06550:line2,column16:

PLS-00904:insufficientprivilegetoaccessobjectESCMUSER.PROC_TEST

ORA-06550:line2,column7:

PL/SQL:Statementignored

此时，如果修改存储过程PROC_TEST就会ORA-01031权限不足问题。但是你可以在PL/SQL Developer工具或使用下面视图查看存储过程的定义。如下所示。

SELECT * FROM ALL_SOURCE WHERE NAME=’PROC_TEST’

所以，只需要授予存储过程的DEBUG权限给某个用户，就可以实现只授予用户查看存储过程定义的权限，而限制用户修改、执行存储过程。从而达到只授权用户查看存储过程定义的权限。不过这样实现，总让我感觉有点怪怪的。