DBA Data[Home] [Help]

APPS.GMI_PICK_WAVE_CONFIRM_PVT dependencies on FND_API

Line 116: x_return_status := FND_API.G_RET_STS_SUCCESS;

112: l_ship_set_id NUMBER;
113:
114: BEGIN
115:
116: x_return_status := FND_API.G_RET_STS_SUCCESS;
117:
118: l_ship_set_id := p_ship_set_id;
119:
120: For mo_line in get_qty LOOP

Line 143: WHEN FND_API.G_EXC_ERROR THEN

139: gmi_reservation_util.println('HELLO from end of chk-set prc.');
140:
141:
142: EXCEPTION
143: WHEN FND_API.G_EXC_ERROR THEN
144: x_return_status := fnd_api.g_ret_sts_error;
145:
146:
147: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 144: x_return_status := fnd_api.g_ret_sts_error;

140:
141:
142: EXCEPTION
143: WHEN FND_API.G_EXC_ERROR THEN
144: x_return_status := fnd_api.g_ret_sts_error;
145:
146:
147: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
148: x_return_status := fnd_api.g_ret_sts_unexp_error;

Line 147: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

143: WHEN FND_API.G_EXC_ERROR THEN
144: x_return_status := fnd_api.g_ret_sts_error;
145:
146:
147: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
148: x_return_status := fnd_api.g_ret_sts_unexp_error;
149:
150: WHEN l_warning THEN
151: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;

Line 148: x_return_status := fnd_api.g_ret_sts_unexp_error;

144: x_return_status := fnd_api.g_ret_sts_error;
145:
146:
147: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
148: x_return_status := fnd_api.g_ret_sts_unexp_error;
149:
150: WHEN l_warning THEN
151: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
152:

Line 157: x_return_status := fnd_api.g_ret_sts_unexp_error;

153: WHEN l_manual_warning THEN
154: x_return_status := G_WARNING_SHIP_SET;
155:
156: WHEN OTHERS THEN
157: x_return_status := fnd_api.g_ret_sts_unexp_error;
158:
159:
160: END CHECK_SHIP_SET;
161:

Line 169: , p_init_msg_lst IN VARCHAR2 DEFAULT fnd_api.g_false

165: -- Added NOCOPY to x_mo_line_tbl
166: PROCEDURE PICK_CONFIRM
167: (
168: p_api_version_number IN NUMBER
169: , p_init_msg_lst IN VARCHAR2 DEFAULT fnd_api.g_false
170: , p_validation_flag IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL
171: , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE
172: , p_delivery_detail_id IN NUMBER DEFAULT NULL
173: , p_mo_line_tbl IN GMI_Move_Order_Global.MO_LINE_TBL

Line 170: , p_validation_flag IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL

166: PROCEDURE PICK_CONFIRM
167: (
168: p_api_version_number IN NUMBER
169: , p_init_msg_lst IN VARCHAR2 DEFAULT fnd_api.g_false
170: , p_validation_flag IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL
171: , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE
172: , p_delivery_detail_id IN NUMBER DEFAULT NULL
173: , p_mo_line_tbl IN GMI_Move_Order_Global.MO_LINE_TBL
174: , x_mo_line_tbl OUT NOCOPY GMI_Move_Order_Global.MO_LINE_TBL

Line 171: , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE

167: (
168: p_api_version_number IN NUMBER
169: , p_init_msg_lst IN VARCHAR2 DEFAULT fnd_api.g_false
170: , p_validation_flag IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL
171: , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE
172: , p_delivery_detail_id IN NUMBER DEFAULT NULL
173: , p_mo_line_tbl IN GMI_Move_Order_Global.MO_LINE_TBL
174: , x_mo_line_tbl OUT NOCOPY GMI_Move_Order_Global.MO_LINE_TBL
175: , x_return_status OUT NOCOPY VARCHAR2

Line 186: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;

182: l_api_version_number CONSTANT NUMBER := 1.0;
183:
184: l_msg_count NUMBER :=0;
185: l_msg_data VARCHAR2(2000);
186: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;
187: l_mo_line_rec GMI_MOVE_ORDER_GLOBAL.mo_line_rec;
188: l_mo_line_tbl GMI_MOVE_ORDER_GLOBAL.mo_line_tbl;
189: l_location IC_TRAN_PND.LOCATION%TYPE;
190: l_ic_item_mst_rec GMI_RESERVATION_UTIL.ic_item_mst_rec;

Line 476: l_validation_level VARCHAR2(4) := FND_API.G_VALID_LEVEL_FULL;

472: AND line_detail_id = p_line_detail_id;
473:
474: l_trans_id NUMBER;
475: d_trans_id NUMBER;
476: l_validation_level VARCHAR2(4) := FND_API.G_VALID_LEVEL_FULL;
477: l_available_qty NUMBER;
478: l_available_qty2 NUMBER;
479: l_tran_row IC_TRAN_PND%ROWTYPE;
480: l_pick_slip_number NUMBER;

Line 502: IF NOT FND_API.Compatible_API_CALL

498: /*DBMS_OUTPUT.PUT_LINE('IN MOVE ORDER LINES'); */
499:
500: /* Standard call to check for call compatibility. */
501:
502: IF NOT FND_API.Compatible_API_CALL
503: ( l_api_version_number
504: , p_api_version_number
505: , l_api_name
506: , G_PKG_NAME

Line 509: RAISE FND_API.G_EXC_ERROR;

505: , l_api_name
506: , G_PKG_NAME
507: )
508: THEN
509: RAISE FND_API.G_EXC_ERROR;
510: END IF;
511:
512: /* Initialize message list if p_int_msg_lst is set TRUE. */
513:

Line 514: IF FND_API.to_boolean(p_init_msg_lst)

510: END IF;
511:
512: /* Initialize message list if p_int_msg_lst is set TRUE. */
513:
514: IF FND_API.to_boolean(p_init_msg_lst)
515: THEN
516: FND_MSG_PUB.Initialize;
517: END IF;
518:

Line 520: x_return_status := FND_API.G_RET_STS_SUCCESS;

516: FND_MSG_PUB.Initialize;
517: END IF;
518:
519: /* Initialize API return status to sucess */
520: x_return_status := FND_API.G_RET_STS_SUCCESS;
521:
522: GMI_Reservation_Util.PrintLn('PICK_WAVE_CONFIRM PVT COUNT=> '||p_mo_line_tbl.COUNT);
523:
524: /* Get System Constant For Default Location Value. */

Line 538: RAISE FND_API.G_EXC_ERROR;

534: IF check_required( p_mo_line_rec => l_mo_line_rec) THEN
535: WSH_Util_Core.PrintLn('Check Missing Falied ');
536: FND_MESSAGE.SET_NAME('GMI','GMI_REQUIRED_MISSING');
537: FND_MSG_PUB.ADD;
538: RAISE FND_API.G_EXC_ERROR;
539: END IF;
540:
541: -- HW BUG#:2296620 call to check ship_sets
542: l_manual_pick := p_manual_pick;

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

556: ,p_manual_pick => l_manual_pick
557: ,x_return_status => x_return_status
558: );
559:
560: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
561: l_no_error := '0';
562: IF ( x_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING ) THEN
563: RAISE l_warning;
564: ELSE

Line 565: RAISE FND_API.G_EXC_ERROR;

561: l_no_error := '0';
562: IF ( x_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING ) THEN
563: RAISE l_warning;
564: ELSE
565: RAISE FND_API.G_EXC_ERROR;
566: END IF;
567:
568: ELSE
569: l_no_error :='1';

Line 592: raise FND_API.G_EXC_ERROR;

588: /*IF ( l_mo_line_rec.quantity_delivered = l_mo_line_rec.quantity_detailed )
589: OR ( l_mo_line_rec.quantity_detailed = 0) THEN
590: FND_MESSAGE.SET_NAME('INV', 'INV_PICK_QTY_ERROR');
591: FND_MSG_PUB.ADD;
592: raise FND_API.G_EXC_ERROR;
593: END IF; */
594:
595: /* Get Process Item details */
596: GMI_RESERVATION_UTIL.Get_OPM_item_from_Apps

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

601: , x_return_status => x_return_status
602: , x_msg_count => x_msg_count
603: , x_msg_data => x_msg_data);
604:
605: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)
606: THEN
607: FND_MESSAGE.SET_NAME('GMI','GMI_ERROR');
608: FND_MESSAGE.SET_TOKEN('BY_PROC','GMI_Reservation_Util.Get_OPM_item_from_Apps');
609: FND_MESSAGE.SET_TOKEN('WHERE',G_PKG_NAME||'.'||l_api_name);

