首页 > 代码库 > 使用Form Builder创建Form具体步骤
使用Form Builder创建Form具体步骤
使用Oracle Form Builder创建Form具体步骤
(Data Source为Table)
- 说明:当Block使用的Data Source为Table时,Form会自动Insert,Update,Delete,Lock。若要显示non-database Item,需在POST-QUERY Trigger 里手动写代码来为non-database Item取值。
步驟一:分析需求设计Table架构
- 1). Table需指定一Unique ID,可为其创建Unique Index,在Form里通过Sequence 为其赋值。
- 2). Table和Sequence 创建在指定客制Owner下 (如CUX) 。
- 3). 命名规则:XX+模组名称开头,Sequence名在Table名后加“_S”
如Table名:CUX.XXPO_PO_HEADERS
Sequence名:CUX.XXPO_PO_LINES_S - 4). Table要有以下5个栏位(参考系统标准表):
CREATED_BY
CREATION_DATE
LAST_UPDATED_BY
LAST_UPDATE_DATE
LAST_UPDATE_LOGIN - 5). 在APPS下为客制Owner (如CUX) 的Table和Sequence创建Synonym (同义词) 。
步驟二:套用Form模板TEMPLATE.fmb
- 1). 将Template File开启并并另存新档 (可放在不同目录) 。
- 2). 将模板提供的空Block、Canvas和Window删除 (名称为BLOCKNAME和DETAILBLOCK) 。
步驟三:建立Block、Window、Canvas、LOV
- 1). 新建Data Block (建议先手动新增,重命名后再使用Data Block Wizard创建)
可与Table名相同,如名称为:XXPO_PO_HEADERS - 2). 新建Window、Canvas (建议先手动新增,重命名后再使用Layout Wizard创建)
建议Window和Canvas的名称与对应Block一样。 - 3). 将Canvas对应的视窗指定到Canvas的Window属性。
- 4). 将Window的Primary Canvas属性指定对应的Content Canvas。
- 5). 使用Date BlockWizard创建Data Block
- 6). 使用LayoutWizard创建Window、Canvas
- 7). 新建LOV (建议先手动新增,重命名后再使用LOV Wizard创建)
- 8). 将所有物件套用Subclass(Item: 要显示在Canvas上的Item套用即可)。
- 9). 建立INDICATOR栏位,套用Subclass:CURRENT_RECORD_INDICATOR。
- 10). 设置Window的Title属性,用于显示视窗左上角的标题。
步驟四:修改必要属性及代码设置
- 1). 设置Form的First Navigation Data Block属性为第一个要开启的Data Block
如:XXPO_PO_HEADERS - 2). 在Form Trigger:PRE-FORM 修改
app_window.set_window_position(‘<First_Window>‘,‘FIRST_WINDOW‘);
如app_window.set_window_position(‘XXPO_PO_HEADERS‘, ‘FIRST_WINDOW‘);
- 3). 在Program Unit:APP_CUSTOM 修改Close_Window
if (wnd = ‘<First_Window>‘) then
app_window.close_first_window; …
如:if (wnd = ‘ XXPO_PO_HEADERS ‘) then …
步驟五:在系统打开Form 时让User选择Organization
- 1). 先決條件:先建立四個Parameter:
CHART_OF_ACCOUNTS_ID(NUMBER)
ORG_NAME(CHAR 240)
ORG_CODE(CHAR 30)
ORG_ID(NUMBER) - 2). 在Form的Trigger:PRE-FORM加入
Procedure:FND_ORG.CHOOSE_ORG; - 3). 修改Window的Title属性为进入该视窗时左上角显示的标题:
在Block的WHEN-NEW-BLOCK-INSTANCETrigger 加入
如:app_window.set_title(‘XXPO_PO_HEADERS‘, :parameter.org_code); - 4). 给ORGANIZATION_ID赋值:
在Block的Trigger:PRE-INSERT 写入
如::XXPO_PO_HEADERS.ORGANIZATION_ID:= :parameter.org_id;
步驟六:使用Sequence为Table的UniqueID赋值
- 1). 在Block的Trigger:PRE-INSERT 写入以下程序
如:select XXPO_PO_HEADERS_S.NEXTVAL
into :XXPO_PO_HEADERS.XXPO_HEADER_ID
from dual;
步驟七:给CREATED_BY 、LAST_UPDATED_BY等栏位赋值
- 方式有二:分前端、後端。
- 1). 前端:
在PRE-INSERT、PRE-UPDATE這兩個Block Trigger中,寫入:
Fnd_Standard.Set_Who;即可。 - 2). 後端:
Fnd_Global.User_ID 即為取得建立者 or 異動者。
步驟八:日期型栏位使用日历
- 1). 將Data Field的List of Values屬性值設定為ENABLE_LIST_LAMP。
- 2). 將Data Field的Validate from List屬性值設定為No。
- 3). 在Data Field的KEY-LISTVAL Item Trigger(Override)中,寫入Calendar.show;
声明:以上内容来自用户投稿及互联网公开渠道收集整理发布,本网站不拥有所有权,未作人工编辑处理,也不承担相关法律责任,若内容有误或涉及侵权可进行投诉: 投诉/举报 工作人员会在5个工作日内联系你,一经查实,本站将立刻删除涉嫌侵权内容。