DBA Data[Home] [Help]

APPS.QP_PROCESS_OTHER_BENEFITS_PVT dependencies on FND_API

Line 88: x_return_status := FND_API.G_RET_STS_SUCCESS;

84: INVALID_CONTEXT EXCEPTION;
85:
86: BEGIN
87: l_debug := QP_PREQ_GRP.G_DEBUG_ENGINE;
88: x_return_status := FND_API.G_RET_STS_SUCCESS;
89: IF l_debug = FND_API.G_TRUE THEN
90: qp_preq_grp.engine_debug ('List Line Id: ' || p_list_line_id);
91: END IF;
92:

Line 89: IF l_debug = FND_API.G_TRUE THEN

85:
86: BEGIN
87: l_debug := QP_PREQ_GRP.G_DEBUG_ENGINE;
88: x_return_status := FND_API.G_RET_STS_SUCCESS;
89: IF l_debug = FND_API.G_TRUE THEN
90: qp_preq_grp.engine_debug ('List Line Id: ' || p_list_line_id);
91: END IF;
92:
93: OPEN get_modifier_level_code_cur;

Line 109: IF l_debug = FND_API.G_TRUE THEN

105: OPEN get_total_qty_cur;
106: FETCH get_total_qty_cur INTO v_total_base_qty,v_group_qty,v_group_amount ;
107: CLOSE get_total_qty_cur;
108: ELSE
109: IF l_debug = FND_API.G_TRUE THEN
110: qp_preq_grp.engine_debug('context : ' || v_pricing_attr_context);
111: END IF;
112: RAISE INVALID_CONTEXT;
113: END IF;

Line 115: IF l_debug = FND_API.G_TRUE THEN

111: END IF;
112: RAISE INVALID_CONTEXT;
113: END IF;
114:
115: IF l_debug = FND_API.G_TRUE THEN
116: qp_preq_grp.engine_debug('v_total_base_qty: ' || v_total_base_qty);
117: qp_preq_grp.engine_debug('v_group_qty: ' ||v_group_qty);
118: END IF;
119:

Line 124: IF l_debug = FND_API.G_TRUE THEN

120: OPEN get_base_qty_cur(v_pricing_attribute);
121: FETCH get_base_qty_cur INTO v_base_qty ,v_list_line_type_code,v_operand,v_benefit_qty ;
122: CLOSE get_base_qty_cur;
123:
124: IF l_debug = FND_API.G_TRUE THEN
125: qp_preq_grp.engine_debug('Total Setup Qty: ' || v_base_qty);
126: qp_preq_grp.engine_debug('Operand: ' || v_operand);
127: qp_preq_grp.engine_debug('List Line Type Code: ' || v_list_line_type_code);
128: END IF;

Line 156: IF l_debug = FND_API.G_TRUE THEN

152: --v_qualifying_qty := v_group_amount; -- shu 2388011, this is wrong, should be from ldets_tmp.line_quantity
153: v_qualifying_qty := v_total_base_qty; -- shu 2388011, --from ldets_tmp.line_quantity
154: END IF;
155: END IF;
156: IF l_debug = FND_API.G_TRUE THEN
157: qp_preq_grp.engine_debug('Modifier Level Code: '|| v_modifier_level_code);
158: qp_preq_grp.engine_debug('Qualifying Attribute : ' || v_qualifying_attribute);
159: qp_preq_grp.engine_debug('v_qualifying_qty: ' || v_qualifying_qty);
160: qp_preq_grp.engine_debug('v_base_qty: ' || v_base_qty);

Line 164: IF l_debug = FND_API.G_TRUE THEN

160: qp_preq_grp.engine_debug('v_base_qty: ' || v_base_qty);
161: qp_preq_grp.engine_debug('l_benefit_qty: ' || l_benefit_qty);
162: END IF;
163: v_total_benefit_qty := TRUNC((v_qualifying_qty / v_base_qty)) * l_benefit_qty;
164: IF l_debug = FND_API.G_TRUE THEN
165: qp_preq_grp.engine_debug('Total Benefit Qty: ' || v_total_benefit_qty);
166: END IF;
167: x_benefit_line_qty := v_total_benefit_qty;
168:

Line 171: IF l_debug = FND_API.G_TRUE THEN

167: x_benefit_line_qty := v_total_benefit_qty;
168:
169: EXCEPTION
170: WHEN INVALID_CONTEXT THEN
171: IF l_debug = FND_API.G_TRUE THEN
172: qp_preq_grp.engine_debug(v_routine_name || ' Invalid Context Specified.. Could Not Calculate Recurring Qty');
173: END IF;
174: x_return_status_txt := v_routine_name ||' Invalid Context Specified ..Could Not Calculate Recurring Qty';
175: v_return_status := FND_API.G_RET_STS_ERROR;

Line 175: v_return_status := FND_API.G_RET_STS_ERROR;

171: IF l_debug = FND_API.G_TRUE THEN
172: qp_preq_grp.engine_debug(v_routine_name || ' Invalid Context Specified.. Could Not Calculate Recurring Qty');
173: END IF;
174: x_return_status_txt := v_routine_name ||' Invalid Context Specified ..Could Not Calculate Recurring Qty';
175: v_return_status := FND_API.G_RET_STS_ERROR;
176: x_return_status := v_return_status;
177: IF l_debug = FND_API.G_TRUE THEN
178: qp_preq_grp.engine_debug(x_return_status_txt);
179: END IF;

Line 177: IF l_debug = FND_API.G_TRUE THEN

173: END IF;
174: x_return_status_txt := v_routine_name ||' Invalid Context Specified ..Could Not Calculate Recurring Qty';
175: v_return_status := FND_API.G_RET_STS_ERROR;
176: x_return_status := v_return_status;
177: IF l_debug = FND_API.G_TRUE THEN
178: qp_preq_grp.engine_debug(x_return_status_txt);
179: END IF;
180: WHEN OTHERS THEN
181: IF l_debug = FND_API.G_TRUE THEN

