Et eksempel er givet her for at rejse applikationsfejl (raise_application_error) i PL/SQL lagret procedure, hvis den bestemte betingelse ikke stemmer overens. Programmet vil rejse en undtagelse, hvis provisionen (komm.) er nul i EMP-tabellen for givet medarbejdernummer (empno).
Raise_Application_Error i PL/SQL-eksempel
CREATE OR REPLACE PROCEDURE compute_sal (i_EMPNO IN emp.empno%TYPE) IS CURSOR c_emp (p_empno emp.empno%TYPE) IS SELECT sal, comm FROM emp WHERE empno = p_empno; v_sal NUMBER; v_comm NUMBER; BEGIN OPEN c_emp (i_empno); FETCH c_emp INTO v_sal, v_comm; CLOSE c_emp; IF v_comm IS NULL THEN raise_application_error (-20001, 'Commission is null.'); END IF; DBMS_OUTPUT.put_line ('Total salary is: ' || (v_sal + v_comm)); END compute_sal; /
Udfør
SET SERVEROUTPUT ON; BEGIN COMPUTE_SAL(7369); END; /
Output
SQL> SET SERVEROUTPUT ON; SQL> BEGIN 2 COMPUTE_SAL(7369); 3 END; 4 / BEGIN * ERROR at line 1: ORA-20001: Commission is null. ORA-06512: at "SCOTT.COMPUTE_SAL", line 16 ORA-06512: at line 2
Se også:
- Find fejllinjenummer i PL/SQL
- Et eksempel på udløser ved fejl i Oracle Forms
- Fejl Oracle 12c-databaseinstallationsvejledning