数据库中只定义一个存储过程,所有用户都可以使用,但是只以自己(调用者)的权限执行:
authid current_user
默认权限是定义者的权限
在scott下定义如下存储过程:
create or replace procedure prev_test authid current_user is
begin
for rec in (select distinct a.OWNER from all_tables a) loop
dbms_output.put_line(rec.OWNER);
end loop;
end;
当以sys用户调用此过程时产生了如下输出:
SQL> set serveroutput on
SQL> exec scott.prev_test;
MDSYS
OUTLN
CTXSYS
OLAPSYS
FLOWS_FILES
OWBSYS
HR
SYSTEM
EXFSYS
APEX_030200
SCOTT
DBSNMP
ORDSYS
SYSMAN
OE
SH
PM
APPQOSSYS
XDB
ORDDATA
IX
SYS
WMSYS
H2
PL/SQL 过程已成功完成。
以scott用户调用时:
SQL> set serveroutput on
SQL> exec scott.prev_test;
MDSYS
CTXSYS
OLAPSYS
SYSTEM
EXFSYS
APEX_030200
SCOTT
XDB
SYS
PL/SQL 过程已成功完成。
SQL> show user
USER 为 "SCOTT"
SQL>
重新定义另一过程:
create or replace procedure prev_test2 is
begin
for rec in (select distinct a.OWNER from all_tables a) loop
dbms_output.put_line(rec.OWNER);
end loop;
end;
sys:
SQL> set serveroutput on
SQL> exec scott.prev_test2
MDSYS
OUTLN
CTXSYS
OLAPSYS
FLOWS_FILES
OWBSYS
HR
SYSTEM
EXFSYS
APEX_030200
SCOTT
PM
DBSNMP
ORDSYS
SYSMAN
OE
SH
IX
APPQOSSYS
XDB
ORDDATA
SYS
WMSYS
H2
PL/SQL 过程已成功完成。
SQL> set serveroutput on
SQL> exec scott.prev_test2
MDSYS
CTXSYS
OLAPSYS
SYSTEM
EXFSYS
APEX_030200
SCOTT
XDB
SYS
PL/SQL 过程已成功完成。
这里用户看到的all_tables视图里的内容还是与调用者一致
再创建另一存储过程:
create or replace procedure prev_test3 authid current_user is
begin
for rec in (select distinct emp.ename from emp ) loop
dbms_output.put_line(rec.ename);
end loop;
end;
grant execute on prev_test3 to hr;
以HR调用时:
SQL> conn hr/hr
已连接。
SQL> set serveroutput on
SQL> exec scott.prev_test3;
BEGIN scott.prev_test3; END;
*
第 1 行出现错误:
ORA-00942: 表或视图不存在
ORA-06512: 在 "SCOTT.PREV_TEST3", line 3
ORA-06512: 在 line 1
在给用户HR授予EMP的SELECT权限以及给EMP建立PUBLIC SYNONYM之后:
SQL> conn hr/hr@orcl
已连接。
SQL> set serveroutput on
SQL> exec scott.prev_test3;
ALLEN
JONES
FORD
CLARK
MILLER
SMITH
WARD
MARTIN
SCOTT
TURNER
ADAMS
BLAKE
KING
JAMES
PL/SQL 过程已成功完成。
来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/8520577/viewspace-769039/,如需转载,请注明出处,否则将追究法律责任。
转载于:http://blog.itpub.net/8520577/viewspace-769039/