28: oe_debug_pub.add('passed rule id is'||p_qualifier_rule_id);
29: --dbms_output.put_line('Entering QP_DELAYED_REQUESTS_UTIL.check dup');
30: --dbms_output.put_line('passed rule id is'||p_qualifier_rule_id);
31:
32: x_return_status := FND_API.G_RET_STS_SUCCESS;
33: open C_Qualifiers(p_qualifier_rule_id);
34: fetch C_Qualifiers into l_status;
35: close C_Qualifiers;
36:
38: If l_status = 'DUPLICATE' Then
39:
40: oe_debug_pub.add('status is duplicate');
41: --dbms_output.put_line('status is duplicate');
42: x_return_status := FND_API.G_RET_STS_ERROR;
43:
44: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR)
45: THEN
46:
55:
56: EXCEPTION
57: WHEN DUPLICATE_DISCOUNT
58: THEN
59: x_return_status := FND_API.G_RET_STS_ERROR;
60:
61: WHEN FND_API.G_EXC_ERROR THEN
62:
63: x_return_status := FND_API.G_RET_STS_ERROR;
57: WHEN DUPLICATE_DISCOUNT
58: THEN
59: x_return_status := FND_API.G_RET_STS_ERROR;
60:
61: WHEN FND_API.G_EXC_ERROR THEN
62:
63: x_return_status := FND_API.G_RET_STS_ERROR;
64:
65: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
59: x_return_status := FND_API.G_RET_STS_ERROR;
60:
61: WHEN FND_API.G_EXC_ERROR THEN
62:
63: x_return_status := FND_API.G_RET_STS_ERROR;
64:
65: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
66:
67: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
61: WHEN FND_API.G_EXC_ERROR THEN
62:
63: x_return_status := FND_API.G_RET_STS_ERROR;
64:
65: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
66:
67: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
68:
69: WHEN OTHERS THEN
63: x_return_status := FND_API.G_RET_STS_ERROR;
64:
65: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
66:
67: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
68:
69: WHEN OTHERS THEN
70:
71: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
67: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
68:
69: WHEN OTHERS THEN
70:
71: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
72:
73: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
74: THEN
75: OE_MSG_PUB.Add_Exc_Msg
100:
101:
102: EXCEPTION
103:
104: WHEN FND_API.G_EXC_ERROR THEN
105:
106: x_return_status := FND_API.G_RET_STS_ERROR;
107:
108: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
102: EXCEPTION
103:
104: WHEN FND_API.G_EXC_ERROR THEN
105:
106: x_return_status := FND_API.G_RET_STS_ERROR;
107:
108: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
109:
110: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
104: WHEN FND_API.G_EXC_ERROR THEN
105:
106: x_return_status := FND_API.G_RET_STS_ERROR;
107:
108: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
109:
110: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
111:
112: WHEN OTHERS THEN
106: x_return_status := FND_API.G_RET_STS_ERROR;
107:
108: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
109:
110: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
111:
112: WHEN OTHERS THEN
113:
114: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
110: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
111:
112: WHEN OTHERS THEN
113:
114: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
115:
116: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
117: THEN
118: OE_MSG_PUB.Add_Exc_Msg
126: p_active_flag in VARCHAR2,
127: x_return_status OUT NOCOPY VARCHAR2)
128: IS
129: BEGIN
130: x_return_status := FND_API.G_RET_STS_SUCCESS;
131:
132: UPDATE qp_qualifiers
133: SET active_flag = p_active_flag
134: WHERE list_header_id = p_list_header_id;
171: END IF;
172:
173: EXCEPTION
174: WHEN NO_DATA_FOUND THEN
175: x_return_status := FND_API.G_RET_STS_SUCCESS;
176: WHEN FND_API.G_EXC_ERROR THEN
177: x_return_status := FND_API.G_RET_STS_ERROR;
178: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
179: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
172:
173: EXCEPTION
174: WHEN NO_DATA_FOUND THEN
175: x_return_status := FND_API.G_RET_STS_SUCCESS;
176: WHEN FND_API.G_EXC_ERROR THEN
177: x_return_status := FND_API.G_RET_STS_ERROR;
178: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
179: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
180: WHEN OTHERS THEN
173: EXCEPTION
174: WHEN NO_DATA_FOUND THEN
175: x_return_status := FND_API.G_RET_STS_SUCCESS;
176: WHEN FND_API.G_EXC_ERROR THEN
177: x_return_status := FND_API.G_RET_STS_ERROR;
178: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
179: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
180: WHEN OTHERS THEN
181: x_return_status := FND_API.G_RET_STS_ERROR;
174: WHEN NO_DATA_FOUND THEN
175: x_return_status := FND_API.G_RET_STS_SUCCESS;
176: WHEN FND_API.G_EXC_ERROR THEN
177: x_return_status := FND_API.G_RET_STS_ERROR;
178: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
179: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
180: WHEN OTHERS THEN
181: x_return_status := FND_API.G_RET_STS_ERROR;
182: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
175: x_return_status := FND_API.G_RET_STS_SUCCESS;
176: WHEN FND_API.G_EXC_ERROR THEN
177: x_return_status := FND_API.G_RET_STS_ERROR;
178: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
179: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
180: WHEN OTHERS THEN
181: x_return_status := FND_API.G_RET_STS_ERROR;
182: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
183: OE_MSG_PUB.Add_Exc_Msg
177: x_return_status := FND_API.G_RET_STS_ERROR;
178: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
179: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
180: WHEN OTHERS THEN
181: x_return_status := FND_API.G_RET_STS_ERROR;
182: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
183: OE_MSG_PUB.Add_Exc_Msg
184: ( G_PKG_NAME
185: , 'QP_Delayed_Requests_Util');
191: x_return_status OUT NOCOPY VARCHAR2)
192: IS
193: x_result VARCHAR2(1);
194: BEGIN
195: x_return_status := FND_API.G_RET_STS_SUCCESS;
196:
197: IF p_list_type_code = 'AGR' THEN
198: QP_security.create_default_grants( p_instance_type => QP_security.G_AGREEMENT_OBJECT,
199: p_instance_pk1 => p_list_header_id,
209: END IF;
210:
211: EXCEPTION
212: WHEN NO_DATA_FOUND THEN
213: x_return_status := FND_API.G_RET_STS_SUCCESS;
214: WHEN FND_API.G_EXC_ERROR THEN
215: x_return_status := FND_API.G_RET_STS_ERROR;
216: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
217: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
210:
211: EXCEPTION
212: WHEN NO_DATA_FOUND THEN
213: x_return_status := FND_API.G_RET_STS_SUCCESS;
214: WHEN FND_API.G_EXC_ERROR THEN
215: x_return_status := FND_API.G_RET_STS_ERROR;
216: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
217: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
218: WHEN OTHERS THEN
211: EXCEPTION
212: WHEN NO_DATA_FOUND THEN
213: x_return_status := FND_API.G_RET_STS_SUCCESS;
214: WHEN FND_API.G_EXC_ERROR THEN
215: x_return_status := FND_API.G_RET_STS_ERROR;
216: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
217: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
218: WHEN OTHERS THEN
219: x_return_status := FND_API.G_RET_STS_ERROR;
212: WHEN NO_DATA_FOUND THEN
213: x_return_status := FND_API.G_RET_STS_SUCCESS;
214: WHEN FND_API.G_EXC_ERROR THEN
215: x_return_status := FND_API.G_RET_STS_ERROR;
216: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
217: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
218: WHEN OTHERS THEN
219: x_return_status := FND_API.G_RET_STS_ERROR;
220: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
213: x_return_status := FND_API.G_RET_STS_SUCCESS;
214: WHEN FND_API.G_EXC_ERROR THEN
215: x_return_status := FND_API.G_RET_STS_ERROR;
216: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
217: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
218: WHEN OTHERS THEN
219: x_return_status := FND_API.G_RET_STS_ERROR;
220: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
221: OE_MSG_PUB.Add_Exc_Msg
215: x_return_status := FND_API.G_RET_STS_ERROR;
216: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
217: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
218: WHEN OTHERS THEN
219: x_return_status := FND_API.G_RET_STS_ERROR;
220: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
221: OE_MSG_PUB.Add_Exc_Msg
222: ( G_PKG_NAME
223: , 'QP_Delayed_Requests_Util');
233: IS
234: l_check_active_flag VARCHAR2(1);
235: l_active_flag VARCHAR2(1);
236: BEGIN
237: x_return_status := FND_API.G_RET_STS_SUCCESS;
238: BEGIN
239: IF p_list_header_id IS NOT NULL THEN
240: SELECT ACTIVE_FLAG
241: INTO l_active_flag
271: END IF;
272:
273: EXCEPTION
274: WHEN NO_DATA_FOUND THEN
275: x_return_status := FND_API.G_RET_STS_SUCCESS;
276: WHEN FND_API.G_EXC_ERROR THEN
277: x_return_status := FND_API.G_RET_STS_ERROR;
278: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
279: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
272:
273: EXCEPTION
274: WHEN NO_DATA_FOUND THEN
275: x_return_status := FND_API.G_RET_STS_SUCCESS;
276: WHEN FND_API.G_EXC_ERROR THEN
277: x_return_status := FND_API.G_RET_STS_ERROR;
278: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
279: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
280: WHEN OTHERS THEN
273: EXCEPTION
274: WHEN NO_DATA_FOUND THEN
275: x_return_status := FND_API.G_RET_STS_SUCCESS;
276: WHEN FND_API.G_EXC_ERROR THEN
277: x_return_status := FND_API.G_RET_STS_ERROR;
278: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
279: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
280: WHEN OTHERS THEN
281: x_return_status := FND_API.G_RET_STS_ERROR;
274: WHEN NO_DATA_FOUND THEN
275: x_return_status := FND_API.G_RET_STS_SUCCESS;
276: WHEN FND_API.G_EXC_ERROR THEN
277: x_return_status := FND_API.G_RET_STS_ERROR;
278: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
279: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
280: WHEN OTHERS THEN
281: x_return_status := FND_API.G_RET_STS_ERROR;
282: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
275: x_return_status := FND_API.G_RET_STS_SUCCESS;
276: WHEN FND_API.G_EXC_ERROR THEN
277: x_return_status := FND_API.G_RET_STS_ERROR;
278: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
279: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
280: WHEN OTHERS THEN
281: x_return_status := FND_API.G_RET_STS_ERROR;
282: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
283: OE_MSG_PUB.Add_Exc_Msg
277: x_return_status := FND_API.G_RET_STS_ERROR;
278: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
279: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
280: WHEN OTHERS THEN
281: x_return_status := FND_API.G_RET_STS_ERROR;
282: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
283: OE_MSG_PUB.Add_Exc_Msg
284: ( G_PKG_NAME
285: , 'QP_Delayed_Requests_Util');
304: BEGIN
305:
306: oe_debug_pub.add('Entering QP_DELAYED_REQUESTS_UTIL.check_duplicate_modifier_lines');
307:
308: x_return_status := FND_API.G_RET_STS_SUCCESS;
309:
310: l_status := QP_VALIDATE_PRICING_ATTR.Mod_Dup(p_Start_Date_Active,
311: p_End_Date_Active,
312: p_List_Line_ID,
324:
325: FND_MESSAGE.SET_NAME('QP','QP_DUPLICATE_MODIFIER_LINES');
326: oe_msg_pub.Add;
327:
328: RAISE FND_API.G_EXC_ERROR;
329:
330: END IF;
331:
332:
335:
336:
337: EXCEPTION
338:
339: WHEN FND_API.G_EXC_ERROR THEN
340:
341: x_return_status := FND_API.G_RET_STS_ERROR;
342:
343: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
337: EXCEPTION
338:
339: WHEN FND_API.G_EXC_ERROR THEN
340:
341: x_return_status := FND_API.G_RET_STS_ERROR;
342:
343: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
344:
345: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
339: WHEN FND_API.G_EXC_ERROR THEN
340:
341: x_return_status := FND_API.G_RET_STS_ERROR;
342:
343: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
344:
345: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
346:
347: WHEN OTHERS THEN
341: x_return_status := FND_API.G_RET_STS_ERROR;
342:
343: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
344:
345: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
346:
347: WHEN OTHERS THEN
348:
349: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
345: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
346:
347: WHEN OTHERS THEN
348:
349: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
350:
351: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
352: THEN
353: OE_MSG_PUB.Add_Exc_Msg
378: BEGIN
379:
380: oe_debug_pub.add('Entering QP_DELAYED_REQUESTS_UTIL.check_duplicate_list_lines');
381:
382: x_return_status := FND_API.G_RET_STS_SUCCESS;
383:
384: l_status := QP_VALIDATE_PLL_PRICING_ATTR.Check_Dup_Pra(p_Start_Date_Active,
385: p_End_Date_Active,
386: p_Revision,
401:
402: FND_MESSAGE.SET_NAME('QP','QP_DUPLICATE_LIST_LINES');
403: oe_msg_pub.Add;
404:
405: RAISE FND_API.G_EXC_ERROR;
406:
407: ELSIF l_effdates = FALSE then
408:
409:
427: END IF;
428:
429: oe_msg_pub.Add;
430:
431: RAISE FND_API.G_EXC_ERROR;
432:
433: ELSE
434:
435: oe_debug_pub.add('Ren: check_duplicate_lines status is false ');
436:
437: FND_MESSAGE.SET_NAME('QP','QP_DUPLICATE_LIST_LINES');
438: oe_msg_pub.Add;
439:
440: RAISE FND_API.G_EXC_ERROR;
441:
442: END IF;
443:
444: END IF;
447:
448:
449: EXCEPTION
450:
451: WHEN FND_API.G_EXC_ERROR THEN
452:
453: x_return_status := FND_API.G_RET_STS_ERROR;
454:
455: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
449: EXCEPTION
450:
451: WHEN FND_API.G_EXC_ERROR THEN
452:
453: x_return_status := FND_API.G_RET_STS_ERROR;
454:
455: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
456:
457: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
451: WHEN FND_API.G_EXC_ERROR THEN
452:
453: x_return_status := FND_API.G_RET_STS_ERROR;
454:
455: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
456:
457: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
458:
459: WHEN OTHERS THEN
453: x_return_status := FND_API.G_RET_STS_ERROR;
454:
455: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
456:
457: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
458:
459: WHEN OTHERS THEN
460:
461: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
457: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
458:
459: WHEN OTHERS THEN
460:
461: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
462:
463: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
464: THEN
465: OE_MSG_PUB.Add_Exc_Msg
517: --dbms_output.put_line('Entering QP_DELAYED_REQUESTS_UTIL.validate_pbh_line');
518: --dbms_output.put_line('passed rule id is'||p_list_line_id);
519:
520:
521: x_return_status := FND_API.G_RET_STS_SUCCESS;
522:
523: open c_check_for_parent(p_list_line_id);
524: fetch c_check_for_parent into l_parent;
525: close c_check_for_parent;
553: --Raise MULTIPLE_BREAK_CHILD_EXCEPTION;
554:
555: oe_debug_pub.add('status is more than 1');
556: --dbms_output.put_line('status is more than 1');
557: x_return_status := FND_API.G_RET_STS_ERROR;
558:
559: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR)
560: THEN
561: IF p_list_line_type_code = 'PBH' THEN
581:
582: EXCEPTION
583: WHEN NO_CHILD_EXCEPTION
584: THEN
585: x_return_status := FND_API.G_RET_STS_ERROR;
586:
587: WHEN FND_API.G_EXC_ERROR THEN
588:
589: x_return_status := FND_API.G_RET_STS_ERROR;
583: WHEN NO_CHILD_EXCEPTION
584: THEN
585: x_return_status := FND_API.G_RET_STS_ERROR;
586:
587: WHEN FND_API.G_EXC_ERROR THEN
588:
589: x_return_status := FND_API.G_RET_STS_ERROR;
590:
591: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
585: x_return_status := FND_API.G_RET_STS_ERROR;
586:
587: WHEN FND_API.G_EXC_ERROR THEN
588:
589: x_return_status := FND_API.G_RET_STS_ERROR;
590:
591: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
592:
593: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
587: WHEN FND_API.G_EXC_ERROR THEN
588:
589: x_return_status := FND_API.G_RET_STS_ERROR;
590:
591: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
592:
593: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
594:
595: WHEN NO_DATA_FOUND THEN
589: x_return_status := FND_API.G_RET_STS_ERROR;
590:
591: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
592:
593: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
594:
595: WHEN NO_DATA_FOUND THEN
596: NULL;
597:
596: NULL;
597:
598: WHEN OTHERS THEN
599:
600: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
601:
602: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
603: THEN
604: OE_MSG_PUB.Add_Exc_Msg
645: --End Bug No: 7321885
646:
647:
648: BEGIN
649: x_return_status := FND_API.G_RET_STS_SUCCESS;
650: --Begin Bug No: 7321885
651: l_count := 0;
652: l_to_number := 0;
653: --End Bug No: 7321885
660: LOOP
661: l_count := l_count + 1;
662: if l_break_lines_rec.pricing_attr_value_to_number <= l_break_lines_rec.pricing_attr_value_from_number
663: then
664: x_return_status := FND_API.G_RET_STS_ERROR;
665: end if;
666: if (l_count > 1) and ( l_break_lines_rec.pricing_attr_value_from_number <= l_to_number)
667: then
668: x_return_status := FND_API.G_RET_STS_ERROR;
664: x_return_status := FND_API.G_RET_STS_ERROR;
665: end if;
666: if (l_count > 1) and ( l_break_lines_rec.pricing_attr_value_from_number <= l_to_number)
667: then
668: x_return_status := FND_API.G_RET_STS_ERROR;
669: end if;
670: l_to_number := l_break_lines_rec.pricing_attr_value_to_number;
671: END LOOP;
672: --End Bug No: 7321885
674: oe_debug_pub.add('After overlapping breaks select stmt');
675: --dbms_output.put_line('status is '||l_status);
676:
677: --Begin Bug No: 7321885
678: IF x_return_status = FND_API.G_RET_STS_ERROR then
679: --End Bug No: 7321885
680:
681: --Raise OVERLAPPING_BREAKS_EXCEPTION;
682:
679: --End Bug No: 7321885
680:
681: --Raise OVERLAPPING_BREAKS_EXCEPTION;
682:
683: /* x_return_status := FND_API.G_RET_STS_ERROR; */ --Bug No: 7321885
684:
685: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR)
686: THEN
687:
699: NULL;
700:
701: WHEN OVERLAPPING_BREAKS_EXCEPTION
702: THEN
703: x_return_status := FND_API.G_RET_STS_ERROR;
704:
705: WHEN FND_API.G_EXC_ERROR THEN
706:
707: x_return_status := FND_API.G_RET_STS_ERROR;
701: WHEN OVERLAPPING_BREAKS_EXCEPTION
702: THEN
703: x_return_status := FND_API.G_RET_STS_ERROR;
704:
705: WHEN FND_API.G_EXC_ERROR THEN
706:
707: x_return_status := FND_API.G_RET_STS_ERROR;
708:
709: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
703: x_return_status := FND_API.G_RET_STS_ERROR;
704:
705: WHEN FND_API.G_EXC_ERROR THEN
706:
707: x_return_status := FND_API.G_RET_STS_ERROR;
708:
709: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
710:
711: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
705: WHEN FND_API.G_EXC_ERROR THEN
706:
707: x_return_status := FND_API.G_RET_STS_ERROR;
708:
709: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
710:
711: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
712:
713: WHEN OTHERS THEN
707: x_return_status := FND_API.G_RET_STS_ERROR;
708:
709: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
710:
711: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
712:
713: WHEN OTHERS THEN
714:
715: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
711: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
712:
713: WHEN OTHERS THEN
714:
715: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
716:
717: oe_debug_pub.add('overlapping breaks error '||substr(sqlerrm,1,100));
718: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
719: THEN
748: and qrm.from_rltd_modifier_id = p_list_line_id
749: order by qp_number.canonical_to_number(qpa.PRICING_ATTR_VALUE_FROM);
750:
751: BEGIN
752: x_return_status := FND_API.G_RET_STS_SUCCESS;
753:
754: oe_debug_pub.add('Before continuous breaks loop');
755:
756: FOR c_break_lines_attr_val_rec in c_break_lines_attr_values(p_list_line_id)
789: END LOOP;
790: oe_debug_pub.add('After continuous breaks loop');
791:
792: IF l_status IS NOT NULL THEN
793: x_return_status := FND_API.G_RET_STS_ERROR;
794:
795: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR)
796: THEN
797: IF l_status = 'FROM_NOT_LESS_THAN_TO' THEN
816: NULL;
817:
818: WHEN CONTINUOUS_BREAKS_EXCEPTION
819: THEN
820: x_return_status := FND_API.G_RET_STS_ERROR;
821:
822: WHEN FND_API.G_EXC_ERROR THEN
823:
824: x_return_status := FND_API.G_RET_STS_ERROR;
818: WHEN CONTINUOUS_BREAKS_EXCEPTION
819: THEN
820: x_return_status := FND_API.G_RET_STS_ERROR;
821:
822: WHEN FND_API.G_EXC_ERROR THEN
823:
824: x_return_status := FND_API.G_RET_STS_ERROR;
825:
826: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
820: x_return_status := FND_API.G_RET_STS_ERROR;
821:
822: WHEN FND_API.G_EXC_ERROR THEN
823:
824: x_return_status := FND_API.G_RET_STS_ERROR;
825:
826: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
827:
828: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
822: WHEN FND_API.G_EXC_ERROR THEN
823:
824: x_return_status := FND_API.G_RET_STS_ERROR;
825:
826: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
827:
828: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
829:
830: WHEN OTHERS THEN
824: x_return_status := FND_API.G_RET_STS_ERROR;
825:
826: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
827:
828: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
829:
830: WHEN OTHERS THEN
831:
832: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
828: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
829:
830: WHEN OTHERS THEN
831:
832: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
833:
834: oe_debug_pub.add('continuous breaks error '||substr(sqlerrm,1,100));
835: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
836: THEN
875: l_prod_attr_val_disp VARCHAR2(4000);
876: UPGRADE_PRICE_BREAKS_EXCEPTION EXCEPTION;
877:
878: BEGIN
879: x_return_status := FND_API.G_RET_STS_SUCCESS;
880:
881: l_prod_attr_val_disp := QP_PRICE_LIST_LINE_UTIL.Get_Product_Value('QP_ATTR_DEFNS_PRICING',
882: 'ITEM',
883: p_product_attribute,
934: EXCEPTION
935:
936: WHEN UPGRADE_PRICE_BREAKS_EXCEPTION
937: THEN
938: x_return_status := FND_API.G_RET_STS_ERROR;
939:
940: WHEN FND_API.G_EXC_ERROR THEN
941:
942: x_return_status := FND_API.G_RET_STS_ERROR;
936: WHEN UPGRADE_PRICE_BREAKS_EXCEPTION
937: THEN
938: x_return_status := FND_API.G_RET_STS_ERROR;
939:
940: WHEN FND_API.G_EXC_ERROR THEN
941:
942: x_return_status := FND_API.G_RET_STS_ERROR;
943:
944: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
938: x_return_status := FND_API.G_RET_STS_ERROR;
939:
940: WHEN FND_API.G_EXC_ERROR THEN
941:
942: x_return_status := FND_API.G_RET_STS_ERROR;
943:
944: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
945:
946: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
940: WHEN FND_API.G_EXC_ERROR THEN
941:
942: x_return_status := FND_API.G_RET_STS_ERROR;
943:
944: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
945:
946: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
947:
948: WHEN OTHERS THEN
942: x_return_status := FND_API.G_RET_STS_ERROR;
943:
944: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
945:
946: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
947:
948: WHEN OTHERS THEN
949:
950: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
946: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
947:
948: WHEN OTHERS THEN
949:
950: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
951:
952: oe_debug_pub.add('upgrade breaks error '||substr(sqlerrm,1,100));
953: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
954: THEN
988: oe_debug_pub.add('In relevant exception ');
989: FND_MESSAGE.SET_NAME('QP','QP_MULT_PRICE_BREAK_ATTRS');
990: oe_msg_pub.Add;
991:
992: x_return_status := FND_API.G_RET_STS_ERROR;
993:
994: WHEN FND_API.G_EXC_ERROR THEN
995:
996: x_return_status := FND_API.G_RET_STS_ERROR;
990: oe_msg_pub.Add;
991:
992: x_return_status := FND_API.G_RET_STS_ERROR;
993:
994: WHEN FND_API.G_EXC_ERROR THEN
995:
996: x_return_status := FND_API.G_RET_STS_ERROR;
997:
998: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
992: x_return_status := FND_API.G_RET_STS_ERROR;
993:
994: WHEN FND_API.G_EXC_ERROR THEN
995:
996: x_return_status := FND_API.G_RET_STS_ERROR;
997:
998: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
999:
1000: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
994: WHEN FND_API.G_EXC_ERROR THEN
995:
996: x_return_status := FND_API.G_RET_STS_ERROR;
997:
998: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
999:
1000: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1001:
1002: WHEN OTHERS THEN
996: x_return_status := FND_API.G_RET_STS_ERROR;
997:
998: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
999:
1000: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1001:
1002: WHEN OTHERS THEN
1003:
1004: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1000: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1001:
1002: WHEN OTHERS THEN
1003:
1004: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1005:
1006: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1007: THEN
1008: OE_MSG_PUB.Add_Exc_Msg
1084:
1085: FND_MESSAGE.SET_NAME('QP','QP_MIXED_QUAL_SEG_LEVELS');
1086: oe_msg_pub.Add;
1087:
1088: x_return_status := FND_API.G_RET_STS_ERROR;
1089:
1090: WHEN FND_API.G_EXC_ERROR THEN
1091:
1092: x_return_status := FND_API.G_RET_STS_ERROR;
1086: oe_msg_pub.Add;
1087:
1088: x_return_status := FND_API.G_RET_STS_ERROR;
1089:
1090: WHEN FND_API.G_EXC_ERROR THEN
1091:
1092: x_return_status := FND_API.G_RET_STS_ERROR;
1093:
1094: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1088: x_return_status := FND_API.G_RET_STS_ERROR;
1089:
1090: WHEN FND_API.G_EXC_ERROR THEN
1091:
1092: x_return_status := FND_API.G_RET_STS_ERROR;
1093:
1094: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1095:
1096: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1090: WHEN FND_API.G_EXC_ERROR THEN
1091:
1092: x_return_status := FND_API.G_RET_STS_ERROR;
1093:
1094: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1095:
1096: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1097:
1098: WHEN OTHERS THEN
1092: x_return_status := FND_API.G_RET_STS_ERROR;
1093:
1094: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1095:
1096: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1097:
1098: WHEN OTHERS THEN
1099:
1100: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1096: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1097:
1098: WHEN OTHERS THEN
1099:
1100: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1101:
1102: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1103: THEN
1104:
1129: AND qpq.qualifier_context = 'MODLIST'
1130: AND qpq.qualifier_attribute = 'QUALIFIER_ATTRIBUTE4';
1131: BEGIN
1132:
1133: x_return_status := FND_API.G_RET_STS_SUCCESS;
1134:
1135: open C_modifier(p_list_header_id);
1136: fetch C_modifier into l_status;
1137: close C_modifier;
1140:
1141: --oe_debug_pub.add('status is duplicate');
1142: --dbms_output.put_line('status is duplicate');
1143:
1144: x_return_status := FND_API.G_RET_STS_ERROR;
1145:
1146: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR)
1147: THEN
1148:
1157:
1158: EXCEPTION
1159: WHEN MULTIPLE_PRICE_LIST_EXCEPTION
1160: THEN
1161: x_return_status := FND_API.G_RET_STS_ERROR;
1162:
1163: WHEN FND_API.G_EXC_ERROR THEN
1164:
1165: x_return_status := FND_API.G_RET_STS_ERROR;
1159: WHEN MULTIPLE_PRICE_LIST_EXCEPTION
1160: THEN
1161: x_return_status := FND_API.G_RET_STS_ERROR;
1162:
1163: WHEN FND_API.G_EXC_ERROR THEN
1164:
1165: x_return_status := FND_API.G_RET_STS_ERROR;
1166:
1167: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1161: x_return_status := FND_API.G_RET_STS_ERROR;
1162:
1163: WHEN FND_API.G_EXC_ERROR THEN
1164:
1165: x_return_status := FND_API.G_RET_STS_ERROR;
1166:
1167: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1168:
1169: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1163: WHEN FND_API.G_EXC_ERROR THEN
1164:
1165: x_return_status := FND_API.G_RET_STS_ERROR;
1166:
1167: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1168:
1169: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1170:
1171: WHEN OTHERS THEN
1165: x_return_status := FND_API.G_RET_STS_ERROR;
1166:
1167: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1168:
1169: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1170:
1171: WHEN OTHERS THEN
1172:
1173: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1169: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1170:
1171: WHEN OTHERS THEN
1172:
1173: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1174:
1175: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1176: THEN
1177: OE_MSG_PUB.Add_Exc_Msg
1191: l_ret_code number;
1192:
1193: BEGIN
1194:
1195: x_return_status := FND_API.G_RET_STS_SUCCESS;
1196:
1197: QP_Maintain_Denormalized_Data.Update_Qualifiers(err_buff => l_err_buf,
1198: retcode => l_ret_code,
1199: p_list_header_id => p_list_header_id,
1200: p_update_type => 'DELAYED_REQ');
1201:
1202: IF l_ret_code <> 0 THEN
1203:
1204: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1205:
1206: END IF;
1207:
1208: EXCEPTION
1206: END IF;
1207:
1208: EXCEPTION
1209:
1210: WHEN FND_API.G_EXC_ERROR THEN
1211:
1212: x_return_status := FND_API.G_RET_STS_ERROR;
1213:
1214: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1208: EXCEPTION
1209:
1210: WHEN FND_API.G_EXC_ERROR THEN
1211:
1212: x_return_status := FND_API.G_RET_STS_ERROR;
1213:
1214: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1215:
1216: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1210: WHEN FND_API.G_EXC_ERROR THEN
1211:
1212: x_return_status := FND_API.G_RET_STS_ERROR;
1213:
1214: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1215:
1216: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1217: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1218: THEN
1212: x_return_status := FND_API.G_RET_STS_ERROR;
1213:
1214: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1215:
1216: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1217: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1218: THEN
1219: OE_MSG_PUB.Add_Exc_Msg
1220: ( G_PKG_NAME
1222: END IF;
1223:
1224: WHEN OTHERS THEN
1225:
1226: x_return_status := FND_API.G_RET_STS_ERROR;
1227:
1228: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1229: THEN
1230: OE_MSG_PUB.Add_Exc_Msg
1253: WHEN OTHERS THEN
1254: l_list_header_id := 0;
1255: END;
1256:
1257: x_return_status := FND_API.G_RET_STS_SUCCESS;
1258: QP_Denormalized_Pricing_Attrs.Update_Pricing_Attributes(
1259: p_list_header_id_low => l_list_header_id,
1260: p_list_header_id_high => l_list_header_id,
1261: p_update_type => 'FACTOR_DELAYED_REQ');
1265: p_list_header_id_high => l_list_header_id);
1266:
1267: EXCEPTION
1268: WHEN OTHERS THEN
1269: x_return_status := FND_API.G_RET_STS_ERROR;
1270:
1271: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1272: THEN
1273: OE_MSG_PUB.Add_Exc_Msg
1293: l_list_type_code varchar2(30);
1294:
1295: BEGIN
1296:
1297: x_return_status := FND_API.G_RET_STS_SUCCESS;
1298:
1299: oe_debug_pub.add('list_line_id is NULL');
1300:
1301: BEGIN
1417: FROM QP_LIST_LINES WHERE LIST_HEADER_ID = p_list_header_id);
1418:
1419: EXCEPTION
1420:
1421: WHEN FND_API.G_EXC_ERROR THEN
1422:
1423: x_return_status := FND_API.G_RET_STS_ERROR;
1424:
1425: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1419: EXCEPTION
1420:
1421: WHEN FND_API.G_EXC_ERROR THEN
1422:
1423: x_return_status := FND_API.G_RET_STS_ERROR;
1424:
1425: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1426:
1427: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1421: WHEN FND_API.G_EXC_ERROR THEN
1422:
1423: x_return_status := FND_API.G_RET_STS_ERROR;
1424:
1425: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1426:
1427: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1428:
1429: WHEN OTHERS THEN
1423: x_return_status := FND_API.G_RET_STS_ERROR;
1424:
1425: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1426:
1427: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1428:
1429: WHEN OTHERS THEN
1430:
1431: x_return_status := FND_API.G_RET_STS_ERROR;
1427: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1428:
1429: WHEN OTHERS THEN
1430:
1431: x_return_status := FND_API.G_RET_STS_ERROR;
1432:
1433: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1434: THEN
1435: OE_MSG_PUB.Add_Exc_Msg
1526: -- commenting out as suggested by SPGOPAL
1527: ,x_return_status => x_return_status
1528: ,x_return_status_text => l_return_status_text);
1529:
1530: IF x_return_status = FND_API.G_RET_STS_ERROR
1531: THEN
1532: oe_debug_pub.add('error update_pricing_phase begin'||l_return_status_text);
1533: raise Phase_exception;
1534: END IF;
1537: oe_debug_pub.add('end update_pricing_phase begin');
1538:
1539: EXCEPTION
1540: WHEN Phase_Exception THEN
1541: x_return_status := FND_API.G_RET_STS_ERROR;
1542:
1543: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1544: OE_MSG_PUB.Add_Exc_Msg
1545: ( G_PKG_NAME
1544: OE_MSG_PUB.Add_Exc_Msg
1545: ( G_PKG_NAME
1546: , 'Update_Pricing_Phase');
1547: END IF;
1548: WHEN FND_API.G_EXC_ERROR THEN
1549: x_return_status := FND_API.G_RET_STS_ERROR;
1550: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1551: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1552: WHEN OTHERS THEN
1545: ( G_PKG_NAME
1546: , 'Update_Pricing_Phase');
1547: END IF;
1548: WHEN FND_API.G_EXC_ERROR THEN
1549: x_return_status := FND_API.G_RET_STS_ERROR;
1550: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1551: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1552: WHEN OTHERS THEN
1553: x_return_status := FND_API.G_RET_STS_ERROR;
1546: , 'Update_Pricing_Phase');
1547: END IF;
1548: WHEN FND_API.G_EXC_ERROR THEN
1549: x_return_status := FND_API.G_RET_STS_ERROR;
1550: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1551: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1552: WHEN OTHERS THEN
1553: x_return_status := FND_API.G_RET_STS_ERROR;
1554: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1547: END IF;
1548: WHEN FND_API.G_EXC_ERROR THEN
1549: x_return_status := FND_API.G_RET_STS_ERROR;
1550: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1551: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1552: WHEN OTHERS THEN
1553: x_return_status := FND_API.G_RET_STS_ERROR;
1554: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1555: OE_MSG_PUB.Add_Exc_Msg
1549: x_return_status := FND_API.G_RET_STS_ERROR;
1550: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1551: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1552: WHEN OTHERS THEN
1553: x_return_status := FND_API.G_RET_STS_ERROR;
1554: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1555: OE_MSG_PUB.Add_Exc_Msg
1556: ( G_PKG_NAME
1557: , 'Update_Pricing_Phase');
1569: l_list_header_id number;
1570:
1571: BEGIN
1572:
1573: x_return_status := FND_API.G_RET_STS_SUCCESS;
1574:
1575: oe_debug_pub.add('list_line_id is '||p_list_line_id);
1576:
1577: BEGIN
1683: where pra.list_line_id = p_list_line_id;
1684:
1685: EXCEPTION
1686:
1687: WHEN FND_API.G_EXC_ERROR THEN
1688:
1689: x_return_status := FND_API.G_RET_STS_ERROR;
1690:
1691: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1685: EXCEPTION
1686:
1687: WHEN FND_API.G_EXC_ERROR THEN
1688:
1689: x_return_status := FND_API.G_RET_STS_ERROR;
1690:
1691: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1692:
1693: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1687: WHEN FND_API.G_EXC_ERROR THEN
1688:
1689: x_return_status := FND_API.G_RET_STS_ERROR;
1690:
1691: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1692:
1693: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1694:
1695: WHEN OTHERS THEN
1689: x_return_status := FND_API.G_RET_STS_ERROR;
1690:
1691: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1692:
1693: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1694:
1695: WHEN OTHERS THEN
1696:
1697: x_return_status := FND_API.G_RET_STS_ERROR;
1693: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1694:
1695: WHEN OTHERS THEN
1696:
1697: x_return_status := FND_API.G_RET_STS_ERROR;
1698:
1699: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1700: THEN
1701: OE_MSG_PUB.Add_Exc_Msg
1740: BEGIN
1741:
1742: -- l_price_break_type := p_price_break_type;
1743:
1744: x_return_status := FND_API.G_RET_STS_SUCCESS;
1745:
1746: oe_debug_pub.add('list_line_id is '||p_list_line_id);
1747:
1748: select price_break_type_code,pricing_phase_id, arithmetic_operator -- 4936019
1812:
1813:
1814: EXCEPTION
1815:
1816: WHEN FND_API.G_EXC_ERROR THEN
1817:
1818: x_return_status := FND_API.G_RET_STS_ERROR;
1819:
1820: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1814: EXCEPTION
1815:
1816: WHEN FND_API.G_EXC_ERROR THEN
1817:
1818: x_return_status := FND_API.G_RET_STS_ERROR;
1819:
1820: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1821:
1822: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1816: WHEN FND_API.G_EXC_ERROR THEN
1817:
1818: x_return_status := FND_API.G_RET_STS_ERROR;
1819:
1820: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1821:
1822: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1823:
1824: WHEN OTHERS THEN
1818: x_return_status := FND_API.G_RET_STS_ERROR;
1819:
1820: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1821:
1822: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1823:
1824: WHEN OTHERS THEN
1825:
1826: x_return_status := FND_API.G_RET_STS_ERROR;
1822: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1823:
1824: WHEN OTHERS THEN
1825:
1826: x_return_status := FND_API.G_RET_STS_ERROR;
1827:
1828: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1829: THEN
1830: OE_MSG_PUB.Add_Exc_Msg
1895: , 'Update_Child_Pricing_Attr'
1896: );
1897: END IF;
1898:
1899: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1900:
1901: END UPDATE_CHILD_PRICING_ATTR;
1902:
1903: /*added by spgopal for including list_header_id and pricing_phase_id in pricing_attributes table for modifiers*/
1907: , p_List_Line_ID IN NUMBER
1908: ) IS
1909:
1910: l_Pricing_Phase_id QP_PRICING_PHASES.PRICING_PHASE_ID%TYPE
1911: := FND_API.G_MISS_NUM;
1912: l_List_Header_ID QP_LIST_HEADERS_B.LIST_HEADER_ID%TYPE
1913: := FND_API.G_MISS_NUM;
1914:
1915: /*
1909:
1910: l_Pricing_Phase_id QP_PRICING_PHASES.PRICING_PHASE_ID%TYPE
1911: := FND_API.G_MISS_NUM;
1912: l_List_Header_ID QP_LIST_HEADERS_B.LIST_HEADER_ID%TYPE
1913: := FND_API.G_MISS_NUM;
1914:
1915: /*
1916: Cursor C_pricing_attr(p_list_line_id number) IS
1917: SELECT *
1921: BEGIN
1922:
1923:
1924: IF (p_List_Line_ID IS NOT NULL OR
1925: p_List_Line_ID <> FND_API.G_MISS_NUM) THEN
1926:
1927: SELECT LIST_HEADER_ID, PRICING_PHASE_ID INTO
1928: l_List_Header_ID, l_Pricing_Phase_ID FROM QP_LIST_LINES
1929: WHERE LIST_LINE_ID = p_List_Line_ID;
1946: END IF;
1947:
1948: EXCEPTION
1949:
1950: WHEN FND_API.G_EXC_ERROR THEN
1951:
1952: x_return_status := FND_API.G_RET_STS_ERROR;
1953:
1954: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1948: EXCEPTION
1949:
1950: WHEN FND_API.G_EXC_ERROR THEN
1951:
1952: x_return_status := FND_API.G_RET_STS_ERROR;
1953:
1954: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1955:
1956: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1950: WHEN FND_API.G_EXC_ERROR THEN
1951:
1952: x_return_status := FND_API.G_RET_STS_ERROR;
1953:
1954: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1955:
1956: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1957:
1958: WHEN OTHERS THEN
1952: x_return_status := FND_API.G_RET_STS_ERROR;
1953:
1954: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1955:
1956: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1957:
1958: WHEN OTHERS THEN
1959:
1960: x_return_status := FND_API.G_RET_STS_ERROR;
1956: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1957:
1958: WHEN OTHERS THEN
1959:
1960: x_return_status := FND_API.G_RET_STS_ERROR;
1961:
1962: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1963: THEN
1964: OE_MSG_PUB.Add_Exc_Msg
1997: IF p_list_line_type = 'OID' THEN
1998: l_line := 'Y';
1999: ELSIF p_list_line_type = 'RLTD' THEN
2000: IF p_parent_line_id IS NOT NULL OR
2001: p_parent_line_id <> FND_API.G_MISS_NUM THEN
2002:
2003: select decode(LL.list_line_type_code, 'PRG','Y','N')
2004: into l_rltd from qp_list_lines LL
2005: where LL.list_line_id = p_parent_line_id;
2029: ,p_call_from => p_call_from
2030: ,x_return_status => x_return_status
2031: ,x_return_status_text => l_return_status_text);
2032:
2033: IF x_return_status = FND_API.G_RET_STS_ERROR
2034: THEN
2035: oe_debug_pub.add('error update_pricing_phase begin'||l_return_status_text);
2036: raise Phase_exception;
2037: END IF;
2039: oe_debug_pub.add('end update_pricing_phase begin');
2040: EXCEPTION
2041: WHEN Phase_Exception THEN
2042:
2043: x_return_status := FND_API.G_RET_STS_ERROR;
2044:
2045: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2046: OE_MSG_PUB.Add_Exc_Msg
2047: ( G_PKG_NAME
2047: ( G_PKG_NAME
2048: , 'Update_Pricing_Phase');
2049: END IF;
2050:
2051: WHEN FND_API.G_EXC_ERROR THEN
2052:
2053: x_return_status := FND_API.G_RET_STS_ERROR;
2054:
2055: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2049: END IF;
2050:
2051: WHEN FND_API.G_EXC_ERROR THEN
2052:
2053: x_return_status := FND_API.G_RET_STS_ERROR;
2054:
2055: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2056:
2057: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2051: WHEN FND_API.G_EXC_ERROR THEN
2052:
2053: x_return_status := FND_API.G_RET_STS_ERROR;
2054:
2055: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2056:
2057: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2058:
2059: WHEN OTHERS THEN
2053: x_return_status := FND_API.G_RET_STS_ERROR;
2054:
2055: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2056:
2057: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2058:
2059: WHEN OTHERS THEN
2060:
2061: x_return_status := FND_API.G_RET_STS_ERROR;
2057: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2058:
2059: WHEN OTHERS THEN
2060:
2061: x_return_status := FND_API.G_RET_STS_ERROR;
2062:
2063: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2064: OE_MSG_PUB.Add_Exc_Msg
2065: ( G_PKG_NAME
2113: end if;
2114:
2115: oe_debug_pub.add('Update manual modifier flag End');
2116: EXCEPTION
2117: WHEN FND_API.G_EXC_ERROR THEN
2118:
2119: x_return_status := FND_API.G_RET_STS_ERROR;
2120:
2121: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2115: oe_debug_pub.add('Update manual modifier flag End');
2116: EXCEPTION
2117: WHEN FND_API.G_EXC_ERROR THEN
2118:
2119: x_return_status := FND_API.G_RET_STS_ERROR;
2120:
2121: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2122:
2123: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2117: WHEN FND_API.G_EXC_ERROR THEN
2118:
2119: x_return_status := FND_API.G_RET_STS_ERROR;
2120:
2121: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2122:
2123: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2124:
2125: WHEN OTHERS THEN
2119: x_return_status := FND_API.G_RET_STS_ERROR;
2120:
2121: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2122:
2123: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2124:
2125: WHEN OTHERS THEN
2126:
2127: x_return_status := FND_API.G_RET_STS_ERROR;
2123: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2124:
2125: WHEN OTHERS THEN
2126:
2127: x_return_status := FND_API.G_RET_STS_ERROR;
2128:
2129: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2130: OE_MSG_PUB.Add_Exc_Msg
2131: ( G_PKG_NAME
2151: l_first_selling_rounding number;
2152: BEGIN
2153: oe_debug_pub.add('validate_selling_price begin '||p_currency_header_id||' '||p_to_currency_code);
2154:
2155: x_return_status := FND_API.G_RET_STS_SUCCESS;
2156: l_first_record := 'TRUE';
2157:
2158: for selling_rounding_rec in c_selling_rounding
2159: LOOP
2172: fnd_message.set_token('CURRENCY_CODE', p_to_currency_code);
2173: OE_MSG_PUB.Add;
2174: END IF;
2175:
2176: raise FND_API.G_EXC_ERROR;
2177: end if;
2178:
2179: END LOOP;
2180:
2180:
2181: oe_debug_pub.add('end validate_selling_rounding ');
2182:
2183: EXCEPTION
2184: WHEN FND_API.G_EXC_ERROR THEN
2185:
2186: x_return_status := FND_API.G_RET_STS_ERROR;
2187:
2188: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2182:
2183: EXCEPTION
2184: WHEN FND_API.G_EXC_ERROR THEN
2185:
2186: x_return_status := FND_API.G_RET_STS_ERROR;
2187:
2188: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2189:
2190: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2184: WHEN FND_API.G_EXC_ERROR THEN
2185:
2186: x_return_status := FND_API.G_RET_STS_ERROR;
2187:
2188: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2189:
2190: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2191:
2192: WHEN OTHERS THEN
2186: x_return_status := FND_API.G_RET_STS_ERROR;
2187:
2188: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2189:
2190: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2191:
2192: WHEN OTHERS THEN
2193:
2194: x_return_status := FND_API.G_RET_STS_ERROR;
2190: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2191:
2192: WHEN OTHERS THEN
2193:
2194: x_return_status := FND_API.G_RET_STS_ERROR;
2195:
2196: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2197: OE_MSG_PUB.Add_Exc_Msg
2198: ( G_PKG_NAME
2247: fnd_message.set_token('LIST_LINE_ID', p_list_line_id);
2248: fnd_message.set_token('QUALIFIER_GRP_NO', p_qualifier_grouping_no);
2249: OE_MSG_PUB.Add;
2250: END IF;
2251: raise FND_API.G_EXC_ERROR;
2252: end if;
2253:
2254: elsif l_final_segment_level = 'ORDER' then
2255: if l_current_segment_level = 'ORDER' then
2265: fnd_message.set_token('LIST_LINE_ID', p_list_line_id);
2266: fnd_message.set_token('QUALIFIER_GRP_NO', p_qualifier_grouping_no);
2267: OE_MSG_PUB.Add;
2268: END IF;
2269: raise FND_API.G_EXC_ERROR;
2270: end if;
2271:
2272: elsif l_final_segment_level = 'BOTH' then
2273: if l_current_segment_level = 'LINE' then
2290: fnd_message.set_token('LIST_LINE_ID', p_list_line_id);
2291: fnd_message.set_token('QUALIFIER_GRP_NO', p_qualifier_grouping_no);
2292: OE_MSG_PUB.Add;
2293: END IF;
2294: raise FND_API.G_EXC_ERROR;
2295: end if;
2296:
2297: elsif l_final_segment_level = 'ORDER_BOTH' then
2298: if l_current_segment_level in ('ORDER', 'BOTH') then
2306: fnd_message.set_token('LIST_LINE_ID', p_list_line_id);
2307: fnd_message.set_token('QUALIFIER_GRP_NO', p_qualifier_grouping_no);
2308: OE_MSG_PUB.Add;
2309: END IF;
2310: raise FND_API.G_EXC_ERROR;
2311: end if;
2312:
2313: end if; -- l_final_segment_level = 'LINE'
2314: end if; -- l_final_segment_level is NULL
2316: END LOOP;
2317:
2318: oe_debug_pub.add('End Check_Segment_Level_in_Group');
2319: EXCEPTION
2320: WHEN FND_API.G_EXC_ERROR THEN
2321:
2322: x_return_status := FND_API.G_RET_STS_ERROR;
2323:
2324: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2318: oe_debug_pub.add('End Check_Segment_Level_in_Group');
2319: EXCEPTION
2320: WHEN FND_API.G_EXC_ERROR THEN
2321:
2322: x_return_status := FND_API.G_RET_STS_ERROR;
2323:
2324: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2325:
2326: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2320: WHEN FND_API.G_EXC_ERROR THEN
2321:
2322: x_return_status := FND_API.G_RET_STS_ERROR;
2323:
2324: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2325:
2326: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2327:
2328: WHEN OTHERS THEN
2322: x_return_status := FND_API.G_RET_STS_ERROR;
2323:
2324: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2325:
2326: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2327:
2328: WHEN OTHERS THEN
2329:
2330: x_return_status := FND_API.G_RET_STS_ERROR;
2326: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2327:
2328: WHEN OTHERS THEN
2329:
2330: x_return_status := FND_API.G_RET_STS_ERROR;
2331:
2332: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2333: OE_MSG_PUB.Add_Exc_Msg
2334: ( G_PKG_NAME
2420: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR) THEN
2421: fnd_message.set_name('QP', 'QP_NO_HEADER_QUAL_FOR_LINE');
2422: OE_MSG_PUB.Add;
2423: END IF;
2424: --raise FND_API.G_EXC_ERROR;
2425: end if;
2426:
2427: if l_order_modifier_exists = 'Y' and l_qual_exist_for_ord_modifier = 'N' then
2428: oe_debug_pub.add('mkarya - Modifier Lines of level ''ORDER'' will not be applied
2430: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR) THEN
2431: fnd_message.set_name('QP', 'QP_NO_HEADER_QUAL_FOR_ORD');
2432: OE_MSG_PUB.Add;
2433: END IF;
2434: --raise FND_API.G_EXC_ERROR;
2435: end if;
2436:
2437: end if; -- l_header_qual_exists = 'Y'
2438: end if; -- l_line_modifier_exists = 'Y' or l_order_modifier_exists = 'Y'
2438: end if; -- l_line_modifier_exists = 'Y' or l_order_modifier_exists = 'Y'
2439:
2440: oe_debug_pub.add('End Check_Line_for_Header_Qual');
2441: EXCEPTION
2442: WHEN FND_API.G_EXC_ERROR THEN
2443:
2444: x_return_status := FND_API.G_RET_STS_ERROR;
2445:
2446: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2440: oe_debug_pub.add('End Check_Line_for_Header_Qual');
2441: EXCEPTION
2442: WHEN FND_API.G_EXC_ERROR THEN
2443:
2444: x_return_status := FND_API.G_RET_STS_ERROR;
2445:
2446: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2447:
2448: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2442: WHEN FND_API.G_EXC_ERROR THEN
2443:
2444: x_return_status := FND_API.G_RET_STS_ERROR;
2445:
2446: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2447:
2448: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2449:
2450: WHEN OTHERS THEN
2444: x_return_status := FND_API.G_RET_STS_ERROR;
2445:
2446: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2447:
2448: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2449:
2450: WHEN OTHERS THEN
2451:
2452: x_return_status := FND_API.G_RET_STS_ERROR;
2448: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2449:
2450: WHEN OTHERS THEN
2451:
2452: x_return_status := FND_API.G_RET_STS_ERROR;
2453:
2454: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2455: OE_MSG_PUB.Add_Exc_Msg
2456: ( G_PKG_NAME
2499: and product_attr_value = qpa.product_attr_value));
2500:
2501: exception
2502: when others then
2503: x_return_status := FND_API.G_RET_STS_ERROR;
2504: end;
2505:
2506: x_return_status := FND_API.G_RET_STS_SUCCESS;
2507:
2502: when others then
2503: x_return_status := FND_API.G_RET_STS_ERROR;
2504: end;
2505:
2506: x_return_status := FND_API.G_RET_STS_SUCCESS;
2507:
2508: end update_changed_lines_add;
2509:
2510:
2569: and rownum = 1);
2570:
2571: exception
2572: when others then
2573: x_return_status := FND_API.G_RET_STS_ERROR;
2574: end;
2575:
2576: x_return_status := FND_API.G_RET_STS_SUCCESS;
2577:
2572: when others then
2573: x_return_status := FND_API.G_RET_STS_ERROR;
2574: end;
2575:
2576: x_return_status := FND_API.G_RET_STS_SUCCESS;
2577:
2578: end update_changed_lines_del;
2579:
2580: procedure update_changed_lines_ph (
2676: and rownum = 1);
2677:
2678: exception
2679: when others then
2680: x_return_status := FND_API.G_RET_STS_ERROR;
2681: end;
2682:
2683: x_return_status := FND_API.G_RET_STS_SUCCESS;
2684:
2679: when others then
2680: x_return_status := FND_API.G_RET_STS_ERROR;
2681: end;
2682:
2683: x_return_status := FND_API.G_RET_STS_SUCCESS;
2684:
2685: end update_changed_lines_ph;
2686:
2687: procedure update_changed_lines_act (
2793: end if;
2794:
2795: exception
2796: when others then
2797: x_return_status := FND_API.G_RET_STS_ERROR;
2798: end;
2799:
2800: x_return_status := FND_API.G_RET_STS_SUCCESS;
2801:
2796: when others then
2797: x_return_status := FND_API.G_RET_STS_ERROR;
2798: end;
2799:
2800: x_return_status := FND_API.G_RET_STS_SUCCESS;
2801:
2802: end update_changed_lines_act;
2803:
2804: Procedure HVOP_Pricing_Setup (x_return_status OUT NOCOPY VARCHAR2) IS
2807: procedure_error Exception;
2808: BEGIN
2809:
2810: QP_Maintain_Denormalized_Data.Set_HVOP_Pricing (x_return_status, l_return_status_text);
2811: IF(x_return_status=FND_API.G_RET_STS_ERROR) THEN
2812: raise procedure_error;
2813: END IF;
2814:
2815: EXCEPTION
2817: OE_MSG_PUB.Add_Exc_Msg
2818: ( G_PKG_NAME
2819: , 'Error while executing the process QP_Maintain_Denormalized_Data.Set_HVOP_Pricing : '|| l_return_status_text);
2820:
2821: WHEN FND_API.G_EXC_ERROR THEN
2822: x_return_status := FND_API.G_RET_STS_ERROR;
2823: OE_MSG_PUB.Add_Exc_Msg
2824: ( G_PKG_NAME
2825: , l_return_status_text);
2818: ( G_PKG_NAME
2819: , 'Error while executing the process QP_Maintain_Denormalized_Data.Set_HVOP_Pricing : '|| l_return_status_text);
2820:
2821: WHEN FND_API.G_EXC_ERROR THEN
2822: x_return_status := FND_API.G_RET_STS_ERROR;
2823: OE_MSG_PUB.Add_Exc_Msg
2824: ( G_PKG_NAME
2825: , l_return_status_text);
2826:
2823: OE_MSG_PUB.Add_Exc_Msg
2824: ( G_PKG_NAME
2825: , l_return_status_text);
2826:
2827: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2828: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2829: OE_MSG_PUB.Add_Exc_Msg
2830: ( G_PKG_NAME
2831: , l_return_status_text);
2824: ( G_PKG_NAME
2825: , l_return_status_text);
2826:
2827: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2828: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2829: OE_MSG_PUB.Add_Exc_Msg
2830: ( G_PKG_NAME
2831: , l_return_status_text);
2832:
2830: ( G_PKG_NAME
2831: , l_return_status_text);
2832:
2833: WHEN OTHERS THEN
2834: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2835: OE_MSG_PUB.Add_Exc_Msg
2836: ( G_PKG_NAME
2837: , l_return_status_text);
2838: END HVOP_Pricing_Setup;
2848: p_list_header_id => p_list_header_id,
2849: p_qualifier_group => p_qualifier_group,
2850: p_setup_action => p_setup_action);
2851: EXCEPTION
2852: WHEN FND_API.G_EXC_ERROR THEN
2853: x_return_status := FND_API.G_RET_STS_ERROR;
2854:
2855: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2856: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2849: p_qualifier_group => p_qualifier_group,
2850: p_setup_action => p_setup_action);
2851: EXCEPTION
2852: WHEN FND_API.G_EXC_ERROR THEN
2853: x_return_status := FND_API.G_RET_STS_ERROR;
2854:
2855: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2856: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2857:
2851: EXCEPTION
2852: WHEN FND_API.G_EXC_ERROR THEN
2853: x_return_status := FND_API.G_RET_STS_ERROR;
2854:
2855: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2856: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2857:
2858: WHEN OTHERS THEN
2859: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2852: WHEN FND_API.G_EXC_ERROR THEN
2853: x_return_status := FND_API.G_RET_STS_ERROR;
2854:
2855: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2856: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2857:
2858: WHEN OTHERS THEN
2859: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2860:
2855: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2856: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2857:
2858: WHEN OTHERS THEN
2859: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2860:
2861: END Maintain_header_pattern;
2862:
2863: Procedure Maintain_line_pattern(p_list_header_id in number,
2872: p_list_line_id => p_list_line_id,
2873: p_qualifier_group => p_qualifier_group,
2874: p_setup_action => p_setup_action);
2875: EXCEPTION
2876: WHEN FND_API.G_EXC_ERROR THEN
2877: x_return_status := FND_API.G_RET_STS_ERROR;
2878:
2879: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2880: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2873: p_qualifier_group => p_qualifier_group,
2874: p_setup_action => p_setup_action);
2875: EXCEPTION
2876: WHEN FND_API.G_EXC_ERROR THEN
2877: x_return_status := FND_API.G_RET_STS_ERROR;
2878:
2879: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2880: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2881:
2875: EXCEPTION
2876: WHEN FND_API.G_EXC_ERROR THEN
2877: x_return_status := FND_API.G_RET_STS_ERROR;
2878:
2879: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2880: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2881:
2882: WHEN OTHERS THEN
2883: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2876: WHEN FND_API.G_EXC_ERROR THEN
2877: x_return_status := FND_API.G_RET_STS_ERROR;
2878:
2879: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2880: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2881:
2882: WHEN OTHERS THEN
2883: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2884:
2879: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2880: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2881:
2882: WHEN OTHERS THEN
2883: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2884:
2885: END Maintain_line_pattern;
2886:
2887: Procedure Maintain_product_pattern(p_list_header_id in number,
2894: p_list_header_id => p_list_header_id,
2895: p_list_line_id => p_list_line_id,
2896: p_setup_action => p_setup_action);
2897: EXCEPTION
2898: WHEN FND_API.G_EXC_ERROR THEN
2899: x_return_status := FND_API.G_RET_STS_ERROR;
2900:
2901: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2902: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2895: p_list_line_id => p_list_line_id,
2896: p_setup_action => p_setup_action);
2897: EXCEPTION
2898: WHEN FND_API.G_EXC_ERROR THEN
2899: x_return_status := FND_API.G_RET_STS_ERROR;
2900:
2901: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2902: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2903:
2897: EXCEPTION
2898: WHEN FND_API.G_EXC_ERROR THEN
2899: x_return_status := FND_API.G_RET_STS_ERROR;
2900:
2901: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2902: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2903:
2904: WHEN OTHERS THEN
2905: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2898: WHEN FND_API.G_EXC_ERROR THEN
2899: x_return_status := FND_API.G_RET_STS_ERROR;
2900:
2901: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2902: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2903:
2904: WHEN OTHERS THEN
2905: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2906:
2901: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2902: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2903:
2904: WHEN OTHERS THEN
2905: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2906:
2907: END Maintain_product_pattern;
2908:
2909: -- pattern
2926: WHERE pte_source_system_id = p_pte_source_system_id
2927: AND enabled_flag = 'Y'
2928: AND rownum = 1;
2929:
2930: x_return_status := FND_API.G_RET_STS_SUCCESS;
2931:
2932: EXCEPTION
2933:
2934: WHEN NO_DATA_FOUND THEN
2948: END IF;
2949:
2950:
2951: -- As this is a WARNING message, we still return success
2952: x_return_status := FND_API.G_RET_STS_SUCCESS;
2953:
2954: WHEN OTHERS THEN
2955: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2956: END Check_Enabled_Func_Areas;
2951: -- As this is a WARNING message, we still return success
2952: x_return_status := FND_API.G_RET_STS_SUCCESS;
2953:
2954: WHEN OTHERS THEN
2955: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2956: END Check_Enabled_Func_Areas;
2957:
2958: END QP_Delayed_Requests_UTIL;