首页 > 代码库 > Oracle数据库程序包全局变量的应用

Oracle数据库程序包全局变量的应用

1 前言 
  在程序实现过程中,经常用遇到一些全局变量或常数。在程序开发过程中,往往会将该变量或常数存储于临时表或前台程序的全局变量中,由此带来运行效率降低<频繁读取临时表>或安全隐患<存于前台程序变量,可跟踪内存变量获得>。 
  本文主要论述将全局变量或常数存取程序包的优点和实现方法。 
   
2 优点 
  2.1 执行效率比存储于临时表高,不需要频率存取临时表 
  2.2 将全局变量藏于最后防线<数据库>,安全性较高 
  2.3 在视图中可以调用程序包的变量,实现动态视图 
   
3 实现 
  3.1 实现方法概述 
  Oracle数据库程序包中的变量,在本程序包中可以直接引用,但是在程序包之外,则不可以直接引用。对程序包变量的存取,可以为每个变量配套相应的存储过程<用于存储数据>和函数<用于读取数据>来实现。 
   
  3.2 实例 
  --定义程序包 
  create or replace package PKG_System_Constant is 
   
    C_SystemTitle nVarChar2(100):=‘测试全局程序变量‘; --定义常数 
    --获取常数<系统标题> 
    Function FN_GetSystemTitle 
     Return nVarChar2; 
   
    G_CurrentDate Date:=SysDate; --定义全局变量 
    --获取全局变量<当前日期> 
    Function FN_GetCurrentDate 
     Return Date; 
    --设置全局变量<当前日期> 
    Procedure SP_SetCurrentDate 
     (P_CurrentDate In Date); 
  End PKG_System_Constant; 
  / 
  create or replace package body PKG_System_Constant is 
    --获取常数<系统标题> 
    Function FN_GetSystemTitle 
     Return nVarChar2 
     Is 
     Begin 
       Return C_SystemTitle; 
     End FN_GetSystemTitle; 
   
    --获取全局变量<当前日期> 
    Function FN_GetCurrentDate 
     Return Date 
     Is 
     Begin 
       Return G_CurrentDate; 
     End FN_GetCurrentDate; 
    --设置全局变量<当前日期> 
    Procedure SP_SetCurrentDate 
     (P_CurrentDate In Date) 
     Is 
     Begin 
       G_CurrentDate:=P_CurrentDate; 
     End SP_SetCurrentDate; 
  End PKG_System_Constant; 
  / 
     
  3.3 测试 
  --测试读取常数 
  Select PKG_System_Constant.FN_GetSystemTitle From Dual;    
  --测试设置全局变量 
  Declare  
  Begin 
    PKG_System_Constant.SP_SetCurrentDate(To_Date(‘2001.01.01‘,‘yyyy.mm.dd‘)); 
  End; 
  / 
  --测试读取全局变量 
  Select PKG_System_Constant.FN_GetCurrentDate From Dual; 
==================== 
听说:package的全局变量只针对一个会话中有用,是不是这样???待验证。