基本上Form个性化可以做到的,Custom.pll都能做到。
使用哪个来二次开发,取决于你客户化需求的复杂度。简单的客户化开发优先考虑Form Personalization,如果涉及到复杂的业务逻辑才考虑用Custom.pll,因为Custom.pll可以使用PL/SQL编程,并且可以直接调用Program Units,或Form的Built-in。
Form Personalization和Custom.pll都是事件驱动,同一个Event,Form Personalization会先被触发,然后是Custom.pll。Custom.pll支持的Events:
ZOOM
WHEN-NEW-FORM-INSTANCE
WHEN-NEW-BLOCK-INSTANCE
WHEN-NEW-RECORD-INSTANCE
WHEN-NEW-ITEM-INSTANCE
WHEN-VALIDATE-RECORD
缺点:CUSTOM.PLL是标准的library, 不管是调试还是其他,都会影响到全局。
解决办法:复制一份CUSTOM.PLL,起名XX_CUSTOM.PLL,并将包和包体名称改为XX_CUSTOM,
将XX_CUSTOM.PLL加载到CUSTOM.PLL下( 用form builder打开custom.pll在Attached Libraries里面加上xx_custom.pll)。然后在custom.pll的event 里面写代码:xx_custom.event(event_name); 。这样,我们的客户化代码都可以放在xx_custom.pll这个library里面,降低了风险。
下面通过一个简单的例子,将采购订单的“采购单,版次”标签改为“采购单”,了解CUSTOM.PLL的个性化开发。
Step1. 复制一份custom.pll ,起名为aa_custom.pll, 并将包和包体名称改为AA_CUSTOM
Step2. 在Event中添加触发事件和执行代码
package body aa_custom is
procedure event(event_name varchar2) is
form_name varchar2(30):= name_in('system.current_form');
begin
if form_name = 'POXPOEPO' and event_name = 'WHEN-NEW-FORM-INSTANCE' then
SET_ITEM_PROPERTY('PO_HEADERS.SEGMENT1',PROMPT_TEXT,'採購單');
end if;
end event;
end aa_custom;
–如果要使用app_item_property.set_property 内置函数则需要将APPCODE.PLL加载到AA_CUSTOM.PLL
(用form builder打开AA_CUSTOM.PLL,在Attached Libraries 里面加上APPCODE.PLL)
–同样,如果要使用fnd_message.set_string() 以及fnd_message.show; 则要将FNDSQF.PLL加载到AA_CUSTOM.PLL
Step3. 把AA_CUSTOM.PLL加载到custom.pll 下, 并在custom.pll中调用AA_CUSTOM.PLL
Step4.上传和编译AA_CUSTOM.PLL 和CUSTOM.PLL, R11编译代码:
f60gen Module=$AU_TOP/resource/AA_CUSTOM.pll Userid=apps/apps Module_Type=LIBRARY output_file=$AU_TOP/resource/AA_CUSTOM.plx
编译完成之后要重新登录EBS系统才能够看到效果。
最后补充:每次更改完AA_CUSTOM.PLL 文件之后,都要删除CUSTOM.PLL 文件附加库中的AA_CUSTOM.PLL文件,再把最新的AA_CUSTOM.PLL文件附加到CUSTOM.PLL文件的附加库里面。同时上传和编译CUSTOM.PLL 文件和AA_CUSTOM.PLL 文件,而不是只需要编译CUSTOM.PLL文件。