DBA Data[Home] [Help]

APPS.GML_BATCH_OM_RES_PVT dependencies on FND_API

Line 134: x_return_status := FND_API.G_RET_STS_SUCCESS;

130: From gme_batch_header
131: where batch_id = p_batch_id;
132:
133: BEGIN
134: x_return_status := FND_API.G_RET_STS_SUCCESS;
135: GMI_reservation_Util.PrintLn(' create_reservation_from_FPO ');
136: /* loop through all the product lines in the batch */
137: For batch_line in get_batch_line(p_FPO_batch_id) Loop
138: l_fpo_batch_line_id := batch_line.material_detail_id ;

Line 254: WHEN FND_API.G_EXC_ERROR THEN

250: <>
251: null;
252: END loop;
253: EXCEPTION
254: WHEN FND_API.G_EXC_ERROR THEN
255: x_return_status := FND_API.G_RET_STS_ERROR;
256: /* Get message count and data*/
257: FND_MSG_PUB.count_and_get
258: ( p_count => x_msg_cont

Line 255: x_return_status := FND_API.G_RET_STS_ERROR;

251: null;
252: END loop;
253: EXCEPTION
254: WHEN FND_API.G_EXC_ERROR THEN
255: x_return_status := FND_API.G_RET_STS_ERROR;
256: /* Get message count and data*/
257: FND_MSG_PUB.count_and_get
258: ( p_count => x_msg_cont
259: , p_data => x_msg_data

Line 263: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

259: , p_data => x_msg_data
260: );
261: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u EXCEPTION: Expected');
262: WHEN OTHERS THEN
263: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
264:
265: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME
266: , 'convert_FPO'
267: );

Line 367: x_return_status := FND_API.G_RET_STS_SUCCESS;

363: and (lot_id <> 0 or location <> GMI_Reservation_Util.G_DEFAULT_LOCT)
364: and completed_ind = 0
365: ;
366: BEGIN
367: x_return_status := FND_API.G_RET_STS_SUCCESS;
368: GMI_RESERVATION_UTIL.println('Create Allocations ');
369: l_rule_rec := p_gme_om_rule_rec;
370: l_gme_trans_row := p_gme_trans_row;
371: l_prod_whse := l_gme_trans_row.whse_code;

Line 561: p_init_msg_list => FND_API.G_TRUE,

