DBA Data[Home] [Help]

APPS.GML_OPM_ROI_GRP dependencies on FND_MESSAGE

Line 47: fnd_message.set_name(p_mesg_owner, p_error_message_name);

43: IF l_error_message IS NULL THEN
44:
45: IF p_mesg_owner IS NOT NULL AND p_error_message_name IS NOT NULL THEN
46:
47: fnd_message.set_name(p_mesg_owner, p_error_message_name);
48:
49: IF (p_TokenName1 IS NOT NULL AND p_TokenValue1 IS NOT NULL) THEN
50: fnd_message.set_token(p_TokenName1, p_TokenValue1);
51: END IF;

Line 50: fnd_message.set_token(p_TokenName1, p_TokenValue1);

46:
47: fnd_message.set_name(p_mesg_owner, p_error_message_name);
48:
49: IF (p_TokenName1 IS NOT NULL AND p_TokenValue1 IS NOT NULL) THEN
50: fnd_message.set_token(p_TokenName1, p_TokenValue1);
51: END IF;
52: IF (p_TokenName2 IS NOT NULL AND p_TokenValue2 IS NOT NULL) THEN
53: fnd_message.set_token(p_TokenName2, p_TokenValue2);
54: END IF;

Line 53: fnd_message.set_token(p_TokenName2, p_TokenValue2);

49: IF (p_TokenName1 IS NOT NULL AND p_TokenValue1 IS NOT NULL) THEN
50: fnd_message.set_token(p_TokenName1, p_TokenValue1);
51: END IF;
52: IF (p_TokenName2 IS NOT NULL AND p_TokenValue2 IS NOT NULL) THEN
53: fnd_message.set_token(p_TokenName2, p_TokenValue2);
54: END IF;
55: IF (p_TokenName3 IS NOT NULL AND p_TokenValue3 IS NOT NULL) THEN
56: fnd_message.set_token(p_TokenName3, p_TokenValue3);
57: END IF;

Line 56: fnd_message.set_token(p_TokenName3, p_TokenValue3);

52: IF (p_TokenName2 IS NOT NULL AND p_TokenValue2 IS NOT NULL) THEN
53: fnd_message.set_token(p_TokenName2, p_TokenValue2);
54: END IF;
55: IF (p_TokenName3 IS NOT NULL AND p_TokenValue3 IS NOT NULL) THEN
56: fnd_message.set_token(p_TokenName3, p_TokenValue3);
57: END IF;
58: IF (p_TokenName4 IS NOT NULL AND p_TokenValue4 IS NOT NULL) THEN
59: fnd_message.set_token(p_TokenName4, p_TokenValue4);
60: END IF;

Line 59: fnd_message.set_token(p_TokenName4, p_TokenValue4);

55: IF (p_TokenName3 IS NOT NULL AND p_TokenValue3 IS NOT NULL) THEN
56: fnd_message.set_token(p_TokenName3, p_TokenValue3);
57: END IF;
58: IF (p_TokenName4 IS NOT NULL AND p_TokenValue4 IS NOT NULL) THEN
59: fnd_message.set_token(p_TokenName4, p_TokenValue4);
60: END IF;
61:
62: l_error_message := Fnd_message.get;
63:

Line 62: l_error_message := Fnd_message.get;

58: IF (p_TokenName4 IS NOT NULL AND p_TokenValue4 IS NOT NULL) THEN
59: fnd_message.set_token(p_TokenName4, p_TokenValue4);
60: END IF;
61:
62: l_error_message := Fnd_message.get;
63:
64: END IF;
65:
66: END IF;

Line 235: FND_MESSAGE.SET_NAME('GMI','IC_INVQTYNEG');

231: Close Cr_qoh_loct_not_null;
232: --If do not allow negative inv then give error
233: --Bug# 3664014
234: IF V_allow_neg_inv = 0 THEN
235: FND_MESSAGE.SET_NAME('GMI','IC_INVQTYNEG');
236: FND_MSG_PUB.Add;
237: x_return_status := fnd_api.g_ret_sts_error;
238: RETURN ;
239: --If set to 2 then give warning.

