Global Variable in PL/SQL

来源:互联网 发布:简便算法公式 编辑:程序博客网 时间:2024/05/20 07:19

Non-Across Sessions

create or replace package test_pkgas  global_var number :=1;  constant_var CONSTANT NUMBER := 2;end;

Across Sessions

create table global_value ( x int );insert into global_value values ( 0 );create or replace package get_globalas   function val return number;   procedure set_val( p_x in number );end;/create or replace package body get_globalasfunction val return numberas   l_x number;begin   select x into l_x from global;   return l_x;end;procedure set_val( p_x in number )as  pragma autonomous_transaction;begin   update global set x = p_x;   commit;end;end;/