EXAMPLES ON PRAGMA EXCEPTION_INIT

DECLARE
NULL_FOUND      EXCEPTION;
SAL_CHECK          EXCEPTION;
PRAGMA  EXCEPTION_INIT(NULL_FOUND,-01400);
PRAGMA   EXCEPTION_INIT(SAL_CHECK,-02290);
BEGIN
INSERT INTO EMP(EMPNO,ENAME,SAL) VALUES(&EMPNO,'&ENAME',&SAL);
EXCEPTION
WHEN NULL_FOUND THEN
DBMS_OUTPUT.PUT_LINE('PLZ ENTER ENAME VALUE');
WHEN SAL_CHECK THEN
DBMS_OUTPUT.PUT_LINE('PLZ ENTER ABOVE 5000 SALARY');
END;