Line 181: IF l_debug = FND_API.G_TRUE THEN

177: IF l_debug = FND_API.G_TRUE THEN
178: qp_preq_grp.engine_debug(x_return_status_txt);
179: END IF;
180: WHEN OTHERS THEN
181: IF l_debug = FND_API.G_TRUE THEN
182: qp_preq_grp.engine_debug(v_routine_name || ' ' || SQLERRM);
183: END IF;
184: x_return_status := FND_API.G_RET_STS_ERROR;
185: x_return_status_txt := v_routine_name || ' ' || SQLERRM;

Line 184: x_return_status := FND_API.G_RET_STS_ERROR;

180: WHEN OTHERS THEN
181: IF l_debug = FND_API.G_TRUE THEN
182: qp_preq_grp.engine_debug(v_routine_name || ' ' || SQLERRM);
183: END IF;
184: x_return_status := FND_API.G_RET_STS_ERROR;
185: x_return_status_txt := v_routine_name || ' ' || SQLERRM;
186: END Calculate_Recurring_Quantity;
187:
188: PROCEDURE Calculate_Recurring_Quantity(p_pricing_phase_id NUMBER,

Line 216: IF l_debug = FND_API.G_TRUE THEN

212:
213: BEGIN
214: l_debug := QP_PREQ_GRP.G_DEBUG_ENGINE;
215:
216: IF l_debug = FND_API.G_TRUE THEN
217: QP_PREQ_GRP.engine_debug('Calculate_Recurring_Quantity-PHASE='||p_pricing_phase_id);
218: END IF;
219:
220: OPEN get_recurring_details_cur;

Line 231: IF l_debug = FND_API.G_TRUE THEN

227: EXIT WHEN l_line_detail_index_tbl.COUNT = 0;
228:
229: FOR I in l_line_detail_index_tbl.first .. l_line_detail_index_tbl.last
230: LOOP
231: IF l_debug = FND_API.G_TRUE THEN
232: QP_PREQ_GRP.engine_debug('In Recurring Routine --- #1');
233: QP_PREQ_GRP.engine_debug('List Header Id: ' || l_LIST_HEADER_ID_TBL(I) );
234: QP_PREQ_GRP.engine_debug('List Line Id: ' || l_LIST_LINE_ID_TBL(I) );
235: QP_PREQ_GRP.engine_debug('List Line Index: ' || l_LINE_INDEX_TBL(I) );

Line 248: IF l_debug = FND_API.G_TRUE THEN

244: l_benefit_line_qty_tbl(I),
245: l_return_status,
246: l_status_text);
247:
248: IF l_debug = FND_API.G_TRUE THEN
249: QP_PREQ_GRP.engine_debug('Return Status Text : ' || l_status_text);
250: END IF;
251:
252: IF(l_return_status = FND_API.G_RET_STS_ERROR) THEN

Line 252: IF(l_return_status = FND_API.G_RET_STS_ERROR) THEN

248: IF l_debug = FND_API.G_TRUE THEN
249: QP_PREQ_GRP.engine_debug('Return Status Text : ' || l_status_text);
250: END IF;
251:
252: IF(l_return_status = FND_API.G_RET_STS_ERROR) THEN
253: RAISE FND_API.G_EXC_ERROR;
254: END IF;
255: END LOOP;
256:

Line 253: RAISE FND_API.G_EXC_ERROR;

249: QP_PREQ_GRP.engine_debug('Return Status Text : ' || l_status_text);
250: END IF;
251:
252: IF(l_return_status = FND_API.G_RET_STS_ERROR) THEN
253: RAISE FND_API.G_EXC_ERROR;
254: END IF;
255: END LOOP;
256:
257: FORALL I IN l_line_detail_index_tbl.first..l_line_detail_index_tbl.last

Line 262: IF l_debug = FND_API.G_TRUE THEN

258: UPDATE qp_npreq_ldets_tmp --upd1
259: SET operand_value = l_benefit_line_qty_tbl(I)
260: WHERE LINE_DETAIL_INDEX = l_line_detail_index_tbl(I);
261:
262: IF l_debug = FND_API.G_TRUE THEN
263: QP_PREQ_GRP.engine_debug('Updated count: ' || l_line_detail_index_tbl.count);
264: END IF;
265: END LOOP;
266:

Line 267: IF l_debug = FND_API.G_TRUE THEN

263: QP_PREQ_GRP.engine_debug('Updated count: ' || l_line_detail_index_tbl.count);
264: END IF;
265: END LOOP;
266:
267: IF l_debug = FND_API.G_TRUE THEN
268: QP_PREQ_GRP.engine_debug('End Calculate_Recurring_Quantity-PHASE='||p_pricing_phase_id);
269: END IF;
270:
271: EXCEPTION

Line 273: IF l_debug = FND_API.G_TRUE THEN

269: END IF;
270:
271: EXCEPTION
272: WHEN OTHERS THEN
273: IF l_debug = FND_API.G_TRUE THEN
274: qp_preq_grp.engine_debug(v_routine_name || ' ' || SQLERRM);
275: END IF;
276: x_return_status := FND_API.G_RET_STS_ERROR;
277: x_return_status_txt := v_routine_name || ' ' || SQLERRM;

Line 276: x_return_status := FND_API.G_RET_STS_ERROR;

