OE_ORDER_PUB.PROCESS_ORDER ( Sample Script for R12)
来源:互联网 发布:百度搜索算法 编辑:程序博客网 时间:2024/06/13 01:32
Below script will help you to import an Order through API OE_ORDER_PUB.PROCESS_ORDER
SCRIPT:
SET SERVEROUTPUT ON;
DECLARE
v_api_version_number NUMBER := 1;
v_return_status VARCHAR2(2000);
v_msg_count NUMBER;
v_msg_data VARCHAR2(2000);
-- IN Variables --
v_header_rec oe_order_pub.header_rec_type;
v_line_tbl oe_order_pub.line_tbl_type;
v_action_request_tbl oe_order_pub.request_tbl_type;
v_line_adj_tbl oe_order_pub.line_adj_tbl_type;
-- OUT Variables --
v_header_rec_out oe_order_pub.header_rec_type;
v_header_val_rec_out oe_order_pub.header_val_rec_type;
v_header_adj_tbl_out oe_order_pub.header_adj_tbl_type;
v_header_adj_val_tbl_out oe_order_pub.header_adj_val_tbl_type;
v_header_price_att_tbl_out oe_order_pub.header_price_att_tbl_type;
v_header_adj_att_tbl_out oe_order_pub.header_adj_att_tbl_type;
v_header_adj_assoc_tbl_out oe_order_pub.header_adj_assoc_tbl_type;
v_header_scredit_tbl_out oe_order_pub.header_scredit_tbl_type;
v_header_scredit_val_tbl_out oe_order_pub.header_scredit_val_tbl_type;
v_line_tbl_out oe_order_pub.line_tbl_type;
v_line_val_tbl_out oe_order_pub.line_val_tbl_type;
v_line_adj_tbl_out oe_order_pub.line_adj_tbl_type;
v_line_adj_val_tbl_out oe_order_pub.line_adj_val_tbl_type;
v_line_price_att_tbl_out oe_order_pub.line_price_att_tbl_type;
v_line_adj_att_tbl_out oe_order_pub.line_adj_att_tbl_type;
v_line_adj_assoc_tbl_out oe_order_pub.line_adj_assoc_tbl_type;
v_line_scredit_tbl_out oe_order_pub.line_scredit_tbl_type;
v_line_scredit_val_tbl_out oe_order_pub.line_scredit_val_tbl_type;
v_lot_serial_tbl_out oe_order_pub.lot_serial_tbl_type;
v_lot_serial_val_tbl_out oe_order_pub.lot_serial_val_tbl_type;
v_action_request_tbl_out oe_order_pub.request_tbl_type;
BEGIN
DBMS_OUTPUT.PUT_LINE('Starting of script');
-- Setting the Enviroment --
mo_global.init('ONT');
fnd_global.apps_initialize ( user_id => 123
,resp_id => 456
,resp_appl_id => 789);
mo_global.set_policy_context('S',785);
-- Header Record --
v_header_rec := oe_order_pub.g_miss_header_rec;
v_header_rec.operation := oe_globals.g_opr_create;
v_header_rec.order_type_id := 1005;
v_header_rec.sold_to_org_id := 7157;
v_header_rec.ship_to_org_id := 5480;
v_header_rec.invoice_to_org_id := 5181;
v_header_rec.order_source_id := 0;
v_header_rec.booked_flag := 'N';
v_header_rec.price_list_id := 7018;
v_header_rec.pricing_date := SYSDATE;
v_header_rec.flow_status_code := 'ENTERED';
v_header_rec.cust_po_number := '99478222532';
v_header_rec.sold_from_org_id := 83;
v_header_rec.salesrep_id := -3;
v_header_rec.transactional_curr_code:= 'GBP';
v_action_request_tbl (1) := oe_order_pub.g_miss_request_rec;
-- Line Record --
v_line_tbl (1) := oe_order_pub.g_miss_line_rec;
v_line_tbl (1).operation := oe_globals.g_opr_create;
v_line_tbl (1).inventory_item_id := 27893;
v_line_tbl (1).ordered_quantity := 1;
v_line_tbl (1).unit_selling_price := 2000;
v_line_tbl (1).calculate_price_flag := 'Y';
DBMS_OUTPUT.PUT_LINE('Starting of API');
-- Calling the API to create an Order --
OE_ORDER_PUB.PROCESS_ORDER (
p_api_version_number => v_api_version_number
, p_header_rec => v_header_rec
, p_line_tbl => v_line_tbl
, p_action_request_tbl => v_action_request_tbl
, p_line_adj_tbl => v_line_adj_tbl
-- OUT variables
, x_header_rec => v_header_rec_out
, x_header_val_rec => v_header_val_rec_out
, x_header_adj_tbl => v_header_adj_tbl_out
, x_header_adj_val_tbl => v_header_adj_val_tbl_out
, x_header_price_att_tbl => v_header_price_att_tbl_out
, x_header_adj_att_tbl => v_header_adj_att_tbl_out
, x_header_adj_assoc_tbl => v_header_adj_assoc_tbl_out
, x_header_scredit_tbl => v_header_scredit_tbl_out
, x_header_scredit_val_tbl => v_header_scredit_val_tbl_out
, x_line_tbl => v_line_tbl_out
, x_line_val_tbl => v_line_val_tbl_out
, x_line_adj_tbl => v_line_adj_tbl_out
, x_line_adj_val_tbl => v_line_adj_val_tbl_out
, x_line_price_att_tbl => v_line_price_att_tbl_out
, x_line_adj_att_tbl => v_line_adj_att_tbl_out
, x_line_adj_assoc_tbl => v_line_adj_assoc_tbl_out
, x_line_scredit_tbl => v_line_scredit_tbl_out
, x_line_scredit_val_tbl => v_line_scredit_val_tbl_out
, x_lot_serial_tbl => v_lot_serial_tbl_out
, x_lot_serial_val_tbl => v_lot_serial_val_tbl_out
, x_action_request_tbl => v_action_request_tbl_out
, x_return_status => v_return_status
, x_msg_count => v_msg_count
, x_msg_data => v_msg_data
);
DBMS_OUTPUT.PUT_LINE('Completion of API');
IF v_return_status = fnd_api.g_ret_sts_success THEN
COMMIT;
DBMS_OUTPUT.put_line ('Order Import Success : '||v_header_rec_out.header_id);
ELSE
DBMS_OUTPUT.put_line ('Order Import failed:'||v_msg_data);
ROLLBACK;
FOR i IN 1 .. v_msg_count
LOOP
v_msg_data := oe_msg_pub.get( p_msg_index => i, p_encoded => 'F');
dbms_output.put_line( i|| ') '|| v_msg_data);
END LOOP;
END IF;
END;
/
0 0
- OE_ORDER_PUB.PROCESS_ORDER ( Sample Script for R12)
- SAMPLE SCRIPT TO CREATE SALES ORDER USING OE_ORDER_PUB.PROCESS_ORDER
- SAMPLE SCRIPT TO CREATE SALES ORDER USING OE_ORDER_PUB.PROCESS_ORDER
- OM: Order Import using OE_ORDER_PUB.PROCESS_ORDER
- 销售订单更新、导入API OE_Order_PUB.Process_Order
- Daily Build Script Sample
- Ant script sample
- A Sample Linker Script
- OGRE Material Script Sample
- The sample Loadrunner script below shows examples of FOR, DO and DO WHILE LOOPs.
- Sample Perl script
- A sample for map
- Sample for effective C++
- Log file location for Oracle EBS R12
- Downloaded Files for 11i and R12
- Oracle EBS R12 for Linux安装
- script for sp2
- resize script for galleria
- bp神经网络算法的java实现
- OpenGL: 深度测试
- 使用Jsoup解析html
- 确定一个字符串所有字符是否都不同
- sql数据库学习系列五之SQL Server 事务、异常和游标
- OE_ORDER_PUB.PROCESS_ORDER ( Sample Script for R12)
- Vimrc基础 VIM配置之常用插件配置
- IOS画线条
- Hbase-0.98.0全分布集群安装于配置(详细版参考自官方文档)
- sql数据库学习系列六之SQL Server 存储过程
- 单播、多播(组播)和广播的区别
- 第八周项目一——运算符重载(一个完整的类)
- 图像处理与计算机视觉:基础,经典以及最近发展(1)序
- 产品经理(PM)常用原型图设计工具