講義說(shuō)明課件9

1、1第9章 PL/SQL基礎(chǔ)2本章內(nèi)容熟練掌握條件選擇語(yǔ)句的使用熟練掌握循環(huán)語(yǔ)句的使用理解并掌握游標(biāo)掌握異常的處理39.2 條件選擇語(yǔ)句 選擇結(jié)構(gòu)IF條件語(yǔ)句CASE表達(dá)式4IF條件語(yǔ)句IF語(yǔ)句三種形式IF-THENIF-THEN-ELSE IF-THEN-ELSIFIF condition1 THEN statements1;ELSIF condition2 THEN statements2;, ELSE else_statements;END IF;5輸入一個(gè)員工號(hào)修改該員工的工資，如該員工為10號(hào)部門(mén)，工資增加100；若為20號(hào)部門(mén)，工資增加150；若為30號(hào)部門(mén)，工資增加200；否則增加

2、300。 DECLARE v_deptno emp.deptno%type; v_increment NUMBER(4); v_empno emp.empno%type;BEGIN v_empno:=&x; SELECT deptno INTO v_deptno FROM emp WHERE empno=v_empno; IF v_deptno=10 THEN v_increment:=100; ELSIF v_deptno=20 THEN v_increment:=150; ELSIF v_deptno=30 THEN v_increment:=200; ELSE v_increment:=

3、300; END IF; UPDATE emp SET sal=sal+v_increment WHERE empno=v_empno;END;6CASE表達(dá)式兩種形式簡(jiǎn)單CASE表達(dá)式搜索CASE表達(dá)式簡(jiǎn)單CASE表達(dá)式使用表達(dá)式確定返回值CASE search_exp WHEN exp1 THEN result1; WHEN exp2 THEN result2; WHEN expn THEN resultn; ELSE default_ result;END CASE; 7DECLARE v_deptno emp.deptno%type; v_increment NUMBER(4); v_

4、empno emp.empno%type;BEGIN v_empno:=&x; SELECT deptno INTO v_deptno FROM emp WHERE empno=v_empno; CASE v_deptno WHEN 10 THEN v_increment:=100; WHEN 20 THEN v_increment:=150; WHEN 30 THEN v_increment:=200; ELSE v_increment:=300;END CASE;UPDATE emp SET sal=sal+v_increment WHERE empno=v_empno; END; BEG

5、IN CASE &grade WHEN A THEN DBMS_OUTPUT.PUT_LINE(優(yōu)異); WHEN B THEN DBMS_OUTPUT.PUT_LINE (優(yōu)秀); WHEN C THEN DBMS_OUTPUT.PUT_LINE (良好); WHEN D THEN DBMS_OUTPUT.PUT_LINE (一般); WHEN F THEN DBMS_OUTPUT.PUT_LINE (較差); ELSE DBMS_OUTPUT.PUT_LINE (沒(méi)有此成績(jī)); END CASE;END;8搜索CASE表達(dá)式使用條件確定返回值CASE WHEN condition1 THE

6、N statements1; WHEN condition2 THEN statements2; WHEN conditionn THEN statementsn; ELSE else_statements;END CASE;9根據(jù)輸入的員工號(hào)修改該員工工資。如工資低于1000，則工資增加200;如工資在1000-2000之間,則增加150;如工資在2000-3000之間，則增加100;否則增加50。 DECLARE v_sal emp.sal%type; v_increment NUMBER(4); v_empno emp.empno%type;BEGIN v_empno:=&x; SELE

7、CT sal INTO v_sal FROM emp WHERE empno=v_empno; CASE WHEN v_sal1000 THEN v_increment:=200; WHEN v_sal2000 THEN v_increment:=150; WHEN v_sal 50; END LOOP;END; 13WHILE循環(huán)WHILE循環(huán)是在LOOP循環(huán)基礎(chǔ)上添加循環(huán)條件，即只有滿(mǎn)足WHILE條件后才會(huì)執(zhí)行循環(huán)體中的內(nèi)容基本語(yǔ)法 WHILE condition LOOP statements;END LOOP; 14利用WHILE循環(huán)向temp_table表中插入50條記錄。DECLA

8、RE v_counter BINARY_INTEGER :=1;BEGIN WHILE v_counter 6000 THEN RAISE e_highlimit; END IF;EXCEPTION WHEN e_highlimit THEN DBMS_OUTPUT.PUT_LINE(The salary is too large!); ROLLBACK;END; 53OTHERS異常處理器OTHERS異常處理器是一個(gè)特殊的異常處理器，可以捕獲所有的異常。通常，OTHERS異常處理器總是作為異常處理部分的最后一個(gè)異常處理器，負(fù)責(zé)處理那些沒(méi)有被其他異常處理器捕獲的異常。 54DECLARE v_

9、sal emp.sal%TYPE; e_highlimit EXCEPTION;BEGIN SELECT sal INTO v_sal FROM emp WHERE ename=JOAN; UPDATE emp SET sal=sal+100 WHERE empno=7900; IF v_sal6000 THEN RAISE e_highlimit; END IF;EXCEPTION WHEN e_highlimit THEN DBMS_OUTPUT.PUT_LINE(The salary is too large!); ROLLBACK; WHEN OTHERS THEN DBMS_OUTP

10、UT.PUT_LINE(There is some wrong in selecting!);END; 55異常的傳播可執(zhí)行部分異常的傳播如果當(dāng)前語(yǔ)句塊有該異常的處理器，則執(zhí)行之，并且成功完成該語(yǔ)句塊。然后，控制權(quán)傳遞到外層語(yǔ)句塊。 如果當(dāng)前語(yǔ)句塊沒(méi)有該異常的處理器，則通過(guò)在外層語(yǔ)句塊中產(chǎn)生該異常來(lái)傳播該異常。然后，執(zhí)行對(duì)外層語(yǔ)句塊執(zhí)行步驟1。如果沒(méi)有外層語(yǔ)句塊，則該異常將傳播到調(diào)用環(huán)境。 56DECLARE v_sal emp.sal%TYPE;BEGIN BEGIN SELECT sal INTO v_sal FROM emp WHERE ename=JOAN; EXCEPTION WHE

11、N NO_DATA_FOUND THEN DBMS_OUTPUT.PUT_LINE(There is not such an employee!); END; DBMS_OUTPUT.PUT_LINE(Now this is outputted by outer block!);END;There is not such an employee!Now this is outputted by outer block! 57DECLARE v_sal emp.sal%TYPE;BEGIN BEGIN SELECT sal INTO v_sal FROM emp WHERE deptno=10;

12、 EXCEPTION WHEN NO_DATA_FOUND THEN DBMS_OUTPUT.PUT_LINE(There is not such an employee!); END; DBMS_OUTPUT.PUT_LINE(Now this is outputted by outer block!);EXCEPTION WHEN TOO_MANY_ROWS THEN DBMS_OUTPUT.PUT_LINE(There are more than one employee!);END;There are more than one employee!58聲明部分和異常處理部分的異常立刻傳播到外層語(yǔ)句塊，即使當(dāng)前語(yǔ)句塊有異常處理器。 BEGIN DECLARE v_number NUMBER(6) :=ABC; BEGIN v_number:=10; EXCEPTION WHEN OTHERS THEN D