DBA Data[Home] [Help]

APPS.QP_LOCK_PRICELIST_PVT dependencies on FND_API

Line 274: x_return_status := FND_API.G_RET_STS_SUCCESS;

270: x_QUALIFIERS_tbl := l_QUALIFIERS_tbl;
271: x_PRICING_ATTR_tbl := l_x_PRICING_ATTR_tbl;
272:
273: -- Set return status
274: x_return_status := FND_API.G_RET_STS_SUCCESS;
275:
276: -- Get message count and data
277: fnd_msg_pub.Count_And_Get (p_count => x_msg_count,
278: p_data => x_msg_data);

Line 282: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

278: p_data => x_msg_data);
279:
280: EXCEPTION
281: WHEN OTHERS THEN
282: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
283:
284: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
285: fnd_log.STRING (fnd_log.level_procedure,
286: g_pkg_name || 'Get_Price_List',

Line 420: p_price_list_rec.list_header_id := FND_API.G_MISS_NUM;

416:
417: --Copy the pricelist header record to the input record structure and set
418: --the appropriate column values.
419: p_price_list_rec := x_price_list_rec;
420: p_price_list_rec.list_header_id := FND_API.G_MISS_NUM;
421:
422:
423: IF (instr (p_price_list_rec.name, l_source_system_code || ' LOCKED') <> 0)
424: --The source price list itself is a locked price list

Line 494: p_price_list_line_tbl(ii).list_line_id := FND_API.G_MISS_NUM;

490: --then exit since there can only be one line with list_line_id =
491: --p_source_list_line_id.
492: p_price_list_line_tbl(ii) := x_price_list_line_tbl(i);
493: p_price_list_line_tbl(ii).operation := QP_GLOBALS.G_OPR_CREATE;
494: p_price_list_line_tbl(ii).list_line_id := FND_API.G_MISS_NUM;
495: p_price_list_line_tbl(ii).list_line_no := FND_API.G_MISS_CHAR;
496: p_price_list_line_tbl(ii).list_header_id := FND_API.G_MISS_NUM;
497: p_price_list_line_tbl(ii).start_date_active := null; --OKS requirement
498: p_price_list_line_tbl(ii).end_date_active := null; --OKS requirement

Line 495: p_price_list_line_tbl(ii).list_line_no := FND_API.G_MISS_CHAR;

491: --p_source_list_line_id.
492: p_price_list_line_tbl(ii) := x_price_list_line_tbl(i);
493: p_price_list_line_tbl(ii).operation := QP_GLOBALS.G_OPR_CREATE;
494: p_price_list_line_tbl(ii).list_line_id := FND_API.G_MISS_NUM;
495: p_price_list_line_tbl(ii).list_line_no := FND_API.G_MISS_CHAR;
496: p_price_list_line_tbl(ii).list_header_id := FND_API.G_MISS_NUM;
497: p_price_list_line_tbl(ii).start_date_active := null; --OKS requirement
498: p_price_list_line_tbl(ii).end_date_active := null; --OKS requirement
499:

Line 496: p_price_list_line_tbl(ii).list_header_id := FND_API.G_MISS_NUM;

492: p_price_list_line_tbl(ii) := x_price_list_line_tbl(i);
493: p_price_list_line_tbl(ii).operation := QP_GLOBALS.G_OPR_CREATE;
494: p_price_list_line_tbl(ii).list_line_id := FND_API.G_MISS_NUM;
495: p_price_list_line_tbl(ii).list_line_no := FND_API.G_MISS_CHAR;
496: p_price_list_line_tbl(ii).list_header_id := FND_API.G_MISS_NUM;
497: p_price_list_line_tbl(ii).start_date_active := null; --OKS requirement
498: p_price_list_line_tbl(ii).end_date_active := null; --OKS requirement
499:
500:

Line 518: p_pricing_attr_tbl(jj).pricing_attribute_id := FND_API.G_MISS_NUM;

514: --there will only be one locked list line id and increment jj.
515: p_pricing_attr_tbl(jj) := x_pricing_attr_tbl(j);
516: p_pricing_attr_tbl(jj).price_list_line_index := ii; -- ii = 1 now
517: p_pricing_attr_tbl(jj).operation := QP_GLOBALS.G_OPR_CREATE;
518: p_pricing_attr_tbl(jj).pricing_attribute_id := FND_API.G_MISS_NUM;
519: p_pricing_attr_tbl(jj).list_line_id := FND_API.G_MISS_NUM;
520: p_pricing_attr_tbl(jj).list_header_id := FND_API.G_MISS_NUM;
521: jj := jj + 1;
522: END IF;

Line 519: p_pricing_attr_tbl(jj).list_line_id := FND_API.G_MISS_NUM;

515: p_pricing_attr_tbl(jj) := x_pricing_attr_tbl(j);
516: p_pricing_attr_tbl(jj).price_list_line_index := ii; -- ii = 1 now
517: p_pricing_attr_tbl(jj).operation := QP_GLOBALS.G_OPR_CREATE;
518: p_pricing_attr_tbl(jj).pricing_attribute_id := FND_API.G_MISS_NUM;
519: p_pricing_attr_tbl(jj).list_line_id := FND_API.G_MISS_NUM;
520: p_pricing_attr_tbl(jj).list_header_id := FND_API.G_MISS_NUM;
521: jj := jj + 1;
522: END IF;
523: END LOOP;--Loop to copy attributes of p_source_list_line_id

Line 520: p_pricing_attr_tbl(jj).list_header_id := FND_API.G_MISS_NUM;

516: p_pricing_attr_tbl(jj).price_list_line_index := ii; -- ii = 1 now
517: p_pricing_attr_tbl(jj).operation := QP_GLOBALS.G_OPR_CREATE;
518: p_pricing_attr_tbl(jj).pricing_attribute_id := FND_API.G_MISS_NUM;
519: p_pricing_attr_tbl(jj).list_line_id := FND_API.G_MISS_NUM;
520: p_pricing_attr_tbl(jj).list_header_id := FND_API.G_MISS_NUM;
521: jj := jj + 1;
522: END IF;
523: END LOOP;--Loop to copy attributes of p_source_list_line_id
524:

Line 553: p_price_list_line_tbl(ii).list_line_id := FND_API.G_MISS_NUM;

549: p_price_list_line_tbl(ii).operation := QP_GLOBALS.G_OPR_CREATE;
550: p_price_list_line_tbl(ii).price_break_header_index := 1;
551: --since if p_source_list_line_id was a PBH then it
552: --would have an index of 1 in the input plsql table.
553: p_price_list_line_tbl(ii).list_line_id := FND_API.G_MISS_NUM;
554: p_price_list_line_tbl(ii).list_line_no := FND_API.G_MISS_CHAR;
555: p_price_list_line_tbl(ii).list_header_id := FND_API.G_MISS_NUM;
556: p_price_list_line_tbl(ii).from_rltd_modifier_id := FND_API.G_MISS_NUM;
557: p_price_list_line_tbl(ii).start_date_active := null; --OKS requirement

Line 554: p_price_list_line_tbl(ii).list_line_no := FND_API.G_MISS_CHAR;

550: p_price_list_line_tbl(ii).price_break_header_index := 1;
551: --since if p_source_list_line_id was a PBH then it
552: --would have an index of 1 in the input plsql table.
553: p_price_list_line_tbl(ii).list_line_id := FND_API.G_MISS_NUM;
554: p_price_list_line_tbl(ii).list_line_no := FND_API.G_MISS_CHAR;
555: p_price_list_line_tbl(ii).list_header_id := FND_API.G_MISS_NUM;
556: p_price_list_line_tbl(ii).from_rltd_modifier_id := FND_API.G_MISS_NUM;
557: p_price_list_line_tbl(ii).start_date_active := null; --OKS requirement
558: p_price_list_line_tbl(ii).end_date_active := null; --OKS requirement

Line 555: p_price_list_line_tbl(ii).list_header_id := FND_API.G_MISS_NUM;

551: --since if p_source_list_line_id was a PBH then it
552: --would have an index of 1 in the input plsql table.
553: p_price_list_line_tbl(ii).list_line_id := FND_API.G_MISS_NUM;
554: p_price_list_line_tbl(ii).list_line_no := FND_API.G_MISS_CHAR;
555: p_price_list_line_tbl(ii).list_header_id := FND_API.G_MISS_NUM;
556: p_price_list_line_tbl(ii).from_rltd_modifier_id := FND_API.G_MISS_NUM;
557: p_price_list_line_tbl(ii).start_date_active := null; --OKS requirement
558: p_price_list_line_tbl(ii).end_date_active := null; --OKS requirement
559:

Line 556: p_price_list_line_tbl(ii).from_rltd_modifier_id := FND_API.G_MISS_NUM;

552: --would have an index of 1 in the input plsql table.
553: p_price_list_line_tbl(ii).list_line_id := FND_API.G_MISS_NUM;
554: p_price_list_line_tbl(ii).list_line_no := FND_API.G_MISS_CHAR;
555: p_price_list_line_tbl(ii).list_header_id := FND_API.G_MISS_NUM;
556: p_price_list_line_tbl(ii).from_rltd_modifier_id := FND_API.G_MISS_NUM;
557: p_price_list_line_tbl(ii).start_date_active := null; --OKS requirement
558: p_price_list_line_tbl(ii).end_date_active := null; --OKS requirement
559:
560: --For the price break child lines of p_source_list_line_id, copy the

Line 571: p_pricing_attr_tbl(jj).pricing_attribute_id := FND_API.G_MISS_NUM;

567: --price_list_line_index appropriately and increment jj.
568: p_pricing_attr_tbl(jj) := x_pricing_attr_tbl(j);
569: p_pricing_attr_tbl(jj).price_list_line_index := ii;
570: p_pricing_attr_tbl(jj).operation := QP_GLOBALS.G_OPR_CREATE;
571: p_pricing_attr_tbl(jj).pricing_attribute_id := FND_API.G_MISS_NUM;
572: p_pricing_attr_tbl(jj).list_line_id := FND_API.G_MISS_NUM;
573: p_pricing_attr_tbl(jj).list_header_id := FND_API.G_MISS_NUM;
574: jj := jj + 1;
575: END IF;

Line 572: p_pricing_attr_tbl(jj).list_line_id := FND_API.G_MISS_NUM;

568: p_pricing_attr_tbl(jj) := x_pricing_attr_tbl(j);
569: p_pricing_attr_tbl(jj).price_list_line_index := ii;
570: p_pricing_attr_tbl(jj).operation := QP_GLOBALS.G_OPR_CREATE;
571: p_pricing_attr_tbl(jj).pricing_attribute_id := FND_API.G_MISS_NUM;
572: p_pricing_attr_tbl(jj).list_line_id := FND_API.G_MISS_NUM;
573: p_pricing_attr_tbl(jj).list_header_id := FND_API.G_MISS_NUM;
574: jj := jj + 1;
575: END IF;
576: END LOOP; --loop to copy pricing attributes of child break line

Line 573: p_pricing_attr_tbl(jj).list_header_id := FND_API.G_MISS_NUM;

569: p_pricing_attr_tbl(jj).price_list_line_index := ii;
570: p_pricing_attr_tbl(jj).operation := QP_GLOBALS.G_OPR_CREATE;
571: p_pricing_attr_tbl(jj).pricing_attribute_id := FND_API.G_MISS_NUM;
572: p_pricing_attr_tbl(jj).list_line_id := FND_API.G_MISS_NUM;
573: p_pricing_attr_tbl(jj).list_header_id := FND_API.G_MISS_NUM;
574: jj := jj + 1;
575: END IF;
576: END LOOP; --loop to copy pricing attributes of child break line
577:

Line 606: , p_init_msg_list => FND_API.G_FALSE

602:
603: --Create locked price list
604: QP_LIST_HEADERS_PVT.Process_Price_List
605: ( p_api_version_number => 1
606: , p_init_msg_list => FND_API.G_FALSE
607: , p_commit => FND_API.G_FALSE
608: , p_control_rec => p_control_rec
609: , x_return_status => x_return_status
610: , x_msg_count => x_msg_count

Line 607: , p_commit => FND_API.G_FALSE

603: --Create locked price list
604: QP_LIST_HEADERS_PVT.Process_Price_List
605: ( p_api_version_number => 1
606: , p_init_msg_list => FND_API.G_FALSE
607: , p_commit => FND_API.G_FALSE
608: , p_control_rec => p_control_rec
609: , x_return_status => x_return_status
610: , x_msg_count => x_msg_count
611: , x_msg_data => x_msg_data

Line 639: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

635: g_pkg_name || '.Lock_Price',
636: 'x_return_status = ' || x_msg_data);
637: END IF;
638:
639: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
640: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
641: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
642: RAISE FND_API.G_EXC_ERROR;
643: END IF;

Line 640: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

636: 'x_return_status = ' || x_msg_data);
637: END IF;
638:
639: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
640: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
641: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
642: RAISE FND_API.G_EXC_ERROR;
643: END IF;
644:

Line 641: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN

637: END IF;
638:
639: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
640: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
641: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
642: RAISE FND_API.G_EXC_ERROR;
643: END IF;
644:
645: --Set output variables.

Line 642: RAISE FND_API.G_EXC_ERROR;

638:
639: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
640: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
641: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
642: RAISE FND_API.G_EXC_ERROR;
643: END IF;
644:
645: --Set output variables.
646: x_locked_price_list_id := x_price_list_rec.list_header_id;

Line 665: p_pricing_attr_tbl(1).pricing_attribute_id := FND_API.G_MISS_NUM;

661: p_pricing_attr_tbl.delete;
662:
663: --Populate one pricing attribute record for the LIST_LINE_ID attribute with
664: --appropriate values.
665: p_pricing_attr_tbl(1).pricing_attribute_id := FND_API.G_MISS_NUM;
666: p_pricing_attr_tbl(1).list_line_id := x_price_list_line_tbl(1).list_line_id;
667: p_pricing_attr_tbl(1).list_header_id :=
668: x_price_list_line_tbl(1).list_header_id;
669: p_pricing_attr_tbl(1).product_attribute :=

Line 694: , p_init_msg_list => FND_API.G_FALSE

690:
691: --Add List Line Id as a pricing attribute to locked price list line.
692: QP_LIST_HEADERS_PVT.Process_Price_List
693: ( p_api_version_number => 1
694: , p_init_msg_list => FND_API.G_FALSE
695: , p_commit => FND_API.G_FALSE
696: , p_control_rec => p_control_rec
697: , x_return_status => x_return_status
698: , x_msg_count => x_msg_count

Line 695: , p_commit => FND_API.G_FALSE

691: --Add List Line Id as a pricing attribute to locked price list line.
692: QP_LIST_HEADERS_PVT.Process_Price_List
693: ( p_api_version_number => 1
694: , p_init_msg_list => FND_API.G_FALSE
695: , p_commit => FND_API.G_FALSE
696: , p_control_rec => p_control_rec
697: , x_return_status => x_return_status
698: , x_msg_count => x_msg_count
699: , x_msg_data => x_msg_data

Line 725: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

721: g_pkg_name || '.Lock_Price',
722: 'x_return_status = ' || x_msg_data);
723: END IF;
724:
725: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
726: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
727: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
728: RAISE FND_API.G_EXC_ERROR;
729: END IF;

Line 726: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

722: 'x_return_status = ' || x_msg_data);
723: END IF;
724:
725: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
726: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
727: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
728: RAISE FND_API.G_EXC_ERROR;
729: END IF;
730:

Line 727: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN

723: END IF;
724:
725: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
726: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
727: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
728: RAISE FND_API.G_EXC_ERROR;
729: END IF;
730:
731: ELSE --l_locked_price_list_id is not null

Line 728: RAISE FND_API.G_EXC_ERROR;

724:
725: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
726: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
727: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
728: RAISE FND_API.G_EXC_ERROR;
729: END IF;
730:
731: ELSE --l_locked_price_list_id is not null
732:

Line 753: p_price_list_line_tbl(ii).list_line_id := FND_API.G_MISS_NUM;

749: --then exit since there can only be one line with list_line_id =
750: --p_source_list_line_id.
751: p_price_list_line_tbl(ii) := x_price_list_line_tbl(i);
752: p_price_list_line_tbl(ii).operation := QP_GLOBALS.G_OPR_CREATE;
753: p_price_list_line_tbl(ii).list_line_id := FND_API.G_MISS_NUM;
754: p_price_list_line_tbl(ii).list_line_no := FND_API.G_MISS_CHAR;
755: p_price_list_line_tbl(ii).list_header_id := l_locked_price_list_id;
756: p_price_list_line_tbl(ii).start_date_active := null; --OKS requirement
757: p_price_list_line_tbl(ii).end_date_active := null; --OKS requirement

Line 754: p_price_list_line_tbl(ii).list_line_no := FND_API.G_MISS_CHAR;

750: --p_source_list_line_id.
751: p_price_list_line_tbl(ii) := x_price_list_line_tbl(i);
752: p_price_list_line_tbl(ii).operation := QP_GLOBALS.G_OPR_CREATE;
753: p_price_list_line_tbl(ii).list_line_id := FND_API.G_MISS_NUM;
754: p_price_list_line_tbl(ii).list_line_no := FND_API.G_MISS_CHAR;
755: p_price_list_line_tbl(ii).list_header_id := l_locked_price_list_id;
756: p_price_list_line_tbl(ii).start_date_active := null; --OKS requirement
757: p_price_list_line_tbl(ii).end_date_active := null; --OKS requirement
758:

Line 776: p_pricing_attr_tbl(jj).pricing_attribute_id := FND_API.G_MISS_NUM;

772: --there will only be one locked list line id and increment jj.
773: p_pricing_attr_tbl(jj) := x_pricing_attr_tbl(j);
774: p_pricing_attr_tbl(jj).price_list_line_index := ii; -- ii = 1 now
775: p_pricing_attr_tbl(jj).operation := QP_GLOBALS.G_OPR_CREATE;
776: p_pricing_attr_tbl(jj).pricing_attribute_id := FND_API.G_MISS_NUM;
777: p_pricing_attr_tbl(jj).list_line_id := FND_API.G_MISS_NUM;
778: p_pricing_attr_tbl(jj).list_header_id := l_locked_price_list_id;
779: jj := jj + 1;
780: END IF;

Line 777: p_pricing_attr_tbl(jj).list_line_id := FND_API.G_MISS_NUM;

773: p_pricing_attr_tbl(jj) := x_pricing_attr_tbl(j);
774: p_pricing_attr_tbl(jj).price_list_line_index := ii; -- ii = 1 now
775: p_pricing_attr_tbl(jj).operation := QP_GLOBALS.G_OPR_CREATE;
776: p_pricing_attr_tbl(jj).pricing_attribute_id := FND_API.G_MISS_NUM;
777: p_pricing_attr_tbl(jj).list_line_id := FND_API.G_MISS_NUM;
778: p_pricing_attr_tbl(jj).list_header_id := l_locked_price_list_id;
779: jj := jj + 1;
780: END IF;
781: END LOOP;--Loop to copy attributes of p_source_list_line_id

Line 805: p_price_list_line_tbl(ii).list_line_id := FND_API.G_MISS_NUM;

801: p_price_list_line_tbl(ii).operation := QP_GLOBALS.G_OPR_CREATE;
802: p_price_list_line_tbl(ii).price_break_header_index := 1;
803: --since if p_source_list_line_id was a PBH then it
804: --would have an index of 1 in the input plsql table.
805: p_price_list_line_tbl(ii).list_line_id := FND_API.G_MISS_NUM;
806: p_price_list_line_tbl(ii).list_line_no := FND_API.G_MISS_CHAR;
807: p_price_list_line_tbl(ii).from_rltd_modifier_id := FND_API.G_MISS_NUM;
808: p_price_list_line_tbl(ii).list_header_id := l_locked_price_list_id;
809: p_price_list_line_tbl(ii).start_date_active := null; --OKS requirement

Line 806: p_price_list_line_tbl(ii).list_line_no := FND_API.G_MISS_CHAR;

802: p_price_list_line_tbl(ii).price_break_header_index := 1;
803: --since if p_source_list_line_id was a PBH then it
804: --would have an index of 1 in the input plsql table.
805: p_price_list_line_tbl(ii).list_line_id := FND_API.G_MISS_NUM;
806: p_price_list_line_tbl(ii).list_line_no := FND_API.G_MISS_CHAR;
807: p_price_list_line_tbl(ii).from_rltd_modifier_id := FND_API.G_MISS_NUM;
808: p_price_list_line_tbl(ii).list_header_id := l_locked_price_list_id;
809: p_price_list_line_tbl(ii).start_date_active := null; --OKS requirement
810: p_price_list_line_tbl(ii).end_date_active := null; --OKS requirement

Line 807: p_price_list_line_tbl(ii).from_rltd_modifier_id := FND_API.G_MISS_NUM;

803: --since if p_source_list_line_id was a PBH then it
804: --would have an index of 1 in the input plsql table.
805: p_price_list_line_tbl(ii).list_line_id := FND_API.G_MISS_NUM;
806: p_price_list_line_tbl(ii).list_line_no := FND_API.G_MISS_CHAR;
807: p_price_list_line_tbl(ii).from_rltd_modifier_id := FND_API.G_MISS_NUM;
808: p_price_list_line_tbl(ii).list_header_id := l_locked_price_list_id;
809: p_price_list_line_tbl(ii).start_date_active := null; --OKS requirement
810: p_price_list_line_tbl(ii).end_date_active := null; --OKS requirement
811:

Line 823: p_pricing_attr_tbl(jj).pricing_attribute_id := FND_API.G_MISS_NUM;

819: --price_list_line_index appropriately and increment jj.
820: p_pricing_attr_tbl(jj) := x_pricing_attr_tbl(j);
821: p_pricing_attr_tbl(jj).price_list_line_index := ii;
822: p_pricing_attr_tbl(jj).operation := QP_GLOBALS.G_OPR_CREATE;
823: p_pricing_attr_tbl(jj).pricing_attribute_id := FND_API.G_MISS_NUM;
824: p_pricing_attr_tbl(jj).list_line_id := FND_API.G_MISS_NUM;
825: p_pricing_attr_tbl(jj).list_header_id := l_locked_price_list_id;
826: jj := jj + 1;
827: END IF;

Line 824: p_pricing_attr_tbl(jj).list_line_id := FND_API.G_MISS_NUM;

820: p_pricing_attr_tbl(jj) := x_pricing_attr_tbl(j);
821: p_pricing_attr_tbl(jj).price_list_line_index := ii;
822: p_pricing_attr_tbl(jj).operation := QP_GLOBALS.G_OPR_CREATE;
823: p_pricing_attr_tbl(jj).pricing_attribute_id := FND_API.G_MISS_NUM;
824: p_pricing_attr_tbl(jj).list_line_id := FND_API.G_MISS_NUM;
825: p_pricing_attr_tbl(jj).list_header_id := l_locked_price_list_id;
826: jj := jj + 1;
827: END IF;
828: END LOOP; --loop to copy pricing attributes of child break line

Line 852: , p_init_msg_list => FND_API.G_FALSE

848:
849: --Create locked price list
850: QP_LIST_HEADERS_PVT.Process_Price_List
851: ( p_api_version_number => 1
852: , p_init_msg_list => FND_API.G_FALSE
853: , p_commit => FND_API.G_FALSE
854: , p_control_rec => p_control_rec
855: , x_return_status => x_return_status
856: , x_msg_count => x_msg_count

Line 853: , p_commit => FND_API.G_FALSE

849: --Create locked price list
850: QP_LIST_HEADERS_PVT.Process_Price_List
851: ( p_api_version_number => 1
852: , p_init_msg_list => FND_API.G_FALSE
853: , p_commit => FND_API.G_FALSE
854: , p_control_rec => p_control_rec
855: , x_return_status => x_return_status
856: , x_msg_count => x_msg_count
857: , x_msg_data => x_msg_data

Line 885: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

881: g_pkg_name || '.Lock_Price',
882: 'x_return_status = ' || x_msg_data);
883: END IF;
884:
885: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
886: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
887: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
888: RAISE FND_API.G_EXC_ERROR;
889: END IF;

Line 886: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

882: 'x_return_status = ' || x_msg_data);
883: END IF;
884:
885: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
886: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
887: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
888: RAISE FND_API.G_EXC_ERROR;
889: END IF;
890:

Line 887: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN

883: END IF;
884:
885: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
886: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
887: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
888: RAISE FND_API.G_EXC_ERROR;
889: END IF;
890:
891: --Set output variables.

Line 888: RAISE FND_API.G_EXC_ERROR;

884:
885: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
886: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
887: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
888: RAISE FND_API.G_EXC_ERROR;
889: END IF;
890:
891: --Set output variables.
892: x_locked_price_list_id := l_locked_price_list_id;

Line 912: p_pricing_attr_tbl(1).pricing_attribute_id := FND_API.G_MISS_NUM;

908: p_pricing_attr_tbl.delete;
909:
910: --Populate one pricing attribute record for the LIST_LINE_ID attribute with
911: --appropriate values.
912: p_pricing_attr_tbl(1).pricing_attribute_id := FND_API.G_MISS_NUM;
913: p_pricing_attr_tbl(1).list_line_id := x_price_list_line_tbl(1).list_line_id;
914: p_pricing_attr_tbl(1).list_header_id :=
915: x_price_list_line_tbl(1).list_header_id;
916: p_pricing_attr_tbl(1).product_attribute :=

Line 941: , p_init_msg_list => FND_API.G_FALSE

937:
938: --Add List Line Id as a pricing attribute to locked price list line.
939: QP_LIST_HEADERS_PVT.Process_Price_List
940: ( p_api_version_number => 1
941: , p_init_msg_list => FND_API.G_FALSE
942: , p_commit => FND_API.G_FALSE
943: , p_control_rec => p_control_rec
944: , x_return_status => x_return_status
945: , x_msg_count => x_msg_count

Line 942: , p_commit => FND_API.G_FALSE

938: --Add List Line Id as a pricing attribute to locked price list line.
939: QP_LIST_HEADERS_PVT.Process_Price_List
940: ( p_api_version_number => 1
941: , p_init_msg_list => FND_API.G_FALSE
942: , p_commit => FND_API.G_FALSE
943: , p_control_rec => p_control_rec
944: , x_return_status => x_return_status
945: , x_msg_count => x_msg_count
946: , x_msg_data => x_msg_data

Line 972: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

968: g_pkg_name || '.Lock_Price',
969: 'x_return_status = ' || x_msg_data);
970: END IF;
971:
972: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
973: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
974: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
975: RAISE FND_API.G_EXC_ERROR;
976: END IF;

Line 973: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

969: 'x_return_status = ' || x_msg_data);
970: END IF;
971:
972: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
973: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
974: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
975: RAISE FND_API.G_EXC_ERROR;
976: END IF;
977:

Line 974: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN

970: END IF;
971:
972: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
973: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
974: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
975: RAISE FND_API.G_EXC_ERROR;
976: END IF;
977:
978: END IF; --l_locked_price_list_id is null

Line 975: RAISE FND_API.G_EXC_ERROR;

971:
972: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
973: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
974: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
975: RAISE FND_API.G_EXC_ERROR;
976: END IF;
977:
978: END IF; --l_locked_price_list_id is null
979:

Line 989: WHEN FND_API.G_EXC_ERROR THEN

985: END IF;
986:
987: EXCEPTION
988:
989: WHEN FND_API.G_EXC_ERROR THEN
990:
991: x_return_status := FND_API.G_RET_STS_ERROR;
992:
993: -- Get message count and data

Line 991: x_return_status := FND_API.G_RET_STS_ERROR;

987: EXCEPTION
988:
989: WHEN FND_API.G_EXC_ERROR THEN
990:
991: x_return_status := FND_API.G_RET_STS_ERROR;
992:
993: -- Get message count and data
994:
995: FND_MSG_PUB.Count_And_Get

Line 1000: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

996: ( p_count => x_msg_count
997: , p_data => x_msg_data
998: );
999:
1000: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1001:
1002: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1003:
1004: -- Get message count and data

Line 1002: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

998: );
999:
1000: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1001:
1002: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1003:
1004: -- Get message count and data
1005:
1006: FND_MSG_PUB.Count_And_Get

Line 1013: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1009: );
1010:
1011: WHEN OTHERS THEN
1012:
1013: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1014:
1015: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
1016: fnd_log.STRING (fnd_log.level_procedure,
1017: g_pkg_name || '.Lock_Price',