557:
558: IF l_go_ahead = 1 THEN
559: GMI_TRANS_ENGINE_PUB.create_pending_transaction
560: (p_api_version => 1.0,
561: p_init_msg_list => FND_API.G_TRUE,
562: p_commit => FND_API.G_FALSE,
563: p_validation_level => FND_API.G_VALID_LEVEL_NONE,
564: p_tran_rec => l_tran_rec,
565: x_tran_row => l_tran_row,

Line 562: p_commit => FND_API.G_FALSE,

558: IF l_go_ahead = 1 THEN
559: GMI_TRANS_ENGINE_PUB.create_pending_transaction
560: (p_api_version => 1.0,
561: p_init_msg_list => FND_API.G_TRUE,
562: p_commit => FND_API.G_FALSE,
563: p_validation_level => FND_API.G_VALID_LEVEL_NONE,
564: p_tran_rec => l_tran_rec,
565: x_tran_row => l_tran_row,
566: x_return_status => x_return_status,

Line 563: p_validation_level => FND_API.G_VALID_LEVEL_NONE,

559: GMI_TRANS_ENGINE_PUB.create_pending_transaction
560: (p_api_version => 1.0,
561: p_init_msg_list => FND_API.G_TRUE,
562: p_commit => FND_API.G_FALSE,
563: p_validation_level => FND_API.G_VALID_LEVEL_NONE,
564: p_tran_rec => l_tran_rec,
565: x_tran_row => l_tran_row,
566: x_return_status => x_return_status,
567: x_msg_count => x_msg_cont,

Line 570: IF x_return_status = fnd_api.g_ret_sts_success Then

566: x_return_status => x_return_status,
567: x_msg_count => x_msg_cont,
568: x_msg_data => x_msg_data
569: );
570: IF x_return_status = fnd_api.g_ret_sts_success Then
571: GMI_reservation_Util.PrintLn('create_allocation, Success');
572: l_history_rec.trans_id := l_tran_row.trans_id;
573: l_alloc_done := 1;
574: ELSE

Line 588: IF x_return_status <> FND_API.G_RET_STS_SUCCESS

584: , x_return_status => x_return_status
585: , x_msg_count => x_msg_cont
586: , x_msg_data => x_msg_data
587: );
588: IF x_return_status <> FND_API.G_RET_STS_SUCCESS
589: THEN
590: GMI_RESERVATION_UTIL.PrintLn('Error returned by balancing default lot');
591: FND_MESSAGE.SET_NAME('GML', 'GML_CANNOT_BAL_DFLT_TRAN');
592: FND_MESSAGE.SET_TOKEN('LOT_STS', l_gme_trans_row.lot_status);

Line 632: WHEN FND_API.G_EXC_ERROR THEN

628: END IF;
629: END loop;
630:
631: EXCEPTION
632: WHEN FND_API.G_EXC_ERROR THEN
633: x_return_status := FND_API.G_RET_STS_ERROR;
634: /* Get message count and data*/
635: FND_MSG_PUB.count_and_get
636: ( p_count => x_msg_cont

Line 633: x_return_status := FND_API.G_RET_STS_ERROR;

629: END loop;
630:
631: EXCEPTION
632: WHEN FND_API.G_EXC_ERROR THEN
633: x_return_status := FND_API.G_RET_STS_ERROR;
634: /* Get message count and data*/
635: FND_MSG_PUB.count_and_get
636: ( p_count => x_msg_cont
637: , p_data => x_msg_data

Line 641: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

637: , p_data => x_msg_data
638: );
639: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT u EXCEPTION: Expected');
640: WHEN OTHERS THEN
641: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
642:
643: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME
644: , 'create_allocations'
645: );

Line 681: x_return_status := FND_API.G_RET_STS_SUCCESS;

677: and ic.doc_type = 'OMSO'
678: ;
679:
680: BEGIN
681: x_return_status := FND_API.G_RET_STS_SUCCESS;
682: /* this would remove all the un-staged trans */
683: GMI_RESERVATION_UTIL.PrintLn('Cancel_alloc_for_Trans ');
684: GMI_RESERVATION_UTIL.PrintLn(' Batch trans id '|| p_batch_trans_id);
685: IF p_batch_trans_id is not null THEN

Line 695: p_init_msg_list => FND_API.G_TRUE,

691: GMI_RESERVATION_UTIL.PrintLn(' Deleting trans_id '||l_trans_id);
692: IF GMI_TRAN_PND_DB_PVT.FETCH_IC_TRAN_PND (l_tran_rec, l_tran_rec ) THEN
693: GMI_TRANS_ENGINE_PUB.delete_pending_transaction
694: (p_api_version => 1.0,
695: p_init_msg_list => FND_API.G_TRUE,
696: p_commit => FND_API.G_FALSE,
697: p_validation_level => FND_API.G_VALID_LEVEL_NONE,
698: p_tran_rec => l_tran_rec,
699: x_tran_row => l_tran_row,

Line 696: p_commit => FND_API.G_FALSE,

692: IF GMI_TRAN_PND_DB_PVT.FETCH_IC_TRAN_PND (l_tran_rec, l_tran_rec ) THEN
693: GMI_TRANS_ENGINE_PUB.delete_pending_transaction
694: (p_api_version => 1.0,
695: p_init_msg_list => FND_API.G_TRUE,
696: p_commit => FND_API.G_FALSE,
697: p_validation_level => FND_API.G_VALID_LEVEL_NONE,
698: p_tran_rec => l_tran_rec,
699: x_tran_row => l_tran_row,
700: x_return_status => x_return_status,

Line 697: p_validation_level => FND_API.G_VALID_LEVEL_NONE,

693: GMI_TRANS_ENGINE_PUB.delete_pending_transaction
694: (p_api_version => 1.0,
695: p_init_msg_list => FND_API.G_TRUE,
696: p_commit => FND_API.G_FALSE,
697: p_validation_level => FND_API.G_VALID_LEVEL_NONE,
698: p_tran_rec => l_tran_rec,
699: x_tran_row => l_tran_row,
700: x_return_status => x_return_status,
701: x_msg_count => x_msg_cont,

Line 704: IF x_return_status <> fnd_api.g_ret_sts_success Then

700: x_return_status => x_return_status,
701: x_msg_count => x_msg_cont,
702: x_msg_data => x_msg_data
703: );
704: IF x_return_status <> fnd_api.g_ret_sts_success Then
705: GMI_reservation_Util.PrintLn('Delete OMSO trans for Batch trans');
706: FND_MESSAGE.SET_NAME('GMI','GMI_QTY_RSV_NOT_FOUND');
707: FND_MESSAGE.Set_Token('WHERE', 'Check rules');
708: FND_MSG_PUB.ADD;

Line 729: IF x_return_status <> FND_API.G_RET_STS_SUCCESS

725: , x_return_status => x_return_status
726: , x_msg_count => x_msg_cont
727: , x_msg_data => x_msg_data
728: );
729: IF x_return_status <> FND_API.G_RET_STS_SUCCESS
730: THEN
731: GMI_RESERVATION_UTIL.PrintLn('Error returned by balancing default lot');
732: END IF;
733: END IF;

Line 765: x_return_status := FND_API.G_RET_STS_SUCCESS;

761: and ic.doc_type = 'OMSO'
762: ;
763:
764: BEGIN
765: x_return_status := FND_API.G_RET_STS_SUCCESS;
766: /* this would remove all the un-staged trans */
767: IF p_batch_id is not null THEN
768: /* find out the unstaged trans for this batch line */
769: for alloc_rec in find_nonstgd_alloc_for_batch(p_batch_id) Loop

Line 773: ,p_init_msg_list => FND_API.G_TRUE

769: for alloc_rec in find_nonstgd_alloc_for_batch(p_batch_id) Loop
770: l_tran_rec.trans_id := alloc_rec.trans_id;
771: GMI_TRANS_ENGINE_PUB.DELETE_PENDING_TRANSACTION(
772: p_api_version => 1.0
773: ,p_init_msg_list => FND_API.G_TRUE
774: ,p_commit => FND_API.G_FALSE
775: ,p_validation_level => FND_API.G_VALID_LEVEL_NONE
776: ,p_tran_rec => l_tran_rec
777: ,x_tran_row => l_tran_row

Line 774: ,p_commit => FND_API.G_FALSE

770: l_tran_rec.trans_id := alloc_rec.trans_id;
771: GMI_TRANS_ENGINE_PUB.DELETE_PENDING_TRANSACTION(
772: p_api_version => 1.0
773: ,p_init_msg_list => FND_API.G_TRUE
774: ,p_commit => FND_API.G_FALSE
775: ,p_validation_level => FND_API.G_VALID_LEVEL_NONE
776: ,p_tran_rec => l_tran_rec
777: ,x_tran_row => l_tran_row
778: ,x_return_status => x_return_status

Line 775: ,p_validation_level => FND_API.G_VALID_LEVEL_NONE

771: GMI_TRANS_ENGINE_PUB.DELETE_PENDING_TRANSACTION(
772: p_api_version => 1.0
773: ,p_init_msg_list => FND_API.G_TRUE
774: ,p_commit => FND_API.G_FALSE
775: ,p_validation_level => FND_API.G_VALID_LEVEL_NONE
776: ,p_tran_rec => l_tran_rec
777: ,x_tran_row => l_tran_row
778: ,x_return_status => x_return_status
779: ,x_msg_count => x_msg_cont

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

778: ,x_return_status => x_return_status
779: ,x_msg_count => x_msg_cont
780: ,x_msg_data => x_msg_data);
781: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT d After DELETE_PENDING_TRANSACTION.');
782: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)
783: THEN
784: GMI_reservation_Util.PrintLn('(opm_dbg) in PVT d ERROR: Returned by Delete_Transaction().');
785: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
786: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_TRANS_ENGINE_PUB.DELETE_PENDING_TRANSACTION');

Line 789: RAISE FND_API.G_EXC_ERROR;

785: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
786: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_TRANS_ENGINE_PUB.DELETE_PENDING_TRANSACTION');
787: FND_MESSAGE.Set_Token('WHERE', 'Delete_Reservation');
788: FND_MSG_PUB.Add;
789: RAISE FND_API.G_EXC_ERROR;
790: END IF;
791:
792: GML_BATCH_OM_RES_PVT.cancel_alloc_for_trans
793: (

Line 828: x_return_status := FND_API.G_RET_STS_SUCCESS;

824: and ic.doc_type = 'OMSO'
825: ;
826:
827: BEGIN
828: x_return_status := FND_API.G_RET_STS_SUCCESS;
829: /* this would remove all the un-staged trans */
830: IF p_batch_line_id is not null THEN
831: /* find out the unstaged trans for this batch line */
832: for alloc_rec in find_nonstgd_alloc_for_batch(p_batch_line_id) Loop

Line 858: x_return_status := FND_API.G_RET_STS_SUCCESS;

854:
855: l_batch_trans_id NUMBER;
856:
857: BEGIN
858: x_return_status := FND_API.G_RET_STS_SUCCESS;
859: GMI_reservation_Util.PrintLn('cancel_res_for_batch_line: batch_line_id '||p_batch_line_id);
860: GMI_reservation_Util.PrintLn('cancel_res_for_batch_line: whse_code '||p_whse_code);
861: /* this would remove all the un-staged trans */
862: IF p_batch_line_id is not null and p_whse_code is null THEN

Line 894: x_return_status := FND_API.G_RET_STS_SUCCESS;

890:
891: l_batch_trans_id NUMBER;
892:
893: BEGIN
894: x_return_status := FND_API.G_RET_STS_SUCCESS;
895: GMI_reservation_Util.PrintLn('cancel_res_for_so_line: so_line_id '||p_so_line_id);
896: /* this would remove all the un-staged trans */
897: IF p_so_line_id is not null THEN
898: Update gml_batch_so_reservations

Line 917: x_return_status := FND_API.G_RET_STS_SUCCESS;

913: , X_msg_data OUT NOCOPY VARCHAR2
914: ) IS
915:
916: BEGIN
917: x_return_status := FND_API.G_RET_STS_SUCCESS;
918: GMI_reservation_Util.PrintLn('cancel_res_for_batch: batch_id '||p_batch_id);
919: /* this would remove all the un-staged trans */
920: IF p_batch_id is not null THEN
921: Update gml_batch_so_reservations

Line 939: x_return_status := FND_API.G_RET_STS_SUCCESS;

935: , X_msg_cont OUT NOCOPY NUMBER
936: , X_msg_data OUT NOCOPY VARCHAR2
937: ) IS
938: BEGIN
939: x_return_status := FND_API.G_RET_STS_SUCCESS;
940: /*
941: Remove all outstanding reservations and allocations
942: When batch is in 'WIP, only terminate can occur. Anything completed remians
943: so NO allocations would be removed.

Line 1087: x_return_status := FND_API.G_RET_STS_SUCCESS;

1083: and batch_line_id = p_batch_line_id;
1084:
1085: BEGIN
1086:
1087: x_return_status := FND_API.G_RET_STS_SUCCESS;
1088:
1089: l_session_id := USERENV('sessionid');
1090: l_batch_line_id := p_batch_line_id ;
1091: l_batch_id := p_batch_id;

Line 1366: x_return_status := FND_API.G_RET_STS_SUCCESS;

1362: l_omso_trans_id NUMBER;
1363: l_msg_cont NUMBER;
1364: l_msg_data VARCHAR2(300);
1365: BEGIN
1366: x_return_status := FND_API.G_RET_STS_SUCCESS;
1367: l_batch_line_rec.batch_line_id := p_alloc_history_rec.batch_line_id;
1368: l_gme_om_rule_rec.rule_id := null;
1369: Select *
1370: Into l_gme_trans_row

Line 1388: IF x_return_status = fnd_api.g_ret_sts_success Then

1384: , X_msg_cont => l_msg_cont
1385: , X_msg_data => l_msg_data
1386: ) ;
1387:
1388: IF x_return_status = fnd_api.g_ret_sts_success Then
1389: /* delete the history record because new history records are created */
1390: update gml_batch_so_alloc_history
1391: set delete_mark = 1
1392: Where alloc_rec_id = p_alloc_history_rec.alloc_rec_id;

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

1403: , X_msg_cont => l_msg_cont
1404: , X_msg_data => l_msg_data
1405: );
1406:
1407: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS)
1408: THEN
1409: GMI_RESERVATION_UTIL.PrintLn('WARNING : Pick Confirm Returned error after re-generating the allocations');
1410: END IF;
1411:

