How To Create Move Order Lines Using INV_MOVE_ORDER_PUB.Create_Move_Order_Lines API ? (Doc ID 729263.1)
In this Document
APPLIES TO:
Oracle Inventory Management - Version 12.1.3 and later Information in this document applies to any platform.
GOAL
The purpose of this document is to provide a demonstration showing how Move Order Lines can be created using Standard Inventory API.
The attached viewlet will walk the user through creating the PL/SQL Procedure for creating Move Order Lines. There is also a document which has sample code for test purposes.
Also review Note 729261.1 - How To Create A Move Order Header Using INV_MOVE_ORDER_PUB.Create_Move_Order_Header API [Video] ?
Attachments
Sample code: ProcessMoveOrderLines
CREATE OR REPLACE PROCEDURE CreateMoveOrderLines AS -- Common Declarations l_api_version NUMBER := 1.0; l_init_msg_list VARCHAR2(2) := FND_API.G_TRUE; l_return_values VARCHAR2(2) := FND_API.G_FALSE; l_commit VARCHAR2(2) := FND_API.G_FALSE; x_return_status VARCHAR2(2); x_msg_count NUMBER := 0; x_msg_data VARCHAR2(255);
-- WHO columns l_user_id NUMBER := -1; l_resp_id NUMBER := -1; l_application_id NUMBER := -1; l_row_cnt NUMBER := 1; l_user_name VARCHAR2(30) := 'MFG'; l_resp_name VARCHAR2(50) := 'Manufacturing and Distribution Manager';
-- API specific declarations l_trolin_tbl INV_MOVE_ORDER_PUB.TROLIN_TBL_TYPE; l_trolin_val_tbl INV_MOVE_ORDER_PUB.TROLIN_VAL_TBL_TYPE; x_trolin_tbl INV_MOVE_ORDER_PUB.TROLIN_TBL_TYPE; x_trolin_val_tbl INV_MOVE_ORDER_PUB.TROLIN_VAL_TBL_TYPE; l_validation_flag VARCHAR2(2) := INV_MOVE_ORDER_PUB.G_VALIDATION_YES;
BEGIN
-- Get the user_id SELECT user_id INTO l_user_id FROM fnd_user WHERE user_name = l_user_name;
-- Get the application_id and responsibility_id SELECT application_id, responsibility_id INTO l_application_id, l_resp_id FROM fnd_responsibility_vl WHERE responsibility_name = l_resp_name;
-- call API to create move order lines DBMS_OUTPUT.PUT_LINE('=========================================================='); DBMS_OUTPUT.PUT_LINE('Calling INV_MOVE_ORDER_PUB.Create_Move_Order_Lines API');
IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN DBMS_OUTPUT.PUT_LINE('Error Message :'||x_msg_data); END IF;
IF (x_return_status = FND_API.G_RET_STS_SUCCESS) THEN DBMS_OUTPUT.PUT_LINE('Move Order Lines Created Successfully for '||x_trolin_tbl(l_row_cnt).header_id); END IF;
EXCEPTION WHEN OTHERS THEN DBMS_OUTPUT.PUT_LINE('Exception Occured :'); DBMS_OUTPUT.PUT_LINE(SQLCODE ||':'||SQLERRM); DBMS_OUTPUT.PUT_LINE('======================================================='); END CreateMoveOrderLines;