oracle園地

文本項 TEXT_ITEM
顯示項 DISPLAY_ITEM
列表項 LIST
復選框 CHECKBOX
單選組 RADIO_GROUP
按鈕項 BUTTON
畫布 CANVAS
窗口 WINDOW
塊 BLOCK
彈性域 TEXT_ITEM_DESC_FLEX
當前記錄開始項 CURRENT_RECORD_INDICATOR
只顯示文本項 TEXT_ITEM_DISPLAY_ONLY
時間文本項 TEXT_ITEM_DATE

MERGE語句是Oracle9i新增的語法，用來合併UPDATE和INSERT語句。
通過MERGE語句，根據一張表或子查詢的連接條件對另外一張表進行查詢，
連接條件匹配上的進行UPDATE，無法匹配的執行INSERT。
這個語法僅需要一次全表掃描就完成了全部工作，執行效率要高於INSERT＋UPDATE。
下面看個具體的例子：

部分列為空的排序問題1.null值排在最前面，其他數值升序排列，使用關鍵字：desc nulls first
order by A.X desc nulls first
2.null值排在最前面，其他數值降序排列，使用關鍵字：asc nulls first
order by A.X desc nulls first
3.Connect by 使用方法
connect by prior start with 經常會被用到一個表中存在遞歸關系的時候。比如我們經常會將一個比較復雜的目錄樹存儲到一個表中。或者將一些部門存儲到一個表中，而這些部門互相有隸屬關系。這個時候你就會用到connect by prior start with。

例：
SELECT LEVEL || SYS_CONNECT_BY_PATH(a.empno, '->') RESULT
FROM scott.emp a
CONNECT BY a.empno = PRIOR a.mgr
START WITH a.empno = 7369；

SYS_CONNECT_BY_PATH即在相應字段前加'->'符號，LEVEL是級別

 

 一、處理錯誤
 
1.當錯誤出現在Oracle Form PL/SQL中時，處理的方法如下： 
 IF (err_condition) THEN  
    Fnd_message.set_name(appl_short_name,message_name); 
    Fnd_message.error;  
 RAISE form_trigger_failure; 
 END IF; 
 
2.當錯誤出現在Stored Procedure中時，處理的方法如下： 
 IF (err_condition) THEN 
     Fnd_message.set_name(appl_short_name,message_name); 
     App_exception.raise_exception; 
 END IF;
 
 
3.當我們在測試FORM_SUCCESS,FORM_FAILURE和FORM_FATAL的時候，
  可能觸發了目地的子程序而導至它們的值發生改變,例如下面這個例子：
 
  GO_ITEM(‘emp.empno’);
 
 IF FROM_FAILURE THEN 
 RAISE FORM_TRIGGER_FAILURE;  
 END IF; 
 
 GO_ITEM引起其它的觸發器觸發，比如WHEN-NEW-ITEM-INSTANCE,儘管GO_ITEM可能執行失敗，
 但是後面的Trigger有可能執行成功，這就意味著FROM_FAILURE是失效的，
 為了避免這種情況發生，可以改為下面這樣：
 
 GO_ITEM(‘emp.empno’); 
 IF :SYSTEM.CURSOR_ITEM != ‘EMP.EMPNO’ THEN  
    RAISE FORM_TRIGGER_FAILURE;  
 END IF;
 
 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層級同樣也會觸發.
   這個例外是如果彈性域調用了From層次的POST-QUERY ，但是你在BLOCK的POST-QUERY中重置了
   這個塊的查詢狀態，像這種情況， BLOCK層的POST-QUERY必須將執行類型設置為After 
 
 四、使用APPCORE來代替Oracle Forms Built-In, APPCORE包含了一些等同於Oracle Forms built-ins的功能
 
 EXIT_FORM不要直接使用EXIT_FROM,應該始終使用do_key(‘EXIT_FORM’),
 如果需要退出整個Oracle applications suite,應該首先調用copy(‘Y’,’GLOBAL.APPCORE_EXIT_FLAG’);
 然後再調用Do_key(‘EXIT_FORM’); 
 
 SET_ITEM_PROPERTY使用APP_ITEM_PROPERTY.SET_PROPERTY和APP_ITEM_PROPERTY.SET_VISUAL_ATTRIBUTE來代替 
 GET_ITEM_PROPERTY使用APP_ITEM_PROPERTY.GET_PROPERTY來代替 
 OPEN_FORM使用FND_FUNCTION.EXECUTE來代替 
 CLEAR_FORM使用do_key(‘CLEAR_FORM’)來代替
 
 COMMIT使用do_key(‘COMMIT_FORM’)來代替
 
 EDIT_FIELD使用do_key(‘EDIT_FIELD’)來代替，這個程序噹噹前的ITEM是DATE的時彈出Calendar
 
 VALIDATE使用APP_STANDARD.APP_VALIDATE來代替 
 
 五、 Coding Table handlers (參考Oracle Application Developer ’ s Guide)
 
 
 六、設置物件的屬性 
 1. Canvas的大小最大隻能設置到高5 inch 、寬7.8 inch ，目的是為了更好的適應客戶端的環境 
 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觸發器，如下： 
 IF (:SYSTEM.MODE != ‘ENTER-QUERY’) THEN 
    LIST_VALUES;  
 ELSE
   SHOW_LOV(‘query lov’); 
 END IF;
 
 
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’); 

可以在form級觸發器“when-tag-page-changed”中加入如下代碼：   
declare
  v_item    varchar2(32);
begin
  v_item:=:system.cursor_item;
  if :system.block_status='CHANGED' and :system.record_status IN 
     ('CHANGED','INSERT') then
    show_alert_message('在離開之前需要保存記錄');
    go_item(v_item);     
  end if;
end;

實現方法： 
   1. 在Form級觸發器中加上觸發KEY-OTHERS
   2. 在此觸發器中寫如下程式碼：
      null;
   3. 這樣FORM程序執行後，大部分的功能鍵都被修改（包括一些必需鍵，如：上箭頭、下箭頭、退出...），
      要想讓這些鍵再恢復功能，就為這些鍵作回復動作：

失敗的時候，要移除Oracle
1. 停止所有Oracle服務
2. 刪除 HKEY_LOCAL_MACHINE\SOFTWARE\ORACLE
3. 刪除 Path 裡所有跟Oracle有關的路徑
4. 刪除\Program Files\Oracle目錄
5. 刪除 D:\ORANT, D:\ORA81
6. 刪除 c:\WINNT\ora*.*
7. Reboot

  IF    (:KFA010FBU_QF.DEPT_CODE IS NULL)     THEN   
        GO_ITEM('KFA010FBU_QF.DEPT_CODE');
  ELSIF (:KFA010FBU_QF.CATEGORY1 IS NULL)     THEN   
        GO_ITEM('KFA010FBU_QF.CATEGORY1');                   
  ELSE
       :parameter.G_query_find := 'TRUE';
       go_block('CONTROL');
       execute_trigger('QUERY_FIND');
  END IF;

beign  
  for rec in(select no2,name from t2) loop  
    update t1   
    set no1=rec.no2 
    where name=rec.name 
  end loop;    
end;