272: WHEN OTHERS THEN
273: IF l_debug = FND_API.G_TRUE THEN
274: qp_preq_grp.engine_debug(v_routine_name || ' ' || SQLERRM);
275: END IF;
276: x_return_status := FND_API.G_RET_STS_ERROR;
277: x_return_status_txt := v_routine_name || ' ' || SQLERRM;
278: END Calculate_Recurring_Quantity;
279:
280: PROCEDURE Process_PRG(p_line_index NUMBER,

Line 384: x_return_status := FND_API.G_RET_STS_SUCCESS;

380: l_rltd_line_detail_index NUMBER;
381: v_routine_name CONSTANT VARCHAR2(240) := 'Routine:QP_Process_Other_Benefits.Process_PRG';
382: BEGIN
383:
384: x_return_status := FND_API.G_RET_STS_SUCCESS;
385: v_benefit_exists := FALSE;
386:
387: l_debug := QP_PREQ_GRP.G_DEBUG_ENGINE;
388:

Line 397: IF l_debug = FND_API.G_TRUE THEN

393: -- from qp_npreq_rltd_lines_tmp and create a relationship between the line_detail_index and the rltd_line_detail_index
394: -- If record does not exist go thru the regular prg processing
395:
396:
397: IF l_debug = FND_API.G_TRUE THEN
398: qp_preq_grp.engine_debug('Modifier Level Code: ' || p_modifier_level_code);
399: END IF;
400:
401: IF (p_modifier_level_code = 'LINEGROUP') THEN

Line 411: IF l_debug = FND_API.G_TRUE THEN

407: --qualifying for the linegroup modifier
408:
409: FOR j IN get_rltd_line_detail_index
410: LOOP
411: IF l_debug = FND_API.G_TRUE THEN
412: qp_preq_grp.engine_debug('Linegroup Related Line Detail Index: ' || j.related_line_detail_index);
413: END IF;
414: l_rltd_line_detail_index := j.related_line_detail_index;
415:

Line 437: IF l_debug = FND_API.G_TRUE THEN

433: ,p_line_index
434: ,j.related_line_index
435: ,j.related_list_line_id); -- bug 2979447
436:
437: IF l_debug = FND_API.G_TRUE THEN
438: qp_preq_grp.engine_debug('Only relationship is getting created'
439: ||' for LineGroup discounts');
440: qp_preq_grp.engine_debug('New Related Line Detail-Line Detail Created');
441: END IF;

Line 448: IF l_debug = FND_API.G_TRUE THEN

444: -- ELSE
445:
446: IF l_rltd_line_detail_index IS NULL THEN
447:
448: IF l_debug = FND_API.G_TRUE THEN
449: qp_preq_grp.engine_debug('Regular PRG processing');
450: END IF;
451:
452: OPEN get_max_line_index_cur;

Line 476: IF(x_ret_status = FND_API.G_RET_STS_ERROR) THEN

472: ELSE--j.PRICE_BREAK_TYPE_CODE
473: x_total_benefit_qty := i.BENEFIT_QTY;
474: END IF;--j.PRICE_BREAK_TYPE_CODE
475:
476: IF(x_ret_status = FND_API.G_RET_STS_ERROR) THEN
477: RAISE FND_API.G_EXC_ERROR;
478: END IF;
479:
480: IF l_debug = FND_API.G_TRUE THEN

Line 477: RAISE FND_API.G_EXC_ERROR;

473: x_total_benefit_qty := i.BENEFIT_QTY;
474: END IF;--j.PRICE_BREAK_TYPE_CODE
475:
476: IF(x_ret_status = FND_API.G_RET_STS_ERROR) THEN
477: RAISE FND_API.G_EXC_ERROR;
478: END IF;
479:
480: IF l_debug = FND_API.G_TRUE THEN
481: qp_preq_grp.engine_debug('Total Benefit Qty:' || x_total_benefit_qty);

Line 480: IF l_debug = FND_API.G_TRUE THEN

476: IF(x_ret_status = FND_API.G_RET_STS_ERROR) THEN
477: RAISE FND_API.G_EXC_ERROR;
478: END IF;
479:
480: IF l_debug = FND_API.G_TRUE THEN
481: qp_preq_grp.engine_debug('Total Benefit Qty:' || x_total_benefit_qty);
482: END IF;
483:
484: -- Find the Price of the DIS for PRG Line Vivek

Line 487: IF l_debug = FND_API.G_TRUE THEN

483:
484: -- Find the Price of the DIS for PRG Line Vivek
485: -- Only LIST_PRICE column on BENEFIT_PRICE_LIST_LINE_ID
486:
487: IF l_debug = FND_API.G_TRUE THEN
488: qp_preq_grp.engine_debug('Benefit Price List Line Id:' || i.BENEFIT_PRICE_LIST_LINE_ID);
489: END IF;
490:
491: OPEN get_list_price_cur(i.BENEFIT_PRICE_LIST_LINE_ID);

Line 496: IF l_debug = FND_API.G_TRUE THEN

492: FETCH get_list_price_cur
493: INTO v_list_header_id,v_list_line_id,v_list_price,v_rounding_factor;
494: CLOSE get_list_price_cur;
495:
496: IF l_debug = FND_API.G_TRUE THEN
497: qp_preq_grp.engine_debug('PRG Line Rounding Factor :' || v_rounding_factor);
498: END IF;
499:
500: OPEN get_request_type_code_cur;

Line 504: IF l_debug = FND_API.G_TRUE THEN

500: OPEN get_request_type_code_cur;
501: FETCH get_request_type_code_cur INTO v_request_type_code;
502: CLOSE get_request_type_code_cur;
503:
504: IF l_debug = FND_API.G_TRUE THEN
505: qp_preq_grp.engine_debug('List Price of DIS Line:' || v_list_price);
506: END IF;
507:
508: OPEN get_benefit_line_index_cur(i.LIST_LINE_ID,v_line_index);

Line 567: IF l_debug = FND_API.G_TRUE THEN

