31: (G_PKG_NAME
32: ,'Get_Line_Number'
33: );
34: END IF;
35: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
36: END Get_Line_Number;
37:
38: ---------------------------------------------------------------------------
39: -- LOCAL FUNCTION Get_Shipment_Number
61: (G_PKG_NAME
62: ,'Get_Shipment_Number'
63: );
64: END IF;
65: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
66: END Get_Shipment_Number;
67:
68: ---------------------------------------------------------------------------
69: -- PUBLIC FUNCTION Convert_Amount
177: end if;
178: FND_MESSAGE.SET_NAME('ONT','OE_BL_MISSING_CONV_RATE');
179: FND_MESSAGE.SET_TOKEN('BLANKET_CURRENCY',p_to_currency);
180: OE_MSG_PUB.ADD;
181: RAISE FND_API.G_EXC_ERROR;
182: WHEN OTHERS THEN
183: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
184: THEN
185: OE_MSG_PUB.Add_Exc_Msg
186: (G_PKG_NAME
187: ,'Convert_Amount'
188: );
189: END IF;
190: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
191: END Convert_Amount;
192:
193: ---------------------------------------------------------------------------
194: -- LOCAL PROCEDURE Cache_Blanket
368: WHEN APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION THEN
369: FND_MESSAGE.Set_Name('ONT','OE_BL_LOCKED');
370: FND_MESSAGE.Set_Token('BLANKET_NUMBER',p_blanket_number);
371: OE_MSG_PUB.Add;
372: RAISE FND_API.G_EXC_ERROR;
373: WHEN OTHERS THEN
374: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
375: THEN
376: OE_MSG_PUB.Add_Exc_Msg
377: (G_PKG_NAME
378: ,'Cache_Blanket'
379: );
380: END IF;
381: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
382: END Cache_Blanket;
383:
384:
385: ---------------------------------------------------------------------------
419: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
420: --
421: BEGIN
422:
423: x_return_status := FND_API.G_RET_STS_SUCCESS;
424:
425: Cache_Blanket(p_blanket_number
426: ,p_blanket_line_number
427: ,'Y' -- p_lock
480: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',Get_Line_Number(p_line_id));
481: FND_MESSAGE.SET_TOKEN('BLANKET_UOM',
482: g_blkt_line_tbl(l_blanket_line_id).uom);
483: OE_MSG_PUB.ADD;
484: RAISE FND_API.G_EXC_ERROR;
485: END IF;
486: END IF;
487:
488: IF l_old_quantity > 0
502: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',Get_Line_Number(p_line_id));
503: FND_MESSAGE.SET_TOKEN('BLANKET_UOM',
504: g_blkt_line_tbl(l_blanket_line_id).uom);
505: OE_MSG_PUB.ADD;
506: RAISE FND_API.G_EXC_ERROR;
507: END IF;
508: END IF;
509:
510: -- INCREMENT Cumulative Released Quantity
529: IF g_blkt_hdr_tbl(l_blanket_header_id).conversion_type_code IS NULL THEN
530: FND_MESSAGE.SET_NAME('ONT','OE_BL_MISS_CONVERSION_TYPE');
531: FND_MESSAGE.SET_TOKEN('BLANKET_NUMBER',p_blanket_number);
532: oe_msg_pub.add;
533: RAISE FND_API.G_EXC_ERROR;
534: END IF;
535:
536: IF l_amount <> 0 THEN
537: l_amount := Convert_Amount
637: g_blkt_line_tbl(l_blanket_line_id).min_release_quantity);
638: FND_MESSAGE.SET_TOKEN('MAXIMUM',
639: g_blkt_line_tbl(l_blanket_line_id).max_release_quantity);
640: oe_msg_pub.add;
641: x_return_status := FND_API.G_RET_STS_ERROR;
642:
643: ELSE
644: IF NVL(FND_PROFILE.VALUE('ONT_BSA_MIN_MAX_VIOLATION'),'N') = 'Y' THEN
645: FND_MESSAGE.SET_NAME('ONT','OE_BL_MIN_MAX_REL_QTY');
719: g_blkt_line_tbl(l_blanket_line_id).min_release_amount);
720: FND_MESSAGE.SET_TOKEN('MAXIMUM',
721: g_blkt_line_tbl(l_blanket_line_id).max_release_amount);
722: oe_msg_pub.add;
723: x_return_status := FND_API.G_RET_STS_ERROR;
724:
725: ELSE
726: IF NVL(FND_PROFILE.VALUE('ONT_BSA_MIN_MAX_VIOLATION'),'N') = 'Y' THEN
727: FND_MESSAGE.SET_NAME('ONT','OE_BL_MIN_MAX_REL_AMT');
762: g_blkt_line_tbl(l_blanket_line_id).uom);
763: FND_MESSAGE.SET_TOKEN('MAXIMUM',
764: g_blkt_line_tbl(l_blanket_line_id).blanket_max_quantity);
765: oe_msg_pub.add;
766: x_return_status := FND_API.G_RET_STS_ERROR;
767: ELSE
768: IF NVL(FND_PROFILE.VALUE('ONT_BSA_MIN_MAX_VIOLATION'),'N') = 'Y' THEN
769: FND_MESSAGE.SET_NAME('ONT','OE_BL_LIN_MAX_QTY_EXCEEDED');
770: FND_MESSAGE.SET_TOKEN('BLANKET_NUMBER',p_blanket_number);
792: g_blkt_hdr_tbl(l_blanket_header_id).currency_code);
793: FND_MESSAGE.SET_TOKEN('MAXIMUM',
794: g_blkt_line_tbl(l_blanket_line_id).blanket_line_max_amount);
795: oe_msg_pub.add;
796: x_return_status := FND_API.G_RET_STS_ERROR;
797: ELSE
798: IF NVL(FND_PROFILE.VALUE('ONT_BSA_MIN_MAX_VIOLATION'),'N') = 'Y' THEN
799: FND_MESSAGE.SET_NAME('ONT','OE_BL_LIN_MAX_AMT_EXCEEDED');
800: FND_MESSAGE.SET_TOKEN('BLANKET_NUMBER',p_blanket_number);
834: g_blkt_hdr_tbl(l_blanket_header_id).currency_code);
835: FND_MESSAGE.SET_TOKEN('MAXIMUM',
836: g_blkt_hdr_tbl(l_blanket_header_id).blanket_max_amount);
837: oe_msg_pub.add;
838: x_return_status := FND_API.G_RET_STS_ERROR;
839: ELSE
840: IF NVL(FND_PROFILE.VALUE('ONT_BSA_MIN_MAX_VIOLATION'),'N') = 'Y' THEN
841: FND_MESSAGE.SET_NAME('ONT','OE_BL_HDR_MAX_AMT_EXCEEDED');
842: FND_MESSAGE.SET_TOKEN('BLANKET_NUMBER',p_blanket_number);
852: END IF;
853:
854: END IF; -- IF blanket header override amount control = 'N'
855:
856: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
857:
858: -- Update quantity fields on cached blanket records
859: IF g_blkt_line_tbl(l_blanket_line_id).uom IS NOT NULL THEN
860: g_blkt_line_tbl(l_blanket_line_id).released_quantity
893:
894: -- End of min-max checks
895:
896: EXCEPTION
897: WHEN FND_API.G_EXC_ERROR THEN
898: x_return_status := FND_API.G_RET_STS_ERROR;
899: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
900: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
901: WHEN OTHERS THEN
894: -- End of min-max checks
895:
896: EXCEPTION
897: WHEN FND_API.G_EXC_ERROR THEN
898: x_return_status := FND_API.G_RET_STS_ERROR;
899: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
900: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
901: WHEN OTHERS THEN
902: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
895:
896: EXCEPTION
897: WHEN FND_API.G_EXC_ERROR THEN
898: x_return_status := FND_API.G_RET_STS_ERROR;
899: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
900: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
901: WHEN OTHERS THEN
902: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
903: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
896: EXCEPTION
897: WHEN FND_API.G_EXC_ERROR THEN
898: x_return_status := FND_API.G_RET_STS_ERROR;
899: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
900: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
901: WHEN OTHERS THEN
902: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
903: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
904: THEN
898: x_return_status := FND_API.G_RET_STS_ERROR;
899: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
900: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
901: WHEN OTHERS THEN
902: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
903: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
904: THEN
905: OE_MSG_PUB.Add_Exc_Msg
906: (G_PKG_NAME
957: END LOOP;
958:
959: EXCEPTION
960: WHEN OTHERS THEN
961: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
962: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
963: THEN
964: OE_MSG_PUB.Add_Exc_Msg
965: (G_PKG_NAME
1011:
1012:
1013: BEGIN
1014:
1015: x_return_status := FND_API.G_RET_STS_SUCCESS;
1016:
1017: Cache_Blanket(p_blanket_number
1018: ,p_blanket_line_number
1019: ,'Y' -- p_lock
1069: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',Get_Set_Line_Number);
1070: FND_MESSAGE.SET_TOKEN('BLANKET_UOM',
1071: g_blkt_line_tbl(l_blanket_line_id).uom);
1072: OE_MSG_PUB.ADD;
1073: RAISE FND_API.G_EXC_ERROR;
1074: END IF;
1075:
1076: END IF;
1077:
1090: g_blkt_line_tbl(l_blanket_line_id).min_release_quantity);
1091: FND_MESSAGE.SET_TOKEN('MAXIMUM',
1092: g_blkt_line_tbl(l_blanket_line_id).max_release_quantity);
1093: oe_msg_pub.add;
1094: x_return_status := FND_API.G_RET_STS_ERROR;
1095: ELSE
1096: IF NVL(FND_PROFILE.VALUE('ONT_BSA_MIN_MAX_VIOLATION'),'N') = 'Y' THEN
1097: FND_MESSAGE.SET_NAME('ONT','OE_BL_SUM_SPLIT_MIN_MAX_QTY');
1098: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',Get_Set_Line_Number);
1122: IF g_blkt_hdr_tbl(l_blanket_header_id).conversion_type_code IS NULL THEN
1123: FND_MESSAGE.SET_NAME('ONT','OE_BL_MISS_CONVERSION_TYPE');
1124: FND_MESSAGE.SET_TOKEN('BLANKET_NUMBER',p_blanket_number);
1125: oe_msg_pub.add;
1126: RAISE FND_API.G_EXC_ERROR;
1127: END IF;
1128:
1129: l_set_amount := Convert_Amount
1130: (p_from_currency => p_currency_code
1152: g_blkt_line_tbl(l_blanket_line_id).min_release_amount);
1153: FND_MESSAGE.SET_TOKEN('MAXIMUM',
1154: g_blkt_line_tbl(l_blanket_line_id).max_release_amount);
1155: oe_msg_pub.add;
1156: x_return_status := FND_API.G_RET_STS_ERROR;
1157: ELSE
1158: IF NVL(FND_PROFILE.VALUE('ONT_BSA_MIN_MAX_VIOLATION'),'N') = 'Y' THEN
1159: FND_MESSAGE.SET_NAME('ONT','OE_BL_SUM_SPLIT_MIN_MAX_AMT');
1160: FND_MESSAGE.SET_TOKEN('LINE_NUMBER',Get_Set_Line_Number);
1173: END IF;
1174:
1175:
1176: EXCEPTION
1177: WHEN FND_API.G_EXC_ERROR THEN
1178: x_return_status := FND_API.G_RET_STS_ERROR;
1179: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1180: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1181: WHEN OTHERS THEN
1174:
1175:
1176: EXCEPTION
1177: WHEN FND_API.G_EXC_ERROR THEN
1178: x_return_status := FND_API.G_RET_STS_ERROR;
1179: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1180: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1181: WHEN OTHERS THEN
1182: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1175:
1176: EXCEPTION
1177: WHEN FND_API.G_EXC_ERROR THEN
1178: x_return_status := FND_API.G_RET_STS_ERROR;
1179: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1180: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1181: WHEN OTHERS THEN
1182: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1183: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1176: EXCEPTION
1177: WHEN FND_API.G_EXC_ERROR THEN
1178: x_return_status := FND_API.G_RET_STS_ERROR;
1179: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1180: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1181: WHEN OTHERS THEN
1182: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1183: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1184: THEN
1178: x_return_status := FND_API.G_RET_STS_ERROR;
1179: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1180: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1181: WHEN OTHERS THEN
1182: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1183: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1184: THEN
1185: OE_MSG_PUB.Add_Exc_Msg
1186: (G_PKG_NAME
1238:
1239: g_blkt_line_tbl.delete;
1240: g_blkt_hdr_tbl.delete;
1241:
1242: x_return_status := FND_API.G_RET_STS_SUCCESS;
1243:
1244: I := p_request_tbl.FIRST;
1245: WHILE I IS NOT NULL LOOP
1246:
1262: ,p_currency_code => p_request_tbl(I).param1
1263: ,x_return_status => l_return_status
1264: );
1265:
1266: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1267: oe_debug_pub.add('ret sts of error');
1268: x_return_status := FND_API.G_RET_STS_ERROR;
1269: RETURN;
1270: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1264: );
1265:
1266: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1267: oe_debug_pub.add('ret sts of error');
1268: x_return_status := FND_API.G_RET_STS_ERROR;
1269: RETURN;
1270: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1271: oe_debug_pub.add('ret sts of unexp error');
1272: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1266: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1267: oe_debug_pub.add('ret sts of error');
1268: x_return_status := FND_API.G_RET_STS_ERROR;
1269: RETURN;
1270: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1271: oe_debug_pub.add('ret sts of unexp error');
1272: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1273: RETURN;
1274: END IF;
1268: x_return_status := FND_API.G_RET_STS_ERROR;
1269: RETURN;
1270: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1271: oe_debug_pub.add('ret sts of unexp error');
1272: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1273: RETURN;
1274: END IF;
1275:
1276: p_request_tbl(I).processed := 'Y';
1352: ,p_line_set_id => p_request_tbl(I).param9
1353: ,x_return_status => l_return_status
1354: );
1355:
1356: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1357: oe_debug_pub.add('1. ret sts of error');
1358: x_return_status := FND_API.G_RET_STS_ERROR;
1359: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1360: oe_debug_pub.add('1. ret sts of unexp error');
1354: );
1355:
1356: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1357: oe_debug_pub.add('1. ret sts of error');
1358: x_return_status := FND_API.G_RET_STS_ERROR;
1359: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1360: oe_debug_pub.add('1. ret sts of unexp error');
1361: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1362: END IF;
1355:
1356: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1357: oe_debug_pub.add('1. ret sts of error');
1358: x_return_status := FND_API.G_RET_STS_ERROR;
1359: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1360: oe_debug_pub.add('1. ret sts of unexp error');
1361: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1362: END IF;
1363:
1357: oe_debug_pub.add('1. ret sts of error');
1358: x_return_status := FND_API.G_RET_STS_ERROR;
1359: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1360: oe_debug_pub.add('1. ret sts of unexp error');
1361: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1362: END IF;
1363:
1364: ELSE
1365:
1390: );
1391:
1392: END IF;
1393:
1394: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1395: oe_debug_pub.add('2. ret sts of error');
1396: x_return_status := FND_API.G_RET_STS_ERROR;
1397: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1398: oe_debug_pub.add('2. ret sts of unexp error');
1392: END IF;
1393:
1394: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1395: oe_debug_pub.add('2. ret sts of error');
1396: x_return_status := FND_API.G_RET_STS_ERROR;
1397: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1398: oe_debug_pub.add('2. ret sts of unexp error');
1399: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1400: END IF;
1393:
1394: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1395: oe_debug_pub.add('2. ret sts of error');
1396: x_return_status := FND_API.G_RET_STS_ERROR;
1397: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1398: oe_debug_pub.add('2. ret sts of unexp error');
1399: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1400: END IF;
1401:
1395: oe_debug_pub.add('2. ret sts of error');
1396: x_return_status := FND_API.G_RET_STS_ERROR;
1397: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1398: oe_debug_pub.add('2. ret sts of unexp error');
1399: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1400: END IF;
1401:
1402: -- Decrement qty/amount for old blanket line
1403: IF p_request_tbl(I).param1 IS NOT NULL THEN
1426: );
1427:
1428: END IF;
1429:
1430: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1431: oe_debug_pub.add('3. ret sts of error');
1432: x_return_status := FND_API.G_RET_STS_ERROR;
1433: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1434: oe_debug_pub.add('3. ret sts of unexp error');
1428: END IF;
1429:
1430: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1431: oe_debug_pub.add('3. ret sts of error');
1432: x_return_status := FND_API.G_RET_STS_ERROR;
1433: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1434: oe_debug_pub.add('3. ret sts of unexp error');
1435: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1436: END IF;
1429:
1430: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1431: oe_debug_pub.add('3. ret sts of error');
1432: x_return_status := FND_API.G_RET_STS_ERROR;
1433: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1434: oe_debug_pub.add('3. ret sts of unexp error');
1435: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1436: END IF;
1437:
1431: oe_debug_pub.add('3. ret sts of error');
1432: x_return_status := FND_API.G_RET_STS_ERROR;
1433: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1434: oe_debug_pub.add('3. ret sts of unexp error');
1435: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1436: END IF;
1437:
1438: END IF;
1439:
1447: END LOOP;
1448:
1449:
1450: -- Error during updates, mark the requests as NOT processed
1451: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1452:
1453: if l_debug_level > 0 then
1454: oe_debug_pub.add('Overall Ret Sts :'||x_return_status);
1455: end if;
1487: oe_debug_pub.add('EXIT OE_Blanket_Util.Process_Releases');
1488: end if;
1489:
1490: EXCEPTION
1491: WHEN FND_API.G_EXC_ERROR THEN
1492: x_return_status := FND_API.G_RET_STS_ERROR;
1493: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1494: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1495: WHEN OTHERS THEN
1488: end if;
1489:
1490: EXCEPTION
1491: WHEN FND_API.G_EXC_ERROR THEN
1492: x_return_status := FND_API.G_RET_STS_ERROR;
1493: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1494: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1495: WHEN OTHERS THEN
1496: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1489:
1490: EXCEPTION
1491: WHEN FND_API.G_EXC_ERROR THEN
1492: x_return_status := FND_API.G_RET_STS_ERROR;
1493: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1494: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1495: WHEN OTHERS THEN
1496: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1497: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1490: EXCEPTION
1491: WHEN FND_API.G_EXC_ERROR THEN
1492: x_return_status := FND_API.G_RET_STS_ERROR;
1493: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1494: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1495: WHEN OTHERS THEN
1496: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1497: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1498: THEN
1492: x_return_status := FND_API.G_RET_STS_ERROR;
1493: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1494: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1495: WHEN OTHERS THEN
1496: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1497: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1498: THEN
1499: OE_MSG_PUB.Add_Exc_Msg
1500: (G_PKG_NAME
1638:
1639: END IF; -- if not cached
1640:
1641: EXCEPTION
1642: WHEN FND_API.G_EXC_ERROR THEN
1643: RAISE FND_API.G_EXC_ERROR;
1644: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1645: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1646: WHEN OTHERS THEN
1639: END IF; -- if not cached
1640:
1641: EXCEPTION
1642: WHEN FND_API.G_EXC_ERROR THEN
1643: RAISE FND_API.G_EXC_ERROR;
1644: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1645: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1646: WHEN OTHERS THEN
1647: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1640:
1641: EXCEPTION
1642: WHEN FND_API.G_EXC_ERROR THEN
1643: RAISE FND_API.G_EXC_ERROR;
1644: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1645: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1646: WHEN OTHERS THEN
1647: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1648: THEN
1641: EXCEPTION
1642: WHEN FND_API.G_EXC_ERROR THEN
1643: RAISE FND_API.G_EXC_ERROR;
1644: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1645: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1646: WHEN OTHERS THEN
1647: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1648: THEN
1649: OE_MSG_PUB.Add_Exc_Msg
1650: (G_PKG_NAME
1651: ,'Populate_Old_Values'
1652: );
1653: END IF;
1654: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1655: END Populate_Old_Values;
1656:
1657: PROCEDURE Cache_Order_Qty_Amt
1658: (p_request_rec IN OUT NOCOPY OE_ORDER_PUB.Request_Rec_Type
1677: if l_debug_level > 0 then
1678: oe_debug_pub.add('ENTER OE_Blkt_Release_Util.Cache_Order_Qty_Amt');
1679: end if;
1680:
1681: x_return_status := fnd_api.g_ret_sts_success;
1682:
1683: -- Blanket reference not updated, some other attribute on line updated
1684: IF p_request_rec.param1 = p_request_rec.param11
1685: AND p_request_rec.param2 = p_request_rec.param12
1728: oe_debug_pub.add('EXIT OE_Blkt_Release_Util.Cache_Order_Qty_Amt');
1729: end if;
1730:
1731: EXCEPTION
1732: WHEN FND_API.G_EXC_ERROR THEN
1733: x_return_status := FND_API.G_RET_STS_ERROR;
1734: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1735: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1736: WHEN OTHERS THEN
1729: end if;
1730:
1731: EXCEPTION
1732: WHEN FND_API.G_EXC_ERROR THEN
1733: x_return_status := FND_API.G_RET_STS_ERROR;
1734: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1735: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1736: WHEN OTHERS THEN
1737: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1730:
1731: EXCEPTION
1732: WHEN FND_API.G_EXC_ERROR THEN
1733: x_return_status := FND_API.G_RET_STS_ERROR;
1734: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1735: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1736: WHEN OTHERS THEN
1737: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1738: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1731: EXCEPTION
1732: WHEN FND_API.G_EXC_ERROR THEN
1733: x_return_status := FND_API.G_RET_STS_ERROR;
1734: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1735: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1736: WHEN OTHERS THEN
1737: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1738: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1739: THEN
1733: x_return_status := FND_API.G_RET_STS_ERROR;
1734: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1735: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1736: WHEN OTHERS THEN
1737: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1738: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1739: THEN
1740: OE_MSG_PUB.Add_Exc_Msg
1741: (G_PKG_NAME