PRAGMA RESTRICT_REFERENCES(getFormat, WNDS, WNPS, RNDS, RNPS); （转）

原文：http://blog.csdn.net/rockywu/article/details/4096118

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在运行是对它们不能检查。

这个编译指令只能在程序包及对象类型说明部分指定。

以下是个例子，在编译程序包体时报错，它违反了RNDS规则。


create or replace package test_pragma as
function test return date;
pragma restrict_references(test,rnds);
end;
/

create or replace package body test_pragma as
function test return date
as
vdate date;
begin
select sysdate into vdate from dual;
return vdate;
end test;
end test_pragma;