Oracle PL/SQL程序设计 第五版 上册 第六章 异常处理

1. 先写一个简单的

exception.sql

DECLARE
    CURSOR cur IS
        SELECT sal FROM emp;
    too_low EXCEPTION;
    l_sal NUMBER := 2000;
BEGIN
    FOR cur_rec IN cur
    LOOP
        IF cur_rec.sal < l_sal
        THEN
            DBMS_OUTPUT.PUT_LINE(cur_rec.sal);
            RAISE too_low;
        END IF;
    END LOOP;
EXCEPTION
    WHEN too_low
    THEN
        DBMS_OUTPUT.PUT_LINE('too_low');
END;
/