How to use a Progress bar object in Oracle Form [message #80353] |
Fri, 13 September 2002 00:50 |
LALA
Messages: 18 Registered: August 2002
|
Junior Member |
|
|
Hi,
Theres an object in visual basic called progress bar, this is use to indicate the status of your processing program.
Is Oracle form have this feature, if there is, how can i use in my form or program
|
|
|
Re: How to use a Progress bar object in Oracle Form [message #80419 is a reply to message #80353] |
Wed, 18 September 2002 12:12 |
Daniel R
Messages: 8 Registered: September 2002
|
Junior Member |
|
|
Hi,make a progress bar is very simple, just do the next:
1) create a display_item and give it a static length
that you wish.
2) In the procedure or function where you execute the
main proces that you want the users now that are
running, declare 3 variables as follows:
x number := 225; /* Size of the bar */
z number; /* Size of the step */
c number; /* Counter */
c := 0;
The variable "z" recievs the result of a
SELECT COUNT(*) into z from xxx where xxx; as
follows:
z := x/c;
x := 0;
3) Initialize the bar:
SET_ITEM_PROPERTY('STDTOOLBAR.PROGRESS2',WIDTH,x);
SET_ITEM_PROPERTY('STDTOOLBAR.PROGRESS2' ,VISIBLE,PROPERTY_TRUE);
synchronize;
4) Inside a loop or something put the following line:
The loop could be the main loop or your proces.
x := x + z;
5) Before the loop ends put the following lines:
SET_ITEM_PROPERTY('STDTOOLBAR.PROGRESS2',WIDTH,x);
synchronize;
6) After loop ends write this line:
:STDTOOLBAR.PROGRESS2 := '100%';
synchronize;
set_application_property(cursor_style,'Default');
SET_ITEM_PROPERTY('STDTOOLBAR.PROGRESS2' ,VISIBLE,PROPERTY_FALSE);
7) Separate of this in a WHEN-NEW-FORM-INSTANCE
Trigger put the next line:
SET_ITEM_PROPERTY('STDTOOLBAR.PROGRESS' ,VISIBLE,PROPERTY_FALSE);
8) In a WHEN-BUTTON-PRESSED Trigger put this line:
SET_ITEM_PROPERTY('STDTOOLBAR.PROGRESS' ,VISIBLE,PROPERTY_TRUE);
This procedure works i'm actually using in my forms and it works, just need to change a little things related your aplication. I hope this help, by.
Daniel
|
|
|
|
|