标签:
一、处理错误 
1.当错误出現在Oracle Form PL/SQL中时,处理的方法如下:
begin
  if (err_condition) then
    fnd_message.set_name(appl_short_name, message_name);
    fnd_message.error;
    raise form_trigger_failure;
  end if;
end;
2.当错误出现在Stored Procedure中時,处理的方法如下:
begin
  if (err_condition) then
    fnd_message.set_name(appl_short_name, message_name);
    app_exception.raise_exception;
  end if;
end;
3.当我们在测试FORM_SUCCESS,FORM_FAILURE和FORM_FATAL的时候,可能触发了目地的子程序而导致它们的值发生改变,例如下面这个例子:
begin
  go_item(‘emp.empno’);
  if from_failure then
    raise form_trigger_failure;
  end if;
end;
GO_ITEM引起其它的触发器触发,比如WHEN-NEW-ITEM-INSTANCE,尽管GO_ITEM可能执行失败,但是后面的Trigger有可能执行成功,这就意味著FROM_FAILURE是失效的,为了避免这种情況发生,可以改为下面这样:
begin
  go_item(‘emp.empno’);
  if :system.cursor_item != ‘emp.empno’ then
    raise form_trigger_failure;
  end if;
end;
4.避免使用RAISE_APPLICATION_ERROR,因为它与我们使用的进程服务的设置有冲突 
5.不要使用CALL_FORM,你可以使用FND_FUNCTION.EXECUTE来代替CALL_FORM或是OPEN_FORM 
二、在Oracle Application中使用PL/SQL中需要注意的地方 
1.使用select … from dual来代替select … from sys.dual; 
2.只返回一行的Select查询要处理NO_DATA_FOUND例外,INSERT、UPDATE、DELETE不会产生这个例外,要使用SQL%NOTFOUND来检查是否有数据
三、Triggers in Forms  
1.所有的BLOCK或是FIELD的TRIGGER的执行类型都是Override或是Before,一般情況下,使用的是Before类型,因为通常相同的Trigger在FORM层級同样也会触发。这个例外是如果彈性域调用了Form层次的POST-QUERY,但是你在BLOCK的POST-QUERY中重置了这个块的查询状态,像这种情況,BLOCK块的POST-QUERY必须将执行类型设置为After
四、使用APPCORE来代替Oracle Forms Built-In, APPCORE包含了一些等同于Oracle Forms built-ins的功能 
1.EXIT_FORM不要直接使用EXIT_FROM,应该始终使用do_key(‘EXIT_FORM’),如果需要退出整个Oracle applications suite,应该首先调用copy(‘Y’,’GLOBAL.APPCORE_EXIT_FLAG’);然后再调用Do_key(‘EXIT_FORM’);  
2.SET_ITEM_PROPERTY使用APP_ITEM_PROPERTY.SET_PROPERTY和APP_ITEM_PROPERTY.SET_VISUAL_ATTRIBUTE来代替
3.GET_ITEM_PROPERTY使用APP_ITEM_PROPERTY.GET_PROPERTY来代替
4.OPEN_FORM使用FND_FUNCTION.EXECUTE来代替
5.CLEAR_FORM使用do_key(‘CLEAR_FORM’)来代替 
6.COMMIT使用do_key(‘COMMIT_FORM’)来代替
7.EDIT_FIELD使用do_key(‘EDIT_FIELD’)来代替,这个程序当当前的ITEM是DATE时弹出Calendar
8.VALIDATE使用APP_STANDARD.APP_VALIDATE来代替  
五、Coding Table handlers
六、设置物件的属性
1.Canvas的大小最大只能设置到高5inch、宽7.8inch,目的是为了更好的适应客户端的环境  
2.使用APP_CUSTOM.OPEN_WINDOW和APP_CUSTOM.CLOSE_WINDOW來打开和关闭window,不过使用go_block也可以达到打开window的功能
3.APP_SPECIAL用来控制菜单项是否可用
七、設置ITEM的一些屬性 
1.Text Items 
一般情況下,大多數的Text items使用TEXT_ITEM属性类,而需显示多行的使用TEXT_ITEM_MULTILINE属性类,如果是field是date类型使用TEXT_ITEM_DATE,设置它的查询长度为255个字符 
2.Date Fields
可以使用DBDATE或是DBDATETIME来设置作为它的预设日期  
3.使LOV在ENTER-QUERY模式下应用于一个ITEM ,创建一个ITEM层级的KEY-LISTVAL触发器,如下:
begin
  if (:system.mode != ‘enter - query’) then
    list_values;
  else
    show_lov(‘query lov’);
  end if;
end;
4.Flexfields 
键弹性域使用的是’ENABLE_LIST_LAMP’这个LOV,并且将验证设置为No ,描述性弹性域不会使用到LOV
八、控制Window、BLOCK 
1.控制运行时期的window 
例如在采购订单窗口包含了一个标签叫做’Lines’的按钮,点击它去到另一个窗口LINES这个块,需要的步骤如下:
第一步:修改以下的Trigger
Trigger:PRE-FORM  
App_window.set_window_position(‘HEADER’,’FIRST_WINDOW’);  
Trigger: WHEN-BUTTION-PRESSED  
app_custom.open_window(‘LINES’);  
第二步:修改APP_CUSTOM.OPEN_WINDOW
If wnd = ‘LINES’ then  
  App_window.set_window_position(‘LINES’,’CASCADE’,’HEADER’);   
  Go_block(‘lines’);  
End if; 
可用的类型有以下几种:  
 ◆ CASCADE 此类型当子窗口打开的时候,会显示在父窗口的上面并距离父窗口的右边0.3,通常使用于明细窗口   
 ◆ RIGHT, BELOW 略  
 ◆ OVERLAP 略  
 ◆ CENTER 略   
 ◆ FIRST_WINDOW 通常用于主窗口 
2.关闭窗口 
一个Form具有三个窗口分別是’Header’,’Lines’和’Shipments’,Shipments是Lines的明细窗口,而Lines是Header的明细窗口,从逻辑上讲关闭窗口如下:  
Procedure close_window(wnd varchar20) is 
  If wnd = ‘HEADER’ then 
    App_window.close_first_window; 
  Elsif wnd = ‘lines’ then 
    App_custom.close_window(‘shipments’); 
    If (wnd = get_view_property(get_item_property(:system.cursor_item,item_canvas), window_name) then 
      go_block(‘header’);  
    end if;  
  elsif wnd = ‘shipments’ then 
    If (wnd = get_view_property(get_item_property(:system.cursor_item,item_canvas), window_name) then
            go_block(‘lines’);  
    end if;  
  end if;  
  hide_window(wnd); 
end;   
3.在执行过程中使用查询
如果你想在打开FORM之前调用一个ROW-LOV或是查询窗口,在WHEN-NEW-FORM-INSTANCE后面加上: 
EXECUTE_TRIGGER(‘QUERY_FIND’); 
  
标签:
原文地址:http://www.cnblogs.com/abelwang/p/4441078.html