Display a message in status bar when error in a block based procedure

Question

Hi
I have a block based on procedures.
If I have an exception when I try to insert a record for example, how can I display a user friendly message in the status bar ?
here is my insert procedure :
PROCEDURE emp_insert2(t IN emptab) IS
  BEGIN
    FOR i IN t.first..t.last LOOP
    INSERT INTO emp (empno, ename, job, hiredate, sal)
    VALUES(t(i).empno, t(i).ename, t(i).job, t(i).hiredate, t(i).sal);
    END LOOP ;
  EXCEPTION
    When DUP_VAL_ON_INDEX then
        Raise_Application_Error( -20002, '^This identifier already exists^' ) ;
  END emp_insert2;When I use the ON-FORM trigger and ERROR_CODE and ERROR_TEXT variables, I get an FRM-XXXX message saying :
40735--INSERT-PROCEDURE trigger raised unhandled exception ORA-00001.
I want a message like :
ORA-20002 This identifier already exists

Answer 1

Hello,
ORA-20500: ^This identifier already exists^ ORA-06512: à "SCOTT2.EMP_PKG", ligne 48
I cannot figure out what is the problem described by the second part of the message.
why numeric or value error in this case ? ( ligne 48 corresponds to the raise_applicaion_error instruction )There is no problem with the second part it is just for showing the line number it not the numeric or value error the code for numeric or value error is ORA-06502. See the below link for more information
http://www.techonthenet.com/oracle/errors/ora06512.php
So, now you can display your customized message in status bar using the error code which you defined in RAISE_APPLICATION_ERROR like below...
DECLARE
     errcode VARCHAR2(50) := DBMS_ERROR_CODE;
     errtxt VARCHAR2(1000) := DBMS_ERROR_TEXT;
BEGIN
     IF vErrCode='-20500' THEN
        MESSAGE('Here display your customized message.');
     ELSE
        -- Handle the rest errors...
     END IF;
END; -Ammad