Re: Forms : Toolbar Trigger

Because the code for each button is so different, there isn't too much you can do about it really as far as i know ;-(

M

>
>My code:
>
>/* Form level WHEN-BUTTON-PRESSED */
>
>DECLARE
> button_pressed varchar2(50);
>BEGIN
> button_pressed := :SYSTEM.TRIGGER_ITEM;
>--save button
> IF button_pressed = 'TOOLBAR.SAVE'
> THEN
> COMMIT_FORM;
>--enter query button
> ELSE IF button_pressed = 'TOOLBAR.EQUERY'
> THEN
> SET_ITEM_PROPERTY('TOOLBAR.SAVE', ENABLED, PROPERTY_FALSE);
> ENTER_QUERY;
>--query button
> ELSE IF button_pressed = 'TOOLBAR.QUERY'
> Then
> EXECUTE_QUERY;
> SET_ITEM_PROPERTY('TOOLBAR.SAVE', ENABLED, PROPERTY_TRUE);
>--exit button
> ELSE IF button_pressed = 'TOOLBAR.EXIT'
> THEN EXIT_FORM;
>END IF;
>END IF;
>END IF;
>END IF;
>END;
>
>
>
>
Received on Thu Jul 01 1999 - 10:37:07 CEST