Di sini diberikan contoh untuk meningkatkan kesalahan aplikasi (raise_application_error) dalam prosedur tersimpan PL/SQL jika kondisi tertentu tidak cocok. Program akan memunculkan pengecualian jika komisi (comm) dalam tabel EMP nol untuk nomor karyawan (empno) yang diberikan.
Raise_Application_Error dalam Contoh PL/SQL
PROSEDUR BUAT ATAU GANTI compute_sal (i_EMPNO IN emp.empno%TYPE)ISCURSOR c_emp (p_empno emp.empno%TYPE)ISSELECT sal, commFROM empWHERE empno =p_empno;v_sal NUMBER;v_comm NUMBER;(BEGIN_empno cemp_empno); v_sal, v_comm;CLOSE c_emp;IF v_comm IS NULLTHENraise_application_error (-20001, 'Commission is null.');END IF;DBMS_OUTPUT.put_line ('Total gaji:' || (v_sal + v_comm));END compute_sal;/Jalankan
SET SERVEROUTPUT ON;BEGINCOMPUTE_SAL(7369);END;/Keluaran
SQL> SET SERVEROUTPUT ON;SQL> BEGIN2 COMPUTE_SAL(7369);3 END;4 /BEGIN*ERROR pada baris 1:ORA-20001:Komisi adalah null.ORA-06512:pada "SCOTT.COMPUTE_SAL", baris 16ORA -06512:pada baris 2Lihat juga:
- Temukan nomor baris kesalahan di PL/SQL
- Contoh pemicu On-Error di Oracle Forms
- Panduan penginstalan database Oracle 12c error