Line 610: RAISE FND_API.G_EXC_ERROR;

606: THEN
607: FND_MESSAGE.SET_NAME('GMI','GMI_ERROR');
608: FND_MESSAGE.SET_TOKEN('BY_PROC','GMI_Reservation_Util.Get_OPM_item_from_Apps');
609: FND_MESSAGE.SET_TOKEN('WHERE',G_PKG_NAME||'.'||l_api_name);
610: RAISE FND_API.G_EXC_ERROR;
611: END IF;
612:
613: GMI_Reservation_Util.PrintLn('Item Found. Now Qty treatment');
614: /* Now Check Item Characteristics */

Line 645: RAISE FND_API.G_EXC_ERROR;

641: IF cur_txn_no_default%NOTFOUND THEN
642: CLOSE cur_txn_no_default;
643: GMI_Reservation_Util.PrintLn('txn_no_default : NOTFOUND ');
644: FND_MESSAGE.SET_NAME('GMI','GMI_REQUIRED_MISSING');
645: RAISE FND_API.G_EXC_ERROR;
646: END IF;
647: CLOSE cur_txn_no_default;
648: l_trans_qty_sts := l_trans_qty;
649: l_trans_qty2_sts := l_trans_qty2;

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

680: /* this is also true for non inventory controled items*/
681: /* the move order qtys are already in item_um1 and item_um2*/
682: l_trans_qty := l_mo_line_rec.quantity;
683: l_trans_qty2 := l_mo_line_rec.secondary_quantity;
684: /*RAISE FND_API.G_EXC_ERROR; */
685: /* create a default lot to avoid troubles in shipping */
686: GMI_RESERVATION_UTIL.Create_dflt_lot_from_scratch
687: (
688: p_whse_code => l_whse_code

Line 697: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS)

693: , x_return_status => l_return_status
694: , x_msg_count => x_msg_count
695: , x_msg_data => x_msg_data
696: );
697: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS)
698: THEN
699: FND_MESSAGE.SET_NAME('GMI','GMI_ERROR');
700: FND_MESSAGE.SET_TOKEN('BY_PROC','GMI_Reservation_Util.create_dflt_lot_from_scratch');
701: FND_MESSAGE.SET_TOKEN('WHERE',G_PKG_NAME||'.'||l_api_name);

Line 702: RAISE FND_API.G_EXC_ERROR;

698: THEN
699: FND_MESSAGE.SET_NAME('GMI','GMI_ERROR');
700: FND_MESSAGE.SET_TOKEN('BY_PROC','GMI_Reservation_Util.create_dflt_lot_from_scratch');
701: FND_MESSAGE.SET_TOKEN('WHERE',G_PKG_NAME||'.'||l_api_name);
702: RAISE FND_API.G_EXC_ERROR;
703: END IF;
704: ELSE
705: OPEN cur_txn_with_default
706: ( p_line_id => l_mo_line_rec.txn_source_line_id,

Line 761: RAISE FND_API.G_EXC_ERROR;

757: p_quantity2 => l_trans_qty2
758: );
759: IF x_return_status <> 'S' THEN
760: fnd_message.set_name('INV', 'INV_CHECK_TOLERANCE_ERROR');
761: RAISE FND_API.G_EXC_ERROR;
762: ELSE
763: IF l_allowed = 'N' THEN
764: GMI_Reservation_Util.PrintLn('ATTENTION :');
765: GMI_Reservation_Util.PrintLn('MOVE ORDER line : line_id ='||l_mo_line_rec.line_id ||

Line 876: l_return_status := FND_API.G_RET_STS_SUCCESS;

872: l_ALLOW_OPM_TRUNCATE_TXN := nvl(fnd_profile.value ('ALLOW_OPM_TRUNCATE_TXN'),'N');
873: GMI_Reservation_Util.PrintLn('(GMIVPWCB)Profile: ALLOW_OPM_TRUNCATE_TXN '||l_ALLOW_OPM_TRUNCATE_TXN);
874: IF (l_ALLOW_OPM_TRUNCATE_TXN = 'Y') THEN
875: GMI_Reservation_Util.PrintLn('Truncating the transaction quantities before TRANSACT');
876: l_return_status := FND_API.G_RET_STS_SUCCESS;
877: truncate_trans_qty (p_line_id => l_mo_line_rec.txn_source_line_id,
878: p_delivery_detail_id => l_delivery_detail_id,
879: p_default_location => l_location,
880: is_lot_loct_ctl => TRUE,

Line 885: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

881: x_return_status => l_return_status);
882: --
883: -- Fail the pick confirm process if exception occured during truncation of transactions
884: --
885: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
886: FND_MESSAGE.SET_NAME('GMI','GMI_ERROR');
887: FND_MESSAGE.SET_TOKEN('BY_PROC','GMI_Reservation_Util.truncate_trans_qty');
888: FND_MESSAGE.SET_TOKEN('WHERE',G_PKG_NAME||'.'||l_api_name);
889: RAISE FND_API.G_EXC_ERROR;

Line 889: RAISE FND_API.G_EXC_ERROR;

885: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
886: FND_MESSAGE.SET_NAME('GMI','GMI_ERROR');
887: FND_MESSAGE.SET_TOKEN('BY_PROC','GMI_Reservation_Util.truncate_trans_qty');
888: FND_MESSAGE.SET_TOKEN('WHERE',G_PKG_NAME||'.'||l_api_name);
889: RAISE FND_API.G_EXC_ERROR;
890: END IF;
891: END IF;
892: -- End 3776538
893:

Line 1092: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS)

1088: x_return_status => l_return_status
1089: );
1090: GMI_Reservation_Util.PrintLn('Return Status from [1] Update_Shipping_Attributes Call '||l_return_status);
1091:
1092: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS)
1093: THEN
1094: FND_MESSAGE.SET_NAME('GMI','GMI_ERROR');
1095: FND_MESSAGE.SET_TOKEN('BY_PROC','GMI_Reservation_Util.call_to_WSH_interface');
1096: FND_MESSAGE.SET_TOKEN('WHERE',G_PKG_NAME||'.'||l_api_name);

Line 1097: RAISE FND_API.G_EXC_ERROR;

1093: THEN
1094: FND_MESSAGE.SET_NAME('GMI','GMI_ERROR');
1095: FND_MESSAGE.SET_TOKEN('BY_PROC','GMI_Reservation_Util.call_to_WSH_interface');
1096: FND_MESSAGE.SET_TOKEN('WHERE',G_PKG_NAME||'.'||l_api_name);
1097: RAISE FND_API.G_EXC_ERROR;
1098: END IF;
1099:
1100: /* Now Update staged_ind in transaction record from 0 to 1 */
1101: /* HAM Will Have to be More Selective */

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

1115: GMI_Pick_Release_Util.Create_Manual_Alloc_Pickslip (l_mo_line_rec.organization_id , l_mo_line_rec.line_id,
1116: x_return_status, x_msg_count, x_msg_data, l_pick_slip_number);
1117: GMI_reservation_Util.PrintLn('pick slip number is '|| l_pick_slip_number);
1118:
1119: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)
1120: THEN
1121: GMI_reservation_Util.PrintLn('(opm_dbg) in Set_Pick_lots: Error returned by GMI_Pick_Release_Util.Create_Manual_Alloc_Pickslip.', 'pick_lots.log');
1122: FND_MESSAGE.SET_NAME('GMI','GMI_ERROR');
1123: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Pick_Release_Util.Create_Manual_Alloc_Pickslip');

Line 1126: RAISE FND_API.G_EXC_ERROR;

1122: FND_MESSAGE.SET_NAME('GMI','GMI_ERROR');
1123: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Pick_Release_Util.Create_Manual_Alloc_Pickslip');
1124: FND_MESSAGE.Set_Token('WHERE', 'Set_Pick_Lots');
1125: FND_MSG_PUB.Add;
1126: RAISE FND_API.G_EXC_ERROR;
1127: END IF;
1128:
1129: UPDATE ic_tran_pnd
1130: SET pick_slip_number = l_pick_slip_number

Line 1201: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS)

1197: x_return_status => l_return_status
1198: );
1199: GMI_Reservation_Util.PrintLn('Return Status from [2] Update_Shipping_Attributes Call '||l_return_status);
1200:
1201: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS)
1202: THEN
1203: FND_MESSAGE.SET_NAME('GMI','GMI_ERROR');
1204: FND_MESSAGE.SET_TOKEN('BY_PROC','GMI_Reservation_Util.call_to_WSH_interface');
1205: FND_MESSAGE.SET_TOKEN('WHERE',G_PKG_NAME||'.'||l_api_name);

Line 1206: RAISE FND_API.G_EXC_ERROR;

1202: THEN
1203: FND_MESSAGE.SET_NAME('GMI','GMI_ERROR');
1204: FND_MESSAGE.SET_TOKEN('BY_PROC','GMI_Reservation_Util.call_to_WSH_interface');
1205: FND_MESSAGE.SET_TOKEN('WHERE',G_PKG_NAME||'.'||l_api_name);
1206: RAISE FND_API.G_EXC_ERROR;
1207: END IF;
1208: END IF;
1209: /* HW end of bug #:1941429 */
1210: ELSE /* non lot or loct controled */

Line 1342: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1338: p_line_id => l_mo_line_rec.txn_source_line_id
1339: );
1340: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
1341: GMI_RESERVATION_UTIL.println('Error returned by find default lot');
1342: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1343: END IF;
1344:
1345: IF (d_trans_id is NOT NULL) THEN
1346: UPDATE ic_tran_pnd

Line 1428: WHEN FND_API.G_EXC_ERROR THEN

1424: END IF;
1425:
1426:
1427: EXCEPTION
1428: WHEN FND_API.G_EXC_ERROR THEN
1429: ROLLBACK TO PICK_WAVE_CONFIRM;
1430: -- Bug 3859774
1431: IF (mo_line_txn_c%ISOPEN) THEN
1432: CLOSE mo_line_txn_c;

Line 1434: x_return_status := fnd_api.g_ret_sts_error;

1430: -- Bug 3859774
1431: IF (mo_line_txn_c%ISOPEN) THEN
1432: CLOSE mo_line_txn_c;
1433: END IF;
1434: x_return_status := fnd_api.g_ret_sts_error;
1435:
1436: /* Get message count and data */
1437: FND_MSG_PUB.count_and_get
1438: ( p_count => x_msg_count

Line 1441: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1437: FND_MSG_PUB.count_and_get
1438: ( p_count => x_msg_count
1439: , p_data => x_msg_data
1440: );
1441: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1442: ROLLBACK TO PICK_WAVE_CONFIRM;
1443: x_return_status := fnd_api.g_ret_sts_unexp_error;
1444:
1445:

Line 1443: x_return_status := fnd_api.g_ret_sts_unexp_error;

1439: , p_data => x_msg_data
1440: );
1441: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1442: ROLLBACK TO PICK_WAVE_CONFIRM;
1443: x_return_status := fnd_api.g_ret_sts_unexp_error;
1444:
1445:
1446: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME
1447: ,l_api_name

Line 1463: x_return_status := fnd_api.g_ret_sts_unexp_error;

1459: /* NC end of Bug #2557029 */
1460:
1461: WHEN OTHERS THEN
1462: ROLLBACK TO PICK_WAVE_CONFIRM;
1463: x_return_status := fnd_api.g_ret_sts_unexp_error;
1464:
1465: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME
1466: ,l_api_name
1467: );

Line 1546: x_return_status := FND_API.G_RET_STS_SUCCESS;

1542: BEGIN
1543:
1544: /* Lets Set Return Status to Sucess To Begin With. */
1545:
1546: x_return_status := FND_API.G_RET_STS_SUCCESS;
1547:
1548: /* Check Input Values */
1549:
1550: IF ( p_opm_item_id is NULL

Line 1552: OR p_opm_item_id = FND_API.G_MISS_NUM ) THEN

1548: /* Check Input Values */
1549:
1550: IF ( p_opm_item_id is NULL
1551: OR p_opm_item_id = 0
1552: OR p_opm_item_id = FND_API.G_MISS_NUM ) THEN
1553: FND_MESSAGE.Set_Name('GMI','MISSING');
1554: FND_MESSAGE.Set_Token('MISSING', 'Opm Item Id');
1555: FND_MSG_PUB.Add;
1556: raise FND_API.G_EXC_ERROR;

Line 1556: raise FND_API.G_EXC_ERROR;

1552: OR p_opm_item_id = FND_API.G_MISS_NUM ) THEN
1553: FND_MESSAGE.Set_Name('GMI','MISSING');
1554: FND_MESSAGE.Set_Token('MISSING', 'Opm Item Id');
1555: FND_MSG_PUB.Add;
1556: raise FND_API.G_EXC_ERROR;
1557: END IF;
1558:
1559: IF ( p_apps_from_uom is NULL
1560: OR p_apps_from_uom = FND_API.G_MISS_CHAR ) THEN

Line 1560: OR p_apps_from_uom = FND_API.G_MISS_CHAR ) THEN

1556: raise FND_API.G_EXC_ERROR;
1557: END IF;
1558:
1559: IF ( p_apps_from_uom is NULL
1560: OR p_apps_from_uom = FND_API.G_MISS_CHAR ) THEN
1561: FND_MESSAGE.Set_Name('GMI','MISSING');
1562: FND_MESSAGE.Set_Token('MISSING', 'apps from uom');
1563: FND_MSG_PUB.Add;
1564: raise FND_API.G_EXC_ERROR;

Line 1564: raise FND_API.G_EXC_ERROR;

1560: OR p_apps_from_uom = FND_API.G_MISS_CHAR ) THEN
1561: FND_MESSAGE.Set_Name('GMI','MISSING');
1562: FND_MESSAGE.Set_Token('MISSING', 'apps from uom');
1563: FND_MSG_PUB.Add;
1564: raise FND_API.G_EXC_ERROR;
1565: END IF;
1566:
1567: IF ( p_apps_to_uom is NULL
1568: OR p_apps_to_uom = FND_API.G_MISS_CHAR) THEN

Line 1568: OR p_apps_to_uom = FND_API.G_MISS_CHAR) THEN

1564: raise FND_API.G_EXC_ERROR;
1565: END IF;
1566:
1567: IF ( p_apps_to_uom is NULL
1568: OR p_apps_to_uom = FND_API.G_MISS_CHAR) THEN
1569: FND_MESSAGE.Set_Name('GMI','MISSING');
1570: FND_MESSAGE.Set_Token('MISSING', 'apps to uom');
1571: FND_MSG_PUB.Add;
1572: raise FND_API.G_EXC_ERROR;

Line 1572: raise FND_API.G_EXC_ERROR;

1568: OR p_apps_to_uom = FND_API.G_MISS_CHAR) THEN
1569: FND_MESSAGE.Set_Name('GMI','MISSING');
1570: FND_MESSAGE.Set_Token('MISSING', 'apps to uom');
1571: FND_MSG_PUB.Add;
1572: raise FND_API.G_EXC_ERROR;
1573: END IF;
1574:
1575: IF ( p_original_qty is NULL
1576: OR p_apps_to_uom = FND_API.G_MISS_NUM ) THEN

Line 1576: OR p_apps_to_uom = FND_API.G_MISS_NUM ) THEN

1572: raise FND_API.G_EXC_ERROR;
1573: END IF;
1574:
1575: IF ( p_original_qty is NULL
1576: OR p_apps_to_uom = FND_API.G_MISS_NUM ) THEN
1577: FND_MESSAGE.Set_Name('GMI','MISSING');
1578: FND_MESSAGE.Set_Token('MISSING', 'Original Qty Value');
1579: FND_MSG_PUB.Add;
1580: raise FND_API.G_EXC_ERROR;

Line 1580: raise FND_API.G_EXC_ERROR;

1576: OR p_apps_to_uom = FND_API.G_MISS_NUM ) THEN
1577: FND_MESSAGE.Set_Name('GMI','MISSING');
1578: FND_MESSAGE.Set_Token('MISSING', 'Original Qty Value');
1579: FND_MSG_PUB.Add;
1580: raise FND_API.G_EXC_ERROR;
1581: END IF;
1582:
1583: /* Now Input Values have Been Validated Lets Get OPM */
1584: /* Equaivalent UOM codes. */

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

1593: x_msg_count => x_msg_count,
1594: x_msg_data => x_msg_data
1595: );
1596:
1597: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1598: FND_MESSAGE.Set_Name('GMI','GMI_OPM_UOM_NOT_FOUND');
1599: FND_MESSAGE.Set_Token('APPS_UOM_CODE', p_apps_from_uom);
1600: FND_MSG_PUB.Add;
1601: RAISE FND_API.G_EXC_ERROR;

Line 1601: RAISE FND_API.G_EXC_ERROR;

1597: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1598: FND_MESSAGE.Set_Name('GMI','GMI_OPM_UOM_NOT_FOUND');
1599: FND_MESSAGE.Set_Token('APPS_UOM_CODE', p_apps_from_uom);
1600: FND_MSG_PUB.Add;
1601: RAISE FND_API.G_EXC_ERROR;
1602: END IF;
1603:
1604: GMI_reservation_Util.PrintLn('Convert From OPM UOM => ' || l_opm_from_uom);
1605:

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

1614: x_msg_count => x_msg_count,
1615: x_msg_data => x_msg_data
1616: );
1617:
1618: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1619: FND_MESSAGE.Set_Name('GMI','GMI_OPM_UOM_NOT_FOUND');
1620: FND_MESSAGE.Set_Token('APPS_UOM_CODE', p_apps_to_uom);
1621: FND_MSG_PUB.Add;
1622: RAISE FND_API.G_EXC_ERROR;

Line 1622: RAISE FND_API.G_EXC_ERROR;

1618: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1619: FND_MESSAGE.Set_Name('GMI','GMI_OPM_UOM_NOT_FOUND');
1620: FND_MESSAGE.Set_Token('APPS_UOM_CODE', p_apps_to_uom);
1621: FND_MSG_PUB.Add;
1622: RAISE FND_API.G_EXC_ERROR;
1623: END IF;
1624:
1625: GMI_reservation_Util.PrintLn('Convert To OPM UOM => ' || l_opm_from_uom);
1626:

Line 1630: OR p_opm_item_id = FND_API.G_MISS_NUM ) THEN

1626:
1627:
1628:
1629: IF ( p_opm_lot_id is NULL
1630: OR p_opm_item_id = FND_API.G_MISS_NUM ) THEN
1631: l_opm_lot_id := 0;
1632: ELSE
1633: l_opm_lot_id := p_opm_lot_id;
1634: END IF;

Line 1656: WHEN FND_API.G_EXC_ERROR THEN

1652: GMI_reservation_Util.PrintLn('converted Qty => ' || x_converted_qty);
1653:
1654:
1655: EXCEPTION
1656: WHEN FND_API.G_EXC_ERROR THEN
1657: x_return_status := fnd_api.g_ret_sts_error;
1658:
1659: /* Get message count and data */
1660: FND_MSG_PUB.count_and_get

Line 1657: x_return_status := fnd_api.g_ret_sts_error;

1653:
1654:
1655: EXCEPTION
1656: WHEN FND_API.G_EXC_ERROR THEN
1657: x_return_status := fnd_api.g_ret_sts_error;
1658:
1659: /* Get message count and data */
1660: FND_MSG_PUB.count_and_get
1661: ( p_count => x_msg_count

Line 1665: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1661: ( p_count => x_msg_count
1662: , p_data => x_msg_data
1663: );
1664:
1665: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1666: ROLLBACK TO PICK_WAVE_CONFIRM;
1667: x_return_status := fnd_api.g_ret_sts_unexp_error;
1668:
1669: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME

Line 1667: x_return_status := fnd_api.g_ret_sts_unexp_error;

1663: );
1664:
1665: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1666: ROLLBACK TO PICK_WAVE_CONFIRM;
1667: x_return_status := fnd_api.g_ret_sts_unexp_error;
1668:
1669: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME
1670: ,l_api_name
1671: );

Line 1675: x_return_status := fnd_api.g_ret_sts_unexp_error;

1671: );
1672:
1673: WHEN OTHERS THEN
1674: ROLLBACK TO PICK_WAVE_CONFIRM;
1675: x_return_status := fnd_api.g_ret_sts_unexp_error;
1676:
1677: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME
1678: ,l_api_name
1679: );

Line 1733: l_return_status := fnd_api.g_ret_sts_success;

1729: BEGIN
1730:
1731: -- By default, allow the transaction.
1732: l_allowed := 'Y';
1733: l_return_status := fnd_api.g_ret_sts_success;
1734: l_max_quantity := 1e125;
1735:
1736: -- get sales order line id from the move order line
1737: OPEN c_txn_source;

Line 1741: RAISE fnd_api.g_exc_error;

1737: OPEN c_txn_source;
1738: FETCH c_txn_source into l_txn_source_line_id;
1739: IF c_txn_source%NOTFOUND THEN
1740: CLOSE c_txn_source; -- Bug 3859774
1741: RAISE fnd_api.g_exc_error;
1742: END IF;
1743: CLOSE c_txn_source;
1744:
1745: -- If for some reason the txn_source_line_id on the move order line is

Line 1769: If l_return_status = FND_API.G_RET_STS_ERROR Then

1765: ,x_avail_req_quantity => l_avail_req_qty
1766: ,x_avail_req_quantity2 => l_avail_req_qty2
1767: ,x_return_status => l_return_status
1768: );
1769: If l_return_status = FND_API.G_RET_STS_ERROR Then
1770: raise FND_API.G_EXC_ERROR;
1771: Elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR Then
1772: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1773: End If;

Line 1770: raise FND_API.G_EXC_ERROR;

1766: ,x_avail_req_quantity2 => l_avail_req_qty2
1767: ,x_return_status => l_return_status
1768: );
1769: If l_return_status = FND_API.G_RET_STS_ERROR Then
1770: raise FND_API.G_EXC_ERROR;
1771: Elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR Then
1772: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1773: End If;
1774: END IF;

Line 1771: Elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR Then

1767: ,x_return_status => l_return_status
1768: );
1769: If l_return_status = FND_API.G_RET_STS_ERROR Then
1770: raise FND_API.G_EXC_ERROR;
1771: Elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR Then
1772: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1773: End If;
1774: END IF;
1775:

Line 1772: raise FND_API.G_EXC_UNEXPECTED_ERROR;

1768: );
1769: If l_return_status = FND_API.G_RET_STS_ERROR Then
1770: raise FND_API.G_EXC_ERROR;
1771: Elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR Then
1772: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1773: End If;
1774: END IF;
1775:
1776: x_max_quantity := l_max_quantity;

Line 1782: WHEN fnd_api.g_exc_error THEN

1778: x_return_status := l_return_status;
1779:
1780: EXCEPTION
1781:
1782: WHEN fnd_api.g_exc_error THEN
1783: x_return_status := FND_API.G_RET_STS_ERROR;
1784: x_allowed := 'N';
1785: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
1786: ,p_data => x_msg_data);

Line 1783: x_return_status := FND_API.G_RET_STS_ERROR;

1779:
1780: EXCEPTION
1781:
1782: WHEN fnd_api.g_exc_error THEN
1783: x_return_status := FND_API.G_RET_STS_ERROR;
1784: x_allowed := 'N';
1785: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
1786: ,p_data => x_msg_data);
1787:

Line 1788: WHEN fnd_api.g_exc_unexpected_error THEN

1784: x_allowed := 'N';
1785: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
1786: ,p_data => x_msg_data);
1787:
1788: WHEN fnd_api.g_exc_unexpected_error THEN
1789: x_return_status := FND_API.G_RET_STS_ERROR;
1790: x_allowed := 'N';
1791: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
1792: ,p_data => x_msg_data);

Line 1789: x_return_status := FND_API.G_RET_STS_ERROR;

1785: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
1786: ,p_data => x_msg_data);
1787:
1788: WHEN fnd_api.g_exc_unexpected_error THEN
1789: x_return_status := FND_API.G_RET_STS_ERROR;
1790: x_allowed := 'N';
1791: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
1792: ,p_data => x_msg_data);
1793:

