oracle package pragma SERIALLY_REUSABLE(告诉PL/SQL 的运行时引擎，在数据引用之时不要保持包级数据。)

package ：
掉用包在规范中声明的子程序、变量 、常量等，使用“包名.原素名”这样的形式，可以从任何存储的子程序、匿名块、数据库触发器中调用保包中的原素。

当包第一次被动调用时，将进行初始化；比如将包从硬盘上调到内存中来，放到系统全局工作区的共享缓冲池中，包的运行状态则被放到用户全局区的会话中存储区中，因此可以保证每个调用包的会话都拥有包的运行副本，当会话结束时，包的运行状态才会被释放。

<strong>也就是说，包从第一次调用被初始化一直到会话结束才释放其运行状态，因此包中的变量具有会话级的作用域，因而可以跨多个事物存储数据。</strong>

如果再定义包规范时，指定了pragma serially_reusable ，则可以将包的运行状态保存在系统全局区，而不是用户全局区，这样每次调用包以后，包的运行状态就会被释放，这样再次调用包时，将重新开始包的状态；<span style="color:#ff0000;">注意：这种每次调用便释放的连续进行会占用大量的内存，内存的占用量与包的并发调用用户数成正比，而且当前登陆的用户数无关，因此需要谨慎使用；</span>

下面看具体实例：

--包体中包含 编译指示 ；CREATE OR REPLACE PACKAGE pragma_serially_reusable_yes AS  PRAGMA SERIALLY_REUSABLE;  --包体的编译指示；-- countnum测试调用FUN_TEST的次数，如果不加 pragma serially_reusable v_num 的值是会话级变量 是不会改变的countnum NUMBER :=0 ;  V_NUM NUMBER;  FUNCTION FUN_TEST RETURN NUMBER;END;/CREATE OR REPLACE PACKAGE BODY pragma_serially_reusable_yes AS  PRAGMA SERIALLY_REUSABLE;  --包体的编译指示；  FUNCTION FUN_TEST RETURN NUMBER AS  BEGINcountnum :=countnum+1;    DBMS_OUTPUT.PUT_LINE('第 '||countnum||' 次调用fun_test，v_num的值是：' || V_NUM || '  ;');    RETURN V_NUM;  END FUN_TEST;BEGIN--包体的初始化 ！  SELECT TO_NUMBER(TO_CHAR(SYSDATE, 'ss')) INTO V_NUM FROM DUAL;END pragma_serially_reusable_yes;/--测试代码 ；DECLAREa NUMBER ;b NUMBER ;BEGIN--a:=pragma_serially_reusable_yes.FUN_TEST ;    b:=pragma_serially_reusable_no.FUN_TEST;END;

--包体中不包含编译指示；CREATE OR REPLACE PACKAGE pragma_serially_reusable_no AS--  PRAGMA SERIALLY_REUSABLE;  --包体的编译指示；-- countnum测试调用FUN_TEST的次数，如果不加 pragma serially_reusable v_num 的值是会话级变量 是不会改变的countnum NUMBER := 0 ;  V_NUM NUMBER;  FUNCTION FUN_TEST RETURN NUMBER;END;/CREATE OR REPLACE PACKAGE BODY pragma_serially_reusable_no AS--  PRAGMA SERIALLY_REUSABLE;  --包体的编译指示；  FUNCTION FUN_TEST RETURN NUMBER AS  BEGIN    countnum :=countnum+1;    DBMS_OUTPUT.PUT_LINE('第 '||countnum||' 次调用fun_test，v_num的值是：' || V_NUM || '  ;');    RETURN V_NUM;  END FUN_TEST;BEGIN--包体的初始化 ！  SELECT TO_NUMBER(TO_CHAR(SYSDATE, 'ss')) INTO V_NUM FROM DUAL;END pragma_serially_reusable_no;/DECLAREa NUMBER ;b NUMBER ;BEGINa:=pragma_serially_reusable_yes.FUN_TEST ;--  b:=pragma_serially_reusable_no.FUN_TEST;END;

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

<pre class="sql" name="code">--包体中包含 编译指示 ；CREATE OR REPLACE PACKAGE pragma_serially_reusable_yes AS  PRAGMA SERIALLY_REUSABLE;  --包体的编译指示；-- countnum测试调用FUN_TEST的次数，如果不加 pragma serially_reusable v_num 的值是会话级变量 是不会改变的countnum NUMBER :=0 ;  V_NUM NUMBER;  FUNCTION FUN_TEST RETURN NUMBER;END;/CREATE OR REPLACE PACKAGE BODY pragma_serially_reusable_yes AS  PRAGMA SERIALLY_REUSABLE;  --包体的编译指示；  FUNCTION FUN_TEST RETURN NUMBER AS  BEGINcountnum :=countnum+1;    DBMS_OUTPUT.PUT_LINE('第 '||countnum||' 次调用fun_test，v_num的值是：' || V_NUM || '  ;');    RETURN V_NUM;  END FUN_TEST;BEGIN--包体的初始化 ！  SELECT TO_NUMBER(TO_CHAR(SYSDATE, 'ss')) INTO V_NUM FROM DUAL;END pragma_serially_reusable_yes;/--测试代码 ；DECLAREa NUMBER ;b NUMBER ;BEGIN--a:=pragma_serially_reusable_yes.FUN_TEST ;    b:=pragma_serially_reusable_no.FUN_TEST;END;

测试结果：

第 1 次调用fun_test，v_num的值是：36  ;  --counnum 不变  v_num 改变；第 274 次调用fun_test，v_num的值是：31  ; --countnum 改变，v_num 不变；