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
參數：
In，out, 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 inout nu
mber,p_num2 inout 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<var_min then
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默認值，而在 out，in 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程序順利完成.