563: , LINE_CATEGORY
564: FROM qp_npreq_lines_tmp
565: WHERE LINE_INDEX = p_line_index;
566:
567: IF l_debug = FND_API.G_TRUE THEN
568: qp_preq_grp.engine_debug('New Line Created');
569: END IF;
570:
571: -- Ravi remove line to line relationship ie comment out the insert below

Line 576: IF l_debug = FND_API.G_TRUE THEN

572: /* INSERT INTO qp_npreq_rltd_lines_tmp(REQUEST_TYPE_CODE, LINE_INDEX,RELATIONSHIP_TYPE_CODE,
573: RELATED_LINE_INDEX, PRICING_STATUS_CODE) VALUES
574: (v_request_type_code,p_line_index,qp_preq_grp.G_GENERATED_LINE,v_line_index,
575: qp_preq_grp.G_STATUS_NEW);
576: IF l_debug = FND_API.G_TRUE THEN
577: qp_preq_grp.engine_debug('New Line-Line Created');
578: END IF; */
579:
580: v_detail_line_index := v_detail_line_index + 1; -- Temporary

Line 616: IF l_debug = FND_API.G_TRUE THEN

612: ,x_total_benefit_qty
613: ,v_rounding_factor
614: ,qp_preq_grp.G_STATUS_NEW);
615:
616: IF l_debug = FND_API.G_TRUE THEN
617: qp_preq_grp.engine_debug('New PLL Line Created');
618: END IF;
619:
620: v_detail_line_index := v_detail_line_index + 1; -- Temporary

Line 667: IF l_debug = FND_API.G_TRUE THEN

663: ,i.MODIFIER_LEVEL_CODE
664: --fix for bug 2988476
665: ,QP_PREQ_PUB.G_FREEGOOD);
666:
667: IF l_debug = FND_API.G_TRUE THEN
668: qp_preq_grp.engine_debug('New Adjustment Line Created');
669: END IF;
670:
671: INSERT INTO qp_npreq_rltd_lines_tmp

Line 706: IF l_debug = FND_API.G_TRUE THEN

702: x_total_benefit_qty
703: -- end shu, side fix bug 2491158, missing data in qp_npreq_rltd_lines_tmp
704: );
705:
706: IF l_debug = FND_API.G_TRUE THEN
707: qp_preq_grp.engine_debug('New Related Line Detail-Line Detail Created');
708: END IF;
709:
710: -- Insert into Line Attributes table qp_npreq_line_attrs_tmp

Line 738: IF l_debug = FND_API.G_TRUE THEN

734: ,qp_preq_grp.G_LINE_LEVEL
735: ,qp_preq_grp.G_PRODUCT_TYPE
736: ,qp_preq_grp.G_STATUS_NEW); --Item
737:
738: IF l_debug = FND_API.G_TRUE THEN
739: qp_preq_grp.engine_debug('New Attribute Line Created');
740: END IF;
741: END IF; -- l_list_line_id;
742:

Line 770: IF l_debug = FND_API.G_TRUE THEN

766: qp_preq_grp.G_LINE_DETAIL_INDEX := v_detail_line_index;
767: END IF;--l_rltd_line_detail_index
768: EXCEPTION
769: WHEN OTHERS THEN
770: IF l_debug = FND_API.G_TRUE THEN
771: qp_preq_grp.engine_debug(v_routine_name || ' ' || SQLERRM);
772: END IF;
773: x_return_status := FND_API.G_RET_STS_ERROR;
774: x_return_status_txt := v_routine_name || ' ' || SQLERRM;

Line 773: x_return_status := FND_API.G_RET_STS_ERROR;

769: WHEN OTHERS THEN
770: IF l_debug = FND_API.G_TRUE THEN
771: qp_preq_grp.engine_debug(v_routine_name || ' ' || SQLERRM);
772: END IF;
773: x_return_status := FND_API.G_RET_STS_ERROR;
774: x_return_status_txt := v_routine_name || ' ' || SQLERRM;
775: IF l_debug = FND_API.G_TRUE THEN
776: qp_preq_grp.engine_debug('Process_PRG: ' || SQLERRM);
777: END IF;

Line 775: IF l_debug = FND_API.G_TRUE THEN

771: qp_preq_grp.engine_debug(v_routine_name || ' ' || SQLERRM);
772: END IF;
773: x_return_status := FND_API.G_RET_STS_ERROR;
774: x_return_status_txt := v_routine_name || ' ' || SQLERRM;
775: IF l_debug = FND_API.G_TRUE THEN
776: qp_preq_grp.engine_debug('Process_PRG: ' || SQLERRM);
777: END IF;
778: END Process_PRG;
779:

Line 869: x_return_status := FND_API.G_RET_STS_SUCCESS;

865: v_benefit_exists BOOLEAN;
866:
867: BEGIN
868:
869: x_return_status := FND_API.G_RET_STS_SUCCESS;
870: v_benefit_exists := FALSE;
871:
872: l_debug := QP_PREQ_GRP.G_DEBUG_ENGINE;
873:

Line 884: IF l_debug = FND_API.G_TRUE THEN

880: FOR j IN get_related_modifier_id_cur
881: LOOP
882: FOR i IN get_related_lines_cur(j.TO_RLTD_MODIFIER_ID)
883: LOOP
884: IF l_debug = FND_API.G_TRUE THEN
885: qp_preq_grp.engine_debug('Loop Count');
886: END IF;
887: IF l_debug = FND_API.G_TRUE THEN
888: qp_preq_grp.engine_debug ('FROM RLTD MODIFIER ID : ' || j.FROM_RLTD_MODIFIER_ID);

Line 887: IF l_debug = FND_API.G_TRUE THEN

