--以下脚本于20180121在Tony环境成功实现
--新增物料类别,必须在XIU_ITEMS这个弹性域值集里面先预设或者批量导入值集数据
DECLARE
x_return_status VARCHAR2(1);
x_msg_count NUMBER;
x_msg_data VARCHAR2(2000);
x_errorcode VARCHAR2(30);
l_cur_mfg_org_id NUMBER := 83; --Current Inv Organization
l_user_id NUMBER := 1110; --User ID, Sysadmin here
l_category_id NUMBER;
l_CATEGORY_REC_TYPE INV_ITEM_CATEGORY_PUB.CATEGORY_REC_TYPE;
BEGIN
--Initialize first, or create_by will be -1
fnd_global.apps_initialize(user_id => 1110,
resp_id => 50597,
resp_appl_id => 20003);
l_CATEGORY_REC_TYPE.STRUCTURE_ID := 101;
l_CATEGORY_REC_TYPE.SEGMENT1 :=
--新增物料类别,必须在XIU_ITEMS这个弹性域值集里面先预设或者批量导入值集数据
DECLARE
x_return_status VARCHAR2(1);
x_msg_count NUMBER;
x_msg_data VARCHAR2(2000);
x_errorcode VARCHAR2(30);
l_cur_mfg_org_id NUMBER := 83; --Current Inv Organization
l_user_id NUMBER := 1110; --User ID, Sysadmin here
l_category_id NUMBER;
l_CATEGORY_REC_TYPE INV_ITEM_CATEGORY_PUB.CATEGORY_REC_TYPE;
BEGIN
--Initialize first, or create_by will be -1
fnd_global.apps_initialize(user_id => 1110,
resp_id => 50597,
resp_appl_id => 20003);
l_CATEGORY_REC_TYPE.STRUCTURE_ID := 101;
l_CATEGORY_REC_TYPE.SEGMENT1 :=