Line 1795: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1791: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
1792: ,p_data => x_msg_data);
1793:
1794: WHEN OTHERS THEN
1795: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1796: x_allowed := 'N';
1797: IF fnd_msg_pub.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1798: THEN
1799: FND_MSG_PUB.Add_Exc_Msg

Line 1906: l_process_flag VARCHAR2(1) :=FND_API.G_FALSE;

1902: l_req_qty_left NUMBER;
1903: others EXCEPTION;
1904:
1905: -- HW OPM new varibales
1906: l_process_flag VARCHAR2(1) :=FND_API.G_FALSE;
1907: l_req_qty2_left NUMBER;
1908: l_apps_uom VARCHAR2(4);
1909: l_opm_uom VARCHAR2(4);
1910: l_apps_uom2 VARCHAR2(4);

Line 1939: l_process_flag := FND_API.G_FALSE;

1935:
1936: -- HW OPM Need to check the org for forking
1937: IF NOT INV_GMI_RSV_BRANCH.Process_Branch(p_organization_id => l_detail_info.organization_id)
1938: THEN
1939: l_process_flag := FND_API.G_FALSE;
1940: ELSE
1941: l_process_flag := FND_API.G_TRUE;
1942: END IF;
1943:

Line 1941: l_process_flag := FND_API.G_TRUE;

1937: IF NOT INV_GMI_RSV_BRANCH.Process_Branch(p_organization_id => l_detail_info.organization_id)
1938: THEN
1939: l_process_flag := FND_API.G_FALSE;
1940: ELSE
1941: l_process_flag := FND_API.G_TRUE;
1942: END IF;
1943:
1944:
1945: OPEN c_detail_staged_quantities(p_order_line_id);

Line 1963: IF ( l_process_flag = FND_API.G_TRUE ) THEN

1959: RETURN;
1960: END IF;
1961:
1962: -- HW OPM for debugging puproses. Print values
1963: IF ( l_process_flag = FND_API.G_TRUE ) THEN
1964: gmi_reservation_util.println('Value of l_staged_info.net_requested_qty is '||l_staged_info.net_requested_qty);
1965: gmi_reservation_util.println('Value of l_staged_info.net_requested_qty2 is '||l_staged_info.net_requested_qty2);
1966: gmi_reservation_util.println('Value of l_staged_info.net_staged_qty is '||l_staged_info.net_staged_qty);
1967: gmi_reservation_util.println('Value of l_staged_info.net_satged_qty2 is '||l_staged_info.net_staged_qty2);

Line 1971: IF (l_process_flag = FND_API.G_FALSE ) THEN

1967: gmi_reservation_util.println('Value of l_staged_info.net_satged_qty2 is '||l_staged_info.net_staged_qty2);
1968: END IF;
1969:
1970: -- HW OPM Need to branch
1971: IF (l_process_flag = FND_API.G_FALSE ) THEN
1972: OPEN c_ordered_quantity(p_order_line_id,
1973: l_detail_info.inventory_item_id,
1974: l_detail_info.requested_quantity_uom);
1975: FETCH c_ordered_quantity INTO l_order_line;

Line 2017: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2013: , x_return_status => l_return_status
2014: , x_msg_count => l_msg_count
2015: , x_msg_data => l_msg_data );
2016:
2017: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2018: raise others ;
2019: END IF;
2020:
2021: -- HW added for debugging purposes

Line 2022: IF ( l_process_flag = FND_API.G_TRUE ) THEN

2018: raise others ;
2019: END IF;
2020:
2021: -- HW added for debugging purposes
2022: IF ( l_process_flag = FND_API.G_TRUE ) THEN
2023: gmi_reservation_util.println('Value of l_min_quantity is '||l_min_quantity);
2024: gmi_reservation_util.println('Value of l_min_quantity2 is '||l_min_quantity2);
2025: gmi_reservation_util.println('Value of l_max_quantity is '||l_max_quantity);
2026: gmi_reservation_util.println('Value of l_max_quantity2 is '||l_max_quantity2);

Line 2031: IF ( l_process_flag = FND_API.G_FALSE ) THEN

2027: END IF;
2028:
2029:
2030: -- HW Need to branch
2031: IF ( l_process_flag = FND_API.G_FALSE ) THEN
2032: l_max_quantity := WSH_WV_UTILS.CONVERT_UOM(l_order_line.order_quantity_uom,
2033: l_detail_info.requested_quantity_uom,
2034: l_max_quantity,
2035: l_detail_info.inventory_item_id)

Line 2087: IF ( l_process_flag = FND_API.G_TRUE ) THEN

2083: END IF; -- of branching
2084:
2085:
2086: -- HW added for debugging purposes
2087: IF ( l_process_flag = FND_API.G_TRUE ) THEN
2088: gmi_reservation_util.println('Value of quantity is '||quantity);
2089: gmi_reservation_util.println('Value of l_order_line_opm.quantity2 is '||l_order_line_opm.ordered_quantity2);
2090: gmi_reservation_util.println('Value of l_req_qty_left is '|| l_req_qty_left);
2091: gmi_reservation_util.println('Value of l_req_qty2_left is '|| l_req_qty2_left);

Line 2115: IF ( l_process_flag = FND_API.G_TRUE ) THEN

2111: x_max_quantity2_allowed := l_max_quantity2;
2112: x_avail_req_quantity2 := l_req_qty2_left;
2113:
2114: -- HW for debugging purposes, print values
2115: IF ( l_process_flag = FND_API.G_TRUE ) THEN
2116: gmi_reservation_util.println('Value of x_max_quantity_allowed is '||x_max_quantity_allowed);
2117: gmi_reservation_util.println('Value of x_max_quantity2_allowed is '||x_max_quantity2_allowed);
2118: gmi_reservation_util.println('Value of x_avail_req_quantity is '||x_avail_req_quantity);
2119: gmi_reservation_util.println('Value of x_avail_req_quantity2 is '||x_avail_req_quantity2);

Line 2196: x_return_status := FND_API.G_RET_STS_SUCCESS;

2192: BEGIN
2193:
2194: gmi_reservation_util.println('Entering GMI_PICK_WAVE_CONFIRM_PVT.Get_Min_Max_Tolerance_Quantity');
2195:
2196: x_return_status := FND_API.G_RET_STS_SUCCESS;
2197: /*
2198: IF NOT FND_API.Compatible_API_Call
2199: ( l_api_version_number
2200: , p_api_version_number

Line 2198: IF NOT FND_API.Compatible_API_Call

2194: gmi_reservation_util.println('Entering GMI_PICK_WAVE_CONFIRM_PVT.Get_Min_Max_Tolerance_Quantity');
2195:
2196: x_return_status := FND_API.G_RET_STS_SUCCESS;
2197: /*
2198: IF NOT FND_API.Compatible_API_Call
2199: ( l_api_version_number
2200: , p_api_version_number
2201: , l_api_name
2202: , G_PKG_NAME

Line 2205: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2201: , l_api_name
2202: , G_PKG_NAME
2203: )
2204: THEN
2205: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2206: END IF;
2207: */
2208: -- HW OPM retrieve qty2 for OPM
2209: SELECT ship_tolerance_below,

Line 2343: x_return_status := FND_API.G_RET_STS_ERROR;

2339: x_max_remaining_quantity2 := 0;
2340:
2341: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR)
2342: THEN
2343: x_return_status := FND_API.G_RET_STS_ERROR;
2344: END IF;
2345:
2346: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2347:

Line 2346: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2342: THEN
2343: x_return_status := FND_API.G_RET_STS_ERROR;
2344: END IF;
2345:
2346: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2347:
2348: gmi_reservation_util.println('Unexpected Error : '||sqlerrm);
2349: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2350:

Line 2349: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

2345:
2346: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2347:
2348: gmi_reservation_util.println('Unexpected Error : '||sqlerrm);
2349: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2350:
2351: -- Get message count and data
2352:
2353: FND_MSG_PUB.Count_And_Get

Line 2361: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

2357:
2358: WHEN OTHERS THEN
2359:
2360: gmi_reservation_util.println('Unexpected Error : '||sqlerrm);
2361: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2362:
2363: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2364: THEN
2365: FND_MSG_PUB.Add_Exc_Msg

Line 2385: , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE

2381: /* Following procedure created for bug2901317*/
2382: PROCEDURE BALANCE_NONINV_TRAN
2383: (
2384: p_dflt_nonctl_tran_rec IN GMI_TRANS_ENGINE_PUB.ictran_rec
2385: , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE
2386: , p_requested_qty IN NUMBER
2387: , p_requested_qty2 IN NUMBER
2388: , p_delivery_detail_id IN NUMBER
2389: , x_tran_row OUT NOCOPY IC_TRAN_PND%ROWTYPE

Line 2397: l_validation_level VARCHAR2(4) := FND_API.G_VALID_LEVEL_FULL;

2393: )
2394: IS
2395:
2396: l_dflt_nonctl_tran_rec GMI_TRANS_ENGINE_PUB.ictran_rec;
2397: l_validation_level VARCHAR2(4) := FND_API.G_VALID_LEVEL_FULL;
2398: BEGIN
2399:
2400: l_dflt_nonctl_tran_rec := p_dflt_nonctl_tran_rec;
2401:

Line 2417: ,p_init_msg_list => FND_API.G_FALSE

2413:
2414: /* Updating the default transaction with backordered quantity */
2415: GMI_TRANS_ENGINE_PUB.UPDATE_PENDING_TRANSACTION(
2416: p_api_version => 1.0
2417: ,p_init_msg_list => FND_API.G_FALSE
2418: ,p_commit => p_commit
2419: ,p_validation_level => l_validation_level
2420: ,p_tran_rec => l_dflt_nonctl_tran_rec
2421: ,x_tran_row => x_tran_row

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

2422: ,x_return_status => x_return_status
2423: ,x_msg_count => x_msg_count
2424: ,x_msg_data => x_msg_data);
2425:
2426: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2427: GMI_reservation_Util.PrintLn('(opm_dbg) in PICK_CONFIRM:
2428: Error returned by GMI_TRANS_ENGINE_PUB.UPDATE_PENDING_TRANSACTION.' );
2429: GMI_reservation_Util.PrintLn(x_msg_data); -- Bug 3859774
2430: FND_MESSAGE.SET_NAME('GMI','GMI_ERROR');

Line 2434: RAISE FND_API.G_EXC_ERROR;

2430: FND_MESSAGE.SET_NAME('GMI','GMI_ERROR');
2431: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_TRANS_ENGINE_PUB.UPDATE_PENDING_TRANSACTION');
2432: FND_MESSAGE.Set_Token('WHERE', 'PICK_CONFIRM');
2433: FND_MSG_PUB.Add;
2434: RAISE FND_API.G_EXC_ERROR;
2435: END IF;
2436:
2437: l_dflt_nonctl_tran_rec.trans_id := NULL;
2438: l_dflt_nonctl_tran_rec.line_detail_id := p_delivery_detail_id;

Line 2449: , p_init_msg_list => FND_API.G_FALSE

2445:
2446: /* Creating a new transaction with the staged quantity */
2447: GMI_TRANS_ENGINE_PUB.CREATE_PENDING_TRANSACTION
2448: ( p_api_version => 1.0
2449: , p_init_msg_list => FND_API.G_FALSE
2450: , p_commit => FND_API.G_FALSE
2451: , p_validation_level => FND_API.G_VALID_LEVEL_FULL
2452: , p_tran_rec => l_dflt_nonctl_tran_rec
2453: , x_tran_row => x_tran_row

Line 2450: , p_commit => FND_API.G_FALSE

2446: /* Creating a new transaction with the staged quantity */
2447: GMI_TRANS_ENGINE_PUB.CREATE_PENDING_TRANSACTION
2448: ( p_api_version => 1.0
2449: , p_init_msg_list => FND_API.G_FALSE
2450: , p_commit => FND_API.G_FALSE
2451: , p_validation_level => FND_API.G_VALID_LEVEL_FULL
2452: , p_tran_rec => l_dflt_nonctl_tran_rec
2453: , x_tran_row => x_tran_row
2454: , x_return_status => x_return_status

Line 2451: , p_validation_level => FND_API.G_VALID_LEVEL_FULL

2447: GMI_TRANS_ENGINE_PUB.CREATE_PENDING_TRANSACTION
2448: ( p_api_version => 1.0
2449: , p_init_msg_list => FND_API.G_FALSE
2450: , p_commit => FND_API.G_FALSE
2451: , p_validation_level => FND_API.G_VALID_LEVEL_FULL
2452: , p_tran_rec => l_dflt_nonctl_tran_rec
2453: , x_tran_row => x_tran_row
2454: , x_return_status => x_return_status
2455: , x_msg_count => x_msg_count

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

2455: , x_msg_count => x_msg_count
2456: , x_msg_data => x_msg_data
2457: );
2458:
2459: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2460: GMI_reservation_Util.PrintLn('(opm_dbg) Error return by Create_Pending_Transaction,
2461: return_status='|| x_return_status||', x_msg_count='|| x_msg_count||'.');
2462: GMI_reservation_Util.PrintLn(x_msg_data); -- Bug 3859774
2463: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');

Line 2467: raise FND_API.G_EXC_ERROR;

2463: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
2464: FND_MESSAGE.Set_Token('BY_PROC','GMI_TRANS_ENGINE_PUB.CREATE_PENDING_TRANSACTION');
2465: FND_MESSAGE.Set_Token('WHERE','PICK_CONFIRM');
2466: FND_MSG_PUB.Add;
2467: raise FND_API.G_EXC_ERROR;
2468: END IF;
2469:
2470: EXCEPTION
2471:

Line 2472: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2468: END IF;
2469:
2470: EXCEPTION
2471:
2472: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2473: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2474:
2475: FND_MSG_PUB.Count_And_Get
2476: ( p_count => x_msg_count

Line 2473: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

2469:
2470: EXCEPTION
2471:
2472: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2473: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2474:
2475: FND_MSG_PUB.Count_And_Get
2476: ( p_count => x_msg_count
2477: , p_data => x_msg_data

Line 2480: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

2476: ( p_count => x_msg_count
2477: , p_data => x_msg_data
2478: );
2479: WHEN OTHERS THEN
2480: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2481:
2482: FND_MSG_PUB.Count_And_Get
2483: ( p_count => x_msg_count
2484: , p_data => x_msg_data

Line 2496: , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE

2492:
2493: PROCEDURE BALANCE_NONCTL_INV_TRAN
2494: (
2495: p_mo_line_rec IN GMI_MOVE_ORDER_GLOBAL.mo_line_rec
2496: , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE
2497: , p_item_id IN NUMBER
2498: , p_whse_code IN VARCHAR2
2499: , p_requested_qty IN NUMBER
2500: , p_requested_qty2 IN NUMBER

Line 2548: l_validation_level VARCHAR2(4) := FND_API.G_VALID_LEVEL_FULL;

2544:
2545: l_trans_id NUMBER;
2546: l_dflt_nonctl_tran_rec GMI_TRANS_ENGINE_PUB.ictran_rec;
2547: l_dflt_nonctl_tran_rec1 GMI_TRANS_ENGINE_PUB.ictran_rec;
2548: l_validation_level VARCHAR2(4) := FND_API.G_VALID_LEVEL_FULL;
2549: l_tran_row IC_TRAN_PND%ROWTYPE;
2550: l_onhand_qty NUMBER := 0; -- Bug 2910069
2551: l_onhand_qty2 NUMBER := 0; -- Bug 2910069
2552: l_backorder_qty NUMBER := 0;

Line 2622: ,p_init_msg_list => FND_API.G_FALSE

2618:
2619: /* Updating the default transaction with requested quantity */
2620: GMI_TRANS_ENGINE_PUB.UPDATE_PENDING_TRANSACTION(
2621: p_api_version => 1.0
2622: ,p_init_msg_list => FND_API.G_FALSE
2623: ,p_commit => p_commit
2624: ,p_validation_level => l_validation_level
2625: ,p_tran_rec => l_dflt_nonctl_tran_rec
2626: ,x_tran_row => l_tran_row

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

2651: );
2652:
2653: GMI_reservation_Util.PrintLn('pick slip number is '|| l_pick_slip_number);
2654:
2655: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)
2656: THEN
2657: GMI_reservation_Util.PrintLn('(opm_dbg) in Set_Pick_lots: Error returned by GMI_Pick_Release_Util.Create_Manual_Alloc_Pickslip.', 'pick_lots.log');
2658: FND_MESSAGE.SET_NAME('GMI','GMI_ERROR');
2659: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Pick_Release_Util.Create_Manual_Alloc_Pickslip');

Line 2662: RAISE FND_API.G_EXC_ERROR;

2658: FND_MESSAGE.SET_NAME('GMI','GMI_ERROR');
2659: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Pick_Release_Util.Create_Manual_Alloc_Pickslip');
2660: FND_MESSAGE.Set_Token('WHERE', 'Set_Pick_Lots');
2661: FND_MSG_PUB.Add;
2662: RAISE FND_API.G_EXC_ERROR;
2663: END IF;
2664:
2665: UPDATE ic_tran_pnd
2666: SET pick_slip_number = l_pick_slip_number

Line 2713: ,p_init_msg_list => FND_API.G_FALSE

2709:
2710: /* Updating the default transaction with backordered quantity */
2711: GMI_TRANS_ENGINE_PUB.UPDATE_PENDING_TRANSACTION(
2712: p_api_version => 1.0
2713: ,p_init_msg_list => FND_API.G_FALSE
2714: ,p_commit => p_commit
2715: ,p_validation_level => l_validation_level
2716: ,p_tran_rec => l_dflt_nonctl_tran_rec
2717: ,x_tran_row => l_tran_row

Line 2733: , p_init_msg_list => FND_API.G_FALSE

2729:
2730: /* Creating a new transaction with the staged quantity */
2731: GMI_TRANS_ENGINE_PUB.CREATE_PENDING_TRANSACTION
2732: ( p_api_version => 1.0
2733: , p_init_msg_list => FND_API.G_FALSE
2734: , p_commit => FND_API.G_FALSE
2735: , p_validation_level => FND_API.G_VALID_LEVEL_FULL
2736: , p_tran_rec => l_dflt_nonctl_tran_rec
2737: , x_tran_row => l_tran_row

Line 2734: , p_commit => FND_API.G_FALSE

2730: /* Creating a new transaction with the staged quantity */
2731: GMI_TRANS_ENGINE_PUB.CREATE_PENDING_TRANSACTION
2732: ( p_api_version => 1.0
2733: , p_init_msg_list => FND_API.G_FALSE
2734: , p_commit => FND_API.G_FALSE
2735: , p_validation_level => FND_API.G_VALID_LEVEL_FULL
2736: , p_tran_rec => l_dflt_nonctl_tran_rec
2737: , x_tran_row => l_tran_row
2738: , x_return_status => x_return_status

Line 2735: , p_validation_level => FND_API.G_VALID_LEVEL_FULL

2731: GMI_TRANS_ENGINE_PUB.CREATE_PENDING_TRANSACTION
2732: ( p_api_version => 1.0
2733: , p_init_msg_list => FND_API.G_FALSE
2734: , p_commit => FND_API.G_FALSE
2735: , p_validation_level => FND_API.G_VALID_LEVEL_FULL
2736: , p_tran_rec => l_dflt_nonctl_tran_rec
2737: , x_tran_row => l_tran_row
2738: , x_return_status => x_return_status
2739: , x_msg_count => x_msg_count

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

2739: , x_msg_count => x_msg_count
2740: , x_msg_data => x_msg_data
2741: );
2742:
2743: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2744: GMI_reservation_Util.PrintLn('(opm_dbg) Error return by Create_Pending_Transaction,
2745: return_status='|| x_return_status||', x_msg_count='|| x_msg_count||'.');
2746: GMI_reservation_Util.PrintLn(x_msg_data); -- Bug 3859774
2747: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');

Line 2751: raise FND_API.G_EXC_ERROR;

2747: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
2748: FND_MESSAGE.Set_Token('BY_PROC','GMI_TRANS_ENGINE_PUB.CREATE_PENDING_TRANSACTION');
2749: FND_MESSAGE.Set_Token('WHERE','Create_Default_Lot');
2750: FND_MSG_PUB.Add;
2751: raise FND_API.G_EXC_ERROR;
2752: END IF;
2753:
2754: ELSIF (p_requested_qty <> ABS(l_dflt_nonctl_tran_rec.trans_qty)) THEN
2755: /* Split ic_tran_pnd to have remaining quantity backordered.

Line 2769: ,p_init_msg_list => FND_API.G_FALSE

2765:
2766: /* Updating the default transaction with backordered quantity */
2767: GMI_TRANS_ENGINE_PUB.UPDATE_PENDING_TRANSACTION(
2768: p_api_version => 1.0
2769: ,p_init_msg_list => FND_API.G_FALSE
2770: ,p_commit => p_commit
2771: ,p_validation_level => l_validation_level
2772: ,p_tran_rec => l_dflt_nonctl_tran_rec
2773: ,x_tran_row => l_tran_row

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

2774: ,x_return_status => x_return_status
2775: ,x_msg_count => x_msg_count
2776: ,x_msg_data => x_msg_data);
2777:
2778: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2779: GMI_reservation_Util.PrintLn('(opm_dbg) in PICK_CONFIRM:
2780: Error returned by GMI_TRANS_ENGINE_PUB.UPDATE_PENDING_TRANSACTION.' );
2781: GMI_reservation_Util.PrintLn(x_msg_data); -- Bug 3859774
2782: FND_MESSAGE.SET_NAME('GMI','GMI_ERROR');

Line 2786: RAISE FND_API.G_EXC_ERROR;

2782: FND_MESSAGE.SET_NAME('GMI','GMI_ERROR');
2783: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_TRANS_ENGINE_PUB.UPDATE_PENDING_TRANSACTION');
2784: FND_MESSAGE.Set_Token('WHERE', 'PICK_CONFIRM');
2785: FND_MSG_PUB.Add;
2786: RAISE FND_API.G_EXC_ERROR;
2787: END IF;
2788:
2789: l_dflt_nonctl_tran_rec.trans_id := NULL;
2790: l_dflt_nonctl_tran_rec.line_detail_id := p_delivery_detail_id;

Line 2800: , p_init_msg_list => FND_API.G_FALSE

2796:
2797: /* Creating a new transaction with the staged quantity */
2798: GMI_TRANS_ENGINE_PUB.CREATE_PENDING_TRANSACTION
2799: ( p_api_version => 1.0
2800: , p_init_msg_list => FND_API.G_FALSE
2801: , p_commit => FND_API.G_FALSE
2802: , p_validation_level => FND_API.G_VALID_LEVEL_FULL
2803: , p_tran_rec => l_dflt_nonctl_tran_rec
2804: , x_tran_row => l_tran_row

Line 2801: , p_commit => FND_API.G_FALSE

2797: /* Creating a new transaction with the staged quantity */
2798: GMI_TRANS_ENGINE_PUB.CREATE_PENDING_TRANSACTION
2799: ( p_api_version => 1.0
2800: , p_init_msg_list => FND_API.G_FALSE
2801: , p_commit => FND_API.G_FALSE
2802: , p_validation_level => FND_API.G_VALID_LEVEL_FULL
2803: , p_tran_rec => l_dflt_nonctl_tran_rec
2804: , x_tran_row => l_tran_row
2805: , x_return_status => x_return_status

Line 2802: , p_validation_level => FND_API.G_VALID_LEVEL_FULL

2798: GMI_TRANS_ENGINE_PUB.CREATE_PENDING_TRANSACTION
2799: ( p_api_version => 1.0
2800: , p_init_msg_list => FND_API.G_FALSE
2801: , p_commit => FND_API.G_FALSE
2802: , p_validation_level => FND_API.G_VALID_LEVEL_FULL
2803: , p_tran_rec => l_dflt_nonctl_tran_rec
2804: , x_tran_row => l_tran_row
2805: , x_return_status => x_return_status
2806: , x_msg_count => x_msg_count

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

2806: , x_msg_count => x_msg_count
2807: , x_msg_data => x_msg_data
2808: );
2809:
2810: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2811: GMI_reservation_Util.PrintLn('(opm_dbg) Error return by Create_Pending_Transaction,
2812: return_status='|| x_return_status||', x_msg_count='|| x_msg_count||'.');
2813: GMI_reservation_Util.PrintLn(x_msg_data); -- Bug 3859774
2814: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');

Line 2818: raise FND_API.G_EXC_ERROR;

2814: FND_MESSAGE.Set_Name('GMI','GMI_ERROR');
2815: FND_MESSAGE.Set_Token('BY_PROC','GMI_TRANS_ENGINE_PUB.CREATE_PENDING_TRANSACTION');
2816: FND_MESSAGE.Set_Token('WHERE','PICK_CONFIRM');
2817: FND_MSG_PUB.Add;
2818: raise FND_API.G_EXC_ERROR;
2819: END IF;
2820:
2821: ELSE
2822:

Line 2830: ,p_init_msg_list => FND_API.G_FALSE

2826: GMI_Reservation_Util.PrintLn('3. Updating pending txn with staged ind/delivery id');
2827:
2828: GMI_TRANS_ENGINE_PUB.UPDATE_PENDING_TRANSACTION(
2829: p_api_version => 1.0
2830: ,p_init_msg_list => FND_API.G_FALSE
2831: ,p_commit => p_commit
2832: ,p_validation_level => l_validation_level
2833: ,p_tran_rec => l_dflt_nonctl_tran_rec
2834: ,x_tran_row => l_tran_row

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

2835: ,x_return_status => x_return_status
2836: ,x_msg_count => x_msg_count
2837: ,x_msg_data => x_msg_data);
2838:
2839: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2840: GMI_reservation_Util.PrintLn('(opm_dbg) in PICK_CONFIRM:
2841: Error returned by GMI_TRANS_ENGINE_PUB.UPDATE_PENDING_TRANSACTION.' );
2842: GMI_reservation_Util.PrintLn(x_msg_data); -- Bug 3859774
2843: FND_MESSAGE.SET_NAME('GMI','GMI_ERROR');

Line 2847: RAISE FND_API.G_EXC_ERROR;

2843: FND_MESSAGE.SET_NAME('GMI','GMI_ERROR');
2844: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_TRANS_ENGINE_PUB.UPDATE_PENDING_TRANSACTION');
2845: FND_MESSAGE.Set_Token('WHERE', 'PICK_CONFIRM');
2846: FND_MSG_PUB.Add;
2847: RAISE FND_API.G_EXC_ERROR;
2848: END IF;
2849:
2850: END IF;
2851:

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

2862: );
2863:
2864: GMI_reservation_Util.PrintLn('pick slip number is '|| l_pick_slip_number);
2865:
2866: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)
2867: THEN
2868: GMI_reservation_Util.PrintLn('(opm_dbg) in Set_Pick_lots: Error returned by GMI_Pick_Release_Util.Create_Manual_Alloc_Pickslip.', 'pick_lots.log');
2869: FND_MESSAGE.SET_NAME('GMI','GMI_ERROR');
2870: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Pick_Release_Util.Create_Manual_Alloc_Pickslip');

Line 2873: RAISE FND_API.G_EXC_ERROR;

2869: FND_MESSAGE.SET_NAME('GMI','GMI_ERROR');
2870: FND_MESSAGE.Set_Token('BY_PROC', 'GMI_Pick_Release_Util.Create_Manual_Alloc_Pickslip');
2871: FND_MESSAGE.Set_Token('WHERE', 'Set_Pick_Lots');
2872: FND_MSG_PUB.Add;
2873: RAISE FND_API.G_EXC_ERROR;
2874: END IF;
2875:
2876: GMI_reservation_Util.PrintLn('l_tran_row.trans_id '||l_tran_row.trans_id );
2877: UPDATE ic_tran_pnd

Line 2887: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2883: END IF; /* IF GMI_TRAN_PND_DB_PVT.FETCH_IC_TRAN_PND */
2884:
2885: EXCEPTION
2886:
2887: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2888: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2889:
2890: FND_MSG_PUB.Count_And_Get
2891: ( p_count => x_msg_count

Line 2888: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

2884:
2885: EXCEPTION
2886:
2887: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2888: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2889:
2890: FND_MSG_PUB.Count_And_Get
2891: ( p_count => x_msg_count
2892: , p_data => x_msg_data

Line 2895: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

2891: ( p_count => x_msg_count
2892: , p_data => x_msg_data
2893: );
2894: WHEN OTHERS THEN
2895: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2896:
2897: FND_MSG_PUB.Count_And_Get
2898: ( p_count => x_msg_count
2899: , p_data => x_msg_data

Line 2911: , p_init_msg_lst IN VARCHAR2 DEFAULT fnd_api.g_false

2907: * API would be shielded from the form call */
2908: PROCEDURE FORM_PICK_CONFIRM
2909: (
2910: p_api_version_number IN NUMBER
2911: , p_init_msg_lst IN VARCHAR2 DEFAULT fnd_api.g_false
2912: , p_validation_flag IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL
2913: , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE
2914: , p_mo_line_tbl IN GMI_Move_Order_Global.MO_LINE_TBL
2915: , x_mo_line_tbl OUT NOCOPY GMI_Move_Order_Global.MO_LINE_TBL

Line 2912: , p_validation_flag IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL

2908: PROCEDURE FORM_PICK_CONFIRM
2909: (
2910: p_api_version_number IN NUMBER
2911: , p_init_msg_lst IN VARCHAR2 DEFAULT fnd_api.g_false
2912: , p_validation_flag IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL
2913: , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE
2914: , p_mo_line_tbl IN GMI_Move_Order_Global.MO_LINE_TBL
2915: , x_mo_line_tbl OUT NOCOPY GMI_Move_Order_Global.MO_LINE_TBL
2916: , x_return_status OUT NOCOPY VARCHAR2

Line 2913: , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE

2909: (
2910: p_api_version_number IN NUMBER
2911: , p_init_msg_lst IN VARCHAR2 DEFAULT fnd_api.g_false
2912: , p_validation_flag IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL
2913: , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE
2914: , p_mo_line_tbl IN GMI_Move_Order_Global.MO_LINE_TBL
2915: , x_mo_line_tbl OUT NOCOPY GMI_Move_Order_Global.MO_LINE_TBL
2916: , x_return_status OUT NOCOPY VARCHAR2
2917: , x_msg_count OUT NOCOPY NUMBER

Line 2925: p_init_msg_lst => FND_API.G_FALSE,

2921: IS
2922: BEGIN
2923: GMI_Pick_Wave_Confirm_PVT.Pick_Confirm(
2924: p_api_version_number => 1.0,
2925: p_init_msg_lst => FND_API.G_FALSE,
2926: p_validation_flag => FND_API.G_VALID_LEVEL_FULL,
2927: p_commit => p_commit,
2928: p_delivery_detail_id => null,
2929: p_mo_line_tbl => p_mo_line_tbl,

Line 2926: p_validation_flag => FND_API.G_VALID_LEVEL_FULL,

2922: BEGIN
2923: GMI_Pick_Wave_Confirm_PVT.Pick_Confirm(
2924: p_api_version_number => 1.0,
2925: p_init_msg_lst => FND_API.G_FALSE,
2926: p_validation_flag => FND_API.G_VALID_LEVEL_FULL,
2927: p_commit => p_commit,
2928: p_delivery_detail_id => null,
2929: p_mo_line_tbl => p_mo_line_tbl,
2930: x_mo_line_tbl => x_mo_line_tbl,

Line 2971: x_return_status := FND_API.G_RET_STS_SUCCESS;

2967:
2968: l_TRUNCATE_TO_LENGTH CONSTANT INTEGER := 5;
2969:
2970: BEGIN
2971: x_return_status := FND_API.G_RET_STS_SUCCESS;
2972: GMI_Reservation_Util.PrintLn('Inside truncate_trans_qty');
2973: GMI_Reservation_Util.PrintLn('Parameters- p_line_id:'||p_line_id||', p_delivery_detail_id:'||p_delivery_detail_id||', p_default_location:'||p_default_location);
2974: IF (is_lot_loct_ctl = TRUE) THEN
2975: FOR lot_loct_ctl_trans_rec in lot_loct_ctl_trans

Line 2988: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

2984:
2985: EXCEPTION
2986: WHEN OTHERS THEN
2987: gmi_reservation_util.println(SQLERRM);
2988: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2989: END truncate_trans_qty;
2990:
2991: PROCEDURE dump_shp_attrb_data (p_shipping_attr IN WSH_INTERFACE.ChangedAttributeTabType) IS
2992: BEGIN