Aquí se proporciona un ejemplo para generar un error de aplicación (raise_application_error) en el procedimiento almacenado PL/SQL si la condición determinada no coincide. El programa generará una excepción si la comisión (comm) es nula en la tabla EMP para el número de empleado dado (empno).
Raise_Application_Error en el ejemplo de PL/SQL
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;
/ Ejecutar
SET SERVEROUTPUT ON; BEGIN COMPUTE_SAL(7369); END; /
Salida
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
Véase también:
- Encuentre el número de línea de error en PL/SQL
- Un ejemplo de disparador On-Error en Oracle Forms
- Error en la guía de instalación de la base de datos Oracle 12c