oracle預存程序文法

 

1. 預存程序 包含三部分： 聲明，執行部分，異常。    
2. 可以有無參數程式和帶參數預存程序。    
3. 無參程式文法    
4. 1 create or replace procedure NoParPro   
5. 2 as   ;   
6. 3 begin   
7. 4  ;   
8. 5 exception   
9. 6      ;   
10. 7 end;   
11. 8    
12.   
13.    帶參預存程序執行個體    
14.  1 create or replace procedure queryempname(sfindno emp.empno%type) as   
15.  2        sName emp.ename%type;   
16.  3        sjob emp.job%type;   
17.  4 begin   
18.  5        ....   
19.  7 exception   
20.           ....   
21. 14 end;   
22. 15    
23.   
24.    帶參數預存程序含賦值方式    
25.  1 create or replace procedure runbyparmeters  (isal in emp.sal%type,    
26.                             sname out varchar,sjob in out varchar)   
27.  2  as icount number;   
28.  3  begin   
29.  4       select count(*) into icount from emp where sal>isal and job=sjob;   
30.  5       if icount=1 then   
31.  6         ....   
32.  9       else  
33. 10         ....   
34. 12       end if;   
35. 13  exception   
36. 14       when too_many_rows then   
37. 15       DBMS_OUTPUT.PUT_LINE('傳回值多於1行');   
38. 16       when others then   
39. 17       DBMS_OUTPUT.PUT_LINE('在RUNBYPARMETERS過程中出錯！');   
40. 18  end;   
41. 19    
42.   
43.   程序呼叫   
44.   方式一   
45.  1 declare   
46.  2        realsal emp.sal%type;   
47.  3        realname varchar(40);   
48.  4        realjob varchar(40);   
49.  5  begin   
50.  6        realsal:=1100;   
51.  7        realname:='';   
52.  8        realjob:='CLERK';   
53.  9        runbyparmeters(realsal,realname,realjob);     －－必須按順序   
54. 10        DBMS_OUTPUT.PUT_LINE(REALNAME||'   '||REALJOB);   
55. 11  END;   
56. 12    
57.   
58.   方式二   
59.  1 declare   
60.  2       realsal emp.sal%type;   
61.  3       realname varchar(40);   
62.  4       realjob varchar(40);   
63.  5 begin   
64.  6       realsal:=1100;   
65.  7       realname:='';   
66.  8       realjob:='CLERK';   
67.  9       runbyparmeters(sname=>realname,isal=>realsal,sjob=>realjob);  －－指定值對應變數順序可變   
68. 10       DBMS_OUTPUT.PUT_LINE(REALNAME||'   '||REALJOB);   
69. 11 END;   
70. 12   

預存程序 包含三部分： 聲明，執行部分，異常。 可以有無參數程式和帶參數預存程序。 無參程式文法 1 create or replace procedure NoParPro2 as   ;3 begin4  ;5 exception6      ;7 end;8    帶參預存程序執行個體  1 create or replace procedure queryempname(sfindno emp.empno%type) as 2        sName emp.ename%type; 3        sjob emp.job%type; 4 begin 5        .... 7 exception          ....14 end;15    帶參數預存程序含賦值方式  1 create or replace procedure runbyparmeters  (isal in emp.sal%type,                             sname out varchar,sjob in out varchar) 2  as icount number; 3  begin 4       select count(*) into icount from emp where sal>isal and job=sjob; 5       if icount=1 then 6         .... 9       else10         ....12       end if;13  exception14       when too_many_rows then15       DBMS_OUTPUT.PUT_LINE('傳回值多於1行');16       when others then17       DBMS_OUTPUT.PUT_LINE('在RUNBYPARMETERS過程中出錯！');18  end;19   程序呼叫  方式一 1 declare 2        realsal emp.sal%type; 3        realname varchar(40); 4        realjob varchar(40); 5  begin 6        realsal:=1100; 7        realname:=''; 8        realjob:='CLERK'; 9        runbyparmeters(realsal,realname,realjob);     －－必須按順序10        DBMS_OUTPUT.PUT_LINE(REALNAME||'   '||REALJOB);11  END;12   方式二 1 declare 2       realsal emp.sal%type; 3       realname varchar(40); 4       realjob varchar(40); 5 begin 6       realsal:=1100; 7       realname:=''; 8       realjob:='CLERK'; 9       runbyparmeters(sname=>realname,isal=>realsal,sjob=>realjob);  －－指定值對應變數順序可變10       DBMS_OUTPUT.PUT_LINE(REALNAME||'   '||REALJOB);11 END;12