实现弹出窗口、list列表、背景颜色
- 如何实现弹出窗口
- 如何使用highlight
- 设置单个item的背景颜色
- 怎样实现List功能。
定义消息：
fnd_message.clear;
fnd_message.set_string('删除记录'|| :packing_header.packing_number ||
'吗？');
IF NOT (fnd_message.warn) THEN
RAISE form_trigger_failure;
END IF;
清除记录的时候用block级别的那个trigger：
例子： 在块级别的trigger的 KEY-DELREC 中添加代码
fnd_message.clear;
fnd_message.set_string('你确定要删除'||:main.txn_id ||'这条记录吗？');
IF NOT (fnd_message.warn) THEN
RAISE form_trigger_failure;
else
Delete_Record;
END IF;
1. 先定义一个Visual Attributes 如Red_color，yellow_color
2. 设置Red_Color的属性为红色
在对应的触发器里面调用，就可以使记录的颜色或者背景色，字段变成自己定义的属性。
app_record.highlight('RED_COLOR');
例子：
PROCEDURE color IS
BEGIN
IF :MAIN.STATUS = 'E' THEN
app_record.highlight('RED_COLOR');
ELSIF :MAIN.STATUS = 'W' THEN
app_record.highlight('YELLOW_COLOR');
ELSIF :MAIN.STATUS IN ('P', 'S') THEN
app_record.highlight('OLD_COLOR');
END IF;
END;
在post-query中调用，如果要批量提交，则应该在循环中应用
例子：
PROCEDURE color IS
BEGIN
IF :MAIN.STATUS = 'E' THEN
-- app_record.highlight('RED_COLOR');
set_item_instance_property('MAIN.STATUS',
To_Number(:SYSTEM.TRIGGER_RECORD),
VISUAL_ATTRIBUTE,
'RED_COLOR');
ELSIF :MAIN.STATUS = 'W' THEN
--app_record.highlight('YELLOW_COLOR');
set_item_instance_property('MAIN.STATUS',
To_Number(:SYSTEM.TRIGGER_RECORD),
VISUAL_ATTRIBUTE,
'YELLOW_COLOR');
ELSIF :MAIN.STATUS IN ('P', 'S') THEN
--app_record.highlight('OLD_COLOR');
set_item_instance_property('MAIN.STATUS',
To_Number(:SYSTEM.TRIGGER_RECORD),
VISUAL_ATTRIBUTE,
'OLD_COLOR');
END IF;
END;
例子：
在对应的item中加入trigger ，when-list-changed
BEGIN
IF :MAIN.business_type = 'MISC_IN' THEN
:MAIN.transaction_type_id := 41;
ELSE
:MAIN.transaction_type_id := 31;
END IF;
END;
来自 “ ITPUB博客 ” ，链接：https://blog.itpub.net/27424626/viewspace-742074/ ，如需转载，请注明出处，否则将追究法律责任。
