ORACLE EBS FORM二次开发整理.docx

《ORACLE EBS FORM二次开发整理.docx》由会员分享，可在线阅读，更多相关《ORACLE EBS FORM二次开发整理.docx（7页珍藏版）》请在三一办公上搜索。

1、ORACLE EBS FORM二次开发整理一、开始开发标准FORM 1. 输出不必要的BLOCKNAME，DETAILBLOCK。 2. 修改触发器:PRE-FORM FND_STANDARD.FORM_INFO(版本号，名称，模块，日期，作者)； APP_WINDOW.SET_WINDOW_POSITIN(第一个窗口名称,FIRST_WINDOW); FND_ORG.CHOOSE_ORG；选择组织 APP_WINDOW.SET_TITLE(窗体名称，:global.org_code)； 3. 修改程序单元：app_customer:close_window 4. 编译 f60gen modu

2、le=/porcli/applmgr/1159/au/11.5.0/forms/ZHS/IAQTEST01.fmb userid=apps/simple4u output_file=/porcli/applmgr/1159/inv/11.5.0/forms/ZHS/IAQTEST01.fmx module_type=form batch=no compile_all=yes f60gen apps/ pre_insert, pre_update中加入代码：fnd_standard.set_who 二、QUERY FIND 制作 一. 把APPSTAND 的QUERY FIND 对象组拉到 开发

3、的FORM上，选择子类。 二. 在目的数据块的添加QUERY FIND ，然后修改代码 app_find.query_find (block_window VARCHAR2, -目的数据块 find_window VARCHAR2, -查询窗口 find_block VARCHAR2) -查询数据块 4在QUERY FIND里面添加文本项等查询内容。 3在目的数据块添加PRE-QUERY(BLOCK LEVEL)，添加代码如下： IF :parameter.G_query_find = TRUE THEN APP_FIND.QUERY_RANGE(:QUERY_FIND.CDATE_FROM,

4、 :QUERY_FIND.CDATE_TO, MAIN.CREATION_DATE); APP_FIND.QUERY_RANGE(:QUERY_FIND.ITEM_FROM, :QUERY_FIND.ITEM_TO, MAIN.SEGMENT1); APP_FIND.QUERY_RANGE(:QUERY_FIND.DESC_FROM, :QUERY_FIND.DESC_TO, MAIN.DESCRIPTION); :parameter.G_query_find := FALSE; END IF; 三、FOLDER 制作 1. 添加附加程序库： APPFLDR.pll. 2. 把APPSTAND

5、 的STANDARD FOLDER 对象组拉到 开发的FORM上，选择子类。 3. 在目的画布上画一个堆叠画布，之类信息选择CANVAS_STACKED。 4. 创建一个数据块，作为创建数据块的FOLDER使用，子类信息选择BLOCK。 5. 把需要放到FOLDER的数据项放到堆叠画布上，把这些数据项的提示全部去掉，然后给每一个数据项创建一个提示，提示用显示项做，子类信息选择FOLDER_PROMPT_MULTIROW，显示项名称和对应的数据项名称必须相同。 6. 创建三个按钮，名称分别是ORDER_BY1,ORDER_BY2,ORDER_BY3,之类信息选择之类信息选择FOLDER_ORDE

6、R_BY,把这三个按钮放在堆叠画布上。 7. 在原来画布上创建一个FOLDER_OPEN按钮，之类信息选择FOLDER_OPEN。 8. 在原来画布上创建一个FOLDER_TITLE显示项，之类信息选择DYNAMIC_TITLE。 9. 在新建的数据块上创建一个FOLDER_DUMMY,之类信息选择FOLDER_DUMMY。 10. FOLDER_ACTION触发器的代码修改，修改如下： -message(You must modify the FOLDER_ACTION trigger in your form!); app_folder.event(:global.folder_actio

7、n); 11. 修改WHEN-NEW-FORM-INSTANCE代码，修改如下： app_folder.define_folder_block app_folder.event(INSTANTIATE); 12. 把APPSTAND的SAMPLE_FOLDER数据块的TRIGGER全部靠到原来数据库上。 (添加块的trigger。新增Pre-Query、Post-Query、Key-Prev-Item、Key-Next-Item、Key-ExeQry 、 Key-EntQry、When-New-Record-Instance、Post-Block、Pre-Block，When-New-Bloc

8、k-Instance, Key-Prvrec,Key-Nxtrec, Key-Clrblk, Key-Clrrec, Query_Find以上Trigger均直接 引用标准Standard Trigger ,如:app_folder.event(KEY-PREV-ITEM); ) 四、DATE的使用 1. ITEM的LOV属性选择ENABLE_LAMP_LIST 2. LOV for Validation属性选择false 3. 增加Item级trigger:key_listvalue calendar.show; 4. 并注意时间的长度格式 五、FND_ORG.CHOOSE_ORG的使用 注

9、：FND_ORG.CHOOSE_ORG 需要创建的参数： CHART_OF_ACCOUNTS_ID(Number) ORG_NAME(Char) ORG_CODE(Char) ORG_ID(Number) 六、说明性弹性域使用 1. 注册table以及column 利用ad_dd package begin ad_dd.register_table(p_appl_short_name=CUS , p_tab_name = actuant_task_lists_all, p_tab_type = T ); end; begin ad_dd.register_column(p_appl_short

10、_name =CUS , p_tab_name = actuant_task_lists_all, p_col_name =ATTRIBUTE9 , p_col_seq = 9, p_col_type =VARCHAR2 , p_col_width =250 , p_nullable = Y, p_translate = N); end; 2. Application中Flex Table的定义 Application Developer GUIFlexfieldDescriptiveRegister 3. 增加Item 属性继承text_item_desc_flex,并显示于canvas上

11、4. 增加一些标准trigger FORM LEVEL a.定义flex的trigger when_new_form_instance FND_DESCR_FLEX.DEFINE(BLOCK=ACTUANT_TASK_LISTS_ALL, FIELD=DESC_FLEX, APPL_SHORT_NAME =CUS, DESC_FLEX_NAME =Actuant Header Flex); b. PREQUERY FND_FLEX.EVENT(PRE-QUERY); c. POSTQUERY FND_FLEX.EVENT(POST-QUERY); d. PREINSERT FND_FLEX.E

12、VENT(PRE-INSERT); e. PREUPDATE FND_FLEX.EVENT(PRE-UPDATE); f. WHENVALIDATERECORD FND_FLEX.EVENT(WHEN-VALIDATE-RECORD); g. WHENNEWITEMINSTANCE FND_FLEX.EVENT(WHEN-NEW-ITEM-INSTANCE); 5. 弹性栏位的开启和编译 七、关键性弹性域使用 1. 添加代码，ID，描述3个项，继承TEXT_ITEM子类 2. 增加一些标准trigger FORM LEVEL a.定义flex的trigger when_new_form_ins

13、tance fnd_key_flex.define( BLOCK = CONTRACTS, field = SUB_CODE, id = SUB_ID, description = SUB_DESC, appl_short_name = SQLGL, code = GL#, num = nvl(to_number(fnd_profile.VALUE(MFG_CHART_OF_ACCOUNTS_ID), -1), -STRUCTURE Number required = N, validate = FULL, usedbflds = N); b. PREQUERY FND_FLEX.EVENT(

14、PRE-QUERY); c. POSTQUERY FND_FLEX.EVENT(POST-QUERY); d. PREINSERT FND_FLEX.EVENT(PRE-INSERT); e. PREUPDATE FND_FLEX.EVENT(PRE-UPDATE); f. WHENVALIDATERECORD FND_FLEX.EVENT(WHEN-VALIDATE-RECORD); g. WHENNEWITEMINSTANCE FND_FLEX.EVENT(WHEN-NEW-ITEM-INSTANCE); 3. 弹性栏位的开启和编译 八、Special菜单的制作 1. 增加一个User_N

15、amed的trigger,并改名SPECIALn（1=n=15) 2. 在PREFORM中调用app_special.instantiate 来注册菜单项 app_special.instantiate(SPECIAL1, Approve, , FALSE); parameter2: Special上显示的字，可以其他方式得到 3. 在PRE-BLOCK 或PRE-RECORD 中调用app_special.enable 启 用或屏蔽菜单项，或者其他trigger: app_special.enable(SPECIAL1, property_on); 4. 在specialn的trigger里面写要得代码 请求日期INV_SRS_DATE_STANDARD :$PROFILES$.GL_SET_OF_BKS_ID 科目GL_SRS_LEDGER_FLEXFIELD