883: LOOP
884: IF l_debug = FND_API.G_TRUE THEN
885: qp_preq_grp.engine_debug('Loop Count');
886: END IF;
887: IF l_debug = FND_API.G_TRUE THEN
888: qp_preq_grp.engine_debug ('FROM RLTD MODIFIER ID : ' || j.FROM_RLTD_MODIFIER_ID);
889: qp_preq_grp.engine_debug ('TO RLTD MODIFIER ID : ' || j.TO_RLTD_MODIFIER_ID);
890: END IF;
891:

Line 901: IF(x_ret_status = FND_API.G_RET_STS_ERROR) THEN

897: x_qualifier_flag,
898: x_ret_status,
899: x_ret_status_txt);
900:
901: IF(x_ret_status = FND_API.G_RET_STS_ERROR) THEN
902: RAISE FND_API.G_EXC_ERROR;
903: END IF;
904:
905: IF (x_qualifier_flag = TRUE) THEN

Line 902: RAISE FND_API.G_EXC_ERROR;

898: x_ret_status,
899: x_ret_status_txt);
900:
901: IF(x_ret_status = FND_API.G_RET_STS_ERROR) THEN
902: RAISE FND_API.G_EXC_ERROR;
903: END IF;
904:
905: IF (x_qualifier_flag = TRUE) THEN
906: IF l_debug = FND_API.G_TRUE THEN

Line 906: IF l_debug = FND_API.G_TRUE THEN

902: RAISE FND_API.G_EXC_ERROR;
903: END IF;
904:
905: IF (x_qualifier_flag = TRUE) THEN
906: IF l_debug = FND_API.G_TRUE THEN
907: qp_preq_grp.engine_debug('The qualifier flag:' || 'TRUE');
908: END IF;
909: ELSE
910:

Line 911: IF l_debug = FND_API.G_TRUE THEN

907: qp_preq_grp.engine_debug('The qualifier flag:' || 'TRUE');
908: END IF;
909: ELSE
910:
911: IF l_debug = FND_API.G_TRUE THEN
912: qp_preq_grp.engine_debug('Failed in Qualification:' || j.TO_RLTD_MODIFIER_ID);
913: END IF;
914:
915: UPDATE qp_npreq_ldets_tmp --upd1

Line 991: IF l_debug = FND_API.G_TRUE THEN

987: qp_preq_grp.G_STATUS_NEW,
988: i.MODIFIER_LEVEL_CODE);
989:
990: -- shu, begin fix bug 2491158
991: IF l_debug = FND_API.G_TRUE THEN
992: qp_preq_grp.engine_debug ('debug data going to qp_npreq_rltd_lines_tmp .........');
993: qp_preq_grp.engine_debug ('OID line_index: '||p_line_index);
994: qp_preq_grp.engine_debug ('OID list_line_id: '||p_list_line_id);
995: qp_preq_grp.engine_debug ('Benifit line_index: '||m.line_index);

Line 1064: IF l_debug = FND_API.G_TRUE THEN

1060: END LOOP;
1061: qp_preq_grp.G_LINE_DETAIL_INDEX := v_detail_line_index;
1062: EXCEPTION
1063: WHEN OTHERS THEN
1064: IF l_debug = FND_API.G_TRUE THEN
1065: qp_preq_grp.engine_debug(v_routine_name || ' ' || SQLERRM);
1066: END IF;
1067: x_return_status := FND_API.G_RET_STS_ERROR;
1068: x_return_status_txt := v_routine_name || ' ' || SQLERRM;

Line 1067: x_return_status := FND_API.G_RET_STS_ERROR;

1063: WHEN OTHERS THEN
1064: IF l_debug = FND_API.G_TRUE THEN
1065: qp_preq_grp.engine_debug(v_routine_name || ' ' || SQLERRM);
1066: END IF;
1067: x_return_status := FND_API.G_RET_STS_ERROR;
1068: x_return_status_txt := v_routine_name || ' ' || SQLERRM;
1069: IF l_debug = FND_API.G_TRUE THEN
1070: qp_preq_grp.engine_debug(SQLERRM);
1071: END IF;

Line 1069: IF l_debug = FND_API.G_TRUE THEN

1065: qp_preq_grp.engine_debug(v_routine_name || ' ' || SQLERRM);
1066: END IF;
1067: x_return_status := FND_API.G_RET_STS_ERROR;
1068: x_return_status_txt := v_routine_name || ' ' || SQLERRM;
1069: IF l_debug = FND_API.G_TRUE THEN
1070: qp_preq_grp.engine_debug(SQLERRM);
1071: END IF;
1072: END Process_OID;
1073:

Line 1169: x_return_status := FND_API.G_RET_STS_SUCCESS;

1165: v_update_flag BOOLEAN := FALSE;
1166: v_routine_name CONSTANT VARCHAR2(240):='Routine:QP_Process_Other_Benefits.Find_Qualification_For_Benefit';
1167: BEGIN
1168:
1169: x_return_status := FND_API.G_RET_STS_SUCCESS;
1170: l_debug := QP_PREQ_GRP.G_DEBUG_ENGINE;
1171:
1172: IF (p_rltd_modifier_type = qp_preq_grp.G_QUALIFIER_TYPE) THEN -- Do group checking
1173:

Line 1174: IF l_debug = FND_API.G_TRUE THEN

1170: l_debug := QP_PREQ_GRP.G_DEBUG_ENGINE;
1171:
1172: IF (p_rltd_modifier_type = qp_preq_grp.G_QUALIFIER_TYPE) THEN -- Do group checking
1173:
1174: IF l_debug = FND_API.G_TRUE THEN
1175: qp_preq_grp.engine_debug('QUALIFIER QUALIFICATION');
1176: END IF;
1177:
1178: FOR i IN no_rltd_modifiers_in_grp_cur

Line 1180: IF l_debug = FND_API.G_TRUE THEN

