主頁(yè) > 知識(shí)庫(kù) > 全面解析Oracle Procedure 基本語(yǔ)法

全面解析Oracle Procedure 基本語(yǔ)法

關(guān)鍵字: oracle 存儲(chǔ)過(guò)程

1.基本結(jié)構(gòu)

CREATE OR REPLACE PROCEDURE 存儲(chǔ)過(guò)程名字 
( 
 參數(shù)1 IN NUMBER, 
 參數(shù)2 IN NUMBER 
) IS 
變量1 INTEGER :=0; 
變量2 DATE; 
BEGIN

END 存儲(chǔ)過(guò)程名字

2.SELECT INTO STATEMENT

將select查詢的結(jié)果存入到變量中，可以同時(shí)將多個(gè)列存儲(chǔ)多個(gè)變量中，必須有一條

記錄，否則拋出異常(如果沒有記錄拋出NO_DATA_FOUND)

例子：

 BEGIN 
 SELECT col1,col2 into 變量1,變量2 FROM typestruct where xxx; 
 EXCEPTION 
 WHEN NO_DATA_FOUND THEN 
 xxxx; 
 END; 
 ...

3.IF 判斷

 IF V_TEST=1 THEN 
 BEGIN 
 do something 
 END; 
 END IF;

4.while 循環(huán)

WHILE V_TEST=1 LOOP 
 BEGIN 
XXXX 
 END; 
 END LOOP;

5.變量賦值

V_TEST := 123;

6.用for in 使用cursor

 ... 
 IS 
 CURSOR cur IS SELECT * FROM xxx; 
 BEGIN 
FOR cur_result in cur LOOP 
 BEGIN 
 V_SUM :=cur_result.列名1+cur_result.列名2 
 END; 
END LOOP; 
 END;

7.帶參數(shù)的cursor

 CURSOR C_USER(C_ID NUMBER) IS SELECT NAME FROM USER WHERE TYPEID=C_ID; 
 OPEN C_USER(變量值); 
 LOOP 
FETCH C_USER INTO V_NAME; 
EXIT FETCH C_USER%NOTFOUND; 
 do something 
 END LOOP; 
 CLOSE C_USER;

8.用pl/sql developer debug

連接數(shù)據(jù)庫(kù)后建立一個(gè)Test WINDOW

在窗口輸入調(diào)用SP的代碼,F9開始debug,CTRL+N單步調(diào)試

轉(zhuǎn)載：

oracle 存儲(chǔ)過(guò)程

關(guān)鍵字: oracle 存儲(chǔ)過(guò)程

存儲(chǔ)過(guò)程創(chuàng)建語(yǔ)法：

create or replace procedure 存儲(chǔ)過(guò)程名（param1 in type，param2 out type）

變量1 類型（值范圍）;

變量2 類型（值范圍）;

