[Home] [Help]
22:
23: begin
24: inv_mo_admin_pub.Close_Order(
25: p_api_version => 1.0,
26: p_init_msg_list => fnd_api.g_false,
27: p_commit => fnd_api.g_false,
28: p_validation_level => fnd_api.g_valid_level_full,
29: p_header_Id => p_header_id,
30: x_msg_count => x_msg_count,
23: begin
24: inv_mo_admin_pub.Close_Order(
25: p_api_version => 1.0,
26: p_init_msg_list => fnd_api.g_false,
27: p_commit => fnd_api.g_false,
28: p_validation_level => fnd_api.g_valid_level_full,
29: p_header_Id => p_header_id,
30: x_msg_count => x_msg_count,
31: x_msg_data => x_msg_data,
24: inv_mo_admin_pub.Close_Order(
25: p_api_version => 1.0,
26: p_init_msg_list => fnd_api.g_false,
27: p_commit => fnd_api.g_false,
28: p_validation_level => fnd_api.g_valid_level_full,
29: p_header_Id => p_header_id,
30: x_msg_count => x_msg_count,
31: x_msg_data => x_msg_data,
32: x_return_status => x_return_status);
72:
73: if l_quantity_delivered = 0 then
74: inv_mo_admin_pub.cancel_line(
75: p_api_version => 1.0,
76: p_init_msg_list => fnd_api.g_false,
77: p_commit => fnd_api.g_true,
78: p_validation_level => fnd_api.g_valid_level_full,
79: p_line_id => p_line_id,
80: x_msg_count => x_msg_count,
73: if l_quantity_delivered = 0 then
74: inv_mo_admin_pub.cancel_line(
75: p_api_version => 1.0,
76: p_init_msg_list => fnd_api.g_false,
77: p_commit => fnd_api.g_true,
78: p_validation_level => fnd_api.g_valid_level_full,
79: p_line_id => p_line_id,
80: x_msg_count => x_msg_count,
81: x_msg_data => x_msg_data,
74: inv_mo_admin_pub.cancel_line(
75: p_api_version => 1.0,
76: p_init_msg_list => fnd_api.g_false,
77: p_commit => fnd_api.g_true,
78: p_validation_level => fnd_api.g_valid_level_full,
79: p_line_id => p_line_id,
80: x_msg_count => x_msg_count,
81: x_msg_data => x_msg_data,
82: x_return_status => x_return_status);
82: x_return_status => x_return_status);
83: else
84: inv_mo_admin_pub.close_line(
85: p_api_version => 1.0,
86: p_init_msg_list => fnd_api.g_false,
87: p_commit => fnd_api.g_false,
88: p_validation_level => fnd_api.g_valid_level_full,
89: p_line_id => p_line_id,
90: x_msg_count => x_msg_count,
83: else
84: inv_mo_admin_pub.close_line(
85: p_api_version => 1.0,
86: p_init_msg_list => fnd_api.g_false,
87: p_commit => fnd_api.g_false,
88: p_validation_level => fnd_api.g_valid_level_full,
89: p_line_id => p_line_id,
90: x_msg_count => x_msg_count,
91: x_msg_data => x_msg_data,
84: inv_mo_admin_pub.close_line(
85: p_api_version => 1.0,
86: p_init_msg_list => fnd_api.g_false,
87: p_commit => fnd_api.g_false,
88: p_validation_level => fnd_api.g_valid_level_full,
89: p_line_id => p_line_id,
90: x_msg_count => x_msg_count,
91: x_msg_data => x_msg_data,
92: x_return_status => x_return_status);
196: l_header_id number;
197:
198: l_api_version_number CONSTANT NUMBER := 1.0;
199: l_api_name CONSTANT VARCHAR2(30) := 'Create_Move_Order_Header';
200: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
201: l_msg_count NUMBER;
202: l_msg_data VARCHAR2(240);
203: l_commit VARCHAR2(1) := FND_API.G_FALSE;
204: EXCP_USER_DEFINED EXCEPTION;
199: l_api_name CONSTANT VARCHAR2(30) := 'Create_Move_Order_Header';
200: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
201: l_msg_count NUMBER;
202: l_msg_data VARCHAR2(240);
203: l_commit VARCHAR2(1) := FND_API.G_FALSE;
204: EXCP_USER_DEFINED EXCEPTION;
205:
206: BEGIN
207: SAVEPOINT Create_Move_Order_Header_PUB;
205:
206: BEGIN
207: SAVEPOINT Create_Move_Order_Header_PUB;
208:
209: IF fnd_api.to_boolean(P_Init_Msg_List) THEN
210: -- initialize message list
211: FND_MSG_PUB.initialize;
212: END IF;
213:
211: FND_MSG_PUB.initialize;
212: END IF;
213:
214: -- Standard call to check for call compatibility.
215: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
216: p_api_version,
217: l_api_name,
218: G_PKG_NAME)
219: THEN
216: p_api_version,
217: l_api_name,
218: G_PKG_NAME)
219: THEN
220: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
221: END IF;
222:
223: -- initialize return status
224: x_return_status := FND_API.G_RET_STS_SUCCESS;
220: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
221: END IF;
222:
223: -- initialize return status
224: x_return_status := FND_API.G_RET_STS_SUCCESS;
225:
226: -- check organization
227: IF p_organization_id IS NULL THEN
228: FND_MESSAGE.SET_NAME ('CSP', 'CSP_MISSING_PARAMETERS');
251: END;
252: END IF;
253:
254: -- initialize move order header record type
255: l_mohdr_rec.header_id := nvl(px_header_id, FND_API.G_MISS_NUM);
256: l_mohdr_rec.request_number := nvl(p_request_number, FND_API.G_MISS_CHAR);
257: l_mohdr_rec.created_by := nvl(fnd_global.user_id,1);
258: l_mohdr_rec.creation_date := sysdate;
259: l_mohdr_rec.date_required := p_date_required;
252: END IF;
253:
254: -- initialize move order header record type
255: l_mohdr_rec.header_id := nvl(px_header_id, FND_API.G_MISS_NUM);
256: l_mohdr_rec.request_number := nvl(p_request_number, FND_API.G_MISS_CHAR);
257: l_mohdr_rec.created_by := nvl(fnd_global.user_id,1);
258: l_mohdr_rec.creation_date := sysdate;
259: l_mohdr_rec.date_required := p_date_required;
260: l_mohdr_rec.from_subinventory_code:= p_from_subinventory_code;
266: l_mohdr_rec.status_date := sysdate;
267: l_mohdr_rec.to_subinventory_code := p_to_subinventory_code;
268: l_mohdr_rec.transaction_type_id := INV_GLOBALS.G_TYPE_TRANSFER_ORDER_SUBXFR;
269: l_mohdr_rec.move_order_type := INV_GLOBALS.G_MOVE_ORDER_REQUISITION;
270: l_mohdr_rec.db_flag := FND_API.G_TRUE;
271: l_mohdr_rec.operation := INV_GLOBALS.G_OPR_CREATE;
272:
273: -- call public api to create a record for move order header in Oracle Inventory
274: INV_Move_Order_PUB.Create_Move_order_Header(
273: -- call public api to create a record for move order header in Oracle Inventory
274: INV_Move_Order_PUB.Create_Move_order_Header(
275: p_api_version_number => 1,
276: p_init_msg_list => p_init_msg_list,
277: p_return_values => FND_API.G_TRUE,
278: p_commit => l_commit,
279: x_return_status => l_return_status,
280: x_msg_count => l_msg_count,
281: x_msg_data => l_msg_data,
284: x_trohdr_rec => l_mohdr_rec,
285: x_trohdr_val_rec => l_mohdr_val_rec
286: );
287:
288: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
289: RAISE FND_API.G_EXC_ERROR;
290: ELSE
291: /* call table handlers for inserting into csp_move_order_header table*/
292: csp_to_form_moheaders.Validate_and_Write(
285: x_trohdr_val_rec => l_mohdr_val_rec
286: );
287:
288: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
289: RAISE FND_API.G_EXC_ERROR;
290: ELSE
291: /* call table handlers for inserting into csp_move_order_header table*/
292: csp_to_form_moheaders.Validate_and_Write(
293: P_Api_Version_Number => 1.0
334: ,X_Msg_Count => l_msg_count
335: ,X_Msg_Data => l_msg_data
336: );
337:
338: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
339: RAISE FND_API.G_EXC_ERROR;
340: END IF;
341:
342: px_header_id := l_mohdr_rec.header_id;
335: ,X_Msg_Data => l_msg_data
336: );
337:
338: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
339: RAISE FND_API.G_EXC_ERROR;
340: END IF;
341:
342: px_header_id := l_mohdr_rec.header_id;
343: END IF;
341:
342: px_header_id := l_mohdr_rec.header_id;
343: END IF;
344:
345: IF fnd_api.to_boolean(p_commit) THEN
346: commit work;
347: END IF;
348:
349: fnd_msg_pub.count_and_get
352: /* Exception Block */
353: EXCEPTION
354: WHEN EXCP_USER_DEFINED THEN
355: Rollback to Create_Move_Order_Header_PUB;
356: x_return_status := FND_API.G_RET_STS_ERROR;
357: fnd_msg_pub.count_and_get
358: ( p_count => x_msg_count
359: , p_data => x_msg_data);
360: WHEN FND_API.G_EXC_ERROR THEN
356: x_return_status := FND_API.G_RET_STS_ERROR;
357: fnd_msg_pub.count_and_get
358: ( p_count => x_msg_count
359: , p_data => x_msg_data);
360: WHEN FND_API.G_EXC_ERROR THEN
361: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
362: P_API_NAME => L_API_NAME
363: ,P_PKG_NAME => G_PKG_NAME
364: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
365: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PUB
366: ,X_MSG_COUNT => X_MSG_COUNT
367: ,X_MSG_DATA => X_MSG_DATA
368: ,X_RETURN_STATUS => X_RETURN_STATUS);
369: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
370: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
371: P_API_NAME => L_API_NAME
372: ,P_PKG_NAME => G_PKG_NAME
373: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
383: FND_MSG_PUB.ADD;
384: fnd_msg_pub.count_and_get
385: ( p_count => x_msg_count
386: , p_data => x_msg_data);
387: x_return_status := FND_API.G_RET_STS_ERROR;
388:
389: END CREATE_MOVE_ORDER_HEADER;
390:
391:
399: -- End of comments
400:
401: PROCEDURE CREATE_MOVE_ORDER_LINE
402: (p_api_version IN NUMBER
403: ,p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE
404: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
405: ,px_line_id IN OUT NOCOPY NUMBER
406: ,p_header_id IN NUMBER
407: ,p_organization_id IN NUMBER
400:
401: PROCEDURE CREATE_MOVE_ORDER_LINE
402: (p_api_version IN NUMBER
403: ,p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE
404: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
405: ,px_line_id IN OUT NOCOPY NUMBER
406: ,p_header_id IN NUMBER
407: ,p_organization_id IN NUMBER
408: ,p_from_subinventory_code IN VARCHAR2
432: l_trolin_val_tbl INV_Move_Order_PUB.Trolin_Val_Tbl_Type;
433:
434: l_api_version_number CONSTANT NUMBER := 1.0;
435: l_api_name CONSTANT VARCHAR2(30) := 'Create_Move_Order_Line';
436: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
437: l_msg_count NUMBER;
438: l_msg_data VARCHAR2(240);
439: l_commit VARCHAR2(1) := FND_API.G_FALSE;
440: EXCP_USER_DEFINED EXCEPTION;
435: l_api_name CONSTANT VARCHAR2(30) := 'Create_Move_Order_Line';
436: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
437: l_msg_count NUMBER;
438: l_msg_data VARCHAR2(240);
439: l_commit VARCHAR2(1) := FND_API.G_FALSE;
440: EXCP_USER_DEFINED EXCEPTION;
441:
442: l_line_num NUMBER := 0;
443: l_line_id NUMBER;
445:
446: BEGIN
447: SAVEPOINT Create_Move_Order_Line_PUB;
448:
449: IF fnd_api.to_boolean(P_Init_Msg_List) THEN
450: -- initialize message list
451: FND_MSG_PUB.initialize;
452: END IF;
453:
451: FND_MSG_PUB.initialize;
452: END IF;
453:
454: -- Standard call to check for call compatibility.
455: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
456: p_api_version,
457: l_api_name,
458: G_PKG_NAME)
459: THEN
456: p_api_version,
457: l_api_name,
458: G_PKG_NAME)
459: THEN
460: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
461: END IF;
462:
463: -- Initialize return_status
464: x_return_status := FND_API.G_RET_STS_SUCCESS;
460: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
461: END IF;
462:
463: -- Initialize return_status
464: x_return_status := FND_API.G_RET_STS_SUCCESS;
465:
466: -- check organization
467: IF p_organization_id IS NULL THEN
468: FND_MESSAGE.SET_NAME ('CSP', 'CSP_MISSING_PARAMETERS');
517: l_trolin_tbl(l_order_count).serial_number_end := p_serial_number_end;
518: l_trolin_tbl(l_order_count).last_updated_by := nvl(FND_GLOBAL.USER_ID,1);
519: l_trolin_tbl(l_order_count).last_update_date := sysdate;
520: l_trolin_tbl(l_order_count).last_update_login := nvl(FND_GLOBAL.LOGIN_ID, -1);
521: l_trolin_tbl(l_order_count).line_id := nvl(px_line_id,FND_API.G_MISS_NUM);
522: l_trolin_tbl(l_order_count).line_number := l_line_num;
523: l_trolin_tbl(l_order_count).line_status := INV_Globals.G_TO_STATUS_PREAPPROVED;
524: l_trolin_tbl(l_order_count).transaction_type_id := INV_GLOBALS.G_TYPE_TRANSFER_ORDER_SUBXFR;
525: l_trolin_tbl(l_order_count).organization_id := p_organization_id;
529: l_trolin_tbl(l_order_count).status_date := sysdate;
530: l_trolin_tbl(l_order_count).to_subinventory_code := p_to_subinventory_code;
531: l_trolin_tbl(l_order_count).to_locator_id := p_to_locator_id;
532: l_trolin_tbl(l_order_count).uom_code := p_uom_code;
533: l_trolin_tbl(l_order_count).db_flag := FND_API.G_TRUE;
534: l_trolin_tbl(l_order_count).operation := INV_GLOBALS.G_OPR_CREATE;
535:
536: INV_Move_Order_Pub.Create_Move_Order_Lines
537: ( p_api_version_number => 1.0 ,
536: INV_Move_Order_Pub.Create_Move_Order_Lines
537: ( p_api_version_number => 1.0 ,
538: p_init_msg_list => p_init_msg_list,
539: p_commit => l_commit,
540: p_return_values => FND_API.G_TRUE,
541: x_return_status => l_return_status,
542: x_msg_count => l_msg_count,
543: x_msg_data => l_msg_data,
544: p_trolin_tbl => l_trolin_tbl,
548: );
549:
550: px_line_id := l_trolin_tbl(l_order_count).line_id;
551:
552: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
553: RAISE FND_API.G_EXC_ERROR;
554: ELSE
555: /* call table handlers for inserting into csp_move_order_lines table*/
556: csp_to_form_molines.Validate_and_Write(
549:
550: px_line_id := l_trolin_tbl(l_order_count).line_id;
551:
552: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
553: RAISE FND_API.G_EXC_ERROR;
554: ELSE
555: /* call table handlers for inserting into csp_move_order_lines table*/
556: csp_to_form_molines.Validate_and_Write(
557: P_Api_Version_Number => 1.0
591: ,X_Msg_Count => l_msg_count
592: ,X_Msg_Data => l_msg_data
593: );
594:
595: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
596: RAISE FND_API.G_EXC_ERROR;
597: END IF;
598:
599: px_line_id := l_trolin_tbl(l_order_count).line_id;
592: ,X_Msg_Data => l_msg_data
593: );
594:
595: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
596: RAISE FND_API.G_EXC_ERROR;
597: END IF;
598:
599: px_line_id := l_trolin_tbl(l_order_count).line_id;
600: END IF;
598:
599: px_line_id := l_trolin_tbl(l_order_count).line_id;
600: END IF;
601:
602: IF fnd_api.to_boolean(p_commit) THEN
603: commit work;
604: END IF;
605: fnd_msg_pub.count_and_get
606: ( p_count => x_msg_count
608: /* Exception Block */
609: EXCEPTION
610: WHEN EXCP_USER_DEFINED THEN
611: Rollback to Create_Move_Order_Line_PUB;
612: x_return_status := FND_API.G_RET_STS_ERROR;
613: fnd_msg_pub.count_and_get
614: ( p_count => x_msg_count
615: , p_data => x_msg_data);
616: WHEN FND_API.G_EXC_ERROR THEN
612: x_return_status := FND_API.G_RET_STS_ERROR;
613: fnd_msg_pub.count_and_get
614: ( p_count => x_msg_count
615: , p_data => x_msg_data);
616: WHEN FND_API.G_EXC_ERROR THEN
617: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
618: P_API_NAME => L_API_NAME
619: ,P_PKG_NAME => G_PKG_NAME
620: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
621: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PUB
622: ,X_MSG_COUNT => X_MSG_COUNT
623: ,X_MSG_DATA => X_MSG_DATA
624: ,X_RETURN_STATUS => X_RETURN_STATUS);
625: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
626: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
627: P_API_NAME => L_API_NAME
628: ,P_PKG_NAME => G_PKG_NAME
629: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
639: FND_MSG_PUB.ADD;
640: fnd_msg_pub.count_and_get
641: ( p_count => x_msg_count
642: , p_data => x_msg_data);
643: x_return_status := FND_API.G_RET_STS_ERROR;
644:
645:
646: END CREATE_MOVE_ORDER_LINE;
647:
657: -- End of comments
658:
659: PROCEDURE TRANSACT_MATERIAL
660: (p_api_version IN NUMBER
661: ,p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE
662: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
663: ,px_transaction_id IN OUT NOCOPY NUMBER
664: ,px_transaction_header_id IN OUT NOCOPY NUMBER
665: ,p_inventory_item_id IN NUMBER
658:
659: PROCEDURE TRANSACT_MATERIAL
660: (p_api_version IN NUMBER
661: ,p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE
662: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
663: ,px_transaction_id IN OUT NOCOPY NUMBER
664: ,px_transaction_header_id IN OUT NOCOPY NUMBER
665: ,p_inventory_item_id IN NUMBER
666: ,p_organization_id IN NUMBER
852:
853: BEGIN
854: Savepoint Transact_Material_PUB;
855:
856: IF fnd_api.to_boolean(P_Init_Msg_List) THEN
857: -- initialize message list
858: FND_MSG_PUB.initialize;
859: END IF;
860:
858: FND_MSG_PUB.initialize;
859: END IF;
860:
861: -- Standard call to check for call compatibility.
862: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
863: p_api_version,
864: l_api_name,
865: G_PKG_NAME)
866: THEN
863: p_api_version,
864: l_api_name,
865: G_PKG_NAME)
866: THEN
867: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
868: END IF;
869:
870: -- validating transaction_type_id
871: IF p_transaction_type_id IS NULL THEN
992: CLOSE l_acct_period_csr;
993:
994: IF l_acct_period_id is null THEN
995: x_msg_data := 'Cannot find open accounting period';
996: x_return_status := FND_API.G_RET_STS_ERROR;
997: END IF;
998:
999: IF p_transaction_type_id in (21,32,02,01,93,35) THEN
1000: l_quantity := p_quantity * (-1);
1298: ---------------------------------------------------
1299: --- Added for bug 3608969
1300: Begin
1301: l_retval := INV_TXN_MANAGER_PUB.process_Transactions(p_api_version => 1,
1302: p_init_msg_list => fnd_api.g_false ,
1303: p_commit => fnd_api.g_false ,
1304: p_validation_level => fnd_api.g_valid_level_full ,
1305: x_return_status => l_return_status,
1306: x_msg_count => l_msg_cnt,
1299: --- Added for bug 3608969
1300: Begin
1301: l_retval := INV_TXN_MANAGER_PUB.process_Transactions(p_api_version => 1,
1302: p_init_msg_list => fnd_api.g_false ,
1303: p_commit => fnd_api.g_false ,
1304: p_validation_level => fnd_api.g_valid_level_full ,
1305: x_return_status => l_return_status,
1306: x_msg_count => l_msg_cnt,
1307: x_msg_data => l_msg_data,
1300: Begin
1301: l_retval := INV_TXN_MANAGER_PUB.process_Transactions(p_api_version => 1,
1302: p_init_msg_list => fnd_api.g_false ,
1303: p_commit => fnd_api.g_false ,
1304: p_validation_level => fnd_api.g_valid_level_full ,
1305: x_return_status => l_return_status,
1306: x_msg_count => l_msg_cnt,
1307: x_msg_data => l_msg_data,
1308: x_trans_count => l_trans_count,
1505:
1506: END IF;
1507: END IF;
1508:
1509: IF fnd_api.to_boolean(p_commit) THEN
1510: commit work;
1511: END IF;
1512:
1513: x_return_status := FND_API.G_RET_STS_SUCCESS;
1509: IF fnd_api.to_boolean(p_commit) THEN
1510: commit work;
1511: END IF;
1512:
1513: x_return_status := FND_API.G_RET_STS_SUCCESS;
1514: x_msg_data := l_msg_data;
1515: -- dbms_output.put_line('TRANSACT_MATERIAL: returning successfully');
1516: /*
1517: fnd_msg_pub.count_and_get
1521: WHEN EXCP_USER_DEFINED THEN
1522: If l_outcome = true then -- i.e. process_online has not been called.
1523: Rollback to Transact_Material_Pub;
1524: end if;
1525: x_return_status := FND_API.G_RET_STS_ERROR;
1526: fnd_msg_pub.count_and_get
1527: ( p_count => x_msg_count
1528: , p_data => x_msg_data);
1529: WHEN FND_API.G_EXC_ERROR THEN
1525: x_return_status := FND_API.G_RET_STS_ERROR;
1526: fnd_msg_pub.count_and_get
1527: ( p_count => x_msg_count
1528: , p_data => x_msg_data);
1529: WHEN FND_API.G_EXC_ERROR THEN
1530: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
1531: P_API_NAME => L_API_NAME
1532: ,P_PKG_NAME => G_PKG_NAME
1533: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1534: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PUB
1535: ,X_MSG_COUNT => X_MSG_COUNT
1536: ,X_MSG_DATA => X_MSG_DATA
1537: ,X_RETURN_STATUS => X_RETURN_STATUS);
1538: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1539: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
1540: P_API_NAME => L_API_NAME
1541: ,P_PKG_NAME => G_PKG_NAME
1542: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
1554: fnd_msg_pub.add;
1555: fnd_msg_pub.count_and_get
1556: ( p_count => x_msg_count
1557: , p_data => x_msg_data);
1558: x_return_status := fnd_api.g_ret_sts_error;
1559:
1560: END TRANSACT_MATERIAL;
1561:
1562:
1577: -- klou 27-Mar-2000 created.
1578: --
1579: -- NOTES: If validations have been done in the precedent procedure from which this one is being called, doing a
1580: -- full validation here is unnecessary. To avoid repeating the same validations, you can set the
1581: -- p_validation_level to fnd_api.g_valid_level_none when making the procedure call. However, it is your
1582: -- responsibility to make sure all proper validations have been done before calling this procedure.
1583: -- You are recommended to let this procedure handle the validations if you are not sure.
1584: --
1585: -- CAUTIONS: This procedure *ALWAYS* calls other procedures with validation_level set to FND_API.G_VALID_LEVEL_NONE.
1581: -- p_validation_level to fnd_api.g_valid_level_none when making the procedure call. However, it is your
1582: -- responsibility to make sure all proper validations have been done before calling this procedure.
1583: -- You are recommended to let this procedure handle the validations if you are not sure.
1584: --
1585: -- CAUTIONS: This procedure *ALWAYS* calls other procedures with validation_level set to FND_API.G_VALID_LEVEL_NONE.
1586: -- If you do not do your own validations before calling this procedure, you should set the p_validation_level
1587: -- to FND_API.G_VALID_LEVEL_FULL when making the call.
1588: -- End of Comments
1589:
1583: -- You are recommended to let this procedure handle the validations if you are not sure.
1584: --
1585: -- CAUTIONS: This procedure *ALWAYS* calls other procedures with validation_level set to FND_API.G_VALID_LEVEL_NONE.
1586: -- If you do not do your own validations before calling this procedure, you should set the p_validation_level
1587: -- to FND_API.G_VALID_LEVEL_FULL when making the call.
1588: -- End of Comments
1589:
1590: P_Api_Version_Number IN NUMBER,
1591: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1587: -- to FND_API.G_VALID_LEVEL_FULL when making the call.
1588: -- End of Comments
1589:
1590: P_Api_Version_Number IN NUMBER,
1591: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1592: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1593: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1594: p_transaction_temp_id IN NUMBER,
1595: px_transaction_header_id IN OUT NOCOPY NUMBER,
1588: -- End of Comments
1589:
1590: P_Api_Version_Number IN NUMBER,
1591: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1592: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1593: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1594: p_transaction_temp_id IN NUMBER,
1595: px_transaction_header_id IN OUT NOCOPY NUMBER,
1596: p_online_process_flag IN BOOLEAN := FALSE,
1589:
1590: P_Api_Version_Number IN NUMBER,
1591: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1592: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1593: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1594: p_transaction_temp_id IN NUMBER,
1595: px_transaction_header_id IN OUT NOCOPY NUMBER,
1596: p_online_process_flag IN BOOLEAN := FALSE,
1597: X_Return_Status OUT NOCOPY VARCHAR2,
1693: l_msg_data VARCHAR2(300);
1694: l_check_existence NUMBER := 0;
1695: l_return_status VARCHAR2(1);
1696: l_msg_count NUMBER := 0;
1697: l_commit VARCHAR2(1) := FND_API.G_FALSE;
1698: l_transaction_header_id number := px_transaction_header_id;
1699: l_lot_number VARCHAR2(80);
1700: l_lot_expiration_date DATE;
1701: l_fm_serial_number VARCHAR2(30);
1706:
1707: BEGIN
1708: Savepoint transact_temp_record_pub;
1709:
1710: IF fnd_api.to_boolean(P_Init_Msg_List) THEN
1711: -- initialize message list
1712: FND_MSG_PUB.initialize;
1713: END IF;
1714:
1712: FND_MSG_PUB.initialize;
1713: END IF;
1714:
1715: -- Standard call to check for call compatibility.
1716: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1717: p_api_version_number,
1718: l_api_name,
1719: G_PKG_NAME)
1720: THEN
1717: p_api_version_number,
1718: l_api_name,
1719: G_PKG_NAME)
1720: THEN
1721: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1722: END IF;
1723:
1724: IF p_validation_level = fnd_api.g_valid_level_full THEN
1725: IF p_transaction_temp_id IS NULL THEN
1720: THEN
1721: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1722: END IF;
1723:
1724: IF p_validation_level = fnd_api.g_valid_level_full THEN
1725: IF p_transaction_temp_id IS NULL THEN
1726: FND_MESSAGE.SET_NAME ('CSP', 'CSP_MISSING_PARAMETERS');
1727: FND_MESSAGE.SET_TOKEN ('PARAMETER', 'p_transaction_temp_id', FALSE);
1728: FND_MSG_PUB.ADD;
1828: ,x_msg_count => l_msg_count
1829: ,x_msg_data => l_msg_data
1830: );
1831:
1832: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1833: Close l_Get_Lot_Temp_Csr;
1834: RAISE FND_API.G_EXC_ERROR;
1835: END IF;
1836: l_qty_processed := l_qty_processed + l_lot_temp_rec.transaction_quantity;
1830: );
1831:
1832: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1833: Close l_Get_Lot_Temp_Csr;
1834: RAISE FND_API.G_EXC_ERROR;
1835: END IF;
1836: l_qty_processed := l_qty_processed + l_lot_temp_rec.transaction_quantity;
1837: End If;
1838: End Loop; -- <
1899: ,x_msg_count => l_msg_count
1900: ,x_msg_data => l_msg_data
1901: );
1902:
1903: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1904: Close l_Get_Lot_Temp_Csr;
1905: Close l_Get_Serial_Temp_Csr;
1906: RAISE FND_API.G_EXC_ERROR;
1907: END IF;
1902:
1903: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1904: Close l_Get_Lot_Temp_Csr;
1905: Close l_Get_Serial_Temp_Csr;
1906: RAISE FND_API.G_EXC_ERROR;
1907: END IF;
1908: l_qty_processed := l_qty_processed + nvl(l_serial_temp_rec.serial_prefix, 1);
1909: End If;
1910: End Loop; -- <
1970: ,x_msg_count => l_msg_count
1971: ,x_msg_data => l_msg_data
1972: );
1973:
1974: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1975: Close l_Get_Serial_Temp_Csr;
1976: RAISE FND_API.G_EXC_ERROR;
1977: END IF;
1978: l_qty_processed := l_qty_processed + l_serial_temp_rec.serial_prefix;
1972: );
1973:
1974: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1975: Close l_Get_Serial_Temp_Csr;
1976: RAISE FND_API.G_EXC_ERROR;
1977: END IF;
1978: l_qty_processed := l_qty_processed + l_serial_temp_rec.serial_prefix;
1979: End If;
1980: End Loop; --<
2016: ,x_msg_count => l_msg_count
2017: ,x_msg_data => l_msg_data
2018: );
2019:
2020: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2021: Close l_Get_Serial_Temp_Csr;
2022: RAISE FND_API.G_EXC_ERROR;
2023: END IF;
2024: End if;
2018: );
2019:
2020: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2021: Close l_Get_Serial_Temp_Csr;
2022: RAISE FND_API.G_EXC_ERROR;
2023: END IF;
2024: End if;
2025:
2026: IF fnd_api.to_boolean(p_commit) THEN
2022: RAISE FND_API.G_EXC_ERROR;
2023: END IF;
2024: End if;
2025:
2026: IF fnd_api.to_boolean(p_commit) THEN
2027: commit work;
2028: END IF;
2029: x_return_status := l_return_status;
2030: fnd_msg_pub.count_and_get
2032: , p_data => x_msg_data);
2033: EXCEPTION
2034: WHEN EXCP_USER_DEFINED THEN
2035: Rollback to transact_temp_record_pub;
2036: x_return_status := FND_API.G_RET_STS_ERROR;
2037: fnd_msg_pub.count_and_get
2038: ( p_count => x_msg_count
2039: , p_data => x_msg_data);
2040: WHEN FND_API.G_EXC_ERROR THEN
2036: x_return_status := FND_API.G_RET_STS_ERROR;
2037: fnd_msg_pub.count_and_get
2038: ( p_count => x_msg_count
2039: , p_data => x_msg_data);
2040: WHEN FND_API.G_EXC_ERROR THEN
2041: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
2042: P_API_NAME => L_API_NAME
2043: ,P_PKG_NAME => G_PKG_NAME
2044: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
2045: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PUB
2046: ,X_MSG_COUNT => X_MSG_COUNT
2047: ,X_MSG_DATA => X_MSG_DATA
2048: ,X_RETURN_STATUS => X_RETURN_STATUS);
2049: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2050: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
2051: P_API_NAME => L_API_NAME
2052: ,P_PKG_NAME => G_PKG_NAME
2053: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
2063: fnd_msg_pub.add;
2064: fnd_msg_pub.count_and_get
2065: ( p_count => x_msg_count
2066: , p_data => x_msg_data);
2067: x_return_status := fnd_api.g_ret_sts_error;
2068: END transact_temp_record;
2069:
2070:
2071: PROCEDURE transact_items_transfer (
2069:
2070:
2071: PROCEDURE transact_items_transfer (
2072: P_Api_Version_Number IN NUMBER,
2073: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
2074: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
2075: p_Trans_Items IN OUT NOCOPY Trans_Items_Tbl_Type,
2076: p_Trans_Type_id IN NUMBER,
2077: X_Return_Status OUT NOCOPY VARCHAR2,
2070:
2071: PROCEDURE transact_items_transfer (
2072: P_Api_Version_Number IN NUMBER,
2073: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
2074: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
2075: p_Trans_Items IN OUT NOCOPY Trans_Items_Tbl_Type,
2076: p_Trans_Type_id IN NUMBER,
2077: X_Return_Status OUT NOCOPY VARCHAR2,
2078: X_Msg_Count OUT NOCOPY NUMBER,
2090:
2091: FOR inx1 IN 1..p_Trans_Items.COUNT LOOP
2092: CSP_TRANSACTIONS_PUB.TRANSACT_MATERIAL(
2093: P_API_VERSION => P_Api_Version_Number,
2094: P_INIT_MSG_LIST => FND_API.G_TRUE,
2095: P_COMMIT => FND_API.G_TRUE,
2096: PX_TRANSACTION_ID => PX_TRANSACTION_ID,
2097: PX_TRANSACTION_HEADER_ID => PX_TRANSACTION_HEADER_ID,
2098: P_INVENTORY_ITEM_ID => p_Trans_Items(inx1).INVENTORY_ITEM_ID,
2091: FOR inx1 IN 1..p_Trans_Items.COUNT LOOP
2092: CSP_TRANSACTIONS_PUB.TRANSACT_MATERIAL(
2093: P_API_VERSION => P_Api_Version_Number,
2094: P_INIT_MSG_LIST => FND_API.G_TRUE,
2095: P_COMMIT => FND_API.G_TRUE,
2096: PX_TRANSACTION_ID => PX_TRANSACTION_ID,
2097: PX_TRANSACTION_HEADER_ID => PX_TRANSACTION_HEADER_ID,
2098: P_INVENTORY_ITEM_ID => p_Trans_Items(inx1).INVENTORY_ITEM_ID,
2099: P_ORGANIZATION_ID => p_Trans_Items(inx1).FRM_ORGANIZATION_ID,
2141: END transact_items_transfer;
2142:
2143: PROCEDURE transact_subinv_transfer (
2144: P_Api_Version_Number IN NUMBER,
2145: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
2146: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
2147: p_Trans_Items IN OUT NOCOPY Trans_Items_Tbl_Type,
2148: X_Return_Status OUT NOCOPY VARCHAR2,
2149: X_Msg_Count OUT NOCOPY NUMBER,
2142:
2143: PROCEDURE transact_subinv_transfer (
2144: P_Api_Version_Number IN NUMBER,
2145: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
2146: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
2147: p_Trans_Items IN OUT NOCOPY Trans_Items_Tbl_Type,
2148: X_Return_Status OUT NOCOPY VARCHAR2,
2149: X_Msg_Count OUT NOCOPY NUMBER,
2150: X_Msg_Data OUT NOCOPY VARCHAR2
2164:
2165:
2166: PROCEDURE transact_intorg_transfer (
2167: P_Api_Version_Number IN NUMBER,
2168: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
2169: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
2170: p_Trans_Items IN OUT NOCOPY Trans_Items_Tbl_Type,
2171: p_if_intransit IN BOOLEAN,
2172: X_Return_Status OUT NOCOPY VARCHAR2,
2165:
2166: PROCEDURE transact_intorg_transfer (
2167: P_Api_Version_Number IN NUMBER,
2168: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
2169: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
2170: p_Trans_Items IN OUT NOCOPY Trans_Items_Tbl_Type,
2171: p_if_intransit IN BOOLEAN,
2172: X_Return_Status OUT NOCOPY VARCHAR2,
2173: X_Msg_Count OUT NOCOPY NUMBER,
2223: CSP_TRANSACTIONS_PUB.CREATE_MOVE_ORDER_HEADER(
2224: px_header_id => l_move_order_id
2225: ,p_request_number => null
2226: ,p_api_version => 1.0
2227: ,p_Init_Msg_List => FND_API.G_TRUE
2228: ,p_commit => FND_API.G_TRUE
2229: ,p_date_required => NVL(p_date_required, sysdate)
2230: ,p_organization_id => p_Trans_Items(1).FRM_ORGANIZATION_ID
2231: ,p_from_subinventory_code => p_Trans_Items(1).FRM_SUBINVENTORY_CODE
2224: px_header_id => l_move_order_id
2225: ,p_request_number => null
2226: ,p_api_version => 1.0
2227: ,p_Init_Msg_List => FND_API.G_TRUE
2228: ,p_commit => FND_API.G_TRUE
2229: ,p_date_required => NVL(p_date_required, sysdate)
2230: ,p_organization_id => p_Trans_Items(1).FRM_ORGANIZATION_ID
2231: ,p_from_subinventory_code => p_Trans_Items(1).FRM_SUBINVENTORY_CODE
2232: ,p_to_subinventory_code => p_Trans_Items(1).TO_SUBINVENTORY_CODE
2246: ,x_msg_count => x_msg_count
2247: ,x_msg_data => x_msg_data );
2248:
2249:
2250: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2251: fnd_msg_pub.get
2252: ( p_msg_index => x_msg_count
2253: , p_encoded => FND_API.G_FALSE
2254: , p_data => x_msg_data
2249:
2250: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2251: fnd_msg_pub.get
2252: ( p_msg_index => x_msg_count
2253: , p_encoded => FND_API.G_FALSE
2254: , p_data => x_msg_data
2255: , p_msg_index_out => x_msg_count
2256: );
2257: RAISE FND_API.G_EXC_ERROR;
2253: , p_encoded => FND_API.G_FALSE
2254: , p_data => x_msg_data
2255: , p_msg_index_out => x_msg_count
2256: );
2257: RAISE FND_API.G_EXC_ERROR;
2258: ELSE
2259: FOR inx1 IN 1..p_Trans_Items.COUNT LOOP
2260: CSP_TRANSACTIONS_PUB.CREATE_MOVE_ORDER_LINE
2261: (p_api_version => 1.0
2258: ELSE
2259: FOR inx1 IN 1..p_Trans_Items.COUNT LOOP
2260: CSP_TRANSACTIONS_PUB.CREATE_MOVE_ORDER_LINE
2261: (p_api_version => 1.0
2262: ,p_Init_Msg_List => FND_API.G_TRUE
2263: ,p_commit => FND_API.G_TRUE
2264: ,px_line_id => l_line_id
2265: ,p_header_id => l_move_order_id
2266: ,p_organization_id => p_Trans_Items(inx1).FRM_ORGANIZATION_ID
2259: FOR inx1 IN 1..p_Trans_Items.COUNT LOOP
2260: CSP_TRANSACTIONS_PUB.CREATE_MOVE_ORDER_LINE
2261: (p_api_version => 1.0
2262: ,p_Init_Msg_List => FND_API.G_TRUE
2263: ,p_commit => FND_API.G_TRUE
2264: ,px_line_id => l_line_id
2265: ,p_header_id => l_move_order_id
2266: ,p_organization_id => p_Trans_Items(inx1).FRM_ORGANIZATION_ID
2267: ,p_from_subinventory_code => p_Trans_Items(inx1).FRM_SUBINVENTORY_CODE
2286: ,x_return_status => x_return_status
2287: ,x_msg_count => x_msg_count
2288: ,x_msg_data => x_msg_data );
2289:
2290: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2291: fnd_msg_pub.get
2292: ( p_msg_index => x_msg_count
2293: , p_encoded => FND_API.G_FALSE
2294: , p_data => x_msg_data
2289:
2290: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2291: fnd_msg_pub.get
2292: ( p_msg_index => x_msg_count
2293: , p_encoded => FND_API.G_FALSE
2294: , p_data => x_msg_data
2295: , p_msg_index_out => x_msg_count
2296: );
2297: p_Trans_Items(inx1).ERROR_MSG := x_msg_data;
2298: end if;
2299:
2300: END LOOP;
2301:
2302: x_return_status := FND_API.G_RET_STS_SUCCESS ;
2303: COMMIT WORK;
2304: /*
2305: open c_REQUEST_NUMBER(l_move_order_id);
2306: fetch c_REQUEST_NUMBER into x_move_order_number;
2311: END IF;
2312:
2313: EXCEPTION
2314: WHEN OTHERS THEN
2315: x_return_status := FND_API.G_RET_STS_ERROR;
2316: END create_move_order;
2317:
2318: PROCEDURE receive_requirement_trans (
2319: p_trans_header_id IN NUMBER,
2584: end if;
2585:
2586: inv_reservation_pub.relieve_reservation(
2587: p_api_version_number => 1.0
2588: ,p_init_msg_lst => fnd_api.g_false
2589: ,x_return_status => x_return_status
2590: ,x_msg_count => x_msg_count
2591: ,x_msg_data => x_msg_data
2592: ,p_rsv_rec => l_inv_reservation_rec
2590: ,x_msg_count => x_msg_count
2591: ,x_msg_data => x_msg_data
2592: ,p_rsv_rec => l_inv_reservation_rec
2593: ,p_primary_relieved_quantity => l_relieved_quantity
2594: ,p_relieve_all => fnd_api.g_false
2595: ,p_original_serial_number => l_serial_number
2596: ,p_validation_flag => fnd_api.g_true
2597: ,x_primary_relieved_quantity => l_relieved_quantity1
2598: ,x_primary_remain_quantity => l_remaining_quantity
2592: ,p_rsv_rec => l_inv_reservation_rec
2593: ,p_primary_relieved_quantity => l_relieved_quantity
2594: ,p_relieve_all => fnd_api.g_false
2595: ,p_original_serial_number => l_serial_number
2596: ,p_validation_flag => fnd_api.g_true
2597: ,x_primary_relieved_quantity => l_relieved_quantity1
2598: ,x_primary_remain_quantity => l_remaining_quantity
2599: );
2600:
2643: end if;
2644:
2645: transact_subinv_transfer(
2646: P_Api_Version_Number => 1.0,
2647: P_Init_Msg_List => FND_API.G_TRUE,
2648: P_Commit => FND_API.G_TRUE,
2649: p_Trans_Items => l_Trans_Items,
2650: X_Return_Status => x_return_status,
2651: X_Msg_Count => x_msg_count,
2644:
2645: transact_subinv_transfer(
2646: P_Api_Version_Number => 1.0,
2647: P_Init_Msg_List => FND_API.G_TRUE,
2648: P_Commit => FND_API.G_TRUE,
2649: p_Trans_Items => l_Trans_Items,
2650: X_Return_Status => x_return_status,
2651: X_Msg_Count => x_msg_count,
2652: X_Msg_Data => x_msg_data
2677: end if;
2678:
2679: transact_intorg_transfer(
2680: P_Api_Version_Number => 1.0,
2681: P_Init_Msg_List => FND_API.G_TRUE,
2682: P_Commit => FND_API.G_FALSE,
2683: p_Trans_Items => l_Trans_Items,
2684: p_if_intransit => l_if_intransit,
2685: X_Return_Status => x_return_status,
2678:
2679: transact_intorg_transfer(
2680: P_Api_Version_Number => 1.0,
2681: P_Init_Msg_List => FND_API.G_TRUE,
2682: P_Commit => FND_API.G_FALSE,
2683: p_Trans_Items => l_Trans_Items,
2684: p_if_intransit => l_if_intransit,
2685: X_Return_Status => x_return_status,
2686: X_Msg_Count => x_msg_count,
2807: end if;
2808: elsif p_trans_type = 'MO' then
2809: -- call MO receiving API
2810: CSP_MO_MTLTXNS_UTIL.confirm_receipt(P_Api_Version_Number => 1.0,
2811: P_Init_Msg_List => FND_API.G_FALSE,
2812: P_Commit => FND_API.G_FALSE,
2813: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2814: p_packlist_line_id => p_trans_record.PACKLIST_LINE_ID,
2815: p_organization_id => p_trans_record.TO_ORGANIZATION_ID,
2808: elsif p_trans_type = 'MO' then
2809: -- call MO receiving API
2810: CSP_MO_MTLTXNS_UTIL.confirm_receipt(P_Api_Version_Number => 1.0,
2811: P_Init_Msg_List => FND_API.G_FALSE,
2812: P_Commit => FND_API.G_FALSE,
2813: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2814: p_packlist_line_id => p_trans_record.PACKLIST_LINE_ID,
2815: p_organization_id => p_trans_record.TO_ORGANIZATION_ID,
2816: p_transaction_temp_id => p_trans_record.TEMP_TRANSACTION_ID,
2809: -- call MO receiving API
2810: CSP_MO_MTLTXNS_UTIL.confirm_receipt(P_Api_Version_Number => 1.0,
2811: P_Init_Msg_List => FND_API.G_FALSE,
2812: P_Commit => FND_API.G_FALSE,
2813: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2814: p_packlist_line_id => p_trans_record.PACKLIST_LINE_ID,
2815: p_organization_id => p_trans_record.TO_ORGANIZATION_ID,
2816: p_transaction_temp_id => p_trans_record.TEMP_TRANSACTION_ID,
2817: p_quantity_received => p_trans_record.QUANTITY,
2821: p_lot_number => p_trans_record.LOT_NUMBER,
2822: p_revision => p_trans_record.REVISION,
2823: p_receiving_option => 0, --0 = receiving normal, 1 = receipt short, 2 = over receipt (but do not close the packlist and move order, 3 = over receipt (close everything)
2824: px_transaction_header_id => l_mo_transaction_header_id,
2825: p_process_flag => fnd_api.g_true,
2826: X_Return_Status => x_return_status,
2827: X_Msg_Count => x_msg_count,
2828: X_Msg_Data => x_msg_data);
2829: