ITPub博客

首页 > Linux操作系统 > Linux操作系统 > Oracle 基礎 ----procedure(存儲過程)

Oracle 基礎 ----procedure(存儲過程)

原创 Linux操作系统 作者:tieshuai 时间:2008-03-01 11:00:03 0 删除 编辑

  Oracle 基礎 ----procedure(存儲過程)

 

 

存儲過程是一種命名pl/sql程序塊,它可以被賦予參數,存儲在數据庫中,可以被用戶調用,由於存儲過程是已經編譯好的代碼,所以在調用的時候不必再進行編譯,從而提高程序的運行效率。

同時,使用存儲過程可以實現程序的模塊化設計。

 

例子:

 Create procedure insertmer as

Begin

   Inser into mar values(‘’);

Exception

  When dup_val_on_index then

    Dbms_output.put_line(‘duplicate’);

  When others then

   Dbms_output.put_line(‘others’);

End insertmer;

 

存儲過程調用:

Ser serveroutput on

Begin

  Insertmer;

End;

 

或者直接執行:

Execute Insertmer

 

修改存儲過程使用:

 Create or replace

 

 

參數:

Inout,  in out.

該類型的參數值由調用者傳入,並且只能夠存儲過程讀取。

例子:

 Create or replace procedure insermer(

   P_id in varchar2,

   P_name in varchar2,

P_price in number,

P_place in varchar2) as

Begin

  Null;

Exception

  Null;

end

 

在帶參數的變量中,不能固定參數的長度

在下面這個過程中,通過out參數返回值,表示在調用它時必須提供能夠接收返回值的變量。

 

SYS AS SYSDBA on 2008-03-01 10:28:39 at ORCL>edit

已將 file afiedt.buf 寫入

 

  1  create or replace procedure searchpro(

  2  id in number,

  3  o_name out number,

  4  o_price out number) is

  5  begin

  6    o_name:=id;

  7    o_price:=id+1;

  8  exception

  9   when others then

 10    dbms_output.put_line('o_name:'||o_name||' oprice:'||'oprice');

 11* end searchpro;

SYS AS SYSDBA on 2008-03-01 10:28:55 at ORCL>/

 

已建立程序.

 

SYS AS SYSDBA on 2008-03-01 10:28:58 at ORCL>variable name number;

SYS AS SYSDBA on 2008-03-01 10:29:10 at ORCL>variable price number;

SYS AS SYSDBA on 2008-03-01 10:29:17 at ORCL>exec searchpro(1,name,price);

BEGIN searchpro(1,name,price); END;

 

                  *

 ERROR 在行 1:

ORA-06550: line 1, column 19:

PLS-00201: identifier 'NAME' must be declared

ORA-06550: line 1, column 7:

PL/SQL: Statement ignored

 

 

SYS AS SYSDBA on 2008-03-01 10:29:32 at ORCL>exec searchpro(1,:name,:price);

 

PL/SQL 程序順利完成.

 

SYS AS SYSDBA on 2008-03-01 10:30:03 at ORCL>print name;

 

      NAME

----------

         1

SYS AS SYSDBA on 2008-03-01 10:30:11 at ORCL>print price

 

     PRICE

----------

         2

 

 

SYS AS SYSDBA on 2008-03-01 10:30:15 at ORCL>create or replace procedure swap(p_num1 in out nu

mber,p_num2 in out number) is

  2  var_temp number;

  3  begin

  4   var_temp:=p_num1;

  5   p_num1:=p_num2;

  6  p_num2:=var_temp;

  7  end swap;

  8  /

 

已建立程序.

 

SYS AS SYSDBA on 2008-03-01 10:41:30 at ORCL>set serveroutput on

SYS AS SYSDBA on 2008-03-01 10:41:37 at ORCL>declare

  2   var_max number:=20;

  3  var_min number:=28;

  4  begin

  5   if var_max

  6     swap(var_max,var_min);

  7  end if;

  8  dbms_output.put_line('var_max='||var_max);

  9  dbms_output.put_line('var_min='||var_min);

 10  end;

 11  /

var_max=28

var_min=20

 

在使用in out 參數時,必須為in out 參數提供變量,不可以提供常量,因爲out .

在使用int 參數時候,可以使用default 默認值,而在 outin out 參數時,不能使用default 默認值。

 

局部變量 子過程

同匿名pl/sql 程序塊一樣,過程也可以定義局部變量

 

SYS AS SYSDBA on 2008-03-01 10:44:55 at ORCL>create or replace procedure updatepro(p_Id in num

ber,p_rebate in number) is

  2  var_rebate number;

  3  procedure checkvalue(rebate in out number) is

  4  begin

  5   if rebate=null then

  6      rebate:=1;

  7  elsif rebate<0 then

  8     rebate:=0.1;

  9  elsif rebate>1 then

 10    rebate:=1;

 11  end if;

 12  end checkvalue;

 13  begin

 14    var_rebate:=p_rebate;

 15    checkvalue(var_rebate);

 16   dbms_output.put_line('var_rebate:'||var_rebate);

 17  end updatepro;

 18  /

 

已建立程序.

 

SYS AS SYSDBA on 2008-03-01 10:56:52 at ORCL>set serveroutput on

SYS AS SYSDBA on 2008-03-01 10:57:37 at ORCL>begin

  2  updatepro(1,2);

  3  end;

  4  /

var_rebate:1

 

PL/SQL 程序順利完成.

来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/701141/viewspace-198165/,如需转载,请注明出处,否则将追究法律责任。

请登录后发表评论 登录
全部评论

注册时间:2007-12-18

  • 博文量
    63
  • 访问量
    93127