很簡單, 舉個簡單的例子 DECLARE errnum NUMBER := ERROR_CODE; errtxt VARCHAR2(80) := ERROR_TEXT; errtyp VARCHAR2(3) := ERROR_TYPE; BEGIN IF errnum = 40107 THEN Message('You cannot navigate to this non-displayed item... Try again.'); ELSIF errnum = 40109 THEN Message('If you want to leave this block, you must first cancel Enter Query mode.'); ELSE /* ** Print the Normal Message that would have appeared ** ** Default Error Message Text Goes Here */ Message(errtyp||'-'||TO_CHAR(errnum)||': '||errtxt); RAISE Form_Trigger_Failure; END IF; END;
舉個簡單的例子
DECLARE
errnum NUMBER := ERROR_CODE;
errtxt VARCHAR2(80) := ERROR_TEXT;
errtyp VARCHAR2(3) := ERROR_TYPE;
BEGIN
IF errnum = 40107 THEN
Message('You cannot navigate to this non-displayed item...
Try again.');
ELSIF errnum = 40109 THEN
Message('If you want to leave this block,
you must first cancel Enter Query mode.');
ELSE
/*
** Print the Normal Message that would have appeared
**
** Default Error Message Text Goes Here
*/
Message(errtyp||'-'||TO_CHAR(errnum)||': '||errtxt);
RAISE Form_Trigger_Failure;
END IF;
END;