ARES資通電子報

技術交流

於 EBS 客製 FORM 中引用鍵彈性欄位元

文 -許峰麗

瞭解 EBS 的人都知道,彈性欄位元為 EBS的一大特點,在 EBS 的實施中有著舉足輕重的作用,分為關鍵彈性域(Key Flexfields)和描述性彈性域(Descriptive Flexfields)。具體給出定義如下:

關鍵性彈性域:具有足夠的彈性,容許使用任意代碼組合以描述實體。在實施 EBS 時,顧問會定義所有的關鍵性彈性域,以使用有含義的程式碼片段來說明每個關鍵性彈性域實體。可為每個關鍵性彈性域確定實體具有多少段、每段的含義、每個段具有的值以及每個段值代表的含義。

說明性彈性域:說明性彈性域用來擴充表單,系統可以使用說明性彈性域來獲取業務所特有的重要附加資訊。

根據如上定義,可以簡單理解成 Key Flexfields 中的 segment 是已經有 business 意義的,而 Descritive Flexfields 中的 segment 是還沒定好具體意義,可以讓客戶自己定義的。故在實際的客製化中 Descriptive Flexfields 的應用是比較頻繁的,而 Key Flexfields 於客製化中的應用確實比較少,不過,偶爾還是會有需要於客製 FORM 中引用系統已定義好的鍵彈性欄位元架構來實現。目前這方面的實例比較少,這裡將筆者最近整理的一套實現方法寫出來與大家共用:

一.開發提前條件:
1. FORM 版本為 R12 中的 TEMPLATE.fmb。
2. 需要載入與彈性欄位元相關的 Library:FNDSQF。

二.以 FORM 中引用會計科目架構為例,實現步驟如下:
1. 於 block ‘HEADER’ 中增加兩個欄位‘OTHER_ACCOUNT’ 和 ‘OTHER_ACCT_ID’,分別用於存放會計科目和會計科目的 id,且兩個欄位元的 Database Item 屬性為 ‘Yes’。 OTHER_ACCOUNT 的是否顯示屬性為 ‘YES’, OTHER_ACCT_ID為 ‘NO’。
2. 於 form 的 program units 中創建一 procedure,用於定義會計科目的彈性欄位元。代碼如下:
PROCEDURE ACCOUNT_DEFINE(P_BLOCK_NAME VARCHAR2,
               P_FIELD VARCHAR2,
               P_ID VARCHAR2,
               P_DESCRIPTION VARCHAR2,
               P_ORG_ID NUMBER
              ) IS
 V_COA NUMBER;
BEGIN
 SELECT sob.CHART_OF_ACCOUNTS_ID
 INTO V_COA
 FROM gl_sets_of_books sob
  ,hr_operating_units hou
WHERE hou.set_of_books_id=sob.set_of_books_id
and hou.ORGANIZATION_ID=P_ORG_ID;

FND_KEY_FLEX.Define
 (
     BLOCK => P_BLOCK_NAME,
     FIELD => P_FIELD,
     ID => P_ID,
     description => P_DESCRIPTION,
     APPL_SHORT_NAME => 'SQLGL',----此鍵彈性欄位元對應的模組簡碼
      CODE => 'GL#', -----每個模組有自己的固定值GL為 ‘GL#’,AP為 ‘AP’ 等,具體可參
          考EBS開發嚮導
     NUM => V_COA, ----彈性欄位元的 STRUCTURE Number
     REQUIRED => 'N',
     VALIDATE => 'FULL',
     USEDBFLDS => 'N',
     DINSERT => 'Y'
     );
END;
3. 於 ‘HEADER’ BLOCK 中的 trigger POST–QUERY, PRE–INSERT, PRE–UPDATE, WHEN–VALIDATE–RECORD WHEN–NEW–ITEM–INSTANCE和item ‘OTHER_ACCOUNT’的WHEN–VALIDATE–ITEM trigger 中增加如下代碼,引用彈性欄位元定義:
ACCOUNT_DEFINE('HEADER' ,
'OTHER_ACCOUNT' ,
'OTHER_ACCT_ID',
NULL, --ACCOUNT DESCRIPTION
:HEADER.ORG_ID
);

4. 於 BLOCK ‘HEADER’ 和 ‘OTHER_ACCOUNT’ 欄位中增加如下 trigger:

Trigger Procedure
PRE–QUERY FND_FLEX.EVENT('PRE-QUERY');
POST–QUERY FND_FLEX.EVENT(’POST–QUERY’);
PRE–INSERT FND_FLEX.EVENT(’PRE–INSERT’);
PRE–UPDATE FND_FLEX.EVENT(’PRE–UPDATE’);
WHEN–VALIDATE–RECORD FND_FLEX.EVENT(’WHEN–VALIDATE–RECORD’);
WHEN–NEW–ITEM–INSTANCE FND_FLEX.EVENT(’WHEN–NEW–ITEM–INSTANCE’);
WHEN–VALIDATE–ITEM FND_FLEX.EVENT(’WHEN–VALIDATE–ITEM’);


至此引用 Key Flexfields 的功能已實現,此方法適用於客製 Form 中引用 EBS 中定義好的任意鍵彈性欄位元架構,引用其它架構時只需修改引用 FND_KEY_FLEX.Define procedure 時參數 ‘APPL_SHORT_NAME’、‘ CODE’、‘NUM’ 的值與被引用的架構進行對應即可。

若您是一位 EBS 的使用者,是否有對 EBS 中的鍵彈性欄位元的實現方法感到好奇?願此篇文章讓您找到答案!如果您是一位 EBS 的維護或開發人員,是否也有過為實現引用 EBS 的 Key Flexfields 而感到苦惱?願此篇文章讓您的苦惱化為烏有!

>>回電子報首頁