DBA Data[Home] [Help]

APPS.GMI_RESERVATION_PVT dependencies on FND_API

Line 42: | FND_API.G_MISS_NUM. |

38: | for prior reservations project. Bug#2670928 |
39: | 23-MAR-2004 P.Raghu Bug#3411704 |
40: | Modified procedure Update_Reservation such that |
41: | reserved quantity is calculated if it is equal to |
42: | FND_API.G_MISS_NUM. |
43: +========================================================================+
44: API Name : GMI_Reservation_PVT
45: Type : Private - Package Body
46: Function : This package contains Private procedures used to

Line 131: , p_validation_flag IN VARCHAR2 DEFAULT fnd_api.g_true

127: (
128: x_return_status OUT NOCOPY VARCHAR2
129: , x_msg_count OUT NOCOPY NUMBER
130: , x_msg_data OUT NOCOPY VARCHAR2
131: , p_validation_flag IN VARCHAR2 DEFAULT fnd_api.g_true
132: , p_query_input IN inv_reservation_global.mtl_reservation_rec_type
133: , p_lock_records IN VARCHAR2 DEFAULT fnd_api.g_false
134: , x_mtl_reservation_tbl OUT NOCOPY inv_reservation_global.mtl_reservation_tbl_type
135: , x_mtl_reservation_tbl_count OUT NOCOPY NUMBER

Line 133: , p_lock_records IN VARCHAR2 DEFAULT fnd_api.g_false

129: , x_msg_count OUT NOCOPY NUMBER
130: , x_msg_data OUT NOCOPY VARCHAR2
131: , p_validation_flag IN VARCHAR2 DEFAULT fnd_api.g_true
132: , p_query_input IN inv_reservation_global.mtl_reservation_rec_type
133: , p_lock_records IN VARCHAR2 DEFAULT fnd_api.g_false
134: , x_mtl_reservation_tbl OUT NOCOPY inv_reservation_global.mtl_reservation_tbl_type
135: , x_mtl_reservation_tbl_count OUT NOCOPY NUMBER
136: , x_error_code OUT NOCOPY NUMBER
137: ) IS

Line 180: x_return_status := FND_API.G_RET_STS_SUCCESS;

176: /* GMI_reservation_Util.PrintLn('(opm_dbg) in PVT q : reservation_uom_code='||p_query_input.reservation_uom_code||'.'); */
177: /* GMI_reservation_Util.PrintLn('(opm_dbg) in PVT q : reservation_quantity='||p_query_input.reservation_quantity||'.'); */
178:
179: /* Initialize API return status to success */
180: x_return_status := FND_API.G_RET_STS_SUCCESS;
181:
182: /* ============================================================================================= */
183: /* Reinit the transaction cache. */
184: /* ============================================================================================= */

Line 295: IF ( x_return_status <> FND_API.G_RET_STS_SUCCESS )

291: , x_return_status => x_return_status
292: , x_msg_count => x_msg_count
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');

Line 301: raise FND_API.G_EXC_ERROR;

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: /* ============================================================================================= */
304: /* Validation for the query (private level) */
305: /* ============================================================================================= */

Line 316: IF ( x_return_status <> FND_API.G_RET_STS_SUCCESS )

312: , x_msg_count => x_msg_count
313: , x_msg_data => x_msg_data
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');

Line 322: x_return_status := FND_API.G_RET_STS_ERROR;

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;
325: END IF;
326: END IF;

Line 324: raise FND_API.G_EXC_ERROR;

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;
325: END IF;
326: END IF;
327:
328: /* ============================================================================================= */

Line 398: WHEN FND_API.G_EXC_ERROR THEN

394:
395:
396:
397: EXCEPTION
398: WHEN FND_API.G_EXC_ERROR THEN
399: x_return_status := FND_API.G_RET_STS_ERROR;
400:
401: /* Get message count and data */
402: FND_MSG_PUB.count_and_get

Line 399: x_return_status := FND_API.G_RET_STS_ERROR;

395:
396:
397: EXCEPTION
398: WHEN FND_API.G_EXC_ERROR THEN
399: x_return_status := FND_API.G_RET_STS_ERROR;
400:
401: /* Get message count and data */
402: FND_MSG_PUB.count_and_get
403: ( p_count => x_msg_count

Line 408: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

404: , p_data => x_msg_data
405: );
406:
407: WHEN OTHERS THEN
408: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
409: IF ( SQLCODE <> 0
410: AND SQLCODE <> 100)
411: THEN
412: x_error_code := SQLCODE;

Line 419: raise FND_API.G_EXC_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:
422: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME
423: , l_api_name

Line 474: , p_validation_flag IN VARCHAR2 DEFAULT FND_API.G_TRUE

470: (
471: x_return_status OUT NOCOPY VARCHAR2
472: , x_msg_count OUT NOCOPY NUMBER
473: , x_msg_data OUT NOCOPY VARCHAR2
474: , p_validation_flag IN VARCHAR2 DEFAULT FND_API.G_TRUE
475: , p_rsv_rec IN INV_reservation_global.mtl_reservation_rec_type
476: , p_serial_number IN INV_reservation_global.serial_number_tbl_type
477: , x_serial_number OUT NOCOPY INV_reservation_global.serial_number_tbl_type
478: , p_partial_reservation_flag IN VARCHAR2 DEFAULT FND_API.G_FALSE

Line 478: , p_partial_reservation_flag IN VARCHAR2 DEFAULT FND_API.G_FALSE

474: , p_validation_flag IN VARCHAR2 DEFAULT FND_API.G_TRUE
475: , p_rsv_rec IN INV_reservation_global.mtl_reservation_rec_type
476: , p_serial_number IN INV_reservation_global.serial_number_tbl_type
477: , x_serial_number OUT NOCOPY INV_reservation_global.serial_number_tbl_type
478: , p_partial_reservation_flag IN VARCHAR2 DEFAULT FND_API.G_FALSE
479: , p_force_reservation_flag IN VARCHAR2 DEFAULT FND_API.G_FALSE
480: , x_quantity_reserved OUT NOCOPY NUMBER
481: , x_reservation_id OUT NOCOPY NUMBER
482: ) IS

Line 479: , p_force_reservation_flag IN VARCHAR2 DEFAULT FND_API.G_FALSE

475: , p_rsv_rec IN INV_reservation_global.mtl_reservation_rec_type
476: , p_serial_number IN INV_reservation_global.serial_number_tbl_type
477: , x_serial_number OUT NOCOPY INV_reservation_global.serial_number_tbl_type
478: , p_partial_reservation_flag IN VARCHAR2 DEFAULT FND_API.G_FALSE
479: , p_force_reservation_flag IN VARCHAR2 DEFAULT FND_API.G_FALSE
480: , x_quantity_reserved OUT NOCOPY NUMBER
481: , x_reservation_id OUT NOCOPY NUMBER
482: ) IS
483:

Line 546: x_return_status := FND_API.G_RET_STS_SUCCESS;

542:
543: /* ============================================================================================= */
544: /* Initialize API return status to success */
545: /* =============================================================================================*/
546: x_return_status := FND_API.G_RET_STS_SUCCESS;
547:
548: /* if detailed allocation exists, no need to go through the process
549: because auto alloation engin does not take detailed lines for requests
550: */

Line 569: RAISE FND_API.G_EXC_ERROR;

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:
572: /* =============================================================================================*/
573: /* Following a pb in August2000, as the query_reservation seems to not be called systematically,*/

Line 579: , p_init_msg_lst => FND_API.G_FALSE

575: /* ============================================================================================= */
576: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT c: GMI_Reservation_Util.ic_tran_rec_tbl.COUNT = 0, calling Query_Reservation.');
577: GMI_reservation_pub.Query_Reservation
578: ( p_api_version_number => 1.0
579: , p_init_msg_lst => FND_API.G_FALSE
580: , x_return_status => x_return_status
581: , x_msg_count => x_msg_count
582: , x_msg_data => x_msg_data
583: , p_validation_flag => p_validation_flag

Line 589: , p_lock_records => FND_API.G_FALSE

585: , p_cancel_order_mode => INV_RESERVATION_GLOBAL.G_CANCEL_ORDER_YES
586: , x_mtl_reservation_tbl => l_mtl_reservation_tbl
587: , x_mtl_reservation_tbl_count => l_mtl_rsv_tbl_count
588: , x_error_code => x_error_code
589: , p_lock_records => FND_API.G_FALSE
590: , p_sort_by_req_date => inv_reservation_global.g_query_no_sort
591: );
592:
593: /* There may have been a problem getting the rows */

Line 594: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)

590: , p_sort_by_req_date => inv_reservation_global.g_query_no_sort
591: );
592:
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');

Line 601: RAISE FND_API.G_EXC_ERROR;

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:
604: /* At this point the table ic_tran_rec_tbl should have rows*/
605:

Line 618: IF ( x_return_status <> FND_API.G_RET_STS_SUCCESS )

614: , x_return_status => x_return_status
615: , x_msg_count => x_msg_count
616: , x_msg_data => x_msg_data);
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');

Line 625: RAISE FND_API.G_EXC_ERROR;

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:
628:
629:

Line 679: RAISE FND_API.G_EXC_ERROR;

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:
682:
683: /* Retrieve the default lot in the transaction*/

Line 690: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)

686: , x_return_status => x_return_status
687: , x_msg_count => x_msg_count
688: , x_msg_data => x_msg_data);
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');

Line 697: RAISE FND_API.G_EXC_ERROR;

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:
700: /* =============================================================================================*/
701: /* Lock rows in ic_loct_inv.*/

Line 718: -- RAISE FND_API.G_EXC_ERROR; Bug2516545

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
719: END IF;
720:
721: End Bug 2521215 */
722:

Line 740: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)

736: , x_return_status => x_return_status
737: , x_msg_count => x_msg_count
738: , x_msg_data => x_msg_data);
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');

Line 747: RAISE FND_API.G_EXC_ERROR;

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:
750: ELSE
751: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT c DefaultLot already exist NO Error (Going to update the default lot transaction).');

Line 754: IF p_rsv_rec.requirement_date <> FND_API.G_MISS_DATE THEN

750: ELSE
751: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT c DefaultLot already exist NO Error (Going to update the default lot transaction).');
752: l_default_tran_rec := GMI_Reservation_Util.ic_tran_rec_tbl(l_default_lot_index);
753: /* bug 2240221*/
754: IF p_rsv_rec.requirement_date <> FND_API.G_MISS_DATE THEN
755: l_default_tran_rec.trans_date := p_rsv_rec.requirement_date ;
756: END IF;
757:
758:

Line 779: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)

775: , x_return_status => x_return_status
776: , x_msg_count => x_msg_count
777: , x_msg_data => x_msg_data
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');

Line 786: RAISE FND_API.G_EXC_ERROR;

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: /* =============================================================================================*/
789: /* Set the trans_id of the default transaction (passed as a parameter)*/
790: /* =============================================================================================*/

Line 813: IF ( (l_ic_item_mst_rec.alloc_class <> FND_API.G_MISS_CHAR

809: IF (l_ic_item_mst_rec.lot_ctl > 0) OR
810: (l_ic_item_mst_rec.loct_ctl > 0 AND l_whse_ctl > 0)
811: -- end fabdi
812: THEN
813: IF ( (l_ic_item_mst_rec.alloc_class <> FND_API.G_MISS_CHAR
814: AND l_ic_item_mst_rec.alloc_class IS NOT NULL )
815: AND p_force_reservation_flag = FND_API.G_TRUE)
816: THEN
817: /* 7-Nov-2000 odaboval : Bug 1479751 : Added the test and a message.*/

Line 815: AND p_force_reservation_flag = FND_API.G_TRUE)

811: -- end fabdi
812: THEN
813: IF ( (l_ic_item_mst_rec.alloc_class <> FND_API.G_MISS_CHAR
814: AND l_ic_item_mst_rec.alloc_class IS NOT NULL )
815: AND p_force_reservation_flag = FND_API.G_TRUE)
816: THEN
817: /* 7-Nov-2000 odaboval : Bug 1479751 : Added the test and a message.*/
818: /* comment this out, no need after bug 2245351*/
819: /*IF (l_allocation_rec.cust_no = ' ' OR l_allocation_rec.cust_no IS NULL)

Line 825: RAISE FND_API.G_EXC_ERROR;

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*/
828:
829: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT c : Lock Rows then Call allocation engine');

Line 851: -- RAISE FND_API.G_EXC_ERROR; Bug2516545

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;
854: END IF;
855: End Bug 2521215 */

Line 859: , P_INIT_MSG_LIST => FND_API.G_FALSE

855: End Bug 2521215 */
856:
857: GMI_Auto_Allocate_PUB.Allocate_Inventory(
858: P_API_VERSION => 1.0
859: , P_INIT_MSG_LIST => FND_API.G_FALSE
860: , P_COMMIT => FND_API.G_FALSE
861: , P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
862: , P_ALLOCATION_REC => l_allocation_rec
863: , X_RESERVATION_ID => X_RESERVATION_ID

Line 860: , P_COMMIT => FND_API.G_FALSE

856:
857: GMI_Auto_Allocate_PUB.Allocate_Inventory(
858: P_API_VERSION => 1.0
859: , P_INIT_MSG_LIST => FND_API.G_FALSE
860: , P_COMMIT => FND_API.G_FALSE
861: , P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
862: , P_ALLOCATION_REC => l_allocation_rec
863: , X_RESERVATION_ID => X_RESERVATION_ID
864: , X_ALLOCATED_QTY1 => X_ALLOCATED_QTY1

Line 861: , P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL

857: GMI_Auto_Allocate_PUB.Allocate_Inventory(
858: P_API_VERSION => 1.0
859: , P_INIT_MSG_LIST => FND_API.G_FALSE
860: , P_COMMIT => FND_API.G_FALSE
861: , P_VALIDATION_LEVEL => FND_API.G_VALID_LEVEL_FULL
862: , P_ALLOCATION_REC => l_allocation_rec
863: , X_RESERVATION_ID => X_RESERVATION_ID
864: , X_ALLOCATED_QTY1 => X_ALLOCATED_QTY1
865: , X_ALLOCATED_QTY2 => X_ALLOCATED_QTY2

Line 871: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

867: , X_MSG_COUNT => X_MSG_COUNT
868: , X_MSG_DATA => X_MSG_DATA
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');

Line 877: RAISE FND_API.G_EXC_ERROR;

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
880: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT c : Manual Allocation or HighLevelReservation: Only Default Lot.');
881: END IF;

Line 900: WHEN FND_API.G_EXC_ERROR THEN

896:
897: /* =============================================================================================*/
898: /* Error*/
899: /* =============================================================================================*/
900: WHEN FND_API.G_EXC_ERROR THEN
901: GMI_Reservation_Util.PrintLn('in end of PVT c ERROR.');
902: x_return_status := FND_API.G_RET_STS_ERROR;
903:
904: /* Get message count and data*/

Line 902: x_return_status := FND_API.G_RET_STS_ERROR;

898: /* Error*/
899: /* =============================================================================================*/
900: WHEN FND_API.G_EXC_ERROR THEN
901: GMI_Reservation_Util.PrintLn('in end of PVT c ERROR.');
902: x_return_status := FND_API.G_RET_STS_ERROR;
903:
904: /* Get message count and data*/
905: FND_MSG_PUB.count_and_get
906: ( p_count => x_msg_count

Line 912: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

908: );
909:
910: WHEN OTHERS THEN
911: GMI_Reservation_Util.PrintLn('in end of PVT c ERROR:Other.');
912: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
913:
914: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME
915: , l_api_name
916: );

Line 961: | is equal to FND_API.G_MISS_NUM. |

957: | HISTORY |
958: | 21-FEB-2000 odaboval Created |
959: | 23-MAR-2004 P.Raghu Bug#3411704 |
960: | Reserved quantity is calculated correctly if it|
961: | is equal to FND_API.G_MISS_NUM. |
962: | |
963: +==========================================================================+
964: Api end of comments
965: */

Line 971: , p_validation_flag IN VARCHAR2 DEFAULT fnd_api.g_true

967: (
968: x_return_status OUT NOCOPY VARCHAR2
969: , x_msg_count OUT NOCOPY NUMBER
970: , x_msg_data OUT NOCOPY VARCHAR2
971: , p_validation_flag IN VARCHAR2 DEFAULT fnd_api.g_true
972: , p_original_rsv_rec IN inv_reservation_global.mtl_reservation_rec_type
973: , p_to_rsv_rec IN inv_reservation_global.mtl_reservation_rec_type
974: , p_original_serial_number IN inv_reservation_global.serial_number_tbl_type
975: , p_to_serial_number IN inv_reservation_global.serial_number_tbl_type

Line 978: l_commit VARCHAR2(5) := fnd_api.g_false;

974: , p_original_serial_number IN inv_reservation_global.serial_number_tbl_type
975: , p_to_serial_number IN inv_reservation_global.serial_number_tbl_type
976: ) IS
977:
978: l_commit VARCHAR2(5) := fnd_api.g_false;
979: l_validation_level VARCHAR2(4) := fnd_api.g_valid_level_full;
980: l_api_name CONSTANT VARCHAR2(30) := 'Update_Reservation';
981: l_api_version CONSTANT VARCHAR2(10) := '1.0';
982:

Line 979: l_validation_level VARCHAR2(4) := fnd_api.g_valid_level_full;

975: , p_to_serial_number IN inv_reservation_global.serial_number_tbl_type
976: ) IS
977:
978: l_commit VARCHAR2(5) := fnd_api.g_false;
979: l_validation_level VARCHAR2(4) := fnd_api.g_valid_level_full;
980: l_api_name CONSTANT VARCHAR2(30) := 'Update_Reservation';
981: l_api_version CONSTANT VARCHAR2(10) := '1.0';
982:
983: l_temp_tran_row IC_TRAN_PND%ROWTYPE;

Line 1010: x_return_status := FND_API.G_RET_STS_SUCCESS;

1006:
1007:
1008: BEGIN
1009: GMI_reservation_Util.PrintLn('(opm_dbg) Entering PVT u.');
1010: x_return_status := FND_API.G_RET_STS_SUCCESS;
1011:
1012: /* GMI_Reservation_Util.Validation_before_Update(
1013: p_mtl_rsv_rec => p_to_rsv_rec
1014: ,x_ic_tran_rec => l_ic_tran_rec_out

Line 1019: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

1015: ,x_orgn_code => x_orgn_code
1016: ,x_return_status => x_return_status
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;

Line 1023: RAISE FND_API.G_EXC_ERROR;

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: */
1026: GMI_reservation_Util.PrintLn('ATTRIBUTE2 => ' || p_to_rsv_rec.attribute2);
1027: GMI_reservation_Util.PrintLn('ATTRIBUTE3 => ' || p_to_rsv_rec.attribute3);

Line 1033: ,p_init_msg_lst => fnd_api.g_false

1029: /* The query_reservation may not have been called prior to getting here so call it now */
1030: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: Reinit GMI_Reservation_Util.ic_tran_rec_tbl, calling Query_Reservation.');
1031: GMI_reservation_pub.Query_Reservation
1032: ( p_api_version_number => 1.0
1033: ,p_init_msg_lst => fnd_api.g_false
1034: ,x_return_status => x_return_status
1035: ,x_msg_count => x_msg_count
1036: ,x_msg_data => x_msg_data
1037: ,p_validation_flag => p_validation_flag

Line 1043: ,p_lock_records => fnd_api.g_false

1039: ,p_cancel_order_mode => INV_RESERVATION_GLOBAL.G_CANCEL_ORDER_YES
1040: ,x_mtl_reservation_tbl => l_old_mtl_reservation_tbl
1041: ,x_mtl_reservation_tbl_count => l_old_mtl_rsv_tbl_count
1042: ,x_error_code => x_error_code
1043: ,p_lock_records => fnd_api.g_false
1044: ,p_sort_by_req_date => inv_reservation_global.g_query_no_sort
1045: );
1046:
1047: /* There may not be any rows*/

Line 1054: RAISE FND_API.G_EXC_ERROR;

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)

Line 1058: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)

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');

Line 1065: RAISE FND_API.G_EXC_ERROR;

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:
1068: /* At this point the table should have rows*/
1069:

Line 1078: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

1074: , x_return_status => x_return_status
1075: , x_msg_count => x_msg_count
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');

Line 1084: RAISE FND_API.G_EXC_ERROR;

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:
1087: /* Populate local default row to hold values for comparision*/
1088: l_default_tran_rec := GMI_Reservation_Util.ic_tran_rec_tbl(l_default_lot_index);

Line 1108: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)

1104: ,x_return_status => x_return_status
1105: ,x_msg_count => x_msg_count
1106: ,x_msg_data => x_msg_data);
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');

Line 1115: RAISE FND_API.G_EXC_ERROR;

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:
1118: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: Not updating the default, save orig trans to local rec.');
1119: l_original_tran_rec := GMI_Reservation_Util.ic_tran_rec_tbl(l_original_tran_index);

Line 1130: IF p_to_rsv_rec.primary_reservation_quantity = FND_API.G_MISS_NUM

1126: /* Convert the new rsv qty to the opm item uom*/
1127: /* This way it doesn't matter what the new rsv uom is */
1128: /* -----------------------------------------------------------------------------------*/
1129: /* map to rsv um to opm um*/
1130: IF p_to_rsv_rec.primary_reservation_quantity = FND_API.G_MISS_NUM
1131: or nvl(p_to_rsv_rec.primary_reservation_quantity,0) = 0 THEN
1132: l_to_rsv_qty := p_to_rsv_rec.reservation_quantity;
1133: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: primary_res_qty is null and rsv qty is'||l_to_rsv_qty);
1134: l_to_rsv_um := p_to_rsv_rec.reservation_uom_code;

Line 1136: IF l_to_rsv_qty = FND_API.G_MISS_NUM THEN

1132: l_to_rsv_qty := p_to_rsv_rec.reservation_quantity;
1133: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: primary_res_qty is null and rsv qty is'||l_to_rsv_qty);
1134: l_to_rsv_um := p_to_rsv_rec.reservation_uom_code;
1135: --Begin Bug#3411704
1136: IF l_to_rsv_qty = FND_API.G_MISS_NUM THEN
1137: l_to_rsv_qty := p_original_rsv_rec.primary_reservation_quantity;
1138: END IF;
1139: --End Bug#3411704
1140: -- IF l_to_rsv_um is NULL THEN

Line 1142: -- PK Bug 3606481. l_to_rsv_um should not be compared to FND_API.G_MISS_NUM. Removed part of OR clause.

1138: END IF;
1139: --End Bug#3411704
1140: -- IF l_to_rsv_um is NULL THEN
1141: /* Bug 2882209*/
1142: -- PK Bug 3606481. l_to_rsv_um should not be compared to FND_API.G_MISS_NUM. Removed part of OR clause.
1143: IF (l_to_rsv_um is NULL OR l_to_rsv_um = FND_API.G_MISS_CHAR) THEN
1144: l_to_rsv_um := p_original_rsv_rec.reservation_uom_code;
1145: END IF;
1146: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: rsv uom is'||l_to_rsv_um);

Line 1143: IF (l_to_rsv_um is NULL OR l_to_rsv_um = FND_API.G_MISS_CHAR) THEN

1139: --End Bug#3411704
1140: -- IF l_to_rsv_um is NULL THEN
1141: /* Bug 2882209*/
1142: -- PK Bug 3606481. l_to_rsv_um should not be compared to FND_API.G_MISS_NUM. Removed part of OR clause.
1143: IF (l_to_rsv_um is NULL OR l_to_rsv_um = FND_API.G_MISS_CHAR) THEN
1144: l_to_rsv_um := p_original_rsv_rec.reservation_uom_code;
1145: END IF;
1146: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: rsv uom is'||l_to_rsv_um);
1147: GMI_Reservation_Util.Get_OPMUOM_from_AppsUOM(p_apps_uom => l_to_rsv_um

Line 1159: IF (x_return_status = FND_API.G_RET_STS_ERROR)

1155: l_opm_uom := l_original_tran_rec.trans_um;
1156: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: primary_res_qty is not null '||l_to_rsv_qty);
1157: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: uom '||l_opm_uom);
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');

Line 1166: RAISE FND_API.G_EXC_ERROR;

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:
1169: /* convert the new rsv qty to the item um qty*/
1170: IF (l_original_tran_rec.trans_um <> l_opm_uom)

Line 1189: IF p_to_rsv_rec.attribute2 = FND_API.G_MISS_CHAR or p_to_rsv_rec.attribute2 is null

1185: /* Always the same as the transaction in IC_TRAN_PND*/
1186: /* Therefore there will be no conversions so Store the Value.*/
1187:
1188: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: attribute2'||p_to_rsv_rec.attribute2);
1189: IF p_to_rsv_rec.attribute2 = FND_API.G_MISS_CHAR or p_to_rsv_rec.attribute2 is null
1190: THEN
1191: l_new_rsv_to_item_um_qty2 := NULL;
1192: ELSE
1193: l_new_rsv_to_item_um_qty2 := to_number(p_to_rsv_rec.attribute2);

Line 1223: IF p_to_rsv_rec.requirement_date <> FND_API.G_MISS_DATE THEN

1219: /* ======================================================= */
1220: /* Beginning of the process*/
1221: /* =======================================================*/
1222: /* bug 2240221*/
1223: IF p_to_rsv_rec.requirement_date <> FND_API.G_MISS_DATE THEN
1224: l_default_tran_rec.trans_date := p_to_rsv_rec.requirement_date;
1225: END IF;
1226:
1227: IF (l_default_tran_rec.trans_id = p_original_rsv_rec.reservation_id)

Line 1237: ,p_init_msg_list => fnd_api.g_false

1233: GMI_reservation_Util.PrintLn('(opm_dbg)in PVT u: Update PRIM default Lot to:' || l_default_tran_rec.trans_qty );
1234: GMI_reservation_Util.PrintLn('(opm_dbg)in PVT u: Update SECO default Lot to:' || l_default_tran_rec.trans_qty2 );
1235: GMI_TRANS_ENGINE_PUB.UPDATE_PENDING_TRANSACTION(
1236: p_api_version => 1.0
1237: ,p_init_msg_list => fnd_api.g_false
1238: ,p_commit => l_commit
1239: ,p_validation_level => l_validation_level
1240: ,p_tran_rec => l_default_tran_rec
1241: ,x_tran_row => l_temp_tran_row

Line 1246: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

1242: ,x_return_status => x_return_status
1243: ,x_msg_count => x_msg_count
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');

Line 1252: RAISE FND_API.G_EXC_ERROR;

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:
1255: ELSE
1256: /* the p_to_rsv_rec is not the default lot ...*/

Line 1270: ,p_init_msg_list => fnd_api.g_false

1266: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: New qty is More than old ');
1267: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: Update default row trans_qty to '|| l_default_tran_rec.trans_qty);
1268: GMI_TRANS_ENGINE_PUB.UPDATE_PENDING_TRANSACTION(
1269: p_api_version => 1.0
1270: ,p_init_msg_list => fnd_api.g_false
1271: ,p_commit => l_commit
1272: ,p_validation_level => l_validation_level
1273: ,p_tran_rec => l_default_tran_rec
1274: ,x_tran_row => l_temp_tran_row

Line 1279: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

1275: ,x_return_status => x_return_status
1276: ,x_msg_count => x_msg_count
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');

Line 1285: RAISE FND_API.G_EXC_ERROR;

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
1288: /* --------------------------------------------------------------------*/
1289: /* Otherwise call opm delete reservation to remove old allocation*/

Line 1304: ,p_init_msg_list => fnd_api.g_false

1300: GMI_reservation_Util.PrintLn('(opm_dbg) trans_id='|| l_original_tran_rec.trans_id );
1301:
1302: GMI_TRANS_ENGINE_PUB.DELETE_PENDING_TRANSACTION(
1303: p_api_version => 1.0
1304: ,p_init_msg_list => fnd_api.g_false
1305: ,p_commit => l_commit
1306: ,p_validation_level => l_validation_level
1307: ,p_tran_rec => l_original_tran_rec
1308: ,x_tran_row => l_temp_tran_row

Line 1313: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

1309: ,x_return_status => x_return_status
1310: ,x_msg_count => x_msg_count
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');

Line 1319: RAISE FND_API.G_EXC_ERROR;

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:
1322: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u: After DELETE_PENDING_TRANSACTION.');
1323:

Line 1333: ,p_init_msg_list => fnd_api.g_false

1329:
1330: /* Using the modified copy update the default record by calling the transaction engine*/
1331: GMI_TRANS_ENGINE_PUB.UPDATE_PENDING_TRANSACTION(
1332: p_api_version => 1.0
1333: ,p_init_msg_list => fnd_api.g_false
1334: ,p_commit => l_commit
1335: ,p_validation_level => l_validation_level
1336: ,p_tran_rec => l_default_tran_rec
1337: ,x_tran_row => l_temp_tran_row

Line 1342: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

1338: ,x_return_status => x_return_status
1339: ,x_msg_count => x_msg_count
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');

Line 1348: RAISE FND_API.G_EXC_ERROR;

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;
1351: END IF;
1352:

Line 1359: ,p_init_msg_lst => fnd_api.g_false

1355: /* -------------------------------------*/
1356: GMI_reservation_Util.PrintLn('(opm_dbg) in before leaving PVT u: calling Query_Reservation.');
1357: GMI_reservation_pub.Query_Reservation
1358: ( p_api_version_number => 1.0
1359: ,p_init_msg_lst => fnd_api.g_false
1360: ,x_return_status => x_return_status
1361: ,x_msg_count => x_msg_count
1362: ,x_msg_data => x_msg_data
1363: ,p_validation_flag => p_validation_flag

Line 1370: ,p_lock_records => fnd_api.g_false

1366: ,p_cancel_order_mode => INV_RESERVATION_GLOBAL.G_CANCEL_ORDER_YES
1367: ,x_mtl_reservation_tbl => l_old_mtl_reservation_tbl
1368: ,x_mtl_reservation_tbl_count => l_old_mtl_rsv_tbl_count
1369: ,x_error_code => x_error_code
1370: ,p_lock_records => fnd_api.g_false
1371: ,p_sort_by_req_date => inv_reservation_global.g_query_no_sort
1372: );
1373:
1374: /* There may not be any rows*/

Line 1382: /* RAISE FND_API.G_EXC_ERROR;*/

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)

Line 1386: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)

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');

Line 1393: RAISE FND_API.G_EXC_ERROR;

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:
1396:
1397: GMI_reservation_Util.PrintLn('(opm_dbg) leaving PVT u NO Error');

Line 1400: WHEN FND_API.G_EXC_ERROR THEN

1396:
1397: GMI_reservation_Util.PrintLn('(opm_dbg) leaving PVT u NO Error');
1398:
1399: EXCEPTION
1400: WHEN FND_API.G_EXC_ERROR THEN
1401: x_return_status := FND_API.G_RET_STS_ERROR;
1402:
1403: /* Get message count and data*/
1404: FND_MSG_PUB.count_and_get

Line 1401: x_return_status := FND_API.G_RET_STS_ERROR;

1397: GMI_reservation_Util.PrintLn('(opm_dbg) leaving PVT u NO Error');
1398:
1399: EXCEPTION
1400: WHEN FND_API.G_EXC_ERROR THEN
1401: x_return_status := FND_API.G_RET_STS_ERROR;
1402:
1403: /* Get message count and data*/
1404: FND_MSG_PUB.count_and_get
1405: ( p_count => x_msg_count

Line 1412: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1408:
1409: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u EXCEPTION: Expected');
1410:
1411: WHEN OTHERS THEN
1412: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1413:
1414: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME
1415: , l_api_name
1416: );

Line 1466: , p_validation_flag IN VARCHAR2 DEFAULT fnd_api.g_true

1462: (
1463: x_return_status OUT NOCOPY VARCHAR2
1464: , x_msg_count OUT NOCOPY NUMBER
1465: , x_msg_data OUT NOCOPY VARCHAR2
1466: , p_validation_flag IN VARCHAR2 DEFAULT fnd_api.g_true
1467: , p_rsv_rec IN inv_reservation_global.mtl_reservation_rec_type
1468: , p_serial_number IN inv_reservation_global.serial_number_tbl_type
1469: ) IS
1470:

Line 1473: l_commit VARCHAR2(5) := fnd_api.g_false;

1469: ) IS
1470:
1471: l_api_name CONSTANT VARCHAR2 (30) := 'Delete_Reservation';
1472:
1473: l_commit VARCHAR2(5) := fnd_api.g_false;
1474: l_validation_level VARCHAR2(4) := fnd_api.g_valid_level_full;
1475: l_default_tran_rec GMI_TRANS_ENGINE_PUB.ictran_rec;
1476: l_tran_to_delete_rec GMI_TRANS_ENGINE_PUB.ictran_rec;
1477: l_temp_tran_row IC_TRAN_PND%ROWTYPE;

Line 1474: l_validation_level VARCHAR2(4) := fnd_api.g_valid_level_full;

1470:
1471: l_api_name CONSTANT VARCHAR2 (30) := 'Delete_Reservation';
1472:
1473: l_commit VARCHAR2(5) := fnd_api.g_false;
1474: l_validation_level VARCHAR2(4) := fnd_api.g_valid_level_full;
1475: l_default_tran_rec GMI_TRANS_ENGINE_PUB.ictran_rec;
1476: l_tran_to_delete_rec GMI_TRANS_ENGINE_PUB.ictran_rec;
1477: l_temp_tran_row IC_TRAN_PND%ROWTYPE;
1478: l_default_lot_index BINARY_INTEGER;

Line 1515: x_return_status := FND_API.G_RET_STS_SUCCESS;

1511: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT d: demand_source_line_id='||p_rsv_rec.demand_source_line_id||'.');
1512: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT d: primary_uom_code='||p_rsv_rec.primary_uom_code||'.');
1513:
1514: /* Initialize API return status to success*/
1515: x_return_status := FND_API.G_RET_STS_SUCCESS;
1516:
1517: /* Always re-Query before doing anything. */
1518: GMI_reservation_pub.Query_reservation
1519: ( p_api_version_number => 1.0

Line 1520: , p_init_msg_lst => fnd_api.g_false

1516:
1517: /* Always re-Query before doing anything. */
1518: GMI_reservation_pub.Query_reservation
1519: ( p_api_version_number => 1.0
1520: , p_init_msg_lst => fnd_api.g_false
1521: , x_return_status => x_return_status
1522: , x_msg_count => x_msg_count
1523: , x_msg_data => x_msg_data
1524: , p_validation_flag => p_validation_flag

Line 1530: , p_lock_records => fnd_api.g_false

1526: , p_cancel_order_mode => INV_RESERVATION_GLOBAL.G_CANCEL_ORDER_YES
1527: , x_mtl_reservation_tbl => x_mtl_reservation_tbl
1528: , x_mtl_reservation_tbl_count => x_mtl_reservation_tbl_count
1529: , x_error_code => x_error_code
1530: , p_lock_records => fnd_api.g_false
1531: , p_sort_by_req_date => inv_reservation_global.g_query_no_sort
1532: );
1533:
1534: /* If we were able to find records then*/

Line 1542: RAISE FND_API.G_EXC_ERROR;

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:
1545: GMI_Reservation_Util.Get_Default_Lot(
1546: x_ic_tran_pnd_index => l_default_lot_index

Line 1551: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)

1547: , x_return_status => x_return_status
1548: , x_msg_count => x_msg_count
1549: , x_msg_data => x_msg_data);
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');

Line 1558: RAISE FND_API.G_EXC_ERROR;

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:
1561: /* Find the matching ic_tran_rec_tbl record for the rsv_rec passed in*/
1562: IF (p_rsv_rec.reservation_id <> GMI_Reservation_Util.ic_tran_rec_tbl(l_default_lot_index).trans_id)

Line 1576: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

1572: , x_return_status => x_return_status
1573: , x_msg_count => x_msg_count
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');

Line 1582: RAISE FND_API.G_EXC_ERROR;

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:
1585: /* added the following condition for OM changes when org id is changed
1586: the array does not contain newly created default lot*/

Line 1598: ,p_init_msg_list => fnd_api.g_false

1594: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT d: Deleting transaction record res_id='||p_rsv_rec.reservation_id||', trans_id='||GMI_Reservation_Util.ic_tran_rec_tbl(l_allocated_lot_index).trans_id );
1595:
1596: GMI_TRANS_ENGINE_PUB.DELETE_PENDING_TRANSACTION(
1597: p_api_version => 1.0
1598: ,p_init_msg_list => fnd_api.g_false
1599: ,p_commit => l_commit
1600: ,p_validation_level => l_validation_level
1601: ,p_tran_rec => l_tran_to_delete_rec
1602: ,x_tran_row => l_temp_tran_row

Line 1609: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)

1605: ,x_msg_data => x_msg_data);
1606:
1607: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT d After DELETE_PENDING_TRANSACTION.');
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');

Line 1616: RAISE FND_API.G_EXC_ERROR;

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:
1619: END IF;
1620: l_default_tran_rec := GMI_Reservation_Util.ic_tran_rec_tbl(l_default_lot_index);

Line 1630: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)

1626: , x_return_status => x_return_status
1627: , x_msg_count => x_msg_count
1628: , x_msg_data => x_msg_data
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');

Line 1637: RAISE FND_API.G_EXC_ERROR;

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
1640:
1641: -- Begin 3248046

Line 1667: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)

1663: , x_msg_count => x_msg_count
1664: , x_msg_data => x_msg_data
1665: );
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');

Line 1674: RAISE FND_API.G_EXC_ERROR;

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:
1677: ELSE
1678: /* If the record is the default record then don't delete it just set the quantity to zero*/

Line 1684: ,p_init_msg_list => fnd_api.g_false

1680: l_default_tran_rec.trans_qty2 := 0 ;
1681: GMI_reservation_Util.PrintLn('updating to zero for the default transction ');
1682: GMI_TRANS_ENGINE_PUB.UPDATE_PENDING_TRANSACTION(
1683: p_api_version => 1.0
1684: ,p_init_msg_list => fnd_api.g_false
1685: ,p_commit => l_commit
1686: ,p_validation_level => l_validation_level
1687: ,p_tran_rec => l_default_tran_rec
1688: ,x_tran_row => l_temp_tran_row

Line 1692: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)

1688: ,x_tran_row => l_temp_tran_row
1689: ,x_return_status => x_return_status
1690: ,x_msg_count => x_msg_count
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');

Line 1699: RAISE FND_API.G_EXC_ERROR;

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;
1702: -- End Bug3248046
1703: /* cancel all the reservations for GME */

Line 1719: WHEN FND_API.G_EXC_ERROR THEN

1715: GMI_reservation_Util.PrintLn('(opm_dbg) leaving PVT d NO Error');
1716:
1717: /* When there is an exception*/
1718: EXCEPTION
1719: WHEN FND_API.G_EXC_ERROR THEN
1720: x_return_status := FND_API.G_RET_STS_ERROR;
1721:
1722: /* Get message count and data*/
1723: FND_MSG_PUB.count_and_get

Line 1720: x_return_status := FND_API.G_RET_STS_ERROR;

1716:
1717: /* When there is an exception*/
1718: EXCEPTION
1719: WHEN FND_API.G_EXC_ERROR THEN
1720: x_return_status := FND_API.G_RET_STS_ERROR;
1721:
1722: /* Get message count and data*/
1723: FND_MSG_PUB.count_and_get
1724: ( p_count => x_msg_count

Line 1730: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1726: );
1727: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT d EXCEPTION: Expected');
1728:
1729: WHEN OTHERS THEN
1730: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1731:
1732: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME
1733: , l_api_name
1734: );

Line 1785: p_init_msg_lst IN VARCHAR2 DEFAULT fnd_api.g_false

1781: Api end of comments
1782: */
1783: PROCEDURE Transfer_Reservation
1784: (
1785: p_init_msg_lst IN VARCHAR2 DEFAULT fnd_api.g_false
1786: , x_return_status OUT NOCOPY VARCHAR2
1787: , x_msg_count OUT NOCOPY NUMBER
1788: , x_msg_data OUT NOCOPY VARCHAR2
1789: , p_validation_flag IN VARCHAR2 DEFAULT fnd_api.g_true

Line 1789: , p_validation_flag IN VARCHAR2 DEFAULT fnd_api.g_true

1785: p_init_msg_lst IN VARCHAR2 DEFAULT fnd_api.g_false
1786: , x_return_status OUT NOCOPY VARCHAR2
1787: , x_msg_count OUT NOCOPY NUMBER
1788: , x_msg_data OUT NOCOPY VARCHAR2
1789: , p_validation_flag IN VARCHAR2 DEFAULT fnd_api.g_true
1790: , p_is_transfer_supply IN VARCHAR2 DEFAULT fnd_api.g_true
1791: , p_original_rsv_rec IN inv_reservation_global.mtl_reservation_rec_type
1792: , p_to_rsv_rec IN inv_reservation_global.mtl_reservation_rec_type
1793: , p_original_serial_number IN inv_reservation_global.serial_number_tbl_type

Line 1790: , p_is_transfer_supply IN VARCHAR2 DEFAULT fnd_api.g_true

1786: , x_return_status OUT NOCOPY VARCHAR2
1787: , x_msg_count OUT NOCOPY NUMBER
1788: , x_msg_data OUT NOCOPY VARCHAR2
1789: , p_validation_flag IN VARCHAR2 DEFAULT fnd_api.g_true
1790: , p_is_transfer_supply IN VARCHAR2 DEFAULT fnd_api.g_true
1791: , p_original_rsv_rec IN inv_reservation_global.mtl_reservation_rec_type
1792: , p_to_rsv_rec IN inv_reservation_global.mtl_reservation_rec_type
1793: , p_original_serial_number IN inv_reservation_global.serial_number_tbl_type
1794: , p_to_serial_number IN inv_reservation_global.serial_number_tbl_type

Line 1804: RAISE FND_API.G_EXC_ERROR;

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
1807: WHEN fnd_api.g_exc_error THEN
1808: x_return_status := fnd_api.g_ret_sts_error;

Line 1807: WHEN fnd_api.g_exc_error THEN

1803: OE_MSG_PUB.Add;
1804: RAISE FND_API.G_EXC_ERROR;
1805:
1806: EXCEPTION
1807: WHEN fnd_api.g_exc_error THEN
1808: x_return_status := fnd_api.g_ret_sts_error;
1809:
1810: /* Get message count and data*/
1811: FND_MSG_PUB.count_and_get

Line 1808: x_return_status := fnd_api.g_ret_sts_error;

1804: RAISE FND_API.G_EXC_ERROR;
1805:
1806: EXCEPTION
1807: WHEN fnd_api.g_exc_error THEN
1808: x_return_status := fnd_api.g_ret_sts_error;
1809:
1810: /* Get message count and data*/
1811: FND_MSG_PUB.count_and_get
1812: ( p_count => x_msg_count

Line 2332: WHEN fnd_api.g_exc_error THEN

2328: return;
2329:
2330: EXCEPTION
2331:
2332: WHEN fnd_api.g_exc_error THEN
2333: x_return_status := fnd_api.g_ret_sts_error;
2334:
2335: WHEN NO_DATA_FOUND THEN
2336: GMI_RESERVATION_UTIL.PRINTLN('No Data found raised error in GMI_Reservation_PVT.calculate_reservation');

Line 2333: x_return_status := fnd_api.g_ret_sts_error;

2329:
2330: EXCEPTION
2331:
2332: WHEN fnd_api.g_exc_error THEN
2333: x_return_status := fnd_api.g_ret_sts_error;
2334:
2335: WHEN NO_DATA_FOUND THEN
2336: GMI_RESERVATION_UTIL.PRINTLN('No Data found raised error in GMI_Reservation_PVT.calculate_reservation');
2337:

Line 2339: x_return_status := FND_API.G_RET_STS_ERROR;

2335: WHEN NO_DATA_FOUND THEN
2336: GMI_RESERVATION_UTIL.PRINTLN('No Data found raised error in GMI_Reservation_PVT.calculate_reservation');
2337:
2338: WHEN OTHERS THEN
2339: x_return_status := FND_API.G_RET_STS_ERROR;
2340: GMI_RESERVATION_UTIL.PRINTLN('RAISE WHEN OTHERS');
2341:
2342:
2343: END Calculate_Reservation;

Line 2394: x_return_status := FND_API.G_RET_STS_SUCCESS;

2390:
2391: BEGIN
2392:
2393: /* Initialize API return status to success */
2394: x_return_status := FND_API.G_RET_STS_SUCCESS;
2395:
2396: OPEN c_get_wsh_released_status(p_rsv_rec.demand_source_line_id);
2397: FETCH c_get_wsh_released_status
2398: INTO l_released_status;

Line 2406: x_return_status := FND_API.G_RET_STS_ERROR;

2402: -- There is no problem, the user can delete_reservation.
2403: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT Check_Shipping_Details, Unreserve is allowed. ');
2404: ELSE
2405: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT Check_Shipping_Details, Unreserve is forbidden. ');
2406: x_return_status := FND_API.G_RET_STS_ERROR;
2407: END IF;
2408:
2409: CLOSE c_get_wsh_released_status;
2410:

Line 2412: WHEN FND_API.G_EXC_ERROR THEN

2408:
2409: CLOSE c_get_wsh_released_status;
2410:
2411: EXCEPTION
2412: WHEN FND_API.G_EXC_ERROR THEN
2413: x_return_status := FND_API.G_RET_STS_ERROR;
2414:
2415: IF c_get_wsh_released_status%ISOPEN THEN
2416: CLOSE c_get_wsh_released_status;

Line 2413: x_return_status := FND_API.G_RET_STS_ERROR;

2409: CLOSE c_get_wsh_released_status;
2410:
2411: EXCEPTION
2412: WHEN FND_API.G_EXC_ERROR THEN
2413: x_return_status := FND_API.G_RET_STS_ERROR;
2414:
2415: IF c_get_wsh_released_status%ISOPEN THEN
2416: CLOSE c_get_wsh_released_status;
2417: END IF;

Line 2426: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2422: , p_data => x_msg_data
2423: );
2424:
2425: WHEN OTHERS THEN
2426: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2427: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT Check_Shipping_Details EXCEPTION: Others, SqlCode='||SQLCODE);
2428:
2429: IF c_get_wsh_released_status%ISOPEN THEN
2430: CLOSE c_get_wsh_released_status;

Line 2748: x_return_status := FND_API.G_RET_STS_SUCCESS;

2744:
2745: GMI_RESERVATION_UTIL.PrintLn('In Procedure Calulate_Prior_Reservations');
2746:
2747: /* Initialize return status to success */
2748: x_return_status := FND_API.G_RET_STS_SUCCESS;
2749:
2750: OPEN get_item_ctl;
2751: FETCH get_item_ctl INTO l_item_loct_ctl, l_lot_ctl, l_noninv_ind;
2752: IF(get_item_ctl%NOTFOUND)

Line 2760: RAISE FND_API.G_EXC_ERROR;

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;
2763: END IF;
2764:

Line 2776: RAISE FND_API.G_EXC_ERROR;

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;
2779: END IF;
2780:

Line 2808: RAISE FND_API.G_EXC_ERROR;

2804: IF (get_trans_for_del%NOTFOUND ) THEN
2805: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2806: CLOSE get_trans_for_del;
2807: GMI_RESERVATION_UTIL.PrintLn('Error retrieving Reserved qunatity');
2808: RAISE FND_API.G_EXC_ERROR;
2809: ELSE
2810: CLOSE get_trans_for_del;
2811: END IF;
2812: END IF;

Line 2834: x_return_status := FND_API.G_RET_STS_SUCCESS;

2830: x_result_qty1 := l_qty_reserved;
2831: x_result_qty2 := l_qty2_reserved;
2832: END IF;
2833:
2834: x_return_status := FND_API.G_RET_STS_SUCCESS;
2835:
2836: GMI_RESERVATION_UTIL.PrintLn('Returning from Procedure Calulate_Prior_Reservations with Success');
2837:
2838: EXCEPTION

Line 2839: WHEN FND_API.G_EXC_ERROR THEN

2835:
2836: GMI_RESERVATION_UTIL.PrintLn('Returning from Procedure Calulate_Prior_Reservations with Success');
2837:
2838: EXCEPTION
2839: WHEN FND_API.G_EXC_ERROR THEN
2840: x_return_status := FND_API.G_RET_STS_ERROR;
2841:
2842: GMI_RESERVATION_UTIL.PrintLn('Exeption GMI_Reservation_PVT.calculate_prior_reservations');
2843: FND_MSG_PUB.Add_Exc_Msg (

Line 2840: x_return_status := FND_API.G_RET_STS_ERROR;

2836: GMI_RESERVATION_UTIL.PrintLn('Returning from Procedure Calulate_Prior_Reservations with Success');
2837:
2838: EXCEPTION
2839: WHEN FND_API.G_EXC_ERROR THEN
2840: x_return_status := FND_API.G_RET_STS_ERROR;
2841:
2842: GMI_RESERVATION_UTIL.PrintLn('Exeption GMI_Reservation_PVT.calculate_prior_reservations');
2843: FND_MSG_PUB.Add_Exc_Msg (
2844: G_PKG_NAME

Line 2853: x_return_status := FND_API.G_RET_STS_ERROR;

2849: p_count => x_msg_count
2850: , p_data => x_msg_data);
2851:
2852: WHEN NO_DATA_FOUND THEN
2853: x_return_status := FND_API.G_RET_STS_ERROR;
2854: GMI_RESERVATION_UTIL.PrintLn('No Data found Exception GMI_Reservation_PVT.calculate_prior_reservations');
2855:
2856: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME
2857: , l_api_name);

Line 2865: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2861: ( p_count => x_msg_count
2862: , p_data => x_msg_data);
2863:
2864: WHEN OTHERS THEN
2865: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2866:
2867: GMI_RESERVATION_UTIL.PrintLn('OTHERS Exception GMI_Reservation_PVT.calculate_prior_reservations');
2868:
2869: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME