Oracle基本PLSQL的使用實(shí)例詳解
PL/SQL 塊是在 SQL 語言之上發(fā)展起來的一種應(yīng)用，可以集中的處理各種復(fù)雜的 SQL 操 作。
組成：
DECLARE： 聲明部分
BEGIN
編寫主題
EXCEPTION 捕獲異常
END;
1.一個(gè)簡(jiǎn)單的PL/SQL塊
DECLARE
i number;
BEGIN
I:=30;
DBMS_OUTPUT.put_line('I的內(nèi)容為:'||i);
END;
此時(shí)，直接執(zhí)行程序即可。
執(zhí)行之后發(fā)現(xiàn)沒有任何的輸出。因?yàn)?Oracle 在系統(tǒng)設(shè)置中默認(rèn)設(shè)置了輸出不顯示，如果要 顯示的話，輸入以下命令：
set serveroutput on;如果是使用Toad，則可以在Desktop中選擇PLSQL，并打開DBMS OUTPUT。
帶異常的語句塊
DECLARE
i number;
BEGIN
i:=1/0;
EXCEPTION
when ZERO_DIVIDE then
DBMS_OUTPUT.put_line("There is a Exception");
END;
注意：輸出字符串應(yīng)該使用單引號(hào)''。
2.PL/SQL塊還可以接收用戶的輸入信息，例如：現(xiàn)在要求用戶輸入一個(gè)雇員編號(hào)，之后根據(jù)輸入的內(nèi)容進(jìn)行查詢，查詢雇員的姓名。
用戶的輸入信息使用“”完成
DECLARE
eno number;
en varchar(20);
BEGIN
--輸入的信息保存在eno里
eno:=no;
--之后根據(jù)eno的值，對(duì)數(shù)據(jù)庫進(jìn)行查詢操作。
select ename into en from emp where empno = eno;
DBMS_OUTPUT.put_line('編號(hào)為:'||eno||'雇員的姓名為:'||en);
EXCEPTION
WHEN no_data_found THEN
DBMS_OUTPUT.put_line('沒有此雇員');
END;
3.在以上的查詢中再進(jìn)一步：可以根據(jù)雇員的編號(hào)查出姓名及其領(lǐng)導(dǎo)的姓名和所在的部門， 進(jìn)行顯示。
DECLARE
eno emp.empno%TYPE ;
en emp.ename%TYPE ;
mn emp.ename%TYPE ;
dn dept.dname%TYPE ;
dept dept %rowtype ;
BEGIN
-- 輸入的信息保存在 eno 里
eno := no ;
-- 之后根據(jù) eno 的值，對(duì)數(shù)據(jù)庫進(jìn)行查詢操作
SELECT e.ename,m.ename,d.dname INTO en,mn,dn
FROM emp e,dept d,emp m
WHERE e.empno=7369 AND e.mgr=m.empno AND e.deptno=d.deptno ;
DBMS_OUTPUT.put_line('編號(hào)為：'||eno||'雇員的姓名為：'||en) ;
DBMS_OUTPUT.put_line('編號(hào)為：'||eno||'雇員的上級(jí)姓名為：'||mn) ;
DBMS_OUTPUT.put_line('編號(hào)為：'||eno||'雇員所在的部門：'||dn) ;
DBMS_OUTPUT.put_line(dept.deptno) ;
EXCEPTION
WHEN no_data_found THEN
DBMS_OUTPUT.put_line('沒有此雇員') ;
END ;
說明：
• no_data_found 一種異常類型：沒有發(fā)現(xiàn)數(shù)據(jù)
• emp.empno%TYPE ; ：表示以 emp 表中的 empno 字段的類型定義變量
• e.ename,m.ename,d.dname INTO en,mn,dn：一次可以同時(shí)放進(jìn)去多個(gè)值
dept dept %rowtype ; 表示 dept 是一行數(shù)據(jù)
PL/SQL 之中也包含了：循環(huán)、分支等條件控制語句
4.Loop 循環(huán)（類似do…while）
格式：
LOOP
循環(huán)的語句 ;
EXIT WHEN 終止條件 ;
循環(huán)條件必須更改 ; END LOOP ;
例如：循環(huán)輸出 1~10。
DECLARE
countNum NUMBER ;
BEGIN
--必須賦初值
countNum := 1 ;
LOOP
DBMS_OUTPUT.put_line('countNum = '||countNum) ;
EXIT WHEN countNum>10 ;
countNum := countNum + 1 ;
END LOOP ;
END ;
注意：count關(guān)鍵字只能在sql語句中使用
此循環(huán)是先執(zhí)行一次之后再進(jìn)行判斷，執(zhí)行結(jié)果到11結(jié)束循環(huán)
5.while 循環(huán)
格式：
WHILE(判斷循環(huán)的條件)
LOOP 循環(huán)的語句 ;
循環(huán)條件的改變 ;
END LOOP ;
使用此語句修改上面的程序：
DECLARE
countNum NUMBER ;
BEGIN
--必須賦初值
countNum := 1 ;
WHILE(countNum10)
LOOP
DBMS_OUTPUT.put_line('countNum = '||countNum) ;
countNum := countNum + 1 ;
END LOOP ;
END ;
此語句，是先判斷，如果滿足條件則繼續(xù)執(zhí)行循環(huán)體，執(zhí)行結(jié)果到9結(jié)束循環(huán)
6.for 循環(huán)
格式：
FOR 變量名稱 in 變量的初始值..結(jié)束值
LOOP
循環(huán)語句 ;
END LOOP ;
修改上例：
DECLARE
countNum NUMBER ;
BEGIN
FOR countNum IN 1..10
LOOP
DBMS_OUTPUT.put_line('countNum = '||countNum) ;
END LOOP ;
END ;
此語句countNum大于等于1小于等于10，最后輸出1-10
7.if語句
條件判斷
格式：
IF 條件 THEN
滿足條件時(shí)，執(zhí)行此語句
END IF ;
例：
DECLARE
countNum NUMBER ;
BEGIN
countNum := 11 ;
IF countNum>10 THEN
DBMS_OUTPUT.put_line('countNum = '||countNum) ;
END IF ;
END ;
條件語句，滿足條件，執(zhí)行一次
8.IF…ELSE 語句
如果 IF 滿足了，則執(zhí)行，否則執(zhí)行 ELSE
例：
DECLARE
countNum NUMBER ;
BEGIN
countNum := 1 ;
IF countNum>10 THEN
DBMS_OUTPUT.put_line('countNum = '||countNum) ;
ELSE
DBMS_OUTPUT.put_line('條件不不成立') ;
END IF ;
END ;
條件不滿足執(zhí)行else后面的語句
9.if…elsif…else 語句
例：
DECLARE
countNum NUMBER ;
BEGIN
countNum := 1 ;
IF countNum>10 THEN
DBMS_OUTPUT.put_line('countNum = '||countNum);
ELSIF countNum5 THEN
DBMS_OUTPUT.put_line('值小于 5');
ELSE
DBMS_OUTPUT.put_line('條件不滿足');
END IF ;
END ;
多重判斷語句，滿足條件執(zhí)行對(duì)應(yīng)的跳轉(zhuǎn)
10.goto語句
無條件跳轉(zhuǎn)語句
用于程序控制非條件跳至指定標(biāo)簽???>>。不易控制和維護(hù)，慎用！
DECLARE
eno emp.empno%TYPE ;
sal emp.sal%TYPE ;
BEGIN
eno := en ;
SELECT sal INTO sal FROM emp WHERE empno=eno ;
IF sal>3500 THEN
goto po1 ;
ELSIF sal>2000 THEN
goto po2 ;
ELSE
goto po3 ;
END IF;
--標(biāo)簽
po1>> DBMS_OUTPUT.put_line('高工資。。。') ;
po2>> DBMS_OUTPUT.put_line('中等工資。。') ;
po3>> DBMS_OUTPUT.put_line('低工資。。。') ;
END;
感謝閱讀，希望能幫助到大家，謝謝大家對(duì)本站的支持！
您可能感興趣的文章:- PLSQL Developer登錄的默認(rèn)密碼介紹
- Plsql Developer連接Oracle時(shí)出現(xiàn)Could not initialize oci.dll解決方案
- Windows 64位下裝安裝Oracle 11g，PLSQL Developer的配置問題,數(shù)據(jù)庫顯示空白的完美解決方案(圖文教程)
- win7 64位操作系統(tǒng)中Oracle 11g + plsql安裝教程詳解（圖解）
- Oracle客戶端與plsql查詢數(shù)據(jù)亂碼修改成中文的快速解決方法
- oracle(plsql)生成流水號(hào)
- 解決plsql遇到亂碼的問題
- plsql連接oracle數(shù)據(jù)庫報(bào)ora 12154錯(cuò)誤解決方法
- oracle客戶端PLSQL連接失敗解決方法
- plsql與tsql的語法不同
- PLSQL developer12漢化過程
