103: l_list_source_code VARCHAR2(10); -- bug#3599792
104:
105: BEGIN
106: SAVEPOINT QP_Process_Modifiers;
107: oe_debug_pub.add('BEGIN process_modifiers in Public');
108: --dbms_output.put_line('BEGIN process_modifiers in Public');
109:
110: -- Standard call to check for call compatibility
111:
155: from qp_list_headers_b
156: where list_header_id = p_MODIFIERS_tbl(1).list_header_id;
157: EXCEPTION
158: WHEN OTHERS THEN
159: oe_debug_pub.add('MODIFIERS list_header_id : '||p_MODIFIERS_tbl(1).list_header_id);
160: IF p_MODIFIER_LIST_rec.list_source_code IS NOT NULL
161: AND p_MODIFIER_LIST_rec.list_source_code <> FND_API.G_MISS_CHAR
162: THEN
163: l_list_source_code := p_MODIFIER_LIST_rec.list_source_code;
171: where list_header_id = (select list_header_id from qp_list_lines
172: where list_line_id = p_MODIFIERS_tbl(1).list_line_id);
173: EXCEPTION
174: WHEN OTHERS THEN
175: oe_debug_pub.add('MODIFIERS list_line_id : '|| p_MODIFIERS_tbl(1).list_line_id);
176: IF p_MODIFIER_LIST_rec.list_source_code IS NOT NULL
177: AND p_MODIFIER_LIST_rec.list_source_code <> FND_API.G_MISS_CHAR
178: THEN
179: l_list_source_code := p_MODIFIER_LIST_rec.list_source_code;
304: If x_return_status <> 'S' AND l_control_rec.called_from_ui='N' THEN
305: Rollback TO QP_Process_Modifiers;
306: END IF;
307:
308: oe_debug_pub.add('END process_modifiers in Public');
309: --dbms_output.put_line('END process_modifiers in Public');
310: EXCEPTION
311:
312: WHEN FND_API.G_EXC_ERROR THEN
429: l_PRICING_ATTR_tbl Pricing_Attr_Tbl_Type;
430: l_p_PRICING_ATTR_tbl Pricing_Attr_Tbl_Type;
431: BEGIN
432:
433: oe_debug_pub.add('BEGIN lock_modifiers in Public');
434: -- Standard call to check for call compatibility
435:
436: IF NOT FND_API.Compatible_API_Call
437: ( l_api_version_number
565: ( p_count => x_msg_count
566: , p_data => x_msg_data
567: );
568:
569: oe_debug_pub.add('END lock_modifiers in Public');
570: END Lock_Modifiers;
571:
572: -- Start of Comments
573: -- API name Get_Modifiers
614: l_QUALIFIERS_tbl QP_Qualifier_Rules_PUB.Qualifiers_Tbl_Type;
615: l_PRICING_ATTR_tbl QP_Modifiers_PUB.Pricing_Attr_Tbl_Type;
616: BEGIN
617:
618: oe_debug_pub.add('BEGIN get_modifiers in Public');
619: -- Standard call to check for call compatibility
620:
621: IF NOT FND_API.Compatible_API_Call
622: ( l_api_version_number
775: ( p_count => x_msg_count
776: , p_data => x_msg_data
777: );
778:
779: oe_debug_pub.add('END get_modifiers in Public');
780: END Get_Modifiers;
781:
782: -- Procedure Id_To_Value
783:
793: )
794: IS
795: BEGIN
796:
797: oe_debug_pub.add('BEGIN id_to_value in Public');
798: -- Convert MODIFIER_LIST
799:
800: x_MODIFIER_LIST_val_rec := QP_Modifier_List_Util.Get_Values(p_MODIFIER_LIST_rec);
801:
833: END IF;
834:
835: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
836:
837: oe_debug_pub.add('END id_to_value in Public');
838: END Id_To_Value;
839:
840: -- Procedure Value_To_Id
841:
861: l_PRICING_ATTR_rec Pricing_Attr_Rec_Type;
862: l_index BINARY_INTEGER;
863: BEGIN
864:
865: oe_debug_pub.add('START value_to_id in Public');
866:
867: -- Init x_return_status.
868: x_return_status := FND_API.G_RET_STS_SUCCESS;
869:
949: l_index := p_PRICING_ATTR_val_tbl.NEXT(l_index);
950:
951: END LOOP;
952:
953: oe_debug_pub.add('END value_to_id in Public');
954: EXCEPTION
955:
956: WHEN OTHERS THEN
957: