40: AND (start_date_active IS NULL OR start_date_active <= SYSDATE)
41: AND (end_date_active IS NULL OR end_date_active >= SYSDATE);
42:
43: /*
44: CURSOR qp_list_lines_cur(a_price_formula_id NUMBER,
45: a_update_flagged_items VARCHAR2)
46: IS
47: SELECT *
48: FROM qp_list_lines
44: CURSOR qp_list_lines_cur(a_price_formula_id NUMBER,
45: a_update_flagged_items VARCHAR2)
46: IS
47: SELECT *
48: FROM qp_list_lines
49: WHERE generate_using_formula_id = a_price_formula_id
50: AND NVL(reprice_flag, 'N') = DECODE (a_update_flagged_items,
51: 'Y', 'Y', NVL(reprice_flag, 'N'))
52: FOR UPDATE;
58: FROM qp_pricing_attributes
59: WHERE list_line_id = a_list_line_id;
60:
61: TYPE QpListLinesCurTyp IS REF CURSOR;
62: qp_list_lines_cursor QpListLinesCurTyp;
63:
64: l_lines_rec QP_LIST_LINES%ROWTYPE;
65:
66: BEGIN
60:
61: TYPE QpListLinesCurTyp IS REF CURSOR;
62: qp_list_lines_cursor QpListLinesCurTyp;
63:
64: l_lines_rec QP_LIST_LINES%ROWTYPE;
65:
66: BEGIN
67:
68: -- Bug#4968517 - Turn Debug ON.
99: --dbms_output.put_line('error in formula parsing ' || l_error_message);
100: END IF;
101: --modified where condition for cursor below for fix 8429665
102: IF p_update_flagged_items = 'Y' THEN
103: OPEN qp_list_lines_cursor FOR
104: SELECT *
105: FROM qp_list_lines
106: WHERE generate_using_formula_id = l_formulas_rec.price_formula_id
107: AND reprice_flag = 'Y'
101: --modified where condition for cursor below for fix 8429665
102: IF p_update_flagged_items = 'Y' THEN
103: OPEN qp_list_lines_cursor FOR
104: SELECT *
105: FROM qp_list_lines
106: WHERE generate_using_formula_id = l_formulas_rec.price_formula_id
107: AND reprice_flag = 'Y'
108: FOR UPDATE;
109: ELSE
106: WHERE generate_using_formula_id = l_formulas_rec.price_formula_id
107: AND reprice_flag = 'Y'
108: FOR UPDATE;
109: ELSE
110: OPEN qp_list_lines_cursor FOR
111: SELECT *
112: FROM qp_list_lines
113: WHERE generate_using_formula_id = l_formulas_rec.price_formula_id
114: FOR UPDATE;
108: FOR UPDATE;
109: ELSE
110: OPEN qp_list_lines_cursor FOR
111: SELECT *
112: FROM qp_list_lines
113: WHERE generate_using_formula_id = l_formulas_rec.price_formula_id
114: FOR UPDATE;
115: END IF;
116:
113: WHERE generate_using_formula_id = l_formulas_rec.price_formula_id
114: FOR UPDATE;
115: END IF;
116:
117: FETCH qp_list_lines_cursor INTO l_lines_rec;
118: WHILE qp_list_lines_cursor%FOUND LOOP
119:
120: --DBMS_OUTPUT.PUT_LINE ('>>>>>>>>>>>> inside qp_list_lines_cursor loop list_line_id: '||l_lines_rec.list_line_id);
121:
114: FOR UPDATE;
115: END IF;
116:
117: FETCH qp_list_lines_cursor INTO l_lines_rec;
118: WHILE qp_list_lines_cursor%FOUND LOOP
119:
120: --DBMS_OUTPUT.PUT_LINE ('>>>>>>>>>>>> inside qp_list_lines_cursor loop list_line_id: '||l_lines_rec.list_line_id);
121:
122:
116:
117: FETCH qp_list_lines_cursor INTO l_lines_rec;
118: WHILE qp_list_lines_cursor%FOUND LOOP
119:
120: --DBMS_OUTPUT.PUT_LINE ('>>>>>>>>>>>> inside qp_list_lines_cursor loop list_line_id: '||l_lines_rec.list_line_id);
121:
122:
123: Qp_Number.canonical_mask :=
124: '00999999999999999999999.99999999999999999999999999999999999999'; --Added for 2884567
302:
303:
304: END IF;
305:
306: UPDATE qp_list_lines
307: SET reprice_flag = NULL,
308: request_id = l_conc_request_id,
309: program_application_id = l_conc_program_application_id,
310: program_id = l_conc_program_id,
311: last_update_date = l_sysdate,
312: last_update_login = l_conc_login_id,
313: operand = l_list_price
314: WHERE list_line_id = l_lines_rec.list_line_id;
315: --dbms_output.put_line('updated qp_list_lines ');
316: END IF;
317: -- further fix 4090315 retrieve the next row,
318: -- the %found condition will be checked bfe the loop continues again
319: FETCH qp_list_lines_cursor INTO l_lines_rec;
315: --dbms_output.put_line('updated qp_list_lines ');
316: END IF;
317: -- further fix 4090315 retrieve the next row,
318: -- the %found condition will be checked bfe the loop continues again
319: FETCH qp_list_lines_cursor INTO l_lines_rec;
320: END LOOP; /* loop through lines cur */
321: CLOSE qp_list_lines_cursor; -- further fix 4090315
322:
323: END LOOP; /* loop through formulas cur */
317: -- further fix 4090315 retrieve the next row,
318: -- the %found condition will be checked bfe the loop continues again
319: FETCH qp_list_lines_cursor INTO l_lines_rec;
320: END LOOP; /* loop through lines cur */
321: CLOSE qp_list_lines_cursor; -- further fix 4090315
322:
323: END LOOP; /* loop through formulas cur */
324:
325: --Change mask back to flexible mask.