EXIT button on the top level form is not working.

Question

Hi I have 10g forms deployed on the web.
On the top level form, there is a exit button on it.
And for this form, under ALERTS I have two alerts viz. QUIT_ALERT and BANNER_ALERT.
Now when I press the EXIT button on the form, nothing is happening. Neither prompting the ALERT nor closing the FORM.
Where and What could be the problem??
I have the following code for the exit button
IF G$_DISPLAY_ALERT('QUIT_ALERT','Do you really wish to quit?') = ALERT_BUTTON1 THEN
EXIT_FORM;
END IFAnd the function G$_DISPLAY_ALERT has following code
FUNCTION G$_DISPLAY_ALERT(ALERT_NAME IN VARCHAR2,
MSG_STRING IN VARCHAR2) RETURN NUMBER IS
ALERT_ID ALERT;
AL_NAME VARCHAR2(30);
ALERT_BUT NUMBER;
BEGIN
IF ALERT_NAME IS NULL THEN
AL_NAME := 'G$_WARNING_ALERT';
ELSE
AL_NAME := ALERT_NAME;
END IF;
ALERT_ID := FIND_ALERT(AL_NAME);
IF ID_NULL(ALERT_ID) THEN
RAISE FORM_TRIGGER_FAILURE;
END IF;
SET_ALERT_PROPERTY(ALERT_ID, ALERT_BUT, MSG_STRING);
ALERT_BUT := SHOW_ALERT(ALERT_ID);
RETURN ALERT_BUT;
END;Edited by: Charan on Mar 30, 2011 2:01 PM

Answer 1

seems like some trigger is firing, because i'm getting a CAUTION popup now saying Please Acknowledge.Actually, the PAUSE() built-in is what brings up the "Please Acknowledge" alert. Clearly, your trigger is firing so there must be something wrong with either your WBP trigger code or your G$_DISPLAY_ALERT program unit.
Try the same technique on your program unit. I would also suggest you display a message in your Exception handler. My guess is that your function is failing but since you don't report the failure, it appears that your code runs successfully.
FUNCTION G$_DISPLAY_ALERT(ALERT_NAME IN VARCHAR2,
                      MSG_STRING IN VARCHAR2) RETURN NUMBER IS
   ALERT_ID         ALERT;
   AL_NAME          VARCHAR2(30);
   ALERT_BUT        NUMBER;
BEGIN
   Message('Alert_name: '||ALERT_NAME);
   PAUSE;
IF ALERT_NAME IS NULL THEN
   AL_NAME := 'G$_WARNING_ALERT';
ELSE
   AL_NAME := ALERT_NAME;
END IF;
ALERT_ID := FIND_ALERT(AL_NAME);
IF ID_NULL(ALERT_ID) THEN
   Message('Unable to find Alert: '||ALERT_NAME);
   Message('Unable to find Alert: '||ALERT_NAME);
   RAISE FORM_TRIGGER_FAILURE;
END IF;
SET_ALERT_PROPERTY(ALERT_ID, ALERT_BUT, MSG_STRING);
ALERT_BUT := SHOW_ALERT(ALERT_ID);
RETURN ALERT_BUT;
END;Then you can see what the value of ALERT_NAME is and verify your code is executing as expected.
Craig...
Edited by: CraigB on Mar 30, 2011 12:54 PM