2089: L_LINE_TYPE_CODE VARCHAR2(30) := NULL;
2090:
2091: cursor get_rltd_mods(line_id in number) is
2092: select from_rltd_modifier_id, to_rltd_modifier_id
2093: from qp_rltd_modifiers
2094: where from_rltd_modifier_id = line_id;
2095:
2096:
2097: BEGIN
2101: FROM QP_LIST_LINES
2102: WHERE LIST_LINE_ID = p_list_line_id;
2103:
2104: /* delete all the related modifier lines if the line is a PBH,
2105: else delete all references of this line in qp_rltd_modifiers */
2106:
2107: IF L_LINE_TYPE_CODE = 'PBH' THEN
2108:
2109: for get_rltd_mods_rec in get_rltd_mods(p_list_line_id) loop
2111: QP_PRICE_LIST_LINE_UTIL.DELETE_ROW(get_rltd_mods_rec.to_rltd_modifier_id);
2112:
2113: end loop;
2114:
2115: DELETE FROM QP_RLTD_MODIFIERS
2116: WHERE FROM_RLTD_MODIFIER_ID = p_list_line_id;
2117:
2118: ELSE
2119:
2116: WHERE FROM_RLTD_MODIFIER_ID = p_list_line_id;
2117:
2118: ELSE
2119:
2120: DELETE FROM QP_RLTD_MODIFIERS
2121: WHERE TO_RLTD_MODIFIER_ID = p_list_line_id;
2122:
2123: END IF; /* done with related modifier lines */
2124:
2445: , l_PRICE_LIST_LINE_rec.rltd_modifier_grp_type
2446: , l_PRICE_LIST_LINE_rec.from_rltd_modifier_id
2447: , l_PRICE_LIST_LINE_rec.to_rltd_modifier_id
2448: , l_PRICE_LIST_LINE_rec.rltd_modifier_id
2449: FROM QP_RLTD_MODIFIERS
2450: WHERE ( TO_RLTD_MODIFIER_ID = l_implicit_rec.LIST_LINE_ID );
2451:
2452: EXCEPTION
2453: WHEN NO_DATA_FOUND THEN
2549: , l_PRICE_LIST_LINE_rec.rltd_modifier_grp_type
2550: , l_PRICE_LIST_LINE_rec.from_rltd_modifier_id
2551: , l_PRICE_LIST_LINE_rec.to_rltd_modifier_id
2552: , l_PRICE_LIST_LINE_rec.rltd_modifier_id
2553: FROM QP_RLTD_MODIFIERS
2554: WHERE ( TO_RLTD_MODIFIER_ID = l_implicit_rec.LIST_LINE_ID );
2555:
2556: EXCEPTION
2557: WHEN NO_DATA_FOUND THEN