Re: How to abort exiting from a form
From: nobody <nobody_at_nowhere.com>
Date: Mon, 20 Jan 2003 01:18:31 GMT
Message-ID: <H7IW9.393730$F2h1.157157_at_news01.bloor.is.net.cable.rogers.com>
Date: Mon, 20 Jan 2003 01:18:31 GMT
Message-ID: <H7IW9.393730$F2h1.157157_at_news01.bloor.is.net.cable.rogers.com>
use an alert.
When-Button-Pressed Trigger:
- Declare a NUMBER variable for the
- constant returned by the Show_Alert function
DECLARE
alert_button NUMBER;
BEGIN
IF :item.price IS NOT NULL THEN
- call the user-named calculation subprogram
calculate_totals;
ELSE -- display the alert
alert_button := Show_Alert('no_price_alert');
IF alert_button = ALERT_BUTTON1 THEN
- invoke the price list window
Go_Block('product_prices');
END IF; -- do nothing if operator selects button 2
END IF;
END;
:
"Damir Dezeljin" <news_at_dezo.org> wrote in message
news:b0eh8h$9vb$1_at_planja.arnes.si...
> Hi.
>
> I want to popup an [b]Alert[/b] message which ask the user if he realy
want
> to exit the Oracle Forms application. If he press 'NO' button I want to
> return to the aplication.
>
> I realize that I have to use POST-FROM triger to popup the alert message.
I
> then don't know how to unvalidate the user exit.
>
> Any hint / example?
>
> Regards,
> Dezo
>
>
- invoke the price list window
Go_Block('product_prices');
END IF; -- do nothing if operator selects button 2
END IF;
END;
:
"Damir Dezeljin" <news_at_dezo.org> wrote in message
news:b0eh8h$9vb$1_at_planja.arnes.si...
- call the user-named calculation subprogram
calculate_totals;
ELSE -- display the alert
alert_button := Show_Alert('no_price_alert');
IF alert_button = ALERT_BUTTON1 THEN