SET_ITEM_PROPERTY(':blk_update_pol.exgratia',visible,property_true);

Hi everyone! Please help.
I'm getting error FRM-41045:
The items are within the same block. The item is visible upon running.
I want to make a text item visible or invisible based on the value of a list item. I put my code in the when-list-change of the list item. here is the code:
IF :blk_update_pol.li_status = '017' THEN
set_item_property(':blk_update_pol.exgratia',required,property_true);
set_item_property(':blk_update_pol.exgratia',visible,property_true);
set_item_property(':blk_update_pol.txt_remarks',position,3.041,4.151);
ELSE
set_item_property(':blk_update_pol.exgratia',required,property_false);
set_item_property(':blk_update_pol.exgratia',visible,property_false);
set_item_property(':blk_update_pol.txt_remarks',position,3.041,3.413);
END IF;
I also tried to put the code in the when-validate-item. But still i got the same error.
Please help. Thanks in advance.

Hi,
When using the control name as a VARCHAR2 parameter, then you don't have to use the *:*. Change the code to
IF :blk_update_pol.li_status = '017' THEN
   set_item_property('blk_update_pol.exgratia',required,property_true);
   set_item_property('blk_update_pol.exgratia',visible,property_true);
   set_item_property('blk_update_pol.txt_remarks',position,3.041,4.151);
ELSE
   set_item_property('blk_update_pol.exgratia',required,property_false);
   set_item_property('blk_update_pol.exgratia',visible,property_false);
   set_item_property('blk_update_pol.txt_remarks',position,3.041,3.413);
END IF;Hope this helps.
Regards,
Manu.

Similar Messages

SET_ITEM_PROPERTY - VISIBLE ENABLE / DISABLE

I'm quite new to Forms. I want to show or hide some items on my form depending of what the user choose in a LOV. I used the SET_ITEM_PROPERTY to enable or disable VISIBLE like this
SET_ITEM_PROPERTY('SZBAIDE.SZBAIDE_ETAT_DOSSIER_CODE',VISIBLE,PROPERTY_TRUE); -- > to show the item
OR
SET_ITEM_PROPERTY('SZBAIDE.SZBAIDE_ETAT_DOSSIER_CODE',VISIBLE,PROPERTY_FALSE); -- >to hide the item
The problem is when I show the item, it is disabled and grayed out. Does setting VISIBLE to false also modify other properties?

Right after I posted the question I found the answer in Forms Help.
When setting VISIBLE to false, it also sets the following properties to false: ENABLED, NAVIGABLE, UPDATE_ALLOWED, UPDATE_NULL and QUERYABLE .

Check Box functionally lost when visiblity is turned off then back on

Please pardon my attempt to ask a coherent question for I am new to Oracle Forms!
I have created a canvas using the layout wizard against an Oracle table. I needed to provide the means to select mulitple records for DELETION; so, I created a check box item beside the database items to allow the ability to select records to delete. I also allow the user to query this table in query mode against a couple of columns to help isolate records to be deleted. So far, I have gotten the expected functionality from the check box on the initial query of this form.
Now, heres my problem!
When I try to reduce the query result while in "ENTER_QUERY" (F7) mode, I intentionally make my check box item invisible. The thought being "I should not allow users opportunity select records for deletion while in the process of querying the table to fetch the records you will be deleting from!" Once I press F8 to execute the my query, I issue the following statements in my KEY-EXEQRY trigger:
set_item_property( 'EFIS_EMAIL_QUEUE.SELECTTODELETE', VISIBLE, PROPERTY_TRUE );
set_item_property( 'EFIS_EMAIL_QUEUE.SELECTTODELETE', ENABLED, PROPERTY_TRUE );
My results are displayed along with the check box to select records for deletion!
At thsi point, the functionally of the check box no longer works!
I get a forms error "(FRM-40200) Field is protected against update."
I look in the Property Palette under the Physical section and the Visible attribute is set to "Yes"!
Can someone tell me why turning the visible attribute "OFF*" and then back "*ON*" caused the lost functionity?*
What must I do to get this functionally back without abandoning this design premise?+
Is there some other attribute settings I must reset in addition to the two set_item_property issued above?+
Thanks in advance!
Les

Add to your code following statement
set_item_property( 'EFIS_EMAIL_QUEUE.SELECTTODELETE', UPDATE_ALLOWED, PROPERTY_TRUE );
and hopefully that should take care of your problem.

ERROR_CODE 41046 invalid parameter for set_item_property

Hi,
I've got a form with 3 blocks. Before the active block an indicator is shown so that it is clear for the user which block is active. The indicator actually is nothing more then a long text_field with black background.
3 of these indicators are placed on the form of which only one at a time can be visible. (property=visible)
In the when-new-block-instance trigger I try to show one and hide the other 2 leading to following code :
SET_ITEM_PROPERTY('BK_LIST.INDICATOR1',VISIBLE,'PROPERTY_FALSE');
SET_ITEM_PROPERTY('BK_LIST2.INDICATOR2',VISIBLE,'PROPERTY_TRUE');
SET_ITEM_PROPERTY('BK_LIST3.INDICATOR3',VISIBLE,'PROPERTY_FALSE');This gives the FRM-41046 error message and I don't see why. I already tried a find_item on the given item names and that worked. I tried to use the item_id instead of the item_name but that gives errors as well.
Thanks for your help,
Kris
Message was edited by:
[email protected]

Just looked at on-line help. You cannot set the visible property on the current item. You may need to go_item somewhere else before running those commands.

How to Visible/Hide an Item based on the value of another Item

Hi
I need to visible and hide a textitem based on the value of another item.This form has 3 blocks, and the both item is in the first Master Block.
My code is:
if :RECORDTYPE=7 then
     Set_Item_Property('BLOCK.ITEM',VISIBLE,PROPERTY_TRUE);
     Set_Item_Property('BLOCK.ITEM',ENABLED,PROPERTY_TRUE);
ELSE
     Set_Item_Property('BLOCK.ITEM',VISIBLE,PROPERTY_FALSE);
Set_Item_Property('BLOCK.ITEM',ENABLED,PROPERTY_FALSE);
:BLOCK.ITEM:=NULL;
end if;
I wrote the code in the Validate Trigger, but not working when moving Next Record & Previous Record
Thanks in advance
Rizly

Read the 'Propagation of Property Changes' section towards the end of the page for Set_Item_Property in the online help. I'm not sure what you mean by locking automatically but perhaps it's because of this.
You should also ensure the item you're setting to invisible is not the current item (check :system.cursor_item and go to a different item if necessary).

Set visibility property for items depending on other items

Hello,
I want to set the visibility setting for an item that I have, the steps should be as the following,
for example
if I have an item that asked,
do you have children ?
if the answer is Yes,
the next item should be visible which let's say, number of them
if no,
the next item should be not visible
I tried to set a trigger for the item I am controlling its visibility which is
pre-text-item and wrote
if 'CHEQUE_TABLE.CHEQUE_RECIEVED'='yes'
then
set_item_property(:SYSTEM.CURRENT_ITEM,visible,property_true) ;
else
set_item_property(:SYSTEM.CURRENT_ITEM,visible,property_false) ;
end if;
but it doesn't seem to be right, ,,,
thank you

I can see two potential problems. The first:
if 'CHEQUE_TABLE.CHEQUE_RECIEVED'='yes'
Does CHEQUE_TABLE.CHEQUE_RECEIVED refer to a Data Block and Item? If yes, then you are trying to tell Forms to look at the value of the string 'CHEQUE_TABLE.CHEQUE_RECEIVED' when you should be refering to the value of the Block.Item through direct reference, eg:
IF :CHEQUE_TABLE.CHEQUE_RECEIVED = 'yes'
How is the value of CHEQUE_RECIEVED set? Does the user select the YES value from a List of Value (LOV) or from a Poplist or do they enter the value by typing it in? If your code is looking at the string 'yes' and comparing it to the value of the Block Item which is in upper or mixed case, then 'yes' = 'Yes' or 'yes' = 'YES' will evaluate to FALSE instead of TRUE.
It is always a good idea to use a Poplist or a List of Values when you are expecting specific values to be entered by the user; this enables you to force the value to be entered the same by everyone. If the user CAN type the value in, then at least set the Case Restriction property to UPPER or LOWER so regardless of how the user enteres the value, it will be stored in the corrected case.
Craig...

How to set the number of records displayed at run time

Is it possible to set the number of records displayed block property at run time? The built-in 'GET_BLOCK_PROPERTY' can retrieve the number of RECORDS_DISPLAYED. But I can't find SET_BLOCK_PROPERTY to set this property. Is there anyway I can set this property programmatically? Thanks for any suggestions!

Bookmark Go to End
goal: How to vary the number of records displayed in a block
programmatically
fact: Oracle Forms Developer
fix:
Block property 'Number of Records Displayed' can not be changed during runtime
using SET_BLOCK_PROPERTY. However, it is still possible programmatically change
the visual appearance of the form so that it creates effect of changing this
property. To achieve such an effect follow these steps:
1. in Forms Builder, in the multirecord block define the new set of items.
The simplest way is to copy/paste the original item and rename created item.
2. set properties of these new items so that they are the same as the properties
of the original items. If these new items were copied from original items
then properties are already the same. Modify following properties
'Database item' on new items to value 'No'
'Synchronize with item' to the value of the original item
'Number of Items Displayed' to desired value.
'Visible' to 'No'
In other words, these new items are mirrors of original items.
3. code event, which is meant to trigger the change in block appearance.
This code should use SET_ITEM_PROPERTY built-in to set properties
like 'VISIBLE', 'ENABLED', 'NAVIGABLE', 'UPDATE_ALLOWED' and others
to desired value for items which are about to be displayed, then
move cursor to one of these just displayed items with GO_ITEM built-in
and then hide the previously displayed items.
Example:
Assume that the block is built on SCOTT.DEPT schema. Following will
change the set of displayed items
set_item_property('dept.mdeptno',visible,property_true);
set_item_property('dept.mdname',visible,property_true);
set_item_property('dept.mloc',visible,property_true);
set_item_property('dept.mdeptno',enabled,property_true);
set_item_property('dept.mdname',enabled,property_true);
set_item_property('dept.mloc',enabled,property_true);
set_item_property('dept.mdeptno',update_allowed,property_true);
set_item_property('dept.mdname',update_allowed,property_true);
set_item_property('dept.mloc',update_allowed,property_true);
set_item_property('dept.mdeptno',navigable,property_true);
set_item_property('dept.mdname',navigable,property_true);
set_item_property('dept.mloc',navigable,property_true);
go_item('dept.mdeptno');
set_item_property('dept.deptno',visible,property_false);
set_item_property('dept.dname',visible,property_false);
set_item_property('dept.loc',visible,property_false);
Regards,
Monica

Need some help in the login form ???!?!?!?!!

can any one help me with correcting the code or can any one give me another code for using it in the login form.
this is my problem:-
i had make a login form using in oracle 9i form builder >>>in this form i have three text boxes one for intering user name and the second one for entering the password and the third text box is not visible and it is used for counting the tries.
In addition i have a three buttons , one is for login and the two others are not visible and they are a show main menu button and a exit button. For login button i had put a WHEN-BUTTON-PRESSED trigger in the login button and it must check if the user name and the password match what it is on the login table so it allow the user to see the show main menu button otherwise if the user name or the password are wrong and has been putted wrong for 3 times of trying then it will show the exit button.
and this is a picture of the login form in the design view.
http://www.al7loh.com/uploader/uploads/login.JPG
and this is the code for theWHEN-BUTTON-PRESSED trigger on the login button
declare
     alertNum number;
dummy1 tbl_login.USER_NAME%type;
     dummy2 tbl_login.PASS%type;
begin
     select tbl_login.USER_NAME, tbl_login.PASS into dummy1, dummy2 from tbl_login where tbl_login.USER_NAME = :LOGIN.USER_NAME and
     tbl_login.PASS = :LOGIN.PASS;
     if :LOGIN.TRIES<3 then
     if sql%found
          then
          set_item_property('LOGIN.SHOW_MENU', visible, property_true);
                                                                           set_item_property('LOGIN.SHOW_MENU', enabled, property_true);
                                                                           else
                                                                           message ('Invalid password....try again');
                                                                           :LOGIN.TRIES := :LOGIN.TRIES+1;
                                                                           :LOGIN.USER_NAME := null;
                                                                           :LOGIN.PASS := null;
                                                                                end if;
     else
     message ('Exceeded Number of tries..press exit button');
          set_item_property('LOGIN.EXIT', visible, property_true);
               set_item_property('LOGIN.EXIT', enabled, property_true);
     end if;
     end;
can any one help me correcting the code of the WHEN-BUTTON-PRESSED trigger on the login form or can any one give me another code for using it in the login form.
i hope to get some help from the experts>>> ??!?!?!?!?!

Something like this
declare
alertNum number;
dummy1 tbl_login.USER_NAME%type;
dummy2 tbl_login.PASS%type;
begin
Begin
    select tbl_login.USER_NAME, tbl_login.PASS
    into   dummy1, dummy2
    from   tbl_login
    where tbl_login.USER_NAME = :LOGIN.USER_NAME
    and    tbl_login.PASS = :LOGIN.PASS;
    set_item_property('LOGIN.SHOW_MENU', visible, property_true);
    set_item_property('LOGIN.SHOW_MENU', enabled, property_true);
Exception
    When no_data_found Then
      if :LOGIN.TRIES<3 then
        message ('Invalid password....try again');
        :LOGIN.TRIES := :LOGIN.TRIES+1;
        :LOGIN.USER_NAME := null;
        :LOGIN.PASS := null;
        Go_Item( 'LOGIN.USER_NAME' ) ;
      else
        message ('Exceeded Number of tries..press exit button');
        set_item_property('LOGIN.EXIT', visible, property_true);
        set_item_property('LOGIN.EXIT', enabled, property_true);
      end if;
end;
end;Francois

Problem using OCX

Hi.
I'm using Oracle 10g , forms 6i, and I need capture picture through webcam.
If does anyone have one example , will be nice.
I found one exemple but doesn't work.
the code...
declare
numero number;
height number;
width number;
begin
-- COMMIT_FORM;
-- set_block_property('pessoas', default_where, 'id_pessoa ='||:pessoas.id_pessoa);
-- go_block('pessoas');
-- execute_query;
if get_item_property('controle.oc_img',visible) = 'FALSE' then
set_item_property('controle.oc_img',visible,property_true);
go_block('controle');
:parameter.p_camera :=:item('controle.oc_img').interface;
numero := videocap_dvideocap.ole_Start(:parameter.p_camera);
end if;
if get_item_property('pessoas.foto_camera',visible) = 'TRUE' then
set_item_property('pessoas.foto_camera',visible,property_false);
end if;
end;
but I have the error bad bind variable 'item('controle.oc_img').interface'
I´m using videocapdemosetup.exe..
thanks...

Hello,
An ActiveX control must be run in an STA apartment. Because the attribute [STAThread] is applied to the Main method of a WinForm class by default with a WinForms Project, the main thread of your app will run in STA mode. This is why your test no.1 works. However, if you want to use the ActiveX Controls in a programatically created thread, you need to set the thread to STA mode manually before you starting the thread:
o = New Thread(othr)
o.ApartmentState = System.Threading.ApartmentState.STA
o.Start()
Hope it helps,
Guangwei

Set item property

Dear All
Any one tell me. Can i use
SET_ITEM_PROPERTY('ALLAWANCES.TXT_TEST', VISIBLE, PROPERTY_TRUE);
in when list change trigger
thanks in advance
Regards,

Look up Set_item_property in the on-line help, at the very bottom, the section titled "Propagation of Property Changes". When you set Visible to false, Forms also sets these False: Enabled, Navigable, Queryable, Updateable and Update_Null.
So along with setting Visible to True, you also should set Enabled=True, Navigable=True, Queryable=True and Updateable=True, in that order.

Is this possible in Developer 6 ?

Hi
I am trying to build this piece of functionality in Developer 6.
It's been done in PowerBuilder before and we are converting the
application to Developer.
1. User clicks on a button on the screen.
2. The cursor changes into a cross
3. User can now draw a rectangle anywhere on the screen (with
the
'cross cursor' - click, drag the mouse to draw the rectangle (you
should see the rectangle lines as the mouse is moved, un-click.
4. Once, the rectagle is drawn, I would like to keep the X,Y
coordinates of the rectangle - top left corner (X,Y) and bottom
right corner (X,Y)
Thanks
Julian.
null

I can give you a couple of possibilities but I'm not sure either
one serves your purpose.
The first is the Show Palette property on an image item. When
this is set to yes a tool palette is displayed with the image at
runtime. One of the tools is a selection box similar to what you
describe. This is applicable only within an image item so I
doubt it will help.
The other option I can think of is to use event triggers to
create and display a box on screen. This solution uses a text
item with the background color set to the same as the canvas and
no bevel so it appears as a single line box. Initially the
item's visible property is set to No. The start and stop
coordinates of the box are stored as parameters and a parameter
is used to set a flag for tracking the mouse movements and
resizing the box or not.
Items Used:
YOUR_BOX Text item in data block YOUR_BLOCK.
STOP_X, STOP_Y, START_X, and START_Y are Parameters of data
type number.
TRACK is a Parameter of data type char.
WHEN_MOUSE_DOWN trigger
BEGIN
:PARAMETER.TRACK := 'Y';
SET_ITEM_PROPERTY ('YOUR_BLOCK.YOUR_BOX', VISIBLE,
PROPERTY_TRUE);
SET_ITEM_PROPERTY ('YOUR_BLOCK.YOUR_BOX', POSITION,
:SYSTEM.MOUSE_X_POS , :SYSTEM.MOUSE_Y_POS);
SET_ITEM_PROPERTY ('YOUR_BLOCK.YOUR_BOX', WIDTH, 1);
SET_ITEM_PROPERTY ('YOUR_BLOCK.YOUR_BOX', HEIGHT, 1);
:PARAMETER.START_Y := :SYSTEM.MOUSE_Y_POS;
:PARAMETER.START_X := :SYSTEM.MOUSE_X_POS;
SET_APPLICATION_PROPERTY (CURSOR_STYLE , 'CROSSHAIR');
END;
WHEN_MOUSE_MOVE Trigger
DECLARE
v_width number(3);
v_height number(3);
BEGIN
IF :PARAMETER.TRACK = 'Y' THEN
v_height := :SYSTEM.MOUSE_Y_POS - :PARAMETER.START_Y ;
v_width := :SYSTEM.MOUSE_X_POS - :PARAMETER.START_X;
SET_ITEM_PROPERTY ('YOUR_BLOCK.YOUR_BOX', HEIGHT,
v_height);
SET_ITEM_PROPERTY ('YOUR_BLOCK.YOUR_BOX', WIDTH,
v_width);
END IF;
END;
WHEN_MOUSE_UP Trigger
BEGIN
:PARAMETER.TRACK := 'N';
SET_ITEM_PROPERTY ('DEMO1_DETAIL.BOX', VISIBLE,
PROPERTY_FALSE);
:PARAMETER.STOP_Y := :SYSTEM.MOUSE_Y_POS;
:PARAMETER.STOP_X := :SYSTEM.MOUSE_X_POS;
SET_APPLICATION_PROPERTY (CURSOR_STYLE , 'DEFAULT');
END;
This solution gives you a box on screen with crosshair cursor
that you can resize and have access to the start and end
coordinates but it may not give you the display you want as far
as being transparent. It would be easy enough to enable this or
disable it based on pressing a button.
Good Luck!
Julian (guest) wrote:
: Hi
: I am trying to build this piece of functionality in Developer
6.
: It's been done in PowerBuilder before and we are converting
the
: application to Developer.
: 1. User clicks on a button on the screen.
: 2. The cursor changes into a cross
: 3. User can now draw a rectangle anywhere on the screen (with
: the
: 'cross cursor' - click, drag the mouse to draw the rectangle
(you
: should see the rectangle lines as the mouse is moved, un-click.
: 4. Once, the rectagle is drawn, I would like to keep the X,Y
: coordinates of the rectangle - top left corner (X,Y) and
bottom
: right corner (X,Y)
: Thanks
: Julian.
null

Multiple selection should enable the check box item next to the field

Hi,
I want multiple selection for " Environment" field in the Form. Once muliple values are selected, user needs to see a checkbox next to all the values selected in Environment field.
Checkbox field should be called as ' Implemented'.
For ex. In Environment Field, I selected three values, I should see checkbox against each selected environments:
col 1:I Environment col:2 Implemented
Env1 X
Env2 X
Env2 X
X-> refers to checkbox.
Please suggest something if anyone have tried this one.
Thanks in advance.
Regards,
Ramya

hello Ramya,
In Environment Field, I selected three values, I should see checkbox against each selected environmentsyou can write Post-Change trigger or When-Validate-Item trigger on Column 1 say: txt_environment and in the trigger, write down the following code
          set_item_property('BLOCK.TXT_CHECKBOX',VISIBLE,PROPERTY_TRUE);
          set_item_property('BLOCK.TXT_CHECKBOX',ENABLED,PROPERTY_TRUE);
          set_item_property('BLOCK.TXT_CHECKBOX',NAVIGABLE,PROPERTY_TRUE);
If someone's response is helpful or correct, please mark it accordingly.

Moving Item

Hi Guyz,
I have one display item on my block i would like to extend the size of that item from 0 to 200 after reach to 200 i would like to show a stacked canvas. and one more button on stacked canvas Hide. when i pressed this button this will hide the stacked canvas and then decrease the size of that display item from 200 to 0 then hide of this item how can i perform this task can some one give me a good example with some syntax
Regards

Hi Andreas,
I m not using any timer for this just simple i wrote the below code on when-button-pressed trigger
DECLARE
BAR NUMBER := 0;
BAR_STEP NUMBER;
VW_ID VIEWPORT;
BEGIN
SET_ITEM_PROPERTY('EMPLOYEE.BAR',VISIBLE,PROPERTY_TRUE);
BAR_STEP := 5000;
FOR I IN 1 .. 1350000 LOOP
IF(MOD(I,BAR_STEP) = 0)THEN
BAR := BAR - 2;
SET_ITEM_PROPERTY('EMPLOYEE.BAR',WIDTH,BAR);
SYNCHRONIZE;
END IF;
END LOOP;
SET_ITEM_PROPERTY('EMPLOYEE.BAR',VISIBLE,PROPERTY_FALSE);
VW_ID :=FIND_VIEW('CONTROL');
SET_VIEW_PROPERTY(VW_ID,VIEWPORT_X_POS,22);
SET_VIEW_PROPERTY(VW_ID,VIEWPORT_Y_POS,361);
SET_VIEW_PROPERTY(VW_ID,VISIBLE,PROPERTY_TRUE);
END;
and in When-new-form instance.
SET_ITEM_PROPERTY('EMPLOYEE.BAR',WIDTH,0);
SET_ITEM_PROPERTY('EMPLOYEE.BAR',VISIBLE,PROPERTY_FALSE);
and this is my testing purpose i didnt use this on realtime.
Regards
Moazam Shareef

I have a problem with text item

hii all,
i have a list item.. in this list item i have a two list item value
1- visa ,list elements visa
2- cash ,list elements cash
i need when user select visa from list item then appear text item (visa_number)
i change item visa_number visible to no
that's my code i write it
trigger
when-list-changed
IF :RESERVATION.PAY_METHOD = 'visa'THEN
     SET_ITEM_PROPERTY('RESERVATION.VISA_NUMBER',VISIBLE,PROPERTY_TRUE);
     SET_ITEM_PROPERTY('RESERVATION.VISA_EXPIRE',VISIBLE,PROPERTY_TRUE);
ELSE
SET_ITEM_PROPERTY('RESERVATION.VISA_NUMBER',VISIBLE,PROPERTY_FALSE);
SET_ITEM_PROPERTY('RESERVATION.VISA_EXPIRE',VISIBLE,PROPERTY_FALSE);
END IF;and items appear and disappear fine
my problem is when i select from list item visa element items is appear but i can't write any thing in this item and my item is text item not a display item
Thank's all

already it's true but when i change my code to
IF :RESERVATION.PAY_METHOD = 'ÝíÒÇ'THEN
     SET_ITEM_PROPERTY('RESERVATION.VISA_NUMBER',VISIBLE,PROPERTY_TRUE);
     SET_ITEM_PROPERTY('RESERVATION.VISA_EXPIRE',VISIBLE,PROPERTY_TRUE);
     SET_ITEM_PROPERTY('RESERVATION.VISA_NUMBER',ENABLED,PROPERTY_TRUE);
     SET_ITEM_PROPERTY('RESERVATION.VISA_EXPIRE',ENABLED,PROPERTY_TRUE);
ELSE
SET_ITEM_PROPERTY('RESERVATION.VISA_NUMBER',VISIBLE,PROPERTY_FALSE);
SET_ITEM_PROPERTY('RESERVATION.VISA_EXPIRE',VISIBLE,PROPERTY_FALSE);
SET_ITEM_PROPERTY('RESERVATION.VISA_EXPIRE',ENABLED,PROPERTY_TRUE);
END IF;it's working
Thank's all

I want to show movable image on form like data loding symbol

Dear All, I am working on developer2000 6i version I want to show movable image on form like data loding symbol.currently i have taken .GIF Image but it is not moving so is there any way to do the same. oracle 10g forms 6i version Faizan

Hi Faizan,
          Even i work on D2K (Forms 6i). I have tried this below & found the result.
     Its true that you can not add animated image. But you can definitely show a data loading symbol in code.
     Add 2 different contrast colours and choose a striped pattern.
1) Create a text item with a lengthy rectangle (width minimum of 300).
2) Create a visual attribute for it with desired colours.
3) Finally add the following in between your code.
Your Code
set_item_property('YOUR_BLOCK.TEXT_ITEM',visible,property_true);
   set_item_property('YOUR_BLOCK.TEXT_ITEM', width,2);
Your Code
tot_wid:= get_item_property('YOUR_BLOCK.TEXT_ITEM', width);
Your Code
set_item_property('BLOCK3.PROGBAR', width,100);
Your Code
set_item_property('BLOCK3.PROGBAR', width,300);
Message('Data Loading is completed');
Try this out and let me know if its working as you expected & also let me know if there is a problem.

SET_ITEM_PROPERTY(':blk_update_pol.exgratia',visible,property_true);

Similar Messages

Maybe you are looking for