[Home] [Help]
899: WHEN OTHERS THEN
900:
901: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
902:
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
907: ,'Validate Attributes'
901: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
902:
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
907: ,'Validate Attributes'
908: );
909: END IF;
1473:
1474: WHEN OTHERS THEN
1475: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1476:
1477: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1478: THEN
1479: OE_MSG_PUB.Add_Exc_Msg
1480: ( G_PKG_NAME
1481: ,'Validate Attributes'
1475: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1476:
1477: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1478: THEN
1479: OE_MSG_PUB.Add_Exc_Msg
1480: ( G_PKG_NAME
1481: ,'Validate Attributes'
1482: );
1483: END IF;
1671: -- from the Process Order Call and if the Context field is required.
1672:
1673: FND_MESSAGE.SET_NAME('FND', 'ONT_BLKT_CONTEXT_NOT_FOUND');
1674:
1675: OE_MSG_PUB.ADD;
1676: IF l_debug_level > 0 THEN
1677: oe_debug_pub.add( 'Context not set for OE_BLKT_LINE_ATTRIBUTES DFF ' ) ;
1678: END IF;
1679: RAISE FND_API.G_EXC_ERROR;
1998: WHEN OTHERS THEN
1999:
2000: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2001:
2002: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2003: THEN
2004: OE_MSG_PUB.Add_Exc_Msg
2005: ( G_PKG_NAME
2006: , 'Validate Attributes'
2000: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2001:
2002: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2003: THEN
2004: OE_MSG_PUB.Add_Exc_Msg
2005: ( G_PKG_NAME
2006: , 'Validate Attributes'
2007: );
2008: END IF;
2294:
2295: fnd_message.set_name('ONT','OE_ATTRIBUTE_REQUIRED');
2296: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
2297: OE_Order_UTIL.Get_Attribute_Name('line_id'));
2298: OE_MSG_PUB.Add;
2299:
2300: END IF;
2301:
2302: IF p_line_rec.item_identifier_type IS NULL
2306:
2307: fnd_message.set_name('ONT','OE_ATTRIBUTE_REQUIRED');
2308: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
2309: OE_Order_UTIL.Get_Attribute_Name('ITEM_IDENTIFIER_TYPE'));
2310: OE_MSG_PUB.Add;
2311:
2312: ELSIF p_line_rec.item_identifier_type <> 'ALL'
2313: AND p_line_rec.inventory_item_id IS NULL
2314: THEN
2317:
2318: fnd_message.set_name('ONT','OE_ATTRIBUTE_REQUIRED');
2319: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
2320: OE_Order_UTIL.Get_Attribute_Name('INVENTORY_ITEM_ID'));
2321: OE_MSG_PUB.Add;
2322:
2323: END IF;
2324:
2325: IF p_line_rec.start_date_active IS NULL
2328: x_return_status := FND_API.G_RET_STS_ERROR;
2329:
2330: fnd_message.set_name('ONT','OE_ATTRIBUTE_REQUIRED');
2331: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Activation Date');
2332: OE_MSG_PUB.Add;
2333:
2334: END IF;
2335:
2336: -- Return Error if a required attribute is missing.
2364: x_return_status := FND_API.G_RET_STS_ERROR;
2365: FND_MESSAGE.Set_Name('ONT','OE_INVALID_ATTRIBUTE');
2366: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
2367: OE_Order_Util.Get_Attribute_Name('ACCOUNTING_RULE_ID'));
2368: OE_MSG_PUB.ADD;
2369: END IF;
2370:
2371:
2372: ---------------------------------------------------------------------
2382: IF (p_line_rec.released_amount > 0) THEN
2383: fnd_message.set_name('ONT', 'OE_BLKT_UPDATE_LINE_ATTRIBUTE');
2384: fnd_message.set_token('ATTRIBUTE',
2385: OE_Order_UTIL.Get_Attribute_Name('LINE_NUMBER'));
2386: OE_MSG_PUB.Add;
2387: ELSE
2388: oe_delayed_requests_pvt.Log_request(p_Entity_Code =>
2389: OE_BLANKET_pub.G_ENTITY_BLANKET_LINE,
2390: p_Entity_Id => p_line_rec.line_id,
2420:
2421: fnd_message.set_name('ONT', 'OE_BLKT_UPDATE_LINE_ATTRIBUTE');
2422: fnd_message.set_token('ATTRIBUTE',
2423: OE_Order_UTIL.Get_Attribute_Name('INVENTORY_ITEM_ID'));
2424: OE_MSG_PUB.add;
2425: x_return_status := FND_API.G_RET_STS_ERROR;
2426:
2427: ELSIF (p_line_rec.released_amount > 0) AND
2428: (NOT OE_GLOBALS.Equal
2429: (p_line_rec.item_identifier_type,l_old_line_rec.item_identifier_type)) THEN
2430: fnd_message.set_name('ONT', 'OE_BLKT_UPDATE_LINE_ATTRIBUTE');
2431: fnd_message.set_token('ATTRIBUTE',
2432: OE_Order_UTIL.Get_Attribute_Name('ITEM_IDENTIFIER_TYPE'));
2433: OE_MSG_PUB.add;
2434: x_return_status := FND_API.G_RET_STS_ERROR;
2435:
2436: ELSE
2437:
2440:
2441: IF p_line_rec.inventory_item_id IS NOT NULL THEN
2442: x_return_status := FND_API.G_RET_STS_ERROR;
2443: fnd_message.set_name('ONT', 'OE_ITEM_VALIDATION_FAILED');
2444: OE_MSG_PUB.add;
2445: END IF;
2446:
2447: -- For all other context values, validate item id
2448: ELSE
2455: p_line_rec.ordered_item
2456: ) THEN
2457: x_return_status := FND_API.G_RET_STS_ERROR;
2458: fnd_message.set_name('ONT', 'OE_ITEM_VALIDATION_FAILED');
2459: OE_MSG_PUB.add;
2460: END IF;
2461:
2462: END IF;
2463:
2504: x_return_status := FND_API.G_RET_STS_ERROR;
2505: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
2506: FND_MESSAGE.SET_TOKEN('ATTRIBUTE'
2507: , OE_Order_Util.Get_Attribute_Name('ship_to_org_id'));
2508: OE_MSG_PUB.Add;
2509: END IF;
2510: END IF; -- Ship to
2511:
2512: -- Deliver to Org id depends on sold to org.
2524: x_return_status := FND_API.G_RET_STS_ERROR;
2525: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
2526: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
2527: OE_Order_Util.Get_Attribute_Name('deliver_to_org_id'));
2528: OE_MSG_PUB.Add;
2529: END IF;
2530:
2531: END IF; -- Deliver to
2532:
2541: x_return_status := FND_API.G_RET_STS_ERROR;
2542: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
2543: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
2544: OE_Order_Util.Get_Attribute_Name('invoice_to_org_id'));
2545: OE_MSG_PUB.Add;
2546: END IF;
2547: END IF; -- Invoice to org
2548:
2549: if l_debug_level > 0 then
2558: if ( nvl(p_line_rec.source_document_type_id,0) = 2 --bug#5528507
2559: AND p_line_rec.operation = OE_GLOBALS.G_OPR_CREATE)
2560: then
2561: FND_MESSAGE.SET_NAME('ONT','OE_BLKT_INVALID_DATE_RANGE');
2562: OE_MSG_PUB.ADD;
2563: oe_debug_pub.add('1: Not Setting Error',1);
2564:
2565: else
2566: FND_MESSAGE.SET_NAME('ONT','OE_BLKT_INVALID_DATE_RANGE');
2563: oe_debug_pub.add('1: Not Setting Error',1);
2564:
2565: else
2566: FND_MESSAGE.SET_NAME('ONT','OE_BLKT_INVALID_DATE_RANGE');
2567: OE_MSG_PUB.ADD;
2568: oe_debug_pub.add('1: Setting Error',1);
2569: x_return_status := FND_API.G_RET_STS_ERROR;
2570: end if;
2571: --Changes made for Bug No 5528599
2574: --line start date must be after header date range
2575: if (p_line_rec.start_date_active < g_header_rec.start_date_active)
2576: then
2577: FND_MESSAGE.SET_NAME('ONT','OE_BLKT_END_DATE_CONFLICT');
2578: OE_MSG_PUB.ADD;
2579: x_return_status := FND_API.G_RET_STS_ERROR;
2580: end if;
2581:
2582: -- if header end date exists, line end date cannot be null
2586: or (p_line_rec.end_date_active
2587: > g_header_rec.end_date_active)
2588: then
2589: FND_MESSAGE.SET_NAME('ONT','OE_BLKT_END_DATE_CONFLICT');
2590: OE_MSG_PUB.ADD;
2591: x_return_status := FND_API.G_RET_STS_ERROR;
2592: end if;
2593: end if;
2594:
2603: IF (g_new_price_list AND (p_line_rec.pricing_uom IS NULL)) THEN
2604: fnd_message.set_name('ONT','OE_ATTRIBUTE_REQUIRED');
2605: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
2606: OE_Order_Util.Get_Attribute_Name('PRICING_QUANTITY_UOM'));
2607: OE_MSG_PUB.Add;
2608: ELSIF p_line_rec.price_list_id IS NOT NULL THEN
2609: IF IS_BLANKET_PRICE_LIST(p_price_list_id => p_line_rec.price_list_id)
2610: AND p_line_rec.pricing_uom IS NULL THEN
2611: fnd_message.set_name('ONT','OE_ATTRIBUTE_REQUIRED');
2610: AND p_line_rec.pricing_uom IS NULL THEN
2611: fnd_message.set_name('ONT','OE_ATTRIBUTE_REQUIRED');
2612: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
2613: OE_Order_Util.Get_Attribute_Name('PRICING_QUANTITY_UOM'));
2614: OE_MSG_PUB.Add;
2615: END IF;
2616: END IF;
2617: END IF;
2618:
2621: (p_line_rec.enforce_price_list_flag = 'Y') THEN
2622: fnd_message.set_name('ONT','OE_ATTRIBUTE_REQUIRED');
2623: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
2624: OE_Order_UTIL.Get_Attribute_Name('PRICE_LIST_ID'));
2625: OE_MSG_PUB.ADD;
2626: x_return_status := FND_API.G_RET_STS_ERROR;
2627: END IF;
2628:
2629: -- UOM is required if any of the quantities are given on the blanket line
2632: OR p_line_rec.Blanket_Max_Quantity IS NOT NULL
2633: OR p_line_rec.Min_Release_Quantity IS NOT NULL
2634: OR p_line_rec.Max_Release_Quantity IS NOT NULL) THEN
2635: FND_MESSAGE.SET_NAME('ONT','OE_BLKT_QUANTITY_UOM');
2636: OE_MSG_PUB.ADD;
2637: x_return_status := FND_API.G_RET_STS_ERROR;
2638:
2639: END IF;
2640:
2653: 'BLANKET_LINE_AMOUNT', x_return_status);
2654: /*
2655: IF p_line_rec.blanket_max_amount > g_header_rec.blanket_max_amount THEN
2656: FND_MESSAGE.SET_NAME('ONT','OE_BLKT_LINE_MIN_MAX_VALUES');
2657: OE_MSG_PUB.ADD;
2658: x_return_status := FND_API.G_RET_STS_ERROR;
2659: END IF;
2660: */
2661: IF p_line_rec.min_release_amount > p_line_rec.blanket_max_amount OR
2660: */
2661: IF p_line_rec.min_release_amount > p_line_rec.blanket_max_amount OR
2662: p_line_rec.max_release_amount > p_line_rec.blanket_max_amount THEN
2663: FND_MESSAGE.SET_NAME('ONT','OE_BLKT_LINE_MAX_AMOUNT');
2664: OE_MSG_PUB.ADD;
2665: x_return_status := FND_API.G_RET_STS_ERROR;
2666:
2667: END IF;
2668:
2668:
2669: IF p_line_rec.min_release_quantity > p_line_rec.blanket_max_quantity OR
2670: p_line_rec.max_release_quantity > p_line_rec.blanket_max_quantity THEN
2671: FND_MESSAGE.SET_NAME('ONT','OE_BLKT_LINE_MAX_QUANTITY');
2672: OE_MSG_PUB.ADD;
2673: x_return_status := FND_API.G_RET_STS_ERROR;
2674:
2675: END IF;
2676:
2684: IF p_line_rec.end_date_active < trunc(sysdate) and
2685: l_old_line_rec.end_date_active < trunc(sysdate) THEN
2686: x_return_status := FND_API.G_RET_STS_ERROR;
2687: fnd_message.set_name('ONT', 'OE_BLKT_UPDATE_ATTR_CLOSED');
2688: OE_MSG_PUB.Add;
2689: END IF;
2690: --Srini
2691: --oe_blanket_util.Get_Inventory_Item(p_x_line_rec => p_line_rec,
2692: -- x_return_status => l_return_status);
2696: p_line_rec.end_date_active <= trunc(sysdate) AND
2697: p_line_rec.override_blanket_controls_flag = 'N' THEN
2698: IF nvl(p_line_rec.released_amount,0) < p_line_rec.blanket_min_amount THEN
2699: FND_MESSAGE.SET_NAME('ONT','OE_BLKT_CLOSE_MIN_VALUES');
2700: OE_MSG_PUB.ADD;
2701: if l_debug_level > 0 then
2702: oe_debug_pub.add('Blanket line close min amount ');
2703: end if;
2704:
2703: end if;
2704:
2705: ELSIF nvl(p_line_rec.released_quantity,0) < p_line_rec.blanket_min_quantity THEN
2706: FND_MESSAGE.SET_NAME('ONT','OE_BLKT_CLOSE_MIN_VALUES');
2707: OE_MSG_PUB.ADD;
2708: if l_debug_level > 0 then
2709: oe_debug_pub.add('Blanket line close min quantity ');
2710: end if;
2711: END IF;
2718: x_return_status := FND_API.G_RET_STS_ERROR;
2719: fnd_message.set_name('ONT', 'OE_BLKT_UPDATE_LINE_ATTRIBUTE');
2720: fnd_message.set_token('ATTRIBUTE',
2721: OE_Order_UTIL.Get_Attribute_Name('ORDER_QUANTITY_UOM'));
2722: OE_MSG_PUB.Add;
2723: END IF;
2724: END IF;
2725:
2726: IF NOT OE_GLOBALS.EQUAL (p_line_rec.end_date_active, l_old_line_rec.end_date_active) THEN
2759:
2760: IF l_dummy = 'ERROR' THEN
2761: x_return_status := FND_API.G_RET_STS_ERROR;
2762: fnd_message.set_name('ONT', 'OE_BLKT_LINE_RELEASE_END_DATE');
2763: OE_MSG_PUB.Add;
2764: END IF;
2765:
2766: EXCEPTION
2767: WHEN NO_DATA_FOUND THEN
2785: if (g_new_price_list) THEN
2786: FND_MESSAGE.SET_NAME('ONT','OE_BLKT_UPDATE_LINE_ATTRIBUTE');
2787: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
2788: OE_Order_UTIL.Get_Attribute_Name('PRICING_QUANTITY_UOM'));
2789: OE_MSG_PUB.ADD;
2790: x_return_status := FND_API.G_RET_STS_ERROR;
2791: elsif p_line_rec.price_list_id IS NOT NULL THEN
2792: if IS_BLANKET_PRICE_LIST(p_price_list_id => p_line_rec.price_list_id) THEN
2793: x_return_status := FND_API.G_RET_STS_ERROR;
2793: x_return_status := FND_API.G_RET_STS_ERROR;
2794: FND_MESSAGE.SET_NAME('ONT','OE_BLKT_UPDATE_LINE_ATTRIBUTE');
2795: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
2796: OE_Order_UTIL.Get_Attribute_Name('PRICING_QUANTITY_UOM'));
2797: OE_MSG_PUB.ADD;
2798: x_return_status := FND_API.G_RET_STS_ERROR;
2799: end if;
2800: end if;
2801: end if;
2807: if NOT OE_GLOBALS.EQUAL(p_line_rec.released_amount,
2808: l_old_line_rec.released_amount) THEN
2809: FND_MESSAGE.SET_NAME('ONT','OE_BLKT_UPDATE_LINE_ATTRIBUTE');
2810: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Released Amount');
2811: OE_MSG_PUB.ADD;
2812: x_return_status := FND_API.G_RET_STS_ERROR;
2813: end if;
2814:
2815: if NOT OE_GLOBALS.EQUAL(p_line_rec.returned_amount,
2815: if NOT OE_GLOBALS.EQUAL(p_line_rec.returned_amount,
2816: l_old_line_rec.returned_amount) THEN
2817: FND_MESSAGE.SET_NAME('ONT','OE_BLKT_UPDATE_LINE_ATTRIBUTE');
2818: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Returned Amount');
2819: OE_MSG_PUB.ADD;
2820: x_return_status := FND_API.G_RET_STS_ERROR;
2821: end if;
2822:
2823: if NOT OE_GLOBALS.EQUAL(p_line_rec.released_quantity,
2823: if NOT OE_GLOBALS.EQUAL(p_line_rec.released_quantity,
2824: l_old_line_rec.released_quantity) THEN
2825: FND_MESSAGE.SET_NAME('ONT','OE_BLKT_UPDATE_LINE_ATTRIBUTE');
2826: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Released Quantity');
2827: OE_MSG_PUB.ADD;
2828: x_return_status := FND_API.G_RET_STS_ERROR;
2829: end if;
2830:
2831: if NOT OE_GLOBALS.EQUAL(p_line_rec.fulfilled_quantity,
2831: if NOT OE_GLOBALS.EQUAL(p_line_rec.fulfilled_quantity,
2832: l_old_line_rec.fulfilled_quantity) THEN
2833: FND_MESSAGE.SET_NAME('ONT','OE_BLKT_UPDATE_LINE_ATTRIBUTE');
2834: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Fulfilled Quantity');
2835: OE_MSG_PUB.ADD;
2836: x_return_status := FND_API.G_RET_STS_ERROR;
2837: end if;
2838:
2839: if NOT OE_GLOBALS.EQUAL(p_line_rec.fulfilled_amount,
2839: if NOT OE_GLOBALS.EQUAL(p_line_rec.fulfilled_amount,
2840: l_old_line_rec.fulfilled_amount) THEN
2841: FND_MESSAGE.SET_NAME('ONT','OE_BLKT_UPDATE_LINE_ATTRIBUTE');
2842: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Fulfilled Amount');
2843: OE_MSG_PUB.ADD;
2844: x_return_status := FND_API.G_RET_STS_ERROR;
2845: end if;
2846:
2847: if NOT OE_GLOBALS.EQUAL(p_line_rec.returned_quantity,
2847: if NOT OE_GLOBALS.EQUAL(p_line_rec.returned_quantity,
2848: l_old_line_rec.returned_quantity) THEN
2849: FND_MESSAGE.SET_NAME('ONT','OE_BLKT_UPDATE_LINE_ATTRIBUTE');
2850: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Returned Quantity');
2851: OE_MSG_PUB.ADD;
2852: x_return_status := FND_API.G_RET_STS_ERROR;
2853: end if;
2854: if l_debug_level > 0 then
2855: oe_debug_pub.add('Blanket In validate entity update 2');
2873: if ( nvl(p_line_rec.source_document_type_id,0) = 2 --bug#5528507
2874: AND p_line_rec.operation = OE_GLOBALS.G_OPR_CREATE)
2875: then
2876: FND_MESSAGE.SET_NAME('ONT','OE_BLKT_INVALID_DATE_RANGE');
2877: OE_MSG_PUB.ADD;
2878: oe_debug_pub.add('2: Not Setting Error',1);
2879:
2880: else
2881: FND_MESSAGE.SET_NAME('ONT','OE_BLKT_INVALID_DATE_RANGE');
2878: oe_debug_pub.add('2: Not Setting Error',1);
2879:
2880: else
2881: FND_MESSAGE.SET_NAME('ONT','OE_BLKT_INVALID_DATE_RANGE');
2882: OE_MSG_PUB.ADD;
2883: x_return_status := FND_API.G_RET_STS_ERROR;
2884: oe_debug_pub.add('2: Setting Error',1);
2885: end if;
2886: end if;
3022: x_return_status := FND_API.G_RET_STS_ERROR;
3023: FND_MESSAGE.SET_NAME('ONT','OE_ATTRIBUTE_REQUIRED');
3024: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
3025: OE_Order_UTIL.Get_Attribute_Name('UNIT_LIST_PRICE'));
3026: OE_MSG_PUB.ADD;
3027: END IF;
3028:
3029: END IF; --if g_new_price_list
3030:
3069: IF p_line_rec.modifier_list_line_id IS NOT NULL
3070: THEN
3071: oe_debug_pub.add('modifier list line id is not null');
3072: fnd_message.set_name('ONT','OE_BLKT_CANNOT_UPDATE_DIS');
3073: oe_msg_pub.add;
3074: x_return_status := FND_API.G_RET_STS_ERROR;
3075: ELSIF g_header_rec.new_modifier_list_name IS NULL
3076: AND g_header_rec.new_modifier_list_id IS NULL
3077: THEN
3075: ELSIF g_header_rec.new_modifier_list_name IS NULL
3076: AND g_header_rec.new_modifier_list_id IS NULL
3077: THEN
3078: fnd_message.set_name('ONT','OE_BLKT_CANNOT_ENTER_DIS');
3079: oe_msg_pub.add;
3080: x_return_status := FND_API.G_RET_STS_ERROR;
3081: ELSIF p_line_rec.discount_percent IS NOT NULL
3082: AND p_line_rec.discount_amount IS NOT NULL
3083: THEN
3081: ELSIF p_line_rec.discount_percent IS NOT NULL
3082: AND p_line_rec.discount_amount IS NOT NULL
3083: THEN
3084: fnd_message.set_name('ONT','OE_BLKT_DISCOUNT_CONFLICT');
3085: oe_msg_pub.add;
3086: x_return_status := FND_API.G_RET_STS_ERROR;
3087: ELSE
3088: -- Log delayed request to create new modifier list line
3089: oe_delayed_requests_pvt.Log_request
3127: WHEN OTHERS THEN
3128:
3129: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3130:
3131: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3132: THEN
3133: OE_MSG_PUB.Add_Exc_Msg
3134: ( G_PKG_NAME
3135: , 'Validate Entity'
3129: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3130:
3131: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3132: THEN
3133: OE_MSG_PUB.Add_Exc_Msg
3134: ( G_PKG_NAME
3135: , 'Validate Entity'
3136: );
3137: END IF;
3249: x_return_status := FND_API.G_RET_STS_ERROR;
3250: fnd_message.set_name('ONT','OE_ATTRIBUTE_REQUIRED');
3251: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
3252: OE_Order_UTIL.Get_Attribute_Name('header_id'));
3253: OE_MSG_PUB.Add;
3254: END IF;
3255:
3256: IF p_header_rec.order_number IS NULL THEN
3257: x_return_status := FND_API.G_RET_STS_ERROR;
3257: x_return_status := FND_API.G_RET_STS_ERROR;
3258: fnd_message.set_name('ONT','OE_ATTRIBUTE_REQUIRED');
3259: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
3260: OE_Order_UTIL.Get_Attribute_Name('BLANKET_NUMBER'));
3261: OE_MSG_PUB.Add;
3262: END IF;
3263: --Enabling Pricing Agreements for pack J
3264: IF OE_CODE_CONTROL.Get_Code_Release_Level < '110510' THEN
3265: IF p_header_rec.sold_to_org_id IS NULL THEN
3266: x_return_status := FND_API.G_RET_STS_ERROR;
3267: fnd_message.set_name('ONT','OE_ATTRIBUTE_REQUIRED');
3268: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
3269: OE_Order_UTIL.Get_Attribute_Name('SOLD_TO_ORG_ID'));
3270: OE_MSG_PUB.Add;
3271: END IF;
3272: END IF;
3273:
3274: IF p_header_rec.transactional_curr_code IS NULL THEN
3275: x_return_status := FND_API.G_RET_STS_ERROR;
3276: fnd_message.set_name('ONT','OE_ATTRIBUTE_REQUIRED');
3277: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
3278: OE_Order_UTIL.Get_Attribute_Name('TRANSACTIONAL_CURR_CODE'));
3279: OE_MSG_PUB.Add;
3280: END IF;
3281:
3282: IF p_header_rec.start_date_active IS NULL THEN
3283: x_return_status := FND_API.G_RET_STS_ERROR;
3282: IF p_header_rec.start_date_active IS NULL THEN
3283: x_return_status := FND_API.G_RET_STS_ERROR;
3284: fnd_message.set_name('ONT','OE_ATTRIBUTE_REQUIRED');
3285: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Activation Date');
3286: OE_MSG_PUB.Add;
3287: END IF;
3288:
3289: ---------------------------------------------------------------------
3290: -- Bug 3193220
3299: if ( nvl(p_header_rec.source_document_type_id,0) = 2) --bug#5528507
3300: AND p_header_rec.operation = OE_GLOBALS.G_OPR_CREATE
3301: then
3302: FND_MESSAGE.SET_NAME('ONT','OE_BLKT_INVALID_DATE_RANGE');
3303: OE_MSG_PUB.ADD;
3304: oe_debug_pub.add('3: Not Setting Error',1);
3305:
3306: else
3307: FND_MESSAGE.SET_NAME('ONT','OE_BLKT_INVALID_DATE_RANGE');
3304: oe_debug_pub.add('3: Not Setting Error',1);
3305:
3306: else
3307: FND_MESSAGE.SET_NAME('ONT','OE_BLKT_INVALID_DATE_RANGE');
3308: OE_MSG_PUB.ADD;
3309: x_return_status := FND_API.G_RET_STS_ERROR;
3310: oe_debug_pub.add('3: Setting Error',1);
3311: end if;
3312: end if;
3326: x_return_status := FND_API.G_RET_STS_ERROR;
3327: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
3328: FND_MESSAGE.SET_TOKEN('ATTRIBUTE'
3329: , OE_Order_Util.Get_Attribute_Name('ship_to_org_id'));
3330: OE_MSG_PUB.Add;
3331: END IF;
3332:
3333: END IF; -- Ship to
3334:
3367: l_return_status := FND_API.G_RET_STS_ERROR;
3368: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
3369: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
3370: OE_Order_Util.Get_Attribute_Name('SOLD_TO_SITE_USE_ID'));
3371: OE_MSG_PUB.Add;
3372:
3373: WHEN OTHERS THEN
3374:
3375: IF OE_MSG_PUB.Check_Msg_Level
3371: OE_MSG_PUB.Add;
3372:
3373: WHEN OTHERS THEN
3374:
3375: IF OE_MSG_PUB.Check_Msg_Level
3376: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3377: THEN
3378:
3379: OE_MSG_PUB.Add_Exc_Msg
3372:
3373: WHEN OTHERS THEN
3374:
3375: IF OE_MSG_PUB.Check_Msg_Level
3376: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3377: THEN
3378:
3379: OE_MSG_PUB.Add_Exc_Msg
3380: ( G_PKG_NAME ,
3375: IF OE_MSG_PUB.Check_Msg_Level
3376: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3377: THEN
3378:
3379: OE_MSG_PUB.Add_Exc_Msg
3380: ( G_PKG_NAME ,
3381: 'Record - Customer Location'
3382: );
3383: END IF;
3404: x_return_status := FND_API.G_RET_STS_ERROR;
3405: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
3406: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
3407: OE_Order_Util.Get_Attribute_Name('deliver_to_org_id'));
3408: OE_MSG_PUB.Add;
3409: END IF;
3410:
3411: END if; -- Deliver to
3412:
3420: x_return_status := FND_API.G_RET_STS_ERROR;
3421: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
3422: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
3423: OE_Order_Util.Get_Attribute_Name('invoice_to_org_id'));
3424: OE_MSG_PUB.Add;
3425: END IF;
3426:
3427: END IF; -- Invoice to org
3428:
3446: x_return_status := FND_API.G_RET_STS_ERROR;
3447: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
3448: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
3449: OE_Order_Util.Get_Attribute_Name('SOLD_TO_CONTACT_ID'));
3450: OE_MSG_PUB.Add;
3451: WHEN OTHERS THEN
3452: IF OE_MSG_PUB.Check_Msg_Level ( OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3453: OE_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME , 'Record - Sold To Contact');
3454: END IF;
3448: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
3449: OE_Order_Util.Get_Attribute_Name('SOLD_TO_CONTACT_ID'));
3450: OE_MSG_PUB.Add;
3451: WHEN OTHERS THEN
3452: IF OE_MSG_PUB.Check_Msg_Level ( OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3453: OE_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME , 'Record - Sold To Contact');
3454: END IF;
3455: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3456: END; -- BEGIN
3449: OE_Order_Util.Get_Attribute_Name('SOLD_TO_CONTACT_ID'));
3450: OE_MSG_PUB.Add;
3451: WHEN OTHERS THEN
3452: IF OE_MSG_PUB.Check_Msg_Level ( OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3453: OE_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME , 'Record - Sold To Contact');
3454: END IF;
3455: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3456: END; -- BEGIN
3457: END IF; -- Sold to contact needed validation.
3459: if p_header_rec.start_date_active is not NULL and
3460: p_header_rec.end_date_active is not NULL and
3461: p_header_rec.start_date_active > p_header_rec.end_date_active then
3462: FND_MESSAGE.SET_NAME('ONT','OE_BLKT_INVALID_DATE_RANGE');
3463: OE_MSG_PUB.ADD;
3464: x_return_status := FND_API.G_RET_STS_ERROR;
3465: end if;
3466:
3467: -- 11i10 Pricing Changes Start
3516: THEN
3517:
3518: -- Cannot enter ID for a new price list, only name
3519: fnd_message.set_name('ONT','OE_BLKT_CANT_ENTER_NEW_PL_ID');
3520: oe_msg_pub.add;
3521: x_return_status := FND_API.G_RET_STS_ERROR;
3522:
3523: ELSIF p_header_rec.new_price_list_name IS NOT NULL
3524: -- Bug 3213174
3538: WHERE name = p_header_rec.new_price_list_name
3539: AND rownum = 1;
3540:
3541: fnd_message.set_name('ONT','OE_BLKT_PRICE_LIST_EXISTS');
3542: oe_msg_pub.add;
3543: x_return_status := FND_API.G_RET_STS_ERROR;
3544:
3545: EXCEPTION
3546: WHEN NO_DATA_FOUND THEN
3554: THEN
3555:
3556: -- Cannot enter ID for a new modifier list, only name
3557: fnd_message.set_name('ONT','OE_BLKT_CANT_ENTER_MOD_LIST_ID');
3558: oe_msg_pub.add;
3559: x_return_status := FND_API.G_RET_STS_ERROR;
3560:
3561: ELSIF p_header_rec.new_modifier_list_name IS NOT NULL
3562: -- Bug 3213174
3578: WHERE name = p_header_rec.new_modifier_list_name
3579: AND rownum = 1;
3580:
3581: fnd_message.set_name('ONT','OE_BLKT_MOD_LIST_EXISTS');
3582: oe_msg_pub.add;
3583: x_return_status := FND_API.G_RET_STS_ERROR;
3584:
3585: EXCEPTION
3586: WHEN NO_DATA_FOUND THEN
3623: IF p_header_rec.end_date_active < trunc(sysdate) and
3624: l_old_header_rec.end_date_active < trunc(sysdate) THEN
3625: x_return_status := FND_API.G_RET_STS_ERROR;
3626: fnd_message.set_name('ONT', 'OE_BLKT_UPDATE_ATTR_CLOSED');
3627: OE_MSG_PUB.Add;
3628: END IF;
3629:
3630:
3631: --display warning if we haven't fulfilled minimum requirements
3635: if l_debug_level > 0 then
3636: oe_debug_pub.add('Blanket header close min amount ');
3637: end if;
3638: FND_MESSAGE.SET_NAME('ONT','OE_BLKT_CLOSE_MIN_VALUES');
3639: OE_MSG_PUB.ADD;
3640: END IF;
3641:
3642:
3643: IF NOT OE_GLOBALS.Equal (p_header_rec.header_id,
3645: x_return_status := FND_API.G_RET_STS_ERROR;
3646: fnd_message.set_name('ONT', 'OE_BLKT_UPDATE_HDR_ATTRIBUTE');
3647: fnd_message.set_token('ATTRIBUTE',
3648: OE_Order_UTIL.Get_Attribute_Name('HEADER_ID'));
3649: OE_MSG_PUB.Add;
3650: END IF;
3651:
3652: IF NOT OE_GLOBALS.Equal (p_header_rec.order_number,
3653: l_old_header_rec.order_number) THEN
3654: x_return_status := FND_API.G_RET_STS_ERROR;
3655: fnd_message.set_name('ONT', 'OE_BLKT_UPDATE_HDR_ATTRIBUTE');
3656: fnd_message.set_token('ATTRIBUTE',
3657: OE_Order_UTIL.Get_Attribute_Name('BLANKET_NUMBER'));
3658: OE_MSG_PUB.Add;
3659: END IF;
3660:
3661: IF NOT OE_GLOBALS.Equal (p_header_rec.order_category_code,
3662: l_old_header_rec.order_category_code) THEN
3663: x_return_status := FND_API.G_RET_STS_ERROR;
3664: fnd_message.set_name('ONT', 'OE_BLKT_UPDATE_HDR_ATTRIBUTE');
3665: fnd_message.set_token('ATTRIBUTE',
3666: OE_Order_UTIL.Get_Attribute_Name('ORDER_CATEGORY_CODE'));
3667: OE_MSG_PUB.Add;
3668: END IF;
3669:
3670: IF NOT OE_GLOBALS.Equal (p_header_rec.org_id,
3671: l_old_header_rec.org_id) THEN
3672: x_return_status := FND_API.G_RET_STS_ERROR;
3673: fnd_message.set_name('ONT', 'OE_BLKT_UPDATE_HDR_ATTRIBUTE');
3674: fnd_message.set_token('ATTRIBUTE',
3675: OE_Order_UTIL.Get_Attribute_Name('ORG_ID'));
3676: OE_MSG_PUB.Add;
3677: END IF;
3678:
3679: --restricted from changing if releases exist
3680: IF p_header_rec.released_amount > 0 THEN
3683: x_return_status := FND_API.G_RET_STS_ERROR;
3684: fnd_message.set_name('ONT', 'OE_BLKT_UPDATE_HDR_ATTRIBUTE');
3685: fnd_message.set_token('ATTRIBUTE',
3686: OE_Order_UTIL.Get_Attribute_Name('SOLD_TO_ORG_ID'));
3687: OE_MSG_PUB.Add;
3688: END IF;
3689:
3690: IF NOT OE_GLOBALS.Equal (p_header_rec.transactional_curr_code,
3691: l_old_header_rec.transactional_curr_code) THEN
3692: x_return_status := FND_API.G_RET_STS_ERROR;
3693: fnd_message.set_name('ONT', 'OE_BLKT_UPDATE_HDR_ATTRIBUTE');
3694: fnd_message.set_token('ATTRIBUTE',
3695: OE_Order_UTIL.Get_Attribute_Name('TRANSACTIONAL_CURR_CODE'));
3696: OE_MSG_PUB.Add;
3697: END IF;
3698:
3699: IF NOT OE_GLOBALS.Equal (p_header_rec.start_date_active,
3700: l_old_header_rec.start_date_active) THEN
3700: l_old_header_rec.start_date_active) THEN
3701: x_return_status := FND_API.G_RET_STS_ERROR;
3702: fnd_message.set_name('ONT', 'OE_BLKT_UPDATE_HDR_ATTRIBUTE');
3703: fnd_message.set_token('ATTRIBUTE','Activation Date');
3704: OE_MSG_PUB.Add;
3705: END IF;
3706: END IF; --if releases exist
3707:
3708: IF NOT OE_GLOBALS.Equal (p_header_rec.released_amount,
3709: l_old_header_rec.released_amount) THEN
3710: x_return_status := FND_API.G_RET_STS_ERROR;
3711: fnd_message.set_name('ONT', 'OE_BLKT_UPDATE_HDR_ATTRIBUTE');
3712: fnd_message.set_token('ATTRIBUTE','Released Amount');
3713: OE_MSG_PUB.Add;
3714: END IF;
3715:
3716: IF NOT OE_GLOBALS.Equal (p_header_rec.returned_amount,
3717: l_old_header_rec.returned_amount) THEN
3719: fnd_message.set_name('ONT', 'OE_BLKT_UPDATE_HDR_ATTRIBUTE');
3720: fnd_message.set_token('ATTRIBUTE', 'Returned Amount');
3721: fnd_message.set_token('new amount', p_header_rec.returned_amount);
3722: fnd_message.set_token('old amount', l_old_header_rec.returned_amount);
3723: OE_MSG_PUB.Add;
3724: END IF;
3725:
3726: IF NOT OE_GLOBALS.Equal (p_header_rec.fulfilled_amount,
3727: l_old_header_rec.fulfilled_amount) THEN
3729: fnd_message.set_name('ONT', 'OE_BLKT_UPDATE_HDR_ATTRIBUTE');
3730: fnd_message.set_token('ATTRIBUTE','Fulfilled Amount');
3731: fnd_message.set_token('new amount', p_header_rec.fulfilled_amount);
3732: fnd_message.set_token('old amount', l_old_header_rec.fulfilled_amount);
3733: OE_MSG_PUB.Add;
3734: END IF;
3735:
3736:
3737: -- Date Validations
3759:
3760: IF l_dummy = 'ERROR' THEN
3761: x_return_status := FND_API.G_RET_STS_ERROR;
3762: fnd_message.set_name('ONT', 'OE_BLKT_END_DATE_CONFLICT');
3763: OE_MSG_PUB.Add;
3764: END IF;
3765:
3766: EXCEPTION
3767: WHEN NO_DATA_FOUND THEN
3780: AND ROWNUM = 1;
3781: IF l_dummy = 'ERROR' THEN
3782: x_return_status := FND_API.G_RET_STS_ERROR;
3783: fnd_message.set_name('ONT', 'OE_BLKT_RELEASE_END_DATE');
3784: OE_MSG_PUB.Add;
3785: END IF;
3786:
3787: EXCEPTION
3788: WHEN NO_DATA_FOUND THEN
3820: AND ROWNUM = 1;
3821:
3822: IF l_dummy = 'WARNING' THEN
3823: fnd_message.set_name('ONT', 'OE_BLKT_CLOSE_MIN_VALUES');
3824: OE_MSG_PUB.Add;
3825: END IF;
3826: END IF;
3827: END IF;
3828:
3841: AND p_header_rec.blanket_max_amount < p_header_rec.released_amount
3842: AND nvl(p_header_rec.override_amount_flag, 'N') = 'N' THEN
3843: x_return_status := FND_API.G_RET_STS_ERROR;
3844: fnd_message.set_name('ONT', 'OE_BLKT_UPDATE_MAX_LIMIT');
3845: OE_MSG_PUB.Add;
3846: END IF;
3847:
3848: -- Version Change
3849: -- Validations and Record History
3869: THEN
3870:
3871: x_return_status := FND_API.G_RET_STS_ERROR;
3872: FND_MESSAGE.SET_NAME('ONT','OE_BLKT_INVALID_REVISION_NUM');
3873: OE_MSG_PUB.ADD;
3874:
3875: ELSIF p_header_rec.revision_change_reason_code IS NULL THEN
3876:
3877: x_return_status := FND_API.G_RET_STS_ERROR;
3876:
3877: x_return_status := FND_API.G_RET_STS_ERROR;
3878: FND_MESSAGE.SET_NAME('ONT','OE_ATTRIBUTE_REQUIRED');
3879: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Revision Reason');
3880: OE_MSG_PUB.ADD;
3881:
3882: ELSE
3883:
3884: --validate reason code
3893: EXCEPTION
3894: WHEN NO_DATA_FOUND THEN
3895: FND_MESSAGE.SET_NAME('ONT','OE_INVALID_REASON_CODE');
3896: FND_MESSAGE.SET_TOKEN('REASON_CODE', p_header_rec.revision_change_reason_code);
3897: OE_MSG_PUB.ADD;
3898: x_return_status := FND_API.G_RET_STS_ERROR;
3899: END;
3900:
3901: */
4036: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4037: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4038: WHEN OTHERS THEN
4039: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4040: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4041: OE_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME , 'Validate_Entity');
4042: END IF;
4043: END Validate_Entity;
4044:
4037: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4038: WHEN OTHERS THEN
4039: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4040: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4041: OE_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME , 'Validate_Entity');
4042: END IF;
4043: END Validate_Entity;
4044:
4045: PROCEDURE Insert_Row
4280: EXCEPTION
4281:
4282: WHEN OTHERS THEN
4283: OE_Blanket_Header_Security.g_check_all_cols_constraint := 'Y'; /* Bug # 5516348 */
4284: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4285: THEN
4286: OE_MSG_PUB.Add_Exc_Msg
4287: ( G_PKG_NAME
4288: , 'Insert_Row'
4282: WHEN OTHERS THEN
4283: OE_Blanket_Header_Security.g_check_all_cols_constraint := 'Y'; /* Bug # 5516348 */
4284: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4285: THEN
4286: OE_MSG_PUB.Add_Exc_Msg
4287: ( G_PKG_NAME
4288: , 'Insert_Row'
4289: );
4290: END IF;
4438:
4439: WHEN OTHERS THEN
4440:
4441: OE_Blanket_Header_Security.g_check_all_cols_constraint := 'Y'; /* Bug # 5516348 */
4442: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4443: THEN
4444: OE_MSG_PUB.Add_Exc_Msg
4445: ( G_PKG_NAME
4446: , 'Update_Row'
4440:
4441: OE_Blanket_Header_Security.g_check_all_cols_constraint := 'Y'; /* Bug # 5516348 */
4442: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4443: THEN
4444: OE_MSG_PUB.Add_Exc_Msg
4445: ( G_PKG_NAME
4446: , 'Update_Row'
4447: );
4448: END IF;
4569:
4570: EXCEPTION
4571: WHEN FND_API.G_EXC_ERROR THEN
4572: --added for delete articles
4573: OE_MSG_PUB.Count_And_Get
4574: (
4575: p_count => l_msg_count,
4576: p_data => l_msg_data
4577: );
4577: );
4578: RAISE FND_API.G_EXC_ERROR;
4579: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4580: --added for delete articles
4581: OE_MSG_PUB.Count_And_Get
4582: (
4583: p_count => l_msg_count,
4584: p_data => l_msg_data
4585: );
4585: );
4586: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4587: WHEN OTHERS THEN
4588:
4589: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4590: THEN
4591: OE_MSG_PUB.Add_Exc_Msg
4592: ( G_PKG_NAME
4593: , 'Delete_Row'
4587: WHEN OTHERS THEN
4588:
4589: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4590: THEN
4591: OE_MSG_PUB.Add_Exc_Msg
4592: ( G_PKG_NAME
4593: , 'Delete_Row'
4594: );
4595: END IF;
4848:
4849: WHEN OTHERS THEN
4850:
4851: OE_Blanket_Line_Security.g_check_all_cols_constraint := 'Y'; /* Bug # 5516348 */
4852: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4853: THEN
4854: OE_MSG_PUB.Add_Exc_Msg
4855: ( G_PKG_NAME
4856: , 'Insert_Row'
4850:
4851: OE_Blanket_Line_Security.g_check_all_cols_constraint := 'Y'; /* Bug # 5516348 */
4852: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4853: THEN
4854: OE_MSG_PUB.Add_Exc_Msg
4855: ( G_PKG_NAME
4856: , 'Insert_Row'
4857: );
4858: END IF;
4999:
5000:
5001: WHEN OTHERS THEN
5002: OE_Blanket_Line_Security.g_check_all_cols_constraint := 'Y'; /* Bug # 5516348 */
5003: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5004: THEN
5005: OE_MSG_PUB.Add_Exc_Msg
5006: ( G_PKG_NAME
5007: , 'Update_Row'
5001: WHEN OTHERS THEN
5002: OE_Blanket_Line_Security.g_check_all_cols_constraint := 'Y'; /* Bug # 5516348 */
5003: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5004: THEN
5005: OE_MSG_PUB.Add_Exc_Msg
5006: ( G_PKG_NAME
5007: , 'Update_Row'
5008: );
5009: END IF;
5095: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5096: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5097: WHEN OTHERS THEN
5098:
5099: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5100: THEN
5101: OE_MSG_PUB.Add_Exc_Msg
5102: ( G_PKG_NAME
5103: , 'Delete_Row'
5097: WHEN OTHERS THEN
5098:
5099: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5100: THEN
5101: OE_MSG_PUB.Add_Exc_Msg
5102: ( G_PKG_NAME
5103: , 'Delete_Row'
5104: );
5105: END IF;
5564: WHEN OTHERS THEN
5565:
5566: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5567:
5568: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5569: THEN
5570: OE_MSG_PUB.Add_Exc_Msg
5571: ( G_PKG_NAME
5572: , 'Query_Header'
5566: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5567:
5568: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5569: THEN
5570: OE_MSG_PUB.Add_Exc_Msg
5571: ( G_PKG_NAME
5572: , 'Query_Header'
5573: );
5574: END IF;
5793: (p_line_id IS NOT NULL
5794: AND
5795: p_header_id IS NOT NULL)
5796: THEN
5797: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5798: THEN
5799: OE_MSG_PUB.Add_Exc_Msg
5800: ( G_PKG_NAME
5801: , 'Query Rows'
5795: p_header_id IS NOT NULL)
5796: THEN
5797: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5798: THEN
5799: OE_MSG_PUB.Add_Exc_Msg
5800: ( G_PKG_NAME
5801: , 'Query Rows'
5802: , 'Keys are mutually exclusive: line_id = '|| p_line_id || ',
5803: header_id = '|| p_header_id
6122:
6123: WHEN OTHERS THEN
6124:
6125: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6126: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6127: THEN
6128: OE_MSG_PUB.Add_Exc_Msg
6129: ( G_PKG_NAME
6130: , 'Query_Lines'
6124:
6125: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6126: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6127: THEN
6128: OE_MSG_PUB.Add_Exc_Msg
6129: ( G_PKG_NAME
6130: , 'Query_Lines'
6131: );
6132: END IF;
6180:
6181: EXCEPTION
6182: WHEN OTHERS THEN
6183: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6184: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6185: THEN
6186: OE_MSG_PUB.Add_Exc_Msg
6187: ( G_PKG_NAME
6188: , 'Query_Blanket'
6182: WHEN OTHERS THEN
6183: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6184: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6185: THEN
6186: OE_MSG_PUB.Add_Exc_Msg
6187: ( G_PKG_NAME
6188: , 'Query_Blanket'
6189: );
6190: END IF;
6236: if l_debug_level > 0 then
6237: oe_debug_pub.add('Entering OE_BLANKET_UTIL.LOCK_ROW', 1);
6238: end if;
6239:
6240: OE_MSG_PUB.initialize;
6241:
6242: Lock_Blanket
6243: ( x_return_status => l_return_status
6244: , p_blanket_id => p_blanket_id
6256: END IF;
6257:
6258: -- Get message count and data
6259:
6260: OE_MSG_PUB.Count_And_Get
6261: ( p_count => x_msg_count
6262: , p_data => x_msg_data
6263: );
6264:
6274: x_return_status := FND_API.G_RET_STS_ERROR;
6275:
6276: -- Get message count and data
6277:
6278: oe_msg_pub.count_and_get
6279: ( p_count => x_msg_count
6280: , p_data => x_msg_data
6281: );
6282:
6287: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6288:
6289: -- Get message count and data
6290:
6291: oe_msg_pub.count_and_get
6292: ( p_count => x_msg_count
6293: , p_data => x_msg_data
6294: );
6295: WHEN OTHERS THEN
6293: , p_data => x_msg_data
6294: );
6295: WHEN OTHERS THEN
6296:
6297: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6298: THEN
6299: OE_MSG_PUB.Add_Exc_Msg
6300: ( G_PKG_NAME
6301: , 'Lock_Row'
6295: WHEN OTHERS THEN
6296:
6297: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6298: THEN
6299: OE_MSG_PUB.Add_Exc_Msg
6300: ( G_PKG_NAME
6301: , 'Lock_Row'
6302: );
6303: END IF;
6305: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6306:
6307: -- Get message count and data
6308:
6309: OE_MSG_PUB.Count_And_Get
6310: ( p_count => x_msg_count
6311: , p_data => x_msg_data
6312: );
6313:
6357: if l_debug_level > 0 then
6358: oe_debug_pub.add('Entering OE_BLANKET_UTIL.LOCK_BLANKET', 1);
6359: end if;
6360:
6361: OE_MSG_PUB.initialize;
6362:
6363: SAVEPOINT Lock_Blanket;
6364:
6365: -- Retrieve the primary key.
6463:
6464: -- Release the lock
6465:
6466: fnd_message.set_name('ONT','OE_LOCK_ROW_CHANGED');
6467: OE_MSG_PUB.Add;
6468:
6469: END IF;
6470:
6471: if l_debug_level > 0 then
6485: oe_debug_pub.add('no data found in blanket lock_blanket', 1);
6486: end if;
6487:
6488: fnd_message.set_name('ONT','OE_LOCK_ROW_DELETED');
6489: OE_MSG_PUB.Add;
6490:
6491: OE_GLOBALS.G_LOCK_TEST := 'N';
6492:
6493: WHEN APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION THEN
6498: oe_debug_pub.add('record_lock in blanket lock_blanket', 1);
6499: end if;
6500:
6501: fnd_message.set_name('ONT','OE_LOCK_ROW_ALREADY_LOCKED');
6502: OE_MSG_PUB.Add;
6503:
6504: OE_GLOBALS.G_LOCK_TEST := 'N';
6505:
6506: WHEN OTHERS THEN
6509: oe_debug_pub.add('others in blanket lock_blanket', 1);
6510: end if;
6511: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6512:
6513: OE_MSG_PUB.Add_Exc_Msg
6514: ( G_PKG_NAME
6515: , 'Lock_Blanket'
6516: );
6517: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6686:
6687: EXCEPTION
6688: WHEN OTHERS THEN
6689: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6690: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6691: THEN
6692: OE_MSG_PUB.Add_Exc_Msg
6693: ( G_PKG_NAME
6694: , 'Default_Attributes - Header'
6688: WHEN OTHERS THEN
6689: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6690: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6691: THEN
6692: OE_MSG_PUB.Add_Exc_Msg
6693: ( G_PKG_NAME
6694: , 'Default_Attributes - Header'
6695: );
6696: END IF;
6904: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6905: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6906: WHEN OTHERS THEN
6907: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6908: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6909: THEN
6910: OE_MSG_PUB.Add_Exc_Msg
6911: ( G_PKG_NAME
6912: , 'Default_Attributes - Line'
6906: WHEN OTHERS THEN
6907: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6908: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6909: THEN
6910: OE_MSG_PUB.Add_Exc_Msg
6911: ( G_PKG_NAME
6912: , 'Default_Attributes - Line'
6913: );
6914: END IF;
6937: EXCEPTION
6938: WHEN OTHERS THEN
6939: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6940:
6941: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6942: THEN
6943: OE_MSG_PUB.Add_Exc_Msg
6944: ( G_PKG_NAME
6945: , 'Load Header'
6939: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6940:
6941: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6942: THEN
6943: OE_MSG_PUB.Add_Exc_Msg
6944: ( G_PKG_NAME
6945: , 'Load Header'
6946: );
6947: END IF;
7019:
7020: IF x_result <> FND_SEQNUM.SEQSUCC THEN
7021: IF x_result = FND_SEQNUM.NOTUSED THEN
7022: fnd_message.set_name('ONT','OE_MISS_DOC_SEQ');
7023: OE_MSG_PUB.Add;
7024: RAISE FND_API.G_EXC_ERROR;
7025: END IF;
7026:
7027: END IF;
7057: WHERE lookup_type = 'SEQUENCE_METHOD'
7058: AND lookup_code = t;
7059: fnd_message.set_name('ONT','OE_BLKT_INVALID_DOC_SEQ');
7060: fnd_message.set_token('Document Sequence', l_column_name);
7061: OE_MSG_PUB.Add;
7062:
7063: RAISE FND_API.G_EXC_ERROR;
7064: -- x_doc_sequence_value := p_x_header_rec.order_number;
7065: -- NULL;
7071: WHERE order_number = X_doc_sequence_value;
7072:
7073: IF lcount > 0 THEN
7074: fnd_message.set_name('ONT','OE_BLKT_NUM_EXISTS');
7075: OE_MSG_PUB.Add;
7076: RAISE FND_API.G_EXC_ERROR;
7077: END IF;
7078: END IF; -- Blanket category code not null
7079:
7096: end if;
7097:
7098: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7099:
7100: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
7101: THEN
7102: OE_MSG_PUB.Add_Exc_Msg
7103: ( G_PKG_NAME ,
7104: 'Get_Order_Number'
7098: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7099:
7100: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
7101: THEN
7102: OE_MSG_PUB.Add_Exc_Msg
7103: ( G_PKG_NAME ,
7104: 'Get_Order_Number'
7105: );
7106: END IF;
7276: WHEN OTHERS THEN
7277: OE_Delayed_Requests_PVT.Clear_Request(lx_return_status); --bug 4691643
7278: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7279:
7280: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
7281: THEN
7282: OE_MSG_PUB.Add_Exc_Msg
7283: ( G_PKG_NAME
7284: ,'Process Object'
7278: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7279:
7280: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
7281: THEN
7282: OE_MSG_PUB.Add_Exc_Msg
7283: ( G_PKG_NAME
7284: ,'Process Object'
7285: );
7286: END IF;
7322:
7323: END IF;
7324: IF l_valid = 'N' THEN
7325: FND_MESSAGE.SET_NAME('ONT','OE_BLKT_LINE_NUMBER_EXISTS');
7326: OE_MSG_PUB.ADD;
7327: RAISE FND_API.G_EXC_ERROR;
7328: END IF;
7329:
7330: EXCEPTION
7342: oe_debug_pub.ADD('Validate line Number-exception ', 1);
7343: end if;
7344:
7345: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7346: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
7347: THEN
7348: OE_MSG_PUB.Add_Exc_Msg
7349: ( G_PKG_NAME ,
7350: 'Validate Line NUmber'
7344:
7345: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7346: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
7347: THEN
7348: OE_MSG_PUB.Add_Exc_Msg
7349: ( G_PKG_NAME ,
7350: 'Validate Line NUmber'
7351: );
7352: END IF;
7458:
7459: if (lcount > 0) then
7460: -- ERROR: date overlap problem. Show error and
7461: FND_MESSAGE.SET_NAME('ONT','OE_BLKT_UNIQUE_ITEM_VIOLATION');
7462: OE_MSG_PUB.ADD;
7463: RAISE FND_API.G_EXC_ERROR;
7464: end if;
7465:
7466: EXCEPTION
7474: if l_debug_level > 0 then
7475: oe_debug_pub.ADD('Validate item uniqueness-exception ', 1);
7476: end if;
7477: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7478: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
7479: THEN
7480: OE_MSG_PUB.Add_Exc_Msg
7481: ( G_PKG_NAME ,
7482: 'Validate item uniqueness'
7476: end if;
7477: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7478: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
7479: THEN
7480: OE_MSG_PUB.Add_Exc_Msg
7481: ( G_PKG_NAME ,
7482: 'Validate item uniqueness'
7483: );
7484: END IF;
7596: end if;
7597:
7598: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7599:
7600: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
7601: THEN
7602: OE_MSG_PUB.Add_Exc_Msg
7603: ( G_PKG_NAME ,
7604: 'Record Blanket History'
7598: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7599:
7600: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
7601: THEN
7602: OE_MSG_PUB.Add_Exc_Msg
7603: ( G_PKG_NAME ,
7604: 'Record Blanket History'
7605: );
7606: END IF;
7632: if l_debug_level > 0 then
7633: oe_debug_pub.ADD('Entering Copy_blanket ', 1);
7634: end if;
7635:
7636: OE_MSG_PUB.initialize;
7637:
7638: SAVEPOINT Copy_Blanket;
7639:
7640: OE_MSG_PUB.set_msg_context(
7636: OE_MSG_PUB.initialize;
7637:
7638: SAVEPOINT Copy_Blanket;
7639:
7640: OE_MSG_PUB.set_msg_context(
7641: p_entity_code => 'BLANKET_HEADER'
7642: ,p_entity_id => p_header_id
7643: ,p_header_id => p_header_id
7644: ,p_line_id => null
7772: );
7773:
7774: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
7775: fnd_message.set_name('ONT','OE_CPY_COPY_FAILED');
7776: OE_MSG_PUB.Add;
7777: ROLLBACK TO SAVEPOINT Copy_Blanket;
7778: RAISE FND_API.G_EXC_ERROR;
7779: END IF;
7780:
7796: END IF;
7797:
7798: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
7799: fnd_message.set_name('ONT','OE_CPY_COPY_FAILED');
7800: OE_MSG_PUB.Add;
7801: ROLLBACK TO SAVEPOINT Copy_Blanket;
7802: RAISE FND_API.G_EXC_ERROR;
7803: ELSE
7804: fnd_message.set_name('ONT','OE_BL_COPY_SUCCESS');
7804: fnd_message.set_name('ONT','OE_BL_COPY_SUCCESS');
7805: -- Bug 3337297
7806: -- Set blanket number token
7807: fnd_message.set_token('BLANKET_NUMBER',x_header_rec.order_number);
7808: OE_MSG_PUB.Add;
7809: x_header_id := x_header_rec.header_id;
7810: END IF;
7811:
7812:
7811:
7812:
7813: -- Get message count and data
7814:
7815: OE_MSG_PUB.Count_And_Get
7816: ( p_count => x_msg_count
7817: , p_data => x_msg_data
7818: );
7819:
7820: EXCEPTION
7821: WHEN FND_API.G_EXC_ERROR THEN
7822: x_return_status := FND_API.G_RET_STS_ERROR;
7823:
7824: OE_MSG_PUB.Count_And_Get
7825: ( p_count => x_msg_count
7826: , p_data => x_msg_data
7827: );
7828:
7832: end if;
7833:
7834: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7835:
7836: OE_MSG_PUB.Count_And_Get
7837: ( p_count => x_msg_count
7838: , p_data => x_msg_data
7839: );
7840:
7837: ( p_count => x_msg_count
7838: , p_data => x_msg_data
7839: );
7840:
7841: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
7842: THEN
7843: OE_MSG_PUB.Add_Exc_Msg
7844: ( G_PKG_NAME ,
7845: 'Copy Blanket'
7839: );
7840:
7841: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
7842: THEN
7843: OE_MSG_PUB.Add_Exc_Msg
7844: ( G_PKG_NAME ,
7845: 'Copy Blanket'
7846: );
7847: END IF;
7870: end if;
7871: FND_MESSAGE.SET_NAME('ONT','OE_BLKT_INVALID_MIN_MAX_RANGE');
7872: FND_MESSAGE.SET_TOKEN('MIN', p_min_value);
7873: FND_MESSAGE.SET_TOKEN('MAX', p_max_value);
7874: OE_MSG_PUB.ADD;
7875: x_return_status := FND_API.G_RET_STS_ERROR;
7876: END IF;
7877:
7878: EXCEPTION
7881: if l_debug_level > 0 then
7882: oe_debug_pub.ADD('Validate min max range - U exeception ', 1);
7883: end if;
7884:
7885: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
7886: THEN
7887: OE_MSG_PUB.Add_Exc_Msg
7888: ( G_PKG_NAME ,
7889: 'Validate min max range'
7883: end if;
7884:
7885: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
7886: THEN
7887: OE_MSG_PUB.Add_Exc_Msg
7888: ( G_PKG_NAME ,
7889: 'Validate min max range'
7890: );
7891: END IF;
8696:
8697: EXCEPTION
8698:
8699: WHEN OTHERS THEN
8700: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
8701: THEN
8702: OE_MSG_PUB.Add_Exc_Msg
8703: ( G_PKG_NAME
8704: , 'G_MISS_OE_AK_HEADER_REC'
8698:
8699: WHEN OTHERS THEN
8700: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
8701: THEN
8702: OE_MSG_PUB.Add_Exc_Msg
8703: ( G_PKG_NAME
8704: , 'G_MISS_OE_AK_HEADER_REC'
8705: );
8706: END IF;
8812:
8813: EXCEPTION
8814:
8815: WHEN OTHERS THEN
8816: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
8817: THEN
8818: OE_MSG_PUB.Add_Exc_Msg
8819: ( G_PKG_NAME
8820: , 'API_Rec_To_RowType_Rec'
8814:
8815: WHEN OTHERS THEN
8816: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
8817: THEN
8818: OE_MSG_PUB.Add_Exc_Msg
8819: ( G_PKG_NAME
8820: , 'API_Rec_To_RowType_Rec'
8821: );
8822: END IF;
8920:
8921: EXCEPTION
8922:
8923: WHEN OTHERS THEN
8924: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
8925: THEN
8926: OE_MSG_PUB.Add_Exc_Msg
8927: ( G_PKG_NAME
8928: , 'Rowtype_Rec_To_API_Rec'
8922:
8923: WHEN OTHERS THEN
8924: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
8925: THEN
8926: OE_MSG_PUB.Add_Exc_Msg
8927: ( G_PKG_NAME
8928: , 'Rowtype_Rec_To_API_Rec'
8929: );
8930: END IF;
8995:
8996: EXCEPTION
8997:
8998: WHEN OTHERS THEN
8999: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
9000: THEN
9001: OE_MSG_PUB.Add_Exc_Msg
9002: ( G_PKG_NAME
9003: , 'G_MISS_OE_AK_LINE_REC'
8997:
8998: WHEN OTHERS THEN
8999: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
9000: THEN
9001: OE_MSG_PUB.Add_Exc_Msg
9002: ( G_PKG_NAME
9003: , 'G_MISS_OE_AK_LINE_REC'
9004: );
9005: END IF;
9092:
9093: EXCEPTION
9094:
9095: WHEN OTHERS THEN
9096: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
9097: THEN
9098: OE_MSG_PUB.Add_Exc_Msg
9099: ( G_PKG_NAME
9100: , 'API_Rec_To_RowType_Rec'
9094:
9095: WHEN OTHERS THEN
9096: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
9097: THEN
9098: OE_MSG_PUB.Add_Exc_Msg
9099: ( G_PKG_NAME
9100: , 'API_Rec_To_RowType_Rec'
9101: );
9102: END IF;
9189:
9190: EXCEPTION
9191:
9192: WHEN OTHERS THEN
9193: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
9194: THEN
9195: OE_MSG_PUB.Add_Exc_Msg
9196: ( G_PKG_NAME
9197: , 'Rowtype_Rec_To_API_Rec'
9191:
9192: WHEN OTHERS THEN
9193: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
9194: THEN
9195: OE_MSG_PUB.Add_Exc_Msg
9196: ( G_PKG_NAME
9197: , 'Rowtype_Rec_To_API_Rec'
9198: );
9199: END IF;
9272: NULL;
9273: ELSE
9274: oe_debug_pub.add('Issue error message', 1);
9275: fnd_message.set_name('ONT','OE_INVALIDATES_CUSTOMER_ITEM');
9276: OE_MSG_PUB.Add;
9277: x_return_status := FND_API.G_RET_STS_ERROR;
9278: END IF;
9279: END Get_Inventory_Item;
9280:
9301: oe_blanket_lines_all where header_id = p_header_id;
9302: mc1x c1%ROWTYPE;
9303:
9304: BEGIN
9305: OE_MSG_PUB.initialize;
9306: x_return_status := FND_API.G_RET_STS_SUCCESS;
9307: IF l_debug_level > 0 THEN
9308: oe_debug_pub.add('ENTERING OE_Blanket_util.validate_sold_to:');
9309: oe_debug_pub.add('DB Line ID : '|| TO_CHAR (mc1x.line_id) ,1);
9338: x_return_status := FND_API.G_RET_STS_ERROR;
9339: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
9340: FND_MESSAGE.SET_TOKEN('ATTRIBUTE'
9341: , OE_Order_Util.Get_Attribute_Name('ship_to_org_id'));
9342: OE_MSG_PUB.Add;
9343: WHEN OTHERS THEN
9344: if l_debug_level > 0 then
9345: oe_debug_pub.add ('OE_blanket_util.validate_sold_to WOE Blanket In Ship No data found',2);
9346: end if;
9345: oe_debug_pub.add ('OE_blanket_util.validate_sold_to WOE Blanket In Ship No data found',2);
9346: end if;
9347: l_dummy := 'INVALID';
9348: x_return_status := FND_API.G_RET_STS_ERROR;
9349: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
9350: OE_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME , 'Record - Ship To');
9351: END IF;
9352: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9353: END ;
9346: end if;
9347: l_dummy := 'INVALID';
9348: x_return_status := FND_API.G_RET_STS_ERROR;
9349: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
9350: OE_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME , 'Record - Ship To');
9351: END IF;
9352: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9353: END ;
9354: end if;
9371: x_return_status := FND_API.G_RET_STS_ERROR;
9372: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
9373: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
9374: OE_Order_Util.Get_Attribute_Name('deliver_to_org_id'));
9375: OE_MSG_PUB.Add;
9376: WHEN OTHERS THEN
9377: if l_debug_level > 0 then
9378: oe_debug_pub.add ('OE_blanket_util.validate_sold_to WOE Blanket In Deliver No data found',2);
9379: end if;
9378: oe_debug_pub.add ('OE_blanket_util.validate_sold_to WOE Blanket In Deliver No data found',2);
9379: end if;
9380: l_dummy := 'INVALID';
9381: x_return_status := FND_API.G_RET_STS_ERROR;
9382: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
9383: OE_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME , 'Record - Deliver To');
9384: END IF;
9385: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9386: END;
9379: end if;
9380: l_dummy := 'INVALID';
9381: x_return_status := FND_API.G_RET_STS_ERROR;
9382: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
9383: OE_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME , 'Record - Deliver To');
9384: END IF;
9385: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9386: END;
9387: end if;
9401: x_return_status := FND_API.G_RET_STS_ERROR;
9402: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
9403: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
9404: OE_Order_Util.Get_Attribute_Name('invoice_to_org_id'));
9405: OE_MSG_PUB.Add;
9406: WHEN OTHERS THEN
9407: if l_debug_level > 0 then
9408: oe_debug_pub.add ('OE_blanket_util.validate_sold_to WOE Blanket In Invoice No data found',2);
9409: end if;
9408: oe_debug_pub.add ('OE_blanket_util.validate_sold_to WOE Blanket In Invoice No data found',2);
9409: end if;
9410: l_dummy := 'INVALID';
9411: x_return_status := FND_API.G_RET_STS_ERROR;
9412: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
9413: OE_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME , 'Record - Invoice To');
9414: END IF;
9415: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9416: END;
9409: end if;
9410: l_dummy := 'INVALID';
9411: x_return_status := FND_API.G_RET_STS_ERROR;
9412: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
9413: OE_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME , 'Record - Invoice To');
9414: END IF;
9415: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9416: END;
9417: end if;
9460: then
9461: oe_debug_pub.add('End Date :'||trunc(l_header_rec.end_date_active),1);
9462: oe_debug_pub.add('Sysdate :'||trunc(sysdate),1);
9463:
9464: OE_MSG_PUB.set_msg_context(
9465: p_entity_code => 'BLANKET_HEADER'
9466: ,p_entity_id => l_header_rec.header_id
9467: ,p_header_id => l_header_rec.header_id
9468: ,p_line_id => null
9476:
9477: if (trunc(l_header_rec.end_date_active) < trunc(sysdate))
9478: then
9479: FND_MESSAGE.SET_NAME('ONT','OE_BLKT_INVALID_DATE_RANGE');
9480: OE_MSG_PUB.ADD;
9481: x_return_status := FND_API.G_RET_STS_ERROR;
9482: end if;
9483:
9484:
9486: oe_debug_pub.add('validating Lines ',1);
9487: WHILE K IS NOT NULL
9488: LOOP
9489:
9490: OE_MSG_PUB.set_msg_context(
9491: p_entity_code => 'BLANKET_LINE'
9492: ,p_entity_id => l_line_tbl(K).line_id
9493: ,p_header_id => l_line_tbl(K).header_id
9494: ,p_line_id => l_line_tbl(K).line_id
9507: if (l_line_tbl(K).end_date_active is not NULL and
9508: (l_line_tbl(K).start_date_active)
9509: > (l_line_tbl(K).end_date_active)) THEN
9510: FND_MESSAGE.SET_NAME('ONT','OE_BLKT_INVALID_DATE_RANGE');
9511: OE_MSG_PUB.ADD;
9512: x_return_status := FND_API.G_RET_STS_ERROR;
9513: end if;
9514:
9515: if( trunc(l_line_tbl(K).end_date_active) < trunc(sysdate))
9514:
9515: if( trunc(l_line_tbl(K).end_date_active) < trunc(sysdate))
9516: then
9517: FND_MESSAGE.SET_NAME('ONT','OE_BLKT_INVALID_DATE_RANGE');
9518: OE_MSG_PUB.ADD;
9519: x_return_status := FND_API.G_RET_STS_ERROR;
9520: end if;
9521:
9522: K:= l_line_tbl.next(K);
9521:
9522: K:= l_line_tbl.next(K);
9523: END LOOP;
9524:
9525: OE_MSG_PUB.Count_And_Get
9526: ( p_count => x_msg_count
9527: , p_data => x_msg_data
9528: );
9529: