ON-ERROR and ON-MESSAGE

Question

Is anyone using a stored procedure to trap and intercept Oracle Forms Errors and Messages using the ON-ERROR and ON-MESSAGE Triggers?
In order to do this, I would like to store Oracle's Forms error in a table. I have been unable to located the .msg file that contains the flat file for all of oracle errors and messages. I have loaced the binaries at: $ORACLE_FORMS_HOME\forms90 in the following 5 files: (1) fmcus.msb (2) fmdus.msb (3) fmfus.msg (4) fmgus.msg and (5) fmmus.msb
Does any know where I can locate the .msg files?
Any help would be appreciated.

Answer 1

Hello,
You can use ERROR_TYPE and ERROR_CODE to ask your own tables
Declare
err_code NUMBER := ERROR_CODE;
errmsg VARCHAR2(512) ;
Begin
If ERROR_TYPE = 'FRM' Then
SELECT message_text
INTO errmsg
FROM forms_message_table
WHERE code = err_code ;
Elsif ERROR_TYPE = 'ORA' Then
SELECT message_text
INTO errmsg
FROM database_message_table
WHERE code = err_code ;
Else
errmsg := ERROR_TEXT ;
End if ;
Set_Alert_Property( 'ALERT1', TITLE, 'Forms error message' ) ;
Set_Alert_Property( 'ALERT1', ALERT_MESSAGE_TEXTE, errmsg ) ;
Ok := Show_Alert( 'ALERT1' ) ;
Exception
When NO_DATA_FOUND Then
Set_Alert_Property( 'ALERT1', TITLE, 'Forms error message' ) ;
Set_Alert_Property( 'ALERT1', ALERT_MESSAGE_TEXTE, ERROR_TEXT ) ;
Ok := Show_Alert( 'ALERT1' ) ;
End ;