Line 241: FND_MESSAGE.SET_NAME('GMI','IC_WARNINVQTYNEG');

237: x_return_status := fnd_api.g_ret_sts_error;
238: RETURN ;
239: --If set to 2 then give warning.
240: ELSIF V_allow_neg_inv = 2 THEN
241: FND_MESSAGE.SET_NAME('GMI','IC_WARNINVQTYNEG');
242: FND_MSG_PUB.Add;
243: x_return_status := 'W';
244: RETURN ;
245: END IF;

Line 263: FND_MESSAGE.SET_NAME('GMI','IC_INVQTYNEG');

259: THEN
260: Close Cr_qoh_loct_null;
261: -- bug# 3664014
262: IF V_allow_neg_inv = 0 THEN
263: FND_MESSAGE.SET_NAME('GMI','IC_INVQTYNEG');
264: FND_MSG_PUB.Add;
265: x_return_status := fnd_api.g_ret_sts_error;
266: RETURN ;
267: --If set to 2 then give warning.

Line 269: FND_MESSAGE.SET_NAME('GMI','IC_WARNINVQTYNEG');

265: x_return_status := fnd_api.g_ret_sts_error;
266: RETURN ;
267: --If set to 2 then give warning.
268: ELSIF V_allow_neg_inv = 2 THEN
269: FND_MESSAGE.SET_NAME('GMI','IC_WARNINVQTYNEG');
270: FND_MSG_PUB.Add;
271: x_return_status := 'W';
272: RETURN ;
273: END IF;

Line 563: FND_MESSAGE.SET_NAME('GMI','IC_INVALID_LOT');

559: print_debug('Default Lot=>'||g_default_lot, 1);
560: END IF;
561:
562: IF p_lot_attribute_rec.lot_no = G_DEFAULT_LOT THEN
563: FND_MESSAGE.SET_NAME('GMI','IC_INVALID_LOT');
564: FND_MSG_PUB.Add;
565: x_return_status := fnd_api.g_ret_sts_error;
566: RETURN ;
567: END IF;

Line 576: FND_MESSAGE.SET_NAME('GMI','IC_INVALID_LOT/SUBLOT');

572: WHERE item_id = p_lot_attribute_rec.opm_item_id ;
573:
574:
575: IF p_lot_attribute_rec.sublot_no IS NOT NULL AND l_sublot_ctl = 0 THEN
576: FND_MESSAGE.SET_NAME('GMI','IC_INVALID_LOT/SUBLOT');
577: FND_MSG_PUB.Add;
578: x_return_status := fnd_api.g_ret_sts_error;
579: RETURN ;
580: END IF;

Line 592: FND_MESSAGE.SET_NAME('GMI','IC_API_INVALID_REASON_CODE');

588: where reason_code = p_lot_attribute_rec.reason_code
589: and delete_mark = 0 ;
590:
591: EXCEPTION WHEN OTHERS THEN
592: FND_MESSAGE.SET_NAME('GMI','IC_API_INVALID_REASON_CODE');
593: FND_MESSAGE.SET_TOKEN('REASON_CODE',p_lot_attribute_rec.reason_code);
594: FND_MSG_PUB.Add;
595: x_return_status := fnd_api.g_ret_sts_error;
596: RETURN ;

Line 593: FND_MESSAGE.SET_TOKEN('REASON_CODE',p_lot_attribute_rec.reason_code);

589: and delete_mark = 0 ;
590:
591: EXCEPTION WHEN OTHERS THEN
592: FND_MESSAGE.SET_NAME('GMI','IC_API_INVALID_REASON_CODE');
593: FND_MESSAGE.SET_TOKEN('REASON_CODE',p_lot_attribute_rec.reason_code);
594: FND_MSG_PUB.Add;
595: x_return_status := fnd_api.g_ret_sts_error;
596: RETURN ;
597: END ;

Line 608: FND_MESSAGE.SET_NAME('GMI','IC_INVALID_LOT');

604: OPEN Cur_lot_ctrl_lot ;
605: FETCH Cur_lot_ctrl_lot INTO p_lot_attribute_rec.lot_id,l_inactive_ind,l_delete_mark;
606: IF Cur_lot_ctrl_lot%NOTFOUND THEN
607: CLOSE Cur_lot_ctrl_lot;
608: FND_MESSAGE.SET_NAME('GMI','IC_INVALID_LOT');
609: FND_MSG_PUB.Add;
610: x_return_status := fnd_api.g_ret_sts_error;
611: RETURN ;
612: END IF;

Line 619: FND_MESSAGE.SET_NAME('GMI','IC_INVALID_LOT');

615: OPEN Cur_sublot_ctrl_lot ;
616: FETCH Cur_sublot_ctrl_lot INTO p_lot_attribute_rec.lot_id,l_inactive_ind,l_delete_mark;
617: IF Cur_sublot_ctrl_lot%NOTFOUND THEN
618: CLOSE Cur_sublot_ctrl_lot;
619: FND_MESSAGE.SET_NAME('GMI','IC_INVALID_LOT');
620: FND_MSG_PUB.Add;
621: x_return_status := fnd_api.g_ret_sts_error;
622: RETURN ;
623: END IF;

Line 630: FND_MESSAGE.SET_NAME('GML','PO_INACTIVE_LOT');

626:
627: l_progress := '040' ;
628:
629: IF l_inactive_ind = 1 THEN
630: FND_MESSAGE.SET_NAME('GML','PO_INACTIVE_LOT');
631: FND_MSG_PUB.Add;
632: x_return_status := fnd_api.g_ret_sts_error;
633: RETURN ;
634: ELSIF l_delete_mark = 1 THEN

Line 635: FND_MESSAGE.SET_NAME('GML', 'PO_LOT_DELETED');

631: FND_MSG_PUB.Add;
632: x_return_status := fnd_api.g_ret_sts_error;
633: RETURN ;
634: ELSIF l_delete_mark = 1 THEN
635: FND_MESSAGE.SET_NAME('GML', 'PO_LOT_DELETED');
636: FND_MSG_PUB.Add;
637: x_return_status := fnd_api.g_ret_sts_error;
638: RETURN ;
639: END IF;

Line 651: FND_MESSAGE.SET_NAME('GMI','IC_INVALID_EXPIRE_DATE');

647:
648: l_progress := '050' ;
649:
650: IF l_shelf_life_code = 4 and p_lot_attribute_rec.expiration_date IS NULL THEN
651: FND_MESSAGE.SET_NAME('GMI','IC_INVALID_EXPIRE_DATE');
652: FND_MSG_PUB.Add;
653: x_return_status := fnd_api.g_ret_sts_error;
654: RETURN ;
655: ELSIF l_shelf_life_code = 2 THEN

Line 820: FND_MESSAGE.SET_NAME('GML', 'GML_CANT_RECV_DIFF_STATUS');

816: END IF;
817:
818: IF g_moved_diff_stat = 0 THEN
819: IF (l_inv_lot_status IS NOT NULL) AND (l_inv_lot_status <> l_default_lot_status) THEN
820: FND_MESSAGE.SET_NAME('GML', 'GML_CANT_RECV_DIFF_STATUS');
821: FND_MSG_PUB.Add;
822: x_return_status := fnd_api.g_ret_sts_error;
823: RETURN ;
824: END IF;

Line 925: FND_MESSAGE.SET_NAME('GML', 'GML_CANT_RECV_DIFF_STATUS');

921: END IF;
922:
923: ELSIF l_inv_lot_status IS NOT NULL AND l_inv_lot_status <> l_default_lot_status
924: AND l_inv_loct_onhand <> 0 THEN
925: FND_MESSAGE.SET_NAME('GML', 'GML_CANT_RECV_DIFF_STATUS');
926: FND_MSG_PUB.Add;
927: x_return_status := fnd_api.g_ret_sts_error;
928: RETURN ;
929: END IF; -- IF l_inv_lot_status IS NOT NULL

Line 1180: FND_MESSAGE.SET_NAME('GML','GML_DIFF_RMA_LOT');

1176: print_debug('Lot Different From RMA Lot', 1);
1177: END IF;
1178:
1179: IF g_opm_restrict_rma_lots IN ('RESTRICTED') THEN
1180: FND_MESSAGE.SET_NAME('GML','GML_DIFF_RMA_LOT');
1181: FND_MSG_PUB.Add;
1182: x_return_status := fnd_api.g_ret_sts_error;
1183: RAISE FND_API.G_EXC_ERROR;
1184: ELSE -- warning.put into interface table.

Line 1273: FND_MESSAGE.SET_NAME('GML', 'GML_DIFF_RMA_QTY');

1269: p_TokenValue1 => x_allowed_quantity
1270: );
1271: ELSE
1272: /*Give error message that the quantity entered Is greater than the qty entered in the RMA for this lot */
1273: FND_MESSAGE.SET_NAME('GML', 'GML_DIFF_RMA_QTY');
1274: FND_MESSAGE.SET_TOKEN('S1',x_allowed_quantity);
1275: FND_MSG_PUB.Add;
1276: x_return_status := fnd_api.g_ret_sts_error;
1277: END IF;

Line 1274: FND_MESSAGE.SET_TOKEN('S1',x_allowed_quantity);

1270: );
1271: ELSE
1272: /*Give error message that the quantity entered Is greater than the qty entered in the RMA for this lot */
1273: FND_MESSAGE.SET_NAME('GML', 'GML_DIFF_RMA_QTY');
1274: FND_MESSAGE.SET_TOKEN('S1',x_allowed_quantity);
1275: FND_MSG_PUB.Add;
1276: x_return_status := fnd_api.g_ret_sts_error;
1277: END IF;
1278: END IF; -- IF x_allowed = 'N' THEN

Line 1523: FND_MESSAGE.SET_NAME('GML', 'GML_LOT_SUBLOT_USED');

1519: AND Ltrim(Rtrim(lot_number)) = l_lot_no
1520: AND ((sublot_num IS NULL AND l_sublot_no IS NULL) OR (Ltrim(Rtrim(sublot_num)) = l_sublot_no )) ;
1521:
1522: IF l_same_lot_count > 1 THEN
1523: FND_MESSAGE.SET_NAME('GML', 'GML_LOT_SUBLOT_USED');
1524: FND_MSG_PUB.Add;
1525: x_return_status := fnd_api.g_ret_sts_error;
1526: RAISE FND_API.G_EXC_ERROR;
1527: END IF;

Line 1981: FND_MESSAGE.SET_NAME('GML','GML_RECV_INVALID_LOT');

1977: EXCEPTION WHEN NO_DATA_FOUND THEN
1978: IF l_inv_debug = 1 THEN
1979: print_debug(' Lot does not exist for trx_type,parent_trx_type,grand_parent_trx_type=>'||l_transaction_type||'-'||p_parent_txn_type||'-'||p_grand_parent_txn_type, 1);
1980: END IF;
1981: FND_MESSAGE.SET_NAME('GML','GML_RECV_INVALID_LOT');
1982: FND_MESSAGE.SET_TOKEN('LOT_NO',l_lot_no);
1983: FND_MESSAGE.SET_TOKEN('SUBLOT_NO',l_sublot_no);
1984: FND_MSG_PUB.Add;
1985: x_return_status := fnd_api.g_ret_sts_error;

Line 1982: FND_MESSAGE.SET_TOKEN('LOT_NO',l_lot_no);

1978: IF l_inv_debug = 1 THEN
1979: print_debug(' Lot does not exist for trx_type,parent_trx_type,grand_parent_trx_type=>'||l_transaction_type||'-'||p_parent_txn_type||'-'||p_grand_parent_txn_type, 1);
1980: END IF;
1981: FND_MESSAGE.SET_NAME('GML','GML_RECV_INVALID_LOT');
1982: FND_MESSAGE.SET_TOKEN('LOT_NO',l_lot_no);
1983: FND_MESSAGE.SET_TOKEN('SUBLOT_NO',l_sublot_no);
1984: FND_MSG_PUB.Add;
1985: x_return_status := fnd_api.g_ret_sts_error;
1986: RAISE FND_API.G_EXC_ERROR;

Line 1983: FND_MESSAGE.SET_TOKEN('SUBLOT_NO',l_sublot_no);

1979: print_debug(' Lot does not exist for trx_type,parent_trx_type,grand_parent_trx_type=>'||l_transaction_type||'-'||p_parent_txn_type||'-'||p_grand_parent_txn_type, 1);
1980: END IF;
1981: FND_MESSAGE.SET_NAME('GML','GML_RECV_INVALID_LOT');
1982: FND_MESSAGE.SET_TOKEN('LOT_NO',l_lot_no);
1983: FND_MESSAGE.SET_TOKEN('SUBLOT_NO',l_sublot_no);
1984: FND_MSG_PUB.Add;
1985: x_return_status := fnd_api.g_ret_sts_error;
1986: RAISE FND_API.G_EXC_ERROR;
1987: END ;

Line 2004: FND_MESSAGE.SET_NAME('GML', 'PO_RETURN_MORE_RECEIVE');

2000: IF l_lot_primary_quantity > l_net_received_lot_qty THEN
2001: IF l_inv_debug = 1 THEN
2002: print_debug(' Qty more than received for trx_type,parent_trx_type,grand_parent_trx_type=>'||l_transaction_type||'-'||p_parent_txn_type||'-'||p_grand_parent_txn_type, 1);
2003: END IF;
2004: FND_MESSAGE.SET_NAME('GML', 'PO_RETURN_MORE_RECEIVE');
2005: FND_MESSAGE.SET_TOKEN('AVAILABLE_QTY',l_net_received_lot_qty);
2006: FND_MSG_PUB.Add;
2007: x_return_status := fnd_api.g_ret_sts_error;
2008: RAISE FND_API.G_EXC_ERROR;

Line 2005: FND_MESSAGE.SET_TOKEN('AVAILABLE_QTY',l_net_received_lot_qty);

2001: IF l_inv_debug = 1 THEN
2002: print_debug(' Qty more than received for trx_type,parent_trx_type,grand_parent_trx_type=>'||l_transaction_type||'-'||p_parent_txn_type||'-'||p_grand_parent_txn_type, 1);
2003: END IF;
2004: FND_MESSAGE.SET_NAME('GML', 'PO_RETURN_MORE_RECEIVE');
2005: FND_MESSAGE.SET_TOKEN('AVAILABLE_QTY',l_net_received_lot_qty);
2006: FND_MSG_PUB.Add;
2007: x_return_status := fnd_api.g_ret_sts_error;
2008: RAISE FND_API.G_EXC_ERROR;
2009: END IF;

Line 2028: FND_MESSAGE.SET_NAME('GML', 'PO_RETURN_MORE_RECEIVE');

2024: Fetch Cr_get_total_qty_available into l_cr_avaliable_qty;
2025: Close Cr_get_total_qty_available;
2026:
2027: IF (nvl(l_old_recv_qty,0) - nvl(l_old_rtrn_qty,0) + nvl(l_cr_avaliable_qty,0)) < l_lot_primary_quantity THEN
2028: FND_MESSAGE.SET_NAME('GML', 'PO_RETURN_MORE_RECEIVE');
2029: FND_MESSAGE.SET_TOKEN('AVAILABLE_QTY',nvl(l_old_recv_qty,0) - nvl(l_old_rtrn_qty,0) + nvl(l_cr_avaliable_qty,0));
2030: FND_MSG_PUB.Add;
2031: x_return_status := fnd_api.g_ret_sts_error;
2032: RAISE FND_API.G_EXC_ERROR;

Line 2029: FND_MESSAGE.SET_TOKEN('AVAILABLE_QTY',nvl(l_old_recv_qty,0) - nvl(l_old_rtrn_qty,0) + nvl(l_cr_avaliable_qty,0));

2025: Close Cr_get_total_qty_available;
2026:
2027: IF (nvl(l_old_recv_qty,0) - nvl(l_old_rtrn_qty,0) + nvl(l_cr_avaliable_qty,0)) < l_lot_primary_quantity THEN
2028: FND_MESSAGE.SET_NAME('GML', 'PO_RETURN_MORE_RECEIVE');
2029: FND_MESSAGE.SET_TOKEN('AVAILABLE_QTY',nvl(l_old_recv_qty,0) - nvl(l_old_rtrn_qty,0) + nvl(l_cr_avaliable_qty,0));
2030: FND_MSG_PUB.Add;
2031: x_return_status := fnd_api.g_ret_sts_error;
2032: RAISE FND_API.G_EXC_ERROR;
2033: END IF;

Line 2234: FND_MESSAGE.SET_NAME('GML','GML_RECV_INVALID_LOT');

2230: END IF;
2231: -- wms will error out in this condition.
2232: -- new lots cannot be created for -ve correction and returns to RECEIVE/DELIVER transactions.
2233:
2234: FND_MESSAGE.SET_NAME('GML','GML_RECV_INVALID_LOT');
2235: FND_MESSAGE.SET_TOKEN('LOT_NO',l_lot_no);
2236: FND_MESSAGE.SET_TOKEN('SUBLOT_NO',l_sublot_no);
2237: FND_MSG_PUB.Add;
2238: x_return_status := fnd_api.g_ret_sts_error;

Line 2235: FND_MESSAGE.SET_TOKEN('LOT_NO',l_lot_no);

2231: -- wms will error out in this condition.
2232: -- new lots cannot be created for -ve correction and returns to RECEIVE/DELIVER transactions.
2233:
2234: FND_MESSAGE.SET_NAME('GML','GML_RECV_INVALID_LOT');
2235: FND_MESSAGE.SET_TOKEN('LOT_NO',l_lot_no);
2236: FND_MESSAGE.SET_TOKEN('SUBLOT_NO',l_sublot_no);
2237: FND_MSG_PUB.Add;
2238: x_return_status := fnd_api.g_ret_sts_error;
2239: RAISE FND_API.G_EXC_ERROR;

Line 2236: FND_MESSAGE.SET_TOKEN('SUBLOT_NO',l_sublot_no);

2232: -- new lots cannot be created for -ve correction and returns to RECEIVE/DELIVER transactions.
2233:
2234: FND_MESSAGE.SET_NAME('GML','GML_RECV_INVALID_LOT');
2235: FND_MESSAGE.SET_TOKEN('LOT_NO',l_lot_no);
2236: FND_MESSAGE.SET_TOKEN('SUBLOT_NO',l_sublot_no);
2237: FND_MSG_PUB.Add;
2238: x_return_status := fnd_api.g_ret_sts_error;
2239: RAISE FND_API.G_EXC_ERROR;
2240:

Line 2452: FND_MESSAGE.SET_NAME('GML','GML_RECV_INVALID_LOT');

2448: EXCEPTION WHEN NO_DATA_FOUND THEN
2449: IF l_inv_debug = 1 THEN
2450: print_debug(' Lot does not exist for trx_type,parent_trx_type,grand_parent_trx_type=>'||l_transaction_type||'-'||p_parent_txn_type||'-'||p_grand_parent_txn_type, 1);
2451: END IF;
2452: FND_MESSAGE.SET_NAME('GML','GML_RECV_INVALID_LOT');
2453: FND_MESSAGE.SET_TOKEN('LOT_NO',l_lot_no);
2454: FND_MESSAGE.SET_TOKEN('SUBLOT_NO',l_sublot_no);
2455: FND_MSG_PUB.Add;
2456: x_return_status := fnd_api.g_ret_sts_error;

Line 2453: FND_MESSAGE.SET_TOKEN('LOT_NO',l_lot_no);

2449: IF l_inv_debug = 1 THEN
2450: print_debug(' Lot does not exist for trx_type,parent_trx_type,grand_parent_trx_type=>'||l_transaction_type||'-'||p_parent_txn_type||'-'||p_grand_parent_txn_type, 1);
2451: END IF;
2452: FND_MESSAGE.SET_NAME('GML','GML_RECV_INVALID_LOT');
2453: FND_MESSAGE.SET_TOKEN('LOT_NO',l_lot_no);
2454: FND_MESSAGE.SET_TOKEN('SUBLOT_NO',l_sublot_no);
2455: FND_MSG_PUB.Add;
2456: x_return_status := fnd_api.g_ret_sts_error;
2457: RAISE FND_API.G_EXC_ERROR;

Line 2454: FND_MESSAGE.SET_TOKEN('SUBLOT_NO',l_sublot_no);

2450: print_debug(' Lot does not exist for trx_type,parent_trx_type,grand_parent_trx_type=>'||l_transaction_type||'-'||p_parent_txn_type||'-'||p_grand_parent_txn_type, 1);
2451: END IF;
2452: FND_MESSAGE.SET_NAME('GML','GML_RECV_INVALID_LOT');
2453: FND_MESSAGE.SET_TOKEN('LOT_NO',l_lot_no);
2454: FND_MESSAGE.SET_TOKEN('SUBLOT_NO',l_sublot_no);
2455: FND_MSG_PUB.Add;
2456: x_return_status := fnd_api.g_ret_sts_error;
2457: RAISE FND_API.G_EXC_ERROR;
2458: END ;

Line 2470: FND_MESSAGE.SET_NAME('GML','GML_RECV_INVALID_LOT');

2466: IF l_inv_debug = 1 THEN
2467: print_debug(' new lots not allowed for trx_type,parent_trx_type,grand_parent_trx_type=>'||l_transaction_type||'-'||p_parent_txn_type||'-'||p_grand_parent_txn_type, 1);
2468: END IF;
2469: -- new lots not allowed for correction to deliver transaction.
2470: FND_MESSAGE.SET_NAME('GML','GML_RECV_INVALID_LOT');
2471: FND_MESSAGE.SET_TOKEN('LOT_NO',l_lot_no);
2472: FND_MESSAGE.SET_TOKEN('SUBLOT_NO',l_sublot_no);
2473: FND_MSG_PUB.Add;
2474: x_return_status := fnd_api.g_ret_sts_error;

Line 2471: FND_MESSAGE.SET_TOKEN('LOT_NO',l_lot_no);

2467: print_debug(' new lots not allowed for trx_type,parent_trx_type,grand_parent_trx_type=>'||l_transaction_type||'-'||p_parent_txn_type||'-'||p_grand_parent_txn_type, 1);
2468: END IF;
2469: -- new lots not allowed for correction to deliver transaction.
2470: FND_MESSAGE.SET_NAME('GML','GML_RECV_INVALID_LOT');
2471: FND_MESSAGE.SET_TOKEN('LOT_NO',l_lot_no);
2472: FND_MESSAGE.SET_TOKEN('SUBLOT_NO',l_sublot_no);
2473: FND_MSG_PUB.Add;
2474: x_return_status := fnd_api.g_ret_sts_error;
2475: RAISE FND_API.G_EXC_ERROR;

Line 2472: FND_MESSAGE.SET_TOKEN('SUBLOT_NO',l_sublot_no);

2468: END IF;
2469: -- new lots not allowed for correction to deliver transaction.
2470: FND_MESSAGE.SET_NAME('GML','GML_RECV_INVALID_LOT');
2471: FND_MESSAGE.SET_TOKEN('LOT_NO',l_lot_no);
2472: FND_MESSAGE.SET_TOKEN('SUBLOT_NO',l_sublot_no);
2473: FND_MSG_PUB.Add;
2474: x_return_status := fnd_api.g_ret_sts_error;
2475: RAISE FND_API.G_EXC_ERROR;
2476: END IF;