Begin 
 Select count(*) into 變量1 from 表A where列名=param1； 
 If (判斷條件) then 
 Select 列名 into 變量2 from 表A where列名=param1； 
 Dbms_output。Put_line(‘打印信息'); 
 Elsif (判斷條件) then 
 Dbms_output。Put_line(‘打印信息'); 
 Else 
 Raise 異常名（NO_DATA_FOUND）; 
 End if; 
Exception 
 When others then 
 Rollback; 
End;

注意事項(xiàng)：

1，存儲(chǔ)過(guò)程參數(shù)不帶取值范圍，in表示傳入，out表示輸出

2，變量帶取值范圍，后面接分號(hào)

3，在判斷語(yǔ)句前最好先用count（*）函數(shù)判斷是否存在該條操作記錄

4，用select 。。。into。。。給變量賦值

5，在代碼中拋異常用 raise+異常名

以命名的異常

命名的系統(tǒng)異常產(chǎn)生原因

ACCESS_INTO_NULL   未定義對(duì)象 
CASE_NOT_FOUND   CASE 中若未包含相應(yīng)的 WHEN ，并且沒有設(shè)置 
ELSE 時(shí) 
COLLECTION_IS_NULL  集合元素未初始化 
CURSER_ALREADY_OPEN  游標(biāo)已經(jīng)打開 
DUP_VAL_ON_INDEX   唯一索引對(duì)應(yīng)的列上有重復(fù)的值 
INVALID_CURSOR   在不合法的游標(biāo)上進(jìn)行操作 
INVALID_NUMBER   內(nèi)嵌的 SQL 語(yǔ)句不能將字符轉(zhuǎn)換為數(shù)字 
NO_DATA_FOUND   使用 select into 未返回行，或應(yīng)用索引表未初始化的 
TOO_MANY_ROWS   執(zhí)行 select into 時(shí)，結(jié)果集超過(guò)一行 
ZERO_DIVIDE    除數(shù)為 0 
SUBSCRIPT_BEYOND_COUNT 元素下標(biāo)超過(guò)嵌套表或 VARRAY 的最大值 
SUBSCRIPT_OUTSIDE_LIMIT 使用嵌套表或 VARRAY 時(shí)，將下標(biāo)指定為負(fù)數(shù) 
VALUE_ERROR    賦值時(shí)，變量長(zhǎng)度不足以容納實(shí)際數(shù)據(jù) 
LOGIN_DENIED    PL/SQL 應(yīng)用程序連接到 oracle 數(shù)據(jù)庫(kù)時(shí)，提供了不 
正確的用戶名或密碼 
NOT_LOGGED_ON   PL/SQL 應(yīng)用程序在沒有連接 oralce 數(shù)據(jù)庫(kù)的情況下 
訪問(wèn)數(shù)據(jù) 
PROGRAM_ERROR   PL/SQL 內(nèi)部問(wèn)題，可能需要重裝數(shù)據(jù)字典＆ pl./SQL 
系統(tǒng)包 
ROWTYPE_MISMATCH  宿主游標(biāo)變量與 PL/SQL 游標(biāo)變量的返回類型不兼容 
SELF_IS_NULL    使用對(duì)象類型時(shí)，在 null 對(duì)象上調(diào)用對(duì)象方法 
STORAGE_ERROR   運(yùn)行 PL/SQL 時(shí)，超出內(nèi)存空間 
SYS_INVALID_ID    無(wú)效的 ROWID 字符串 
TIMEOUT_ON_RESOURCE  Oracle 在等待資源時(shí)超時(shí)

語(yǔ)法及示例：

1、存儲(chǔ)過(guò)程創(chuàng)建存儲(chǔ)過(guò)程的語(yǔ)法：

CREATE [OR REPLACE] PROCEDURE procedure_name[(parameter_list)]{IS|AS}[local_declarations]BEGINexecutable_statements[EXCEPTIONexception_handlers]END [procedure_name];

其中：procedure_name是過(guò)程的名稱。

parameter_list是參數(shù)列表。

local_declarations是局部聲明。

executable_statements是可執(zhí)行語(yǔ)句。

exception_handlers是異常處理程序。

示例1：

演示創(chuàng)建過(guò)程(參數(shù)列表中為IN參數(shù)賦予一個(gè)默認(rèn)值，不能為OUT、IN OUT參數(shù)賦予默認(rèn)值)

create or replace procedure find_emp(emp_no in number:=7900)asempname varchar2(20);beginselect ename into empname from emp where empno=emp_no;dbms_output.put_line('雇員姓名是 '||empname);exceptionwhen no_data_found thendbms_output.put_line('雇員編號(hào)未找到');end find_emp;

調(diào)用過(guò)程：

EXECUTE procudure_name(parameters_list);

也可以在過(guò)程里面調(diào)用，直接寫上procudure_name而不必寫EXECUTE。

示例2：演示創(chuàng)建帶OUT參數(shù)的過(guò)程

create or replace procedure test(value1 varchar2,value2 out number) is identity number; begin select sal into identity from emp where empno=value1; if identity2000 then value2:=1000; else value2:=500; end if; end;

調(diào)用帶OUT參數(shù)的過(guò)程：

declare value2 number; begin test('7900',value2); dbms_output.put_line(value2); end;

示例3：

演示創(chuàng)建帶IN OUT參數(shù)的過(guò)程

create or replace procedure swap(p1 in out number,p2 in out number) is v_temp number; begin v_temp:=p1; p1:=p2; p2:=v_temp; end;

調(diào)用帶IN OUT參數(shù)的過(guò)程：

declare num1 number:=100; num2 number:=200; begin swap(num1,num2); dbms_output.put_line('num1= '||num1); dbms_output.put_line('num2= '||num2); end;

示例4：將過(guò)程的執(zhí)行權(quán)限授予其他用戶

GRANT EXECUTE ON find_emp TO scott; GRANT EXECUTE ON swap TO PUBLIC;

將find_emp過(guò)程的執(zhí)行權(quán)限授予給用戶scott，將執(zhí)行swap過(guò)程的權(quán)限授予所有數(shù)據(jù)庫(kù)用戶。

刪除過(guò)程語(yǔ)法：

DROP PROCEDURE procudure_name;

2、函數(shù) 定義函數(shù)的語(yǔ)法如下：

CREATE [OR REPLACE] FUNCTION function_name [(parameter_list)] RETURN datatype {IS|AS} [local_declarations] BEGIN executable_statements [EXCEPTION exception_handlers] END [function_name];

其中：function_name是函數(shù)的名稱。

parameter_list是參數(shù)列表。

local_declarations是局部聲明。

executable_statements是可執(zhí)行語(yǔ)句。

exception_handlers是異常處理程序。

使用函數(shù)時(shí)注意：形式參數(shù)必須只使用數(shù)據(jù)庫(kù)類型，不得使用PL/SQL類型。函數(shù)的返回類型也必須是數(shù)據(jù)庫(kù)類型。函數(shù)不能單獨(dú)執(zhí)行，只能通過(guò)SQL語(yǔ)句或PL/SQL程序塊來(lái)調(diào)用。

示例5：

演示如何創(chuàng)建函數(shù)

create or replace function fun_hello return varchar2 is begin return '朋友，您好'; end;

調(diào)用函數(shù)：

select fun_hello from dual;

函數(shù)的授權(quán)：同過(guò)和的授權(quán)一樣具體請(qǐng)看示例4。

刪除函數(shù)：

DROP FUNCTION function_name

過(guò)程和函數(shù)的差異過(guò)程函數(shù) 作為PL/SQL語(yǔ)句執(zhí)行作為表達(dá)式的一部分調(diào)用在規(guī)范中不包含RETURN子句必須在規(guī)范中包含RETURN子句不返回任何值必須返回單個(gè)值可以包含RETURN語(yǔ)句，但是與函數(shù)不同，它不能用于返回值必須包含至少一條RETURN語(yǔ)句

3、程序包創(chuàng)建包規(guī)范的語(yǔ)法：

CREATE [OR REPLACE] PACKAGE package_name IS|AS [Public type and item declarations] [Subprogram specifications] END [package_name];

其中：package_name是包的名稱。

Public type and item declarations是聲明類型、常量、變量、異常和游標(biāo)等。 Subprogram specifications聲明PL/SQL子程序。

示例6：

演示創(chuàng)建程序包規(guī)范

create or replace package pack_op is procedure pro_print_ename(id number); procedure pro_print_sal(id number); function fun_re_date(id number) return date; end;

創(chuàng)建包主體的語(yǔ)法：

CREATE [OR REPLACE] PACKAGE BODY package_name IS|AS [Public type and item declarations] [Subprogram bodies] [BEGIN Initialization_statements] END [package_name];

其中：package_name是包的名稱。

Public type and item declarations是聲明類型、常量、變量、異常和游標(biāo)等。

Subprogram bodies是定義公共和私有PL/SQL子程序。

示例7：演示創(chuàng)建程序包主體

create or replace package body pack_op is procedure pro_print_ename(id number) is name emp.ename%type; begin select ename into name from emp where empno=id; dbms_output.put_line('職員姓名：'||name); end pro_print_ename; procedure pro_print_sal(id number) is salary emp.sal%type; begin select sal into salary from emp where empno=id; dbms_output.put_line('職員工資：'||salary); end pro_print_sal; function fun_re_date(id number) return date is bedate emp.hiredate%type; begin select hiredate into bedate from emp where empno=id; return bedate; end fun_re_date; end pack_op;

示例8：調(diào)用程序包中創(chuàng)建的過(guò)程和函數(shù)

exec pack_op.pro_print_ename(7900); exec pack_op.pro_print_sal(7900); select pack_op.fun_re_date(7900) from dual;

示例9：演示程序包中的游標(biāo) 創(chuàng)建包規(guī)范

create or replace package pack_emp is cursor cur_emp return emp%rowtype; procedure pro_cur; end pack_emp;

創(chuàng)建包主體

create or replace package body pack_emp is cursor cur_emp return emp%rowtype is select * from emp; procedure pro_cur is rec_emp emp%rowtype; begin open cur_emp; loop fetch cur_emp into rec_emp; exit when cur_emp%notfound; if rec_emp.sal1000 then dbms_output.put_line('員工工資：'||rec_emp.sal||'，需加倍努力爭(zhēng)取提高工資'); elsif rec_emp.sal>=1000 and rec_emp.sal2000 then dbms_output.put_line('員工工資：'||rec_emp.sal||'，工資一般，爭(zhēng)取搞個(gè)部門經(jīng)理做做'); else dbms_output.put_line('員工工資：'||rec_emp.sal||'，工資不錯(cuò)，爭(zhēng)取搞個(gè)總經(jīng)理做做'); end if; end loop; end pro_cur; end pack_emp;

調(diào)用程序包中的過(guò)程以調(diào)用程序包中的游標(biāo)

exec pack_emp.pro_cur;

示例10：存儲(chǔ)過(guò)程返回游標(biāo)的子程序包(此程序包返回r_cur游標(biāo))

CREATE OR REPLACE package SCOTT.pk_wt is type mytype is ref cursor; procedure p_wt(mycs out mytype); end;
CREATE OR REPLACE package BODY SCOTT.pk_wt is procedure p_wt(mycs out mytype) is r_cur mytype; begin open r_cur for select * from emp; mycs:=r_cur; end p_wt; end pk_wt;

查詢有關(guān)過(guò)程、函數(shù)和程序包的信息：

USER_OBJECTS數(shù)據(jù)字典視圖 column object_name format a18 select object_name,object_type from user_objects where object_type in ('PROCEDURE','FUNCTION','PACKAGE','PACKAGE BODY');

以上所述是小編給大家介紹的Oracle Procedure知識(shí)，希望對(duì)大家有所幫助，如果大家有任何疑問(wèn)請(qǐng)給我留言，小編會(huì)及時(shí)回復(fù)大家的。在此也非常感謝大家對(duì)腳本之家網(wǎng)站的支持！

您可能感興趣的文章:

oracle中的procedure編寫和使用詳解
oracle中 procedure(存儲(chǔ)過(guò)程)和function(函數(shù))本質(zhì)區(qū)別

標(biāo)簽：仙桃銅川崇左湖南黃山衡水蘭州湘潭

巨人網(wǎng)絡(luò)通訊聲明：本文標(biāo)題《全面解析Oracle Procedure 基本語(yǔ)法》，本文關(guān)鍵詞；如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問(wèn)題，煩請(qǐng)?zhí)峁┫嚓P(guān)信息告之我們，我們將及時(shí)溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡(luò)，涉及言論、版權(quán)與本站無(wú)關(guān)。