oracleerp如何在Form中启用弹性域

本节介绍如何在Form中启用弹性域。

1注册表列
在应用弹性域之前必须先定义弹性域，定义之前必须先注册表列。

注册的方
法在第2章已有详细的介绍，再此不再赘述。

2 定义Flexfield
进入应用开发员--弹性域--(说明性/键)--注册可新定义一个弹性域
如图10.1所示，只有在步骤1中已注册的Table，Colummn在定义弹性域时才能被选到。

对于同种类型的弹性域，每一个基表应只定义一个，但是一个弹性域可对应
多个Structure，在FORM中启用弹性域时，可利用代码指定此弹性域使用的Structure，在FORM中启用弹性域时，可利用代码指定此弹性域使用的
Structure
3在Form中启用弹性域
(1) 添加对应的弹性域字段
一般在基表对应的BLOCK下面新建对应的弹性域字段，相关的外观设置可参考Oracle 标准系统。

Discriptive Flexfields Column
Property Value
property class TEXT_ITEM_DESC_FLEX
List of Values ENABLE_LIST_LAMP
Database Item No
Key Flexfield Column
Property Value
List of Values ENABLE_LIST_LAMP
Database Item No
(2) 添加必要的触发器
BLOCK LEVEL
Trigger Code
PRE-QUERY FND_FLEX.EVENT(‘PRE-QUERY’);
POST-QUERY FND_FLEX.EVENT(‘POST-QUERY’);
PRE-INSERT FND_FLEX.EV ENT(‘PRE-INSERT’);
PRE-UPDATE FND_FLEX.EVENT(‘PRE-UPDATE’);
WHEN-VALIDATE-RECORD FND_FLEX.EVENT(‘WHEN-VALIDATE-RECORD
’);
‘WHEN-NEW-ITEMINSTANCE’);
WHEN-NEW-ITEMINSTANCE FND_FLEX.EVENT(
WHEN-VALIDATE-ITEM FND_FLE X.EVENT(‘WHEN-VALIDATE-ITEM’);
ITEM LEVEL
Trigger Code
‘WHEN-NEW-ITEMINSTANCE’);
WHEN-NEW-ITEMINSTANCE FND_FLEX.EVENT(
WHEN-VALIDATE-ITEM FND_FLEX.EVENT(‘WHEN-VALIDATE-ITEM’);
(3) 代码定义弹性域字段
在Form-level的when-new-form-instance Trigger中调用Flexfield的API函数初始化弹性域栏位。

FND_DESCR_FLEX.DEFINE for descriptive flexfields
FND_KEY_FLEX.DEFINE for key flexfields
FND_RANGE_FLEX.DEFINE for range flexfields
参数有所不同。

和FND_KEY_FLEX.DEFINE
FND_DESCR_FLEX.DEFINE
Eg：
定义总账会计科目关键性弹性域
FND_KEY_FLEX.DEFINE(
BLOCK=>’LINES’，
’，
FIELD=>’ACCTG_FLEX_VALUES
ID=>’GL_ACCOUNT_CC_ID
’，
’SQLGL’，
APPL_SHORT_NAME=>
CODE=>’GL#’，
NUM=>’101’);
定义物料类别关键性弹性域
FND_KEY_FLEX.DEFINE(
BLOCK=>'CONTROL',
FIELD=>'SKU_CODE',
ID=>'SKU_ID',
DESCRIPTION=>'DESCRIPTION',
--COLUMN=>'description DESCRIPTION(15)', APPL_SHORT_NAME=>'INV',
CODE=>'MSTK',
DATA_SET=>'101',
REQUIRED=>'N',
--UPDATEABLE=>NULL,
VALIDATE=>'FULL',
--DINSERT=> 'Y',
USEDBFLDS=> 'N' );
定义订单描述性弹性域
FND_DESCR_FLEX.DEFINE(
BLOCK=>’ORDERS’，
FIELD=>’DESC_FLEX’，
APPL_SHORT_NAME=>
’DEM’，
’);
DESC_FLEX_NAME=>
’DEM_ORDERS。