53: -- End of Comments
54:
55: PROCEDURE Process_Modifiers
56: ( p_api_version_number IN NUMBER
57: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
58: , p_return_values IN VARCHAR2 := FND_API.G_FALSE
59: , p_commit IN VARCHAR2 := FND_API.G_FALSE
60: , x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2
61: , x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER
54:
55: PROCEDURE Process_Modifiers
56: ( p_api_version_number IN NUMBER
57: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
58: , p_return_values IN VARCHAR2 := FND_API.G_FALSE
59: , p_commit IN VARCHAR2 := FND_API.G_FALSE
60: , x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2
61: , x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER
62: , x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2
55: PROCEDURE Process_Modifiers
56: ( p_api_version_number IN NUMBER
57: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
58: , p_return_values IN VARCHAR2 := FND_API.G_FALSE
59: , p_commit IN VARCHAR2 := FND_API.G_FALSE
60: , x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2
61: , x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER
62: , x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2
63: , p_MODIFIER_LIST_rec IN Modifier_List_Rec_Type :=
108: --dbms_output.put_line('BEGIN process_modifiers in Public');
109:
110: -- Standard call to check for call compatibility
111:
112: IF NOT FND_API.Compatible_API_Call
113: ( l_api_version_number
114: , p_api_version_number
115: , l_api_name
116: , G_PKG_NAME
115: , l_api_name
116: , G_PKG_NAME
117: )
118: THEN
119: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
120: END IF;
121:
122: -- BOI not available when QP not installed
123:
130:
131: IF l_qp_status = 'N' AND l_request_type_code <> 'FTE' -- shulin, 'FTE' should pass this exception
132: THEN
133:
134: l_return_status := FND_API.G_RET_STS_ERROR;
135: FND_MESSAGE.SET_NAME('QP','QP_PRICING_NOT_INSTALLED');
136: OE_MSG_PUB.Add;
137: RAISE FND_API.G_EXC_ERROR;
138:
133:
134: l_return_status := FND_API.G_RET_STS_ERROR;
135: FND_MESSAGE.SET_NAME('QP','QP_PRICING_NOT_INSTALLED');
136: OE_MSG_PUB.Add;
137: RAISE FND_API.G_EXC_ERROR;
138:
139: END IF;
140:
141: --added for moac
148:
149: -- bug#3599792/bug#3888568/#bug4261021
150: IF p_MODIFIERS_tbl.COUNT <> 0 THEN
151: IF p_MODIFIERS_tbl(1).list_header_id IS NOT NULL AND
152: p_MODIFIERS_tbl(1).list_header_id <> FND_API.G_MISS_NUM THEN
153: BEGIN
154: select list_source_code into l_list_source_code
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;
164: END IF;
165: END;
163: l_list_source_code := p_MODIFIER_LIST_rec.list_source_code;
164: END IF;
165: END;
166: ELSIF p_MODIFIERS_tbl(1).list_line_id IS NOT NULL AND
167: p_MODIFIERS_tbl(1).list_line_id <> FND_API.G_MISS_NUM THEN
168: BEGIN
169: select list_source_code into l_list_source_code
170: from qp_list_headers_b
171: where list_header_id = (select list_header_id from qp_list_lines
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;
180: END IF;
181: END;
180: END IF;
181: END;
182: ELSE
183: IF p_MODIFIER_LIST_rec.list_source_code IS NOT NULL
184: AND p_MODIFIER_LIST_rec.list_source_code <> FND_API.G_MISS_CHAR
185: THEN
186: l_list_source_code := p_MODIFIER_LIST_rec.list_source_code;
187: END IF;
188: END IF;
187: END IF;
188: END IF;
189: ELSE
190: IF p_MODIFIER_LIST_rec.list_source_code IS NOT NULL
191: AND p_MODIFIER_LIST_rec.list_source_code <> FND_API.G_MISS_CHAR
192: THEN
193: l_list_source_code := p_MODIFIER_LIST_rec.list_source_code;
194: END IF;
195: END IF;
199: IF l_qp_status = 'S' AND l_request_type_code <> 'FTE' -- shulin, 'FTE' should pass this exception
200: AND nvl(l_list_source_code,'NULL') <> QP_GLOBALS.G_ENTITY_BSO --Bug3385041
201: THEN
202:
203: l_return_status := FND_API.G_RET_STS_ERROR;
204: FND_MESSAGE.SET_NAME('QP','QP_BASIC_PRICING_UNAVAILABLE');
205: OE_MSG_PUB.Add;
206: RAISE FND_API.G_EXC_ERROR;
207:
202:
203: l_return_status := FND_API.G_RET_STS_ERROR;
204: FND_MESSAGE.SET_NAME('QP','QP_BASIC_PRICING_UNAVAILABLE');
205: OE_MSG_PUB.Add;
206: RAISE FND_API.G_EXC_ERROR;
207:
208: END IF;
209:
210: -- Perform Value to Id conversion
225: , x_QUALIFIERS_tbl => l_QUALIFIERS_tbl
226: , x_PRICING_ATTR_tbl => l_PRICING_ATTR_tbl
227: );
228:
229: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
230: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
231: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
232: RAISE FND_API.G_EXC_ERROR;
233: END IF;
226: , x_PRICING_ATTR_tbl => l_PRICING_ATTR_tbl
227: );
228:
229: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
230: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
231: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
232: RAISE FND_API.G_EXC_ERROR;
233: END IF;
234:
227: );
228:
229: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
230: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
231: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
232: RAISE FND_API.G_EXC_ERROR;
233: END IF;
234:
235: --bug#5154678 Continuous Price Break Changes
228:
229: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
230: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
231: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
232: RAISE FND_API.G_EXC_ERROR;
233: END IF;
234:
235: --bug#5154678 Continuous Price Break Changes
236: FOR i in 1..l_MODIFIERS_tbl.COUNT
264:
265: QP_Modifiers_PVT.Process_Modifiers
266: ( p_api_version_number => 1.0
267: , p_init_msg_list => p_init_msg_list
268: , p_validation_level => FND_API.G_VALID_LEVEL_FULL
269: , p_commit => p_commit
270: , x_return_status => x_return_status
271: , x_msg_count => x_msg_count
272: , x_msg_data => x_msg_data
291: x_PRICING_ATTR_tbl := l_PRICING_ATTR_tbl;
292:
293: -- If p_return_values is TRUE then convert Ids to Values.
294:
295: IF FND_API.to_Boolean(p_return_values) THEN
296:
297: Id_To_Value
298: ( p_MODIFIER_LIST_rec => l_MODIFIER_LIST_rec
299: , p_MODIFIERS_tbl => l_MODIFIERS_tbl
316: oe_debug_pub.add('END process_modifiers in Public');
317: --dbms_output.put_line('END process_modifiers in Public');
318: EXCEPTION
319:
320: WHEN FND_API.G_EXC_ERROR THEN
321:
322: x_return_status := FND_API.G_RET_STS_ERROR;
323:
324: -- Get message count and data
318: EXCEPTION
319:
320: WHEN FND_API.G_EXC_ERROR THEN
321:
322: x_return_status := FND_API.G_RET_STS_ERROR;
323:
324: -- Get message count and data
325:
326: OE_MSG_PUB.Count_And_Get
333: Rollback TO QP_Process_Modifiers;
334: END IF;
335:
336:
337: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
338:
339: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
340:
341: -- Get message count and data
335:
336:
337: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
338:
339: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
340:
341: -- Get message count and data
342:
343: OE_MSG_PUB.Count_And_Get
351: END IF;
352:
353: WHEN OTHERS THEN
354:
355: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
356:
357: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
358: THEN
359: OE_MSG_PUB.Add_Exc_Msg
393: -- End of Comments
394:
395: PROCEDURE Lock_Modifiers
396: ( p_api_version_number IN NUMBER
397: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
398: , p_return_values IN VARCHAR2 := FND_API.G_FALSE
399: , x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2
400: , x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER
401: , x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2
394:
395: PROCEDURE Lock_Modifiers
396: ( p_api_version_number IN NUMBER
397: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
398: , p_return_values IN VARCHAR2 := FND_API.G_FALSE
399: , x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2
400: , x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER
401: , x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2
402: , p_MODIFIER_LIST_rec IN Modifier_List_Rec_Type :=
440:
441: oe_debug_pub.add('BEGIN lock_modifiers in Public');
442: -- Standard call to check for call compatibility
443:
444: IF NOT FND_API.Compatible_API_Call
445: ( l_api_version_number
446: , p_api_version_number
447: , l_api_name
448: , G_PKG_NAME
447: , l_api_name
448: , G_PKG_NAME
449: )
450: THEN
451: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
452: END IF;
453:
454: --added for moac
455: --Initialize MOAC and set org context to Multiple
478: , x_QUALIFIERS_tbl => l_QUALIFIERS_tbl
479: , x_PRICING_ATTR_tbl => l_PRICING_ATTR_tbl
480: );
481:
482: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
483: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
484: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
485: RAISE FND_API.G_EXC_ERROR;
486: END IF;
479: , x_PRICING_ATTR_tbl => l_PRICING_ATTR_tbl
480: );
481:
482: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
483: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
484: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
485: RAISE FND_API.G_EXC_ERROR;
486: END IF;
487:
480: );
481:
482: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
483: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
484: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
485: RAISE FND_API.G_EXC_ERROR;
486: END IF;
487:
488:
481:
482: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
483: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
484: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
485: RAISE FND_API.G_EXC_ERROR;
486: END IF;
487:
488:
489: -- Call QP_Modifiers_PVT.Lock_Modifiers
515: x_PRICING_ATTR_tbl := l_PRICING_ATTR_tbl;
516:
517: -- If p_return_values is TRUE then convert Ids to Values.
518:
519: IF FND_API.to_Boolean(p_return_values) THEN
520:
521: Id_To_Value
522: ( p_MODIFIER_LIST_rec => l_MODIFIER_LIST_rec
523: , p_MODIFIERS_tbl => l_MODIFIERS_tbl
532: END IF;
533:
534: EXCEPTION
535:
536: WHEN FND_API.G_EXC_ERROR THEN
537:
538: x_return_status := FND_API.G_RET_STS_ERROR;
539:
540: -- Get message count and data
534: EXCEPTION
535:
536: WHEN FND_API.G_EXC_ERROR THEN
537:
538: x_return_status := FND_API.G_RET_STS_ERROR;
539:
540: -- Get message count and data
541:
542: OE_MSG_PUB.Count_And_Get
543: ( p_count => x_msg_count
544: , p_data => x_msg_data
545: );
546:
547: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
548:
549: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
550:
551: -- Get message count and data
545: );
546:
547: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
548:
549: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
550:
551: -- Get message count and data
552:
553: OE_MSG_PUB.Count_And_Get
556: );
557:
558: WHEN OTHERS THEN
559:
560: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
561:
562: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
563: THEN
564: OE_MSG_PUB.Add_Exc_Msg
594: -- End of Comments
595:
596: PROCEDURE Get_Modifiers
597: ( p_api_version_number IN NUMBER
598: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
599: , p_return_values IN VARCHAR2 := FND_API.G_FALSE
600: , x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2
601: , x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER
602: , x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2
595:
596: PROCEDURE Get_Modifiers
597: ( p_api_version_number IN NUMBER
598: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
599: , p_return_values IN VARCHAR2 := FND_API.G_FALSE
600: , x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2
601: , x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER
602: , x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2
603: , p_list_header_id IN NUMBER :=
600: , x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2
601: , x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER
602: , x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2
603: , p_list_header_id IN NUMBER :=
604: FND_API.G_MISS_NUM
605: , p_list_header IN VARCHAR2 :=
606: FND_API.G_MISS_CHAR
607: , x_MODIFIER_LIST_rec OUT NOCOPY /* file.sql.39 change */ Modifier_List_Rec_Type
608: , x_MODIFIER_LIST_val_rec OUT NOCOPY /* file.sql.39 change */ Modifier_List_Val_Rec_Type
602: , x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2
603: , p_list_header_id IN NUMBER :=
604: FND_API.G_MISS_NUM
605: , p_list_header IN VARCHAR2 :=
606: FND_API.G_MISS_CHAR
607: , x_MODIFIER_LIST_rec OUT NOCOPY /* file.sql.39 change */ Modifier_List_Rec_Type
608: , x_MODIFIER_LIST_val_rec OUT NOCOPY /* file.sql.39 change */ Modifier_List_Val_Rec_Type
609: , x_MODIFIERS_tbl OUT NOCOPY /* file.sql.39 change */ Modifiers_Tbl_Type
610: , x_MODIFIERS_val_tbl OUT NOCOPY /* file.sql.39 change */ Modifiers_Val_Tbl_Type
625:
626: oe_debug_pub.add('BEGIN get_modifiers in Public');
627: -- Standard call to check for call compatibility
628:
629: IF NOT FND_API.Compatible_API_Call
630: ( l_api_version_number
631: , p_api_version_number
632: , l_api_name
633: , G_PKG_NAME
632: , l_api_name
633: , G_PKG_NAME
634: )
635: THEN
636: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
637: END IF;
638:
639: --added for moac
640: --Initialize MOAC and set org context to Multiple
647:
648:
649: -- Standard check for Val/ID conversion
650:
651: IF p_list_header = FND_API.G_MISS_CHAR
652: THEN
653:
654: l_list_header_id := p_list_header_id;
655:
652: THEN
653:
654: l_list_header_id := p_list_header_id;
655:
656: ELSIF p_list_header_id <> FND_API.G_MISS_NUM THEN
657:
658: l_list_header_id := p_list_header_id;
659:
660: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_SUCCESS)
673: l_list_header_id := QP_Value_To_Id.list_header
674: ( p_list_header => p_list_header
675: );
676:
677: IF l_list_header_id = FND_API.G_MISS_NUM THEN
678: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR)
679: THEN
680:
681: FND_MESSAGE.SET_NAME('QP','Invalid Business Object Value');
684:
685: END IF;
686: END IF;
687:
688: RAISE FND_API.G_EXC_ERROR;
689:
690: END IF;
691:
692:
713: x_PRICING_ATTR_tbl := l_PRICING_ATTR_tbl;
714:
715: -- If p_return_values is TRUE then convert Ids to Values.
716:
717: IF FND_API.TO_BOOLEAN(p_return_values) THEN
718:
719: Id_To_Value
720: ( p_MODIFIER_LIST_rec => l_MODIFIER_LIST_rec
721: , p_MODIFIERS_tbl => l_MODIFIERS_tbl
730: END IF;
731:
732: -- Set return status
733:
734: x_return_status := FND_API.G_RET_STS_SUCCESS;
735:
736: -- Get message count and data
737:
738: OE_MSG_PUB.Count_And_Get
742:
743:
744: EXCEPTION
745:
746: WHEN FND_API.G_EXC_ERROR THEN
747:
748: x_return_status := FND_API.G_RET_STS_ERROR;
749:
750: -- Get message count and data
744: EXCEPTION
745:
746: WHEN FND_API.G_EXC_ERROR THEN
747:
748: x_return_status := FND_API.G_RET_STS_ERROR;
749:
750: -- Get message count and data
751:
752: OE_MSG_PUB.Count_And_Get
753: ( p_count => x_msg_count
754: , p_data => x_msg_data
755: );
756:
757: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
758:
759: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
760:
761: -- Get message count and data
755: );
756:
757: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
758:
759: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
760:
761: -- Get message count and data
762:
763: OE_MSG_PUB.Count_And_Get
766: );
767:
768: WHEN OTHERS THEN
769:
770: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
771:
772: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
773: THEN
774: OE_MSG_PUB.Add_Exc_Msg
839: , 'Id_To_Value'
840: );
841: END IF;
842:
843: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
844:
845: oe_debug_pub.add('END id_to_value in Public');
846: END Id_To_Value;
847:
872:
873: oe_debug_pub.add('START value_to_id in Public');
874:
875: -- Init x_return_status.
876: x_return_status := FND_API.G_RET_STS_SUCCESS;
877:
878:
879: -- Convert MODIFIER_LIST
880:
884: );
885:
886: x_MODIFIER_LIST_rec := l_MODIFIER_LIST_rec;
887:
888: IF l_MODIFIER_LIST_rec.return_status = FND_API.G_RET_STS_ERROR THEN
889: x_return_status := FND_API.G_RET_STS_ERROR;
890: END IF;
891:
892: -- Convert MODIFIERS
885:
886: x_MODIFIER_LIST_rec := l_MODIFIER_LIST_rec;
887:
888: IF l_MODIFIER_LIST_rec.return_status = FND_API.G_RET_STS_ERROR THEN
889: x_return_status := FND_API.G_RET_STS_ERROR;
890: END IF;
891:
892: -- Convert MODIFIERS
893:
903: );
904:
905: x_MODIFIERS_tbl(l_index) := l_MODIFIERS_rec;
906:
907: IF l_MODIFIERS_rec.return_status = FND_API.G_RET_STS_ERROR THEN
908: x_return_status := FND_API.G_RET_STS_ERROR;
909: END IF;
910:
911: l_index := p_MODIFIERS_val_tbl.NEXT(l_index);
904:
905: x_MODIFIERS_tbl(l_index) := l_MODIFIERS_rec;
906:
907: IF l_MODIFIERS_rec.return_status = FND_API.G_RET_STS_ERROR THEN
908: x_return_status := FND_API.G_RET_STS_ERROR;
909: END IF;
910:
911: l_index := p_MODIFIERS_val_tbl.NEXT(l_index);
912:
926: );
927:
928: x_QUALIFIERS_tbl(l_index) := l_QUALIFIERS_rec;
929:
930: IF l_QUALIFIERS_rec.return_status = FND_API.G_RET_STS_ERROR THEN
931: x_return_status := FND_API.G_RET_STS_ERROR;
932: END IF;
933:
934: l_index := p_QUALIFIERS_val_tbl.NEXT(l_index);
927:
928: x_QUALIFIERS_tbl(l_index) := l_QUALIFIERS_rec;
929:
930: IF l_QUALIFIERS_rec.return_status = FND_API.G_RET_STS_ERROR THEN
931: x_return_status := FND_API.G_RET_STS_ERROR;
932: END IF;
933:
934: l_index := p_QUALIFIERS_val_tbl.NEXT(l_index);
935:
949: );
950:
951: x_PRICING_ATTR_tbl(l_index) := l_PRICING_ATTR_rec;
952:
953: IF l_PRICING_ATTR_rec.return_status = FND_API.G_RET_STS_ERROR THEN
954: x_return_status := FND_API.G_RET_STS_ERROR;
955: END IF;
956:
957: l_index := p_PRICING_ATTR_val_tbl.NEXT(l_index);
950:
951: x_PRICING_ATTR_tbl(l_index) := l_PRICING_ATTR_rec;
952:
953: IF l_PRICING_ATTR_rec.return_status = FND_API.G_RET_STS_ERROR THEN
954: x_return_status := FND_API.G_RET_STS_ERROR;
955: END IF;
956:
957: l_index := p_PRICING_ATTR_val_tbl.NEXT(l_index);
958:
970: , 'Value_To_Id'
971: );
972: END IF;
973:
974: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
975:
976: END Value_To_Id;
977:
978: END QP_Modifiers_PUB;