Set_XXX_Property Build-Ins

最新推荐文章于 2025-02-08 15:57:47 发布

iteye_21199

最新推荐文章于 2025-02-08 15:57:47 发布

阅读量301

点赞数

文章标签：数据库

本文详细介绍了 Oracle Forms 中各种内置属性设置方法，包括 set_item_property 和 set_item_instance_property 的区别及应用场景。通过实例展示了如何根据不同的条件动态调整界面元素的可见性和可编辑性。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

Build-In List

· SET_APPLICATION_PROPERTY
· SET_BLOCK_PROPERTY
· SET_CANVAS_PROPERTY
· SET_FORM_PROPERTY
· SET_ITEM_PROPERTY
· SET_ITEM_INSTANCE_PROPERTY
· SET_LOV_PROPERTY
· SET_MENU_ITEM_PROPERTY
· SET_PARAMETER_ATTR
· SET_RADIO_BUTTON_PROPERTY
· SET_RECORD_PROPERTY
· SET_RELATION_PROPERTY
· SET_REPORT_OBJECT_PROPERTY
· SET_TAB_PAGE_PROPERTY
· SET_VIEW_PROPERTY
· SET_WINDOW_PROPERTY

Example

set_item_property

begin
if :<block_name>.<chk_name>='Y' then
set_item_property('<block_name>.<list_item_name>',VISIBLE/UPDATEABLE,PROPERTY_TRUE);
else
set_item_property('<block_name>.<list_item_name>',VISIBLE/UPDATEABLE,PROPERTY_FALSE);
end if;
end;

app_item_property.set_property ('<block_name>.<list_item_name>', enabled/enterable, property_on);

set_block_property

set_block_property ('<block_name>', query_allowed/update_allowed/delete_allowed, property_true);

SET_LOV_PROPERTY

SET_LOV_PROPERTY('inv_serial_lov', GROUP_NAME, 'inv_serial18');

Set_Record_Property

/*
** Built-in: SET_RECORD_PROPERTY
** Example: Mark the third record in the EMP block as if it
** were a queried record.
*/
BEGIN
Set_Record_Property( 3, ’EMP’, STATUS, QUERY_STATUS);
END;

-----------------------------------------------------------------------------------------------------------------------

Difference Between Set_Item_Instance_Property and Set_Item_Property
SET_ITEM_PROPERTY：Block中的所有Records
SET_ITEM_INSTANCE_PROPERTY:对当前Record起作用

If you want to turn fields 'on' and 'off' depending on information in a row then use 'set_item_instance_property(enterable)' in the Post_Query trigger on the block

IF :BLK_DISPLAY.METER_TYPE_ID = 'H' THEN
SET_ITEM_INSTANCE_PROPERTY('BLK_DISPLAY.MILES',CURRENT_RECORD,VISUAL_ATTRIBUTE,'VA_DISPLAY_ONLY');
SET_ITEM_INSTANCE_PROPERTY('BLK_DISPLAY.MILES',CURRENT_RECORD,NAVIGABLE,PROPERTY_FALSE);
SET_ITEM_INSTANCE_PROPERTY('BLK_DISPLAY.MILES',CURRENT_RECORD,UPDATE_ALLOWED,PROPERTY_FALSE);
SET_ITEM_INSTANCE_PROPERTY('BLK_DISPLAY.HOURS',CURRENT_RECORD,VISUAL_ATTRIBUTE,'VA_UPDATE');
SET_ITEM_INSTANCE_PROPERTY('BLK_DISPLAY.HOURS',CURRENT_RECORD,NAVIGABLE,PROPERTY_TRUE);
SET_ITEM_INSTANCE_PROPERTY('BLK_DISPLAY.HOURS',CURRENT_RECORD,UPDATE_ALLOWED,PROPERTY_TRUE);
ELSIF :BLK_DISPLAY.METER_TYPE_ID = 'M' THEN
SET_ITEM_INSTANCE_PROPERTY('BLK_DISPLAY.MILES',CURRENT_RECORD,VISUAL_ATTRIBUTE,'VA_UPDATE');
SET_ITEM_INSTANCE_PROPERTY('BLK_DISPLAY.MILES',CURRENT_RECORD,NAVIGABLE,PROPERTY_TRUE);
SET_ITEM_INSTANCE_PROPERTY('BLK_DISPLAY.MILES',CURRENT_RECORD,UPDATE_ALLOWED,PROPERTY_TRUE);
SET_ITEM_INSTANCE_PROPERTY('BLK_DISPLAY.HOURS',CURRENT_RECORD,VISUAL_ATTRIBUTE,'VA_DISPLAY_ONLY');
SET_ITEM_INSTANCE_PROPERTY('BLK_DISPLAY.HOURS',CURRENT_RECORD,NAVIGABLE,PROPERTY_FALSE);
SET_ITEM_INSTANCE_PROPERTY('BLK_DISPLAY.HOURS',CURRENT_RECORD,UPDATE_ALLOWED,PROPERTY_FALSE);
END IF;