[Home] [Help]
1: PACKAGE BODY IBE_Shop_List_PVT AS
2: /* $Header: IBEVQSLB.pls 120.3.12020000.2 2012/08/14 06:48:00 amaheshw ship $ */
3:
4: l_true VARCHAR2(1) := FND_API.G_TRUE;
5:
6: FUNCTION Find_Index(
7: p_id IN NUMBER,
8: p_num_tbl IN jtf_number_table
190: IF (l_relationship_type_code <> 'SERVICE') then
191: x_list_line_id_tbl.EXTEND;
192: x_list_line_id_tbl(x_list_line_id_tbl.LAST) := l_rel_line_id;
193:
194: IF FND_API.to_Boolean(p_qte_line_rel_tbl) THEN
195: FOR j IN x_list_line_id_tbl.FIRST..x_list_line_id_tbl.LAST LOOP
196: IF x_list_line_id_tbl(j) = l_line_id THEN
197: x_qte_line_relation_tbl(k).qte_line_index := j;
198: EXIT;
294:
295: PROCEDURE Set_List_Lines_From_List_Lines(
296: p_list_line_id_tbl IN jtf_number_table ,
297: p_list_header_id IN NUMBER ,
298: p_combine_same_item IN VARCHAR2 := FND_API.G_MISS_CHAR ,
299: x_list_line_tbl OUT NOCOPY IBE_Shop_List_PVT.SL_Line_Tbl_Type,
300: x_list_line_id_map_tbl OUT NOCOPY jtf_number_table ,
301: x_list_line_index_tbl OUT NOCOPY jtf_number_table
302: )
586: END Delete_Config_From_Shp_List;
587:
588: PROCEDURE Delete(
589: p_api_version IN NUMBER := 1 ,
590: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
591: p_commit IN VARCHAR2 := FND_API.G_FALSE,
592: x_return_status OUT NOCOPY VARCHAR2 ,
593: x_msg_count OUT NOCOPY NUMBER ,
594: x_msg_data OUT NOCOPY VARCHAR2 ,
587:
588: PROCEDURE Delete(
589: p_api_version IN NUMBER := 1 ,
590: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
591: p_commit IN VARCHAR2 := FND_API.G_FALSE,
592: x_return_status OUT NOCOPY VARCHAR2 ,
593: x_msg_count OUT NOCOPY NUMBER ,
594: x_msg_data OUT NOCOPY VARCHAR2 ,
595: p_shop_list_ids IN jtf_number_table ,
620: -- Standard Start of API savepoint
621: SAVEPOINT Delete_PVT;
622:
623: -- Standard call to check for call compatibility.
624: IF NOT FND_API.Compatible_API_Call( L_API_VERSION,
625: p_api_version,
626: L_API_NAME,
627: G_PKG_NAME )
628: THEN
625: p_api_version,
626: L_API_NAME,
627: G_PKG_NAME )
628: THEN
629: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
630: END IF;
631:
632: -- Initialize message list IF p_init_msg_list is set to TRUE.
633: IF FND_API.to_Boolean( p_init_msg_list ) THEN
629: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
630: END IF;
631:
632: -- Initialize message list IF p_init_msg_list is set to TRUE.
633: IF FND_API.to_Boolean( p_init_msg_list ) THEN
634: FND_MSG_PUB.initialize;
635: END IF;
636:
637: -- Initialize API return status to success
634: FND_MSG_PUB.initialize;
635: END IF;
636:
637: -- Initialize API return status to success
638: x_return_status := FND_API.G_RET_STS_SUCCESS;
639:
640: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
641: IBE_Util.Debug('IBE_Shop_List_PVT.Delete(+)');
642: -- API body
649: p_usage_exists => l_usage_exists,
650: p_error_message => x_msg_data,
651: p_return_value => l_return_value);
652: IF l_return_value = 0 THEN
653: RAISE FND_API.G_EXC_ERROR;
654: END IF;
655: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
656: IBE_Util.Debug('Done CZ_CF_API.delete_configuration at '
657: || TO_CHAR(SYSDATE, 'mm/dd/yyyy:hh24:MI:SS'));
688: EXCEPTION
689: WHEN NO_DATA_FOUND THEN
690: FND_MESSAGE.set_name('IBE', 'IBE_SL_UPDATE_TO_LIST_ERROR');
691: FND_MSG_PUB.add;
692: RAISE FND_API.G_EXC_ERROR;
693: END;
694: END LOOP;
695:
696: -- End of API body.
698: IBE_Util.Debug('IBE_Shop_List_PVT.Delete(-)');
699: END IF;
700:
701: -- Standard check of p_commit.
702: IF FND_API.To_Boolean( p_commit ) THEN
703: COMMIT WORK;
704: END IF;
705:
706: -- Standard call to get message count and IF count is 1, get message info.
703: COMMIT WORK;
704: END IF;
705:
706: -- Standard call to get message count and IF count is 1, get message info.
707: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
708: p_count => x_msg_count ,
709: p_data => x_msg_data );
710: EXCEPTION
711: WHEN FND_API.G_EXC_ERROR THEN
707: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
708: p_count => x_msg_count ,
709: p_data => x_msg_data );
710: EXCEPTION
711: WHEN FND_API.G_EXC_ERROR THEN
712: ROLLBACK TO Delete_PVT;
713: x_return_status := FND_API.G_RET_STS_ERROR;
714: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
715: p_count => x_msg_count,
709: p_data => x_msg_data );
710: EXCEPTION
711: WHEN FND_API.G_EXC_ERROR THEN
712: ROLLBACK TO Delete_PVT;
713: x_return_status := FND_API.G_RET_STS_ERROR;
714: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
715: p_count => x_msg_count,
716: p_data => x_msg_data);
717: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
710: EXCEPTION
711: WHEN FND_API.G_EXC_ERROR THEN
712: ROLLBACK TO Delete_PVT;
713: x_return_status := FND_API.G_RET_STS_ERROR;
714: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
715: p_count => x_msg_count,
716: p_data => x_msg_data);
717: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
718: ROLLBACK TO Delete_PVT;
713: x_return_status := FND_API.G_RET_STS_ERROR;
714: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
715: p_count => x_msg_count,
716: p_data => x_msg_data);
717: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
718: ROLLBACK TO Delete_PVT;
719: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
720: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
721: p_count => x_msg_count,
715: p_count => x_msg_count,
716: p_data => x_msg_data);
717: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
718: ROLLBACK TO Delete_PVT;
719: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
720: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
721: p_count => x_msg_count,
722: p_data => x_msg_data);
723: WHEN OTHERS THEN
716: p_data => x_msg_data);
717: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
718: ROLLBACK TO Delete_PVT;
719: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
720: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
721: p_count => x_msg_count,
722: p_data => x_msg_data);
723: WHEN OTHERS THEN
724: ROLLBACK TO Delete_PVT;
721: p_count => x_msg_count,
722: p_data => x_msg_data);
723: WHEN OTHERS THEN
724: ROLLBACK TO Delete_PVT;
725: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
726:
727: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
728: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
729: l_api_name);
728: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
729: l_api_name);
730: END IF;
731:
732: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
733: p_count => x_msg_count,
734: p_data => x_msg_data);
735: END Delete;
736:
736:
737:
738: PROCEDURE Delete_All_Lines(
739: p_api_version IN NUMBER := 1 ,
740: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
741: p_commit IN VARCHAR2 := FND_API.G_FALSE,
742: x_return_status OUT NOCOPY VARCHAR2 ,
743: x_msg_count OUT NOCOPY NUMBER ,
744: x_msg_data OUT NOCOPY VARCHAR2 ,
737:
738: PROCEDURE Delete_All_Lines(
739: p_api_version IN NUMBER := 1 ,
740: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
741: p_commit IN VARCHAR2 := FND_API.G_FALSE,
742: x_return_status OUT NOCOPY VARCHAR2 ,
743: x_msg_count OUT NOCOPY NUMBER ,
744: x_msg_data OUT NOCOPY VARCHAR2 ,
745: p_shop_list_ids IN jtf_number_table ,
771: -- Standard Start of API savepoint
772: SAVEPOINT Delete_All_Lines_PVT;
773:
774: -- Standard call to check for call compatibility.
775: IF NOT FND_API.Compatible_API_Call( L_API_VERSION,
776: p_api_version,
777: L_API_NAME,
778: G_PKG_NAME )
779: THEN
776: p_api_version,
777: L_API_NAME,
778: G_PKG_NAME )
779: THEN
780: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
781: END IF;
782:
783: -- Initialize message list IF p_init_msg_list is set to TRUE.
784: IF FND_API.to_Boolean( p_init_msg_list ) THEN
780: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
781: END IF;
782:
783: -- Initialize message list IF p_init_msg_list is set to TRUE.
784: IF FND_API.to_Boolean( p_init_msg_list ) THEN
785: FND_MSG_PUB.initialize;
786: END IF;
787:
788: -- Initialize API return status to success
785: FND_MSG_PUB.initialize;
786: END IF;
787:
788: -- Initialize API return status to success
789: x_return_status := FND_API.G_RET_STS_SUCCESS;
790:
791: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
792: IBE_Util.Debug('IBE_Shop_List_PVT.Delete_All_Lines(+)');
793: -- API body
800: p_usage_exists => l_usage_exists,
801: p_error_message => x_msg_data,
802: p_return_value => l_return_value);
803: IF l_return_value = 0 THEN
804: RAISE FND_API.G_EXC_ERROR;
805: END IF;
806: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
807: IBE_Util.Debug('Done CZ_CF_API.delete_configuration at '
808: || TO_CHAR(SYSDATE, 'mm/dd/yyyy:hh24:MI:SS'));
839:
840: IF (SQL%NOTFOUND) THEN
841: FND_MESSAGE.set_name('IBE', 'IBE_SL_UPDATE_TO_LIST_ERROR');
842: FND_MSG_PUB.add;
843: RAISE FND_API.G_EXC_ERROR;
844: END IF;
845: END LOOP;
846:
847: -- End of API body.
849: IBE_Util.Debug('IBE_Shop_List_PVT.Delete_All_Lines(-)');
850: END IF;
851:
852: -- Standard check of p_commit.
853: IF FND_API.To_Boolean( p_commit ) THEN
854: COMMIT WORK;
855: END IF;
856:
857: -- Standard call to get message count and IF count is 1, get message info.
854: COMMIT WORK;
855: END IF;
856:
857: -- Standard call to get message count and IF count is 1, get message info.
858: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
859: p_count => x_msg_count ,
860: p_data => x_msg_data );
861:
862: EXCEPTION
859: p_count => x_msg_count ,
860: p_data => x_msg_data );
861:
862: EXCEPTION
863: WHEN FND_API.G_EXC_ERROR THEN
864: ROLLBACK TO Delete_All_Lines_PVT;
865: x_return_status := FND_API.G_RET_STS_ERROR;
866: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
867: p_count => x_msg_count,
861:
862: EXCEPTION
863: WHEN FND_API.G_EXC_ERROR THEN
864: ROLLBACK TO Delete_All_Lines_PVT;
865: x_return_status := FND_API.G_RET_STS_ERROR;
866: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
867: p_count => x_msg_count,
868: p_data => x_msg_data);
869: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
862: EXCEPTION
863: WHEN FND_API.G_EXC_ERROR THEN
864: ROLLBACK TO Delete_All_Lines_PVT;
865: x_return_status := FND_API.G_RET_STS_ERROR;
866: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
867: p_count => x_msg_count,
868: p_data => x_msg_data);
869: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
870: ROLLBACK TO Delete_All_Lines_PVT;
865: x_return_status := FND_API.G_RET_STS_ERROR;
866: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
867: p_count => x_msg_count,
868: p_data => x_msg_data);
869: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
870: ROLLBACK TO Delete_All_Lines_PVT;
871: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
872: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
873: p_count => x_msg_count,
867: p_count => x_msg_count,
868: p_data => x_msg_data);
869: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
870: ROLLBACK TO Delete_All_Lines_PVT;
871: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
872: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
873: p_count => x_msg_count,
874: p_data => x_msg_data);
875: WHEN OTHERS THEN
868: p_data => x_msg_data);
869: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
870: ROLLBACK TO Delete_All_Lines_PVT;
871: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
872: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
873: p_count => x_msg_count,
874: p_data => x_msg_data);
875: WHEN OTHERS THEN
876: ROLLBACK TO Delete_All_Lines_PVT;
873: p_count => x_msg_count,
874: p_data => x_msg_data);
875: WHEN OTHERS THEN
876: ROLLBACK TO Delete_All_Lines_PVT;
877: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
878:
879: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
880: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
881: l_api_name);
880: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
881: l_api_name);
882: END IF;
883:
884: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
885: p_count => x_msg_count,
886: p_data => x_msg_data);
887: END Delete_All_Lines;
888:
969: END Delete_Line;
970:
971: PROCEDURE Delete_Lines(
972: p_api_version IN NUMBER := 1 ,
973: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
974: p_commit IN VARCHAR2 := FND_API.G_FALSE,
975: x_return_status OUT NOCOPY VARCHAR2 ,
976: x_msg_count OUT NOCOPY NUMBER ,
977: x_msg_data OUT NOCOPY VARCHAR2 ,
970:
971: PROCEDURE Delete_Lines(
972: p_api_version IN NUMBER := 1 ,
973: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
974: p_commit IN VARCHAR2 := FND_API.G_FALSE,
975: x_return_status OUT NOCOPY VARCHAR2 ,
976: x_msg_count OUT NOCOPY NUMBER ,
977: x_msg_data OUT NOCOPY VARCHAR2 ,
978: p_shop_list_line_ids IN jtf_number_table ,
993: -- Standard Start of API savepoint
994: SAVEPOINT Delete_Lines_PVT;
995:
996: -- Standard call to check for call compatibility.
997: IF NOT FND_API.Compatible_API_Call( L_API_VERSION,
998: p_api_version,
999: L_API_NAME,
1000: G_PKG_NAME )
1001: THEN
998: p_api_version,
999: L_API_NAME,
1000: G_PKG_NAME )
1001: THEN
1002: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1003: END IF;
1004:
1005: -- Initialize message list IF p_init_msg_list is set to TRUE.
1006: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1002: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1003: END IF;
1004:
1005: -- Initialize message list IF p_init_msg_list is set to TRUE.
1006: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1007: FND_MSG_PUB.initialize;
1008: END IF;
1009:
1010: -- Initialize API return status to success
1007: FND_MSG_PUB.initialize;
1008: END IF;
1009:
1010: -- Initialize API return status to success
1011: x_return_status := FND_API.G_RET_STS_SUCCESS;
1012:
1013: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1014: IBE_Util.Debug('IBE_Shop_List_PVT.Delete_Lines(+)');
1015: END IF;
1029: p_error_message => x_msg_data,
1030: p_return_value => l_return_value);
1031:
1032: IF l_return_value = 0 THEN
1033: RAISE FND_API.G_EXC_ERROR;
1034: END IF;
1035: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1036: IBE_Util.Debug('Done CZ_CF_API.delete_configuration at '
1037: || TO_CHAR(SYSDATE, 'mm/dd/yyyy:hh24:MI:SS'));
1046: EXCEPTION
1047: WHEN NO_DATA_FOUND THEN
1048: FND_MESSAGE.set_name('IBE', 'IBE_SL_UPDATE_TO_LIST_ERROR');
1049: FND_MSG_PUB.add;
1050: RAISE FND_API.G_EXC_ERROR;
1051: END;
1052: END IF;
1053:
1054: -- DBMS_OUTPUT.PUT_LINE('l_shop_list_id = ' || l_shop_list_id);
1064: EXCEPTION
1065: WHEN NO_DATA_FOUND THEN
1066: FND_MESSAGE.set_name('IBE', 'IBE_SL_UPDATE_TO_LIST_ERROR');
1067: FND_MSG_PUB.add;
1068: RAISE FND_API.G_EXC_ERROR;
1069: END;
1070: END LOOP;
1071:
1072: -- dbms_output.put_line('now updating header');
1077:
1078: IF (SQL%NOTFOUND) THEN
1079: FND_MESSAGE.set_name('IBE', 'IBE_SL_UPDATE_TO_LIST_ERROR');
1080: FND_MSG_PUB.add;
1081: RAISE FND_API.G_EXC_ERROR;
1082: END IF;
1083:
1084: -- End of API body.
1085: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1086: IBE_Util.Debug('IBE_Shop_List_PVT.Delete_Lines(-)');
1087: END IF;
1088:
1089: -- Standard check of p_commit.
1090: IF FND_API.To_Boolean( p_commit ) THEN
1091: COMMIT WORK;
1092: END IF;
1093:
1094: -- Standard call to get message count and IF count is 1, get message info.
1091: COMMIT WORK;
1092: END IF;
1093:
1094: -- Standard call to get message count and IF count is 1, get message info.
1095: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1096: p_count => x_msg_count ,
1097: p_data => x_msg_data );
1098:
1099: EXCEPTION
1096: p_count => x_msg_count ,
1097: p_data => x_msg_data );
1098:
1099: EXCEPTION
1100: WHEN FND_API.G_EXC_ERROR THEN
1101: ROLLBACK TO Delete_Lines_PVT;
1102: x_return_status := FND_API.G_RET_STS_ERROR;
1103: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1104: p_count => x_msg_count,
1098:
1099: EXCEPTION
1100: WHEN FND_API.G_EXC_ERROR THEN
1101: ROLLBACK TO Delete_Lines_PVT;
1102: x_return_status := FND_API.G_RET_STS_ERROR;
1103: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1104: p_count => x_msg_count,
1105: p_data => x_msg_data);
1106: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1099: EXCEPTION
1100: WHEN FND_API.G_EXC_ERROR THEN
1101: ROLLBACK TO Delete_Lines_PVT;
1102: x_return_status := FND_API.G_RET_STS_ERROR;
1103: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1104: p_count => x_msg_count,
1105: p_data => x_msg_data);
1106: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1107: ROLLBACK TO Delete_Lines_PVT;
1102: x_return_status := FND_API.G_RET_STS_ERROR;
1103: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1104: p_count => x_msg_count,
1105: p_data => x_msg_data);
1106: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1107: ROLLBACK TO Delete_Lines_PVT;
1108: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1109: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1110: p_count => x_msg_count,
1104: p_count => x_msg_count,
1105: p_data => x_msg_data);
1106: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1107: ROLLBACK TO Delete_Lines_PVT;
1108: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1109: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1110: p_count => x_msg_count,
1111: p_data => x_msg_data);
1112: WHEN OTHERS THEN
1105: p_data => x_msg_data);
1106: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1107: ROLLBACK TO Delete_Lines_PVT;
1108: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1109: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1110: p_count => x_msg_count,
1111: p_data => x_msg_data);
1112: WHEN OTHERS THEN
1113: ROLLBACK TO Delete_Lines_PVT;
1110: p_count => x_msg_count,
1111: p_data => x_msg_data);
1112: WHEN OTHERS THEN
1113: ROLLBACK TO Delete_Lines_PVT;
1114: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1115:
1116: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1117: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
1118: l_api_name);
1117: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
1118: l_api_name);
1119: END IF;
1120:
1121: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1122: p_count => x_msg_count,
1123: p_data => x_msg_data);
1124: END Delete_Lines;
1125:
1124: END Delete_Lines;
1125:
1126: PROCEDURE Save(
1127: p_api_version IN NUMBER := 1 ,
1128: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
1129: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
1130: x_return_status OUT NOCOPY VARCHAR2 ,
1131: x_msg_count OUT NOCOPY NUMBER ,
1132: x_msg_data OUT NOCOPY VARCHAR2 ,
1125:
1126: PROCEDURE Save(
1127: p_api_version IN NUMBER := 1 ,
1128: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
1129: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
1130: x_return_status OUT NOCOPY VARCHAR2 ,
1131: x_msg_count OUT NOCOPY NUMBER ,
1132: x_msg_data OUT NOCOPY VARCHAR2 ,
1133: p_combine_same_item IN VARCHAR2 := FND_API.G_MISS_CHAR ,
1129: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
1130: x_return_status OUT NOCOPY VARCHAR2 ,
1131: x_msg_count OUT NOCOPY NUMBER ,
1132: x_msg_data OUT NOCOPY VARCHAR2 ,
1133: p_combine_same_item IN VARCHAR2 := FND_API.G_MISS_CHAR ,
1134: p_sl_header_rec IN SL_Header_Rec_Type ,
1135: p_sl_line_tbl IN SL_Line_Tbl_Type := G_MISS_SL_LINE_TBL ,
1136: p_sl_line_rel_tbl IN SL_Line_Rel_Tbl_Type := G_MISS_SL_LINE_REL_TBL,
1137: x_sl_header_id OUT NOCOPY NUMBER
1153: -- Standard Start of API savepoint
1154: SAVEPOINT Save_PVT;
1155:
1156: -- Standard call to check for call compatibility.
1157: IF NOT FND_API.Compatible_API_Call( L_API_VERSION,
1158: p_api_version,
1159: L_API_NAME,
1160: G_PKG_NAME )
1161: THEN
1158: p_api_version,
1159: L_API_NAME,
1160: G_PKG_NAME )
1161: THEN
1162: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1163: END IF;
1164:
1165: -- Initialize message list IF p_init_msg_list is set to TRUE.
1166: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1162: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1163: END IF;
1164:
1165: -- Initialize message list IF p_init_msg_list is set to TRUE.
1166: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1167: FND_MSG_PUB.initialize;
1168: END IF;
1169:
1170: -- Initialize API return status to success
1167: FND_MSG_PUB.initialize;
1168: END IF;
1169:
1170: -- Initialize API return status to success
1171: x_return_status := FND_API.G_RET_STS_SUCCESS;
1172:
1173: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1174: IBE_Util.Debug('IBE_Shop_List_PVT.Save(+)');
1175: END IF;
1175: END IF;
1176: --dbms_output.put_line('IBE_Shop_List_PVT.Save(+)');
1177: -- API body
1178:
1179: IF p_combine_same_item = FND_API.G_MISS_CHAR THEN
1180: l_combine_same_item := FND_Profile.Value('IBE_SC_MERGE_SHOPCART_LINES');
1181: ELSE
1182: l_combine_same_item := p_combine_same_item;
1183: END IF;
1183: END IF;
1184:
1185: --dbms_output.put_line('Saving list header');
1186:
1187: IF p_sl_header_rec.shp_list_id = FND_API.G_MISS_NUM THEN
1188: -- A new shopping list. Create a shopping list.
1189: --dbms_output.put_line('New line to be created for header');
1190:
1191: BEGIN
1235: EXCEPTION
1236: WHEN DUP_VAL_ON_INDEX THEN
1237: FND_MESSAGE.set_name('IBE', 'IBE_SL_DUPLICATE_LISTNAME');
1238: FND_MSG_PUB.add;
1239: RAISE FND_API.G_EXC_ERROR;
1240:
1241: WHEN NO_DATA_FOUND THEN
1242: FND_MESSAGE.set_name('IBE', 'IBE_SL_UPDATE_TO_LIST_ERROR');
1243: FND_MSG_PUB.add;
1240:
1241: WHEN NO_DATA_FOUND THEN
1242: FND_MESSAGE.set_name('IBE', 'IBE_SL_UPDATE_TO_LIST_ERROR');
1243: FND_MSG_PUB.add;
1244: RAISE FND_API.G_EXC_ERROR;
1245: END;
1246: ELSE
1247: -- Existing shopping list. Update the shopping list.
1248: --dbms_output.put_line('Update header');
1286: EXCEPTION
1287: WHEN DUP_VAL_ON_INDEX THEN
1288: FND_MESSAGE.set_name('IBE', 'IBE_SL_DUPLICATE_LISTNAME');
1289: FND_MSG_PUB.add;
1290: RAISE FND_API.G_EXC_ERROR;
1291:
1292: WHEN NO_DATA_FOUND THEN
1293: FND_MESSAGE.set_name('IBE', 'IBE_SL_UPDATE_TO_LIST_ERROR');
1294: FND_MSG_PUB.add;
1291:
1292: WHEN NO_DATA_FOUND THEN
1293: FND_MESSAGE.set_name('IBE', 'IBE_SL_UPDATE_TO_LIST_ERROR');
1294: FND_MSG_PUB.add;
1295: RAISE FND_API.G_EXC_ERROR;
1296: END;
1297: END IF;
1298:
1299: --dbms_output.put_line('After saving header x_sl_header_id = ' || x_sl_header_id);
1305: l_sl_line_rec := p_sl_line_tbl(i);
1306:
1307: --dbms_output.put_line('Checking whether to update the quantity or insert new line');
1308:
1309: IF p_sl_header_rec.shp_list_id <> FND_API.G_MISS_NUM
1310: AND l_sl_line_rec.shp_list_item_id = FND_API.G_MISS_NUM
1311: AND l_sl_line_rec.item_type_code = 'STD'
1312: AND l_combine_same_item = 'Y' THEN
1313: BEGIN
1306:
1307: --dbms_output.put_line('Checking whether to update the quantity or insert new line');
1308:
1309: IF p_sl_header_rec.shp_list_id <> FND_API.G_MISS_NUM
1310: AND l_sl_line_rec.shp_list_item_id = FND_API.G_MISS_NUM
1311: AND l_sl_line_rec.item_type_code = 'STD'
1312: AND l_combine_same_item = 'Y' THEN
1313: BEGIN
1314: SELECT shp_list_item_id, quantity
1329: END IF;
1330:
1331: --dbms_output.put_line('Checking for the line whether to insert or update the line');
1332:
1333: IF l_sl_line_rec.shp_list_item_id = FND_API.G_MISS_NUM THEN
1334: -- New line. Add a line.
1335: --dbms_output.put_line('Inserting line ' || i);
1336:
1337: IBE_Shop_List_Line_PKG.Insert_Row(
1428:
1429: IF p_sl_line_rel_tbl.COUNT > 0 THEN
1430: -- There are shopping list line relationships
1431: FOR i IN 1..p_sl_line_rel_tbl.COUNT LOOP
1432: IF p_sl_line_rel_tbl(i).shp_list_item_id = FND_API.G_MISS_NUM THEN
1433: -- New line relationship. Add a line relationship.
1434: IBE_ShopList_Line_Relation_PKG.Insert_Row(
1435: x_shlitem_rel_id => l_sl_line_rel_id ,
1436: p_request_id => p_sl_line_rel_tbl(i).request_id ,
1459: END IF;
1460: --dbms_output.put_line('IBE_Shop_List_PVT.Save(-)');
1461:
1462: -- Standard check of p_commit.
1463: IF FND_API.To_Boolean( p_commit ) THEN
1464: COMMIT WORK;
1465: END IF;
1466:
1467: -- Standard call to get message count and IF count is 1, get message info.
1464: COMMIT WORK;
1465: END IF;
1466:
1467: -- Standard call to get message count and IF count is 1, get message info.
1468: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1469: p_count => x_msg_count ,
1470: p_data => x_msg_data );
1471:
1472: EXCEPTION
1469: p_count => x_msg_count ,
1470: p_data => x_msg_data );
1471:
1472: EXCEPTION
1473: WHEN FND_API.G_EXC_ERROR THEN
1474: ROLLBACK TO Save_PVT;
1475: x_return_status := FND_API.G_RET_STS_ERROR;
1476: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1477: p_count => x_msg_count,
1471:
1472: EXCEPTION
1473: WHEN FND_API.G_EXC_ERROR THEN
1474: ROLLBACK TO Save_PVT;
1475: x_return_status := FND_API.G_RET_STS_ERROR;
1476: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1477: p_count => x_msg_count,
1478: p_data => x_msg_data);
1479: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1472: EXCEPTION
1473: WHEN FND_API.G_EXC_ERROR THEN
1474: ROLLBACK TO Save_PVT;
1475: x_return_status := FND_API.G_RET_STS_ERROR;
1476: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1477: p_count => x_msg_count,
1478: p_data => x_msg_data);
1479: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1480: ROLLBACK TO Save_PVT;
1475: x_return_status := FND_API.G_RET_STS_ERROR;
1476: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1477: p_count => x_msg_count,
1478: p_data => x_msg_data);
1479: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1480: ROLLBACK TO Save_PVT;
1481: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1482: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1483: p_count => x_msg_count,
1477: p_count => x_msg_count,
1478: p_data => x_msg_data);
1479: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1480: ROLLBACK TO Save_PVT;
1481: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1482: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1483: p_count => x_msg_count,
1484: p_data => x_msg_data);
1485: WHEN OTHERS THEN
1478: p_data => x_msg_data);
1479: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1480: ROLLBACK TO Save_PVT;
1481: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1482: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1483: p_count => x_msg_count,
1484: p_data => x_msg_data);
1485: WHEN OTHERS THEN
1486: ROLLBACK TO Save_PVT;
1483: p_count => x_msg_count,
1484: p_data => x_msg_data);
1485: WHEN OTHERS THEN
1486: ROLLBACK TO Save_PVT;
1487: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1488:
1489: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1490: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
1491: l_api_name);
1490: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
1491: l_api_name);
1492: END IF;
1493:
1494: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1495: p_count => x_msg_count,
1496: p_data => x_msg_data);
1497: END Save;
1498:
1519: l_new_item_id_tbl CZ_API_PUB.number_tbl_type;
1520:
1521: BEGIN
1522: -- Initialize API return status to success
1523: x_return_status := FND_API.G_RET_STS_SUCCESS;
1524:
1525: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1526: IBE_Util.Debug('IBE_Shop_List_PVT.Update_Config_Item_Lines(+)');
1527: END IF;
1550: ,x_new_item_id_tbl => l_new_item_id_tbl
1551: ,x_return_status => l_ret_status
1552: ,x_msg_count => l_msg_count
1553: ,x_msg_data => x_msg_data);
1554: IF (l_ret_status <> FND_API.G_RET_STS_SUCCESS) THEN
1555: RAISE FND_API.G_EXC_ERROR;
1556: END IF;
1557:
1558: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1551: ,x_return_status => l_ret_status
1552: ,x_msg_count => l_msg_count
1553: ,x_msg_data => x_msg_data);
1554: IF (l_ret_status <> FND_API.G_RET_STS_SUCCESS) THEN
1555: RAISE FND_API.G_EXC_ERROR;
1556: END IF;
1557:
1558: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1559: IBE_Util.Debug('Done CZ_CONFIG_API_PUB.Copy_Configuration at'
1581: IBE_Util.Debug('IBE_Shop_List_PVT.Update_Config_Item_Lines(-)');
1582: END IF;
1583:
1584: -- Standard call to get message count and IF count is 1, get message info.
1585: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1586: p_count => x_msg_count ,
1587: p_data => x_msg_data );
1588:
1589: EXCEPTION
1586: p_count => x_msg_count ,
1587: p_data => x_msg_data );
1588:
1589: EXCEPTION
1590: WHEN FND_API.G_EXC_ERROR THEN
1591: x_return_status := FND_API.G_RET_STS_ERROR;
1592: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1593: p_count => x_msg_count,
1594: p_data => x_msg_data);
1587: p_data => x_msg_data );
1588:
1589: EXCEPTION
1590: WHEN FND_API.G_EXC_ERROR THEN
1591: x_return_status := FND_API.G_RET_STS_ERROR;
1592: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1593: p_count => x_msg_count,
1594: p_data => x_msg_data);
1595: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1588:
1589: EXCEPTION
1590: WHEN FND_API.G_EXC_ERROR THEN
1591: x_return_status := FND_API.G_RET_STS_ERROR;
1592: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1593: p_count => x_msg_count,
1594: p_data => x_msg_data);
1595: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1596: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1591: x_return_status := FND_API.G_RET_STS_ERROR;
1592: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1593: p_count => x_msg_count,
1594: p_data => x_msg_data);
1595: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1596: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1597: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1598: p_count => x_msg_count,
1599: p_data => x_msg_data);
1592: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1593: p_count => x_msg_count,
1594: p_data => x_msg_data);
1595: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1596: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1597: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1598: p_count => x_msg_count,
1599: p_data => x_msg_data);
1600: WHEN OTHERS THEN
1593: p_count => x_msg_count,
1594: p_data => x_msg_data);
1595: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1596: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1597: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1598: p_count => x_msg_count,
1599: p_data => x_msg_data);
1600: WHEN OTHERS THEN
1601: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1597: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1598: p_count => x_msg_count,
1599: p_data => x_msg_data);
1600: WHEN OTHERS THEN
1601: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1602:
1603: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1604: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
1605: l_api_name);
1604: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
1605: l_api_name);
1606: END IF;
1607:
1608: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1609: p_count => x_msg_count,
1610: p_data => x_msg_data);
1611: END Update_Config_Item_Lines;
1612:
1612:
1613:
1614: PROCEDURE Save_List_From_Items(
1615: p_api_version IN NUMBER := 1 ,
1616: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
1617: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
1618: x_return_status OUT NOCOPY VARCHAR2 ,
1619: x_msg_count OUT NOCOPY NUMBER ,
1620: x_msg_data OUT NOCOPY VARCHAR2 ,
1613:
1614: PROCEDURE Save_List_From_Items(
1615: p_api_version IN NUMBER := 1 ,
1616: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
1617: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
1618: x_return_status OUT NOCOPY VARCHAR2 ,
1619: x_msg_count OUT NOCOPY NUMBER ,
1620: x_msg_data OUT NOCOPY VARCHAR2 ,
1621: p_sl_line_ids IN jtf_number_table ,
1620: x_msg_data OUT NOCOPY VARCHAR2 ,
1621: p_sl_line_ids IN jtf_number_table ,
1622: p_sl_line_ovns IN jtf_number_table := NULL ,
1623: p_mode IN VARCHAR2 := 'MERGE' ,
1624: p_combine_same_item IN VARCHAR2 := FND_API.G_MISS_CHAR,
1625: p_sl_header_rec IN SL_Header_Rec_Type ,
1626: x_sl_header_id OUT NOCOPY NUMBER
1627: )
1628: IS
1643: -- Standard Start of API savepoint
1644: SAVEPOINT Save_List_From_Items_PVT;
1645:
1646: -- Standard call to check for call compatibility.
1647: IF NOT FND_API.Compatible_API_Call( L_API_VERSION,
1648: p_api_version,
1649: L_API_NAME,
1650: G_PKG_NAME)
1651: THEN
1648: p_api_version,
1649: L_API_NAME,
1650: G_PKG_NAME)
1651: THEN
1652: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1653: END IF;
1654:
1655: -- Initialize message list IF p_init_msg_list is set to TRUE.
1656: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1652: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1653: END IF;
1654:
1655: -- Initialize message list IF p_init_msg_list is set to TRUE.
1656: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1657: FND_MSG_PUB.initialize;
1658: END IF;
1659:
1660: -- Initialize API return status to success
1657: FND_MSG_PUB.initialize;
1658: END IF;
1659:
1660: -- Initialize API return status to success
1661: x_return_status := FND_API.G_RET_STS_SUCCESS;
1662:
1663: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1664: IBE_Util.Debug('IBE_Shop_List_PVT.Save_List_From_Items(+)');
1665: END IF;
1671:
1672: --dbms_output.put_line('p_sl_header_rec.shp_list_id = ' || p_sl_header_rec.shp_list_id);
1673: l_sl_header_rec := p_sl_header_rec;
1674:
1675: IF (l_sl_header_rec.shp_list_id <> FND_API.G_MISS_NUM) THEN
1676: IF (p_mode = 'REPLACE') THEN
1677: -- create jtf_number_table of list id and obj. ver num to pass to Delete_All_Lines
1678: l_list_header_id_tbl := jtf_number_table(l_sl_header_rec.shp_list_id);
1679: l_obj_ver_num_tbl := jtf_number_table(l_sl_header_rec.object_version_number);
1687: x_msg_data => x_msg_data,
1688: p_shop_list_ids => l_list_header_id_tbl,
1689: p_obj_ver_numbers => l_obj_ver_num_tbl);
1690:
1691: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1692: RAISE FND_API.G_EXC_ERROR;
1693: END IF;
1694:
1695: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1688: p_shop_list_ids => l_list_header_id_tbl,
1689: p_obj_ver_numbers => l_obj_ver_num_tbl);
1690:
1691: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1692: RAISE FND_API.G_EXC_ERROR;
1693: END IF;
1694:
1695: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1696: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1691: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1692: RAISE FND_API.G_EXC_ERROR;
1693: END IF;
1694:
1695: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1696: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1697: END IF;
1698:
1699: -- Delete_All_Lines updates object_version_number of shopping list
1692: RAISE FND_API.G_EXC_ERROR;
1693: END IF;
1694:
1695: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1696: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1697: END IF;
1698:
1699: -- Delete_All_Lines updates object_version_number of shopping list
1700: -- header, therefore IF we pass p_object_version_number IN save THEN
1698:
1699: -- Delete_All_Lines updates object_version_number of shopping list
1700: -- header, therefore IF we pass p_object_version_number IN save THEN
1701: -- it will fail as it has been incremented by one. Set it to
1702: -- FND_API.G_MISS_NUM so that save() will not fail.
1703: l_sl_header_rec.object_version_number := FND_API.G_MISS_NUM;
1704: END IF;
1705: END IF;
1706:
1699: -- Delete_All_Lines updates object_version_number of shopping list
1700: -- header, therefore IF we pass p_object_version_number IN save THEN
1701: -- it will fail as it has been incremented by one. Set it to
1702: -- FND_API.G_MISS_NUM so that save() will not fail.
1703: l_sl_header_rec.object_version_number := FND_API.G_MISS_NUM;
1704: END IF;
1705: END IF;
1706:
1707: /*
1708: * Call Include_Related_Lines() to include all the related lines, i.e.,
1709: * all the children lines of configurable items.
1710: */
1711: Include_Related_Lines(
1712: p_qte_line_rel_tbl => FND_API.G_FALSE ,
1713: p_list_line_id_tbl => p_sl_line_ids ,
1714: x_list_line_id_tbl => l_list_line_id_tbl,
1715: x_qte_line_relation_tbl => l_qte_line_relation_tbl,
1716: x_list_line_relation_tbl => l_sl_line_rel_tbl);
1728: x_msg_count => x_msg_count ,
1729: x_msg_data => x_msg_data ,
1730: px_sl_line_tbl => l_sl_line_tbl);
1731:
1732: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1733: RAISE FND_API.G_EXC_ERROR;
1734: END IF;
1735:
1736: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1729: x_msg_data => x_msg_data ,
1730: px_sl_line_tbl => l_sl_line_tbl);
1731:
1732: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1733: RAISE FND_API.G_EXC_ERROR;
1734: END IF;
1735:
1736: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1737: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1732: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1733: RAISE FND_API.G_EXC_ERROR;
1734: END IF;
1735:
1736: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1737: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1738: END IF;
1739:
1740: --dbms_output.put_line('p_sl_header_rec.shp_list_id = ' || p_sl_header_rec.shp_list_id);
1733: RAISE FND_API.G_EXC_ERROR;
1734: END IF;
1735:
1736: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1737: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1738: END IF;
1739:
1740: --dbms_output.put_line('p_sl_header_rec.shp_list_id = ' || p_sl_header_rec.shp_list_id);
1741: --dbms_output.put_line('p_sl_header_rec.party_id = ' || p_sl_header_rec.party_id);
1782: );
1783: --dbms_output.put_line('x_return_status = ' || x_return_status);
1784: --dbms_output.put_line('x_msg_count = ' || x_msg_count);
1785: --dbms_output.put_line('x_msg_data = ' || x_msg_data);
1786: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1787: RAISE FND_API.G_EXC_ERROR;
1788: END IF;
1789:
1790: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1783: --dbms_output.put_line('x_return_status = ' || x_return_status);
1784: --dbms_output.put_line('x_msg_count = ' || x_msg_count);
1785: --dbms_output.put_line('x_msg_data = ' || x_msg_data);
1786: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1787: RAISE FND_API.G_EXC_ERROR;
1788: END IF;
1789:
1790: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1791: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1786: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1787: RAISE FND_API.G_EXC_ERROR;
1788: END IF;
1789:
1790: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1791: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1792: END IF;
1793: EXCEPTION
1794: WHEN NO_DATA_FOUND THEN
1787: RAISE FND_API.G_EXC_ERROR;
1788: END IF;
1789:
1790: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1791: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1792: END IF;
1793: EXCEPTION
1794: WHEN NO_DATA_FOUND THEN
1795: FND_MESSAGE.set_name('IBE', 'IBE_SL_UPDATE_TO_LIST_ERROR');
1793: EXCEPTION
1794: WHEN NO_DATA_FOUND THEN
1795: FND_MESSAGE.set_name('IBE', 'IBE_SL_UPDATE_TO_LIST_ERROR');
1796: FND_MSG_PUB.add;
1797: RAISE FND_API.G_EXC_ERROR;
1798: END;
1799:
1800: --dbms_output.put_line('After Save...');
1801:
1805: END IF;
1806: --dbms_output.put_line('IBE_Shop_List_PVT.Save_List_From_Items(-)');
1807:
1808: -- Standard check of p_commit.
1809: IF FND_API.To_Boolean( p_commit ) THEN
1810: COMMIT WORK;
1811: END IF;
1812:
1813: -- Standard call to get message count and IF count is 1, get message info.
1810: COMMIT WORK;
1811: END IF;
1812:
1813: -- Standard call to get message count and IF count is 1, get message info.
1814: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1815: p_count => x_msg_count ,
1816: p_data => x_msg_data );
1817: EXCEPTION
1818: WHEN FND_API.G_EXC_ERROR THEN
1814: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1815: p_count => x_msg_count ,
1816: p_data => x_msg_data );
1817: EXCEPTION
1818: WHEN FND_API.G_EXC_ERROR THEN
1819: ROLLBACK TO Save_List_From_Items_PVT;
1820: x_return_status := FND_API.G_RET_STS_ERROR;
1821: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1822: p_count => x_msg_count,
1816: p_data => x_msg_data );
1817: EXCEPTION
1818: WHEN FND_API.G_EXC_ERROR THEN
1819: ROLLBACK TO Save_List_From_Items_PVT;
1820: x_return_status := FND_API.G_RET_STS_ERROR;
1821: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1822: p_count => x_msg_count,
1823: p_data => x_msg_data);
1824: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1817: EXCEPTION
1818: WHEN FND_API.G_EXC_ERROR THEN
1819: ROLLBACK TO Save_List_From_Items_PVT;
1820: x_return_status := FND_API.G_RET_STS_ERROR;
1821: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1822: p_count => x_msg_count,
1823: p_data => x_msg_data);
1824: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1825: ROLLBACK TO Save_List_From_Items_PVT;
1820: x_return_status := FND_API.G_RET_STS_ERROR;
1821: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1822: p_count => x_msg_count,
1823: p_data => x_msg_data);
1824: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1825: ROLLBACK TO Save_List_From_Items_PVT;
1826: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1827: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1828: p_count => x_msg_count,
1822: p_count => x_msg_count,
1823: p_data => x_msg_data);
1824: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1825: ROLLBACK TO Save_List_From_Items_PVT;
1826: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1827: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1828: p_count => x_msg_count,
1829: p_data => x_msg_data);
1830: WHEN OTHERS THEN
1823: p_data => x_msg_data);
1824: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1825: ROLLBACK TO Save_List_From_Items_PVT;
1826: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1827: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1828: p_count => x_msg_count,
1829: p_data => x_msg_data);
1830: WHEN OTHERS THEN
1831: ROLLBACK TO Save_List_From_Items_PVT;
1828: p_count => x_msg_count,
1829: p_data => x_msg_data);
1830: WHEN OTHERS THEN
1831: ROLLBACK TO Save_List_From_Items_PVT;
1832: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1833:
1834: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1835: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
1836: l_api_name);
1835: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
1836: l_api_name);
1837: END IF;
1838:
1839: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1840: p_count => x_msg_count,
1841: p_data => x_msg_data);
1842: END Save_List_From_Items;
1843:
1843:
1844:
1845: PROCEDURE Save_List_From_Quote(
1846: p_api_version IN NUMBER := 1 ,
1847: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
1848: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
1849: x_return_status OUT NOCOPY VARCHAR2 ,
1850: x_msg_count OUT NOCOPY NUMBER ,
1851: x_msg_data OUT NOCOPY VARCHAR2 ,
1844:
1845: PROCEDURE Save_List_From_Quote(
1846: p_api_version IN NUMBER := 1 ,
1847: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
1848: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
1849: x_return_status OUT NOCOPY VARCHAR2 ,
1850: x_msg_count OUT NOCOPY NUMBER ,
1851: x_msg_data OUT NOCOPY VARCHAR2 ,
1852: p_quote_header_id IN NUMBER ,
1849: x_return_status OUT NOCOPY VARCHAR2 ,
1850: x_msg_count OUT NOCOPY NUMBER ,
1851: x_msg_data OUT NOCOPY VARCHAR2 ,
1852: p_quote_header_id IN NUMBER ,
1853: p_quote_retrieval_number IN NUMBER := FND_API.G_MISS_NUM ,
1854: p_minisite_id IN NUMBER := FND_API.G_MISS_NUM ,
1855: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
1856: p_mode IN VARCHAR2 := 'MERGE' ,
1857: p_combine_same_item IN VARCHAR2 := FND_API.G_MISS_CHAR,
1850: x_msg_count OUT NOCOPY NUMBER ,
1851: x_msg_data OUT NOCOPY VARCHAR2 ,
1852: p_quote_header_id IN NUMBER ,
1853: p_quote_retrieval_number IN NUMBER := FND_API.G_MISS_NUM ,
1854: p_minisite_id IN NUMBER := FND_API.G_MISS_NUM ,
1855: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
1856: p_mode IN VARCHAR2 := 'MERGE' ,
1857: p_combine_same_item IN VARCHAR2 := FND_API.G_MISS_CHAR,
1858: p_sl_header_rec IN SL_Header_Rec_Type ,
1851: x_msg_data OUT NOCOPY VARCHAR2 ,
1852: p_quote_header_id IN NUMBER ,
1853: p_quote_retrieval_number IN NUMBER := FND_API.G_MISS_NUM ,
1854: p_minisite_id IN NUMBER := FND_API.G_MISS_NUM ,
1855: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
1856: p_mode IN VARCHAR2 := 'MERGE' ,
1857: p_combine_same_item IN VARCHAR2 := FND_API.G_MISS_CHAR,
1858: p_sl_header_rec IN SL_Header_Rec_Type ,
1859: x_sl_header_id OUT NOCOPY NUMBER
1853: p_quote_retrieval_number IN NUMBER := FND_API.G_MISS_NUM ,
1854: p_minisite_id IN NUMBER := FND_API.G_MISS_NUM ,
1855: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
1856: p_mode IN VARCHAR2 := 'MERGE' ,
1857: p_combine_same_item IN VARCHAR2 := FND_API.G_MISS_CHAR,
1858: p_sl_header_rec IN SL_Header_Rec_Type ,
1859: x_sl_header_id OUT NOCOPY NUMBER
1860: )
1861: IS
1922: -- Standard Start of API savepoint
1923: SAVEPOINT Save_List_From_Quote_PVT;
1924:
1925: -- Standard call to check for call compatibility.
1926: IF NOT FND_API.Compatible_API_Call( L_API_VERSION,
1927: p_api_version,
1928: L_API_NAME,
1929: G_PKG_NAME )
1930: THEN
1927: p_api_version,
1928: L_API_NAME,
1929: G_PKG_NAME )
1930: THEN
1931: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1932: END IF;
1933:
1934: -- Initialize message list IF p_init_msg_list is set to TRUE.
1935: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1931: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1932: END IF;
1933:
1934: -- Initialize message list IF p_init_msg_list is set to TRUE.
1935: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1936: FND_MSG_PUB.initialize;
1937: END IF;
1938:
1939: -- Initialize API return status to success
1936: FND_MSG_PUB.initialize;
1937: END IF;
1938:
1939: -- Initialize API return status to success
1940: x_return_status := FND_API.G_RET_STS_SUCCESS;
1941:
1942: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1943: IBE_Util.Debug('IBE_Shop_List_PVT.Save_List_From_Quote(+)');
1944: END IF;
1946:
1947:
1948: -- User Authentication
1949: IBE_Quote_Misc_pvt.Validate_User_Update
1950: ( p_init_msg_list => FND_API.G_TRUE
1951: ,p_quote_header_id => p_quote_header_id
1952: ,p_party_id => p_sl_header_rec.party_id
1953: ,p_cust_account_id => p_sl_header_rec.cust_account_id
1954: ,p_quote_retrieval_number => p_quote_retrieval_number
1951: ,p_quote_header_id => p_quote_header_id
1952: ,p_party_id => p_sl_header_rec.party_id
1953: ,p_cust_account_id => p_sl_header_rec.cust_account_id
1954: ,p_quote_retrieval_number => p_quote_retrieval_number
1955: ,p_validate_user => FND_API.G_TRUE
1956: ,x_return_status => x_return_status
1957: ,x_msg_count => x_msg_count
1958: ,x_msg_data => x_msg_data
1959: );
1956: ,x_return_status => x_return_status
1957: ,x_msg_count => x_msg_count
1958: ,x_msg_data => x_msg_data
1959: );
1960: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1961: RAISE FND_API.G_EXC_ERROR;
1962: END IF;
1963:
1964: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1957: ,x_msg_count => x_msg_count
1958: ,x_msg_data => x_msg_data
1959: );
1960: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1961: RAISE FND_API.G_EXC_ERROR;
1962: END IF;
1963:
1964: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1965: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1960: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1961: RAISE FND_API.G_EXC_ERROR;
1962: END IF;
1963:
1964: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1965: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1966: END IF;
1967:
1968: -- IF p_sl_header_rec.shp_list_id is not null, i.e. mode will be either 'ADDTO' or 'REPLACE'.
1961: RAISE FND_API.G_EXC_ERROR;
1962: END IF;
1963:
1964: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1965: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1966: END IF;
1967:
1968: -- IF p_sl_header_rec.shp_list_id is not null, i.e. mode will be either 'ADDTO' or 'REPLACE'.
1969: -- In this case we just take leave header information as it is, but is p_sl_header_rec.shp_list_id
1969: -- In this case we just take leave header information as it is, but is p_sl_header_rec.shp_list_id
1970: -- is null, we create new line for shopping list header.
1971: l_sl_header_rec := p_sl_header_rec;
1972:
1973: IF (p_sl_header_rec.shp_list_id <> FND_API.G_MISS_NUM) THEN
1974: IF (p_mode = 'REPLACE') THEN
1975: -- create jtf_number_table of list id and obj. ver num to pass to Delete_All_Lines
1976: l_list_header_id_tbl := jtf_number_table(l_sl_header_rec.shp_list_id);
1977: l_obj_ver_num_tbl := jtf_number_table(l_sl_header_rec.object_version_number);
1985: x_msg_data => x_msg_data,
1986: p_shop_list_ids => l_list_header_id_tbl,
1987: p_obj_ver_numbers => l_obj_ver_num_tbl);
1988:
1989: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1990: RAISE FND_API.G_EXC_ERROR;
1991: END IF;
1992: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1993: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1986: p_shop_list_ids => l_list_header_id_tbl,
1987: p_obj_ver_numbers => l_obj_ver_num_tbl);
1988:
1989: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1990: RAISE FND_API.G_EXC_ERROR;
1991: END IF;
1992: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1993: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1994: END IF;
1988:
1989: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1990: RAISE FND_API.G_EXC_ERROR;
1991: END IF;
1992: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1993: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1994: END IF;
1995:
1996: -- Delete_All_Lines updates object_version_number of shopping list
1989: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1990: RAISE FND_API.G_EXC_ERROR;
1991: END IF;
1992: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1993: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1994: END IF;
1995:
1996: -- Delete_All_Lines updates object_version_number of shopping list
1997: -- header, therefore IF we pass p_object_version_number IN save THEN
1995:
1996: -- Delete_All_Lines updates object_version_number of shopping list
1997: -- header, therefore IF we pass p_object_version_number IN save THEN
1998: -- it will fail as it has been incremented by one. Set it to
1999: -- FND_API.G_MISS_NUM so that save() will not fail.
2000: l_sl_header_rec.object_version_number := FND_API.G_MISS_NUM;
2001: END IF;
2002: END IF;
2003:
1996: -- Delete_All_Lines updates object_version_number of shopping list
1997: -- header, therefore IF we pass p_object_version_number IN save THEN
1998: -- it will fail as it has been incremented by one. Set it to
1999: -- FND_API.G_MISS_NUM so that save() will not fail.
2000: l_sl_header_rec.object_version_number := FND_API.G_MISS_NUM;
2001: END IF;
2002: END IF;
2003:
2004: --commented by makulkar
2002: END IF;
2003:
2004: --commented by makulkar
2005: /*
2006: SELECT DECODE(l_sl_header_rec.attribute_category, FND_API.G_MISS_CHAR, attribute_category, l_sl_header_rec.attribute_CATEGORY),
2007: DECODE(l_sl_header_rec.attribute1, FND_API.G_MISS_CHAR, attribute1, l_sl_header_rec.attribute1),
2008: DECODE(l_sl_header_rec.attribute2, FND_API.G_MISS_CHAR, attribute2, l_sl_header_rec.attribute2),
2009: DECODE(l_sl_header_rec.attribute3, FND_API.G_MISS_CHAR, attribute3, l_sl_header_rec.attribute3),
2010: DECODE(l_sl_header_rec.attribute4, FND_API.G_MISS_CHAR, attribute4, l_sl_header_rec.attribute4),
2003:
2004: --commented by makulkar
2005: /*
2006: SELECT DECODE(l_sl_header_rec.attribute_category, FND_API.G_MISS_CHAR, attribute_category, l_sl_header_rec.attribute_CATEGORY),
2007: DECODE(l_sl_header_rec.attribute1, FND_API.G_MISS_CHAR, attribute1, l_sl_header_rec.attribute1),
2008: DECODE(l_sl_header_rec.attribute2, FND_API.G_MISS_CHAR, attribute2, l_sl_header_rec.attribute2),
2009: DECODE(l_sl_header_rec.attribute3, FND_API.G_MISS_CHAR, attribute3, l_sl_header_rec.attribute3),
2010: DECODE(l_sl_header_rec.attribute4, FND_API.G_MISS_CHAR, attribute4, l_sl_header_rec.attribute4),
2011: DECODE(l_sl_header_rec.attribute5, FND_API.G_MISS_CHAR, attribute5, l_sl_header_rec.attribute5),
2004: --commented by makulkar
2005: /*
2006: SELECT DECODE(l_sl_header_rec.attribute_category, FND_API.G_MISS_CHAR, attribute_category, l_sl_header_rec.attribute_CATEGORY),
2007: DECODE(l_sl_header_rec.attribute1, FND_API.G_MISS_CHAR, attribute1, l_sl_header_rec.attribute1),
2008: DECODE(l_sl_header_rec.attribute2, FND_API.G_MISS_CHAR, attribute2, l_sl_header_rec.attribute2),
2009: DECODE(l_sl_header_rec.attribute3, FND_API.G_MISS_CHAR, attribute3, l_sl_header_rec.attribute3),
2010: DECODE(l_sl_header_rec.attribute4, FND_API.G_MISS_CHAR, attribute4, l_sl_header_rec.attribute4),
2011: DECODE(l_sl_header_rec.attribute5, FND_API.G_MISS_CHAR, attribute5, l_sl_header_rec.attribute5),
2012: DECODE(l_sl_header_rec.attribute6, FND_API.G_MISS_CHAR, attribute6, l_sl_header_rec.attribute6),
2005: /*
2006: SELECT DECODE(l_sl_header_rec.attribute_category, FND_API.G_MISS_CHAR, attribute_category, l_sl_header_rec.attribute_CATEGORY),
2007: DECODE(l_sl_header_rec.attribute1, FND_API.G_MISS_CHAR, attribute1, l_sl_header_rec.attribute1),
2008: DECODE(l_sl_header_rec.attribute2, FND_API.G_MISS_CHAR, attribute2, l_sl_header_rec.attribute2),
2009: DECODE(l_sl_header_rec.attribute3, FND_API.G_MISS_CHAR, attribute3, l_sl_header_rec.attribute3),
2010: DECODE(l_sl_header_rec.attribute4, FND_API.G_MISS_CHAR, attribute4, l_sl_header_rec.attribute4),
2011: DECODE(l_sl_header_rec.attribute5, FND_API.G_MISS_CHAR, attribute5, l_sl_header_rec.attribute5),
2012: DECODE(l_sl_header_rec.attribute6, FND_API.G_MISS_CHAR, attribute6, l_sl_header_rec.attribute6),
2013: DECODE(l_sl_header_rec.attribute7, FND_API.G_MISS_CHAR, attribute7, l_sl_header_rec.attribute7),
2006: SELECT DECODE(l_sl_header_rec.attribute_category, FND_API.G_MISS_CHAR, attribute_category, l_sl_header_rec.attribute_CATEGORY),
2007: DECODE(l_sl_header_rec.attribute1, FND_API.G_MISS_CHAR, attribute1, l_sl_header_rec.attribute1),
2008: DECODE(l_sl_header_rec.attribute2, FND_API.G_MISS_CHAR, attribute2, l_sl_header_rec.attribute2),
2009: DECODE(l_sl_header_rec.attribute3, FND_API.G_MISS_CHAR, attribute3, l_sl_header_rec.attribute3),
2010: DECODE(l_sl_header_rec.attribute4, FND_API.G_MISS_CHAR, attribute4, l_sl_header_rec.attribute4),
2011: DECODE(l_sl_header_rec.attribute5, FND_API.G_MISS_CHAR, attribute5, l_sl_header_rec.attribute5),
2012: DECODE(l_sl_header_rec.attribute6, FND_API.G_MISS_CHAR, attribute6, l_sl_header_rec.attribute6),
2013: DECODE(l_sl_header_rec.attribute7, FND_API.G_MISS_CHAR, attribute7, l_sl_header_rec.attribute7),
2014: DECODE(l_sl_header_rec.attribute8, FND_API.G_MISS_CHAR, attribute8, l_sl_header_rec.attribute8),
2007: DECODE(l_sl_header_rec.attribute1, FND_API.G_MISS_CHAR, attribute1, l_sl_header_rec.attribute1),
2008: DECODE(l_sl_header_rec.attribute2, FND_API.G_MISS_CHAR, attribute2, l_sl_header_rec.attribute2),
2009: DECODE(l_sl_header_rec.attribute3, FND_API.G_MISS_CHAR, attribute3, l_sl_header_rec.attribute3),
2010: DECODE(l_sl_header_rec.attribute4, FND_API.G_MISS_CHAR, attribute4, l_sl_header_rec.attribute4),
2011: DECODE(l_sl_header_rec.attribute5, FND_API.G_MISS_CHAR, attribute5, l_sl_header_rec.attribute5),
2012: DECODE(l_sl_header_rec.attribute6, FND_API.G_MISS_CHAR, attribute6, l_sl_header_rec.attribute6),
2013: DECODE(l_sl_header_rec.attribute7, FND_API.G_MISS_CHAR, attribute7, l_sl_header_rec.attribute7),
2014: DECODE(l_sl_header_rec.attribute8, FND_API.G_MISS_CHAR, attribute8, l_sl_header_rec.attribute8),
2015: DECODE(l_sl_header_rec.attribute9, FND_API.G_MISS_CHAR, attribute9, l_sl_header_rec.attribute9),
2008: DECODE(l_sl_header_rec.attribute2, FND_API.G_MISS_CHAR, attribute2, l_sl_header_rec.attribute2),
2009: DECODE(l_sl_header_rec.attribute3, FND_API.G_MISS_CHAR, attribute3, l_sl_header_rec.attribute3),
2010: DECODE(l_sl_header_rec.attribute4, FND_API.G_MISS_CHAR, attribute4, l_sl_header_rec.attribute4),
2011: DECODE(l_sl_header_rec.attribute5, FND_API.G_MISS_CHAR, attribute5, l_sl_header_rec.attribute5),
2012: DECODE(l_sl_header_rec.attribute6, FND_API.G_MISS_CHAR, attribute6, l_sl_header_rec.attribute6),
2013: DECODE(l_sl_header_rec.attribute7, FND_API.G_MISS_CHAR, attribute7, l_sl_header_rec.attribute7),
2014: DECODE(l_sl_header_rec.attribute8, FND_API.G_MISS_CHAR, attribute8, l_sl_header_rec.attribute8),
2015: DECODE(l_sl_header_rec.attribute9, FND_API.G_MISS_CHAR, attribute9, l_sl_header_rec.attribute9),
2016: DECODE(l_sl_header_rec.attribute10, FND_API.G_MISS_CHAR, attribute10, l_sl_header_rec.attribute10),
2009: DECODE(l_sl_header_rec.attribute3, FND_API.G_MISS_CHAR, attribute3, l_sl_header_rec.attribute3),
2010: DECODE(l_sl_header_rec.attribute4, FND_API.G_MISS_CHAR, attribute4, l_sl_header_rec.attribute4),
2011: DECODE(l_sl_header_rec.attribute5, FND_API.G_MISS_CHAR, attribute5, l_sl_header_rec.attribute5),
2012: DECODE(l_sl_header_rec.attribute6, FND_API.G_MISS_CHAR, attribute6, l_sl_header_rec.attribute6),
2013: DECODE(l_sl_header_rec.attribute7, FND_API.G_MISS_CHAR, attribute7, l_sl_header_rec.attribute7),
2014: DECODE(l_sl_header_rec.attribute8, FND_API.G_MISS_CHAR, attribute8, l_sl_header_rec.attribute8),
2015: DECODE(l_sl_header_rec.attribute9, FND_API.G_MISS_CHAR, attribute9, l_sl_header_rec.attribute9),
2016: DECODE(l_sl_header_rec.attribute10, FND_API.G_MISS_CHAR, attribute10, l_sl_header_rec.attribute10),
2017: DECODE(l_sl_header_rec.attribute11, FND_API.G_MISS_CHAR, attribute11, l_sl_header_rec.attribute11),
2010: DECODE(l_sl_header_rec.attribute4, FND_API.G_MISS_CHAR, attribute4, l_sl_header_rec.attribute4),
2011: DECODE(l_sl_header_rec.attribute5, FND_API.G_MISS_CHAR, attribute5, l_sl_header_rec.attribute5),
2012: DECODE(l_sl_header_rec.attribute6, FND_API.G_MISS_CHAR, attribute6, l_sl_header_rec.attribute6),
2013: DECODE(l_sl_header_rec.attribute7, FND_API.G_MISS_CHAR, attribute7, l_sl_header_rec.attribute7),
2014: DECODE(l_sl_header_rec.attribute8, FND_API.G_MISS_CHAR, attribute8, l_sl_header_rec.attribute8),
2015: DECODE(l_sl_header_rec.attribute9, FND_API.G_MISS_CHAR, attribute9, l_sl_header_rec.attribute9),
2016: DECODE(l_sl_header_rec.attribute10, FND_API.G_MISS_CHAR, attribute10, l_sl_header_rec.attribute10),
2017: DECODE(l_sl_header_rec.attribute11, FND_API.G_MISS_CHAR, attribute11, l_sl_header_rec.attribute11),
2018: DECODE(l_sl_header_rec.attribute12, FND_API.G_MISS_CHAR, attribute12, l_sl_header_rec.attribute12),
2011: DECODE(l_sl_header_rec.attribute5, FND_API.G_MISS_CHAR, attribute5, l_sl_header_rec.attribute5),
2012: DECODE(l_sl_header_rec.attribute6, FND_API.G_MISS_CHAR, attribute6, l_sl_header_rec.attribute6),
2013: DECODE(l_sl_header_rec.attribute7, FND_API.G_MISS_CHAR, attribute7, l_sl_header_rec.attribute7),
2014: DECODE(l_sl_header_rec.attribute8, FND_API.G_MISS_CHAR, attribute8, l_sl_header_rec.attribute8),
2015: DECODE(l_sl_header_rec.attribute9, FND_API.G_MISS_CHAR, attribute9, l_sl_header_rec.attribute9),
2016: DECODE(l_sl_header_rec.attribute10, FND_API.G_MISS_CHAR, attribute10, l_sl_header_rec.attribute10),
2017: DECODE(l_sl_header_rec.attribute11, FND_API.G_MISS_CHAR, attribute11, l_sl_header_rec.attribute11),
2018: DECODE(l_sl_header_rec.attribute12, FND_API.G_MISS_CHAR, attribute12, l_sl_header_rec.attribute12),
2019: DECODE(l_sl_header_rec.attribute13, FND_API.G_MISS_CHAR, attribute13, l_sl_header_rec.attribute13),
2012: DECODE(l_sl_header_rec.attribute6, FND_API.G_MISS_CHAR, attribute6, l_sl_header_rec.attribute6),
2013: DECODE(l_sl_header_rec.attribute7, FND_API.G_MISS_CHAR, attribute7, l_sl_header_rec.attribute7),
2014: DECODE(l_sl_header_rec.attribute8, FND_API.G_MISS_CHAR, attribute8, l_sl_header_rec.attribute8),
2015: DECODE(l_sl_header_rec.attribute9, FND_API.G_MISS_CHAR, attribute9, l_sl_header_rec.attribute9),
2016: DECODE(l_sl_header_rec.attribute10, FND_API.G_MISS_CHAR, attribute10, l_sl_header_rec.attribute10),
2017: DECODE(l_sl_header_rec.attribute11, FND_API.G_MISS_CHAR, attribute11, l_sl_header_rec.attribute11),
2018: DECODE(l_sl_header_rec.attribute12, FND_API.G_MISS_CHAR, attribute12, l_sl_header_rec.attribute12),
2019: DECODE(l_sl_header_rec.attribute13, FND_API.G_MISS_CHAR, attribute13, l_sl_header_rec.attribute13),
2020: DECODE(l_sl_header_rec.attribute14, FND_API.G_MISS_CHAR, attribute14, l_sl_header_rec.attribute14),
2013: DECODE(l_sl_header_rec.attribute7, FND_API.G_MISS_CHAR, attribute7, l_sl_header_rec.attribute7),
2014: DECODE(l_sl_header_rec.attribute8, FND_API.G_MISS_CHAR, attribute8, l_sl_header_rec.attribute8),
2015: DECODE(l_sl_header_rec.attribute9, FND_API.G_MISS_CHAR, attribute9, l_sl_header_rec.attribute9),
2016: DECODE(l_sl_header_rec.attribute10, FND_API.G_MISS_CHAR, attribute10, l_sl_header_rec.attribute10),
2017: DECODE(l_sl_header_rec.attribute11, FND_API.G_MISS_CHAR, attribute11, l_sl_header_rec.attribute11),
2018: DECODE(l_sl_header_rec.attribute12, FND_API.G_MISS_CHAR, attribute12, l_sl_header_rec.attribute12),
2019: DECODE(l_sl_header_rec.attribute13, FND_API.G_MISS_CHAR, attribute13, l_sl_header_rec.attribute13),
2020: DECODE(l_sl_header_rec.attribute14, FND_API.G_MISS_CHAR, attribute14, l_sl_header_rec.attribute14),
2021: DECODE(l_sl_header_rec.attribute15, FND_API.G_MISS_CHAR, attribute15, l_sl_header_rec.attribute15)
2014: DECODE(l_sl_header_rec.attribute8, FND_API.G_MISS_CHAR, attribute8, l_sl_header_rec.attribute8),
2015: DECODE(l_sl_header_rec.attribute9, FND_API.G_MISS_CHAR, attribute9, l_sl_header_rec.attribute9),
2016: DECODE(l_sl_header_rec.attribute10, FND_API.G_MISS_CHAR, attribute10, l_sl_header_rec.attribute10),
2017: DECODE(l_sl_header_rec.attribute11, FND_API.G_MISS_CHAR, attribute11, l_sl_header_rec.attribute11),
2018: DECODE(l_sl_header_rec.attribute12, FND_API.G_MISS_CHAR, attribute12, l_sl_header_rec.attribute12),
2019: DECODE(l_sl_header_rec.attribute13, FND_API.G_MISS_CHAR, attribute13, l_sl_header_rec.attribute13),
2020: DECODE(l_sl_header_rec.attribute14, FND_API.G_MISS_CHAR, attribute14, l_sl_header_rec.attribute14),
2021: DECODE(l_sl_header_rec.attribute15, FND_API.G_MISS_CHAR, attribute15, l_sl_header_rec.attribute15)
2022: INTO l_sl_header_rec.attribute_category,
2015: DECODE(l_sl_header_rec.attribute9, FND_API.G_MISS_CHAR, attribute9, l_sl_header_rec.attribute9),
2016: DECODE(l_sl_header_rec.attribute10, FND_API.G_MISS_CHAR, attribute10, l_sl_header_rec.attribute10),
2017: DECODE(l_sl_header_rec.attribute11, FND_API.G_MISS_CHAR, attribute11, l_sl_header_rec.attribute11),
2018: DECODE(l_sl_header_rec.attribute12, FND_API.G_MISS_CHAR, attribute12, l_sl_header_rec.attribute12),
2019: DECODE(l_sl_header_rec.attribute13, FND_API.G_MISS_CHAR, attribute13, l_sl_header_rec.attribute13),
2020: DECODE(l_sl_header_rec.attribute14, FND_API.G_MISS_CHAR, attribute14, l_sl_header_rec.attribute14),
2021: DECODE(l_sl_header_rec.attribute15, FND_API.G_MISS_CHAR, attribute15, l_sl_header_rec.attribute15)
2022: INTO l_sl_header_rec.attribute_category,
2023: l_sl_header_rec.attribute1,
2016: DECODE(l_sl_header_rec.attribute10, FND_API.G_MISS_CHAR, attribute10, l_sl_header_rec.attribute10),
2017: DECODE(l_sl_header_rec.attribute11, FND_API.G_MISS_CHAR, attribute11, l_sl_header_rec.attribute11),
2018: DECODE(l_sl_header_rec.attribute12, FND_API.G_MISS_CHAR, attribute12, l_sl_header_rec.attribute12),
2019: DECODE(l_sl_header_rec.attribute13, FND_API.G_MISS_CHAR, attribute13, l_sl_header_rec.attribute13),
2020: DECODE(l_sl_header_rec.attribute14, FND_API.G_MISS_CHAR, attribute14, l_sl_header_rec.attribute14),
2021: DECODE(l_sl_header_rec.attribute15, FND_API.G_MISS_CHAR, attribute15, l_sl_header_rec.attribute15)
2022: INTO l_sl_header_rec.attribute_category,
2023: l_sl_header_rec.attribute1,
2024: l_sl_header_rec.attribute2,
2017: DECODE(l_sl_header_rec.attribute11, FND_API.G_MISS_CHAR, attribute11, l_sl_header_rec.attribute11),
2018: DECODE(l_sl_header_rec.attribute12, FND_API.G_MISS_CHAR, attribute12, l_sl_header_rec.attribute12),
2019: DECODE(l_sl_header_rec.attribute13, FND_API.G_MISS_CHAR, attribute13, l_sl_header_rec.attribute13),
2020: DECODE(l_sl_header_rec.attribute14, FND_API.G_MISS_CHAR, attribute14, l_sl_header_rec.attribute14),
2021: DECODE(l_sl_header_rec.attribute15, FND_API.G_MISS_CHAR, attribute15, l_sl_header_rec.attribute15)
2022: INTO l_sl_header_rec.attribute_category,
2023: l_sl_header_rec.attribute1,
2024: l_sl_header_rec.attribute2,
2025: l_sl_header_rec.attribute3,
2249: x_msg_count => x_msg_count ,
2250: x_msg_data => x_msg_data ,
2251: px_sl_line_tbl => l_sl_line_tbl);
2252:
2253: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2254: RAISE FND_API.G_EXC_ERROR;
2255: END IF;
2256:
2257: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2250: x_msg_data => x_msg_data ,
2251: px_sl_line_tbl => l_sl_line_tbl);
2252:
2253: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2254: RAISE FND_API.G_EXC_ERROR;
2255: END IF;
2256:
2257: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2258: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2253: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2254: RAISE FND_API.G_EXC_ERROR;
2255: END IF;
2256:
2257: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2258: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2259: END IF;
2260:
2261: BEGIN
2254: RAISE FND_API.G_EXC_ERROR;
2255: END IF;
2256:
2257: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2258: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2259: END IF;
2260:
2261: BEGIN
2262:
2277: --dbms_output.put_line('x_return_status = ' || x_return_status);
2278: --dbms_output.put_line('x_msg_count = ' || x_msg_count);
2279: --dbms_output.put_line('x_msg_data = ' || x_msg_data);
2280:
2281: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
2282: RAISE FND_API.G_EXC_ERROR;
2283: END IF;
2284: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2285: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2278: --dbms_output.put_line('x_msg_count = ' || x_msg_count);
2279: --dbms_output.put_line('x_msg_data = ' || x_msg_data);
2280:
2281: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
2282: RAISE FND_API.G_EXC_ERROR;
2283: END IF;
2284: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2285: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2286: END IF;
2280:
2281: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
2282: RAISE FND_API.G_EXC_ERROR;
2283: END IF;
2284: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2285: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2286: END IF;
2287:
2288: EXCEPTION
2281: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
2282: RAISE FND_API.G_EXC_ERROR;
2283: END IF;
2284: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2285: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2286: END IF;
2287:
2288: EXCEPTION
2289: WHEN NO_DATA_FOUND THEN
2289: WHEN NO_DATA_FOUND THEN
2290:
2291: FND_MESSAGE.set_name('IBE', 'IBE_SL_UPDATE_TO_LIST_ERROR');
2292: FND_MSG_PUB.add;
2293: RAISE FND_API.G_EXC_ERROR;
2294: END;
2295:
2296: --dbms_output.put_line('After Save...');
2297:
2300: IBE_Util.Debug('IBE_Shop_List_PVT.Save_List_From_Quote(-)');
2301: END IF;
2302:
2303: -- Standard check of p_commit.
2304: IF FND_API.To_Boolean( p_commit ) THEN
2305: COMMIT WORK;
2306: END IF;
2307:
2308: -- Standard call to get message count and IF count is 1, get message info.
2305: COMMIT WORK;
2306: END IF;
2307:
2308: -- Standard call to get message count and IF count is 1, get message info.
2309: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
2310: p_count => x_msg_count ,
2311: p_data => x_msg_data );
2312:
2313: EXCEPTION
2310: p_count => x_msg_count ,
2311: p_data => x_msg_data );
2312:
2313: EXCEPTION
2314: WHEN FND_API.G_EXC_ERROR THEN
2315: ROLLBACK TO Save_List_From_Quote_PVT;
2316: x_return_status := FND_API.G_RET_STS_ERROR;
2317: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
2318: p_count => x_msg_count,
2312:
2313: EXCEPTION
2314: WHEN FND_API.G_EXC_ERROR THEN
2315: ROLLBACK TO Save_List_From_Quote_PVT;
2316: x_return_status := FND_API.G_RET_STS_ERROR;
2317: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
2318: p_count => x_msg_count,
2319: p_data => x_msg_data);
2320: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2313: EXCEPTION
2314: WHEN FND_API.G_EXC_ERROR THEN
2315: ROLLBACK TO Save_List_From_Quote_PVT;
2316: x_return_status := FND_API.G_RET_STS_ERROR;
2317: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
2318: p_count => x_msg_count,
2319: p_data => x_msg_data);
2320: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2321: ROLLBACK TO Save_List_From_Quote_PVT;
2316: x_return_status := FND_API.G_RET_STS_ERROR;
2317: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
2318: p_count => x_msg_count,
2319: p_data => x_msg_data);
2320: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2321: ROLLBACK TO Save_List_From_Quote_PVT;
2322: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2323: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
2324: p_count => x_msg_count,
2318: p_count => x_msg_count,
2319: p_data => x_msg_data);
2320: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2321: ROLLBACK TO Save_List_From_Quote_PVT;
2322: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2323: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
2324: p_count => x_msg_count,
2325: p_data => x_msg_data);
2326: WHEN OTHERS THEN
2319: p_data => x_msg_data);
2320: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2321: ROLLBACK TO Save_List_From_Quote_PVT;
2322: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2323: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
2324: p_count => x_msg_count,
2325: p_data => x_msg_data);
2326: WHEN OTHERS THEN
2327: ROLLBACK TO Save_List_From_Quote_PVT;
2324: p_count => x_msg_count,
2325: p_data => x_msg_data);
2326: WHEN OTHERS THEN
2327: ROLLBACK TO Save_List_From_Quote_PVT;
2328: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2329:
2330: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2331: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
2332: l_api_name);
2331: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
2332: l_api_name);
2333: END IF;
2334:
2335: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
2336: p_count => x_msg_count,
2337: p_data => x_msg_data);
2338: END Save_List_From_Quote;
2339:
2341: p_list_line_id_tbl IN jtf_number_table ,
2342: p_quote_header_id IN NUMBER ,
2343: p_price_list_id IN NUMBER ,
2344: p_currency_code IN VARCHAR2 ,
2345: p_combine_same_item IN VARCHAR2 := FND_API.G_MISS_CHAR ,
2346: p_minisite_id IN NUMBER := FND_API.G_MISS_CHAR ,
2347: x_qte_line_tbl OUT NOCOPY ASO_Quote_Pub.Qte_Line_Tbl_Type ,
2348: x_qte_line_detail_tbl OUT NOCOPY ASO_Quote_Pub.Qte_Line_Dtl_Tbl_Type,
2349: x_list_line_id_map_tbl OUT NOCOPY jtf_number_table ,
2342: p_quote_header_id IN NUMBER ,
2343: p_price_list_id IN NUMBER ,
2344: p_currency_code IN VARCHAR2 ,
2345: p_combine_same_item IN VARCHAR2 := FND_API.G_MISS_CHAR ,
2346: p_minisite_id IN NUMBER := FND_API.G_MISS_CHAR ,
2347: x_qte_line_tbl OUT NOCOPY ASO_Quote_Pub.Qte_Line_Tbl_Type ,
2348: x_qte_line_detail_tbl OUT NOCOPY ASO_Quote_Pub.Qte_Line_Dtl_Tbl_Type,
2349: x_list_line_id_map_tbl OUT NOCOPY jtf_number_table ,
2350: x_qte_line_index_tbl OUT NOCOPY jtf_number_table ,
2669:
2670:
2671: PROCEDURE Save_Quote_From_List_Items(
2672: p_api_version IN NUMBER := 1 ,
2673: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
2674: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
2675: x_return_status OUT NOCOPY VARCHAR2 ,
2676: x_msg_count OUT NOCOPY NUMBER ,
2677: x_msg_data OUT NOCOPY VARCHAR2 ,
2670:
2671: PROCEDURE Save_Quote_From_List_Items(
2672: p_api_version IN NUMBER := 1 ,
2673: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
2674: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
2675: x_return_status OUT NOCOPY VARCHAR2 ,
2676: x_msg_count OUT NOCOPY NUMBER ,
2677: x_msg_data OUT NOCOPY VARCHAR2 ,
2678: p_sl_line_ids IN jtf_number_table ,
2676: x_msg_count OUT NOCOPY NUMBER ,
2677: x_msg_data OUT NOCOPY VARCHAR2 ,
2678: p_sl_line_ids IN jtf_number_table ,
2679: p_sl_line_ovns IN jtf_number_table := NULL ,
2680: p_quote_retrieval_number IN NUMBER := FND_API.G_MISS_NUM ,
2681: p_recipient_party_id IN NUMBER := FND_API.G_MISS_NUM ,
2682: p_recipient_cust_account_id IN NUMBER := FND_API.G_MISS_NUM ,
2683: p_minisite_id IN NUMBER := FND_API.G_MISS_NUM ,
2684: p_mode IN VARCHAR2 := 'MERGE' ,
2677: x_msg_data OUT NOCOPY VARCHAR2 ,
2678: p_sl_line_ids IN jtf_number_table ,
2679: p_sl_line_ovns IN jtf_number_table := NULL ,
2680: p_quote_retrieval_number IN NUMBER := FND_API.G_MISS_NUM ,
2681: p_recipient_party_id IN NUMBER := FND_API.G_MISS_NUM ,
2682: p_recipient_cust_account_id IN NUMBER := FND_API.G_MISS_NUM ,
2683: p_minisite_id IN NUMBER := FND_API.G_MISS_NUM ,
2684: p_mode IN VARCHAR2 := 'MERGE' ,
2685: p_combine_same_item IN VARCHAR2 := FND_API.G_MISS_CHAR ,
2678: p_sl_line_ids IN jtf_number_table ,
2679: p_sl_line_ovns IN jtf_number_table := NULL ,
2680: p_quote_retrieval_number IN NUMBER := FND_API.G_MISS_NUM ,
2681: p_recipient_party_id IN NUMBER := FND_API.G_MISS_NUM ,
2682: p_recipient_cust_account_id IN NUMBER := FND_API.G_MISS_NUM ,
2683: p_minisite_id IN NUMBER := FND_API.G_MISS_NUM ,
2684: p_mode IN VARCHAR2 := 'MERGE' ,
2685: p_combine_same_item IN VARCHAR2 := FND_API.G_MISS_CHAR ,
2686: p_control_rec IN ASO_Quote_Pub.control_rec_type ,
2679: p_sl_line_ovns IN jtf_number_table := NULL ,
2680: p_quote_retrieval_number IN NUMBER := FND_API.G_MISS_NUM ,
2681: p_recipient_party_id IN NUMBER := FND_API.G_MISS_NUM ,
2682: p_recipient_cust_account_id IN NUMBER := FND_API.G_MISS_NUM ,
2683: p_minisite_id IN NUMBER := FND_API.G_MISS_NUM ,
2684: p_mode IN VARCHAR2 := 'MERGE' ,
2685: p_combine_same_item IN VARCHAR2 := FND_API.G_MISS_CHAR ,
2686: p_control_rec IN ASO_Quote_Pub.control_rec_type ,
2687: p_q_header_rec IN ASO_Quote_Pub.qte_header_rec_type,
2681: p_recipient_party_id IN NUMBER := FND_API.G_MISS_NUM ,
2682: p_recipient_cust_account_id IN NUMBER := FND_API.G_MISS_NUM ,
2683: p_minisite_id IN NUMBER := FND_API.G_MISS_NUM ,
2684: p_mode IN VARCHAR2 := 'MERGE' ,
2685: p_combine_same_item IN VARCHAR2 := FND_API.G_MISS_CHAR ,
2686: p_control_rec IN ASO_Quote_Pub.control_rec_type ,
2687: p_q_header_rec IN ASO_Quote_Pub.qte_header_rec_type,
2688: p_password IN VARCHAR2 := FND_API.G_MISS_CHAR ,
2689: p_email_address IN jtf_varchar2_table_2000 := NULL ,
2684: p_mode IN VARCHAR2 := 'MERGE' ,
2685: p_combine_same_item IN VARCHAR2 := FND_API.G_MISS_CHAR ,
2686: p_control_rec IN ASO_Quote_Pub.control_rec_type ,
2687: p_q_header_rec IN ASO_Quote_Pub.qte_header_rec_type,
2688: p_password IN VARCHAR2 := FND_API.G_MISS_CHAR ,
2689: p_email_address IN jtf_varchar2_table_2000 := NULL ,
2690: p_privilege_type IN jtf_varchar2_table_100 := NULL ,
2691: p_url IN VARCHAR2 ,
2692: p_comments IN VARCHAR2 ,
2689: p_email_address IN jtf_varchar2_table_2000 := NULL ,
2690: p_privilege_type IN jtf_varchar2_table_100 := NULL ,
2691: p_url IN VARCHAR2 ,
2692: p_comments IN VARCHAR2 ,
2693: p_promocode IN VARCHAR2 := FND_API.G_MISS_CHAR ,
2694: x_q_header_id OUT NOCOPY NUMBER
2695: )
2696: IS
2697: L_API_NAME CONSTANT VARCHAR2(30) := 'Save_Quote_From_List_Items';
2738: -- Standard Start of API savepoint
2739: SAVEPOINT Save_Quote_From_List_Items_PVT;
2740:
2741: -- Standard call to check for call compatibility.
2742: IF NOT FND_API.Compatible_API_Call( L_API_VERSION,
2743: p_api_version,
2744: L_API_NAME,
2745: G_PKG_NAME )
2746: THEN
2743: p_api_version,
2744: L_API_NAME,
2745: G_PKG_NAME )
2746: THEN
2747: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2748: END IF;
2749:
2750: -- Initialize message list IF p_init_msg_list is set to TRUE.
2751: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2747: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2748: END IF;
2749:
2750: -- Initialize message list IF p_init_msg_list is set to TRUE.
2751: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2752: FND_MSG_PUB.initialize;
2753: END IF;
2754:
2755: -- Initialize API return status to success
2752: FND_MSG_PUB.initialize;
2753: END IF;
2754:
2755: -- Initialize API return status to success
2756: x_return_status := FND_API.G_RET_STS_SUCCESS;
2757:
2758: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2759: IBE_Util.Debug('IBE_Shop_List_PVT.Save_Quote_From_List_Items(+)');
2760: END IF;
2764: -- IF p_q_header_rec.quote_header_id is not null, i.e. mode will be either 'ADDTO' or 'REPLACE'.
2765: -- IN this case we just take leave header information as it is, but IF p_q_header_rec.quote_header_id
2766: -- is null, we create new line for quote header.
2767:
2768: IF (p_q_header_rec.quote_header_id <> FND_API.G_MISS_NUM) THEN
2769: IF (p_mode = 'REPLACE') THEN
2770: --dbms_output.put_line('calling IBE_Shop_List_PVT.DeleteAllLines()..');
2771: IBE_Quote_Save_pvt.DeleteAllLines(
2772: p_api_version_number => p_api_version,
2769: IF (p_mode = 'REPLACE') THEN
2770: --dbms_output.put_line('calling IBE_Shop_List_PVT.DeleteAllLines()..');
2771: IBE_Quote_Save_pvt.DeleteAllLines(
2772: p_api_version_number => p_api_version,
2773: p_init_msg_list => FND_API.G_TRUE,
2774: p_commit => FND_API.G_FALSE,
2775: x_return_status => x_return_status,
2776: x_msg_count => x_msg_count,
2777: x_msg_data => x_msg_data,
2770: --dbms_output.put_line('calling IBE_Shop_List_PVT.DeleteAllLines()..');
2771: IBE_Quote_Save_pvt.DeleteAllLines(
2772: p_api_version_number => p_api_version,
2773: p_init_msg_list => FND_API.G_TRUE,
2774: p_commit => FND_API.G_FALSE,
2775: x_return_status => x_return_status,
2776: x_msg_count => x_msg_count,
2777: x_msg_data => x_msg_data,
2778: p_quote_header_id => p_q_header_rec.quote_header_id,
2786: --dbms_output.put_line('x_msg_count = ' || x_msg_count);
2787: --dbms_output.put_line('x_msg_data = ' || x_msg_data);
2788: /*
2789: FOR I IN 1..x_msg_count LOOP
2790: --dbms_OUTPUT.Put_Line(FND_MSG_PUB.Get(p_encoded => FND_API.g_false));
2791: END LOOP;
2792: */
2793: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
2794: RAISE FND_API.G_EXC_ERROR;
2789: FOR I IN 1..x_msg_count LOOP
2790: --dbms_OUTPUT.Put_Line(FND_MSG_PUB.Get(p_encoded => FND_API.g_false));
2791: END LOOP;
2792: */
2793: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
2794: RAISE FND_API.G_EXC_ERROR;
2795: END IF;
2796:
2797: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2790: --dbms_OUTPUT.Put_Line(FND_MSG_PUB.Get(p_encoded => FND_API.g_false));
2791: END LOOP;
2792: */
2793: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
2794: RAISE FND_API.G_EXC_ERROR;
2795: END IF;
2796:
2797: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2798: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2793: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
2794: RAISE FND_API.G_EXC_ERROR;
2795: END IF;
2796:
2797: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2798: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2799: END IF;
2800: END IF;
2801: END IF;
2794: RAISE FND_API.G_EXC_ERROR;
2795: END IF;
2796:
2797: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2798: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2799: END IF;
2800: END IF;
2801: END IF;
2802:
2818: */
2819:
2820: /* commented out on 5/21/03: SBM
2821: Include_Related_Lines(
2822: p_qte_line_rel_tbl => FND_API.G_TRUE ,
2823: p_list_line_id_tbl => p_sl_line_ids ,
2824: x_list_line_id_tbl => l_list_line_id_tbl,
2825: x_qte_line_relation_tbl => l_qte_line_relation_tbl,
2826: x_list_line_relation_tbl => l_list_line_relation_tbl);
2870: x_msg_count => x_msg_count ,
2871: x_msg_data => x_msg_data ,
2872: px_qte_line_dtl_tbl => l_qte_line_detail_tbl);
2873:
2874: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
2875: RAISE FND_API.G_EXC_ERROR;
2876: END IF;
2877:
2878: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2871: x_msg_data => x_msg_data ,
2872: px_qte_line_dtl_tbl => l_qte_line_detail_tbl);
2873:
2874: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
2875: RAISE FND_API.G_EXC_ERROR;
2876: END IF;
2877:
2878: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2879: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2874: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
2875: RAISE FND_API.G_EXC_ERROR;
2876: END IF;
2877:
2878: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2879: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2880: END IF;
2881:
2882: -- added on 5/21/03: SBM
2875: RAISE FND_API.G_EXC_ERROR;
2876: END IF;
2877:
2878: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2879: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2880: END IF;
2881:
2882: -- added on 5/21/03: SBM
2883: -- if the lx_contMDL = Y, then there must be at least a MDL in the shop list
2890: l_control_rec := aso_quote_pub.G_MISS_Control_Rec;
2891: end if;
2892:
2893: --Maithili
2894: IF (p_promocode is not null and p_promocode <> FND_API.G_MISS_CHAR) THEN
2895: -- set header pricing attribute record with promo code and other stuff.
2896: OPEN c_get_promo_details(p_promocode,p_q_header_rec.currency_code);
2897: FETCH c_get_promo_details INTO l_pricing_attribute1;
2898: CLOSE c_get_promo_details;
2912: END IF; --p_promocode not null
2913:
2914: IBE_Quote_Save_pvt.AddItemsToCart(
2915: p_api_version_number => p_api_version,
2916: p_init_msg_list => FND_API.G_TRUE,
2917: p_commit => FND_API.G_FALSE,
2918: x_return_status => x_return_status,
2919: x_msg_count => x_msg_count,
2920: x_msg_data => x_msg_data,
2913:
2914: IBE_Quote_Save_pvt.AddItemsToCart(
2915: p_api_version_number => p_api_version,
2916: p_init_msg_list => FND_API.G_TRUE,
2917: p_commit => FND_API.G_FALSE,
2918: x_return_status => x_return_status,
2919: x_msg_count => x_msg_count,
2920: x_msg_data => x_msg_data,
2921: p_combineSameItem => p_combine_same_item,
2933: x_quote_header_id => lx_quote_header_id,
2934: x_last_update_date => lx_last_update_date,
2935: x_Qte_Line_Tbl => lx_Qte_Line_Tbl);
2936:
2937: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
2938: RAISE FND_API.G_EXC_ERROR;
2939: END IF;
2940:
2941: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2934: x_last_update_date => lx_last_update_date,
2935: x_Qte_Line_Tbl => lx_Qte_Line_Tbl);
2936:
2937: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
2938: RAISE FND_API.G_EXC_ERROR;
2939: END IF;
2940:
2941: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2942: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2937: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
2938: RAISE FND_API.G_EXC_ERROR;
2939: END IF;
2940:
2941: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2942: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2943: END IF;
2944:
2945: --dbms_output.put_line('After Save() .. lx_quote_header_id = ' || lx_quote_header_id);
2938: RAISE FND_API.G_EXC_ERROR;
2939: END IF;
2940:
2941: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2942: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2943: END IF;
2944:
2945: --dbms_output.put_line('After Save() .. lx_quote_header_id = ' || lx_quote_header_id);
2946:
2988: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2989: IBE_Util.Debug('End ASO_CFG_PUB.get_config_details');
2990: END IF;
2991:
2992: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2993: RAISE FND_API.G_EXC_ERROR;
2994: END IF;
2995:
2996: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2989: IBE_Util.Debug('End ASO_CFG_PUB.get_config_details');
2990: END IF;
2991:
2992: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2993: RAISE FND_API.G_EXC_ERROR;
2994: END IF;
2995:
2996: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2997: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2992: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2993: RAISE FND_API.G_EXC_ERROR;
2994: END IF;
2995:
2996: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2997: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2998: END IF;
2999:
3000: end if;
2993: RAISE FND_API.G_EXC_ERROR;
2994: END IF;
2995:
2996: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2997: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2998: END IF;
2999:
3000: end if;
3001:
3005: IF (p_email_address IS NOT NULL) THEN
3006: --dbms_output.put_line('Calling IBE_QUOTE_SAVESHARE_pvt.ShareQuote()...');
3007: IBE_QUOTE_SAVESHARE_pvt.ShareQuote(
3008: p_api_version_number => p_api_version,
3009: p_init_msg_list => FND_API.G_FALSE,
3010: p_commit => FND_API.G_FALSE,
3011: x_return_status => x_return_status,
3012: x_msg_count => x_msg_count,
3013: x_msg_data => x_msg_data,
3006: --dbms_output.put_line('Calling IBE_QUOTE_SAVESHARE_pvt.ShareQuote()...');
3007: IBE_QUOTE_SAVESHARE_pvt.ShareQuote(
3008: p_api_version_number => p_api_version,
3009: p_init_msg_list => FND_API.G_FALSE,
3010: p_commit => FND_API.G_FALSE,
3011: x_return_status => x_return_status,
3012: x_msg_count => x_msg_count,
3013: x_msg_data => x_msg_data,
3014: p_quote_header_id => lx_quote_header_id,
3016: p_sharee_email_address => p_email_address,
3017: p_sharee_privilege_type => p_privilege_type,
3018: p_comments => p_comments);
3019:
3020: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
3021: RAISE FND_API.G_EXC_ERROR;
3022: END IF;
3023: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
3024: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3017: p_sharee_privilege_type => p_privilege_type,
3018: p_comments => p_comments);
3019:
3020: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
3021: RAISE FND_API.G_EXC_ERROR;
3022: END IF;
3023: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
3024: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3025: END IF;
3019:
3020: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
3021: RAISE FND_API.G_EXC_ERROR;
3022: END IF;
3023: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
3024: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3025: END IF;
3026: END IF;
3027:
3020: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
3021: RAISE FND_API.G_EXC_ERROR;
3022: END IF;
3023: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
3024: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3025: END IF;
3026: END IF;
3027:
3028: x_q_header_id := lx_quote_header_id;
3031: IBE_Util.Debug('IBE_Shop_List_PVT.Save_Quote_From_List_Items(-)');
3032: END IF;
3033:
3034: -- Standard check of p_commit.
3035: IF FND_API.To_Boolean( p_commit ) THEN
3036: COMMIT WORK;
3037: END IF;
3038:
3039: -- Standard call to get message count and IF count is 1, get message info.
3036: COMMIT WORK;
3037: END IF;
3038:
3039: -- Standard call to get message count and IF count is 1, get message info.
3040: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
3041: p_count => x_msg_count ,
3042: p_data => x_msg_data );
3043:
3044: EXCEPTION
3041: p_count => x_msg_count ,
3042: p_data => x_msg_data );
3043:
3044: EXCEPTION
3045: WHEN FND_API.G_EXC_ERROR THEN
3046: ROLLBACK TO Save_Quote_From_List_Items_PVT;
3047: x_return_status := FND_API.G_RET_STS_ERROR;
3048: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
3049: p_count => x_msg_count,
3043:
3044: EXCEPTION
3045: WHEN FND_API.G_EXC_ERROR THEN
3046: ROLLBACK TO Save_Quote_From_List_Items_PVT;
3047: x_return_status := FND_API.G_RET_STS_ERROR;
3048: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
3049: p_count => x_msg_count,
3050: p_data => x_msg_data);
3051: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3044: EXCEPTION
3045: WHEN FND_API.G_EXC_ERROR THEN
3046: ROLLBACK TO Save_Quote_From_List_Items_PVT;
3047: x_return_status := FND_API.G_RET_STS_ERROR;
3048: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
3049: p_count => x_msg_count,
3050: p_data => x_msg_data);
3051: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3052: ROLLBACK TO Save_Quote_From_List_Items_PVT;
3047: x_return_status := FND_API.G_RET_STS_ERROR;
3048: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
3049: p_count => x_msg_count,
3050: p_data => x_msg_data);
3051: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3052: ROLLBACK TO Save_Quote_From_List_Items_PVT;
3053: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3054: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
3055: p_count => x_msg_count,
3049: p_count => x_msg_count,
3050: p_data => x_msg_data);
3051: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3052: ROLLBACK TO Save_Quote_From_List_Items_PVT;
3053: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3054: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
3055: p_count => x_msg_count,
3056: p_data => x_msg_data);
3057: WHEN OTHERS THEN
3050: p_data => x_msg_data);
3051: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3052: ROLLBACK TO Save_Quote_From_List_Items_PVT;
3053: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3054: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
3055: p_count => x_msg_count,
3056: p_data => x_msg_data);
3057: WHEN OTHERS THEN
3058: ROLLBACK TO Save_Quote_From_List_Items_PVT;
3055: p_count => x_msg_count,
3056: p_data => x_msg_data);
3057: WHEN OTHERS THEN
3058: ROLLBACK TO Save_Quote_From_List_Items_PVT;
3059: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3060:
3061: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3062: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
3063: l_api_name);
3062: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
3063: l_api_name);
3064: END IF;
3065:
3066: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
3067: p_count => x_msg_count,
3068: p_data => x_msg_data);
3069: END Save_Quote_From_List_Items;
3070: