forms fields not getting disabled in mouse click (merged) [message #502900] |
Mon, 11 April 2011 08:15 |
|
ariffcal
Messages: 107 Registered: April 2011
|
Senior Member |
|
|
I am using the below code to disable forms field in fdtlblk.mdt_rqr = 'NO'
but I can go there with mouse click ( for tab and enter it is working fine ) .
but for mouse click it is not working .
if (:fdtlblk.mdt_rqr = 'NO') then
go_item('fdtlblk.section_loss');
set_item_property('FUP_RCVD_DT',enabled,property_false);
set_item_property('stc_nncc_no',enabled,property_false);
set_item_property('MDT_RQST_DT' ,enabled,property_false);
set_item_property('DT_OF_APPRVL',enabled,property_false);
set_item_property('DT_MDT_TC' ,enabled,property_false);
set_item_property('RELEVANT_PR',enabled,property_false);
else
if (:fdtlblk.mdt_rqr = 'YES') then
go_item(':fdtlblk.FUP_RCVD_DT');
set_item_property('FUP_RCVD_DT',enabled,property_true);
set_item_property('stc_nncc_no',enabled,property_true);
set_item_property('MDT_RQST_DT' ,enabled,property_true);
set_item_property('DT_OF_APPRVL',enabled,property_true);
set_item_property('DT_MDT_TC' ,enabled,property_true);
set_item_property('RELEVANT_PR',enabled,property_true);
end if;
end if;
PROCEDURE HIDE_AN_ITEM (item_name VARCHAR2, hide_it BOOLEAN) IS
it_id Item;
res number;
BEGIN
it_id := Find_Item (item_name);
IF NOT Id_Null (it_id) THEN
IF hide_it THEN
Set_Item_Property (it_id, VISIBLE, PROPERTY_FALSE);
ELSE
Set_Item_Property (it_id, VISIBLE, PROPERTY_TRUE);
Set_Item_Property (it_id, ENABLED, PROPERTY_TRUE);
Set_Item_Property (it_id, NAVIGABLE, PROPERTY_TRUE);
IF Get_Item_Property(it_id, ITEM_TYPE) != 'BUTTON' THEN
Set_Item_Property (it_id, UPDATE_ALLOWED, PROPERTY_TRUE);
END IF;
END IF;
END IF;
EXCEPTION
WHEN LOGIN_DENIED THEN
RAISE LOGIN_DENIED;
WHEN OTHERS THEN
Put a message here
RAISE LOGIN_DENIED;
END;
|
|
|
|