CREATE OR REPLACE PROCEDURE pro_PPT
IS
E1 EXCEPTION;
PRAGMA EXCEPTION_INIT(E1, -2200);
BEGIN
-- 塊1開始------------------------------------------------------
DECLARE
n NUMBER := 1;
BEGIN
DBMS_OUTPUT.put_line('第1塊'||n);
EXCEPTION
WHEN OTHERS THEN
DBMS_OUTPUT.put_line('第1塊異常-------');
END;
-- 塊1結束------------------------------------------------------
-- 塊2開始------------------------------------------------------
DECLARE
m NUMBER := 2;
BEGIN
DBMS_OUTPUT.put_line('第2塊'||m);
EXCEPTION
WHEN OTHERS THEN
DBMS_OUTPUT.put_line('第2塊異常-------');
END;
-- 塊2結束------------------------------------------------------
EXCEPTION
WHEN OTHERS THEN
DBMS_OUTPUT.put_line('收到全局-------');
END;