oracle 包纯度级别
PRAGMA RESTRICT_REFERENCES(),这个PRAGMA比较复杂, 总的来说,它是一个程序辅助检验码,检查子程序的纯度(PURITY),帮助检验子程序是否有违反规则的地方。一般用在函数上,但当函数调用过程时,也要作相应的设置检查。这是为了避免当在DML语句上调用函数时正常执行不至于产生错误。
语法,PRAGMA RESTRICT_REFERENCES(function_name | default , )RNDS, WNDS, RNPS, WNPS) | , TRUST);
RNDS,WNDS,RNPS,WNPS可以同时指定。但当TRUST指定是,其它的被忽略。
DEFAUT是指作用在该程序包上的所有子程序,函数。
RNDS(Read No Database State),规定子程序不能读取任何的数据库状态信息。(即不会查询数据库的任何表,包括DUAL虚表)
RNPS(Read No Package State),规定子程序不能读取任何程序包的状态信息,如变量等。
WNDS(Write No Database State),规定子程序不能向数据库写入任何信息。(即不能修改数据库表)
WNPS(Write No Package State),规定子程序不能向程序包写入任何信息。(即不能修改程序包变量的值)
TRUST,指出子程序是可以相信的不会违反一个或多个规则。这个选项是需要的当用C或JAVA写的函数通过PL/SQL调用时,因为PL/SQL在运行是对它们不能检查。
示例:
create or replace package purity is
minsal number(9);
maxsal number(9);
function max_sal return number;
function min_sal return number;
pragma restrict_references(max_sal, wnps);
pragma restrict_references(min_sal, wnps);
end;
create or replace package body purity is
function max_sal return number as
begin
select max(sal) into maxsal from emp; return maxsal;
end;
function min_sal return number as
begin
select min(sal) into minsal from emp; return minsal;
end;
对该包进行编译时提示“PACKAGE BODY SCOTT.PURITY 编译错误
错误:PLS-00452: 子程序 'MAX_SAL' 违反了它的相关编译指示
行:2
文本:function max_sal return number
错误:PLS-00452: 子程序 'MIN_SAL' 违反了它的相关编译指示
行:10
文本:function min_sal return number”
因为规定了包中的函数不能修改包中的变量,在函数max_sal和min_sal中进行赋值操作时改变了包的变量minsal和maxsal,因此导致编译错误。
修改如下:即函数只读但不做修改包变量:
create or replace package purity is
minsal number(9);
maxsal number(9);
function max_sal return number;
function min_sal return number;
pragma restrict_references(max_sal, wnps);
pragma restrict_references(min_sal, wnps);
end;
create or replace package body purity is
function max_sal return number as
begin
return maxsal;
end;
function min_sal return number as
begin
return minsal;
end;
begin
select min(sal), max(sal) into minsal, maxsal from emp;
end;
--调用包的公用函数
SQL> var minsal number;
SQL> var maxsal number;
SQL> exec :minsal:=purity.min_sal;
PL/SQL procedure successfully completed
minsal
---------
800
SQL> exec :maxsal:=purity.max_sal;
PL/SQL procedure successfully completed
maxsal
---------
5000
minsal number(9);
maxsal number(9);
function max_sal return number;
function min_sal return number;
pragma restrict_references(max_sal, wnps);
pragma restrict_references(min_sal, wnps);
end;
create or replace package body purity is
function max_sal return number as
begin
select max(sal) into maxsal from emp; return maxsal;
end;
function min_sal return number as
begin
select min(sal) into minsal from emp; return minsal;
end;
对该包进行编译时提示“PACKAGE BODY SCOTT.PURITY 编译错误
错误:PLS-00452: 子程序 'MAX_SAL' 违反了它的相关编译指示
行:2
文本:function max_sal return number
错误:PLS-00452: 子程序 'MIN_SAL' 违反了它的相关编译指示
行:10
文本:function min_sal return number”
因为规定了包中的函数不能修改包中的变量,在函数max_sal和min_sal中进行赋值操作时改变了包的变量minsal和maxsal,因此导致编译错误。
修改如下:即函数只读但不做修改包变量:
create or replace package purity is
minsal number(9);
maxsal number(9);
function max_sal return number;
function min_sal return number;
pragma restrict_references(max_sal, wnps);
pragma restrict_references(min_sal, wnps);
end;
create or replace package body purity is
function max_sal return number as
begin
return maxsal;
end;
function min_sal return number as
begin
return minsal;
end;
begin
select min(sal), max(sal) into minsal, maxsal from emp;
end;
--调用包的公用函数
SQL> var minsal number;
SQL> var maxsal number;
SQL> exec :minsal:=purity.min_sal;
PL/SQL procedure successfully completed
minsal
---------
800
SQL> exec :maxsal:=purity.max_sal;
PL/SQL procedure successfully completed
maxsal
---------
5000
来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/9240380/viewspace-702737/,如需转载,请注明出处,否则将追究法律责任。
转载于:http://blog.itpub.net/9240380/viewspace-702737/