Line 1420: RAISE FND_API.G_EXC_ERROR;

1416: GMI_reservation_Util.PrintLn('OM_UTIL, checking rule failure');
1417: FND_MESSAGE.SET_NAME('GMI','GMI_QTY_RSV_NOT_FOUND');
1418: FND_MESSAGE.Set_Token('WHERE', 'Check rules');
1419: FND_MSG_PUB.ADD;
1420: RAISE FND_API.G_EXC_ERROR;
1421: END IF;
1422:
1423: GML_GME_API_PVT.g_not_to_notify := 1;
1424: END regenerate_alloc;

Line 1435: x_return_status := FND_API.G_RET_STS_SUCCESS;

1431: , P_batch_action IN VARCHAR2
1432: , x_return_status OUT NOCOPY VARCHAR2
1433: ) IS
1434: BEGIN
1435: x_return_status := FND_API.G_RET_STS_SUCCESS;
1436: null;
1437: END process_om_reservations;
1438:
1439: PROCEDURE split_reservations

Line 1484: x_return_status := FND_API.G_RET_STS_SUCCESS;

1480: /* or should consider the alloc rules */
1481: res_rec c_reservations%rowtype;
1482:
1483: BEGIN
1484: x_return_status := FND_API.G_RET_STS_SUCCESS;
1485: GMI_reservation_Util.PrintLn('Split Reservations for GME');
1486: /* check the reservations, if non exists, exit */
1487: IF p_old_source_line_id is not null THEN
1488: IF NOT GML_BATCH_OM_UTIL.check_reservation

Line 1626: WHEN FND_API.G_EXC_ERROR THEN

1622: END IF;
1623: END IF;
1624:
1625: EXCEPTION
1626: WHEN FND_API.G_EXC_ERROR THEN
1627: x_return_status := FND_API.G_RET_STS_ERROR;
1628: /* Get message count and data*/
1629: FND_MSG_PUB.count_and_get
1630: ( p_count => x_msg_count

Line 1627: x_return_status := FND_API.G_RET_STS_ERROR;

1623: END IF;
1624:
1625: EXCEPTION
1626: WHEN FND_API.G_EXC_ERROR THEN
1627: x_return_status := FND_API.G_RET_STS_ERROR;
1628: /* Get message count and data*/
1629: FND_MSG_PUB.count_and_get
1630: ( p_count => x_msg_count
1631: , p_data => x_msg_data

Line 1635: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1631: , p_data => x_msg_data
1632: );
1633: GMI_reservation_Util.PrintLn('Split reservations: EXCEPTION: Expected');
1634: WHEN OTHERS THEN
1635: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1636:
1637: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME
1638: , 'Split_reservations'
1639: );

Line 1662: x_return_status := FND_API.G_RET_STS_SUCCESS;

1658: , x_msg_data OUT NOCOPY VARCHAR2
1659: )
1660: IS
1661: BEGIN
1662: x_return_status := FND_API.G_RET_STS_SUCCESS;
1663: GML_BATCH_OM_RES_PVT.split_reservations
1664: ( p_old_delivery_detail_id => null
1665: , p_new_delivery_detail_id => null
1666: , p_old_source_line_id => p_old_source_line_id

Line 1767: IF x_return_status <> fnd_api.g_ret_sts_success Then

1763: , x_return_status => x_return_status
1764: , x_msg_count => x_msg_cont
1765: , x_msg_data => x_msg_data
1766: );
1767: IF x_return_status <> fnd_api.g_ret_sts_success Then
1768: GMI_reservation_Util.PrintLn('pick confirm failed ');
1769: FND_MESSAGE.SET_NAME('GMI','GMI_PICK_CONFIRM');
1770: FND_MESSAGE.Set_Token('WHERE', 'pick confirm ');
1771: FND_MSG_PUB.ADD;

Line 1772: --RAISE FND_API.G_EXC_ERROR;

1768: GMI_reservation_Util.PrintLn('pick confirm failed ');
1769: FND_MESSAGE.SET_NAME('GMI','GMI_PICK_CONFIRM');
1770: FND_MESSAGE.Set_Token('WHERE', 'pick confirm ');
1771: FND_MSG_PUB.ADD;
1772: --RAISE FND_API.G_EXC_ERROR;
1773: END IF;
1774: END IF;
1775: end loop;
1776: END pick_confirm ;