[Home] [Help]
56: )
57: RETURN varchar2
58: IS
59: l_authorized_or_not varchar2(1) := 'Y';
60: l_return_status Varchar2(1) := FND_API.G_RET_STS_SUCCESS;
61: BEGIN
62:
63: x_return_status := l_return_status;
64: x_msg_count := 0;
564: wf_engine.CompleteActivity('OEOL', c_rec.item_key, c_rec.full_activity_name, l_result);
565: END LOOP;
566:
567: wf_engine.threshold := l_rel_threshold;
568: x_return_status := FND_API.G_RET_STS_SUCCESS;
569: Oe_msg_pub.Count_And_Get
570: ( p_count => x_msg_count
571: ,p_data => x_msg_data
572: );
724:
725: END LOOP;
726:
727: wf_engine.threshold := l_rel_threshold;
728: x_return_status := FND_API.G_RET_STS_SUCCESS;
729: Oe_msg_pub.Count_And_Get
730: ( p_count => x_msg_count
731: ,p_data => x_msg_data
732: );
734: EXCEPTION
735: WHEN OTHERS THEN
736: Oe_debug_pub.ADD('Failed from progress order.');
737: wf_engine.threshold := l_rel_threshold;
738: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
739: Oe_msg_pub.Count_And_Get
740: ( p_count => x_msg_count
741: ,p_data => x_msg_data
742: );
935:
936: END LOOP;
937:
938: wf_engine.threshold := l_rel_threshold;
939: x_return_status := FND_API.G_RET_STS_SUCCESS;
940: Oe_msg_pub.Count_And_Get
941: ( p_count => x_msg_count
942: ,p_data => x_msg_data
943: );
945: EXCEPTION
946: WHEN OTHERS THEN
947: OE_debug_pub.ADD('Failed from progress order');
948: wf_engine.threshold := l_rel_threshold;
949: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
950: Oe_msg_pub.Count_And_Get
951: ( p_count => x_msg_count
952: ,p_data => x_msg_data
953: );
1238: FND_MESSAGE.SET_NAME('ONT', 'OE_NO_HOLD_ALL_LINES');
1239: FND_MESSAGE.SET_TOKEN('WF_ACT', l_user_activity_name);
1240: OE_MSG_PUB.ADD;
1241: OE_DEBUG_PUB.ADD(' Hold Not applied for All requested records');
1242: RAISE FND_API.G_EXC_ERROR;
1243:
1244: ELSIF l_sql_rowcount > 0 THEN
1245:
1246: l_wf_sqlmt := 'SELECT count(*)
1538: FND_MESSAGE.SET_NAME('ONT', 'OE_NO_HOLD_ALL_LINES');
1539: FND_MESSAGE.SET_TOKEN('WF_ACT',l_user_activity_name);
1540: OE_MSG_PUB.ADD;
1541: OE_DEBUG_PUB.ADD(' Hold Not applied for All requested records');
1542: RAISE FND_API.G_EXC_ERROR;
1543:
1544: ELSIF l_sql_rowcount > 0 THEN
1545: l_wf_sqlmt := 'SELECT count(*)
1546: FROM OE_ORDER_HEADERS_ALL h, OE_ORDER_LINES_ALL ol
1922:
1923: l_hold_source_rec OE_HOLDS_PVT.hold_source_rec_type;
1924: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1925: BEGIN
1926: x_return_status := FND_API.G_RET_STS_SUCCESS;
1927: l_user_id := OE_HOLDS_PVT.get_user_id;
1928: -- XX Also check for release reason code
1929: OPEN hold_source;
1930: LOOP
2161:
2162: BEGIN
2163: OE_Debug_PUB.Add('In OE_holds_PUB.Validate_Hold_source',1);
2164: -- Initialize API return status to success
2165: x_return_status := FND_API.G_RET_STS_SUCCESS;
2166:
2167: --XXX Check the Entity Combination
2168: /*
2169: > Item - Customer
2200: p_hold_source_rec.hold_entity_code2 IS NOT NULL THEN
2201: oe_debug_pub.add('Error: Order WF Hold, being applied at Line Level');
2202: FND_MESSAGE.SET_NAME('ONT','OE_ORDER_HOLD_INVALID_CRITERIA');
2203: OE_MSG_PUB.ADD;
2204: RAISE FND_API.G_EXC_ERROR;
2205: END IF;
2206: ELSIF l_item_type = 'OEOL' THEN
2207: IF p_hold_source_rec.hold_entity_code IN ('C','O') AND
2208: p_hold_source_rec.line_id IS NULL AND
2209: l_apply_to_flag = 'N' THEN
2210: oe_debug_pub.add('Error: Line WF Hold, being applied at Order Level');
2211: FND_MESSAGE.SET_NAME('ONT','OE_LINE_HOLD_INVALID_CRITERIA');
2212: OE_MSG_PUB.ADD;
2213: RAISE FND_API.G_EXC_ERROR;
2214: END IF;
2215: END IF;
2216: ER#7479609*/
2217:
2239: ELSIF l_item_type = 'OEOL' AND l_apply_to_flag = 'N' THEN
2240: oe_debug_pub.add('Error: Line WF Hold, being applied at Order Level');
2241: FND_MESSAGE.SET_NAME('ONT','OE_LINE_HOLD_INVALID_CRITERIA');
2242: OE_MSG_PUB.ADD;
2243: RAISE FND_API.G_EXC_ERROR;
2244: END IF;
2245: ELSE
2246: IF (p_hold_source_rec.hold_entity_code = 'P' and p_hold_source_rec.hold_entity_code2 IS NULL) THEN
2247: NULL;
2252: ELSIF l_item_type = 'OEOH' THEN
2253: oe_debug_pub.add('Error: Order WF Hold, being applied at Line Level');
2254: FND_MESSAGE.SET_NAME('ONT','OE_ORDER_HOLD_INVALID_CRITERIA');
2255: OE_MSG_PUB.ADD;
2256: RAISE FND_API.G_EXC_ERROR;
2257: END IF;
2258: END IF;
2259: END IF;
2260: --ER#7479609 end
2269: if p_hold_source_rec.hold_entity_code2 not in ('C', 'S', 'B', 'W','H','SM','D','PL','PR','ST','LT','CN','EC','EN') then --ER#7479609 --ER#11824468, added 'CN' --ER#12571983 added ,'EC','EN'
2270: OE_Debug_PUB.Add('Invalid Entity Combination',1);
2271: FND_MESSAGE.SET_NAME('ONT', 'OE_INVALID_ENTITY_CONBINATION');
2272: OE_MSG_PUB.ADD;
2273: RAISE FND_API.G_EXC_ERROR;
2274: end if;
2275: --ER# 13331078 start
2276: elsif p_hold_source_rec.hold_entity_code = 'IC' then
2277: if p_hold_source_rec.hold_entity_code2 not in ('C', 'S', 'B', 'W','H','SM','D','PL','PR','ST','LT','CN','EC','EN') then --ER#11824468, added 'CN' --ER#12571983 added ,'EC','EN'
2277: if p_hold_source_rec.hold_entity_code2 not in ('C', 'S', 'B', 'W','H','SM','D','PL','PR','ST','LT','CN','EC','EN') then --ER#11824468, added 'CN' --ER#12571983 added ,'EC','EN'
2278: OE_Debug_PUB.Add('Invalid Entity Combination',1);
2279: FND_MESSAGE.SET_NAME('ONT', 'OE_INVALID_ENTITY_CONBINATION');
2280: OE_MSG_PUB.ADD;
2281: RAISE FND_API.G_EXC_ERROR;
2282: end if;
2283: --ER# 13331078 end
2284: elsif p_hold_source_rec.hold_entity_code = 'W' then
2285: --ER#7479609 if p_hold_source_rec.hold_entity_code2 not in ('C', 'S', 'B') then
2286: if p_hold_source_rec.hold_entity_code2 not in ('C', 'S', 'B','LT','SM','D','ST','CN','EC','EN') then --ER#7479609 --ER#11824468, added 'CN' --ER#12571983 added ,'EC','EN'
2287: OE_Debug_PUB.Add('Invalid Entity Combination',1);
2288: FND_MESSAGE.SET_NAME('ONT', 'OE_INVALID_ENTITY_CONBINATION');
2289: OE_MSG_PUB.ADD;
2290: RAISE FND_API.G_EXC_ERROR;
2291: end if;
2292: elsif p_hold_source_rec.hold_entity_code = 'B' then
2293: if p_hold_source_rec.hold_entity_code2 not in ('O') then
2294: OE_Debug_PUB.Add('Invalid Entity Combination',1);
2293: if p_hold_source_rec.hold_entity_code2 not in ('O') then
2294: OE_Debug_PUB.Add('Invalid Entity Combination',1);
2295: FND_MESSAGE.SET_NAME('ONT', 'OE_INVALID_ENTITY_CONBINATION');
2296: OE_MSG_PUB.ADD;
2297: RAISE FND_API.G_EXC_ERROR;
2298: end if;
2299: elsif p_hold_source_rec.hold_entity_code = 'H' then
2300: --ER#7479609 if p_hold_source_rec.hold_entity_code2 not in ('S', 'B', 'W', 'L') then
2301: if p_hold_source_rec.hold_entity_code2 not in ('S', 'B', 'W', 'L','PL','PT','SM','D','LT') then --ER#7479609
2301: if p_hold_source_rec.hold_entity_code2 not in ('S', 'B', 'W', 'L','PL','PT','SM','D','LT') then --ER#7479609
2302: OE_Debug_PUB.Add('Invalid Entity Combination',1);
2303: FND_MESSAGE.SET_NAME('ONT', 'OE_INVALID_ENTITY_CONBINATION');
2304: OE_MSG_PUB.ADD;
2305: RAISE FND_API.G_EXC_ERROR;
2306: end if;
2307: --ER#7479609 start
2308: elsif p_hold_source_rec.hold_entity_code = 'TM' then
2309: if p_hold_source_rec.hold_entity_code2 not in ('OI') then
2309: if p_hold_source_rec.hold_entity_code2 not in ('OI') then
2310: OE_Debug_PUB.Add('Invalid Entity Combination',1);
2311: FND_MESSAGE.SET_NAME('ONT', 'OE_INVALID_ENTITY_CONBINATION');
2312: OE_MSG_PUB.ADD;
2313: RAISE FND_API.G_EXC_ERROR;
2314: end if;
2315: elsif p_hold_source_rec.hold_entity_code = 'PR' then
2316: if p_hold_source_rec.hold_entity_code2 not in ('T') then
2317: OE_Debug_PUB.Add('Invalid Entity Combination',1);
2316: if p_hold_source_rec.hold_entity_code2 not in ('T') then
2317: OE_Debug_PUB.Add('Invalid Entity Combination',1);
2318: FND_MESSAGE.SET_NAME('ONT', 'OE_INVALID_ENTITY_CONBINATION');
2319: OE_MSG_PUB.ADD;
2320: RAISE FND_API.G_EXC_ERROR;
2321: end if;
2322: elsif p_hold_source_rec.hold_entity_code = 'C' then
2323: if p_hold_source_rec.hold_entity_code2 not in ('ST','B','S','D','PL','LT','PT','OT','P','TC','SC') then
2324: OE_Debug_PUB.Add('Invalid Entity Combination',1);
2323: if p_hold_source_rec.hold_entity_code2 not in ('ST','B','S','D','PL','LT','PT','OT','P','TC','SC') then
2324: OE_Debug_PUB.Add('Invalid Entity Combination',1);
2325: FND_MESSAGE.SET_NAME('ONT', 'OE_INVALID_ENTITY_CONBINATION');
2326: OE_MSG_PUB.ADD;
2327: RAISE FND_API.G_EXC_ERROR;
2328: end if;
2329: --ER# 11824468 start
2330: elsif p_hold_source_rec.hold_entity_code = 'CN' then
2331: if p_hold_source_rec.hold_entity_code2 not in ('ST','B','S','D','PL','LT','PT','OT','P','TC','SC') then
2331: if p_hold_source_rec.hold_entity_code2 not in ('ST','B','S','D','PL','LT','PT','OT','P','TC','SC') then
2332: OE_Debug_PUB.Add('Invalid Entity Combination',1);
2333: FND_MESSAGE.SET_NAME('ONT', 'OE_INVALID_ENTITY_CONBINATION');
2334: OE_MSG_PUB.ADD;
2335: RAISE FND_API.G_EXC_ERROR;
2336: end if;
2337: --ER# 11824468 end
2338: --ER#12571983 start
2339: elsif p_hold_source_rec.hold_entity_code IN('EC','EN') then
2340: if p_hold_source_rec.hold_entity_code2 not in ('ST','B','S','D','PL','LT','PT','OT','P','TC','SC','EL') then
2341: OE_Debug_PUB.Add('Invalid Entity Combination',1);
2342: FND_MESSAGE.SET_NAME('ONT', 'OE_INVALID_ENTITY_CONBINATION');
2343: OE_MSG_PUB.ADD;
2344: RAISE FND_API.G_EXC_ERROR;
2345: end if;
2346: --ER#12571983 end
2347: elsif p_hold_source_rec.hold_entity_code = 'PL' then
2348: if p_hold_source_rec.hold_entity_code2 not in ('TC') then
2348: if p_hold_source_rec.hold_entity_code2 not in ('TC') then
2349: OE_Debug_PUB.Add('Invalid Entity Combination',1);
2350: FND_MESSAGE.SET_NAME('ONT', 'OE_INVALID_ENTITY_CONBINATION');
2351: OE_MSG_PUB.ADD;
2352: RAISE FND_API.G_EXC_ERROR;
2353: end if;
2354: elsif p_hold_source_rec.hold_entity_code = 'OT' then
2355: if p_hold_source_rec.hold_entity_code2 not in ('LT','TC') then
2356: OE_Debug_PUB.Add('Invalid Entity Combination',1);
2355: if p_hold_source_rec.hold_entity_code2 not in ('LT','TC') then
2356: OE_Debug_PUB.Add('Invalid Entity Combination',1);
2357: FND_MESSAGE.SET_NAME('ONT', 'OE_INVALID_ENTITY_CONBINATION');
2358: OE_MSG_PUB.ADD;
2359: RAISE FND_API.G_EXC_ERROR;
2360: end if;
2361: elsif p_hold_source_rec.hold_entity_code = 'CD' then
2362: if p_hold_source_rec.hold_entity_code2 not in ('CB') then
2363: OE_Debug_PUB.Add('Invalid Entity Combination',1);
2362: if p_hold_source_rec.hold_entity_code2 not in ('CB') then
2363: OE_Debug_PUB.Add('Invalid Entity Combination',1);
2364: FND_MESSAGE.SET_NAME('ONT', 'OE_INVALID_ENTITY_CONBINATION');
2365: OE_MSG_PUB.ADD;
2366: RAISE FND_API.G_EXC_ERROR;
2367: end if;
2368: --ER#7479609 end
2369: else
2370: null;
2507: ELSE
2508: OE_Debug_PUB.Add('Invalid Entity Code');
2509: FND_MESSAGE.SET_NAME('ONT', 'OE_MISSING_ENTITY_CODE');
2510: OE_MSG_PUB.ADD;
2511: RAISE FND_API.G_EXC_ERROR;
2512: END IF;
2513:
2514: /*********************************
2515: ** Check the Second Entity **
2668: ELSE
2669: OE_Debug_PUB.Add('Invalid Second Entity Code');
2670: FND_MESSAGE.SET_NAME('ONT', 'OE_MISSING_ENTITY_CODE');
2671: OE_MSG_PUB.ADD;
2672: RAISE FND_API.G_EXC_ERROR;
2673: END IF;
2674: END IF;
2675: ------------------------------
2676:
2681: /* XXX Error message here */
2682: OE_Debug_PUB.Add('Hold Entity ID not found for entity',1);
2683: FND_MESSAGE.SET_NAME('ONT', 'OE_MISSING_ENTITY_ID');
2684: OE_MSG_PUB.ADD;
2685: RAISE FND_API.G_EXC_ERROR;
2686: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2687: WHEN FND_API.G_EXC_ERROR THEN
2688: /*
2689: ** This message is not required.
2682: OE_Debug_PUB.Add('Hold Entity ID not found for entity',1);
2683: FND_MESSAGE.SET_NAME('ONT', 'OE_MISSING_ENTITY_ID');
2684: OE_MSG_PUB.ADD;
2685: RAISE FND_API.G_EXC_ERROR;
2686: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2687: WHEN FND_API.G_EXC_ERROR THEN
2688: /*
2689: ** This message is not required.
2690: FND_MESSAGE.SET_NAME('ONT', 'OE_ENTITY_NOT_ON_ORDER_OR_LINE');
2683: FND_MESSAGE.SET_NAME('ONT', 'OE_MISSING_ENTITY_ID');
2684: OE_MSG_PUB.ADD;
2685: RAISE FND_API.G_EXC_ERROR;
2686: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2687: WHEN FND_API.G_EXC_ERROR THEN
2688: /*
2689: ** This message is not required.
2690: FND_MESSAGE.SET_NAME('ONT', 'OE_ENTITY_NOT_ON_ORDER_OR_LINE');
2691: OE_MSG_PUB.ADD;
2690: FND_MESSAGE.SET_NAME('ONT', 'OE_ENTITY_NOT_ON_ORDER_OR_LINE');
2691: OE_MSG_PUB.ADD;
2692: */
2693: OE_Debug_PUB.Add('Expected error in Validate_Hold_source',1);
2694: x_return_status := FND_API.G_RET_STS_ERROR;
2695: WHEN OTHERS THEN
2696: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2697: IF OE_MSG_PUB.Check_Msg_Level
2698: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2692: */
2693: OE_Debug_PUB.Add('Expected error in Validate_Hold_source',1);
2694: x_return_status := FND_API.G_RET_STS_ERROR;
2695: WHEN OTHERS THEN
2696: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2697: IF OE_MSG_PUB.Check_Msg_Level
2698: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2699: THEN
2700: OE_MSG_PUB.Add_Exc_Msg
2714: x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2)
2715: IS
2716: l_dummy VARCHAR2(30) DEFAULT NULL;
2717: BEGIN
2718: x_return_status := FND_API.G_RET_STS_SUCCESS;
2719:
2720:
2721: -- Check for Missing Values
2722: IF p_hold_id IS NULL THEN
2721: -- Check for Missing Values
2722: IF p_hold_id IS NULL THEN
2723: FND_MESSAGE.SET_NAME('ONT', 'OE_MISSING_HOLD_ID');
2724: OE_MSG_PUB.ADD;
2725: RAISE FND_API.G_EXC_ERROR;
2726: END IF;
2727:
2728:
2729: -- Validate Hold ID
2743: OE_Debug_PUB.Add('Invalid Hold ID'||to_char(p_hold_id),1);
2744: FND_MESSAGE.SET_NAME('ONT', 'OE_INVALID_HOLD_ID');
2745: FND_MESSAGE.SET_TOKEN('HOLD_ID',p_hold_id);
2746: OE_MSG_PUB.ADD;
2747: x_return_status := FND_API.G_RET_STS_ERROR;
2748:
2749: END; -- Validate Hold ID
2750:
2751: END Validate_Hold;
2767: l_count NUMBER;
2768: --l_hold_source_id OE_HOLD_SOURCES_ALL.HOLD_SOURCE_ID%TYPE;
2769: l_hold_source_rec OE_HOLDS_PVT.Hold_Source_Rec_Type;
2770: BEGIN
2771: x_return_status := FND_API.G_RET_STS_SUCCESS;
2772: x_hold_exists := 'N';
2773: l_user_id := OE_HOLDS_PVT.get_user_id;
2774: l_org_id := MO_GLOBAL.get_current_org_id;
2775: IF l_org_id IS NULL THEN
2774: l_org_id := MO_GLOBAL.get_current_org_id;
2775: IF l_org_id IS NULL THEN
2776: -- org_id is null, raise an error.
2777: oe_debug_pub.add('Org_Id is NULL',1);
2778: x_return_status := FND_API.G_RET_STS_ERROR;
2779: FND_MESSAGE.SET_NAME('FND','MO_ORG_REQUIRED');
2780: FND_MSG_PUB.ADD;
2781: RAISE FND_API.G_EXC_ERROR;
2782: END IF;
2777: oe_debug_pub.add('Org_Id is NULL',1);
2778: x_return_status := FND_API.G_RET_STS_ERROR;
2779: FND_MESSAGE.SET_NAME('FND','MO_ORG_REQUIRED');
2780: FND_MSG_PUB.ADD;
2781: RAISE FND_API.G_EXC_ERROR;
2782: END IF;
2783:
2784: if (p_hold_source_rec.hold_entity_code = 'O'
2785: AND p_hold_source_rec.hold_entity_code2 is NULL) then
2811: FND_MESSAGE.SET_NAME('ONT', 'OE_DUPLICATE_HOLD_SOURCE');
2812: OE_MSG_PUB.ADD;
2813: x_hold_exists := 'Y';
2814: RETURN;
2815: --RAISE FND_API.G_EXC_ERROR;
2816: END IF;
2817: /* If Order Level Hold */
2818: ELSE
2819: select count(*)
2842: FND_MESSAGE.SET_NAME('ONT', 'OE_DUPLICATE_HOLD_SOURCE');
2843: OE_MSG_PUB.ADD;
2844: x_hold_exists := 'Y';
2845: RETURN;
2846: --RAISE FND_API.G_EXC_ERROR;
2847: END IF;
2848:
2849: END IF; /*If Order Level Hold */
2850: else
2869: --FND_MESSAGE.SET_NAME('ONT', 'OE_DUPLICATE_HOLD');
2870: FND_MESSAGE.SET_NAME('ONT', 'OE_DUPLICATE_HOLD_SOURCE');
2871: OE_MSG_PUB.ADD;
2872: --RETURN;
2873: RAISE FND_API.G_EXC_ERROR;
2874: END IF;
2875: end if;
2876:
2877:
2963:
2964: --dbms_output.put_line ('Caling Create_Order_Holds');
2965:
2966: EXCEPTION
2967: WHEN FND_API.G_EXC_ERROR THEN
2968: --ROLLBACK TO Create_Hold_Source;
2969: x_return_status := FND_API.G_RET_STS_ERROR;
2970: OE_MSG_PUB.Count_And_Get
2971: ( p_count => x_msg_count
2965:
2966: EXCEPTION
2967: WHEN FND_API.G_EXC_ERROR THEN
2968: --ROLLBACK TO Create_Hold_Source;
2969: x_return_status := FND_API.G_RET_STS_ERROR;
2970: OE_MSG_PUB.Count_And_Get
2971: ( p_count => x_msg_count
2972: , p_data => x_msg_data
2973: );
2970: OE_MSG_PUB.Count_And_Get
2971: ( p_count => x_msg_count
2972: , p_data => x_msg_data
2973: );
2974: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2975: --ROLLBACK TO Create_Hold_Source;
2976: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2977: OE_MSG_PUB.Count_And_Get
2978: ( p_count => x_msg_count
2972: , p_data => x_msg_data
2973: );
2974: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2975: --ROLLBACK TO Create_Hold_Source;
2976: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2977: OE_MSG_PUB.Count_And_Get
2978: ( p_count => x_msg_count
2979: , p_data => x_msg_data
2980: );
2979: , p_data => x_msg_data
2980: );
2981: WHEN OTHERS THEN
2982: --ROLLBACK TO Create_Hold_Source;
2983: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2984: IF OE_MSG_PUB.Check_Msg_Level
2985: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2986: THEN
2987: OE_MSG_PUB.Add_Exc_Msg
3010: --l_hold_source_id OE_HOLD_SOURCES_ALL.HOLD_SOURCE_ID%TYPE;
3011: l_hold_source_rec OE_HOLDS_PVT.Hold_Source_Rec_Type;
3012: l_hold_comment OE_HOLD_SOURCES_ALL.HOLD_COMMENT%TYPE; --ER#7479609
3013: BEGIN
3014: x_return_status := FND_API.G_RET_STS_SUCCESS;
3015: l_user_id := OE_HOLDS_PVT.get_user_id;
3016: l_org_id := MO_GLOBAL.get_current_org_id;
3017: IF l_org_id IS NULL THEN
3018: -- org_id is null, raise an error.
3016: l_org_id := MO_GLOBAL.get_current_org_id;
3017: IF l_org_id IS NULL THEN
3018: -- org_id is null, raise an error.
3019: oe_debug_pub.add('Org_Id is NULL',1);
3020: x_return_status := FND_API.G_RET_STS_ERROR;
3021: FND_MESSAGE.SET_NAME('FND','MO_ORG_REQUIRED');
3022: FND_MSG_PUB.ADD;
3023: RAISE FND_API.G_EXC_ERROR;
3024: END IF;
3019: oe_debug_pub.add('Org_Id is NULL',1);
3020: x_return_status := FND_API.G_RET_STS_ERROR;
3021: FND_MESSAGE.SET_NAME('FND','MO_ORG_REQUIRED');
3022: FND_MSG_PUB.ADD;
3023: RAISE FND_API.G_EXC_ERROR;
3024: END IF;
3025:
3026: if (p_hold_source_rec.hold_entity_code = 'O'
3027: AND p_hold_source_rec.hold_entity_code2 is NULL) then
3051: --FND_MESSAGE.SET_NAME('ONT', 'OE_DUPLICATE_HOLD');
3052: FND_MESSAGE.SET_NAME('ONT', 'OE_DUPLICATE_HOLD_SOURCE');
3053: OE_MSG_PUB.ADD;
3054: --RETURN;
3055: RAISE FND_API.G_EXC_ERROR;
3056: END IF;
3057: /* If Order Level Hold */
3058: ELSE
3059: select count(*)
3080: --FND_MESSAGE.SET_NAME('ONT', 'OE_DUPLICATE_HOLD');
3081: FND_MESSAGE.SET_NAME('ONT', 'OE_DUPLICATE_HOLD_SOURCE');
3082: OE_MSG_PUB.ADD;
3083: --RETURN;
3084: RAISE FND_API.G_EXC_ERROR;
3085: END IF;
3086:
3087: END IF; /*If Order Level Hold */
3088: else
3112: --FND_MESSAGE.SET_NAME('ONT', 'OE_DUPLICATE_HOLD');
3113: FND_MESSAGE.SET_NAME('ONT', 'OE_DUPLICATE_HOLD_SOURCE');
3114: OE_MSG_PUB.ADD;
3115: --RETURN;
3116: RAISE FND_API.G_EXC_ERROR;
3117: END IF;
3118:
3119: end if;
3120:
3238:
3239: --dbms_output.put_line ('Caling Create_Order_Holds');
3240:
3241: EXCEPTION
3242: WHEN FND_API.G_EXC_ERROR THEN
3243: --ROLLBACK TO Create_Hold_Source;
3244: x_return_status := FND_API.G_RET_STS_ERROR;
3245: OE_MSG_PUB.Count_And_Get
3246: ( p_count => x_msg_count
3240:
3241: EXCEPTION
3242: WHEN FND_API.G_EXC_ERROR THEN
3243: --ROLLBACK TO Create_Hold_Source;
3244: x_return_status := FND_API.G_RET_STS_ERROR;
3245: OE_MSG_PUB.Count_And_Get
3246: ( p_count => x_msg_count
3247: , p_data => x_msg_data
3248: );
3245: OE_MSG_PUB.Count_And_Get
3246: ( p_count => x_msg_count
3247: , p_data => x_msg_data
3248: );
3249: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3250: --ROLLBACK TO Create_Hold_Source;
3251: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3252: OE_MSG_PUB.Count_And_Get
3253: ( p_count => x_msg_count
3247: , p_data => x_msg_data
3248: );
3249: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3250: --ROLLBACK TO Create_Hold_Source;
3251: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3252: OE_MSG_PUB.Count_And_Get
3253: ( p_count => x_msg_count
3254: , p_data => x_msg_data
3255: );
3254: , p_data => x_msg_data
3255: );
3256: WHEN OTHERS THEN
3257: --ROLLBACK TO Create_Hold_Source;
3258: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3259: IF OE_MSG_PUB.Check_Msg_Level
3260: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3261: THEN
3262: OE_MSG_PUB.Add_Exc_Msg
3340: l_line_rec OE_Order_PUB.Line_Rec_Type;*/
3341: -- GENESIS --
3342: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3343: BEGIN
3344: x_return_status := FND_API.G_RET_STS_SUCCESS;
3345: l_user_id := OE_HOLDS_PVT.get_user_id;
3346: l_org_id := MO_GLOBAL.get_current_org_id;
3347: IF l_org_id IS NULL THEN
3348: -- org_id is null, raise an error.
3346: l_org_id := MO_GLOBAL.get_current_org_id;
3347: IF l_org_id IS NULL THEN
3348: -- org_id is null, raise an error.
3349: oe_debug_pub.add('Org_Id is NULL',1);
3350: x_return_status := FND_API.G_RET_STS_ERROR;
3351: FND_MESSAGE.SET_NAME('FND','MO_ORG_REQUIRED');
3352: FND_MSG_PUB.ADD;
3353: RAISE FND_API.G_EXC_ERROR;
3354: END IF;
3349: oe_debug_pub.add('Org_Id is NULL',1);
3350: x_return_status := FND_API.G_RET_STS_ERROR;
3351: FND_MESSAGE.SET_NAME('FND','MO_ORG_REQUIRED');
3352: FND_MSG_PUB.ADD;
3353: RAISE FND_API.G_EXC_ERROR;
3354: END IF;
3355:
3356: Begin
3357: select item_type, activity_name
5196: END IF; --p_hold_source_rec.hold_entity_code = 'O'
5197: END IF;*/
5198: -- GENESIS --
5199: EXCEPTION
5200: WHEN FND_API.G_EXC_ERROR THEN
5201: --ROLLBACK TO APPLY_HOLDS_PUB;
5202: x_return_status := FND_API.G_RET_STS_ERROR;
5203: OE_MSG_PUB.Count_And_Get
5204: ( p_count => x_msg_count
5198: -- GENESIS --
5199: EXCEPTION
5200: WHEN FND_API.G_EXC_ERROR THEN
5201: --ROLLBACK TO APPLY_HOLDS_PUB;
5202: x_return_status := FND_API.G_RET_STS_ERROR;
5203: OE_MSG_PUB.Count_And_Get
5204: ( p_count => x_msg_count
5205: , p_data => x_msg_data
5206: );
5203: OE_MSG_PUB.Count_And_Get
5204: ( p_count => x_msg_count
5205: , p_data => x_msg_data
5206: );
5207: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5208: --ROLLBACK TO APPLY_HOLDS_PUB;
5209: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5210: OE_MSG_PUB.Count_And_Get
5211: ( p_count => x_msg_count
5205: , p_data => x_msg_data
5206: );
5207: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5208: --ROLLBACK TO APPLY_HOLDS_PUB;
5209: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5210: OE_MSG_PUB.Count_And_Get
5211: ( p_count => x_msg_count
5212: , p_data => x_msg_data
5213: );
5212: , p_data => x_msg_data
5213: );
5214: WHEN OTHERS THEN
5215: --ROLLBACK TO APPLY_HOLDS_PUB;
5216: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5217: IF OE_MSG_PUB.Check_Msg_Level
5218: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5219: THEN
5220: OE_MSG_PUB.Add_Exc_Msg
5277: l_user_id NUMBER;
5278: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
5279:
5280: BEGIN
5281: x_return_status := FND_API.G_RET_STS_SUCCESS;
5282: l_user_id := OE_HOLDS_PVT.get_user_id;
5283: -- Flag all orders and order line holds for this hold source
5284: -- as released
5285: UPDATE oe_order_holds
5412: BEGIN
5413:
5414: -- Fix For Bug 1903900
5415: SAVEPOINT insert_hold_release;
5416: x_return_status := FND_API.G_RET_STS_SUCCESS;
5417:
5418: l_user_id := OE_HOLDS_PVT.get_user_id;
5419:
5420: -- Validate Reason Code
5434: FND_MESSAGE.SET_NAME('ONT', 'OE_INVALID_REASON_CODE');
5435: FND_MESSAGE.SET_TOKEN('REASON_CODE',
5436: p_hold_release_rec.release_reason_code);
5437: OE_MSG_PUB.ADD;
5438: RAISE FND_API.G_EXC_ERROR;
5439:
5440: END; -- Validate Reason Code
5441:
5442: SELECT OE_HOLD_RELEASES_S.NEXTVAL
5522: -- l_hold_release_rec := p_hold_release_rec;
5523: -- l_hold_release_rec.hold_release_id := x_hold_release_id;
5524:
5525: EXCEPTION
5526: WHEN FND_API.G_EXC_ERROR THEN
5527: x_return_status := FND_API.G_RET_STS_ERROR;
5528: ROLLBACK TO insert_hold_release;
5529: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5530: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5523: -- l_hold_release_rec.hold_release_id := x_hold_release_id;
5524:
5525: EXCEPTION
5526: WHEN FND_API.G_EXC_ERROR THEN
5527: x_return_status := FND_API.G_RET_STS_ERROR;
5528: ROLLBACK TO insert_hold_release;
5529: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5530: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5531: ROLLBACK TO insert_hold_release;
5525: EXCEPTION
5526: WHEN FND_API.G_EXC_ERROR THEN
5527: x_return_status := FND_API.G_RET_STS_ERROR;
5528: ROLLBACK TO insert_hold_release;
5529: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5530: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5531: ROLLBACK TO insert_hold_release;
5532: WHEN OTHERS THEN
5533: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
5526: WHEN FND_API.G_EXC_ERROR THEN
5527: x_return_status := FND_API.G_RET_STS_ERROR;
5528: ROLLBACK TO insert_hold_release;
5529: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5530: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5531: ROLLBACK TO insert_hold_release;
5532: WHEN OTHERS THEN
5533: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
5534: OE_MSG_PUB.Add_Exc_Msg
5534: OE_MSG_PUB.Add_Exc_Msg
5535: (G_PKG_NAME
5536: ,'Insert_Hold_Release');
5537: END IF;
5538: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5539: ROLLBACK TO insert_hold_release;
5540:
5541: END Create_Release_Source;
5542:
5585: nvl(p_hold_source_rec.header_id, oh.header_id)
5586: and nvl(oh.line_id, -99) =
5587: nvl(p_hold_source_rec.line_id, -99));
5588: BEGIN
5589: x_return_status := FND_API.G_RET_STS_SUCCESS;
5590: l_hold_release_rec := p_hold_release_rec;
5591:
5592: -- Retrieving hold source ID if not passed
5593: IF p_hold_source_rec.hold_source_id IS NULL THEN
5609: p_hold_source_rec.hold_entity_code2 || '/' ||
5610: to_char(p_hold_source_rec.hold_entity_id2) ,1);
5611: FND_MESSAGE.SET_NAME('ONT', 'OE_MISSING_HOLD_SOURCE');
5612: OE_MSG_PUB.ADD;
5613: RAISE FND_API.G_EXC_ERROR;
5614: */
5615: CLOSE order_hold_source;
5616: RETURN;
5617: END IF; -- order_hold_source%NOTFOUND
5628: p_hold_source_rec.hold_entity_code2 || '/' ||
5629: to_char(p_hold_source_rec.hold_entity_id2) ,1);
5630: FND_MESSAGE.SET_NAME('ONT', 'OE_MISSING_HOLD_SOURCE');
5631: OE_MSG_PUB.ADD;
5632: RAISE FND_API.G_EXC_ERROR;
5633: END IF; -- hold_source%NOTFOUND
5634: CLOSE hold_source;
5635: END IF; -- p_hold_source_rec.hold_entity_code = 'O'
5636: ELSE
5644: x_return_status => x_return_status,
5645: x_msg_count => x_msg_count,
5646: x_msg_data => x_msg_data);
5647:
5648: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5649: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
5650: RAISE FND_API.G_EXC_ERROR;
5651: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
5652: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5645: x_msg_count => x_msg_count,
5646: x_msg_data => x_msg_data);
5647:
5648: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5649: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
5650: RAISE FND_API.G_EXC_ERROR;
5651: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
5652: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5653: END IF;
5646: x_msg_data => x_msg_data);
5647:
5648: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5649: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
5650: RAISE FND_API.G_EXC_ERROR;
5651: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
5652: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5653: END IF;
5654: END IF;
5647:
5648: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5649: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
5650: RAISE FND_API.G_EXC_ERROR;
5651: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
5652: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5653: END IF;
5654: END IF;
5655: oe_debug_pub.add('Calling Release_Order_holds using l_hold_release_id' ||
5648: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5649: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
5650: RAISE FND_API.G_EXC_ERROR;
5651: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
5652: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5653: END IF;
5654: END IF;
5655: oe_debug_pub.add('Calling Release_Order_holds using l_hold_release_id' ||
5656: to_char(l_hold_release_id) ,1);
5668: OE_CREDIT_CHECK_UTIL.UPDATE_RELEASED_AMOUNT(p_hold_source_rec.hold_entity_id,l_hold_release_id);
5669: END IF;
5670: --ER 12363706 end
5671: EXCEPTION
5672: WHEN FND_API.G_EXC_ERROR THEN
5673: x_return_status := FND_API.G_RET_STS_ERROR;
5674: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5675: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5676: WHEN OTHERS THEN
5669: END IF;
5670: --ER 12363706 end
5671: EXCEPTION
5672: WHEN FND_API.G_EXC_ERROR THEN
5673: x_return_status := FND_API.G_RET_STS_ERROR;
5674: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5675: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5676: WHEN OTHERS THEN
5677: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
5670: --ER 12363706 end
5671: EXCEPTION
5672: WHEN FND_API.G_EXC_ERROR THEN
5673: x_return_status := FND_API.G_RET_STS_ERROR;
5674: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5675: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5676: WHEN OTHERS THEN
5677: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
5678: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME
5671: EXCEPTION
5672: WHEN FND_API.G_EXC_ERROR THEN
5673: x_return_status := FND_API.G_RET_STS_ERROR;
5674: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5675: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5676: WHEN OTHERS THEN
5677: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
5678: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME
5679: ,'Insert_Hold_Release');
5677: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
5678: OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME
5679: ,'Insert_Hold_Release');
5680: END IF;
5681: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5682:
5683: END Release_Hold_Source;
5684:
5685:
5694: l_api_name CONSTANT VARCHAR2(30) := 'Validate_Order';
5695: l_dummy VARCHAR2(30);
5696: l_header_id OE_ORDER_HEADERS.header_id%type;
5697: BEGIN
5698: x_return_status := FND_API.G_RET_STS_SUCCESS;
5699:
5700: IF p_line_id IS NULL AND p_header_id IS NULL THEN
5701: FND_MESSAGE.SET_NAME('ONT', 'OE_ENTER_HEADER_OR_LINE_ID');
5702: OE_MSG_PUB.ADD;
5699:
5700: IF p_line_id IS NULL AND p_header_id IS NULL THEN
5701: FND_MESSAGE.SET_NAME('ONT', 'OE_ENTER_HEADER_OR_LINE_ID');
5702: OE_MSG_PUB.ADD;
5703: RAISE FND_API.G_EXC_ERROR;
5704: ELSIF p_header_id IS NULL THEN
5705: l_dummy := 'LINE'; -- Added for bug 7112725
5706: SELECT header_id
5707: INTO l_header_id
5716: END IF;
5717: EXCEPTION
5718: WHEN NO_DATA_FOUND THEN
5719: -- Modified below code for bug 7112725
5720: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5721: IF l_dummy = 'HEADER' THEN
5722: FND_MESSAGE.SET_NAME('ONT', 'OE_INVALID_HEADER_ID');
5723: FND_MESSAGE.SET_TOKEN('HEADER_ID',p_header_id);
5724: OE_MSG_PUB.ADD;
5727: FND_MESSAGE.SET_TOKEN('LINE_ID',p_line_id);
5728: OE_MSG_PUB.ADD;
5729: END IF;
5730: oe_debug_pub.add('Return Status : ' || x_return_status, 5);
5731: -- RAISE FND_API.G_EXC_ERROR; -- Commented for bug 7112725
5732: END Validate_Order;
5733:
5734:
5735: Procedure Validate (
5746: );
5747: /*
5748: ** Call Validate_Hold() only if Validate_Hold_Source() was successful
5749: */
5750: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
5751:
5752: Validate_Hold ( p_hold_id => p_hold_source_rec.hold_id,
5753: x_return_status => x_return_status,
5754: x_msg_count => x_msg_count,
5801:
5802: SAVEPOINT DELETE_HOLDS_PUB;
5803:
5804: -- Initialize API return status to success
5805: x_return_status := FND_API.G_RET_STS_SUCCESS;
5806:
5807: -- Missing Input arguments
5808:
5809: IF (p_order_rec.header_id = FND_API.G_MISS_NUM
5805: x_return_status := FND_API.G_RET_STS_SUCCESS;
5806:
5807: -- Missing Input arguments
5808:
5809: IF (p_order_rec.header_id = FND_API.G_MISS_NUM
5810: AND p_order_rec.line_id = FND_API.G_MISS_NUM) THEN
5811:
5812: FND_MESSAGE.SET_NAME('ONT', 'OE_ENTER_HEADER_OR_LINE_ID');
5813: OE_MSG_PUB.ADD;
5806:
5807: -- Missing Input arguments
5808:
5809: IF (p_order_rec.header_id = FND_API.G_MISS_NUM
5810: AND p_order_rec.line_id = FND_API.G_MISS_NUM) THEN
5811:
5812: FND_MESSAGE.SET_NAME('ONT', 'OE_ENTER_HEADER_OR_LINE_ID');
5813: OE_MSG_PUB.ADD;
5814: RAISE FND_API.G_EXC_ERROR;
5810: AND p_order_rec.line_id = FND_API.G_MISS_NUM) THEN
5811:
5812: FND_MESSAGE.SET_NAME('ONT', 'OE_ENTER_HEADER_OR_LINE_ID');
5813: OE_MSG_PUB.ADD;
5814: RAISE FND_API.G_EXC_ERROR;
5815:
5816: END IF;
5817:
5818: -- Delete the hold records corr. to this order or line in OE_ORDER_HOLDS
5816: END IF;
5817:
5818: -- Delete the hold records corr. to this order or line in OE_ORDER_HOLDS
5819:
5820: IF p_order_rec.line_id = FND_API.G_MISS_NUM THEN
5821:
5822: -- Delete order hold records
5823:
5824: OPEN order_hold;
5910: END IF;
5911:
5912:
5913: EXCEPTION
5914: WHEN FND_API.G_EXC_ERROR THEN
5915: IF (order_hold%isopen) THEN
5916: CLOSE order_hold;
5917: END IF;
5918: IF (hold_source%isopen) THEN
5921: IF (line_hold%isopen) THEN
5922: CLOSE line_hold;
5923: END IF;
5924: ROLLBACK TO DELETE_HOLDS_PUB;
5925: x_return_status := FND_API.G_RET_STS_ERROR;
5926: OE_MSG_PUB.Count_And_Get
5927: ( p_count => x_msg_count
5928: , p_data => x_msg_data
5929: );
5937: IF (line_hold%isopen) THEN
5938: CLOSE line_hold;
5939: END IF;
5940: ROLLBACK TO DELETE_HOLDS_PUB;
5941: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5942: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5943: THEN
5944: OE_MSG_PUB.Add_Exc_Msg
5945: ( G_PKG_NAME
5978: l_count_of_holds_applied NUMBER := 0;
5979: l_user_activity_name VARCHAR2(80);
5980:
5981: BEGIN
5982: x_return_status := FND_API.G_RET_STS_SUCCESS;
5983: OE_DEBUG_PUB.Add('IN Apply Holds..Orders',1);
5984:
5985: -- 8477694
5986:
5995: l_msg_token := 'APPLY(System Hold)';
5996: fnd_message.set_name('ONT', 'OE_HOLDS_AUTHORIZATION_FAILED');
5997: fnd_message.set_token('ACTION', l_msg_token);
5998: OE_MSG_PUB.ADD;
5999: x_return_status := FND_API.G_RET_STS_ERROR;
6000: OE_MSG_PUB.Count_And_Get
6001: ( p_count => x_msg_count
6002: , p_data => x_msg_data
6003: );
6029: l_msg_token := fnd_message.get;
6030: fnd_message.set_name('ONT', 'OE_HOLDS_AUTHORIZATION_FAILED');
6031: fnd_message.set_token('ACTION', l_msg_token);
6032: OE_MSG_PUB.ADD;
6033: x_return_status := FND_API.G_RET_STS_ERROR;
6034: OE_MSG_PUB.Count_And_Get
6035: ( p_count => x_msg_count
6036: , p_data => x_msg_data
6037: );
6045:
6046: for j in 1..p_order_tbl.COUNT loop
6047: OE_DEBUG_PUB.Add('IN Apply Holds Loop',3);
6048: l_hold_exists := 'N'; --bug 5548778
6049: x_return_status := FND_API.G_RET_STS_SUCCESS;
6050: l_hold_source_rec.hold_entity_code := 'O';
6051: l_hold_source_rec.hold_entity_id := p_order_tbl(j).header_id;
6052: l_hold_source_rec.line_id := p_order_tbl(j).line_id;
6053:
6077: OE_DEBUG_PUB.Add('x_msg_count:' || to_char(x_msg_count),2 );
6078: OE_DEBUG_PUB.Add('x_msg_data:' || x_msg_data,2 );
6079:
6080: -- Added for bug 7112725
6081: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6082: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
6083: RAISE FND_API.G_EXC_ERROR;
6084: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6085: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6078: OE_DEBUG_PUB.Add('x_msg_data:' || x_msg_data,2 );
6079:
6080: -- Added for bug 7112725
6081: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6082: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
6083: RAISE FND_API.G_EXC_ERROR;
6084: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6085: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6086: END IF;
6079:
6080: -- Added for bug 7112725
6081: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6082: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
6083: RAISE FND_API.G_EXC_ERROR;
6084: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6085: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6086: END IF;
6087: END IF;
6080: -- Added for bug 7112725
6081: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6082: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
6083: RAISE FND_API.G_EXC_ERROR;
6084: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6085: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6086: END IF;
6087: END IF;
6088:
6081: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6082: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
6083: RAISE FND_API.G_EXC_ERROR;
6084: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6085: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6086: END IF;
6087: END IF;
6088:
6089: /* Don't need this, cos just putting orders on hold
6093: x_return_status => x_return_status,
6094: x_msg_count => x_msg_count,
6095: x_msg_data => x_msg_data
6096: );
6097: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6098: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
6099: RAISE FND_API.G_EXC_ERROR;
6100: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
6101: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6094: x_msg_count => x_msg_count,
6095: x_msg_data => x_msg_data
6096: );
6097: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6098: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
6099: RAISE FND_API.G_EXC_ERROR;
6100: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
6101: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6102: END IF;
6095: x_msg_data => x_msg_data
6096: );
6097: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6098: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
6099: RAISE FND_API.G_EXC_ERROR;
6100: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
6101: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6102: END IF;
6103: END IF;
6096: );
6097: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6098: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
6099: RAISE FND_API.G_EXC_ERROR;
6100: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
6101: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6102: END IF;
6103: END IF;
6104: --bug 5548778 call overloaded method
6097: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6098: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
6099: RAISE FND_API.G_EXC_ERROR;
6100: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
6101: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6102: END IF;
6103: END IF;
6104: --bug 5548778 call overloaded method
6105: Create_Hold_Source (
6114: x_return_status,1);
6115: OE_DEBUG_PUB.Add('x_msg_count:' || to_char(x_msg_count),3 );
6116: OE_DEBUG_PUB.Add('x_msg_data:' || x_msg_data ,3);
6117: OE_DEBUG_PUB.Add('l_hold_exists:' || l_hold_exists ,3);
6118: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6119: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
6120: RAISE FND_API.G_EXC_ERROR;
6121: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
6122: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6115: OE_DEBUG_PUB.Add('x_msg_count:' || to_char(x_msg_count),3 );
6116: OE_DEBUG_PUB.Add('x_msg_data:' || x_msg_data ,3);
6117: OE_DEBUG_PUB.Add('l_hold_exists:' || l_hold_exists ,3);
6118: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6119: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
6120: RAISE FND_API.G_EXC_ERROR;
6121: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
6122: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6123: END IF;
6116: OE_DEBUG_PUB.Add('x_msg_data:' || x_msg_data ,3);
6117: OE_DEBUG_PUB.Add('l_hold_exists:' || l_hold_exists ,3);
6118: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6119: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
6120: RAISE FND_API.G_EXC_ERROR;
6121: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
6122: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6123: END IF;
6124: END IF;
6117: OE_DEBUG_PUB.Add('l_hold_exists:' || l_hold_exists ,3);
6118: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6119: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
6120: RAISE FND_API.G_EXC_ERROR;
6121: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
6122: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6123: END IF;
6124: END IF;
6125:
6118: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6119: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
6120: RAISE FND_API.G_EXC_ERROR;
6121: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
6122: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6123: END IF;
6124: END IF;
6125:
6126: OE_DEBUG_PUB.Add('l_hold_source_id->' || to_char(l_hold_source_id) ,1);
6188: fnd_message.set_name('ONT', 'OE_NO_HOLD_FOR_ACTIVITY');
6189: fnd_message.set_token('WF_ACT',l_user_activity_name);
6190: OE_MSG_PUB.ADD;
6191: oe_debug_pub.add(' Hold Not applied for the requested line');
6192: RAISE FND_API.G_EXC_ERROR;
6193: ELSIF l_count_of_holds_applied = 0
6194: AND p_order_tbl.COUNT > 1 THEN
6195: fnd_message.set_name('ONT', 'OE_NO_HOLD_ALL_LINES');
6196: fnd_message.set_token('WF_ACT',l_user_activity_name);
6195: fnd_message.set_name('ONT', 'OE_NO_HOLD_ALL_LINES');
6196: fnd_message.set_token('WF_ACT',l_user_activity_name);
6197: OE_MSG_PUB.ADD;
6198: oe_debug_pub.add('Hold Not applied for ALL requested lines');
6199: RAISE FND_API.G_EXC_ERROR;
6200: ELSIF p_order_tbl.COUNT > l_count_of_holds_applied
6201: AND p_order_tbl.COUNT > 1 THEN
6202: fnd_message.set_name('ONT', 'OE_NO_HOLD_FEW_LINES');
6203: fnd_message.set_token('WF_ACT',l_user_activity_name);
6265: x_is_hold_applied => l_hold_msg_applied);
6266: /*BEGIN
6267: OE_DEBUG_PUB.Add('In OE_Holds_pvt.Apply Holds, Creating Hold Source',1);
6268:
6269: x_return_status := FND_API.G_RET_STS_SUCCESS;
6270: l_hold_source_rec := p_hold_source_rec;
6271: Validate (p_hold_source_rec => p_hold_source_rec,
6272: x_return_status => x_return_status,
6273: x_msg_count => x_msg_count,
6272: x_return_status => x_return_status,
6273: x_msg_count => x_msg_count,
6274: x_msg_data => x_msg_data );
6275: OE_DEBUG_PUB.Add('Validate return status:' || x_return_status,1);
6276: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6277: OE_Debug_PUB.Add('Validate not successful',1);
6278: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
6279: RAISE FND_API.G_EXC_ERROR;
6280: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6274: x_msg_data => x_msg_data );
6275: OE_DEBUG_PUB.Add('Validate return status:' || x_return_status,1);
6276: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6277: OE_Debug_PUB.Add('Validate not successful',1);
6278: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
6279: RAISE FND_API.G_EXC_ERROR;
6280: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6281: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6282: END IF;
6275: OE_DEBUG_PUB.Add('Validate return status:' || x_return_status,1);
6276: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6277: OE_Debug_PUB.Add('Validate not successful',1);
6278: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
6279: RAISE FND_API.G_EXC_ERROR;
6280: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6281: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6282: END IF;
6283: ELSE
6276: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6277: OE_Debug_PUB.Add('Validate not successful',1);
6278: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
6279: RAISE FND_API.G_EXC_ERROR;
6280: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6281: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6282: END IF;
6283: ELSE
6284: OE_DEBUG_PUB.Add ('Calling Create_Hold_Source bug 5548778 overload',1);
6277: OE_Debug_PUB.Add('Validate not successful',1);
6278: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
6279: RAISE FND_API.G_EXC_ERROR;
6280: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6281: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6282: END IF;
6283: ELSE
6284: OE_DEBUG_PUB.Add ('Calling Create_Hold_Source bug 5548778 overload',1);
6285: Create_Hold_Source (
6293: OE_DEBUG_PUB.Add('x_return_status->' || x_return_status,1);
6294: OE_DEBUG_PUB.Add('x_msg_count->' || x_msg_count,1);
6295: OE_DEBUG_PUB.Add('x_msg_data' || x_msg_data,1);
6296: OE_DEBUG_PUB.Add('l_hold_exists' || l_hold_exists,1);
6297: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6298: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
6299: RAISE FND_API.G_EXC_ERROR;
6300: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
6301: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6294: OE_DEBUG_PUB.Add('x_msg_count->' || x_msg_count,1);
6295: OE_DEBUG_PUB.Add('x_msg_data' || x_msg_data,1);
6296: OE_DEBUG_PUB.Add('l_hold_exists' || l_hold_exists,1);
6297: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6298: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
6299: RAISE FND_API.G_EXC_ERROR;
6300: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
6301: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6302: END IF;
6295: OE_DEBUG_PUB.Add('x_msg_data' || x_msg_data,1);
6296: OE_DEBUG_PUB.Add('l_hold_exists' || l_hold_exists,1);
6297: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6298: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
6299: RAISE FND_API.G_EXC_ERROR;
6300: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
6301: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6302: END IF;
6303: END IF;
6296: OE_DEBUG_PUB.Add('l_hold_exists' || l_hold_exists,1);
6297: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6298: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
6299: RAISE FND_API.G_EXC_ERROR;
6300: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
6301: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6302: END IF;
6303: END IF;
6304: OE_DEBUG_PUB.Add('l_hold_source_id->' || to_char(l_hold_source_id) ,1);
6297: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6298: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
6299: RAISE FND_API.G_EXC_ERROR;
6300: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
6301: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6302: END IF;
6303: END IF;
6304: OE_DEBUG_PUB.Add('l_hold_source_id->' || to_char(l_hold_source_id) ,1);
6305: l_hold_source_rec.hold_source_id := l_hold_source_id;
6334: l_resp_id OE_HOLD_AUTHORIZATIONS.RESPONSIBILITY_ID%TYPE := FND_GLOBAL.RESP_ID; --8477694
6335: l_msg_token VARCHAR2(100); --8477694
6336:
6337: BEGIN
6338: x_return_status := FND_API.G_RET_STS_SUCCESS;
6339:
6340: --8477694
6341: IF NOT OE_GLOBALS.G_SYS_HOLD THEN
6342: IF check_system_holds( p_hold_id => p_hold_source_rec.hold_id
6348: l_msg_token := 'RELEASE(System Hold)';
6349: fnd_message.set_name('ONT', 'OE_HOLDS_AUTHORIZATION_FAILED');
6350: fnd_message.set_token('ACTION', l_msg_token);
6351: OE_MSG_PUB.ADD;
6352: x_return_status := FND_API.G_RET_STS_ERROR;
6353: OE_MSG_PUB.Count_And_Get
6354: ( p_count => x_msg_count
6355: , p_data => x_msg_data
6356: );
6383: l_msg_token := fnd_message.get;
6384: fnd_message.set_name('ONT', 'OE_HOLDS_AUTHORIZATION_FAILED');
6385: fnd_message.set_token('ACTION', l_msg_token);
6386: OE_MSG_PUB.ADD;
6387: x_return_status := FND_API.G_RET_STS_ERROR;
6388: OE_MSG_PUB.Count_And_Get
6389: ( p_count => x_msg_count
6390: , p_data => x_msg_data
6391: );
6428: );
6429: oe_debug_pub.add('After Validate_Order with x_return_status'||x_return_status,2);
6430:
6431: -- Added for bug 7112725
6432: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6433: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
6434: RAISE FND_API.G_EXC_ERROR;
6435: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6436: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6429: oe_debug_pub.add('After Validate_Order with x_return_status'||x_return_status,2);
6430:
6431: -- Added for bug 7112725
6432: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6433: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
6434: RAISE FND_API.G_EXC_ERROR;
6435: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6436: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6437: END IF;
6430:
6431: -- Added for bug 7112725
6432: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6433: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
6434: RAISE FND_API.G_EXC_ERROR;
6435: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6436: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6437: END IF;
6438: END IF;
6431: -- Added for bug 7112725
6432: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6433: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
6434: RAISE FND_API.G_EXC_ERROR;
6435: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6436: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6437: END IF;
6438: END IF;
6439:
6432: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6433: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
6434: RAISE FND_API.G_EXC_ERROR;
6435: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6436: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6437: END IF;
6438: END IF;
6439:
6440: Release_orders ( p_hold_release_rec => p_hold_release_rec,
6487: l_resp_id OE_HOLD_AUTHORIZATIONS.RESPONSIBILITY_ID%TYPE := FND_GLOBAL.RESP_ID; --8477694
6488: l_msg_token VARCHAR2(100); --8477694
6489:
6490: BEGIN
6491: x_return_status := FND_API.G_RET_STS_SUCCESS;
6492: oe_debug_pub.add('In Release Holds..Orders',1);
6493:
6494: --8477694
6495: IF NOT OE_GLOBALS.G_SYS_HOLD THEN
6502: l_msg_token := 'RELEASE(System Hold)';
6503: fnd_message.set_name('ONT', 'OE_HOLDS_AUTHORIZATION_FAILED');
6504: fnd_message.set_token('ACTION', l_msg_token);
6505: OE_MSG_PUB.ADD;
6506: x_return_status := FND_API.G_RET_STS_ERROR;
6507: OE_MSG_PUB.Count_And_Get
6508: ( p_count => x_msg_count
6509: , p_data => x_msg_data
6510: );
6536: l_msg_token := fnd_message.get;
6537: fnd_message.set_name('ONT', 'OE_HOLDS_AUTHORIZATION_FAILED');
6538: fnd_message.set_token('ACTION', l_msg_token);
6539: OE_MSG_PUB.ADD;
6540: x_return_status := FND_API.G_RET_STS_ERROR;
6541: OE_MSG_PUB.Count_And_Get
6542: ( p_count => x_msg_count
6543: , p_data => x_msg_data
6544: );
6579: );
6580: oe_debug_pub.add('After Validate_Order with x_return_status'|| x_return_status);
6581:
6582: -- Added for bug 7112725
6583: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6584: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
6585: RAISE FND_API.G_EXC_ERROR;
6586: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6587: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6580: oe_debug_pub.add('After Validate_Order with x_return_status'|| x_return_status);
6581:
6582: -- Added for bug 7112725
6583: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6584: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
6585: RAISE FND_API.G_EXC_ERROR;
6586: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6587: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6588: END IF;
6581:
6582: -- Added for bug 7112725
6583: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6584: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
6585: RAISE FND_API.G_EXC_ERROR;
6586: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6587: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6588: END IF;
6589: END IF;
6582: -- Added for bug 7112725
6583: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6584: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
6585: RAISE FND_API.G_EXC_ERROR;
6586: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6587: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6588: END IF;
6589: END IF;
6590:
6583: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6584: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
6585: RAISE FND_API.G_EXC_ERROR;
6586: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6587: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6588: END IF;
6589: END IF;
6590:
6591: oe_debug_pub.add('l_order_rec.header_id'||l_order_rec.header_id);
6640: )
6641: RETURN varchar2
6642: IS
6643: l_authorized_or_not varchar2(1) := 'Y';
6644: l_return_status Varchar2(1) := FND_API.G_RET_STS_SUCCESS;
6645: BEGIN
6646:
6647: x_return_status := l_return_status;
6648: x_msg_count := 0;
6731:
6732: OE_DEBUG_PUB.Add('Not authorize to Apply this Hold:'|| to_char(p_hold_id));
6733: fnd_message.set_name('ONT', 'ONT_HOLDS_SYSTEM_CHECK');
6734: OE_MSG_PUB.ADD;
6735: x_return_status := FND_API.G_RET_STS_ERROR;
6736: OE_MSG_PUB.Count_And_Get
6737: ( p_count => x_msg_count
6738: , p_data => x_msg_data
6739: );
6757: fnd_message.set_name('ONT', 'OE_HOLDS_AUTHORIZATION_FAILED');
6758: fnd_message.set_token('ACTION', l_msg_token);
6759:
6760: OE_MSG_PUB.ADD;
6761: --RAISE FND_API.G_EXC_ERROR;
6762: x_return_status := FND_API.G_RET_STS_ERROR;
6763: OE_MSG_PUB.Count_And_Get
6764: ( p_count => x_msg_count
6765: , p_data => x_msg_data
6758: fnd_message.set_token('ACTION', l_msg_token);
6759:
6760: OE_MSG_PUB.ADD;
6761: --RAISE FND_API.G_EXC_ERROR;
6762: x_return_status := FND_API.G_RET_STS_ERROR;
6763: OE_MSG_PUB.Count_And_Get
6764: ( p_count => x_msg_count
6765: , p_data => x_msg_data
6766: );
6845: ,x_return_status => x_return_status
6846: ,x_msg_count => x_msg_count
6847: ,x_msg_data => x_msg_data);*/
6848:
6849: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6850: oe_debug_pub.add('process_apply_holds_lines unexpected failure',1);
6851: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6852: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
6853: oe_debug_pub.add('process_apply_holds_lines expected failure',1);
6847: ,x_msg_data => x_msg_data);*/
6848:
6849: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6850: oe_debug_pub.add('process_apply_holds_lines unexpected failure',1);
6851: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6852: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
6853: oe_debug_pub.add('process_apply_holds_lines expected failure',1);
6854: RAISE FND_API.G_EXC_ERROR;
6855: END IF;
6848:
6849: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6850: oe_debug_pub.add('process_apply_holds_lines unexpected failure',1);
6851: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6852: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
6853: oe_debug_pub.add('process_apply_holds_lines expected failure',1);
6854: RAISE FND_API.G_EXC_ERROR;
6855: END IF;
6856:
6850: oe_debug_pub.add('process_apply_holds_lines unexpected failure',1);
6851: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6852: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
6853: oe_debug_pub.add('process_apply_holds_lines expected failure',1);
6854: RAISE FND_API.G_EXC_ERROR;
6855: END IF;
6856:
6857: END LOOP;
6858: /*Added the Select query and IF Condition below for WF_HOLDS ER (bug 6449458)*/
6870: fnd_message.set_name('ONT', 'OE_NO_HOLD_FOR_ACTIVITY');
6871: fnd_message.set_token('WF_ACT',l_user_activity_name);
6872: OE_MSG_PUB.ADD;
6873: oe_debug_pub.add(' Hold Not applied for the requested line');
6874: RAISE FND_API.G_EXC_ERROR;
6875: ELSIF l_count_of_holds_applied = 0
6876: AND p_sel_rec_tbl.COUNT > 1 THEN
6877: fnd_message.set_name('ONT', 'OE_NO_HOLD_ALL_LINES');
6878: fnd_message.set_token('WF_ACT',l_user_activity_name);
6877: fnd_message.set_name('ONT', 'OE_NO_HOLD_ALL_LINES');
6878: fnd_message.set_token('WF_ACT',l_user_activity_name);
6879: OE_MSG_PUB.ADD;
6880: oe_debug_pub.add('Hold Not applied for ALL requested lines');
6881: RAISE FND_API.G_EXC_ERROR;
6882: ELSIF p_sel_rec_tbl.COUNT > l_count_of_holds_applied
6883: AND p_sel_rec_tbl.COUNT > 1 THEN
6884: fnd_message.set_name('ONT', 'OE_NO_HOLD_FEW_LINES');
6885: fnd_message.set_token('WF_ACT',l_user_activity_name);
6889: NULL; -- No messages are required to be logged.
6890: END IF;
6891: END IF; -- End of WF_HOLDS ER (bug 6449458) IF Condition
6892:
6893: x_return_status := FND_API.G_RET_STS_SUCCESS;
6894: -- Get message count and data
6895: OE_MSG_PUB.Count_And_Get
6896: ( p_count => x_msg_count
6897: , p_data => x_msg_data
6900: OE_DEBUG_PUB.Add('Exiting OE_Holds_PVT.process_apply_holds_lines',1);
6901:
6902: EXCEPTION /* Procedure exception handler */
6903:
6904: WHEN FND_API.G_EXC_ERROR THEN
6905: x_return_status := FND_API.G_RET_STS_ERROR ;
6906: OE_MSG_PUB.Count_And_Get
6907: ( p_count => x_msg_count,
6908: p_data => x_msg_data
6901:
6902: EXCEPTION /* Procedure exception handler */
6903:
6904: WHEN FND_API.G_EXC_ERROR THEN
6905: x_return_status := FND_API.G_RET_STS_ERROR ;
6906: OE_MSG_PUB.Count_And_Get
6907: ( p_count => x_msg_count,
6908: p_data => x_msg_data
6909: );
6908: p_data => x_msg_data
6909: );
6910: ROLLBACK TO SAVEPOINT process_apply_holds_lines;
6911:
6912: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6913: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6914: OE_MSG_PUB.Count_And_Get
6915: ( p_count => x_msg_count,
6916: p_data => x_msg_data
6909: );
6910: ROLLBACK TO SAVEPOINT process_apply_holds_lines;
6911:
6912: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6913: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6914: OE_MSG_PUB.Count_And_Get
6915: ( p_count => x_msg_count,
6916: p_data => x_msg_data
6917: );
6917: );
6918: ROLLBACK TO SAVEPOINT process_apply_holds_lines;
6919:
6920: WHEN OTHERS THEN
6921: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6922: IF OE_MSG_PUB.Check_Msg_Level
6923: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6924: THEN
6925: OE_MSG_PUB.Add_Exc_Msg
6980: ) = 'N' THEN
6981: OE_DEBUG_PUB.Add('Not authorize to Apply this Hold:'|| to_char(p_hold_id));
6982: fnd_message.set_name('ONT', 'ONT_HOLDS_SYSTEM_CHECK');
6983: OE_MSG_PUB.ADD;
6984: x_return_status := FND_API.G_RET_STS_ERROR;
6985: OE_MSG_PUB.Count_And_Get
6986: ( p_count => x_msg_count
6987: , p_data => x_msg_data
6988: );
7007: fnd_message.set_name('ONT', 'OE_HOLDS_AUTHORIZATION_FAILED');
7008: fnd_message.set_token('ACTION', l_msg_token);
7009:
7010: OE_MSG_PUB.ADD;
7011: -- RAISE FND_API.G_EXC_ERROR;
7012: x_return_status := FND_API.G_RET_STS_ERROR;
7013: OE_MSG_PUB.Count_And_Get
7014: ( p_count => x_msg_count
7015: , p_data => x_msg_data
7008: fnd_message.set_token('ACTION', l_msg_token);
7009:
7010: OE_MSG_PUB.ADD;
7011: -- RAISE FND_API.G_EXC_ERROR;
7012: x_return_status := FND_API.G_RET_STS_ERROR;
7013: OE_MSG_PUB.Count_And_Get
7014: ( p_count => x_msg_count
7015: , p_data => x_msg_data
7016: );
7079: OE_DEBUG_PUB.Add('x_return_status:' || x_return_status,2);
7080: OE_DEBUG_PUB.Add('x_msg_count:' || to_char(x_msg_count),2);
7081: OE_DEBUG_PUB.Add('x_msg_data:' || x_msg_data,2);
7082:
7083: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
7084: Oe_debug_pub.add('process_apply_holds_orders unexpected failure',3);
7085: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7086: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
7087: oe_debug_pub.add('process_apply_holds_orders expected failure',3);
7081: OE_DEBUG_PUB.Add('x_msg_data:' || x_msg_data,2);
7082:
7083: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
7084: Oe_debug_pub.add('process_apply_holds_orders unexpected failure',3);
7085: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7086: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
7087: oe_debug_pub.add('process_apply_holds_orders expected failure',3);
7088: RAISE FND_API.G_EXC_ERROR;
7089: END IF;
7082:
7083: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
7084: Oe_debug_pub.add('process_apply_holds_orders unexpected failure',3);
7085: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7086: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
7087: oe_debug_pub.add('process_apply_holds_orders expected failure',3);
7088: RAISE FND_API.G_EXC_ERROR;
7089: END IF;
7090:
7084: Oe_debug_pub.add('process_apply_holds_orders unexpected failure',3);
7085: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7086: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
7087: oe_debug_pub.add('process_apply_holds_orders expected failure',3);
7088: RAISE FND_API.G_EXC_ERROR;
7089: END IF;
7090:
7091: END LOOP;
7092: /*Added the Select query and IF Condition below for WF_HOLDS ER (bug 6449458)*/
7104: fnd_message.set_name('ONT', 'OE_NO_HOLD_FOR_ACTIVITY');
7105: fnd_message.set_token('WF_ACT',l_user_activity_name);
7106: OE_MSG_PUB.ADD;
7107: oe_debug_pub.add(' Hold Not applied for the requested line');
7108: RAISE FND_API.G_EXC_ERROR;
7109: ELSIF l_count_of_holds_applied = 0
7110: AND p_sel_rec_tbl.COUNT > 1 THEN
7111: fnd_message.set_name('ONT', 'OE_NO_HOLD_ALL_LINES');
7112: fnd_message.set_token('WF_ACT',l_user_activity_name);
7111: fnd_message.set_name('ONT', 'OE_NO_HOLD_ALL_LINES');
7112: fnd_message.set_token('WF_ACT',l_user_activity_name);
7113: OE_MSG_PUB.ADD;
7114: oe_debug_pub.add('Hold Not applied for ALL requested lines');
7115: RAISE FND_API.G_EXC_ERROR;
7116: ELSIF p_sel_rec_tbl.COUNT > l_count_of_holds_applied
7117: AND p_sel_rec_tbl.COUNT > 1 THEN
7118: fnd_message.set_name('ONT', 'OE_NO_HOLD_FEW_LINES');
7119: fnd_message.set_token('WF_ACT',l_user_activity_name);
7123: NULL; -- No messages are required to be logged.
7124: END IF;
7125: END IF; -- End of WF_HOLDS ER (bug 6449458) IF Condition
7126:
7127: x_return_status := FND_API.G_RET_STS_SUCCESS;
7128: -- Get message count and data
7129: OE_MSG_PUB.Count_And_Get
7130: ( p_count => x_msg_count
7131: , p_data => x_msg_data
7134: OE_DEBUG_PUB.Add('Exiting OE_Holds_PVT.process_apply_holds_orders',1);
7135:
7136: EXCEPTION /* Procedure exception handler */
7137:
7138: WHEN FND_API.G_EXC_ERROR THEN
7139: x_return_status := FND_API.G_RET_STS_ERROR ;
7140: OE_MSG_PUB.Count_And_Get
7141: ( p_count => x_msg_count,
7142: p_data => x_msg_data
7135:
7136: EXCEPTION /* Procedure exception handler */
7137:
7138: WHEN FND_API.G_EXC_ERROR THEN
7139: x_return_status := FND_API.G_RET_STS_ERROR ;
7140: OE_MSG_PUB.Count_And_Get
7141: ( p_count => x_msg_count,
7142: p_data => x_msg_data
7143: );
7142: p_data => x_msg_data
7143: );
7144: ROLLBACK TO SAVEPOINT process_apply_holds_orders;
7145:
7146: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7147: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7148: OE_MSG_PUB.Count_And_Get
7149: ( p_count => x_msg_count,
7150: p_data => x_msg_data
7143: );
7144: ROLLBACK TO SAVEPOINT process_apply_holds_orders;
7145:
7146: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7147: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7148: OE_MSG_PUB.Count_And_Get
7149: ( p_count => x_msg_count,
7150: p_data => x_msg_data
7151: );
7151: );
7152: ROLLBACK TO SAVEPOINT process_apply_holds_orders;
7153:
7154: WHEN OTHERS THEN
7155: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7156: IF OE_MSG_PUB.Check_Msg_Level
7157: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
7158: THEN
7159: OE_MSG_PUB.Add_Exc_Msg
7218: ) = 'N' THEN
7219: OE_DEBUG_PUB.Add('Not authorize to Apply this Hold:'|| to_char(p_hold_id));
7220: fnd_message.set_name('ONT', 'ONT_HOLDS_SYSTEM_CHECK');
7221: OE_MSG_PUB.ADD;
7222: x_return_status := FND_API.G_RET_STS_ERROR;
7223: OE_MSG_PUB.Count_And_Get
7224: ( p_count => x_msg_count
7225: , p_data => x_msg_data
7226: );
7244: fnd_message.set_name('ONT', 'OE_HOLDS_AUTHORIZATION_FAILED');
7245: fnd_message.set_token('ACTION', l_msg_token);
7246:
7247: OE_MSG_PUB.ADD;
7248: -- RAISE FND_API.G_EXC_ERROR;
7249: x_return_status := FND_API.G_RET_STS_ERROR;
7250: OE_MSG_PUB.Count_And_Get
7251: ( p_count => x_msg_count
7252: , p_data => x_msg_data
7245: fnd_message.set_token('ACTION', l_msg_token);
7246:
7247: OE_MSG_PUB.ADD;
7248: -- RAISE FND_API.G_EXC_ERROR;
7249: x_return_status := FND_API.G_RET_STS_ERROR;
7250: OE_MSG_PUB.Count_And_Get
7251: ( p_count => x_msg_count
7252: , p_data => x_msg_data
7253: );
7295:
7296: OE_DEBUG_PUB.Add('After oe_holds_pvt.release_holds:' || x_return_status,3);
7297:
7298:
7299: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
7300: oe_debug_pub.add('process_release_holds_lines unexpected failure',3);
7301: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7302: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
7303: oe_debug_pub.add('process_release_holds_lines failure',3);
7297:
7298:
7299: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
7300: oe_debug_pub.add('process_release_holds_lines unexpected failure',3);
7301: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7302: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
7303: oe_debug_pub.add('process_release_holds_lines failure',3);
7304: RAISE FND_API.G_EXC_ERROR;
7305: END IF;
7298:
7299: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
7300: oe_debug_pub.add('process_release_holds_lines unexpected failure',3);
7301: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7302: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
7303: oe_debug_pub.add('process_release_holds_lines failure',3);
7304: RAISE FND_API.G_EXC_ERROR;
7305: END IF;
7306:
7300: oe_debug_pub.add('process_release_holds_lines unexpected failure',3);
7301: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7302: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
7303: oe_debug_pub.add('process_release_holds_lines failure',3);
7304: RAISE FND_API.G_EXC_ERROR;
7305: END IF;
7306:
7307: END LOOP;
7308:
7305: END IF;
7306:
7307: END LOOP;
7308:
7309: x_return_status := FND_API.G_RET_STS_SUCCESS;
7310: -- Get message count and data
7311: OE_MSG_PUB.Count_And_Get
7312: ( p_count => x_msg_count
7313: , p_data => x_msg_data
7316: OE_DEBUG_PUB.Add('Exiting OE_Holds_PVT.process_release_holds_lines',1);
7317:
7318: EXCEPTION /* Procedure exception handler */
7319:
7320: WHEN FND_API.G_EXC_ERROR THEN
7321: x_return_status := FND_API.G_RET_STS_ERROR ;
7322: OE_MSG_PUB.Count_And_Get
7323: ( p_count => x_msg_count,
7324: p_data => x_msg_data
7317:
7318: EXCEPTION /* Procedure exception handler */
7319:
7320: WHEN FND_API.G_EXC_ERROR THEN
7321: x_return_status := FND_API.G_RET_STS_ERROR ;
7322: OE_MSG_PUB.Count_And_Get
7323: ( p_count => x_msg_count,
7324: p_data => x_msg_data
7325: );
7324: p_data => x_msg_data
7325: );
7326: ROLLBACK TO SAVEPOINT process_release_holds_lines;
7327:
7328: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7329: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7330: OE_MSG_PUB.Count_And_Get
7331: ( p_count => x_msg_count,
7332: p_data => x_msg_data
7325: );
7326: ROLLBACK TO SAVEPOINT process_release_holds_lines;
7327:
7328: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7329: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7330: OE_MSG_PUB.Count_And_Get
7331: ( p_count => x_msg_count,
7332: p_data => x_msg_data
7333: );
7333: );
7334: ROLLBACK TO SAVEPOINT process_release_holds_lines;
7335:
7336: WHEN OTHERS THEN
7337: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7338: IF OE_MSG_PUB.Check_Msg_Level
7339: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
7340: THEN
7341: OE_MSG_PUB.Add_Exc_Msg
7394: ) = 'N' THEN
7395: OE_DEBUG_PUB.Add('Not authorize to Apply this Hold:'|| to_char(p_hold_id));
7396: fnd_message.set_name('ONT', 'ONT_HOLDS_SYSTEM_CHECK');
7397: OE_MSG_PUB.ADD;
7398: x_return_status := FND_API.G_RET_STS_ERROR;
7399: OE_MSG_PUB.Count_And_Get
7400: ( p_count => x_msg_count
7401: , p_data => x_msg_data
7402: );
7420: fnd_message.set_name('ONT', 'OE_HOLDS_AUTHORIZATION_FAILED');
7421: fnd_message.set_token('ACTION', l_msg_token);
7422:
7423: OE_MSG_PUB.ADD;
7424: -- RAISE FND_API.G_EXC_ERROR;
7425: x_return_status := FND_API.G_RET_STS_ERROR;
7426:
7427: OE_MSG_PUB.Count_And_Get
7428: ( p_count => x_msg_count
7421: fnd_message.set_token('ACTION', l_msg_token);
7422:
7423: OE_MSG_PUB.ADD;
7424: -- RAISE FND_API.G_EXC_ERROR;
7425: x_return_status := FND_API.G_RET_STS_ERROR;
7426:
7427: OE_MSG_PUB.Count_And_Get
7428: ( p_count => x_msg_count
7429: , p_data => x_msg_data
7464: OE_DEBUG_PUB.Add('x_return_status:' || x_return_status,2);
7465: OE_DEBUG_PUB.Add('x_msg_count:' || to_char(x_msg_count),2);
7466: OE_DEBUG_PUB.Add('x_msg_data:' || x_msg_data,2);
7467:
7468: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
7469: oe_debug_pub.add('process_release_holds_orders unexpected failure',3);
7470: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7471: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
7472: oe_debug_pub.add('process_release_holds_orders failure',3);
7466: OE_DEBUG_PUB.Add('x_msg_data:' || x_msg_data,2);
7467:
7468: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
7469: oe_debug_pub.add('process_release_holds_orders unexpected failure',3);
7470: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7471: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
7472: oe_debug_pub.add('process_release_holds_orders failure',3);
7473: RAISE FND_API.G_EXC_ERROR;
7474: END IF;
7467:
7468: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
7469: oe_debug_pub.add('process_release_holds_orders unexpected failure',3);
7470: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7471: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
7472: oe_debug_pub.add('process_release_holds_orders failure',3);
7473: RAISE FND_API.G_EXC_ERROR;
7474: END IF;
7475:
7469: oe_debug_pub.add('process_release_holds_orders unexpected failure',3);
7470: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7471: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
7472: oe_debug_pub.add('process_release_holds_orders failure',3);
7473: RAISE FND_API.G_EXC_ERROR;
7474: END IF;
7475:
7476:
7477: END LOOP;
7475:
7476:
7477: END LOOP;
7478:
7479: x_return_status := FND_API.G_RET_STS_SUCCESS;
7480: -- Get message count and data
7481: OE_MSG_PUB.Count_And_Get
7482: ( p_count => x_msg_count
7483: , p_data => x_msg_data
7486: OE_DEBUG_PUB.Add('Exiting OE_Holds_PVT.process_release_holds_orders',1);
7487:
7488: EXCEPTION /* Procedure exception handler */
7489:
7490: WHEN FND_API.G_EXC_ERROR THEN
7491: x_return_status := FND_API.G_RET_STS_ERROR ;
7492: OE_MSG_PUB.Count_And_Get
7493: ( p_count => x_msg_count,
7494: p_data => x_msg_data
7487:
7488: EXCEPTION /* Procedure exception handler */
7489:
7490: WHEN FND_API.G_EXC_ERROR THEN
7491: x_return_status := FND_API.G_RET_STS_ERROR ;
7492: OE_MSG_PUB.Count_And_Get
7493: ( p_count => x_msg_count,
7494: p_data => x_msg_data
7495: );
7494: p_data => x_msg_data
7495: );
7496: ROLLBACK TO SAVEPOINT process_release_holds_orders;
7497:
7498: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7499: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7500: OE_MSG_PUB.Count_And_Get
7501: ( p_count => x_msg_count,
7502: p_data => x_msg_data
7495: );
7496: ROLLBACK TO SAVEPOINT process_release_holds_orders;
7497:
7498: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7499: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7500: OE_MSG_PUB.Count_And_Get
7501: ( p_count => x_msg_count,
7502: p_data => x_msg_data
7503: );
7503: );
7504: ROLLBACK TO SAVEPOINT process_release_holds_orders;
7505:
7506: WHEN OTHERS THEN
7507: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7508: IF OE_MSG_PUB.Check_Msg_Level
7509: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
7510: THEN
7511: OE_MSG_PUB.Add_Exc_Msg
7587: ) = 'N' THEN
7588: OE_DEBUG_PUB.Add('Not authorize to Apply this Hold:'|| to_char(l_hold_source_rec.hold_id));
7589: fnd_message.set_name('ONT', 'ONT_HOLDS_SYSTEM_CHECK');
7590: OE_MSG_PUB.ADD;
7591: x_return_status := FND_API.G_RET_STS_ERROR;
7592: OE_MSG_PUB.Count_And_Get
7593: ( p_count => x_msg_count
7594: , p_data => x_msg_data
7595: );
7613: fnd_message.set_name('ONT', 'OE_HOLDS_AUTHORIZATION_FAILED');
7614: fnd_message.set_token('ACTION', l_msg_token);
7615:
7616: OE_MSG_PUB.ADD;
7617: RAISE FND_API.G_EXC_ERROR;
7618: x_return_status := FND_API.G_RET_STS_ERROR;
7619: OE_MSG_PUB.Count_And_Get
7620: ( p_count => x_msg_count
7621: , p_data => x_msg_data
7614: fnd_message.set_token('ACTION', l_msg_token);
7615:
7616: OE_MSG_PUB.ADD;
7617: RAISE FND_API.G_EXC_ERROR;
7618: x_return_status := FND_API.G_RET_STS_ERROR;
7619: OE_MSG_PUB.Count_And_Get
7620: ( p_count => x_msg_count
7621: , p_data => x_msg_data
7622: );
7654: ,x_is_hold_applied => l_is_hold_applied
7655: );
7656:
7657: OE_DEBUG_PUB.Add('x_return_status:' || x_return_status,2);
7658: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
7659: oe_debug_pub.add('process_create_holds unexpected failure',1);
7660: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7661: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
7662: oe_debug_pub.add('process_create_holds expected failure',1);
7656:
7657: OE_DEBUG_PUB.Add('x_return_status:' || x_return_status,2);
7658: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
7659: oe_debug_pub.add('process_create_holds unexpected failure',1);
7660: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7661: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
7662: oe_debug_pub.add('process_create_holds expected failure',1);
7663: RAISE FND_API.G_EXC_ERROR;
7664: END IF;
7657: OE_DEBUG_PUB.Add('x_return_status:' || x_return_status,2);
7658: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
7659: oe_debug_pub.add('process_create_holds unexpected failure',1);
7660: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7661: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
7662: oe_debug_pub.add('process_create_holds expected failure',1);
7663: RAISE FND_API.G_EXC_ERROR;
7664: END IF;
7665: x_return_status := FND_API.G_RET_STS_SUCCESS;
7659: oe_debug_pub.add('process_create_holds unexpected failure',1);
7660: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7661: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
7662: oe_debug_pub.add('process_create_holds expected failure',1);
7663: RAISE FND_API.G_EXC_ERROR;
7664: END IF;
7665: x_return_status := FND_API.G_RET_STS_SUCCESS;
7666: elsif (p_hold_existing_flg = 'Y' AND p_hold_future_flg = 'N') then
7667: -- Create_Hold_Source (Create the Hold Source)
7661: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
7662: oe_debug_pub.add('process_create_holds expected failure',1);
7663: RAISE FND_API.G_EXC_ERROR;
7664: END IF;
7665: x_return_status := FND_API.G_RET_STS_SUCCESS;
7666: elsif (p_hold_existing_flg = 'Y' AND p_hold_future_flg = 'N') then
7667: -- Create_Hold_Source (Create the Hold Source)
7668: -- Create_Order_Holds (Put the existing Orders on Hold)
7669: -- Create_Release_Source (Release the source.Do not release orders from hold)
7676: x_msg_count => x_msg_count,
7677: x_msg_data => x_msg_data
7678: );
7679:
7680: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7681: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
7682: RAISE FND_API.G_EXC_ERROR;
7683: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
7684: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7677: x_msg_data => x_msg_data
7678: );
7679:
7680: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7681: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
7682: RAISE FND_API.G_EXC_ERROR;
7683: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
7684: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7685: END IF;
7678: );
7679:
7680: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7681: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
7682: RAISE FND_API.G_EXC_ERROR;
7683: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
7684: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7685: END IF;
7686: END IF;
7679:
7680: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7681: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
7682: RAISE FND_API.G_EXC_ERROR;
7683: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
7684: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7685: END IF;
7686: END IF;
7687: OE_DEBUG_PUB.Add('l_hold_source_id->' || to_char(l_hold_source_id) ,3);
7680: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7681: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
7682: RAISE FND_API.G_EXC_ERROR;
7683: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
7684: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7685: END IF;
7686: END IF;
7687: OE_DEBUG_PUB.Add('l_hold_source_id->' || to_char(l_hold_source_id) ,3);
7688: l_hold_source_rec.hold_source_id := l_hold_source_id;
7717: x_return_status => x_return_status,
7718: x_msg_count => x_msg_count,
7719: x_msg_data => x_msg_data
7720: );
7721: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7722: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
7723: RAISE FND_API.G_EXC_ERROR;
7724: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
7725: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7718: x_msg_count => x_msg_count,
7719: x_msg_data => x_msg_data
7720: );
7721: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7722: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
7723: RAISE FND_API.G_EXC_ERROR;
7724: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
7725: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7726: END IF;
7719: x_msg_data => x_msg_data
7720: );
7721: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7722: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
7723: RAISE FND_API.G_EXC_ERROR;
7724: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
7725: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7726: END IF;
7727: END IF;
7720: );
7721: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7722: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
7723: RAISE FND_API.G_EXC_ERROR;
7724: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
7725: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7726: END IF;
7727: END IF;
7728: else
7721: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7722: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
7723: RAISE FND_API.G_EXC_ERROR;
7724: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
7725: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7726: END IF;
7727: END IF;
7728: else
7729: -- Should not get here
7739:
7740:
7741: EXCEPTION /* Procedure exception handler */
7742:
7743: WHEN FND_API.G_EXC_ERROR THEN
7744: x_return_status := FND_API.G_RET_STS_ERROR ;
7745: OE_MSG_PUB.Count_And_Get
7746: ( p_count => x_msg_count,
7747: p_data => x_msg_data
7740:
7741: EXCEPTION /* Procedure exception handler */
7742:
7743: WHEN FND_API.G_EXC_ERROR THEN
7744: x_return_status := FND_API.G_RET_STS_ERROR ;
7745: OE_MSG_PUB.Count_And_Get
7746: ( p_count => x_msg_count,
7747: p_data => x_msg_data
7748: );
7746: ( p_count => x_msg_count,
7747: p_data => x_msg_data
7748: );
7749:
7750: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7751: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7752: OE_MSG_PUB.Count_And_Get
7753: ( p_count => x_msg_count,
7754: p_data => x_msg_data
7747: p_data => x_msg_data
7748: );
7749:
7750: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7751: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7752: OE_MSG_PUB.Count_And_Get
7753: ( p_count => x_msg_count,
7754: p_data => x_msg_data
7755: );
7754: p_data => x_msg_data
7755: );
7756:
7757: WHEN OTHERS THEN
7758: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7759: IF OE_MSG_PUB.Check_Msg_Level
7760: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
7761: THEN
7762: OE_MSG_PUB.Add_Exc_Msg
7814: OE_DEBUG_PUB.Add('Bug 1946783 Credit Hold should be released from AR',1);
7815:
7816: fnd_message.set_name('ONT', 'OE_CC_AR_HOLD_NOT_RELEASED');
7817: OE_MSG_PUB.ADD;
7818: RAISE FND_API.G_EXC_ERROR;
7819: x_return_status := FND_API.G_RET_STS_ERROR;
7820: OE_MSG_PUB.Count_And_Get
7821: ( p_count => x_msg_count
7822: , p_data => x_msg_data
7815:
7816: fnd_message.set_name('ONT', 'OE_CC_AR_HOLD_NOT_RELEASED');
7817: OE_MSG_PUB.ADD;
7818: RAISE FND_API.G_EXC_ERROR;
7819: x_return_status := FND_API.G_RET_STS_ERROR;
7820: OE_MSG_PUB.Count_And_Get
7821: ( p_count => x_msg_count
7822: , p_data => x_msg_data
7823: );
7835: OE_DEBUG_PUB.Add('Not authorize to Apply this Hold:'|| to_char(l_hold_id));
7836: fnd_message.set_name('ONT', 'ONT_HOLDS_SYSTEM_CHECK');
7837: fnd_message.set_token('ACTION', 'Release');
7838: OE_MSG_PUB.ADD;
7839: x_return_status := FND_API.G_RET_STS_ERROR;
7840: OE_MSG_PUB.Count_And_Get
7841: ( p_count => x_msg_count
7842: , p_data => x_msg_data
7843: );
7860: fnd_message.set_name('ONT', 'OE_HOLDS_AUTHORIZATION_FAILED');
7861: fnd_message.set_token('ACTION', l_msg_token);
7862:
7863: OE_MSG_PUB.ADD;
7864: RAISE FND_API.G_EXC_ERROR;
7865: x_return_status := FND_API.G_RET_STS_ERROR;
7866: OE_MSG_PUB.Count_And_Get
7867: ( p_count => x_msg_count
7868: , p_data => x_msg_data
7861: fnd_message.set_token('ACTION', l_msg_token);
7862:
7863: OE_MSG_PUB.ADD;
7864: RAISE FND_API.G_EXC_ERROR;
7865: x_return_status := FND_API.G_RET_STS_ERROR;
7866: OE_MSG_PUB.Count_And_Get
7867: ( p_count => x_msg_count
7868: , p_data => x_msg_data
7869: );
7884: ,x_msg_data => x_msg_data
7885: );
7886: OE_DEBUG_PUB.Add('x_return_status:' || x_return_status,1);
7887:
7888: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
7889: oe_debug_pub.add('process_release_source unexpected failure',3);
7890: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7891: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
7892: oe_debug_pub.add('process_release_source expected failure',3);
7886: OE_DEBUG_PUB.Add('x_return_status:' || x_return_status,1);
7887:
7888: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
7889: oe_debug_pub.add('process_release_source unexpected failure',3);
7890: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7891: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
7892: oe_debug_pub.add('process_release_source expected failure',3);
7893: RAISE FND_API.G_EXC_ERROR;
7894: END IF;
7887:
7888: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
7889: oe_debug_pub.add('process_release_source unexpected failure',3);
7890: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7891: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
7892: oe_debug_pub.add('process_release_source expected failure',3);
7893: RAISE FND_API.G_EXC_ERROR;
7894: END IF;
7895:
7889: oe_debug_pub.add('process_release_source unexpected failure',3);
7890: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7891: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
7892: oe_debug_pub.add('process_release_source expected failure',3);
7893: RAISE FND_API.G_EXC_ERROR;
7894: END IF;
7895:
7896: x_return_status := FND_API.G_RET_STS_SUCCESS;
7897: -- Get message count and data
7892: oe_debug_pub.add('process_release_source expected failure',3);
7893: RAISE FND_API.G_EXC_ERROR;
7894: END IF;
7895:
7896: x_return_status := FND_API.G_RET_STS_SUCCESS;
7897: -- Get message count and data
7898: OE_MSG_PUB.Count_And_Get
7899: ( p_count => x_msg_count
7900: , p_data => x_msg_data
7902:
7903:
7904: EXCEPTION /* Procedure exception handler */
7905:
7906: WHEN FND_API.G_EXC_ERROR THEN
7907: x_return_status := FND_API.G_RET_STS_ERROR ;
7908: OE_MSG_PUB.Count_And_Get
7909: ( p_count => x_msg_count,
7910: p_data => x_msg_data
7903:
7904: EXCEPTION /* Procedure exception handler */
7905:
7906: WHEN FND_API.G_EXC_ERROR THEN
7907: x_return_status := FND_API.G_RET_STS_ERROR ;
7908: OE_MSG_PUB.Count_And_Get
7909: ( p_count => x_msg_count,
7910: p_data => x_msg_data
7911: );
7909: ( p_count => x_msg_count,
7910: p_data => x_msg_data
7911: );
7912:
7913: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7914: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7915: OE_MSG_PUB.Count_And_Get
7916: ( p_count => x_msg_count,
7917: p_data => x_msg_data
7910: p_data => x_msg_data
7911: );
7912:
7913: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7914: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7915: OE_MSG_PUB.Count_And_Get
7916: ( p_count => x_msg_count,
7917: p_data => x_msg_data
7918: );
7917: p_data => x_msg_data
7918: );
7919:
7920: WHEN OTHERS THEN
7921: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7922: IF OE_MSG_PUB.Check_Msg_Level
7923: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
7924: THEN
7925: OE_MSG_PUB.Add_Exc_Msg
8001: ) = 'N' THEN
8002: OE_DEBUG_PUB.Add('Not authorize to Apply this Hold:'|| to_char(p_hold_id));
8003: fnd_message.set_name('ONT', 'ONT_HOLDS_SYSTEM_CHECK');
8004: OE_MSG_PUB.ADD;
8005: x_return_status := FND_API.G_RET_STS_ERROR;
8006: OE_MSG_PUB.Count_And_Get
8007: ( p_count => x_msg_count
8008: , p_data => x_msg_data
8009: );
8027: fnd_message.set_name('ONT', 'OE_HOLDS_AUTHORIZATION_FAILED');
8028: fnd_message.set_token('ACTION', l_msg_token);
8029:
8030: OE_MSG_PUB.ADD;
8031: -- RAISE FND_API.G_EXC_ERROR;
8032: x_return_status := FND_API.G_RET_STS_ERROR;
8033: OE_MSG_PUB.Count_And_Get
8034: ( p_count => x_msg_count
8035: , p_data => x_msg_data
8028: fnd_message.set_token('ACTION', l_msg_token);
8029:
8030: OE_MSG_PUB.ADD;
8031: -- RAISE FND_API.G_EXC_ERROR;
8032: x_return_status := FND_API.G_RET_STS_ERROR;
8033: OE_MSG_PUB.Count_And_Get
8034: ( p_count => x_msg_count
8035: , p_data => x_msg_data
8036: );
8077:
8078: OE_DEBUG_PUB.Add('After oe_holds_pvt.release_holds:' || x_return_status,3);
8079:
8080: -- Changes begin : ER 1373910
8081: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
8082:
8083: IF p_wf_release_action = 'Y' THEN
8084: OE_DEBUG_PUB.Add('Before calling Oe_holds_pvt.progress_order');
8085: progress_order( p_hold_id,
8092: END IF;
8093: END IF;
8094: -- Changes End : ER 1373910
8095:
8096: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8097: oe_debug_pub.add('process_release_holds_lines unexpected failure',3);
8098: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8099: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
8100: oe_debug_pub.add('process_release_holds_lines failure',3);
8094: -- Changes End : ER 1373910
8095:
8096: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8097: oe_debug_pub.add('process_release_holds_lines unexpected failure',3);
8098: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8099: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
8100: oe_debug_pub.add('process_release_holds_lines failure',3);
8101: RAISE FND_API.G_EXC_ERROR;
8102: END IF;
8095:
8096: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8097: oe_debug_pub.add('process_release_holds_lines unexpected failure',3);
8098: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8099: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
8100: oe_debug_pub.add('process_release_holds_lines failure',3);
8101: RAISE FND_API.G_EXC_ERROR;
8102: END IF;
8103:
8097: oe_debug_pub.add('process_release_holds_lines unexpected failure',3);
8098: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8099: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
8100: oe_debug_pub.add('process_release_holds_lines failure',3);
8101: RAISE FND_API.G_EXC_ERROR;
8102: END IF;
8103:
8104: END LOOP;
8105:
8102: END IF;
8103:
8104: END LOOP;
8105:
8106: x_return_status := FND_API.G_RET_STS_SUCCESS;
8107: -- Get message count and data
8108: OE_MSG_PUB.Count_And_Get
8109: ( p_count => x_msg_count
8110: , p_data => x_msg_data
8113: OE_DEBUG_PUB.Add('Exiting OE_Holds_PVT.process_release_holds_lines',1);
8114:
8115: EXCEPTION /* Procedure exception handler */
8116:
8117: WHEN FND_API.G_EXC_ERROR THEN
8118: x_return_status := FND_API.G_RET_STS_ERROR ;
8119: OE_MSG_PUB.Count_And_Get
8120: ( p_count => x_msg_count,
8121: p_data => x_msg_data
8114:
8115: EXCEPTION /* Procedure exception handler */
8116:
8117: WHEN FND_API.G_EXC_ERROR THEN
8118: x_return_status := FND_API.G_RET_STS_ERROR ;
8119: OE_MSG_PUB.Count_And_Get
8120: ( p_count => x_msg_count,
8121: p_data => x_msg_data
8122: );
8121: p_data => x_msg_data
8122: );
8123: ROLLBACK TO SAVEPOINT process_release_holds_lines;
8124:
8125: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8126: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
8127: OE_MSG_PUB.Count_And_Get
8128: ( p_count => x_msg_count,
8129: p_data => x_msg_data
8122: );
8123: ROLLBACK TO SAVEPOINT process_release_holds_lines;
8124:
8125: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8126: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
8127: OE_MSG_PUB.Count_And_Get
8128: ( p_count => x_msg_count,
8129: p_data => x_msg_data
8130: );
8130: );
8131: ROLLBACK TO SAVEPOINT process_release_holds_lines;
8132:
8133: WHEN OTHERS THEN
8134: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
8135: IF OE_MSG_PUB.Check_Msg_Level
8136: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
8137: THEN
8138: OE_MSG_PUB.Add_Exc_Msg
8210: ) = 'N' THEN
8211: OE_DEBUG_PUB.Add('Not authorize to Apply this Hold:'|| to_char(p_hold_id));
8212: fnd_message.set_name('ONT', 'ONT_HOLDS_SYSTEM_CHECK');
8213: OE_MSG_PUB.ADD;
8214: x_return_status := FND_API.G_RET_STS_ERROR;
8215: OE_MSG_PUB.Count_And_Get
8216: ( p_count => x_msg_count
8217: , p_data => x_msg_data
8218: );
8236: fnd_message.set_name('ONT', 'OE_HOLDS_AUTHORIZATION_FAILED');
8237: fnd_message.set_token('ACTION', l_msg_token);
8238:
8239: OE_MSG_PUB.ADD;
8240: -- RAISE FND_API.G_EXC_ERROR;
8241: x_return_status := FND_API.G_RET_STS_ERROR;
8242:
8243: OE_MSG_PUB.Count_And_Get
8244: ( p_count => x_msg_count
8237: fnd_message.set_token('ACTION', l_msg_token);
8238:
8239: OE_MSG_PUB.ADD;
8240: -- RAISE FND_API.G_EXC_ERROR;
8241: x_return_status := FND_API.G_RET_STS_ERROR;
8242:
8243: OE_MSG_PUB.Count_And_Get
8244: ( p_count => x_msg_count
8245: , p_data => x_msg_data
8280: OE_DEBUG_PUB.Add('x_msg_count:' || to_char(x_msg_count),2);
8281: OE_DEBUG_PUB.Add('x_msg_data:' || x_msg_data,2);
8282:
8283: -- Changes begin : ER 1373910
8284: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
8285: IF p_wf_release_action = 'Y' THEN
8286: OE_DEBUG_PUB.Add('Before calling Oe_holds_pvt.progress_order');
8287: progress_order( p_hold_id,
8288: p_num_of_records,
8294: END IF;
8295: END IF;
8296: -- Changes end : ER 1373910
8297:
8298: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8299: oe_debug_pub.add('process_release_holds_orders unexpected failure',3);
8300: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8301: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
8302: oe_debug_pub.add('process_release_holds_orders failure',3);
8296: -- Changes end : ER 1373910
8297:
8298: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8299: oe_debug_pub.add('process_release_holds_orders unexpected failure',3);
8300: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8301: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
8302: oe_debug_pub.add('process_release_holds_orders failure',3);
8303: RAISE FND_API.G_EXC_ERROR;
8304: END IF;
8297:
8298: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8299: oe_debug_pub.add('process_release_holds_orders unexpected failure',3);
8300: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8301: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
8302: oe_debug_pub.add('process_release_holds_orders failure',3);
8303: RAISE FND_API.G_EXC_ERROR;
8304: END IF;
8305:
8299: oe_debug_pub.add('process_release_holds_orders unexpected failure',3);
8300: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8301: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
8302: oe_debug_pub.add('process_release_holds_orders failure',3);
8303: RAISE FND_API.G_EXC_ERROR;
8304: END IF;
8305:
8306:
8307: END LOOP;
8305:
8306:
8307: END LOOP;
8308:
8309: x_return_status := FND_API.G_RET_STS_SUCCESS;
8310: -- Get message count and data
8311: OE_MSG_PUB.Count_And_Get
8312: ( p_count => x_msg_count
8313: , p_data => x_msg_data
8316: OE_DEBUG_PUB.Add('Exiting OE_Holds_PVT.process_release_holds_orders',1);
8317:
8318: EXCEPTION /* Procedure exception handler */
8319:
8320: WHEN FND_API.G_EXC_ERROR THEN
8321: x_return_status := FND_API.G_RET_STS_ERROR ;
8322: OE_MSG_PUB.Count_And_Get
8323: ( p_count => x_msg_count,
8324: p_data => x_msg_data
8317:
8318: EXCEPTION /* Procedure exception handler */
8319:
8320: WHEN FND_API.G_EXC_ERROR THEN
8321: x_return_status := FND_API.G_RET_STS_ERROR ;
8322: OE_MSG_PUB.Count_And_Get
8323: ( p_count => x_msg_count,
8324: p_data => x_msg_data
8325: );
8324: p_data => x_msg_data
8325: );
8326: ROLLBACK TO SAVEPOINT process_release_holds_orders;
8327:
8328: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8329: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
8330: OE_MSG_PUB.Count_And_Get
8331: ( p_count => x_msg_count,
8332: p_data => x_msg_data
8325: );
8326: ROLLBACK TO SAVEPOINT process_release_holds_orders;
8327:
8328: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8329: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
8330: OE_MSG_PUB.Count_And_Get
8331: ( p_count => x_msg_count,
8332: p_data => x_msg_data
8333: );
8333: );
8334: ROLLBACK TO SAVEPOINT process_release_holds_orders;
8335:
8336: WHEN OTHERS THEN
8337: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
8338: IF OE_MSG_PUB.Check_Msg_Level
8339: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
8340: THEN
8341: OE_MSG_PUB.Add_Exc_Msg
8407: OE_DEBUG_PUB.Add('Bug 1946783 Credit Hold should be released from AR',1);
8408:
8409: fnd_message.set_name('ONT', 'OE_CC_AR_HOLD_NOT_RELEASED');
8410: OE_MSG_PUB.ADD;
8411: RAISE FND_API.G_EXC_ERROR;
8412: x_return_status := FND_API.G_RET_STS_ERROR;
8413: OE_MSG_PUB.Count_And_Get
8414: ( p_count => x_msg_count
8415: , p_data => x_msg_data
8408:
8409: fnd_message.set_name('ONT', 'OE_CC_AR_HOLD_NOT_RELEASED');
8410: OE_MSG_PUB.ADD;
8411: RAISE FND_API.G_EXC_ERROR;
8412: x_return_status := FND_API.G_RET_STS_ERROR;
8413: OE_MSG_PUB.Count_And_Get
8414: ( p_count => x_msg_count
8415: , p_data => x_msg_data
8416: );
8428: OE_DEBUG_PUB.Add('Not authorize to Apply this Hold:'|| to_char(l_hold_id));
8429: fnd_message.set_name('ONT', 'ONT_HOLDS_SYSTEM_CHECK');
8430: fnd_message.set_token('ACTION', 'Release');
8431: OE_MSG_PUB.ADD;
8432: x_return_status := FND_API.G_RET_STS_ERROR;
8433: OE_MSG_PUB.Count_And_Get
8434: ( p_count => x_msg_count
8435: , p_data => x_msg_data
8436: );
8454: fnd_message.set_name('ONT', 'OE_HOLDS_AUTHORIZATION_FAILED');
8455: fnd_message.set_token('ACTION', l_msg_token);
8456:
8457: OE_MSG_PUB.ADD;
8458: RAISE FND_API.G_EXC_ERROR;
8459: x_return_status := FND_API.G_RET_STS_ERROR;
8460: OE_MSG_PUB.Count_And_Get
8461: ( p_count => x_msg_count
8462: , p_data => x_msg_data
8455: fnd_message.set_token('ACTION', l_msg_token);
8456:
8457: OE_MSG_PUB.ADD;
8458: RAISE FND_API.G_EXC_ERROR;
8459: x_return_status := FND_API.G_RET_STS_ERROR;
8460: OE_MSG_PUB.Count_And_Get
8461: ( p_count => x_msg_count
8462: , p_data => x_msg_data
8463: );
8481:
8482: OE_DEBUG_PUB.Add('x_return_status:' || x_return_status,1);
8483:
8484: -- Changes begin : ER 1373910
8485: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
8486: IF p_wf_release_action = 'Y' THEN
8487: Oe_debug_pub.Add('Before calling Oe_holds_pvt.progress_order');
8488: progress_order( p_hold_source_id,
8489: x_return_status,
8493: END IF;
8494: END IF;
8495: -- Changes end : ER 1373910
8496:
8497: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8498: oe_debug_pub.add('process_release_source unexpected failure',3);
8499: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8500: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
8501: oe_debug_pub.add('process_release_source expected failure',3);
8495: -- Changes end : ER 1373910
8496:
8497: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8498: oe_debug_pub.add('process_release_source unexpected failure',3);
8499: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8500: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
8501: oe_debug_pub.add('process_release_source expected failure',3);
8502: RAISE FND_API.G_EXC_ERROR;
8503: END IF;
8496:
8497: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8498: oe_debug_pub.add('process_release_source unexpected failure',3);
8499: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8500: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
8501: oe_debug_pub.add('process_release_source expected failure',3);
8502: RAISE FND_API.G_EXC_ERROR;
8503: END IF;
8504:
8498: oe_debug_pub.add('process_release_source unexpected failure',3);
8499: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8500: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
8501: oe_debug_pub.add('process_release_source expected failure',3);
8502: RAISE FND_API.G_EXC_ERROR;
8503: END IF;
8504:
8505: x_return_status := FND_API.G_RET_STS_SUCCESS;
8506: -- Get message count and data
8501: oe_debug_pub.add('process_release_source expected failure',3);
8502: RAISE FND_API.G_EXC_ERROR;
8503: END IF;
8504:
8505: x_return_status := FND_API.G_RET_STS_SUCCESS;
8506: -- Get message count and data
8507: OE_MSG_PUB.Count_And_Get
8508: ( p_count => x_msg_count
8509: , p_data => x_msg_data
8511:
8512:
8513: EXCEPTION /* Procedure exception handler */
8514:
8515: WHEN FND_API.G_EXC_ERROR THEN
8516: x_return_status := FND_API.G_RET_STS_ERROR ;
8517: OE_MSG_PUB.Count_And_Get
8518: ( p_count => x_msg_count,
8519: p_data => x_msg_data
8512:
8513: EXCEPTION /* Procedure exception handler */
8514:
8515: WHEN FND_API.G_EXC_ERROR THEN
8516: x_return_status := FND_API.G_RET_STS_ERROR ;
8517: OE_MSG_PUB.Count_And_Get
8518: ( p_count => x_msg_count,
8519: p_data => x_msg_data
8520: );
8518: ( p_count => x_msg_count,
8519: p_data => x_msg_data
8520: );
8521:
8522: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8523: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
8524: OE_MSG_PUB.Count_And_Get
8525: ( p_count => x_msg_count,
8526: p_data => x_msg_data
8519: p_data => x_msg_data
8520: );
8521:
8522: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8523: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
8524: OE_MSG_PUB.Count_And_Get
8525: ( p_count => x_msg_count,
8526: p_data => x_msg_data
8527: );
8526: p_data => x_msg_data
8527: );
8528:
8529: WHEN OTHERS THEN
8530: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
8531: IF OE_MSG_PUB.Check_Msg_Level
8532: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
8533: THEN
8534: OE_MSG_PUB.Add_Exc_Msg
8597: AND OH.HOLD_SOURCE_ID = HS.HOLD_SOURCE_ID;
8598:
8599:
8600: BEGIN
8601: x_return_status := FND_API.G_RET_STS_SUCCESS;
8602:
8603: l_user_id := OE_HOLDS_PVT.get_user_id;
8604: l_org_id := OE_GLOBALS.G_ORG_ID;
8605: if l_org_id IS NULL THEN
8678:
8679: exception
8680: WHEN NO_DATA_FOUND then
8681: null; -- its ok if there is not holds on the orignal line
8682: WHEN FND_API.G_EXC_ERROR THEN
8683: x_return_status := FND_API.G_RET_STS_ERROR;
8684: OE_MSG_PUB.Count_And_Get
8685: ( p_count => x_msg_count
8686: , p_data => x_msg_data
8679: exception
8680: WHEN NO_DATA_FOUND then
8681: null; -- its ok if there is not holds on the orignal line
8682: WHEN FND_API.G_EXC_ERROR THEN
8683: x_return_status := FND_API.G_RET_STS_ERROR;
8684: OE_MSG_PUB.Count_And_Get
8685: ( p_count => x_msg_count
8686: , p_data => x_msg_data
8687: );
8684: OE_MSG_PUB.Count_And_Get
8685: ( p_count => x_msg_count
8686: , p_data => x_msg_data
8687: );
8688: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8689: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8690: OE_MSG_PUB.Count_And_Get
8691: ( p_count => x_msg_count
8692: , p_data => x_msg_data
8685: ( p_count => x_msg_count
8686: , p_data => x_msg_data
8687: );
8688: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8689: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8690: OE_MSG_PUB.Count_And_Get
8691: ( p_count => x_msg_count
8692: , p_data => x_msg_data
8693: );
8691: ( p_count => x_msg_count
8692: , p_data => x_msg_data
8693: );
8694: WHEN OTHERS THEN
8695: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8696: IF OE_MSG_PUB.Check_Msg_Level
8697: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
8698: THEN
8699: OE_MSG_PUB.Add_Exc_Msg
8737: BEGIN
8738:
8739: OE_DEBUG_PUB.Add('In OE_Holds_pvt.Apply Holds, Creating Hold Source',1);
8740:
8741: x_return_status := FND_API.G_RET_STS_SUCCESS;
8742:
8743: -- 8477694
8744:
8745: IF NOT OE_GLOBALS.G_SYS_HOLD THEN
8753: l_msg_token := 'APPLY(System Hold)';
8754: fnd_message.set_name('ONT', 'OE_HOLDS_AUTHORIZATION_FAILED');
8755: fnd_message.set_token('ACTION', l_msg_token);
8756: OE_MSG_PUB.ADD;
8757: x_return_status := FND_API.G_RET_STS_ERROR;
8758: OE_MSG_PUB.Count_And_Get
8759: ( p_count => x_msg_count
8760: , p_data => x_msg_data
8761: );
8787: l_msg_token := fnd_message.get;
8788: fnd_message.set_name('ONT', 'OE_HOLDS_AUTHORIZATION_FAILED');
8789: fnd_message.set_token('ACTION', l_msg_token);
8790: OE_MSG_PUB.ADD;
8791: x_return_status := FND_API.G_RET_STS_ERROR;
8792: OE_MSG_PUB.Count_And_Get
8793: ( p_count => x_msg_count
8794: , p_data => x_msg_data
8795: );
8807: x_msg_count => x_msg_count,
8808: x_msg_data => x_msg_data );
8809: OE_DEBUG_PUB.Add('Validate return status:' || x_return_status,1);
8810:
8811: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8812: OE_Debug_PUB.Add('Validate not successful',1);
8813: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
8814: RAISE FND_API.G_EXC_ERROR;
8815: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8809: OE_DEBUG_PUB.Add('Validate return status:' || x_return_status,1);
8810:
8811: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8812: OE_Debug_PUB.Add('Validate not successful',1);
8813: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
8814: RAISE FND_API.G_EXC_ERROR;
8815: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8816: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8817: END IF;
8810:
8811: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8812: OE_Debug_PUB.Add('Validate not successful',1);
8813: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
8814: RAISE FND_API.G_EXC_ERROR;
8815: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8816: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8817: END IF;
8818: ELSE
8811: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8812: OE_Debug_PUB.Add('Validate not successful',1);
8813: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
8814: RAISE FND_API.G_EXC_ERROR;
8815: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8816: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8817: END IF;
8818: ELSE
8819: OE_DEBUG_PUB.Add ('Calling Create_Hold_Source bug 5548778 overload',1);
8812: OE_Debug_PUB.Add('Validate not successful',1);
8813: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
8814: RAISE FND_API.G_EXC_ERROR;
8815: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
8816: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8817: END IF;
8818: ELSE
8819: OE_DEBUG_PUB.Add ('Calling Create_Hold_Source bug 5548778 overload',1);
8820: Create_Hold_Source (
8829: OE_DEBUG_PUB.Add('x_return_status->' || x_return_status,1);
8830: OE_DEBUG_PUB.Add('x_msg_count->' || x_msg_count,1);
8831: OE_DEBUG_PUB.Add('x_msg_data' || x_msg_data,1);
8832: OE_DEBUG_PUB.Add('l_hold_exists' || l_hold_exists,1);
8833: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8834: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
8835: RAISE FND_API.G_EXC_ERROR;
8836: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
8837: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8830: OE_DEBUG_PUB.Add('x_msg_count->' || x_msg_count,1);
8831: OE_DEBUG_PUB.Add('x_msg_data' || x_msg_data,1);
8832: OE_DEBUG_PUB.Add('l_hold_exists' || l_hold_exists,1);
8833: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8834: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
8835: RAISE FND_API.G_EXC_ERROR;
8836: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
8837: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8838: END IF;
8831: OE_DEBUG_PUB.Add('x_msg_data' || x_msg_data,1);
8832: OE_DEBUG_PUB.Add('l_hold_exists' || l_hold_exists,1);
8833: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8834: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
8835: RAISE FND_API.G_EXC_ERROR;
8836: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
8837: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8838: END IF;
8839: END IF;
8832: OE_DEBUG_PUB.Add('l_hold_exists' || l_hold_exists,1);
8833: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8834: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
8835: RAISE FND_API.G_EXC_ERROR;
8836: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
8837: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8838: END IF;
8839: END IF;
8840:
8833: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8834: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
8835: RAISE FND_API.G_EXC_ERROR;
8836: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
8837: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8838: END IF;
8839: END IF;
8840:
8841: OE_DEBUG_PUB.Add('l_hold_source_id->' ||
9021: -- ER#3667551 to hold System Parameter value
9022: l_credithold_cust VARCHAR2(10) := NVL(OE_SYS_PARAMETERS.value('ONT_CREDITHOLD_TYPE'),'S') ;--ER# 3667551
9023: l_master_orgid VARCHAR2(10) := oe_sys_parameters.Value('MASTER_ORGANIZATION_ID'); --13653352
9024: BEGIN
9025: x_return_status := FND_API.G_RET_STS_SUCCESS;
9026: l_user_id := OE_HOLDS_PVT.get_user_id;
9027: l_org_id := MO_GLOBAL.get_current_org_id;
9028: x_is_hold_applied := NULL;
9029: IF l_org_id IS NULL THEN
9028: x_is_hold_applied := NULL;
9029: IF l_org_id IS NULL THEN
9030: -- org_id is null, raise an error.
9031: oe_debug_pub.add('Org_Id is NULL',1);
9032: x_return_status := FND_API.G_RET_STS_ERROR;
9033: FND_MESSAGE.SET_NAME('FND','MO_ORG_REQUIRED');
9034: FND_MSG_PUB.ADD;
9035: RAISE FND_API.G_EXC_ERROR;
9036: END IF;
9031: oe_debug_pub.add('Org_Id is NULL',1);
9032: x_return_status := FND_API.G_RET_STS_ERROR;
9033: FND_MESSAGE.SET_NAME('FND','MO_ORG_REQUIRED');
9034: FND_MSG_PUB.ADD;
9035: RAISE FND_API.G_EXC_ERROR;
9036: END IF;
9037:
9038: oe_debug_pub.add('p_hold_source_rec.hold_source_id:' ||
9039: p_hold_source_rec.hold_source_id);
9244: fnd_message.set_name('ONT', 'OE_NO_HOLD_ALL_LINES');
9245: fnd_message.set_token('WF_ACT', l_user_activity_name);
9246: OE_MSG_PUB.ADD;
9247: oe_debug_pub.add(' Hold Not applied for All requested records');
9248: RAISE FND_API.G_EXC_ERROR;
9249: ELSIF l_sql_rowcount > 0 THEN
9250: SELECT count(*)
9251: into l_parent_count
9252: FROM OE_ORDER_HEADERS_ALL h, OE_ORDER_LINES_ALL ol
9566: fnd_message.set_name('ONT', 'OE_NO_HOLD_ALL_LINES');
9567: fnd_message.set_token('WF_ACT', l_user_activity_name);
9568: OE_MSG_PUB.ADD;
9569: oe_debug_pub.add(' Hold Not applied for All requested records');
9570: RAISE FND_API.G_EXC_ERROR;
9571: ELSIF l_sql_rowcount > 0 THEN
9572: SELECT count(*)
9573: into l_parent_count
9574: FROM OE_ORDER_HEADERS_ALL h, OE_ORDER_LINES_ALL ol , ra_terms_b rt
9783: fnd_message.set_name('ONT', 'OE_NO_HOLD_ALL_LINES');
9784: fnd_message.set_token('WF_ACT', l_user_activity_name);
9785: OE_MSG_PUB.ADD;
9786: oe_debug_pub.add(' Hold Not applied for All requested records');
9787: RAISE FND_API.G_EXC_ERROR;
9788: ELSIF l_sql_rowcount > 0 THEN
9789: SELECT count(*)
9790: into l_parent_count
9791: FROM OE_ORDER_HEADERS_ALL h, OE_ORDER_LINES_ALL ol
9996: fnd_message.set_name('ONT', 'OE_NO_HOLD_ALL_LINES');
9997: fnd_message.set_token('WF_ACT', l_user_activity_name);
9998: OE_MSG_PUB.ADD;
9999: oe_debug_pub.add(' Hold Not applied for All requested records');
10000: RAISE FND_API.G_EXC_ERROR;
10001: ELSIF l_sql_rowcount > 0 THEN
10002: SELECT count(*)
10003: into l_parent_count
10004: FROM OE_ORDER_HEADERS_ALL h, OE_ORDER_LINES_ALL ol
10210: fnd_message.set_name('ONT', 'OE_NO_HOLD_ALL_LINES');
10211: fnd_message.set_token('WF_ACT', l_user_activity_name);
10212: OE_MSG_PUB.ADD;
10213: oe_debug_pub.add(' Hold Not applied for All requested records');
10214: RAISE FND_API.G_EXC_ERROR;
10215: ELSIF l_sql_rowcount > 0 THEN
10216: SELECT count(*)
10217: into l_parent_count
10218: FROM OE_ORDER_HEADERS_ALL h, OE_ORDER_LINES_ALL ol
10445: fnd_message.set_name('ONT', 'OE_NO_HOLD_ALL_LINES');
10446: fnd_message.set_token('WF_ACT', l_user_activity_name);
10447: OE_MSG_PUB.ADD;
10448: oe_debug_pub.add(' Hold Not applied for All requested records');
10449: RAISE FND_API.G_EXC_ERROR;
10450: ELSIF l_sql_rowcount > 0 THEN
10451: SELECT count(*)
10452: into l_parent_count
10453: FROM OE_ORDER_HEADERS_ALL h, OE_ORDER_LINES_ALL ol
10958: fnd_message.set_name('ONT', 'OE_NO_HOLD_ALL_LINES');
10959: fnd_message.set_token('WF_ACT', l_user_activity_name);
10960: OE_MSG_PUB.ADD;
10961: oe_debug_pub.add(' Hold Not applied for All requested records');
10962: RAISE FND_API.G_EXC_ERROR;
10963: ELSIF l_sql_rowcount > 0 THEN
10964: SELECT count(*)
10965: into l_parent_count
10966: FROM OE_ORDER_HEADERS_ALL h, OE_ORDER_LINES_ALL ol
11263: fnd_message.set_name('ONT', 'OE_NO_HOLD_ALL_LINES');
11264: fnd_message.set_token('WF_ACT', l_user_activity_name);
11265: OE_MSG_PUB.ADD;
11266: oe_debug_pub.add(' Hold Not applied for All requested records');
11267: RAISE FND_API.G_EXC_ERROR;
11268: ELSIF l_sql_rowcount > 0 THEN
11269: SELECT count(*)
11270: into l_parent_count
11271: FROM OE_ORDER_HEADERS_ALL h, OE_ORDER_LINES_ALL ol
11477: fnd_message.set_name('ONT', 'OE_NO_HOLD_ALL_LINES');
11478: fnd_message.set_token('WF_ACT', l_user_activity_name);
11479: OE_MSG_PUB.ADD;
11480: oe_debug_pub.add(' Hold Not applied for All requested records');
11481: RAISE FND_API.G_EXC_ERROR;
11482: ELSIF l_sql_rowcount > 0 THEN
11483: SELECT count(*)
11484: into l_parent_count
11485: FROM OE_ORDER_HEADERS_ALL h, OE_ORDER_LINES_ALL ol
11694: fnd_message.set_name('ONT', 'OE_NO_HOLD_ALL_LINES');
11695: fnd_message.set_token('WF_ACT', l_user_activity_name);
11696: OE_MSG_PUB.ADD;
11697: oe_debug_pub.add(' Hold Not applied for All requested records');
11698: RAISE FND_API.G_EXC_ERROR;
11699: ELSIF l_sql_rowcount > 0 THEN
11700: SELECT count(*)
11701: into l_parent_count
11702: FROM OE_ORDER_HEADERS_ALL h, OE_ORDER_LINES_ALL ol
12019: fnd_message.set_name('ONT', 'OE_NO_HOLD_ALL_LINES');
12020: fnd_message.set_token('WF_ACT', l_user_activity_name);
12021: OE_MSG_PUB.ADD;
12022: oe_debug_pub.add(' Hold Not applied for All requested records');
12023: RAISE FND_API.G_EXC_ERROR;
12024: ELSIF l_sql_rowcount > 0 THEN
12025: SELECT count(*)
12026: into l_parent_count
12027: FROM OE_ORDER_HEADERS_ALL h, OE_ORDER_LINES_ALL ol
12233: fnd_message.set_name('ONT', 'OE_NO_HOLD_ALL_LINES');
12234: fnd_message.set_token('WF_ACT', l_user_activity_name);
12235: OE_MSG_PUB.ADD;
12236: oe_debug_pub.add(' Hold Not applied for All requested records');
12237: RAISE FND_API.G_EXC_ERROR;
12238: ELSIF l_sql_rowcount > 0 THEN
12239: SELECT count(*)
12240: into l_parent_count
12241: FROM OE_ORDER_HEADERS_ALL h, OE_ORDER_LINES_ALL ol
12447: fnd_message.set_name('ONT', 'OE_NO_HOLD_ALL_LINES');
12448: fnd_message.set_token('WF_ACT', l_user_activity_name);
12449: OE_MSG_PUB.ADD;
12450: oe_debug_pub.add(' Hold Not applied for All requested records');
12451: RAISE FND_API.G_EXC_ERROR;
12452: ELSIF l_sql_rowcount > 0 THEN
12453: SELECT count(*)
12454: into l_parent_count
12455: FROM OE_ORDER_HEADERS_ALL h, OE_ORDER_LINES_ALL ol
12658: fnd_message.set_name('ONT', 'OE_NO_HOLD_ALL_LINES');
12659: fnd_message.set_token('WF_ACT', l_user_activity_name);
12660: OE_MSG_PUB.ADD;
12661: oe_debug_pub.add(' Hold Not applied for All requested records');
12662: RAISE FND_API.G_EXC_ERROR;
12663: ELSIF l_sql_rowcount > 0 THEN
12664: SELECT count(*)
12665: into l_parent_count
12666: FROM OE_ORDER_HEADERS_ALL h, OE_ORDER_LINES_ALL ol
12844: fnd_message.set_name('ONT', 'OE_NO_HOLD_ALL_LINES');
12845: fnd_message.set_token('WF_ACT', l_user_activity_name);
12846: OE_MSG_PUB.ADD;
12847: oe_debug_pub.add(' Hold Not applied for All requested records');
12848: RAISE FND_API.G_EXC_ERROR;
12849: ELSIF l_sql_rowcount > 0 THEN
12850: x_is_hold_applied := TRUE;
12851: SELECT count(*)
12852: into l_parent_count
13101: fnd_message.set_name('ONT', 'OE_NO_HOLD_ALL_LINES');
13102: fnd_message.set_token('WF_ACT', l_user_activity_name);
13103: OE_MSG_PUB.ADD;
13104: oe_debug_pub.add(' Hold Not applied for All requested records');
13105: RAISE FND_API.G_EXC_ERROR;
13106: ELSIF l_sql_rowcount > 0 THEN
13107: SELECT count(*)
13108: into l_parent_count
13109: FROM OE_ORDER_HEADERS_ALL h
13574: fnd_message.set_name('ONT', 'OE_NO_HOLD_ALL_LINES');
13575: fnd_message.set_token('WF_ACT', l_user_activity_name);
13576: OE_MSG_PUB.ADD;
13577: oe_debug_pub.add(' Hold Not applied for All requested records');
13578: RAISE FND_API.G_EXC_ERROR;
13579: ELSIF l_sql_rowcount > 0 THEN
13580: SELECT count(*)
13581: into l_parent_count
13582: FROM OE_ORDER_HEADERS_ALL h, OE_ORDER_LINES_ALL ol
13786: fnd_message.set_name('ONT', 'OE_NO_HOLD_ALL_LINES');
13787: fnd_message.set_token('WF_ACT', l_user_activity_name);
13788: OE_MSG_PUB.ADD;
13789: oe_debug_pub.add(' Hold Not applied for All requested records');
13790: RAISE FND_API.G_EXC_ERROR;
13791: ELSIF l_sql_rowcount > 0 THEN
13792: SELECT count(*)
13793: into l_parent_count
13794: FROM OE_ORDER_HEADERS_ALL h, OE_ORDER_LINES_ALL ol
13997: fnd_message.set_name('ONT', 'OE_NO_HOLD_ALL_LINES');
13998: fnd_message.set_token('WF_ACT', l_user_activity_name);
13999: OE_MSG_PUB.ADD;
14000: oe_debug_pub.add(' Hold Not applied for All requested records');
14001: RAISE FND_API.G_EXC_ERROR;
14002: ELSIF l_sql_rowcount > 0 THEN
14003: SELECT count(*)
14004: into l_parent_count
14005: FROM OE_ORDER_HEADERS_ALL h, OE_ORDER_LINES_ALL ol
14208:
14209: fnd_message.set_name('ONT', 'OE_NO_HOLD_ALL_LINES');
14210: fnd_message.set_token('WF_ACT', l_user_activity_name);
14211: OE_MSG_PUB.ADD;
14212: RAISE FND_API.G_EXC_ERROR;
14213: ELSIF l_sql_rowcount > 0 THEN
14214: SELECT count(*)
14215: into l_parent_count
14216: FROM OE_ORDER_HEADERS_ALL h, OE_ORDER_LINES_ALL ol
15122: END IF;
15123: -- GENESIS --
15124:
15125: EXCEPTION
15126: WHEN FND_API.G_EXC_ERROR THEN
15127: --ROLLBACK TO APPLY_HOLDS_PUB;
15128: x_return_status := FND_API.G_RET_STS_ERROR;
15129: OE_MSG_PUB.Count_And_Get
15130: ( p_count => x_msg_count
15124:
15125: EXCEPTION
15126: WHEN FND_API.G_EXC_ERROR THEN
15127: --ROLLBACK TO APPLY_HOLDS_PUB;
15128: x_return_status := FND_API.G_RET_STS_ERROR;
15129: OE_MSG_PUB.Count_And_Get
15130: ( p_count => x_msg_count
15131: , p_data => x_msg_data
15132: );
15129: OE_MSG_PUB.Count_And_Get
15130: ( p_count => x_msg_count
15131: , p_data => x_msg_data
15132: );
15133: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
15134: --ROLLBACK TO APPLY_HOLDS_PUB;
15135: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
15136: OE_MSG_PUB.Count_And_Get
15137: ( p_count => x_msg_count
15131: , p_data => x_msg_data
15132: );
15133: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
15134: --ROLLBACK TO APPLY_HOLDS_PUB;
15135: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
15136: OE_MSG_PUB.Count_And_Get
15137: ( p_count => x_msg_count
15138: , p_data => x_msg_data
15139: );
15138: , p_data => x_msg_data
15139: );
15140: WHEN OTHERS THEN
15141: --ROLLBACK TO APPLY_HOLDS_PUB;
15142: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
15143: IF OE_MSG_PUB.Check_Msg_Level
15144: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
15145: THEN
15146: OE_MSG_PUB.Add_Exc_Msg