1176: END IF;
1177:
1178: FOR i IN no_rltd_modifiers_in_grp_cur
1179: LOOP
1180: IF l_debug = FND_API.G_TRUE THEN
1181: qp_preq_grp.engine_debug('Group no: ' || i.RLTD_MODIFIER_GRP_NO);
1182: END IF;
1183:
1184: v_count := 0; --satisfied group cnt re-init on group change -- #2725979

Line 1188: IF l_debug = FND_API.G_TRUE THEN

1184: v_count := 0; --satisfied group cnt re-init on group change -- #2725979
1185:
1186: FOR j IN rltd_modifiers_cur(i.RLTD_MODIFIER_GRP_NO)
1187: LOOP
1188: IF l_debug = FND_API.G_TRUE THEN
1189: qp_preq_grp.engine_debug('To Modifier Id: ' || j.TO_RLTD_MODIFIER_ID);
1190: END IF;
1191:
1192: FOR k IN check_rltd_mods_passed_cur(j.TO_RLTD_MODIFIER_ID)

Line 1194: IF l_debug = FND_API.G_TRUE THEN

1190: END IF;
1191:
1192: FOR k IN check_rltd_mods_passed_cur(j.TO_RLTD_MODIFIER_ID)
1193: LOOP
1194: IF l_debug = FND_API.G_TRUE THEN
1195: qp_preq_grp.engine_debug('Qualification Succeeded for Rltd Modifier:' || j.TO_RLTD_MODIFIER_ID ||
1196: k.list_line_id);
1197: END IF;
1198:

Line 1208: IF l_debug = FND_API.G_TRUE THEN

1204: END LOOP; --j
1205:
1206: v_no_of_mods_in_grp := i.NO_OF_MODIFIERS_IN_GRP; -- Store the no of modifiers count
1207:
1208: IF l_debug = FND_API.G_TRUE THEN
1209: qp_preq_grp.engine_debug('No of modifiers in grp :' || v_no_of_mods_in_grp);
1210: qp_preq_grp.engine_debug('Count :' || v_count);
1211: END IF;
1212:

Line 1228: IF l_debug = FND_API.G_TRUE THEN

1224: -- This is the case wherin there is no QUALIFIER Record .. Ex: Buy A , get 20% of B.There is
1225: -- only BENEFIT line
1226:
1227: IF (v_no_of_mods_in_grp = 0 and v_count = 0 ) THEN
1228: IF l_debug = FND_API.G_TRUE THEN
1229: qp_preq_grp.engine_debug(v_no_of_mods_in_grp);
1230: qp_preq_grp.engine_debug(v_count);
1231: END IF;
1232: x_qualified_flag := TRUE;

Line 1236: IF l_debug = FND_API.G_TRUE THEN

1232: x_qualified_flag := TRUE;
1233: END IF;
1234: ELSE -- Benefit -- If there on the order give it
1235:
1236: IF l_debug = FND_API.G_TRUE THEN
1237: qp_preq_grp.engine_debug('BENEFIT QUALIFICATION');
1238: END IF;
1239:
1240: FOR k IN check_rltd_mods_passed_cur(p_list_line_id)

Line 1242: IF l_debug = FND_API.G_TRUE THEN

1238: END IF;
1239:
1240: FOR k IN check_rltd_mods_passed_cur(p_list_line_id)
1241: LOOP
1242: IF l_debug = FND_API.G_TRUE THEN
1243: qp_preq_grp.engine_debug('Passed List line id:' || p_list_line_id);
1244: qp_preq_grp.engine_debug('Matching List Line Id:' || k.list_line_id);
1245: END IF;
1246:

Line 1262: IF l_debug = FND_API.G_TRUE THEN

1258: END IF;
1259: x_qualified_flag := v_qualified_flag;
1260: END IF;
1261:
1262: IF l_debug = FND_API.G_TRUE THEN
1263: qp_preq_grp.engine_debug('Benefit Record Count:' || v_count);
1264: END IF;
1265:
1266: IF (v_update_flag = TRUE) THEN

Line 1278: IF l_debug = FND_API.G_TRUE THEN

1274: WHERE a.LINE_DETAIL_INDEX IN (SELECT b.LINE_DETAIL_INDEX
1275: FROM qp_npreq_ldets_tmp b
1276: WHERE b.CREATED_FROM_LIST_LINE_ID = p_list_line_id); */
1277:
1278: IF l_debug = FND_API.G_TRUE THEN
1279: qp_preq_grp.engine_debug ('BENEFIT STATUS UPDATED');
1280: END IF;
1281: END IF;
1282: --v_count := 0; -- Reinitialize for each grp(done on change of group earlier)

Line 1285: IF l_debug = FND_API.G_TRUE THEN

1281: END IF;
1282: --v_count := 0; -- Reinitialize for each grp(done on change of group earlier)
1283: EXCEPTION
1284: WHEN OTHERS THEN
1285: IF l_debug = FND_API.G_TRUE THEN
1286: qp_preq_grp.engine_debug(v_routine_name || ' ' || SQLERRM);
1287: END IF;
1288: x_return_status := FND_API.G_RET_STS_ERROR;
1289: x_return_status_txt := v_routine_name || ' ' || SQLERRM;

Line 1288: x_return_status := FND_API.G_RET_STS_ERROR;

1284: WHEN OTHERS THEN
1285: IF l_debug = FND_API.G_TRUE THEN
1286: qp_preq_grp.engine_debug(v_routine_name || ' ' || SQLERRM);
1287: END IF;
1288: x_return_status := FND_API.G_RET_STS_ERROR;
1289: x_return_status_txt := v_routine_name || ' ' || SQLERRM;
1290: IF l_debug = FND_API.G_TRUE THEN
1291: qp_preq_grp.engine_debug ('Error in Proc');
1292: END IF;

Line 1290: IF l_debug = FND_API.G_TRUE THEN

1286: qp_preq_grp.engine_debug(v_routine_name || ' ' || SQLERRM);
1287: END IF;
1288: x_return_status := FND_API.G_RET_STS_ERROR;
1289: x_return_status_txt := v_routine_name || ' ' || SQLERRM;
1290: IF l_debug = FND_API.G_TRUE THEN
1291: qp_preq_grp.engine_debug ('Error in Proc');
1292: END IF;
1293: END Find_Qualification_For_Benefit;
1294:

Line 1323: x_return_status := FND_API.G_RET_STS_SUCCESS;

1319: x_ret_status_txt VARCHAR2(240);
1320:
1321: BEGIN
1322:
1323: x_return_status := FND_API.G_RET_STS_SUCCESS;
1324: l_debug := QP_PREQ_GRP.G_DEBUG_ENGINE;
1325:
1326: FOR i IN get_list_lines_cur
1327: LOOP

Line 1329: IF l_debug = FND_API.G_TRUE THEN

1325:
1326: FOR i IN get_list_lines_cur
1327: LOOP
1328:
1329: IF l_debug = FND_API.G_TRUE THEN
1330: qp_preq_grp.engine_debug('Qualifying List Line Id: ' || i.CREATED_FROM_LIST_LINE_ID);
1331: qp_preq_grp.engine_debug('List Line Type: ' || i.CREATED_FROM_LIST_LINE_TYPE);
1332: END IF;
1333:

Line 1342: IF(x_ret_status = FND_API.G_RET_STS_ERROR) THEN

1338: x_qualifier_flag,
1339: x_ret_status,
1340: x_ret_status_txt);
1341:
1342: IF(x_ret_status = FND_API.G_RET_STS_ERROR) THEN
1343: RAISE FND_API.G_EXC_ERROR;
1344: END IF;
1345:
1346: IF (x_qualifier_flag = TRUE) THEN

Line 1343: RAISE FND_API.G_EXC_ERROR;

1339: x_ret_status,
1340: x_ret_status_txt);
1341:
1342: IF(x_ret_status = FND_API.G_RET_STS_ERROR) THEN
1343: RAISE FND_API.G_EXC_ERROR;
1344: END IF;
1345:
1346: IF (x_qualifier_flag = TRUE) THEN
1347: IF l_debug = FND_API.G_TRUE THEN

Line 1347: IF l_debug = FND_API.G_TRUE THEN

1343: RAISE FND_API.G_EXC_ERROR;
1344: END IF;
1345:
1346: IF (x_qualifier_flag = TRUE) THEN
1347: IF l_debug = FND_API.G_TRUE THEN
1348: qp_preq_grp.engine_debug('QUALIFICATION SUCCEDED');
1349: qp_preq_grp.engine_debug('List Line Type : ' || i.created_from_list_line_type);
1350: END IF;
1351: IF (i.CREATED_FROM_LIST_LINE_TYPE = qp_preq_grp.G_OTHER_ITEM_DISCOUNT) THEN

Line 1353: IF(x_ret_status = FND_API.G_RET_STS_ERROR) THEN

