293: , x_msg_data => x_msg_data);
294:
295: IF ( x_return_status <> FND_API.G_RET_STS_SUCCESS )
296: THEN
297: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
298: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Reservation_Util.Get_AppsUOM_from_OPMUOM');
299: FND_MESSAGE.Set_Token('WHERE', 'Query_Reservation');
300: FND_MSG_PUB.Add;
301: raise FND_API.G_EXC_ERROR;
294:
295: IF ( x_return_status <> FND_API.G_RET_STS_SUCCESS )
296: THEN
297: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
298: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Reservation_Util.Get_AppsUOM_from_OPMUOM');
299: FND_MESSAGE.Set_Token('WHERE', 'Query_Reservation');
300: FND_MSG_PUB.Add;
301: raise FND_API.G_EXC_ERROR;
302: END IF;
295: IF ( x_return_status <> FND_API.G_RET_STS_SUCCESS )
296: THEN
297: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
298: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Reservation_Util.Get_AppsUOM_from_OPMUOM');
299: FND_MESSAGE.Set_Token('WHERE', 'Query_Reservation');
300: FND_MSG_PUB.Add;
301: raise FND_API.G_EXC_ERROR;
302: END IF;
303: /* ============================================================================================= */
314: , x_error_code => x_error_code); /* Bug 2168710 - Added parameter */
315:
316: IF ( x_return_status <> FND_API.G_RET_STS_SUCCESS )
317: THEN
318: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
319: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Reservation_Util.Validation_for_Query');
320: FND_MESSAGE.Set_Token('WHERE', 'Query_Reservation');
321: /* x_error_code := x_return_status ; */ /* Bug 2168710 */
322: x_return_status := FND_API.G_RET_STS_ERROR;
315:
316: IF ( x_return_status <> FND_API.G_RET_STS_SUCCESS )
317: THEN
318: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
319: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Reservation_Util.Validation_for_Query');
320: FND_MESSAGE.Set_Token('WHERE', 'Query_Reservation');
321: /* x_error_code := x_return_status ; */ /* Bug 2168710 */
322: x_return_status := FND_API.G_RET_STS_ERROR;
323: FND_MSG_PUB.Add;
316: IF ( x_return_status <> FND_API.G_RET_STS_SUCCESS )
317: THEN
318: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
319: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Reservation_Util.Validation_for_Query');
320: FND_MESSAGE.Set_Token('WHERE', 'Query_Reservation');
321: /* x_error_code := x_return_status ; */ /* Bug 2168710 */
322: x_return_status := FND_API.G_RET_STS_ERROR;
323: FND_MSG_PUB.Add;
324: raise FND_API.G_EXC_ERROR;
410: AND SQLCODE <> 100)
411: THEN
412: x_error_code := SQLCODE;
413: GMI_reservation_Util.PrintLn('(opm_dbg) in GMI_Reservation_PVT.Query_reservation SQLCODE:error='||SQLCODE||'.');
414: FND_MESSAGE.Set_Name('GMI','GMI_SQL_ERROR');
415: FND_MESSAGE.Set_Token('WHERE', 'Query_Reservation');
416: FND_MESSAGE.Set_Token('SQL_CODE', SQLCODE);
417: FND_MESSAGE.Set_Token('SQL_ERRM', SQLERRM);
418: FND_MSG_PUB.Add;
411: THEN
412: x_error_code := SQLCODE;
413: GMI_reservation_Util.PrintLn('(opm_dbg) in GMI_Reservation_PVT.Query_reservation SQLCODE:error='||SQLCODE||'.');
414: FND_MESSAGE.Set_Name('GMI','GMI_SQL_ERROR');
415: FND_MESSAGE.Set_Token('WHERE', 'Query_Reservation');
416: FND_MESSAGE.Set_Token('SQL_CODE', SQLCODE);
417: FND_MESSAGE.Set_Token('SQL_ERRM', SQLERRM);
418: FND_MSG_PUB.Add;
419: raise FND_API.G_EXC_ERROR;
412: x_error_code := SQLCODE;
413: GMI_reservation_Util.PrintLn('(opm_dbg) in GMI_Reservation_PVT.Query_reservation SQLCODE:error='||SQLCODE||'.');
414: FND_MESSAGE.Set_Name('GMI','GMI_SQL_ERROR');
415: FND_MESSAGE.Set_Token('WHERE', 'Query_Reservation');
416: FND_MESSAGE.Set_Token('SQL_CODE', SQLCODE);
417: FND_MESSAGE.Set_Token('SQL_ERRM', SQLERRM);
418: FND_MSG_PUB.Add;
419: raise FND_API.G_EXC_ERROR;
420: END IF;
413: GMI_reservation_Util.PrintLn('(opm_dbg) in GMI_Reservation_PVT.Query_reservation SQLCODE:error='||SQLCODE||'.');
414: FND_MESSAGE.Set_Name('GMI','GMI_SQL_ERROR');
415: FND_MESSAGE.Set_Token('WHERE', 'Query_Reservation');
416: FND_MESSAGE.Set_Token('SQL_CODE', SQLCODE);
417: FND_MESSAGE.Set_Token('SQL_ERRM', SQLERRM);
418: FND_MSG_PUB.Add;
419: raise FND_API.G_EXC_ERROR;
420: END IF;
421:
563:
564: IF (p_rsv_rec.reservation_quantity = 0)
565: THEN
566: GMI_reservation_Util.PrintLn('(opm_dbg) in end of PVT c ERROR:Nothing to reserve.');
567: FND_MESSAGE.Set_Name('GMI','GMI_NOTHING_TO_RESERVE');
568: FND_MSG_PUB.Add;
569: RAISE FND_API.G_EXC_ERROR;
570: END IF;
571:
593: /* There may have been a problem getting the rows */
594: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)
595: THEN
596: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT c: Error Returned by Query_Reservation.');
597: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
598: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_reservation_pub.Query_Reservation');
599: FND_MESSAGE.Set_Token('WHERE', 'Create_Reservation');
600: FND_MSG_PUB.ADD;
601: RAISE FND_API.G_EXC_ERROR;
594: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)
595: THEN
596: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT c: Error Returned by Query_Reservation.');
597: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
598: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_reservation_pub.Query_Reservation');
599: FND_MESSAGE.Set_Token('WHERE', 'Create_Reservation');
600: FND_MSG_PUB.ADD;
601: RAISE FND_API.G_EXC_ERROR;
602: END IF;
595: THEN
596: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT c: Error Returned by Query_Reservation.');
597: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
598: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_reservation_pub.Query_Reservation');
599: FND_MESSAGE.Set_Token('WHERE', 'Create_Reservation');
600: FND_MSG_PUB.ADD;
601: RAISE FND_API.G_EXC_ERROR;
602: END IF;
603:
617:
618: IF ( x_return_status <> FND_API.G_RET_STS_SUCCESS )
619: THEN
620: GMI_reservation_Util.PrintLn('(opm_dbg) in end of PVT c ERROR:Returned by Validation_Before_Allocate.');
621: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
622: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Reservation_Util.Validation_before_Allocate');
623: FND_MESSAGE.Set_Token('WHERE', 'Create_Reservation');
624: FND_MSG_PUB.Add;
625: RAISE FND_API.G_EXC_ERROR;
618: IF ( x_return_status <> FND_API.G_RET_STS_SUCCESS )
619: THEN
620: GMI_reservation_Util.PrintLn('(opm_dbg) in end of PVT c ERROR:Returned by Validation_Before_Allocate.');
621: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
622: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Reservation_Util.Validation_before_Allocate');
623: FND_MESSAGE.Set_Token('WHERE', 'Create_Reservation');
624: FND_MSG_PUB.Add;
625: RAISE FND_API.G_EXC_ERROR;
626: END IF;
619: THEN
620: GMI_reservation_Util.PrintLn('(opm_dbg) in end of PVT c ERROR:Returned by Validation_Before_Allocate.');
621: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
622: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Reservation_Util.Validation_before_Allocate');
623: FND_MESSAGE.Set_Token('WHERE', 'Create_Reservation');
624: FND_MSG_PUB.Add;
625: RAISE FND_API.G_EXC_ERROR;
626: END IF;
627:
672: /* Test the default_Loct constant.*/
673: IF (GMI_Reservation_Util.G_DEFAULT_LOCT IS NULL)
674: THEN
675: GMI_reservation_Util.PrintLn('(opm_dbg) in end of PVT c ERROR:Cannot get default lot.');
676: FND_MESSAGE.Set_Name('GMI','SY_API_UNABLE_TO_GET_CONSTANT');
677: FND_MESSAGE.Set_Token('CONSTANT_NAME','IC$DEFAULT_LOCT');
678: FND_MSG_PUB.Add;
679: RAISE FND_API.G_EXC_ERROR;
680: END IF;
673: IF (GMI_Reservation_Util.G_DEFAULT_LOCT IS NULL)
674: THEN
675: GMI_reservation_Util.PrintLn('(opm_dbg) in end of PVT c ERROR:Cannot get default lot.');
676: FND_MESSAGE.Set_Name('GMI','SY_API_UNABLE_TO_GET_CONSTANT');
677: FND_MESSAGE.Set_Token('CONSTANT_NAME','IC$DEFAULT_LOCT');
678: FND_MSG_PUB.Add;
679: RAISE FND_API.G_EXC_ERROR;
680: END IF;
681:
689:
690: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)
691: THEN
692: GMI_reservation_Util.PrintLn('(opm_dbg) in end of PVT c ERROR:Returned by Get_Default_Lot.');
693: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
694: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Reservation_Util.Get_Default_Lot');
695: FND_MESSAGE.Set_Token('WHERE', 'Create_Reservation');
696: FND_MSG_PUB.Add;
697: RAISE FND_API.G_EXC_ERROR;
690: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)
691: THEN
692: GMI_reservation_Util.PrintLn('(opm_dbg) in end of PVT c ERROR:Returned by Get_Default_Lot.');
693: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
694: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Reservation_Util.Get_Default_Lot');
695: FND_MESSAGE.Set_Token('WHERE', 'Create_Reservation');
696: FND_MSG_PUB.Add;
697: RAISE FND_API.G_EXC_ERROR;
698: END IF;
691: THEN
692: GMI_reservation_Util.PrintLn('(opm_dbg) in end of PVT c ERROR:Returned by Get_Default_Lot.');
693: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
694: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Reservation_Util.Get_Default_Lot');
695: FND_MESSAGE.Set_Token('WHERE', 'Create_Reservation');
696: FND_MSG_PUB.Add;
697: RAISE FND_API.G_EXC_ERROR;
698: END IF;
699:
708: );
709:
710: IF (l_lock_status = FALSE) THEN
711: GMI_reservation_Util.PrintLn('(opm_dbg) in end of PVT c ERROR:Returned by Lock_Inventory.');
712: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
713: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Locks.Lock_Inventory');
714: FND_MESSAGE.Set_Token('WHERE', 'Create_Reservation');
715: FND_MSG_PUB.Add;
716: GMI_reservation_Util.PrintLn('return 1 in lock inventory');
709:
710: IF (l_lock_status = FALSE) THEN
711: GMI_reservation_Util.PrintLn('(opm_dbg) in end of PVT c ERROR:Returned by Lock_Inventory.');
712: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
713: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Locks.Lock_Inventory');
714: FND_MESSAGE.Set_Token('WHERE', 'Create_Reservation');
715: FND_MSG_PUB.Add;
716: GMI_reservation_Util.PrintLn('return 1 in lock inventory');
717: RETURN;
710: IF (l_lock_status = FALSE) THEN
711: GMI_reservation_Util.PrintLn('(opm_dbg) in end of PVT c ERROR:Returned by Lock_Inventory.');
712: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
713: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Locks.Lock_Inventory');
714: FND_MESSAGE.Set_Token('WHERE', 'Create_Reservation');
715: FND_MSG_PUB.Add;
716: GMI_reservation_Util.PrintLn('return 1 in lock inventory');
717: RETURN;
718: -- RAISE FND_API.G_EXC_ERROR; Bug2516545
739:
740: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)
741: THEN
742: GMI_reservation_Util.PrintLn('(opm_dbg) in end of PVT c ERROR:Returned by Create_Default_Lot.');
743: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
744: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Reservation_Util.Create_Default_Lot');
745: FND_MESSAGE.Set_Token('WHERE', 'Create_Reservation');
746: FND_MSG_PUB.Add;
747: RAISE FND_API.G_EXC_ERROR;
740: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)
741: THEN
742: GMI_reservation_Util.PrintLn('(opm_dbg) in end of PVT c ERROR:Returned by Create_Default_Lot.');
743: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
744: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Reservation_Util.Create_Default_Lot');
745: FND_MESSAGE.Set_Token('WHERE', 'Create_Reservation');
746: FND_MSG_PUB.Add;
747: RAISE FND_API.G_EXC_ERROR;
748: END IF;
741: THEN
742: GMI_reservation_Util.PrintLn('(opm_dbg) in end of PVT c ERROR:Returned by Create_Default_Lot.');
743: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
744: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Reservation_Util.Create_Default_Lot');
745: FND_MESSAGE.Set_Token('WHERE', 'Create_Reservation');
746: FND_MSG_PUB.Add;
747: RAISE FND_API.G_EXC_ERROR;
748: END IF;
749:
778: );
779: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)
780: THEN
781: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT d ERROR: Returned by Update_Transaction() updating the default record.');
782: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
783: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_TRANS_ENGINE_PUB.UPDATE_PENDING_TRANSACTION');
784: FND_MESSAGE.Set_Token('WHERE', 'Delete_Reservation');
785: FND_MSG_PUB.Add;
786: RAISE FND_API.G_EXC_ERROR;
779: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)
780: THEN
781: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT d ERROR: Returned by Update_Transaction() updating the default record.');
782: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
783: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_TRANS_ENGINE_PUB.UPDATE_PENDING_TRANSACTION');
784: FND_MESSAGE.Set_Token('WHERE', 'Delete_Reservation');
785: FND_MSG_PUB.Add;
786: RAISE FND_API.G_EXC_ERROR;
787: END IF;
780: THEN
781: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT d ERROR: Returned by Update_Transaction() updating the default record.');
782: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
783: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_TRANS_ENGINE_PUB.UPDATE_PENDING_TRANSACTION');
784: FND_MESSAGE.Set_Token('WHERE', 'Delete_Reservation');
785: FND_MSG_PUB.Add;
786: RAISE FND_API.G_EXC_ERROR;
787: END IF;
788: /* =============================================================================================*/
818: /* comment this out, no need after bug 2245351*/
819: /*IF (l_allocation_rec.cust_no = ' ' OR l_allocation_rec.cust_no IS NULL)
820: THEN
821: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT c : Customer is not synchronized. SO_line_id='||l_allocation_rec.line_id);
822: FND_MESSAGE.Set_Name('GML','GML_CUST_NOT_OPM_SYNCHRONIZED');
823: FND_MESSAGE.Set_Token('SO_LINE_ID', l_allocation_rec.line_id);
824: FND_MSG_PUB.Add;
825: RAISE FND_API.G_EXC_ERROR;
826: END IF;*/
819: /*IF (l_allocation_rec.cust_no = ' ' OR l_allocation_rec.cust_no IS NULL)
820: THEN
821: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT c : Customer is not synchronized. SO_line_id='||l_allocation_rec.line_id);
822: FND_MESSAGE.Set_Name('GML','GML_CUST_NOT_OPM_SYNCHRONIZED');
823: FND_MESSAGE.Set_Token('SO_LINE_ID', l_allocation_rec.line_id);
824: FND_MSG_PUB.Add;
825: RAISE FND_API.G_EXC_ERROR;
826: END IF;*/
827: /* End of Bug 1479751*/
843: );
844:
845: IF (l_lock_status = FALSE) THEN
846: GMI_reservation_Util.PrintLn('(opm_dbg) in end of PVT c ERROR:Returned by Lock_Inventory.');
847: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
848: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Locks.Lock_Inventory');
849: FND_MESSAGE.Set_Token('WHERE', 'Create_Reservation');
850: FND_MSG_PUB.Add;
851: -- RAISE FND_API.G_EXC_ERROR; Bug2516545
844:
845: IF (l_lock_status = FALSE) THEN
846: GMI_reservation_Util.PrintLn('(opm_dbg) in end of PVT c ERROR:Returned by Lock_Inventory.');
847: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
848: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Locks.Lock_Inventory');
849: FND_MESSAGE.Set_Token('WHERE', 'Create_Reservation');
850: FND_MSG_PUB.Add;
851: -- RAISE FND_API.G_EXC_ERROR; Bug2516545
852: GMI_reservation_Util.PrintLn('return 2 in lock inventory');
845: IF (l_lock_status = FALSE) THEN
846: GMI_reservation_Util.PrintLn('(opm_dbg) in end of PVT c ERROR:Returned by Lock_Inventory.');
847: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
848: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Locks.Lock_Inventory');
849: FND_MESSAGE.Set_Token('WHERE', 'Create_Reservation');
850: FND_MSG_PUB.Add;
851: -- RAISE FND_API.G_EXC_ERROR; Bug2516545
852: GMI_reservation_Util.PrintLn('return 2 in lock inventory');
853: RETURN;
869: );
870:
871: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
872: GMI_reservation_Util.PrintLn('(opm_dbg) in end of PVT c ERROR:Returned by Allocate_Inventory.');
873: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
874: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Auto_Allocate_PUB.Allocate_Inventory');
875: FND_MESSAGE.Set_Token('WHERE', 'Create_Reservation');
876: FND_MSG_PUB.Add;
877: RAISE FND_API.G_EXC_ERROR;
870:
871: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
872: GMI_reservation_Util.PrintLn('(opm_dbg) in end of PVT c ERROR:Returned by Allocate_Inventory.');
873: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
874: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Auto_Allocate_PUB.Allocate_Inventory');
875: FND_MESSAGE.Set_Token('WHERE', 'Create_Reservation');
876: FND_MSG_PUB.Add;
877: RAISE FND_API.G_EXC_ERROR;
878: END IF;
871: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
872: GMI_reservation_Util.PrintLn('(opm_dbg) in end of PVT c ERROR:Returned by Allocate_Inventory.');
873: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
874: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Auto_Allocate_PUB.Allocate_Inventory');
875: FND_MESSAGE.Set_Token('WHERE', 'Create_Reservation');
876: FND_MSG_PUB.Add;
877: RAISE FND_API.G_EXC_ERROR;
878: END IF;
879: ELSE
1017: ,x_msg_count => x_msg_count
1018: ,x_msg_data => x_msg_data);
1019: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1020: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u : Error Returned by Validation_before_Update');
1021: FND_MESSAGE.SET_NAME('GMI','ERROR_IN_VALIDATION_BEFORE_UPDATE');
1022: FND_MSG_PUB.ADD;
1023: RAISE FND_API.G_EXC_ERROR;
1024: END IF;
1025: */
1046:
1047: /* There may not be any rows*/
1048: IF (GMI_Reservation_Util.ic_tran_rec_tbl.COUNT = 0) THEN
1049: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: Error No Rows Found in mtl_reservation');
1050: FND_MESSAGE.SET_NAME('GMI','GMI_QTY_RSV_NOT_FOUND');
1051: FND_MESSAGE.Set_Token('WHERE', 'Update_Reservation');
1052: FND_MESSAGE.Set_Token('SO_LINE_ID', p_original_rsv_rec.demand_source_line_id);
1053: FND_MSG_PUB.ADD;
1054: RAISE FND_API.G_EXC_ERROR;
1047: /* There may not be any rows*/
1048: IF (GMI_Reservation_Util.ic_tran_rec_tbl.COUNT = 0) THEN
1049: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: Error No Rows Found in mtl_reservation');
1050: FND_MESSAGE.SET_NAME('GMI','GMI_QTY_RSV_NOT_FOUND');
1051: FND_MESSAGE.Set_Token('WHERE', 'Update_Reservation');
1052: FND_MESSAGE.Set_Token('SO_LINE_ID', p_original_rsv_rec.demand_source_line_id);
1053: FND_MSG_PUB.ADD;
1054: RAISE FND_API.G_EXC_ERROR;
1055: END IF;
1048: IF (GMI_Reservation_Util.ic_tran_rec_tbl.COUNT = 0) THEN
1049: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: Error No Rows Found in mtl_reservation');
1050: FND_MESSAGE.SET_NAME('GMI','GMI_QTY_RSV_NOT_FOUND');
1051: FND_MESSAGE.Set_Token('WHERE', 'Update_Reservation');
1052: FND_MESSAGE.Set_Token('SO_LINE_ID', p_original_rsv_rec.demand_source_line_id);
1053: FND_MSG_PUB.ADD;
1054: RAISE FND_API.G_EXC_ERROR;
1055: END IF;
1056:
1057: /* There may have been a problem getting the rows*/
1058: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)
1059: THEN
1060: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: Error Returned by Query_Reservation.');
1061: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1062: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_reservation_pub.Query_Reservation');
1063: FND_MESSAGE.Set_Token('WHERE', 'Update_Reservation');
1064: FND_MSG_PUB.ADD;
1065: RAISE FND_API.G_EXC_ERROR;
1058: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)
1059: THEN
1060: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: Error Returned by Query_Reservation.');
1061: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1062: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_reservation_pub.Query_Reservation');
1063: FND_MESSAGE.Set_Token('WHERE', 'Update_Reservation');
1064: FND_MSG_PUB.ADD;
1065: RAISE FND_API.G_EXC_ERROR;
1066: END IF;
1059: THEN
1060: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: Error Returned by Query_Reservation.');
1061: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1062: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_reservation_pub.Query_Reservation');
1063: FND_MESSAGE.Set_Token('WHERE', 'Update_Reservation');
1064: FND_MSG_PUB.ADD;
1065: RAISE FND_API.G_EXC_ERROR;
1066: END IF;
1067:
1076: , x_msg_data => x_msg_data);
1077:
1078: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1079: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: Error Returned by Get_Default_Lot.');
1080: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1081: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Reservation_Util.Get_Default_Lot');
1082: FND_MESSAGE.Set_Token('WHERE', 'Update_Reservation');
1083: FND_MSG_PUB.ADD;
1084: RAISE FND_API.G_EXC_ERROR;
1077:
1078: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1079: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: Error Returned by Get_Default_Lot.');
1080: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1081: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Reservation_Util.Get_Default_Lot');
1082: FND_MESSAGE.Set_Token('WHERE', 'Update_Reservation');
1083: FND_MSG_PUB.ADD;
1084: RAISE FND_API.G_EXC_ERROR;
1085: END IF;
1078: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1079: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: Error Returned by Get_Default_Lot.');
1080: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1081: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Reservation_Util.Get_Default_Lot');
1082: FND_MESSAGE.Set_Token('WHERE', 'Update_Reservation');
1083: FND_MSG_PUB.ADD;
1084: RAISE FND_API.G_EXC_ERROR;
1085: END IF;
1086:
1107:
1108: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)
1109: THEN
1110: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: Error Returned by Get_Allocation.');
1111: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1112: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Reservation_Util.Get_Allocation');
1113: FND_MESSAGE.Set_Token('WHERE', 'Update_Reservation');
1114: FND_MSG_PUB.ADD;
1115: RAISE FND_API.G_EXC_ERROR;
1108: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)
1109: THEN
1110: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: Error Returned by Get_Allocation.');
1111: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1112: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Reservation_Util.Get_Allocation');
1113: FND_MESSAGE.Set_Token('WHERE', 'Update_Reservation');
1114: FND_MSG_PUB.ADD;
1115: RAISE FND_API.G_EXC_ERROR;
1116: END IF;
1109: THEN
1110: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: Error Returned by Get_Allocation.');
1111: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1112: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Reservation_Util.Get_Allocation');
1113: FND_MESSAGE.Set_Token('WHERE', 'Update_Reservation');
1114: FND_MSG_PUB.ADD;
1115: RAISE FND_API.G_EXC_ERROR;
1116: END IF;
1117:
1158: END IF;
1159: IF (x_return_status = FND_API.G_RET_STS_ERROR)
1160: THEN
1161: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: Error Returned by Get_OPMUOMfromAppsUOM ');
1162: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1163: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Reservation_Util.Get_OPMUOM_from_AppsUOM');
1164: FND_MESSAGE.Set_Token('WHERE', 'Update_Reservation');
1165: FND_MSG_PUB.add;
1166: RAISE FND_API.G_EXC_ERROR;
1159: IF (x_return_status = FND_API.G_RET_STS_ERROR)
1160: THEN
1161: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: Error Returned by Get_OPMUOMfromAppsUOM ');
1162: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1163: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Reservation_Util.Get_OPMUOM_from_AppsUOM');
1164: FND_MESSAGE.Set_Token('WHERE', 'Update_Reservation');
1165: FND_MSG_PUB.add;
1166: RAISE FND_API.G_EXC_ERROR;
1167: END IF;
1160: THEN
1161: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: Error Returned by Get_OPMUOMfromAppsUOM ');
1162: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1163: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Reservation_Util.Get_OPMUOM_from_AppsUOM');
1164: FND_MESSAGE.Set_Token('WHERE', 'Update_Reservation');
1165: FND_MSG_PUB.add;
1166: RAISE FND_API.G_EXC_ERROR;
1167: END IF;
1168:
1244: ,x_msg_data => x_msg_data);
1245:
1246: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1247: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: Error returned by GMI_TRANS_ENGINE_PUB.UPDATE_PENDING_TRANSACTION.');
1248: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1249: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_TRANS_ENGINE_PUB.UPDATE_PENDING_TRANSACTION');
1250: FND_MESSAGE.Set_Token('WHERE', 'Update_Reservation');
1251: FND_MSG_PUB.Add;
1252: RAISE FND_API.G_EXC_ERROR;
1245:
1246: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1247: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: Error returned by GMI_TRANS_ENGINE_PUB.UPDATE_PENDING_TRANSACTION.');
1248: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1249: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_TRANS_ENGINE_PUB.UPDATE_PENDING_TRANSACTION');
1250: FND_MESSAGE.Set_Token('WHERE', 'Update_Reservation');
1251: FND_MSG_PUB.Add;
1252: RAISE FND_API.G_EXC_ERROR;
1253: END IF;
1246: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1247: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: Error returned by GMI_TRANS_ENGINE_PUB.UPDATE_PENDING_TRANSACTION.');
1248: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1249: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_TRANS_ENGINE_PUB.UPDATE_PENDING_TRANSACTION');
1250: FND_MESSAGE.Set_Token('WHERE', 'Update_Reservation');
1251: FND_MSG_PUB.Add;
1252: RAISE FND_API.G_EXC_ERROR;
1253: END IF;
1254:
1277: ,x_msg_data => x_msg_data);
1278:
1279: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1280: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: Error returned by GMI_TRANS_ENGINE_PUB.UPDATE_PENDING_TRANSACTION.');
1281: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1282: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_TRANS_ENGINE_PUB.UPDATE_PENDING_TRANSACTION');
1283: FND_MESSAGE.Set_Token('WHERE', 'Update_Reservation');
1284: FND_MSG_PUB.Add;
1285: RAISE FND_API.G_EXC_ERROR;
1278:
1279: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1280: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: Error returned by GMI_TRANS_ENGINE_PUB.UPDATE_PENDING_TRANSACTION.');
1281: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1282: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_TRANS_ENGINE_PUB.UPDATE_PENDING_TRANSACTION');
1283: FND_MESSAGE.Set_Token('WHERE', 'Update_Reservation');
1284: FND_MSG_PUB.Add;
1285: RAISE FND_API.G_EXC_ERROR;
1286: END IF;
1279: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1280: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: Error returned by GMI_TRANS_ENGINE_PUB.UPDATE_PENDING_TRANSACTION.');
1281: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1282: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_TRANS_ENGINE_PUB.UPDATE_PENDING_TRANSACTION');
1283: FND_MESSAGE.Set_Token('WHERE', 'Update_Reservation');
1284: FND_MSG_PUB.Add;
1285: RAISE FND_API.G_EXC_ERROR;
1286: END IF;
1287: ELSE
1311: ,x_msg_data => x_msg_data);
1312:
1313: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1314: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: ERROR Returned by Delete_Transaction().');
1315: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1316: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_TRANS_ENGINE_PUB.DELETE_PENDING_TRANSACTION');
1317: FND_MESSAGE.Set_Token('WHERE', 'Update_Reservation');
1318: FND_MSG_PUB.Add;
1319: RAISE FND_API.G_EXC_ERROR;
1312:
1313: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1314: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: ERROR Returned by Delete_Transaction().');
1315: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1316: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_TRANS_ENGINE_PUB.DELETE_PENDING_TRANSACTION');
1317: FND_MESSAGE.Set_Token('WHERE', 'Update_Reservation');
1318: FND_MSG_PUB.Add;
1319: RAISE FND_API.G_EXC_ERROR;
1320: END IF;
1313: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1314: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: ERROR Returned by Delete_Transaction().');
1315: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1316: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_TRANS_ENGINE_PUB.DELETE_PENDING_TRANSACTION');
1317: FND_MESSAGE.Set_Token('WHERE', 'Update_Reservation');
1318: FND_MSG_PUB.Add;
1319: RAISE FND_API.G_EXC_ERROR;
1320: END IF;
1321:
1340: ,x_msg_data => x_msg_data);
1341:
1342: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1343: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: ERROR Returned by Update_Pending_Transaction updating the default record.');
1344: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1345: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_TRANS_ENGINE_PUB.UPDATE_PENDING_TRANSACTION');
1346: FND_MESSAGE.Set_Token('WHERE', 'Update_Reservation');
1347: FND_MSG_PUB.Add;
1348: RAISE FND_API.G_EXC_ERROR;
1341:
1342: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1343: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: ERROR Returned by Update_Pending_Transaction updating the default record.');
1344: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1345: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_TRANS_ENGINE_PUB.UPDATE_PENDING_TRANSACTION');
1346: FND_MESSAGE.Set_Token('WHERE', 'Update_Reservation');
1347: FND_MSG_PUB.Add;
1348: RAISE FND_API.G_EXC_ERROR;
1349: END IF;
1342: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1343: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: ERROR Returned by Update_Pending_Transaction updating the default record.');
1344: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1345: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_TRANS_ENGINE_PUB.UPDATE_PENDING_TRANSACTION');
1346: FND_MESSAGE.Set_Token('WHERE', 'Update_Reservation');
1347: FND_MSG_PUB.Add;
1348: RAISE FND_API.G_EXC_ERROR;
1349: END IF;
1350: END IF;
1374: /* There may not be any rows*/
1375: IF (GMI_Reservation_Util.ic_tran_rec_tbl.COUNT = 0)
1376: THEN
1377: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: Called Query_Reservation Received NoError No Rows Found in mtl_reservation');
1378: /* FND_MESSAGE.Set_Name('GMI','GMI_QRY_RSV_NOT_FOUND');*/
1379: /* FND_MESSAGE.Set_Token('WHERE', 'Update_Reservation');*/
1380: /* FND_MESSAGE.Set_Token('SO_LINE_ID', p_to_rsv_rec.demand_source_line_id);*/
1381: /* FND_MSG_PUB.ADD;*/
1382: /* RAISE FND_API.G_EXC_ERROR;*/
1375: IF (GMI_Reservation_Util.ic_tran_rec_tbl.COUNT = 0)
1376: THEN
1377: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: Called Query_Reservation Received NoError No Rows Found in mtl_reservation');
1378: /* FND_MESSAGE.Set_Name('GMI','GMI_QRY_RSV_NOT_FOUND');*/
1379: /* FND_MESSAGE.Set_Token('WHERE', 'Update_Reservation');*/
1380: /* FND_MESSAGE.Set_Token('SO_LINE_ID', p_to_rsv_rec.demand_source_line_id);*/
1381: /* FND_MSG_PUB.ADD;*/
1382: /* RAISE FND_API.G_EXC_ERROR;*/
1383: END IF;
1376: THEN
1377: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: Called Query_Reservation Received NoError No Rows Found in mtl_reservation');
1378: /* FND_MESSAGE.Set_Name('GMI','GMI_QRY_RSV_NOT_FOUND');*/
1379: /* FND_MESSAGE.Set_Token('WHERE', 'Update_Reservation');*/
1380: /* FND_MESSAGE.Set_Token('SO_LINE_ID', p_to_rsv_rec.demand_source_line_id);*/
1381: /* FND_MSG_PUB.ADD;*/
1382: /* RAISE FND_API.G_EXC_ERROR;*/
1383: END IF;
1384:
1385: /* There may have been a problem getting the rows*/
1386: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)
1387: THEN
1388: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: Error Returned by Query_Reservation.');
1389: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1390: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Reservation_Util.Query_Reservation');
1391: FND_MESSAGE.Set_Token('WHERE', 'Update_Reservation');
1392: FND_MSG_PUB.ADD;
1393: RAISE FND_API.G_EXC_ERROR;
1386: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)
1387: THEN
1388: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: Error Returned by Query_Reservation.');
1389: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1390: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Reservation_Util.Query_Reservation');
1391: FND_MESSAGE.Set_Token('WHERE', 'Update_Reservation');
1392: FND_MSG_PUB.ADD;
1393: RAISE FND_API.G_EXC_ERROR;
1394: END IF;
1387: THEN
1388: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: Error Returned by Query_Reservation.');
1389: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1390: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Reservation_Util.Query_Reservation');
1391: FND_MESSAGE.Set_Token('WHERE', 'Update_Reservation');
1392: FND_MSG_PUB.ADD;
1393: RAISE FND_API.G_EXC_ERROR;
1394: END IF;
1395:
1534: /* If we were able to find records then*/
1535: IF (GMI_Reservation_Util.ic_tran_rec_tbl.COUNT <= 0)
1536: THEN
1537: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT d ERROR: No records found to delete.');
1538: FND_MESSAGE.Set_name('GMI','GMI_ERROR');
1539: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Reservation_Util.Query_Reservation');
1540: FND_MESSAGE.Set_Token('WHERE', 'Delete_Reservation');
1541: FND_MSG_PUB.Add;
1542: RAISE FND_API.G_EXC_ERROR;
1535: IF (GMI_Reservation_Util.ic_tran_rec_tbl.COUNT <= 0)
1536: THEN
1537: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT d ERROR: No records found to delete.');
1538: FND_MESSAGE.Set_name('GMI','GMI_ERROR');
1539: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Reservation_Util.Query_Reservation');
1540: FND_MESSAGE.Set_Token('WHERE', 'Delete_Reservation');
1541: FND_MSG_PUB.Add;
1542: RAISE FND_API.G_EXC_ERROR;
1543: END IF;
1536: THEN
1537: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT d ERROR: No records found to delete.');
1538: FND_MESSAGE.Set_name('GMI','GMI_ERROR');
1539: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Reservation_Util.Query_Reservation');
1540: FND_MESSAGE.Set_Token('WHERE', 'Delete_Reservation');
1541: FND_MSG_PUB.Add;
1542: RAISE FND_API.G_EXC_ERROR;
1543: END IF;
1544:
1550:
1551: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)
1552: THEN
1553: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT d ERROR: No records found to delete.');
1554: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1555: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Reservation_Util.Get_Default_Lot');
1556: FND_MESSAGE.Set_Token('WHERE', 'Delete_Reservation');
1557: FND_MSG_PUB.Add;
1558: RAISE FND_API.G_EXC_ERROR;
1551: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)
1552: THEN
1553: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT d ERROR: No records found to delete.');
1554: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1555: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Reservation_Util.Get_Default_Lot');
1556: FND_MESSAGE.Set_Token('WHERE', 'Delete_Reservation');
1557: FND_MSG_PUB.Add;
1558: RAISE FND_API.G_EXC_ERROR;
1559: END IF;
1552: THEN
1553: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT d ERROR: No records found to delete.');
1554: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1555: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Reservation_Util.Get_Default_Lot');
1556: FND_MESSAGE.Set_Token('WHERE', 'Delete_Reservation');
1557: FND_MSG_PUB.Add;
1558: RAISE FND_API.G_EXC_ERROR;
1559: END IF;
1560:
1574: , x_msg_data => x_msg_data);
1575:
1576: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1577: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT d ERROR: Returned by Get_Allocation().');
1578: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1579: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Reservation_Util.Get_Allocation');
1580: FND_MESSAGE.Set_Token('WHERE', 'Delete_Reservation');
1581: FND_MSG_PUB.Add;
1582: RAISE FND_API.G_EXC_ERROR;
1575:
1576: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1577: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT d ERROR: Returned by Get_Allocation().');
1578: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1579: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Reservation_Util.Get_Allocation');
1580: FND_MESSAGE.Set_Token('WHERE', 'Delete_Reservation');
1581: FND_MSG_PUB.Add;
1582: RAISE FND_API.G_EXC_ERROR;
1583: END IF;
1576: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1577: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT d ERROR: Returned by Get_Allocation().');
1578: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1579: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Reservation_Util.Get_Allocation');
1580: FND_MESSAGE.Set_Token('WHERE', 'Delete_Reservation');
1581: FND_MSG_PUB.Add;
1582: RAISE FND_API.G_EXC_ERROR;
1583: END IF;
1584:
1608:
1609: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)
1610: THEN
1611: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT d ERROR: Returned by Delete_Transaction().');
1612: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1613: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_TRANS_ENGINE_PUB.DELETE_PENDING_TRANSACTION');
1614: FND_MESSAGE.Set_Token('WHERE', 'Delete_Reservation');
1615: FND_MSG_PUB.Add;
1616: RAISE FND_API.G_EXC_ERROR;
1609: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)
1610: THEN
1611: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT d ERROR: Returned by Delete_Transaction().');
1612: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1613: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_TRANS_ENGINE_PUB.DELETE_PENDING_TRANSACTION');
1614: FND_MESSAGE.Set_Token('WHERE', 'Delete_Reservation');
1615: FND_MSG_PUB.Add;
1616: RAISE FND_API.G_EXC_ERROR;
1617: END IF;
1610: THEN
1611: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT d ERROR: Returned by Delete_Transaction().');
1612: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1613: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_TRANS_ENGINE_PUB.DELETE_PENDING_TRANSACTION');
1614: FND_MESSAGE.Set_Token('WHERE', 'Delete_Reservation');
1615: FND_MSG_PUB.Add;
1616: RAISE FND_API.G_EXC_ERROR;
1617: END IF;
1618:
1629: );
1630: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)
1631: THEN
1632: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT d ERROR: Returned by Update_Transaction() updating the default record.');
1633: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1634: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_TRANS_ENGINE_PUB.UPDATE_PENDING_TRANSACTION');
1635: FND_MESSAGE.Set_Token('WHERE', 'Delete_Reservation');
1636: FND_MSG_PUB.Add;
1637: RAISE FND_API.G_EXC_ERROR;
1630: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)
1631: THEN
1632: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT d ERROR: Returned by Update_Transaction() updating the default record.');
1633: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1634: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_TRANS_ENGINE_PUB.UPDATE_PENDING_TRANSACTION');
1635: FND_MESSAGE.Set_Token('WHERE', 'Delete_Reservation');
1636: FND_MSG_PUB.Add;
1637: RAISE FND_API.G_EXC_ERROR;
1638: END IF;
1631: THEN
1632: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT d ERROR: Returned by Update_Transaction() updating the default record.');
1633: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1634: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_TRANS_ENGINE_PUB.UPDATE_PENDING_TRANSACTION');
1635: FND_MESSAGE.Set_Token('WHERE', 'Delete_Reservation');
1636: FND_MSG_PUB.Add;
1637: RAISE FND_API.G_EXC_ERROR;
1638: END IF;
1639: ELSE
1666:
1667: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)
1668: THEN
1669: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT d ERROR: Returned by Balancing the default record.');
1670: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1671: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_RESERVATION_UTIL.balance_default_lot');
1672: FND_MESSAGE.Set_Token('WHERE', 'Delete_Reservation');
1673: FND_MSG_PUB.Add;
1674: RAISE FND_API.G_EXC_ERROR;
1667: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)
1668: THEN
1669: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT d ERROR: Returned by Balancing the default record.');
1670: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1671: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_RESERVATION_UTIL.balance_default_lot');
1672: FND_MESSAGE.Set_Token('WHERE', 'Delete_Reservation');
1673: FND_MSG_PUB.Add;
1674: RAISE FND_API.G_EXC_ERROR;
1675: END IF;
1668: THEN
1669: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT d ERROR: Returned by Balancing the default record.');
1670: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1671: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_RESERVATION_UTIL.balance_default_lot');
1672: FND_MESSAGE.Set_Token('WHERE', 'Delete_Reservation');
1673: FND_MSG_PUB.Add;
1674: RAISE FND_API.G_EXC_ERROR;
1675: END IF;
1676:
1691: ,x_msg_data => x_msg_data);
1692: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)
1693: THEN
1694: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT d ERROR: Returned by Update_Transaction() updating the default record.');
1695: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1696: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_TRANS_ENGINE_PUB.UPDATE_PENDING_TRANSACTION');
1697: FND_MESSAGE.Set_Token('WHERE', 'Delete_Reservation');
1698: FND_MSG_PUB.Add;
1699: RAISE FND_API.G_EXC_ERROR;
1692: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)
1693: THEN
1694: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT d ERROR: Returned by Update_Transaction() updating the default record.');
1695: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1696: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_TRANS_ENGINE_PUB.UPDATE_PENDING_TRANSACTION');
1697: FND_MESSAGE.Set_Token('WHERE', 'Delete_Reservation');
1698: FND_MSG_PUB.Add;
1699: RAISE FND_API.G_EXC_ERROR;
1700: END IF;
1693: THEN
1694: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT d ERROR: Returned by Update_Transaction() updating the default record.');
1695: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
1696: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_TRANS_ENGINE_PUB.UPDATE_PENDING_TRANSACTION');
1697: FND_MESSAGE.Set_Token('WHERE', 'Delete_Reservation');
1698: FND_MSG_PUB.Add;
1699: RAISE FND_API.G_EXC_ERROR;
1700: END IF;
1701: END IF;
1798: l_api_name CONSTANT VARCHAR2 (30) := 'Transfer_Reservation';
1799:
1800: BEGIN
1801:
1802: FND_MESSAGE.SET_NAME('GMI','GMI_RSV_UNAVAILABLE');
1803: OE_MSG_PUB.Add;
1804: RAISE FND_API.G_EXC_ERROR;
1805:
1806: EXCEPTION
2753: THEN
2754: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2755: CLOSE get_item_ctl;
2756: GMI_RESERVATION_UTIL.PrintLn('Error retrieving item details');
2757: FND_MESSAGE.Set_Name('GMI','GMI_API_ITEM_NOT_FOUND');
2758: FND_MESSAGE.Set_Token('ORGANIZATION_ID', p_organization_id);
2759: FND_MSG_PUB.Add;
2760: RAISE FND_API.G_EXC_ERROR;
2761: ELSE
2754: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2755: CLOSE get_item_ctl;
2756: GMI_RESERVATION_UTIL.PrintLn('Error retrieving item details');
2757: FND_MESSAGE.Set_Name('GMI','GMI_API_ITEM_NOT_FOUND');
2758: FND_MESSAGE.Set_Token('ORGANIZATION_ID', p_organization_id);
2759: FND_MSG_PUB.Add;
2760: RAISE FND_API.G_EXC_ERROR;
2761: ELSE
2762: CLOSE get_item_ctl;
2768: IF ( get_whse_code%NOTFOUND ) THEN
2769: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2770: CLOSE get_whse_code;
2771: GMI_RESERVATION_UTIL.PrintLn('Error retrieving whse code');
2772: FND_MESSAGE.SET_NAME('GMI','GMI_API_WHSE_NOT_FOUND');
2773: FND_MESSAGE.SET_TOKEN('ORG', p_organization_id);
2774: FND_MESSAGE.SET_TOKEN('LINE_ID', p_demand_source_line_id);
2775: FND_MSG_PUB.Add;
2776: RAISE FND_API.G_EXC_ERROR;
2769: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2770: CLOSE get_whse_code;
2771: GMI_RESERVATION_UTIL.PrintLn('Error retrieving whse code');
2772: FND_MESSAGE.SET_NAME('GMI','GMI_API_WHSE_NOT_FOUND');
2773: FND_MESSAGE.SET_TOKEN('ORG', p_organization_id);
2774: FND_MESSAGE.SET_TOKEN('LINE_ID', p_demand_source_line_id);
2775: FND_MSG_PUB.Add;
2776: RAISE FND_API.G_EXC_ERROR;
2777: ELSE
2770: CLOSE get_whse_code;
2771: GMI_RESERVATION_UTIL.PrintLn('Error retrieving whse code');
2772: FND_MESSAGE.SET_NAME('GMI','GMI_API_WHSE_NOT_FOUND');
2773: FND_MESSAGE.SET_TOKEN('ORG', p_organization_id);
2774: FND_MESSAGE.SET_TOKEN('LINE_ID', p_demand_source_line_id);
2775: FND_MSG_PUB.Add;
2776: RAISE FND_API.G_EXC_ERROR;
2777: ELSE
2778: CLOSE get_whse_code;