EBS开发 R12杂项处理库存数量实例.docx
《EBS开发 R12杂项处理库存数量实例.docx》由会员分享，可在线阅读，更多相关《EBS开发 R12杂项处理库存数量实例.docx（14页珍藏版）》请在冰豆网上搜索。
EBS开发R12杂项处理库存数量实例
【测试环境】
:
8042
用户名：
sie_wangjun
口令：
123456
TNS文件：
Sie_8042=
（DESCRIPTION=
（ADDRESS=（PROTOCOL=tcp）（HOST=192.168.175.16）（PORT=1563））
（CONNECT_DATA=
（SERVICE_NAME=podemo）
（INSTANCE_NAME=podemo）
）
）
数据库用户口令：
APPS/APPS
HOST文件：
192.168.175.16
【查看库存】
【杂项事务处理】
【说明】货物由之前的1092数量，经过杂项处理后变成了92。
【接口实例】
DECLARE
l_iface_recinv.mtl_transactions_interface%ROWTYPE;
l_cur_mfg_org_idNUMBER:
=228;--CurrentInvOrganization当前系统组织ID
【参数获取过程】：
l_user_idNUMBER:
=1895;--UserID,Sysadminhere当前用户ID
【参数获取过程】：
BEGIN
l_iface_rec.last_update_date:
=SYSDATE;
l_iface_rec.last_updated_by:
=l_user_id;
l_iface_rec.creation_date:
=SYSDATE;
l_iface_rec.created_by:
=l_user_id;
l_iface_rec.last_update_login:
=-1;
SELECTmtl_material_transactions_s.NEXTVALINTOl_iface_rec.transaction_interface_idFROMdual;
l_iface_rec.transaction_header_id:
=l_iface_rec.transaction_interface_id;
l_iface_rec.transaction_mode:
=3;
l_iface_rec.process_flag:
=1;
l_iface_rec.transaction_type_id:
=31;--mtl_transaction_types账号别名杂项入库为41，账号别名杂项出库为31
l_iface_rec.transaction_source_id:
=2;
l_iface_rec.organization_id:
=l_cur_mfg_org_id;
l_iface_rec.inventory_item_id:
=10037;---物料编码
【参数获取过程】：
l_iface_rec.subinventory_code:
='AC01塑胶';---子库代码
【参数获取过程】：
l_iface_rec.transaction_quantity:
=-50;---账号别名杂项入库为正数，出库为负数
l_iface_rec.transaction_uom:
='Ea';---物料单位
l_iface_rec.transaction_date:
=to_date（'2010-10-20','yyyy-mm-dd'）;
l_iface_rec.source_code:
='AAAA';--任意
l_iface_rec.source_header_id:
=976110541;
l_iface_rec.source_line_id:
=976110541;
INSERTINTOinv.mtl_transactions_interfaceVALUESl_iface_rec;
commit;
END;
------【查看接口表数据】----
deletemtl_transactions_interface;
select*frommtl_transactions_interface;
select*frommtl_interface_errors;
commit;
【代码执行过程】
DECLARE
l_iface_recinv.mtl_transactions_interface%ROWTYPE;
l_cur_mfg_org_idNUMBER:
=230;--CurrentInvOrganization当前系统组织ID
l_user_idNUMBER:
=1895;--UserID,Sysadminhere当前用户ID
BEGIN
l_iface_rec.last_update_date:
=SYSDATE;
l_iface_rec.last_updated_by:
=l_user_id;
l_iface_rec.creation_date:
=SYSDATE;
l_iface_rec.created_by:
=l_user_id;
l_iface_rec.last_update_login:
=-1;
SELECTmtl_material_transactions_s.NEXTVALINTOl_iface_rec.transaction_interface_idFROMdual;
l_iface_rec.transaction_header_id:
=l_iface_rec.transaction_interface_id;
l_iface_rec.transaction_mode:
=3;--3
l_iface_rec.process_flag:
=1;--y
l_iface_rec.transaction_type_id:
=41;--mtl_transaction_types账号别名杂项入库为41，账号别名杂项入库为31
l_iface_rec.transaction_source_id:
=88;--帐户别名的IDselectdisposition_idfromMTL_GENERIC_DISPOSITIONSwhereorganization_id=230
l_iface_rec.transaction_action_id:
=1;--selectt.transaction_type_id,t.transaction_action_id,t.transaction_source_type_idfrommtl_transaction_typestwheretransaction_type_id=31
l_iface_rec.transaction_source_type_id:
=6;
l_iface_rec.organization_id:
=l_cur_mfg_org_id;
l_iface_rec.inventory_item_id:
=10037;--10037;---物料编码
l_iface_rec.subinventory_code:
='AC01塑胶';---子库代码
l_iface_rec.transaction_quantity:
=50000;---账号别名杂项入库为正数，出库为负数
l_iface_rec.transaction_uom:
='件';---物料单位
l_iface_rec.transaction_date:
=sysdate;--to_date（'2010-08-20','yyyy-mm-dd'）;
l_iface_rec.source_code:
='AAAA';--任意
l_iface_rec.source_header_id:
=976110541;
l_iface_rec.source_line_id:
=976110541;
INSERTINTOinv.mtl_transactions_interfaceVALUESl_iface_rec;
commit;
END;DECLARE
l_iface_recinv.mtl_transactions_interface%ROWTYPE;
l_cur_mfg_org_idNUMBER:
=230;--CurrentInvOrganization当前系统组织ID
l_user_idNUMBER:
=1895;--UserID,Sysadminhere当前用户ID
BEGIN
l_iface_rec.last_update_date:
=SYSDATE;
l_iface_rec.last_updated_by:
=l_user_id;
l_iface_rec.creation_date:
=SYSDATE;
l_iface_rec.created_by:
=l_user_id;
l_iface_rec.last_update_login:
=-1;
SELECTmtl_material_transactions_s.NEXTVALINTOl_iface_rec.transaction_interface_idFROMdual;
l_iface_rec.transaction_header_id:
=l_iface_rec.transaction_interface_id;
l_iface_rec.transaction_mode:
=1;--3
l_iface_rec.process_flag:
=1;--y
l_iface_rec.transaction_type_id:
=31;--mtl_transaction_types账号别名杂项入库为41，账号别名杂项出库为31
l_iface_rec.transaction_source_id:
=2;
l_iface_rec.organization_id:
=l_cur_mfg_org_id;
l_iface_rec.inventory_item_id:
=10037;--10037;---物料编码
l_iface_rec.subinventory_code:
='AC01塑胶';---子库代码
l_iface_rec.transaction_quantity:
=-500;---账号别名杂项入库为正数，出库为负数
l_iface_rec.transaction_uom:
='件';---物料单位
l_iface_rec.transaction_date:
=sysdate;--to_date（'2010-08-20','yyyy-mm-dd'）;
l_iface_rec.source_code:
='AAAA';--任意
l_iface_rec.source_header_id:
=976110541;
l_iface_rec.source_line_id:
=976110541;
INSERTINTOinv.mtl_transactions_interfaceVALUESl_iface_rec;
commit;
END;
【查看接口表】
select*frommtl_transactions_interface;
可以看到刚才写进去的这行记录。
【执行请求】
-----调用请求-----
DECLARE
L_REQUEST_IDNUMBER;
v_error_msgvarchar2（1000）;
BEGIN
FND_GLOBAL.APPS_INITIALIZE（USER_ID=>1895,--用户ID
RESP_ID=>50889,--职责ID
RESP_APPL_ID=>401）;
L_REQUEST_ID:
=FND_REQUEST.SUBMIT_REQUEST（'INV',
'INCTCW',
'库存事务处理工作流程',
Null,
FALSE
）;
IFL_REQUEST_ID<>0THEN
dbms_output.put_line（L_REQUEST_ID||'提交成功'）;
COMMIT;
ELSE
V_ERROR_MSG:
='提交不成功,错误信息如下：
'||SQLCODE||'|'||
SQLERRM;
dbms_output.put_line（V_ERROR_MSG）;
FND_FILE.PUT_LINE（FND_FILE.OUTPUT,V_ERROR_MSG）;
ENDIF;
END;
升级会员 