1349: qp_preq_grp.engine_debug('List Line Type : ' || i.created_from_list_line_type);
1350: END IF;
1351: IF (i.CREATED_FROM_LIST_LINE_TYPE = qp_preq_grp.G_OTHER_ITEM_DISCOUNT) THEN
1352: Process_OID(p_line_index,i.CREATED_FROM_LIST_LINE_ID,p_pricing_phase_id,x_ret_status,x_ret_status_txt);
1353: IF(x_ret_status = FND_API.G_RET_STS_ERROR) THEN
1354: RAISE FND_API.G_EXC_ERROR;
1355: END IF;
1356: ELSIF (i.CREATED_FROM_LIST_LINE_TYPE = qp_preq_grp.G_PROMO_GOODS_DISCOUNT) THEN
1357: Process_PRG(p_line_index,i.line_detail_index,i.modifier_level_code,i.CREATED_FROM_LIST_LINE_ID,

Line 1354: RAISE FND_API.G_EXC_ERROR;

1350: END IF;
1351: IF (i.CREATED_FROM_LIST_LINE_TYPE = qp_preq_grp.G_OTHER_ITEM_DISCOUNT) THEN
1352: Process_OID(p_line_index,i.CREATED_FROM_LIST_LINE_ID,p_pricing_phase_id,x_ret_status,x_ret_status_txt);
1353: IF(x_ret_status = FND_API.G_RET_STS_ERROR) THEN
1354: RAISE FND_API.G_EXC_ERROR;
1355: END IF;
1356: ELSIF (i.CREATED_FROM_LIST_LINE_TYPE = qp_preq_grp.G_PROMO_GOODS_DISCOUNT) THEN
1357: Process_PRG(p_line_index,i.line_detail_index,i.modifier_level_code,i.CREATED_FROM_LIST_LINE_ID,
1358: p_pricing_phase_id,x_ret_status,x_ret_status_txt);

Line 1359: IF(x_ret_status = FND_API.G_RET_STS_ERROR) THEN

1355: END IF;
1356: ELSIF (i.CREATED_FROM_LIST_LINE_TYPE = qp_preq_grp.G_PROMO_GOODS_DISCOUNT) THEN
1357: Process_PRG(p_line_index,i.line_detail_index,i.modifier_level_code,i.CREATED_FROM_LIST_LINE_ID,
1358: p_pricing_phase_id,x_ret_status,x_ret_status_txt);
1359: IF(x_ret_status = FND_API.G_RET_STS_ERROR) THEN
1360: RAISE FND_API.G_EXC_ERROR;
1361: END IF;
1362: ELSIF (i.CREATED_FROM_LIST_LINE_TYPE = qp_preq_grp.G_COUPON_ISSUE)
1363: AND (qp_preq_grp.G_PUBLIC_API_CALL_FLAG = qp_preq_grp.G_NO

Line 1360: RAISE FND_API.G_EXC_ERROR;

1356: ELSIF (i.CREATED_FROM_LIST_LINE_TYPE = qp_preq_grp.G_PROMO_GOODS_DISCOUNT) THEN
1357: Process_PRG(p_line_index,i.line_detail_index,i.modifier_level_code,i.CREATED_FROM_LIST_LINE_ID,
1358: p_pricing_phase_id,x_ret_status,x_ret_status_txt);
1359: IF(x_ret_status = FND_API.G_RET_STS_ERROR) THEN
1360: RAISE FND_API.G_EXC_ERROR;
1361: END IF;
1362: ELSIF (i.CREATED_FROM_LIST_LINE_TYPE = qp_preq_grp.G_COUPON_ISSUE)
1363: AND (qp_preq_grp.G_PUBLIC_API_CALL_FLAG = qp_preq_grp.G_NO
1364: or (qp_preq_grp.G_PUBLIC_API_CALL_FLAG = qp_preq_grp.G_YES --bug 3859759

Line 1373: IF(x_ret_status = FND_API.G_RET_STS_ERROR) THEN

1369: p_simulation_flag,
1370: x_ret_status,
1371: x_ret_status_txt);
1372:
1373: IF(x_ret_status = FND_API.G_RET_STS_ERROR) THEN
1374: RAISE FND_API.G_EXC_ERROR;
1375: END IF;
1376:
1377: /* redeem coupon should not be called here. Because coupon benefits could be of

Line 1374: RAISE FND_API.G_EXC_ERROR;

1370: x_ret_status,
1371: x_ret_status_txt);
1372:
1373: IF(x_ret_status = FND_API.G_RET_STS_ERROR) THEN
1374: RAISE FND_API.G_EXC_ERROR;
1375: END IF;
1376:
1377: /* redeem coupon should not be called here. Because coupon benefits could be of
1378: any type, moved to qp_preq_grp package

Line 1381: IF(x_ret_status = FND_API.G_RET_STS_ERROR) THEN

1377: /* redeem coupon should not be called here. Because coupon benefits could be of
1378: any type, moved to qp_preq_grp package
1379: QP_COUPON_PVT.REDEEM_COUPONS(p_simulation_flag, x_ret_status, x_ret_status_txt);
1380:
1381: IF(x_ret_status = FND_API.G_RET_STS_ERROR) THEN
1382: RAISE FND_API.G_EXC_ERROR;
1383: END IF;
1384: */
1385:

Line 1382: RAISE FND_API.G_EXC_ERROR;

1378: any type, moved to qp_preq_grp package
1379: QP_COUPON_PVT.REDEEM_COUPONS(p_simulation_flag, x_ret_status, x_ret_status_txt);
1380:
1381: IF(x_ret_status = FND_API.G_RET_STS_ERROR) THEN
1382: RAISE FND_API.G_EXC_ERROR;
1383: END IF;
1384: */
1385:
1386: END IF;

Line 1403: WHEN FND_API.G_EXC_ERROR THEN

1399: AND PRICING_STATUS_CODE = qp_preq_grp.G_STATUS_NEW; */
1400: END IF;
1401: END LOOP;
1402: EXCEPTION
1403: WHEN FND_API.G_EXC_ERROR THEN
1404: IF l_debug = FND_API.G_TRUE THEN
1405: qp_preq_grp.engine_debug(v_routine_name || ' ' || x_ret_status_txt);
1406: END IF;
1407: x_return_status := FND_API.G_RET_STS_ERROR;

Line 1404: IF l_debug = FND_API.G_TRUE THEN

1400: END IF;
1401: END LOOP;
1402: EXCEPTION
1403: WHEN FND_API.G_EXC_ERROR THEN
1404: IF l_debug = FND_API.G_TRUE THEN
1405: qp_preq_grp.engine_debug(v_routine_name || ' ' || x_ret_status_txt);
1406: END IF;
1407: x_return_status := FND_API.G_RET_STS_ERROR;
1408: x_return_status_txt := x_ret_status_txt;

Line 1407: x_return_status := FND_API.G_RET_STS_ERROR;

1403: WHEN FND_API.G_EXC_ERROR THEN
1404: IF l_debug = FND_API.G_TRUE THEN
1405: qp_preq_grp.engine_debug(v_routine_name || ' ' || x_ret_status_txt);
1406: END IF;
1407: x_return_status := FND_API.G_RET_STS_ERROR;
1408: x_return_status_txt := x_ret_status_txt;
1409: WHEN OTHERS THEN
1410: IF l_debug = FND_API.G_TRUE THEN
1411: qp_preq_grp.engine_debug(v_routine_name || ' ' || SQLERRM);

Line 1410: IF l_debug = FND_API.G_TRUE THEN

1406: END IF;
1407: x_return_status := FND_API.G_RET_STS_ERROR;
1408: x_return_status_txt := x_ret_status_txt;
1409: WHEN OTHERS THEN
1410: IF l_debug = FND_API.G_TRUE THEN
1411: qp_preq_grp.engine_debug(v_routine_name || ' ' || SQLERRM);
1412: END IF;
1413: x_return_status := FND_API.G_RET_STS_ERROR;
1414: x_return_status_txt := v_routine_name || ' ' || SQLERRM;

Line 1413: x_return_status := FND_API.G_RET_STS_ERROR;

1409: WHEN OTHERS THEN
1410: IF l_debug = FND_API.G_TRUE THEN
1411: qp_preq_grp.engine_debug(v_routine_name || ' ' || SQLERRM);
1412: END IF;
1413: x_return_status := FND_API.G_RET_STS_ERROR;
1414: x_return_status_txt := v_routine_name || ' ' || SQLERRM;
1415: END Process_Other_Benefits;
1416: END QP_Process_Other_Benefits_PVT;