A WHEN OTHERS handler that records which runtime error occurred. : Exception Range « PL SQL « Oracle PL / SQL

1. Oracle PL / SQL
2. PL SQL
3. Exception Range

A WHEN OTHERS handler that records which runtime error occurred.

  
SQL>
SQL>
SQL> CREATE TABLE session (
  2    department       CHAR(3),
  3    course           NUMBER(3),
  4    description      VARCHAR2(2000),
  5    max_lecturer     NUMBER(3),
  6    current_lecturer NUMBER(3),
  7    num_credits      NUMBER(1),
  8    room_id          NUMBER(5)
  9    );

Table created.

SQL>
SQL> INSERT INTO session(department, course, description, max_lecturer, current_lecturer, num_credits, room_id)
  2              VALUES ('HIS', 101, 'History 101', 30, 11, 4, 20000);

1 row created.

SQL>
SQL> INSERT INTO session(department, course, description, max_lecturer, current_lecturer, num_credits, room_id)
  2              VALUES ('HIS', 301, 'History 301', 30, 0, 4, 20004);

1 row created.

SQL>
SQL> INSERT INTO session(department, course, description, max_lecturer, current_lecturer, num_credits, room_id)
  2              VALUES ('CS', 101, 'Computer Science 101', 50, 0, 4, 20001);

1 row created.

SQL>
SQL> INSERT INTO session(department, course, description, max_lecturer, current_lecturer, num_credits, room_id)
  2              VALUES ('ECN', 203, 'Economics 203', 15, 0, 3, 20002);

1 row created.

SQL>
SQL> INSERT INTO session(department, course, description, max_lecturer, current_lecturer, num_credits, room_id)
  2              VALUES ('CS', 102, 'Computer Science 102', 35, 3, 4, 20003);

1 row created.

SQL>
SQL> INSERT INTO session(department, course, description, max_lecturer, current_lecturer, num_credits, room_id)
  2              VALUES ('MUS', 410, 'Music 410', 5, 4, 3, 20005);

1 row created.

SQL>
SQL> INSERT INTO session(department, course, description, max_lecturer, current_lecturer, num_credits, room_id)
  2              VALUES ('ECN', 101, 'Economics 101', 50, 0, 4, 20007);

1 row created.

SQL>
SQL> INSERT INTO session(department, course, description, max_lecturer, current_lecturer, num_credits, room_id)
  2              VALUES ('NUT', 307, 'Nutrition 307', 20, 2, 4, 20008);

1 row created.

SQL>
SQL> INSERT INTO session(department, course, description, max_lecturer, current_lecturer, num_credits, room_id)
  2              VALUES ('MUS', 100, 'Music 100', 100, 0, 3, NULL);

1 row created.

SQL>
SQL> CREATE TABLE myLogTable (
  2    code             NUMBER,
  3    message          VARCHAR2(200),
  4    info             VARCHAR2(100)
  5    );

Table created.

SQL>
SQL> DECLARE
  2    myException EXCEPTION;
  3
  4    studentCount NUMBER(3);
  5
  6    studentMax NUMBER(3);
  7
  8    v_ErrorCode myLogTable.code%TYPE;
  9    v_ErrorText myLogTable.message%TYPE;
 10  BEGIN
 11    SELECT current_lecturer, max_lecturer
 12      INTO studentCount, studentMax
 13      FROM session
 14      WHERE department = 'HIS' AND course = 101;
 15
 16    IF studentCount > studentMax THEN
 17      RAISE myException;
 18    END IF;
 19  EXCEPTION
 20    WHEN myException THEN
 21      INSERT INTO myLogTable (info)
 22        VALUES ('History 101 has ' || studentCount ||
 23                'lecturer: max allowed is ' || studentMax);
 24    WHEN OTHERS THEN
 25      v_ErrorCode := SQLCODE;
 26      v_ErrorText := SUBSTR(SQLERRM, 1, 200);
 27      INSERT INTO myLogTable (code, message, info) VALUES
 28        (v_ErrorCode, v_ErrorText, 'Oracle error occurred');
 29  END;
 30  /

PL/SQL procedure successfully completed.

SQL>
SQL>
SQL>
SQL> select * from myLogTable;

no rows selected

SQL>
SQL> drop table myLogTable;

Table dropped.

SQL> drop table session;

Table dropped.

   
  

Related examples in the same category