184: g_pkg_name CONSTANT VARCHAR2(30):= 'OZF_Offer_Pvt';
185: g_file_name CONSTANT VARCHAR2(15) := 'ozfvofrb.pls';
186: g_sd_offer VARCHAR2(15) := 'N';
187:
188: OZF_DEBUG_HIGH_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
189: OZF_DEBUG_LOW_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
190: OZF_DEBUG_MEDIUM_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
191:
192:
185: g_file_name CONSTANT VARCHAR2(15) := 'ozfvofrb.pls';
186: g_sd_offer VARCHAR2(15) := 'N';
187:
188: OZF_DEBUG_HIGH_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
189: OZF_DEBUG_LOW_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
190: OZF_DEBUG_MEDIUM_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
191:
192:
193: PROCEDURE debug_message(p_message IN VARCHAR2)
186: g_sd_offer VARCHAR2(15) := 'N';
187:
188: OZF_DEBUG_HIGH_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
189: OZF_DEBUG_LOW_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
190: OZF_DEBUG_MEDIUM_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
191:
192:
193: PROCEDURE debug_message(p_message IN VARCHAR2)
194: IS
462: l_msg_data := Oe_Msg_Pub.get( p_msg_index => i,
463: p_encoded => 'F' );
464: Fnd_Message.SET_NAME('OZF','OZF_QP_ERROR');
465: Fnd_Message.SET_TOKEN('ERROR_MSG',l_msg_data);
466: Fnd_Msg_Pub.ADD;
467: END LOOP;
468: END add_message;
469:
470: FUNCTION find_territories( aso_party_id IN NUMBER,oe_sold_to_org IN NUMBER)
564:
565: SAVEPOINT process_adv_options;
566:
567: IF Fnd_Api.to_boolean(p_init_msg_list) THEN
568: Fnd_Msg_Pub.initialize;
569: END IF;
570:
571: IF NOT Fnd_Api.compatible_api_call
572: (
668: p_offers_rec => l_promotional_offers_rec,
669: x_object_version_number => l_object_version_number
670: );
671:
672: Fnd_Msg_Pub.Count_AND_Get
673: ( p_count => x_msg_count,
674: p_data => x_msg_data,
675: p_encoded => Fnd_Api.G_FALSE
676: );
681: EXCEPTION
682: WHEN Fnd_Api.G_EXC_ERROR THEN
683: x_return_status := Fnd_Api.g_ret_sts_error ;
684: ROLLBACK TO process_adv_options;
685: Fnd_Msg_Pub.Count_AND_Get
686: ( p_count => x_msg_count,
687: p_data => x_msg_data,
688: p_encoded => Fnd_Api.G_FALSE
689: );
689: );
690: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
691: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
692: ROLLBACK TO process_adv_options;
693: Fnd_Msg_Pub.Count_AND_Get
694: ( p_count => x_msg_count,
695: p_data => x_msg_data,
696: p_encoded => Fnd_Api.G_FALSE
697: );
697: );
698: WHEN OTHERS THEN
699: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
700: ROLLBACK TO process_adv_options;
701: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
702: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
703: END IF;
704: Fnd_Msg_Pub.Count_AND_Get
705: ( p_count => x_msg_count,
698: WHEN OTHERS THEN
699: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
700: ROLLBACK TO process_adv_options;
701: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
702: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
703: END IF;
704: Fnd_Msg_Pub.Count_AND_Get
705: ( p_count => x_msg_count,
706: p_data => x_msg_data,
700: ROLLBACK TO process_adv_options;
701: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
702: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
703: END IF;
704: Fnd_Msg_Pub.Count_AND_Get
705: ( p_count => x_msg_count,
706: p_data => x_msg_data,
707: p_encoded => Fnd_Api.G_FALSE
708: );
780:
781: SAVEPOINT create_offer_tiers;
782:
783: IF Fnd_Api.to_boolean(p_init_msg_list) THEN
784: Fnd_Msg_Pub.initialize;
785: END IF;
786:
787: IF NOT Fnd_Api.compatible_api_call
788: (
922:
923: -- x_modifiers_tbl := v_modifiers_tbl;
924: -- x_pricing_attr_tbl := v_pricing_attr_tbl;
925:
926: Fnd_Msg_Pub.Count_AND_Get
927: ( p_count => x_msg_count,
928: p_data => x_msg_data,
929: p_encoded => Fnd_Api.G_FALSE
930: );
935: EXCEPTION
936: WHEN Fnd_Api.G_EXC_ERROR THEN
937: x_return_status := Fnd_Api.g_ret_sts_error ;
938: ROLLBACK TO create_offer_tiers;
939: Fnd_Msg_Pub.Count_AND_Get
940: ( p_count => x_msg_count,
941: p_data => x_msg_data,
942: p_encoded => Fnd_Api.G_FALSE
943: );
943: );
944: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
945: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
946: ROLLBACK TO create_offer_tiers;
947: Fnd_Msg_Pub.Count_AND_Get
948: ( p_count => x_msg_count,
949: p_data => x_msg_data,
950: p_encoded => Fnd_Api.G_FALSE
951: );
951: );
952: WHEN OTHERS THEN
953: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
954: ROLLBACK TO create_offer_tiers;
955: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
956: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
957: END IF;
958: Fnd_Msg_Pub.Count_AND_Get
959: ( p_count => x_msg_count,
952: WHEN OTHERS THEN
953: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
954: ROLLBACK TO create_offer_tiers;
955: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
956: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
957: END IF;
958: Fnd_Msg_Pub.Count_AND_Get
959: ( p_count => x_msg_count,
960: p_data => x_msg_data,
954: ROLLBACK TO create_offer_tiers;
955: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
956: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
957: END IF;
958: Fnd_Msg_Pub.Count_AND_Get
959: ( p_count => x_msg_count,
960: p_data => x_msg_data,
961: p_encoded => Fnd_Api.G_FALSE
962: );
1045: BEGIN
1046: SAVEPOINT process_exlusions;
1047:
1048: IF Fnd_Api.to_boolean(p_init_msg_list) THEN
1049: Fnd_Msg_Pub.initialize;
1050: END IF;
1051:
1052: IF NOT Fnd_Api.compatible_api_call
1053: (
1132: EXCEPTION
1133: WHEN Fnd_Api.G_EXC_ERROR THEN
1134: x_return_status := Fnd_Api.g_ret_sts_error ;
1135: ROLLBACK TO process_exlusions;
1136: Fnd_Msg_Pub.Count_AND_Get
1137: ( p_count => x_msg_count,
1138: p_data => x_msg_data,
1139: p_encoded => Fnd_Api.G_FALSE
1140: );
1140: );
1141: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1142: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1143: ROLLBACK TO process_exlusions;
1144: Fnd_Msg_Pub.Count_AND_Get
1145: ( p_count => x_msg_count,
1146: p_data => x_msg_data,
1147: p_encoded => Fnd_Api.G_FALSE
1148: );
1148: );
1149: WHEN OTHERS THEN
1150: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
1151: ROLLBACK TO process_exlusions;
1152: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
1153: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1154: END IF;
1155: Fnd_Msg_Pub.Count_AND_Get
1156: ( p_count => x_msg_count,
1149: WHEN OTHERS THEN
1150: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
1151: ROLLBACK TO process_exlusions;
1152: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
1153: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1154: END IF;
1155: Fnd_Msg_Pub.Count_AND_Get
1156: ( p_count => x_msg_count,
1157: p_data => x_msg_data,
1151: ROLLBACK TO process_exlusions;
1152: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
1153: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1154: END IF;
1155: Fnd_Msg_Pub.Count_AND_Get
1156: ( p_count => x_msg_count,
1157: p_data => x_msg_data,
1158: p_encoded => Fnd_Api.G_FALSE
1159: );
1236: END IF;
1237: EXCEPTION
1238: WHEN Fnd_Api.G_EXC_ERROR THEN
1239: x_return_status := Fnd_Api.g_ret_sts_error ;
1240: Fnd_Msg_Pub.Count_AND_Get
1241: ( p_count => x_msg_count,
1242: p_data => x_msg_data,
1243: p_encoded => Fnd_Api.G_FALSE
1244: );
1243: p_encoded => Fnd_Api.G_FALSE
1244: );
1245: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1246: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1247: Fnd_Msg_Pub.Count_AND_Get
1248: ( p_count => x_msg_count,
1249: p_data => x_msg_data,
1250: p_encoded => Fnd_Api.G_FALSE
1251: );
1250: p_encoded => Fnd_Api.G_FALSE
1251: );
1252: WHEN OTHERS THEN
1253: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
1254: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
1255: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,'process_exclusions');
1256: END IF;
1257: Fnd_Msg_Pub.Count_AND_Get
1258: ( p_count => x_msg_count,
1251: );
1252: WHEN OTHERS THEN
1253: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
1254: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
1255: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,'process_exclusions');
1256: END IF;
1257: Fnd_Msg_Pub.Count_AND_Get
1258: ( p_count => x_msg_count,
1259: p_data => x_msg_data,
1253: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
1254: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
1255: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,'process_exclusions');
1256: END IF;
1257: Fnd_Msg_Pub.Count_AND_Get
1258: ( p_count => x_msg_count,
1259: p_data => x_msg_data,
1260: p_encoded => Fnd_Api.G_FALSE
1261: );
1328: BEGIN
1329: SAVEPOINT process_rltd_modifier_qual;
1330:
1331: IF Fnd_Api.to_boolean(p_init_msg_list) THEN
1332: Fnd_Msg_Pub.initialize;
1333: END IF;
1334:
1335: x_return_status := Fnd_Api.g_ret_sts_success;
1336:
1406: EXCEPTION
1407: WHEN Fnd_Api.G_EXC_ERROR THEN
1408: x_return_status := Fnd_Api.g_ret_sts_error ;
1409: ROLLBACK TO process_rltd_modifier_qual;
1410: Fnd_Msg_Pub.Count_AND_Get
1411: ( p_count => x_msg_count,
1412: p_data => x_msg_data,
1413: p_encoded => Fnd_Api.G_FALSE
1414: );
1414: );
1415: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1416: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1417: ROLLBACK TO process_rltd_modifier_qual;
1418: Fnd_Msg_Pub.Count_AND_Get
1419: ( p_count => x_msg_count,
1420: p_data => x_msg_data,
1421: p_encoded => Fnd_Api.G_FALSE
1422: );
1422: );
1423: WHEN OTHERS THEN
1424: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
1425: ROLLBACK TO process_rltd_modifier_qual;
1426: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
1427: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1428: END IF;
1429: Fnd_Msg_Pub.Count_AND_Get
1430: ( p_count => x_msg_count,
1423: WHEN OTHERS THEN
1424: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
1425: ROLLBACK TO process_rltd_modifier_qual;
1426: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
1427: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1428: END IF;
1429: Fnd_Msg_Pub.Count_AND_Get
1430: ( p_count => x_msg_count,
1431: p_data => x_msg_data,
1425: ROLLBACK TO process_rltd_modifier_qual;
1426: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
1427: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1428: END IF;
1429: Fnd_Msg_Pub.Count_AND_Get
1430: ( p_count => x_msg_count,
1431: p_data => x_msg_data,
1432: p_encoded => Fnd_Api.G_FALSE
1433: );
1470: BEGIN
1471: SAVEPOINT process_market_qualifiers;
1472:
1473: IF Fnd_Api.to_boolean(p_init_msg_list) THEN
1474: Fnd_Msg_Pub.initialize;
1475: END IF;
1476:
1477: IF NOT Fnd_Api.compatible_api_call
1478: (
1599: SET qualifier_deleted = 'Y'
1600: WHERE qp_list_header_id = l_qp_list_header_id;
1601: END IF;
1602:
1603: Fnd_Msg_Pub.Count_AND_Get
1604: ( p_count => x_msg_count,
1605: p_data => x_msg_data,
1606: p_encoded => Fnd_Api.G_FALSE
1607: );
1613: EXCEPTION
1614: WHEN Fnd_Api.G_EXC_ERROR THEN
1615: x_return_status := Fnd_Api.g_ret_sts_error ;
1616: ROLLBACK TO process_market_qualifiers;
1617: Fnd_Msg_Pub.Count_AND_Get
1618: ( p_count => x_msg_count,
1619: p_data => x_msg_data,
1620: p_encoded => Fnd_Api.G_FALSE
1621: );
1621: );
1622: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1623: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1624: ROLLBACK TO process_market_qualifiers;
1625: Fnd_Msg_Pub.Count_AND_Get
1626: ( p_count => x_msg_count,
1627: p_data => x_msg_data,
1628: p_encoded => Fnd_Api.G_FALSE
1629: );
1629: );
1630: WHEN OTHERS THEN
1631: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
1632: ROLLBACK TO process_market_qualifiers;
1633: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
1634: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1635: END IF;
1636: Fnd_Msg_Pub.Count_AND_Get
1637: ( p_count => x_msg_count,
1630: WHEN OTHERS THEN
1631: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
1632: ROLLBACK TO process_market_qualifiers;
1633: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
1634: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1635: END IF;
1636: Fnd_Msg_Pub.Count_AND_Get
1637: ( p_count => x_msg_count,
1638: p_data => x_msg_data,
1632: ROLLBACK TO process_market_qualifiers;
1633: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
1634: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1635: END IF;
1636: Fnd_Msg_Pub.Count_AND_Get
1637: ( p_count => x_msg_count,
1638: p_data => x_msg_data,
1639: p_encoded => Fnd_Api.G_FALSE
1640: );
1670: BEGIN
1671: SAVEPOINT process_market_qualifiers;
1672:
1673: IF Fnd_Api.to_boolean(p_init_msg_list) THEN
1674: Fnd_Msg_Pub.initialize;
1675: END IF;
1676:
1677: IF NOT Fnd_Api.compatible_api_call
1678: (
1780: SET qualifier_deleted = 'Y'
1781: WHERE qp_list_header_id = l_qp_list_header_id;
1782: END IF;
1783:
1784: Fnd_Msg_Pub.Count_AND_Get
1785: ( p_count => x_msg_count,
1786: p_data => x_msg_data,
1787: p_encoded => Fnd_Api.G_FALSE
1788: );
1793: EXCEPTION
1794: WHEN Fnd_Api.G_EXC_ERROR THEN
1795: x_return_status := Fnd_Api.g_ret_sts_error ;
1796: ROLLBACK TO process_market_qualifiers;
1797: Fnd_Msg_Pub.Count_AND_Get
1798: ( p_count => x_msg_count,
1799: p_data => x_msg_data,
1800: p_encoded => Fnd_Api.G_FALSE
1801: );
1801: );
1802: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1803: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1804: ROLLBACK TO process_market_qualifiers;
1805: Fnd_Msg_Pub.Count_AND_Get
1806: ( p_count => x_msg_count,
1807: p_data => x_msg_data,
1808: p_encoded => Fnd_Api.G_FALSE
1809: );
1809: );
1810: WHEN OTHERS THEN
1811: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
1812: ROLLBACK TO process_market_qualifiers;
1813: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
1814: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1815: END IF;
1816: Fnd_Msg_Pub.Count_AND_Get
1817: ( p_count => x_msg_count,
1810: WHEN OTHERS THEN
1811: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
1812: ROLLBACK TO process_market_qualifiers;
1813: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
1814: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1815: END IF;
1816: Fnd_Msg_Pub.Count_AND_Get
1817: ( p_count => x_msg_count,
1818: p_data => x_msg_data,
1812: ROLLBACK TO process_market_qualifiers;
1813: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
1814: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1815: END IF;
1816: Fnd_Msg_Pub.Count_AND_Get
1817: ( p_count => x_msg_count,
1818: p_data => x_msg_data,
1819: p_encoded => Fnd_Api.G_FALSE
1820: );
1909: RAISE Fnd_Api.g_exc_unexpected_error;
1910: END IF;
1911: END IF;
1912:
1913: Fnd_Msg_Pub.Count_AND_Get
1914: ( p_count => x_msg_count,
1915: p_data => x_msg_data,
1916: p_encoded => Fnd_Api.G_FALSE
1917: );
1919: EXCEPTION
1920: WHEN Fnd_Api.G_EXC_ERROR THEN
1921: x_return_status := Fnd_Api.g_ret_sts_error ;
1922: ROLLBACK TO offer_budget;
1923: Fnd_Msg_Pub.Count_AND_Get
1924: ( p_count => x_msg_count,
1925: p_data => x_msg_data,
1926: p_encoded => Fnd_Api.G_FALSE
1927: );
1927: );
1928: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1929: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1930: ROLLBACK TO offer_budget;
1931: Fnd_Msg_Pub.Count_AND_Get
1932: ( p_count => x_msg_count,
1933: p_data => x_msg_data,
1934: p_encoded => Fnd_Api.G_FALSE
1935: );
1935: );
1936: WHEN OTHERS THEN
1937: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
1938: ROLLBACK TO offer_budget;
1939: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
1940: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1941: END IF;
1942: Fnd_Msg_Pub.Count_AND_Get
1943: ( p_count => x_msg_count,
1936: WHEN OTHERS THEN
1937: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
1938: ROLLBACK TO offer_budget;
1939: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
1940: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1941: END IF;
1942: Fnd_Msg_Pub.Count_AND_Get
1943: ( p_count => x_msg_count,
1944: p_data => x_msg_data,
1938: ROLLBACK TO offer_budget;
1939: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
1940: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1941: END IF;
1942: Fnd_Msg_Pub.Count_AND_Get
1943: ( p_count => x_msg_count,
1944: p_data => x_msg_data,
1945: p_encoded => Fnd_Api.G_FALSE
1946: );
1993: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1994: RAISE Fnd_Api.g_exc_unexpected_error;
1995: END IF;
1996:
1997: Fnd_Msg_Pub.Count_AND_Get
1998: ( p_count => x_msg_count,
1999: p_data => x_msg_data,
2000: p_encoded => Fnd_Api.G_FALSE
2001: );
2003: EXCEPTION
2004: WHEN Fnd_Api.G_EXC_ERROR THEN
2005: x_return_status := Fnd_Api.g_ret_sts_error ;
2006: ROLLBACK TO offer_object_usage;
2007: Fnd_Msg_Pub.Count_AND_Get
2008: ( p_count => x_msg_count,
2009: p_data => x_msg_data,
2010: p_encoded => Fnd_Api.G_FALSE
2011: );
2011: );
2012: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2013: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2014: ROLLBACK TO offer_object_usage;
2015: Fnd_Msg_Pub.Count_AND_Get
2016: ( p_count => x_msg_count,
2017: p_data => x_msg_data,
2018: p_encoded => Fnd_Api.G_FALSE
2019: );
2019: );
2020: WHEN OTHERS THEN
2021: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
2022: ROLLBACK TO offer_object_usage;
2023: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
2024: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2025: END IF;
2026: Fnd_Msg_Pub.Count_AND_Get
2027: ( p_count => x_msg_count,
2020: WHEN OTHERS THEN
2021: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
2022: ROLLBACK TO offer_object_usage;
2023: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
2024: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2025: END IF;
2026: Fnd_Msg_Pub.Count_AND_Get
2027: ( p_count => x_msg_count,
2028: p_data => x_msg_data,
2022: ROLLBACK TO offer_object_usage;
2023: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
2024: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2025: END IF;
2026: Fnd_Msg_Pub.Count_AND_Get
2027: ( p_count => x_msg_count,
2028: p_data => x_msg_data,
2029: p_encoded => Fnd_Api.G_FALSE
2030: );
2295: RAISE Fnd_Api.g_exc_unexpected_error;
2296: END IF;
2297: END IF;
2298:
2299: Fnd_Msg_Pub.Count_AND_Get
2300: ( p_count => x_msg_count,
2301: p_data => x_msg_data,
2302: p_encoded => Fnd_Api.G_FALSE
2303: );
2305: EXCEPTION
2306: WHEN Fnd_Api.G_EXC_ERROR THEN
2307: x_return_status := Fnd_Api.g_ret_sts_error ;
2308: ROLLBACK TO offer_qualifier;
2309: Fnd_Msg_Pub.Count_AND_Get
2310: ( p_count => x_msg_count,
2311: p_data => x_msg_data,
2312: p_encoded => Fnd_Api.G_FALSE
2313: );
2313: );
2314: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2315: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2316: ROLLBACK TO offer_qualifier;
2317: Fnd_Msg_Pub.Count_AND_Get
2318: ( p_count => x_msg_count,
2319: p_data => x_msg_data,
2320: p_encoded => Fnd_Api.G_FALSE
2321: );
2321: );
2322: WHEN OTHERS THEN
2323: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
2324: ROLLBACK TO offer_qualifier;
2325: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
2326: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2327: END IF;
2328: Fnd_Msg_Pub.Count_AND_Get
2329: ( p_count => x_msg_count,
2322: WHEN OTHERS THEN
2323: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
2324: ROLLBACK TO offer_qualifier;
2325: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
2326: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2327: END IF;
2328: Fnd_Msg_Pub.Count_AND_Get
2329: ( p_count => x_msg_count,
2330: p_data => x_msg_data,
2324: ROLLBACK TO offer_qualifier;
2325: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
2326: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2327: END IF;
2328: Fnd_Msg_Pub.Count_AND_Get
2329: ( p_count => x_msg_count,
2330: p_data => x_msg_data,
2331: p_encoded => Fnd_Api.G_FALSE
2332: );
2471: RAISE Fnd_Api.g_exc_unexpected_error;
2472: END IF;
2473:
2474:
2475: Fnd_Msg_Pub.Count_AND_Get
2476: ( p_count => x_msg_count,
2477: p_data => x_msg_data,
2478: p_encoded => Fnd_Api.G_FALSE
2479: );
2481: EXCEPTION
2482: WHEN Fnd_Api.G_EXC_ERROR THEN
2483: x_return_status := Fnd_Api.g_ret_sts_error ;
2484: ROLLBACK TO vo_qualifier_pvt;
2485: Fnd_Msg_Pub.Count_AND_Get
2486: ( p_count => x_msg_count,
2487: p_data => x_msg_data,
2488: p_encoded => Fnd_Api.G_FALSE
2489: );
2489: );
2490: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2491: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2492: ROLLBACK TO vo_qualifier_pvt;
2493: Fnd_Msg_Pub.Count_AND_Get
2494: ( p_count => x_msg_count,
2495: p_data => x_msg_data,
2496: p_encoded => Fnd_Api.G_FALSE
2497: );
2497: );
2498: WHEN OTHERS THEN
2499: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
2500: ROLLBACK TO vo_qualifier_pvt;
2501: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
2502: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2503: END IF;
2504: Fnd_Msg_Pub.Count_AND_Get
2505: ( p_count => x_msg_count,
2498: WHEN OTHERS THEN
2499: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
2500: ROLLBACK TO vo_qualifier_pvt;
2501: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
2502: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2503: END IF;
2504: Fnd_Msg_Pub.Count_AND_Get
2505: ( p_count => x_msg_count,
2506: p_data => x_msg_data,
2500: ROLLBACK TO vo_qualifier_pvt;
2501: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
2502: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2503: END IF;
2504: Fnd_Msg_Pub.Count_AND_Get
2505: ( p_count => x_msg_count,
2506: p_data => x_msg_data,
2507: p_encoded => Fnd_Api.G_FALSE
2508: );
2670: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2671: add_message(x_msg_count);
2672: RAISE Fnd_Api.g_exc_unexpected_error;
2673: END IF;
2674: Fnd_Msg_Pub.Count_AND_Get
2675: ( p_count => x_msg_count,
2676: p_data => x_msg_data,
2677: p_encoded => Fnd_Api.G_FALSE
2678: );
2679:
2680: EXCEPTION
2681: WHEN Fnd_Api.G_EXC_ERROR THEN
2682: x_return_status := Fnd_Api.g_ret_sts_error ;
2683: Fnd_Msg_Pub.Count_AND_Get
2684: ( p_count => x_msg_count,
2685: p_data => x_msg_data,
2686: p_encoded => Fnd_Api.G_FALSE
2687: );
2686: p_encoded => Fnd_Api.G_FALSE
2687: );
2688: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2689: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2690: Fnd_Msg_Pub.Count_AND_Get
2691: ( p_count => x_msg_count,
2692: p_data => x_msg_data,
2693: p_encoded => Fnd_Api.G_FALSE
2694: );
2693: p_encoded => Fnd_Api.G_FALSE
2694: );
2695: WHEN OTHERS THEN
2696: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
2697: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
2698: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2699: END IF;
2700: Fnd_Msg_Pub.Count_AND_Get
2701: ( p_count => x_msg_count,
2694: );
2695: WHEN OTHERS THEN
2696: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
2697: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
2698: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2699: END IF;
2700: Fnd_Msg_Pub.Count_AND_Get
2701: ( p_count => x_msg_count,
2702: p_data => x_msg_data,
2696: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
2697: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
2698: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2699: END IF;
2700: Fnd_Msg_Pub.Count_AND_Get
2701: ( p_count => x_msg_count,
2702: p_data => x_msg_data,
2703: p_encoded => Fnd_Api.G_FALSE
2704: );
2767: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2768: END IF;
2769:
2770: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2771: FND_MSG_PUB.initialize;
2772: END IF;
2773:
2774: x_return_status := FND_API.G_RET_STS_SUCCESS;
2775:
2809: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2810: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2811: END IF;
2812:
2813: FND_MSG_PUB.Count_And_Get
2814: (
2815: p_count => x_msg_count,
2816: p_data => x_msg_data,
2817: p_encoded => FND_API.G_FALSE
2820: EXCEPTION
2821: WHEN FND_API.G_EXC_ERROR THEN
2822: x_return_status := FND_API.g_ret_sts_error ;
2823: ROLLBACK TO post_lumpsum_offer;
2824: FND_MSG_PUB.Count_AND_Get
2825: ( p_count => l_msg_count,
2826: p_data => l_msg_data,
2827: p_encoded => FND_API.G_FALSE
2828: );
2828: );
2829: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2830: x_return_status := FND_API.g_ret_sts_unexp_error ;
2831: ROLLBACK TO post_lumpsum_offer;
2832: FND_MSG_PUB.Count_AND_Get
2833: ( p_count => l_msg_count,
2834: p_data => l_msg_data,
2835: p_encoded => FND_API.G_FALSE
2836: );
2836: );
2837: WHEN OTHERS THEN
2838: x_return_status := FND_API.g_ret_sts_unexp_error ;
2839: ROLLBACK TO post_lumpsum_offer;
2840: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2841: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2842: END IF;
2843: FND_MSG_PUB.Count_AND_Get
2844: ( p_count => l_msg_count,
2837: WHEN OTHERS THEN
2838: x_return_status := FND_API.g_ret_sts_unexp_error ;
2839: ROLLBACK TO post_lumpsum_offer;
2840: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2841: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2842: END IF;
2843: FND_MSG_PUB.Count_AND_Get
2844: ( p_count => l_msg_count,
2845: p_data => l_msg_data,
2839: ROLLBACK TO post_lumpsum_offer;
2840: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2841: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2842: END IF;
2843: FND_MSG_PUB.Count_AND_Get
2844: ( p_count => l_msg_count,
2845: p_data => l_msg_data,
2846: p_encoded => FND_API.G_FALSE
2847: );
2911: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2912: END IF;
2913:
2914: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2915: FND_MSG_PUB.initialize;
2916: END IF;
2917:
2918: x_return_status := FND_API.G_RET_STS_SUCCESS;
2919:
2953: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2954: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2955: END IF;
2956:
2957: FND_MSG_PUB.Count_And_Get
2958: (
2959: p_count => x_msg_count,
2960: p_data => x_msg_data,
2961: p_encoded => FND_API.G_FALSE
2964: EXCEPTION
2965: WHEN FND_API.G_EXC_ERROR THEN
2966: x_return_status := FND_API.g_ret_sts_error ;
2967: ROLLBACK TO post_scan_data_offer;
2968: FND_MSG_PUB.Count_AND_Get
2969: ( p_count => l_msg_count,
2970: p_data => l_msg_data,
2971: p_encoded => FND_API.G_FALSE
2972: );
2972: );
2973: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2974: x_return_status := FND_API.g_ret_sts_unexp_error ;
2975: ROLLBACK TO post_scan_data_offer;
2976: FND_MSG_PUB.Count_AND_Get
2977: ( p_count => l_msg_count,
2978: p_data => l_msg_data,
2979: p_encoded => FND_API.G_FALSE
2980: );
2980: );
2981: WHEN OTHERS THEN
2982: x_return_status := FND_API.g_ret_sts_unexp_error ;
2983: ROLLBACK TO post_scan_data_offer;
2984: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2985: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2986: END IF;
2987: FND_MSG_PUB.Count_AND_Get
2988: ( p_count => l_msg_count,
2981: WHEN OTHERS THEN
2982: x_return_status := FND_API.g_ret_sts_unexp_error ;
2983: ROLLBACK TO post_scan_data_offer;
2984: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2985: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2986: END IF;
2987: FND_MSG_PUB.Count_AND_Get
2988: ( p_count => l_msg_count,
2989: p_data => l_msg_data,
2983: ROLLBACK TO post_scan_data_offer;
2984: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2985: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2986: END IF;
2987: FND_MSG_PUB.Count_AND_Get
2988: ( p_count => l_msg_count,
2989: p_data => l_msg_data,
2990: p_encoded => FND_API.G_FALSE
2991: );
3049: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3050: END IF;
3051:
3052: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3053: FND_MSG_PUB.initialize;
3054: END IF;
3055:
3056: x_return_status := FND_API.G_RET_STS_SUCCESS;
3057: /*
3060: IF p_offer_rec.offer_operation = 'CREATE' THEN
3061: IF p_offer_rec.start_date_active < TRUNC(SYSDATE) THEN
3062: IF p_offer_rec.offer_type <> 'NET_ACCRUAL' AND p_offer_rec.custom_setup_id <> 117 THEN
3063: Fnd_Message.SET_NAME('OZF','OZF_OFFR_STARTDATE_LT_SYSDATE');
3064: Fnd_Msg_Pub.ADD;
3065: RAISE FND_API.G_EXC_ERROR;
3066: END IF;
3067: END IF;
3068: ELSIF p_offer_rec.offer_operation = 'UPDATE' THEN
3071: CLOSE c_creation_date;
3072: IF p_offer_rec.start_date_active < l_creation_date THEN
3073: IF p_offer_rec.offer_type <> 'NET_ACCRUAL' AND p_offer_rec.custom_setup_id <> 117 THEN
3074: Fnd_Message.SET_NAME('OZF','OZF_OFFR_STARTDATE_LT_CREDATE');
3075: Fnd_Msg_Pub.ADD;
3076: RAISE FND_API.G_EXC_ERROR;
3077: END IF;
3078: END IF;
3079: END IF;
3084: IF p_offer_rec.offer_operation = 'CREATE' THEN
3085: IF p_offer_rec.end_date_active < TRUNC(SYSDATE) THEN
3086: IF p_offer_rec.offer_type <> 'NET_ACCRUAL' AND p_offer_rec.custom_setup_id <> 117 THEN
3087: Fnd_Message.SET_NAME('OZF','OZF_OFFR_ENDDATE_LT_SYSDATE');
3088: Fnd_Msg_Pub.ADD;
3089: RAISE FND_API.G_EXC_ERROR;
3090: END IF;
3091: END IF;
3092: ELSIF p_offer_rec.offer_operation = 'UPDATE' THEN
3095: CLOSE c_creation_date;
3096: IF p_offer_rec.end_date_active < l_creation_date THEN
3097: IF p_offer_rec.offer_type <> 'NET_ACCRUAL' AND p_offer_rec.custom_setup_id <> 117 THEN
3098: Fnd_Message.SET_NAME('OZF','OZF_OFFR_ENDDATE_LT_CREDATE');
3099: Fnd_Msg_Pub.ADD;
3100: RAISE FND_API.G_EXC_ERROR;
3101: END IF;
3102: END IF;
3103: END IF;
3114:
3115: EXCEPTION
3116: WHEN FND_API.G_EXC_ERROR THEN
3117: x_return_status := FND_API.g_ret_sts_error ;
3118: FND_MSG_PUB.Count_AND_Get
3119: ( p_count => l_msg_count,
3120: p_data => l_msg_data,
3121: p_encoded => FND_API.G_FALSE
3122: );
3121: p_encoded => FND_API.G_FALSE
3122: );
3123: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3124: x_return_status := FND_API.g_ret_sts_unexp_error ;
3125: FND_MSG_PUB.Count_AND_Get
3126: ( p_count => l_msg_count,
3127: p_data => l_msg_data,
3128: p_encoded => FND_API.G_FALSE
3129: );
3128: p_encoded => FND_API.G_FALSE
3129: );
3130: WHEN OTHERS THEN
3131: x_return_status := FND_API.g_ret_sts_unexp_error ;
3132: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3133: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3134: END IF;
3135: FND_MSG_PUB.Count_AND_Get
3136: ( p_count => l_msg_count,
3129: );
3130: WHEN OTHERS THEN
3131: x_return_status := FND_API.g_ret_sts_unexp_error ;
3132: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3133: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3134: END IF;
3135: FND_MSG_PUB.Count_AND_Get
3136: ( p_count => l_msg_count,
3137: p_data => l_msg_data,
3131: x_return_status := FND_API.g_ret_sts_unexp_error ;
3132: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3133: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3134: END IF;
3135: FND_MSG_PUB.Count_AND_Get
3136: ( p_count => l_msg_count,
3137: p_data => l_msg_data,
3138: p_encoded => FND_API.G_FALSE
3139: );
3220: END IF;
3221:
3222: -- Initialize message list if p_init_msg_list is set to TRUE.
3223: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3224: FND_MSG_PUB.initialize;
3225: END IF;
3226:
3227: -- Initialize API return status to SUCCESS
3228: x_return_status := FND_API.G_RET_STS_SUCCESS;
3275: END IF;
3276: END IF;
3277: END IF;
3278:
3279: FND_MSG_PUB.Count_And_Get
3280: (
3281: p_count => x_msg_count,
3282: p_data => x_msg_data,
3283: p_encoded => FND_API.G_FALSE
3285:
3286: EXCEPTION
3287: WHEN FND_API.G_EXC_ERROR THEN
3288: x_return_status := FND_API.g_ret_sts_error ;
3289: FND_MSG_PUB.Count_AND_Get
3290: ( p_count => l_msg_count,
3291: p_data => l_msg_data,
3292: p_encoded => FND_API.G_FALSE
3293: );
3292: p_encoded => FND_API.G_FALSE
3293: );
3294: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3295: x_return_status := FND_API.g_ret_sts_unexp_error ;
3296: FND_MSG_PUB.Count_AND_Get
3297: ( p_count => l_msg_count,
3298: p_data => l_msg_data,
3299: p_encoded => FND_API.G_FALSE
3300: );
3299: p_encoded => FND_API.G_FALSE
3300: );
3301: WHEN OTHERS THEN
3302: x_return_status := FND_API.g_ret_sts_unexp_error ;
3303: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3304: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3305: END IF;
3306: FND_MSG_PUB.Count_AND_Get
3307: ( p_count => l_msg_count,
3300: );
3301: WHEN OTHERS THEN
3302: x_return_status := FND_API.g_ret_sts_unexp_error ;
3303: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3304: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3305: END IF;
3306: FND_MSG_PUB.Count_AND_Get
3307: ( p_count => l_msg_count,
3308: p_data => l_msg_data,
3302: x_return_status := FND_API.g_ret_sts_unexp_error ;
3303: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3304: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3305: END IF;
3306: FND_MSG_PUB.Count_AND_Get
3307: ( p_count => l_msg_count,
3308: p_data => l_msg_data,
3309: p_encoded => FND_API.G_FALSE
3310: );
3350: END IF;
3351:
3352: -- Initialize message list if p_init_msg_list is set to TRUE.
3353: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3354: FND_MSG_PUB.initialize;
3355: END IF;
3356:
3357: -- Initialize API return status to SUCCESS
3358: x_return_status := FND_API.G_RET_STS_SUCCESS;
3374: OZF_Utility_PVT.Error_Message('OZF_OFFR_REQAMT_LT_OFFAMT');
3375: RAISE FND_API.G_EXC_ERROR;
3376: END IF;
3377:
3378: FND_MSG_PUB.Count_And_Get
3379: (p_count => x_msg_count,
3380: p_data => x_msg_data,
3381: p_encoded => FND_API.G_FALSE);
3382:
3382:
3383: EXCEPTION
3384: WHEN FND_API.G_EXC_ERROR THEN
3385: x_return_status := FND_API.g_ret_sts_error ;
3386: FND_MSG_PUB.Count_AND_Get
3387: ( p_count => l_msg_count,
3388: p_data => l_msg_data,
3389: p_encoded => FND_API.G_FALSE
3390: );
3389: p_encoded => FND_API.G_FALSE
3390: );
3391: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3392: x_return_status := FND_API.g_ret_sts_unexp_error ;
3393: FND_MSG_PUB.Count_AND_Get
3394: ( p_count => l_msg_count,
3395: p_data => l_msg_data,
3396: p_encoded => FND_API.G_FALSE
3397: );
3396: p_encoded => FND_API.G_FALSE
3397: );
3398: WHEN OTHERS THEN
3399: x_return_status := FND_API.g_ret_sts_unexp_error ;
3400: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3401: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3402: END IF;
3403: FND_MSG_PUB.Count_AND_Get
3404: ( p_count => l_msg_count,
3397: );
3398: WHEN OTHERS THEN
3399: x_return_status := FND_API.g_ret_sts_unexp_error ;
3400: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3401: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3402: END IF;
3403: FND_MSG_PUB.Count_AND_Get
3404: ( p_count => l_msg_count,
3405: p_data => l_msg_data,
3399: x_return_status := FND_API.g_ret_sts_unexp_error ;
3400: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3401: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3402: END IF;
3403: FND_MSG_PUB.Count_AND_Get
3404: ( p_count => l_msg_count,
3405: p_data => l_msg_data,
3406: p_encoded => FND_API.G_FALSE
3407: );
3490:
3491: -- Initialize message list if p_init_msg_list is set to TRUE.
3492: IF FND_API.to_Boolean( p_init_msg_list )
3493: THEN
3494: FND_MSG_PUB.initialize;
3495: END IF;
3496:
3497: -- Initialize API return status to SUCCESS
3498: x_return_status := FND_API.G_RET_STS_SUCCESS;
3550: END IF;
3551:
3552: END IF;
3553:
3554: FND_MSG_PUB.Count_And_Get
3555: ( p_count => x_msg_count,
3556: p_data => x_msg_data,
3557: p_encoded => FND_API.G_FALSE
3558: );
3560: EXCEPTION
3561: WHEN FND_API.G_EXC_ERROR THEN
3562: x_return_status := FND_API.g_ret_sts_error ;
3563: ROLLBACK TO Push_Target_group;
3564: FND_MSG_PUB.Count_AND_Get
3565: ( p_count => l_msg_count,
3566: p_data => l_msg_data,
3567: p_encoded => FND_API.G_FALSE
3568: );
3568: );
3569: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3570: x_return_status := FND_API.g_ret_sts_unexp_error ;
3571: ROLLBACK TO Push_Target_group;
3572: FND_MSG_PUB.Count_AND_Get
3573: ( p_count => l_msg_count,
3574: p_data => l_msg_data,
3575: p_encoded => FND_API.G_FALSE
3576: );
3576: );
3577: WHEN OTHERS THEN
3578: x_return_status := FND_API.g_ret_sts_unexp_error ;
3579: ROLLBACK TO Push_Target_group;
3580: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
3581: THEN
3582: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3583: END IF;
3584: FND_MSG_PUB.Count_AND_Get
3578: x_return_status := FND_API.g_ret_sts_unexp_error ;
3579: ROLLBACK TO Push_Target_group;
3580: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
3581: THEN
3582: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3583: END IF;
3584: FND_MSG_PUB.Count_AND_Get
3585: ( p_count => l_msg_count,
3586: p_data => l_msg_data,
3580: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
3581: THEN
3582: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3583: END IF;
3584: FND_MSG_PUB.Count_AND_Get
3585: ( p_count => l_msg_count,
3586: p_data => l_msg_data,
3587: p_encoded => FND_API.G_FALSE
3588: );
3610: l_api_name VARCHAR2 (60) := 'update_request_status';
3611: l_full_name VARCHAR2 (100) := g_pkg_name||'.'||l_api_name;
3612: l_api_version NUMBER := 1;
3613: BEGIN
3614: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_high) THEN
3615: debug_message(l_full_name||' : '||'begin');
3616: END IF;
3617:
3618: OPEN c_req_header_rec(p_qp_list_header_id);
3625: object_version_number = l_obj_ver_num + 1
3626: WHERE request_header_id = l_req_header_id;
3627: END IF;
3628:
3629: fnd_msg_pub.count_and_get (p_count=> x_msg_count,
3630: p_data=> x_msg_data,
3631: p_encoded=> fnd_api.g_false);
3632:
3633: EXCEPTION
3632:
3633: EXCEPTION
3634: WHEN fnd_api.g_exc_error THEN
3635: x_return_status := fnd_api.g_ret_sts_error;
3636: fnd_msg_pub.count_and_get (p_count=> x_msg_count,
3637: p_data=> x_msg_data,
3638: p_encoded=> fnd_api.g_false);
3639: WHEN fnd_api.g_exc_unexpected_error THEN
3640: x_return_status := fnd_api.g_ret_sts_unexp_error;
3637: p_data=> x_msg_data,
3638: p_encoded=> fnd_api.g_false);
3639: WHEN fnd_api.g_exc_unexpected_error THEN
3640: x_return_status := fnd_api.g_ret_sts_unexp_error;
3641: fnd_msg_pub.count_and_get (p_count=> x_msg_count,
3642: p_data=> x_msg_data,
3643: p_encoded=> fnd_api.g_false);
3644: WHEN OTHERS THEN
3645: x_return_status := fnd_api.g_ret_sts_unexp_error;
3643: p_encoded=> fnd_api.g_false);
3644: WHEN OTHERS THEN
3645: x_return_status := fnd_api.g_ret_sts_unexp_error;
3646:
3647: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
3648: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
3649: END IF;
3650:
3651: fnd_msg_pub.count_and_get (p_count=> x_msg_count,
3644: WHEN OTHERS THEN
3645: x_return_status := fnd_api.g_ret_sts_unexp_error;
3646:
3647: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
3648: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
3649: END IF;
3650:
3651: fnd_msg_pub.count_and_get (p_count=> x_msg_count,
3652: p_data=> x_msg_data,
3647: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
3648: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
3649: END IF;
3650:
3651: fnd_msg_pub.count_and_get (p_count=> x_msg_count,
3652: p_data=> x_msg_data,
3653: p_encoded=> fnd_api.g_false);
3654: END update_request_status;
3655:
3741:
3742: -- Initialize message list if p_init_msg_list is set to TRUE.
3743: IF FND_API.to_Boolean( p_init_msg_list )
3744: THEN
3745: FND_MSG_PUB.initialize;
3746: END IF;
3747:
3748: -- Initialize API return status to SUCCESS
3749: x_return_status := FND_API.G_RET_STS_SUCCESS;
3985: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3986: END IF;
3987:
3988:
3989: FND_MSG_PUB.Count_And_Get
3990: (p_count => x_msg_count,
3991: p_data => x_msg_data,
3992: p_encoded => FND_API.G_FALSE
3993: );
3995: EXCEPTION
3996: WHEN FND_API.G_EXC_ERROR THEN
3997: x_return_status := FND_API.g_ret_sts_error ;
3998: ROLLBACK TO activate_offer_over;
3999: FND_MSG_PUB.Count_AND_Get
4000: ( p_count => l_msg_count,
4001: p_data => l_msg_data,
4002: p_encoded => FND_API.G_FALSE
4003: );
4003: );
4004: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4005: x_return_status := FND_API.g_ret_sts_unexp_error ;
4006: ROLLBACK TO activate_offer_over;
4007: FND_MSG_PUB.Count_AND_Get
4008: ( p_count => l_msg_count,
4009: p_data => l_msg_data,
4010: p_encoded => FND_API.G_FALSE
4011: );
4011: );
4012: WHEN OTHERS THEN
4013: x_return_status := FND_API.g_ret_sts_unexp_error ;
4014: ROLLBACK TO activate_offer_over;
4015: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
4016: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4017: END IF;
4018: FND_MSG_PUB.Count_AND_Get
4019: ( p_count => l_msg_count,
4012: WHEN OTHERS THEN
4013: x_return_status := FND_API.g_ret_sts_unexp_error ;
4014: ROLLBACK TO activate_offer_over;
4015: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
4016: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4017: END IF;
4018: FND_MSG_PUB.Count_AND_Get
4019: ( p_count => l_msg_count,
4020: p_data => l_msg_data,
4014: ROLLBACK TO activate_offer_over;
4015: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
4016: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4017: END IF;
4018: FND_MSG_PUB.Count_AND_Get
4019: ( p_count => l_msg_count,
4020: p_data => l_msg_data,
4021: p_encoded => FND_API.G_FALSE
4022: );
4169: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
4170: RAISE Fnd_Api.g_exc_unexpected_error;
4171: END IF;
4172:
4173: Fnd_Msg_Pub.Count_AND_Get
4174: ( p_count => x_msg_count,
4175: p_data => x_msg_data,
4176: p_encoded => Fnd_Api.G_FALSE
4177: );
4179: EXCEPTION
4180: WHEN Fnd_Api.G_EXC_ERROR THEN
4181: x_return_status := Fnd_Api.g_ret_sts_error ;
4182: ROLLBACK TO offer_dates;
4183: Fnd_Msg_Pub.Count_AND_Get
4184: ( p_count => x_msg_count,
4185: p_data => x_msg_data,
4186: p_encoded => Fnd_Api.G_FALSE
4187: );
4187: );
4188: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
4189: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
4190: ROLLBACK TO offer_dates;
4191: Fnd_Msg_Pub.Count_AND_Get
4192: ( p_count => x_msg_count,
4193: p_data => x_msg_data,
4194: p_encoded => Fnd_Api.G_FALSE
4195: );
4195: );
4196: WHEN OTHERS THEN
4197: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
4198: ROLLBACK TO offer_dates;
4199: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
4200: THEN
4201: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4202: END IF;
4203: Fnd_Msg_Pub.Count_AND_Get
4197: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
4198: ROLLBACK TO offer_dates;
4199: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
4200: THEN
4201: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4202: END IF;
4203: Fnd_Msg_Pub.Count_AND_Get
4204: ( p_count => x_msg_count,
4205: p_data => x_msg_data,
4199: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
4200: THEN
4201: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4202: END IF;
4203: Fnd_Msg_Pub.Count_AND_Get
4204: ( p_count => x_msg_count,
4205: p_data => x_msg_data,
4206: p_encoded => Fnd_Api.G_FALSE
4207: );
4366:
4367: l_uk_flag := OZF_Utility_PVT.check_uniqueness('AMS_SOURCE_CODES','source_code = ''' || p_modifier_list_rec.offer_code || '''');
4368:
4369: IF l_uk_flag = Fnd_Api.g_false THEN
4370: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
4371: Fnd_Message.set_name('OZF', 'OZF_ACT_OFFER_DUP_OFFER_CODE');
4372: Fnd_Msg_Pub.ADD;
4373: END IF;
4374: END IF;
4368:
4369: IF l_uk_flag = Fnd_Api.g_false THEN
4370: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
4371: Fnd_Message.set_name('OZF', 'OZF_ACT_OFFER_DUP_OFFER_CODE');
4372: Fnd_Msg_Pub.ADD;
4373: END IF;
4374: END IF;
4375: END IF;
4376: END IF;
4569: END IF;
4570:
4571: END IF;
4572:
4573: Fnd_Msg_Pub.Count_AND_Get
4574: ( p_count => x_msg_count,
4575: p_data => x_msg_data,
4576: p_encoded => Fnd_Api.G_FALSE
4577: );
4578: EXCEPTION
4579: WHEN Fnd_Api.G_EXC_ERROR THEN
4580: x_return_status := Fnd_Api.g_ret_sts_error ;
4581: ROLLBACK TO process_qp_list_header;
4582: Fnd_Msg_Pub.Count_AND_Get
4583: ( p_count => x_msg_count,
4584: p_data => x_msg_data,
4585: p_encoded => Fnd_Api.G_FALSE
4586: );
4586: );
4587: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
4588: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
4589: ROLLBACK TO process_qp_list_header;
4590: Fnd_Msg_Pub.Count_AND_Get
4591: ( p_count => x_msg_count,
4592: p_data => x_msg_data,
4593: p_encoded => Fnd_Api.G_FALSE
4594: );
4594: );
4595: WHEN OTHERS THEN
4596: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
4597: ROLLBACK TO process_qp_list_header;
4598: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
4599: THEN
4600: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4601: END IF;
4602: Fnd_Msg_Pub.Count_AND_Get
4596: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
4597: ROLLBACK TO process_qp_list_header;
4598: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
4599: THEN
4600: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4601: END IF;
4602: Fnd_Msg_Pub.Count_AND_Get
4603: ( p_count => x_msg_count,
4604: p_data => x_msg_data,
4598: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
4599: THEN
4600: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4601: END IF;
4602: Fnd_Msg_Pub.Count_AND_Get
4603: ( p_count => x_msg_count,
4604: p_data => x_msg_data,
4605: p_encoded => Fnd_Api.G_FALSE
4606: );
4698: IF p_modifier_list_rec.budget_amount_tc >= l_scan_value THEN
4699: l_promotional_offers_rec.budget_amount_tc := p_modifier_list_rec.budget_amount_tc;
4700: ELSE
4701: FND_MESSAGE.SET_NAME('OZF','OZF_OFFR_IEB_LT_SCANVALUE');
4702: Fnd_Msg_Pub.ADD;
4703: RAISE FND_API.G_EXC_ERROR;
4704: END IF;
4705: END IF;
4706: ELSE -- called by offer detail
4731: END IF;
4732:
4733: IF l_promotional_offers_rec.budget_amount_tc < 0 THEN
4734: FND_MESSAGE.SET_NAME('OZF','OZF_OFFR_IEB_NEG');
4735: Fnd_Msg_Pub.ADD;
4736: RAISE FND_API.G_EXC_ERROR;
4737: END IF;
4738:
4739: l_promotional_offers_rec.qp_list_header_id := p_modifier_list_rec.qp_list_header_id;
4854: ELSIF x_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
4855: RAISE Fnd_Api.g_exc_unexpected_error;
4856: END IF;
4857:
4858: Fnd_Msg_Pub.Count_AND_Get
4859: ( p_count => x_msg_count,
4860: p_data => x_msg_data,
4861: p_encoded => Fnd_Api.G_FALSE
4862: );
4863: EXCEPTION
4864: WHEN Fnd_Api.G_EXC_ERROR THEN
4865: x_return_status := Fnd_Api.g_ret_sts_error ;
4866: ROLLBACK TO process_ozf_offer;
4867: Fnd_Msg_Pub.Count_AND_Get
4868: ( p_count => x_msg_count,
4869: p_data => x_msg_data,
4870: p_encoded => Fnd_Api.G_FALSE
4871: );
4871: );
4872: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
4873: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
4874: ROLLBACK TO process_ozf_offer;
4875: Fnd_Msg_Pub.Count_AND_Get
4876: ( p_count => x_msg_count,
4877: p_data => x_msg_data,
4878: p_encoded => Fnd_Api.G_FALSE
4879: );
4879: );
4880: WHEN OTHERS THEN
4881: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
4882: ROLLBACK TO process_ozf_offer;
4883: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
4884: THEN
4885: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4886: END IF;
4887: Fnd_Msg_Pub.Count_AND_Get
4881: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
4882: ROLLBACK TO process_ozf_offer;
4883: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
4884: THEN
4885: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4886: END IF;
4887: Fnd_Msg_Pub.Count_AND_Get
4888: ( p_count => x_msg_count,
4889: p_data => x_msg_data,
4883: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
4884: THEN
4885: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4886: END IF;
4887: Fnd_Msg_Pub.Count_AND_Get
4888: ( p_count => x_msg_count,
4889: p_data => x_msg_data,
4890: p_encoded => Fnd_Api.G_FALSE
4891: );
5523:
5524: EXCEPTION
5525: WHEN Fnd_Api.G_EXC_ERROR THEN
5526: x_return_status := Fnd_Api.g_ret_sts_error ;
5527: Fnd_Msg_Pub.Count_AND_Get
5528: ( p_count => x_msg_count,
5529: p_data => x_msg_data,
5530: p_encoded => Fnd_Api.G_FALSE
5531: );
5530: p_encoded => Fnd_Api.G_FALSE
5531: );
5532: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
5533: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
5534: Fnd_Msg_Pub.Count_AND_Get
5535: ( p_count => x_msg_count,
5536: p_data => x_msg_data,
5537: p_encoded => Fnd_Api.G_FALSE
5538: );
5537: p_encoded => Fnd_Api.G_FALSE
5538: );
5539: WHEN OTHERS THEN
5540: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
5541: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
5542: THEN
5543: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
5544: END IF;
5545: Fnd_Msg_Pub.Count_AND_Get
5539: WHEN OTHERS THEN
5540: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
5541: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
5542: THEN
5543: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
5544: END IF;
5545: Fnd_Msg_Pub.Count_AND_Get
5546: ( p_count => x_msg_count,
5547: p_data => x_msg_data,
5541: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
5542: THEN
5543: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
5544: END IF;
5545: Fnd_Msg_Pub.Count_AND_Get
5546: ( p_count => x_msg_count,
5547: p_data => x_msg_data,
5548: p_encoded => Fnd_Api.G_FALSE
5549: );
5825: AND p_modifier_line_tbl(j).pricing_attr <> FND_API.g_miss_char))
5826: THEN
5827: FND_MESSAGE.SET_NAME('OZF','OZF_UOM_QTY_REQD');
5828:
5829: Fnd_Msg_Pub.ADD;
5830: RAISE FND_API.G_EXC_ERROR;
5831: END IF;
5832: ELSE -- volume type is amount
5833: l_pricing_attr_tbl(i).product_uom_code := p_modifier_line_tbl(j).product_uom_code;
6172: END IF;
6173:
6174: END IF;
6175:
6176: Fnd_Msg_Pub.Count_AND_Get
6177: ( p_count => x_msg_count,
6178: p_data => x_msg_data,
6179: p_encoded => Fnd_Api.G_FALSE
6180: );
6181:
6182: EXCEPTION
6183: WHEN Fnd_Api.G_EXC_ERROR THEN
6184: x_return_status := Fnd_Api.g_ret_sts_error ;
6185: Fnd_Msg_Pub.Count_AND_Get
6186: ( p_count => x_msg_count,
6187: p_data => x_msg_data,
6188: p_encoded => Fnd_Api.G_FALSE
6189: );
6188: p_encoded => Fnd_Api.G_FALSE
6189: );
6190: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
6191: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
6192: Fnd_Msg_Pub.Count_AND_Get
6193: ( p_count => x_msg_count,
6194: p_data => x_msg_data,
6195: p_encoded => Fnd_Api.G_FALSE
6196: );
6195: p_encoded => Fnd_Api.G_FALSE
6196: );
6197: WHEN OTHERS THEN
6198: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
6199: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
6200: THEN
6201: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
6202: END IF;
6203: Fnd_Msg_Pub.Count_AND_Get
6197: WHEN OTHERS THEN
6198: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
6199: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
6200: THEN
6201: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
6202: END IF;
6203: Fnd_Msg_Pub.Count_AND_Get
6204: ( p_count => x_msg_count,
6205: p_data => x_msg_data,
6199: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
6200: THEN
6201: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
6202: END IF;
6203: Fnd_Msg_Pub.Count_AND_Get
6204: ( p_count => x_msg_count,
6205: p_data => x_msg_data,
6206: p_encoded => Fnd_Api.G_FALSE
6207: );
6407: EXCEPTION
6408: WHEN Fnd_Api.G_EXC_ERROR THEN
6409: x_return_status := Fnd_Api.g_ret_sts_error ;
6410: ROLLBACK TO activate_offer_api;
6411: Fnd_Msg_Pub.Count_AND_Get
6412: ( p_count => x_msg_count,
6413: p_data => x_msg_data,
6414: p_encoded => Fnd_Api.G_FALSE
6415: );
6415: );
6416: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
6417: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
6418: ROLLBACK TO activate_offer_api;
6419: Fnd_Msg_Pub.Count_AND_Get
6420: ( p_count => x_msg_count,
6421: p_data => x_msg_data,
6422: p_encoded => Fnd_Api.G_FALSE
6423: );
6423: );
6424: WHEN OTHERS THEN
6425: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
6426: ROLLBACK TO activate_offer_api;
6427: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
6428: THEN
6429: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
6430: END IF;
6431: Fnd_Msg_Pub.Count_AND_Get
6425: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
6426: ROLLBACK TO activate_offer_api;
6427: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
6428: THEN
6429: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
6430: END IF;
6431: Fnd_Msg_Pub.Count_AND_Get
6432: ( p_count => x_msg_count,
6433: p_data => x_msg_data,
6427: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
6428: THEN
6429: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
6430: END IF;
6431: Fnd_Msg_Pub.Count_AND_Get
6432: ( p_count => x_msg_count,
6433: p_data => x_msg_data,
6434: p_encoded => Fnd_Api.G_FALSE
6435: );
6807:
6808: END IF;
6809: END LOOP; */
6810:
6811: Fnd_Msg_Pub.Count_AND_Get
6812: ( p_count => x_msg_count,
6813: p_data => x_msg_data,
6814: p_encoded => Fnd_Api.G_FALSE
6815: );
6816:
6817: EXCEPTION
6818: WHEN Fnd_Api.G_EXC_ERROR THEN
6819: x_return_status := Fnd_Api.g_ret_sts_error ;
6820: Fnd_Msg_Pub.Count_AND_Get
6821: ( p_count => x_msg_count,
6822: p_data => x_msg_data,
6823: p_encoded => Fnd_Api.G_FALSE
6824: );
6823: p_encoded => Fnd_Api.G_FALSE
6824: );
6825: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
6826: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
6827: Fnd_Msg_Pub.Count_AND_Get
6828: ( p_count => x_msg_count,
6829: p_data => x_msg_data,
6830: p_encoded => Fnd_Api.G_FALSE
6831: );
6830: p_encoded => Fnd_Api.G_FALSE
6831: );
6832: WHEN OTHERS THEN
6833: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
6834: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
6835: THEN
6836: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
6837: END IF;
6838: Fnd_Msg_Pub.Count_AND_Get
6832: WHEN OTHERS THEN
6833: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
6834: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
6835: THEN
6836: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
6837: END IF;
6838: Fnd_Msg_Pub.Count_AND_Get
6839: ( p_count => x_msg_count,
6840: p_data => x_msg_data,
6834: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
6835: THEN
6836: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
6837: END IF;
6838: Fnd_Msg_Pub.Count_AND_Get
6839: ( p_count => x_msg_count,
6840: p_data => x_msg_data,
6841: p_encoded => Fnd_Api.G_FALSE
6842: );
6886: IF l_lumpsum_offer.STATUS_CODE = 'PENDING' OR l_lumpsum_offer.STATUS_CODE = 'ACTIVE' THEN
6887:
6888: IF l_total_distribution <> l_lumpsum_offer.lumpsum_amount THEN
6889: FND_MESSAGE.SET_NAME('OZF','OZF_INVALID_DISTR_ACTIVE');
6890: Fnd_Msg_Pub.ADD;
6891: RAISE FND_API.G_EXC_ERROR;
6892: END IF;
6893:
6894: ELSE
6894: ELSE
6895:
6896: IF l_total_distribution > l_lumpsum_offer.lumpsum_amount THEN
6897: FND_MESSAGE.SET_NAME('OZF','OZF_INVALID_DISTRIBUTION');
6898: Fnd_Msg_Pub.ADD;
6899: RAISE FND_API.G_EXC_ERROR;
6900: END IF;
6901:
6902: END IF;
6906: IF l_lumpsum_offer.STATUS_CODE = 'PENDING' OR l_lumpsum_offer.STATUS_CODE = 'ACTIVE' THEN
6907:
6908: IF l_total_distribution <> 100 THEN
6909: FND_MESSAGE.SET_NAME('OZF','OZF_INVALID_DISTR_ACTIVE');
6910: Fnd_Msg_Pub.ADD;
6911: RAISE FND_API.G_EXC_ERROR;
6912: END IF;
6913:
6914:
6915: ELSE
6916:
6917: IF l_total_distribution > 100 THEN
6918: FND_MESSAGE.SET_NAME('OZF','OZF_INVALID_DISTRIBUTION');
6919: Fnd_Msg_Pub.ADD;
6920: RAISE FND_API.G_EXC_ERROR;
6921: END IF;
6922:
6923: END IF;
6923: END IF;
6924:
6925: END IF;
6926:
6927: Fnd_Msg_Pub.Count_AND_Get
6928: ( p_count => x_msg_count,
6929: p_data => x_msg_data,
6930: p_encoded => Fnd_Api.G_FALSE
6931: );
6932:
6933: EXCEPTION
6934: WHEN Fnd_Api.G_EXC_ERROR THEN
6935: x_return_status := Fnd_Api.g_ret_sts_error ;
6936: Fnd_Msg_Pub.Count_AND_Get
6937: ( p_count => x_msg_count,
6938: p_data => x_msg_data,
6939: p_encoded => Fnd_Api.G_FALSE
6940: );
6939: p_encoded => Fnd_Api.G_FALSE
6940: );
6941: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
6942: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
6943: Fnd_Msg_Pub.Count_AND_Get
6944: ( p_count => x_msg_count,
6945: p_data => x_msg_data,
6946: p_encoded => Fnd_Api.G_FALSE
6947: );
6946: p_encoded => Fnd_Api.G_FALSE
6947: );
6948: WHEN OTHERS THEN
6949: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
6950: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
6951: THEN
6952: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
6953: END IF;
6954: Fnd_Msg_Pub.Count_AND_Get
6948: WHEN OTHERS THEN
6949: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
6950: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
6951: THEN
6952: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
6953: END IF;
6954: Fnd_Msg_Pub.Count_AND_Get
6955: ( p_count => x_msg_count,
6956: p_data => x_msg_data,
6950: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
6951: THEN
6952: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
6953: END IF;
6954: Fnd_Msg_Pub.Count_AND_Get
6955: ( p_count => x_msg_count,
6956: p_data => x_msg_data,
6957: p_encoded => Fnd_Api.G_FALSE
6958: );
7269: AND p_modifier_line_tbl(i).pricing_attr <> FND_API.g_miss_char))
7270: THEN
7271: FND_MESSAGE.SET_NAME('OZF','OZF_UOM_QTY_REQD');
7272:
7273: Fnd_Msg_Pub.ADD;
7274: RAISE FND_API.G_EXC_ERROR;
7275: END IF;
7276: ELSE -- volume type is amount
7277: l_pricing_attr_tbl(i).product_uom_code := p_modifier_line_tbl(i).product_uom_code;
7445:
7446: END IF;
7447: END LOOP;
7448:
7449: Fnd_Msg_Pub.Count_AND_Get
7450: ( p_count => x_msg_count,
7451: p_data => x_msg_data,
7452: p_encoded => Fnd_Api.G_FALSE
7453: );
7454:
7455: EXCEPTION
7456: WHEN Fnd_Api.G_EXC_ERROR THEN
7457: x_return_status := Fnd_Api.g_ret_sts_error ;
7458: Fnd_Msg_Pub.Count_AND_Get
7459: ( p_count => x_msg_count,
7460: p_data => x_msg_data,
7461: p_encoded => Fnd_Api.G_FALSE
7462: );
7461: p_encoded => Fnd_Api.G_FALSE
7462: );
7463: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
7464: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
7465: Fnd_Msg_Pub.Count_AND_Get
7466: ( p_count => x_msg_count,
7467: p_data => x_msg_data,
7468: p_encoded => Fnd_Api.G_FALSE
7469: );
7468: p_encoded => Fnd_Api.G_FALSE
7469: );
7470: WHEN OTHERS THEN
7471: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
7472: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
7473: THEN
7474: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
7475: END IF;
7476: Fnd_Msg_Pub.Count_AND_Get
7470: WHEN OTHERS THEN
7471: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
7472: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
7473: THEN
7474: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
7475: END IF;
7476: Fnd_Msg_Pub.Count_AND_Get
7477: ( p_count => x_msg_count,
7478: p_data => x_msg_data,
7472: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
7473: THEN
7474: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
7475: END IF;
7476: Fnd_Msg_Pub.Count_AND_Get
7477: ( p_count => x_msg_count,
7478: p_data => x_msg_data,
7479: p_encoded => Fnd_Api.G_FALSE
7480: );
7553: IF p_modifier_line_tbl.exists(i) THEN
7554: IF p_modifier_line_tbl(i).max_amount_per_rule IS NOT NULL
7555: AND p_modifier_line_tbl(i).max_amount_per_rule <> FND_API.G_MISS_NUM
7556: AND p_modifier_line_tbl(i).max_amount_per_rule <= 0 THEN
7557: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
7558: Fnd_Message.SET_NAME('OZF','OZF_TRD_DEAL_NEG_AMT');
7559: Fnd_Msg_Pub.ADD;
7560: END IF;
7561: RAISE Fnd_Api.g_exc_error;
7555: AND p_modifier_line_tbl(i).max_amount_per_rule <> FND_API.G_MISS_NUM
7556: AND p_modifier_line_tbl(i).max_amount_per_rule <= 0 THEN
7557: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
7558: Fnd_Message.SET_NAME('OZF','OZF_TRD_DEAL_NEG_AMT');
7559: Fnd_Msg_Pub.ADD;
7560: END IF;
7561: RAISE Fnd_Api.g_exc_error;
7562: END IF;
7563:
7563:
7564: IF p_modifier_line_tbl(i).max_qty_per_rule IS NOT NULL
7565: AND p_modifier_line_tbl(i).max_qty_per_rule <> FND_API.G_MISS_NUM
7566: AND p_modifier_line_tbl(i).max_qty_per_rule <= 0 THEN
7567: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
7568: Fnd_Message.SET_NAME('OZF','OZF_TRD_DEAL_NEG_QTY');
7569: Fnd_Msg_Pub.ADD;
7570: END IF;
7571: RAISE Fnd_Api.g_exc_error;
7565: AND p_modifier_line_tbl(i).max_qty_per_rule <> FND_API.G_MISS_NUM
7566: AND p_modifier_line_tbl(i).max_qty_per_rule <= 0 THEN
7567: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
7568: Fnd_Message.SET_NAME('OZF','OZF_TRD_DEAL_NEG_QTY');
7569: Fnd_Msg_Pub.ADD;
7570: END IF;
7571: RAISE Fnd_Api.g_exc_error;
7572: END IF;
7573: END IF;
7581: IF ((p_modifier_line_tbl(i).operand IS NULL OR p_modifier_line_tbl(i).operand = FND_API.g_miss_num)
7582: OR (p_modifier_line_tbl(i).arithmetic_operator IS NULL OR p_modifier_line_tbl(i).arithmetic_operator = FND_API.g_miss_char))
7583: AND ((p_modifier_line_tbl(i).qd_operand IS NULL OR p_modifier_line_tbl(i).qd_operand = FND_API.g_miss_num)
7584: OR (p_modifier_line_tbl(i).qd_arithmetic_operator IS NULL OR p_modifier_line_tbl(i).qd_arithmetic_operator = FND_API.g_miss_char)) THEN
7585: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
7586: Fnd_Message.SET_NAME('OZF','OZF_TRD_DEAL_NO_OPERAND');
7587: Fnd_Msg_Pub.ADD;
7588: END IF;
7589: RAISE Fnd_Api.g_exc_error;
7583: AND ((p_modifier_line_tbl(i).qd_operand IS NULL OR p_modifier_line_tbl(i).qd_operand = FND_API.g_miss_num)
7584: OR (p_modifier_line_tbl(i).qd_arithmetic_operator IS NULL OR p_modifier_line_tbl(i).qd_arithmetic_operator = FND_API.g_miss_char)) THEN
7585: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
7586: Fnd_Message.SET_NAME('OZF','OZF_TRD_DEAL_NO_OPERAND');
7587: Fnd_Msg_Pub.ADD;
7588: END IF;
7589: RAISE Fnd_Api.g_exc_error;
7590:
7591: ELSIF ((p_modifier_line_tbl(i).operand IS NOT NULL AND p_modifier_line_tbl(i).operand <> FND_API.g_miss_num)
7630: FETCH c_modifier_id INTO l_modifier_id,l_related_modifier_id;
7631: CLOSE c_modifier_id;
7632:
7633: IF l_related_modifier_id IS NOT NULL THEN
7634: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
7635: Fnd_Message.SET_NAME('OZF','OZF_TRD_DEAL_NO_ACC_OPERAND');
7636: Fnd_Msg_Pub.ADD;
7637: x_error_location := i;
7638: END IF;
7632:
7633: IF l_related_modifier_id IS NOT NULL THEN
7634: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
7635: Fnd_Message.SET_NAME('OZF','OZF_TRD_DEAL_NO_ACC_OPERAND');
7636: Fnd_Msg_Pub.ADD;
7637: x_error_location := i;
7638: END IF;
7639: RAISE Fnd_Api.g_exc_error;
7640: END IF;
7661: FETCH c_modifier_id INTO l_modifier_id,l_related_modifier_id;
7662: CLOSE c_modifier_id;
7663:
7664: IF l_modifier_id IS NOT NULL AND l_related_modifier_id IS NOT NULL THEN
7665: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
7666: Fnd_Message.SET_NAME('OZF','OZF_TRD_DEAL_NO_OFF_OPERAND');
7667: Fnd_Msg_Pub.ADD;
7668: x_error_location := i;
7669: END IF;
7663:
7664: IF l_modifier_id IS NOT NULL AND l_related_modifier_id IS NOT NULL THEN
7665: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
7666: Fnd_Message.SET_NAME('OZF','OZF_TRD_DEAL_NO_OFF_OPERAND');
7667: Fnd_Msg_Pub.ADD;
7668: x_error_location := i;
7669: END IF;
7670: RAISE Fnd_Api.g_exc_error;
7671: END IF;
7887: IF l_modifier_line_tbl(i).operation <> FND_API.g_miss_char THEN
7888:
7889: IF (l_modifier_line_tbl(i).max_qty_per_rule IS NULL OR l_modifier_line_tbl(i).max_qty_per_rule = FND_API.G_MISS_NUM)
7890: AND l_modifier_line_tbl(i).qd_estimated_qty_is_max = 'Y' THEN
7891: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
7892: Fnd_Message.SET_NAME('OZF','OZF_TRD_DEAL_NO_QTY');
7893: Fnd_Msg_Pub.ADD;
7894: END IF;
7895: RAISE Fnd_Api.g_exc_error;
7889: IF (l_modifier_line_tbl(i).max_qty_per_rule IS NULL OR l_modifier_line_tbl(i).max_qty_per_rule = FND_API.G_MISS_NUM)
7890: AND l_modifier_line_tbl(i).qd_estimated_qty_is_max = 'Y' THEN
7891: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
7892: Fnd_Message.SET_NAME('OZF','OZF_TRD_DEAL_NO_QTY');
7893: Fnd_Msg_Pub.ADD;
7894: END IF;
7895: RAISE Fnd_Api.g_exc_error;
7896: END IF;
7897:
7896: END IF;
7897:
7898: IF (l_modifier_line_tbl(i).max_amount_per_rule IS NULL OR l_modifier_line_tbl(i).max_amount_per_rule = FND_API.G_MISS_NUM)
7899: AND l_modifier_line_tbl(i).qd_estimated_amount_is_max = 'Y' THEN
7900: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
7901: Fnd_Message.SET_NAME('OZF', 'OZF_TRD_DEAL_NO_AMT');
7902: Fnd_Msg_Pub.ADD;
7903: END IF;
7904: RAISE Fnd_Api.g_exc_error;
7898: IF (l_modifier_line_tbl(i).max_amount_per_rule IS NULL OR l_modifier_line_tbl(i).max_amount_per_rule = FND_API.G_MISS_NUM)
7899: AND l_modifier_line_tbl(i).qd_estimated_amount_is_max = 'Y' THEN
7900: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
7901: Fnd_Message.SET_NAME('OZF', 'OZF_TRD_DEAL_NO_AMT');
7902: Fnd_Msg_Pub.ADD;
7903: END IF;
7904: RAISE Fnd_Api.g_exc_error;
7905: END IF;
7906:
8094:
8095: EXCEPTION
8096: WHEN Fnd_Api.G_EXC_ERROR THEN
8097: x_return_status := Fnd_Api.g_ret_sts_error ;
8098: Fnd_Msg_Pub.Count_AND_Get
8099: ( p_count => x_msg_count,
8100: p_data => x_msg_data,
8101: p_encoded => Fnd_Api.G_FALSE
8102: );
8101: p_encoded => Fnd_Api.G_FALSE
8102: );
8103: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
8104: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
8105: Fnd_Msg_Pub.Count_AND_Get
8106: ( p_count => x_msg_count,
8107: p_data => x_msg_data,
8108: p_encoded => Fnd_Api.G_FALSE
8109: );
8108: p_encoded => Fnd_Api.G_FALSE
8109: );
8110: WHEN OTHERS THEN
8111: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
8112: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
8113: THEN
8114: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
8115: END IF;
8116: Fnd_Msg_Pub.Count_AND_Get
8110: WHEN OTHERS THEN
8111: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
8112: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
8113: THEN
8114: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
8115: END IF;
8116: Fnd_Msg_Pub.Count_AND_Get
8117: ( p_count => x_msg_count,
8118: p_data => x_msg_data,
8112: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
8113: THEN
8114: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
8115: END IF;
8116: Fnd_Msg_Pub.Count_AND_Get
8117: ( p_count => x_msg_count,
8118: p_data => x_msg_data,
8119: p_encoded => Fnd_Api.G_FALSE
8120: );
8298: EXCEPTION
8299: WHEN Fnd_Api.G_EXC_ERROR THEN
8300: x_return_status := Fnd_Api.g_ret_sts_error ;
8301: ROLLBACK TO process_qp_list_lines;
8302: Fnd_Msg_Pub.Count_AND_Get
8303: ( p_count => x_msg_count,
8304: p_data => x_msg_data,
8305: p_encoded => Fnd_Api.G_FALSE
8306: );
8306: );
8307: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
8308: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
8309: ROLLBACK TO process_qp_list_lines;
8310: Fnd_Msg_Pub.Count_AND_Get
8311: ( p_count => x_msg_count,
8312: p_data => x_msg_data,
8313: p_encoded => Fnd_Api.G_FALSE
8314: );
8314: );
8315: WHEN OTHERS THEN
8316: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
8317: ROLLBACK TO process_qp_list_lines;
8318: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
8319: THEN
8320: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
8321: END IF;
8322: Fnd_Msg_Pub.Count_AND_Get
8316: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
8317: ROLLBACK TO process_qp_list_lines;
8318: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
8319: THEN
8320: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
8321: END IF;
8322: Fnd_Msg_Pub.Count_AND_Get
8323: ( p_count => x_msg_count,
8324: p_data => x_msg_data,
8318: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
8319: THEN
8320: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
8321: END IF;
8322: Fnd_Msg_Pub.Count_AND_Get
8323: ( p_count => x_msg_count,
8324: p_data => x_msg_data,
8325: p_encoded => Fnd_Api.G_FALSE
8326: );
8383: END IF;
8384:
8385: END IF;
8386:
8387: Fnd_Msg_Pub.Count_AND_Get
8388: ( p_count => x_msg_count,
8389: p_data => x_msg_data,
8390: p_encoded => Fnd_Api.G_FALSE
8391: );
8392:
8393: EXCEPTION
8394: WHEN Fnd_Api.G_EXC_ERROR THEN
8395: x_return_status := Fnd_Api.g_ret_sts_error ;
8396: Fnd_Msg_Pub.Count_AND_Get
8397: ( p_count => x_msg_count,
8398: p_data => x_msg_data,
8399: p_encoded => Fnd_Api.G_FALSE
8400: );
8399: p_encoded => Fnd_Api.G_FALSE
8400: );
8401: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
8402: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
8403: Fnd_Msg_Pub.Count_AND_Get
8404: ( p_count => x_msg_count,
8405: p_data => x_msg_data,
8406: p_encoded => Fnd_Api.G_FALSE
8407: );
8406: p_encoded => Fnd_Api.G_FALSE
8407: );
8408: WHEN OTHERS THEN
8409: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
8410: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
8411: THEN
8412: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
8413: END IF;
8414: Fnd_Msg_Pub.Count_AND_Get
8408: WHEN OTHERS THEN
8409: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
8410: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
8411: THEN
8412: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
8413: END IF;
8414: Fnd_Msg_Pub.Count_AND_Get
8415: ( p_count => x_msg_count,
8416: p_data => x_msg_data,
8410: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
8411: THEN
8412: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
8413: END IF;
8414: Fnd_Msg_Pub.Count_AND_Get
8415: ( p_count => x_msg_count,
8416: p_data => x_msg_data,
8417: p_encoded => Fnd_Api.G_FALSE
8418: );
8601: EXCEPTION
8602: WHEN OTHERS THEN
8603: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
8604: ROLLBACK TO update_offer_status;
8605: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
8606: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
8607: END IF;
8608: Fnd_Msg_Pub.Count_AND_Get(p_count => x_msg_count,
8609: p_data => x_msg_data,
8602: WHEN OTHERS THEN
8603: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
8604: ROLLBACK TO update_offer_status;
8605: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
8606: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
8607: END IF;
8608: Fnd_Msg_Pub.Count_AND_Get(p_count => x_msg_count,
8609: p_data => x_msg_data,
8610: p_encoded => Fnd_Api.G_FALSE);
8604: ROLLBACK TO update_offer_status;
8605: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR ) THEN
8606: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
8607: END IF;
8608: Fnd_Msg_Pub.Count_AND_Get(p_count => x_msg_count,
8609: p_data => x_msg_data,
8610: p_encoded => Fnd_Api.G_FALSE);
8611: END update_offer_status;
8612:
8796: BEGIN
8797: SAVEPOINT process_modifiers;
8798: --dbms_output.put_line('calling qp procedure');
8799: IF Fnd_Api.to_boolean(p_init_msg_list) THEN
8800: Fnd_Msg_Pub.initialize;
8801: END IF;
8802:
8803: IF NOT Fnd_Api.compatible_api_call
8804: (
8815:
8816: -- added by julou 14-DEC-2001 check default profile values before going any further
8817: IF FND_PROFILE.value('OZF_PRICING_PHASE_LINEGROUP') IS NULL THEN
8818: FND_MESSAGE.set_name('OZF','OZF_NO_PRICING_PHASE_LINEGROUP');
8819: FND_MSG_PUB.add;
8820: RAISE FND_API.g_exc_unexpected_error;
8821: END IF;
8822:
8823: IF FND_PROFILE.value('OZF_PRICING_PHASE_LINE') IS NULL THEN
8821: END IF;
8822:
8823: IF FND_PROFILE.value('OZF_PRICING_PHASE_LINE') IS NULL THEN
8824: FND_MESSAGE.set_name('OZF','OZF_NO_PRICING_PHASE_LINE');
8825: FND_MSG_PUB.add;
8826: RAISE FND_API.g_exc_unexpected_error;
8827: END IF;
8828:
8829: IF FND_PROFILE.value('OZF_PRICING_PHASE_ORDER') IS NULL THEN
8827: END IF;
8828:
8829: IF FND_PROFILE.value('OZF_PRICING_PHASE_ORDER') IS NULL THEN
8830: FND_MESSAGE.set_name('OZF','OZF_NO_PRICING_PHASE_ORDER');
8831: FND_MSG_PUB.add;
8832: RAISE FND_API.g_exc_unexpected_error;
8833: END IF;
8834:
8835: IF FND_PROFILE.value('OZF_PRICING_GROUP_SEQUENCE') IS NULL THEN
8833: END IF;
8834:
8835: IF FND_PROFILE.value('OZF_PRICING_GROUP_SEQUENCE') IS NULL THEN
8836: FND_MESSAGE.set_name('OZF','OZF_NO_PRICING_GROUP_SEQUENCE');
8837: FND_MSG_PUB.add;
8838: RAISE FND_API.g_exc_unexpected_error;
8839: END IF;
8840:
8841: IF FND_PROFILE.value('OZF_PRINT_ON_INVOICE') IS NULL THEN
8839: END IF;
8840:
8841: IF FND_PROFILE.value('OZF_PRINT_ON_INVOICE') IS NULL THEN
8842: FND_MESSAGE.set_name('OZF','OZF_NO_PRINT_ON_INVOICE');
8843: FND_MSG_PUB.add;
8844: RAISE FND_API.g_exc_unexpected_error;
8845: END IF;
8846: /* julou bug 3498759 - comment OUT NOCOPY as these profiles are not mandatory
8847: IF FND_PROFILE.value('OZF_INCOMPATIBILITY_GROUP') IS NULL THEN
8845: END IF;
8846: /* julou bug 3498759 - comment OUT NOCOPY as these profiles are not mandatory
8847: IF FND_PROFILE.value('OZF_INCOMPATIBILITY_GROUP') IS NULL THEN
8848: FND_MESSAGE.set_name('OZF','OZF_NO_INCOMPATIBILITY_GROUP');
8849: FND_MSG_PUB.add;
8850: RAISE FND_API.g_exc_unexpected_error;
8851: END IF;
8852: */
8853: IF FND_PROFILE.value('OZF_PRODUCT_PRECEDENCE') IS NULL THEN
8851: END IF;
8852: */
8853: IF FND_PROFILE.value('OZF_PRODUCT_PRECEDENCE') IS NULL THEN
8854: FND_MESSAGE.set_name('OZF','OZF_NO_PRODUCT_PRECEDENCE');
8855: FND_MSG_PUB.add;
8856: RAISE FND_API.g_exc_unexpected_error;
8857: END IF;
8858:
8859: -- end of code added by julou
8982:
8983: IF p_modifier_list_rec.global_flag = 'Y' THEN
8984: IF p_modifier_list_rec.orig_org_id IS NOT NULL AND p_modifier_list_rec.orig_org_id <> fnd_api.g_miss_num THEN
8985: FND_MESSAGE.set_name('OZF', 'OZF_CLEAR_OU');
8986: FND_MSG_PUB.add;
8987: RAISE FND_API.g_exc_error;
8988: END IF;
8989: END IF;
8990:
9018: )
9019: THEN
9020: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
9021: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','ORG_ID');
9022: FND_MSG_PUB.add;
9023: RAISE FND_API.g_exc_error;
9024: END IF;
9025: END IF;
9026: --dbms_output.put_line('calling process qp_ list header');
9254: debug_message('l_lines_count :'||l_lines_count);
9255:
9256: IF l_lines_count = 0 THEN
9257: IF p_modifier_list_rec.custom_setup_id <> 110 THEN
9258: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
9259: FND_MESSAGE.set_name('OZF', 'OZF_OFFR_NO_DISC_LINES');
9260: FND_MSG_PUB.add;
9261: END IF;
9262: RAISE FND_API.g_exc_error;
9256: IF l_lines_count = 0 THEN
9257: IF p_modifier_list_rec.custom_setup_id <> 110 THEN
9258: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
9259: FND_MESSAGE.set_name('OZF', 'OZF_OFFR_NO_DISC_LINES');
9260: FND_MSG_PUB.add;
9261: END IF;
9262: RAISE FND_API.g_exc_error;
9263: END IF;
9264: END IF;
9265: -- julou end bug 2122722
9266: -- julou BREQ
9267: IF l_emptyDiscStruct = '1' THEN
9268: FND_MESSAGE.set_name('OZF', 'OZF_OFFR_EMPTY_DISC_STRUCT');
9269: FND_MSG_PUB.add;
9270: RAISE FND_API.g_exc_error;
9271: END IF;
9272:
9273:
9272:
9273:
9274: IF l_budget_required = 'Y' THEN
9275: IF get_budget_source_count(p_modifier_list_rec.qp_list_header_id) = 0 THEN
9276: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
9277: FND_MESSAGE.set_name('OZF', 'OZF_OFFR_NO_BUDGET_REQUEST');
9278: FND_MSG_PUB.add;
9279: END IF;
9280: RAISE FND_API.g_exc_error;
9274: IF l_budget_required = 'Y' THEN
9275: IF get_budget_source_count(p_modifier_list_rec.qp_list_header_id) = 0 THEN
9276: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
9277: FND_MESSAGE.set_name('OZF', 'OZF_OFFR_NO_BUDGET_REQUEST');
9278: FND_MSG_PUB.add;
9279: END IF;
9280: RAISE FND_API.g_exc_error;
9281: END IF;
9282: END IF;
9640:
9641: END IF;
9642: END IF;
9643:
9644: Fnd_Msg_Pub.Count_AND_Get
9645: ( p_count => x_msg_count,
9646: p_data => x_msg_data,
9647: p_encoded => Fnd_Api.G_FALSE
9648: );
9652: EXCEPTION
9653: WHEN Fnd_Api.G_EXC_ERROR THEN
9654: x_return_status := Fnd_Api.g_ret_sts_error ;
9655: ROLLBACK TO process_modifiers;
9656: Fnd_Msg_Pub.Count_AND_Get
9657: ( p_count => x_msg_count,
9658: p_data => x_msg_data,
9659: p_encoded => Fnd_Api.G_FALSE
9660: );
9660: );
9661: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
9662: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
9663: ROLLBACK TO process_modifiers;
9664: Fnd_Msg_Pub.Count_AND_Get
9665: ( p_count => x_msg_count,
9666: p_data => x_msg_data,
9667: p_encoded => Fnd_Api.G_FALSE
9668: );
9668: );
9669: WHEN OTHERS THEN
9670: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
9671: ROLLBACK TO process_modifiers;
9672: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
9673: THEN
9674: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
9675: END IF;
9676: Fnd_Msg_Pub.Count_AND_Get
9670: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
9671: ROLLBACK TO process_modifiers;
9672: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
9673: THEN
9674: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
9675: END IF;
9676: Fnd_Msg_Pub.Count_AND_Get
9677: ( p_count => x_msg_count,
9678: p_data => x_msg_data,
9672: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
9673: THEN
9674: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
9675: END IF;
9676: Fnd_Msg_Pub.Count_AND_Get
9677: ( p_count => x_msg_count,
9678: p_data => x_msg_data,
9679: p_encoded => Fnd_Api.G_FALSE
9680: );
10492: EXCEPTION
10493: WHEN Fnd_Api.G_EXC_ERROR THEN
10494: x_return_status := Fnd_Api.g_ret_sts_error ;
10495: ROLLBACK TO push_disc_rules;
10496: Fnd_Msg_Pub.Count_AND_Get
10497: ( p_count => x_msg_count,
10498: p_data => x_msg_data,
10499: p_encoded => Fnd_Api.G_FALSE
10500: );
10500: );
10501: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
10502: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
10503: ROLLBACK TO push_disc_rules;
10504: Fnd_Msg_Pub.Count_AND_Get
10505: ( p_count => x_msg_count,
10506: p_data => x_msg_data,
10507: p_encoded => Fnd_Api.G_FALSE
10508: );
10508: );
10509: WHEN OTHERS THEN
10510: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
10511: ROLLBACK TO push_disc_rules;
10512: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
10513: THEN
10514: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
10515: END IF;
10516: Fnd_Msg_Pub.Count_AND_Get
10510: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
10511: ROLLBACK TO push_disc_rules;
10512: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
10513: THEN
10514: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
10515: END IF;
10516: Fnd_Msg_Pub.Count_AND_Get
10517: ( p_count => x_msg_count,
10518: p_data => x_msg_data,
10512: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
10513: THEN
10514: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
10515: END IF;
10516: Fnd_Msg_Pub.Count_AND_Get
10517: ( p_count => x_msg_count,
10518: p_data => x_msg_data,
10519: p_encoded => Fnd_Api.G_FALSE
10520: );
10711: EXCEPTION
10712: WHEN Fnd_Api.G_EXC_ERROR THEN
10713: x_return_status := Fnd_Api.g_ret_sts_error ;
10714: ROLLBACK TO populateSDHeaderRec;
10715: Fnd_Msg_Pub.Count_AND_Get
10716: ( p_count => x_msg_count,
10717: p_data => x_msg_data,
10718: p_encoded => Fnd_Api.G_FALSE
10719: );
10719: );
10720: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
10721: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
10722: ROLLBACK TO populateSDHeaderRec;
10723: Fnd_Msg_Pub.Count_AND_Get
10724: ( p_count => x_msg_count,
10725: p_data => x_msg_data,
10726: p_encoded => Fnd_Api.G_FALSE
10727: );
10727: );
10728: WHEN OTHERS THEN
10729: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
10730: ROLLBACK TO populateSDHeaderRec;
10731: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
10732: THEN
10733: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,'populateSDHeaderRec');
10734: END IF;
10735: Fnd_Msg_Pub.Count_AND_Get
10729: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
10730: ROLLBACK TO populateSDHeaderRec;
10731: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
10732: THEN
10733: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,'populateSDHeaderRec');
10734: END IF;
10735: Fnd_Msg_Pub.Count_AND_Get
10736: ( p_count => x_msg_count,
10737: p_data => x_msg_data,
10731: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
10732: THEN
10733: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,'populateSDHeaderRec');
10734: END IF;
10735: Fnd_Msg_Pub.Count_AND_Get
10736: ( p_count => x_msg_count,
10737: p_data => x_msg_data,
10738: p_encoded => Fnd_Api.G_FALSE
10739: );
10971: EXCEPTION
10972: WHEN Fnd_Api.G_EXC_ERROR THEN
10973: x_return_status := Fnd_Api.g_ret_sts_error ;
10974: ROLLBACK TO populateSDDiscountRulesRec;
10975: Fnd_Msg_Pub.Count_AND_Get
10976: ( p_count => x_msg_count,
10977: p_data => x_msg_data,
10978: p_encoded => Fnd_Api.G_FALSE
10979: );
10979: );
10980: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
10981: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
10982: ROLLBACK TO populateSDDiscountRulesRec;
10983: Fnd_Msg_Pub.Count_AND_Get
10984: ( p_count => x_msg_count,
10985: p_data => x_msg_data,
10986: p_encoded => Fnd_Api.G_FALSE
10987: );
10987: );
10988: WHEN OTHERS THEN
10989: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
10990: ROLLBACK TO populateSDDiscountRulesRec;
10991: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
10992: THEN
10993: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,'populateSDDiscountRulesRec');
10994: END IF;
10995: Fnd_Msg_Pub.Count_AND_Get
10989: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
10990: ROLLBACK TO populateSDDiscountRulesRec;
10991: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
10992: THEN
10993: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,'populateSDDiscountRulesRec');
10994: END IF;
10995: Fnd_Msg_Pub.Count_AND_Get
10996: ( p_count => x_msg_count,
10997: p_data => x_msg_data,
10991: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
10992: THEN
10993: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,'populateSDDiscountRulesRec');
10994: END IF;
10995: Fnd_Msg_Pub.Count_AND_Get
10996: ( p_count => x_msg_count,
10997: p_data => x_msg_data,
10998: p_encoded => Fnd_Api.G_FALSE
10999: );
11272: EXCEPTION
11273: WHEN Fnd_Api.G_EXC_ERROR THEN
11274: x_return_status := Fnd_Api.g_ret_sts_error ;
11275: ROLLBACK TO populateSDQualifiers;
11276: Fnd_Msg_Pub.Count_AND_Get
11277: ( p_count => x_msg_count,
11278: p_data => x_msg_data,
11279: p_encoded => Fnd_Api.G_FALSE
11280: );
11280: );
11281: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
11282: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
11283: ROLLBACK TO populateSDQualifiers;
11284: Fnd_Msg_Pub.Count_AND_Get
11285: ( p_count => x_msg_count,
11286: p_data => x_msg_data,
11287: p_encoded => Fnd_Api.G_FALSE
11288: );
11288: );
11289: WHEN OTHERS THEN
11290: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
11291: ROLLBACK TO populateSDQualifiers;
11292: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
11293: THEN
11294: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,'populateSDQualifiers');
11295: END IF;
11296: Fnd_Msg_Pub.Count_AND_Get
11290: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
11291: ROLLBACK TO populateSDQualifiers;
11292: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
11293: THEN
11294: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,'populateSDQualifiers');
11295: END IF;
11296: Fnd_Msg_Pub.Count_AND_Get
11297: ( p_count => x_msg_count,
11298: p_data => x_msg_data,
11292: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
11293: THEN
11294: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,'populateSDQualifiers');
11295: END IF;
11296: Fnd_Msg_Pub.Count_AND_Get
11297: ( p_count => x_msg_count,
11298: p_data => x_msg_data,
11299: p_encoded => Fnd_Api.G_FALSE
11300: );
11436: BEGIN
11437:
11438: SAVEPOINT process_sd_modifiers;
11439: IF Fnd_Api.to_boolean(p_init_msg_list) THEN
11440: Fnd_Msg_Pub.initialize;
11441: END IF;
11442:
11443: IF NOT Fnd_Api.compatible_api_call(l_api_version,
11444: p_api_version,
11452: x_error_location := 0;
11453: g_sd_offer := 'Y';
11454:
11455: IF FND_PROFILE.VALUE('OZF_SD_DEFAULT_BUDGET') IS NULL THEN
11456: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
11457: FND_MESSAGE.set_name('OZF', 'OZF_SD_OFFR_NO_BUDGET_REQUEST');
11458: FND_MSG_PUB.add;
11459: END IF;
11460: RAISE Fnd_Api.g_exc_unexpected_error;
11454:
11455: IF FND_PROFILE.VALUE('OZF_SD_DEFAULT_BUDGET') IS NULL THEN
11456: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
11457: FND_MESSAGE.set_name('OZF', 'OZF_SD_OFFR_NO_BUDGET_REQUEST');
11458: FND_MSG_PUB.add;
11459: END IF;
11460: RAISE Fnd_Api.g_exc_unexpected_error;
11461: END IF;
11462:
11619: ,x_error_location => x_error_location);
11620:
11621: ELSE
11622:
11623: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
11624: FND_MESSAGE.set_name('OZF', 'OZF_OFFR_NO_DISC_LINES');
11625: FND_MSG_PUB.add;
11626: END IF;
11627: RAISE FND_API.g_exc_error;
11621: ELSE
11622:
11623: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
11624: FND_MESSAGE.set_name('OZF', 'OZF_OFFR_NO_DISC_LINES');
11625: FND_MSG_PUB.add;
11626: END IF;
11627: RAISE FND_API.g_exc_error;
11628: END IF;
11629:
11909: EXCEPTION
11910: WHEN Fnd_Api.G_EXC_ERROR THEN
11911: x_return_status := Fnd_Api.g_ret_sts_error ;
11912: ROLLBACK TO process_sd_modifiers;
11913: Fnd_Msg_Pub.Count_AND_Get
11914: ( p_count => x_msg_count,
11915: p_data => x_msg_data,
11916: p_encoded => Fnd_Api.G_FALSE
11917: );
11917: );
11918: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
11919: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
11920: ROLLBACK TO process_sd_modifiers;
11921: Fnd_Msg_Pub.Count_AND_Get
11922: ( p_count => x_msg_count,
11923: p_data => x_msg_data,
11924: p_encoded => Fnd_Api.G_FALSE
11925: );
11925: );
11926: WHEN OTHERS THEN
11927: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
11928: ROLLBACK TO process_sd_modifiers;
11929: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
11930: THEN
11931: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
11932: END IF;
11933: Fnd_Msg_Pub.Count_AND_Get
11927: x_return_status := Fnd_Api.g_ret_sts_unexp_erroR ;
11928: ROLLBACK TO process_sd_modifiers;
11929: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
11930: THEN
11931: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
11932: END IF;
11933: Fnd_Msg_Pub.Count_AND_Get
11934: ( p_count => x_msg_count,
11935: p_data => x_msg_data,
11929: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
11930: THEN
11931: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
11932: END IF;
11933: Fnd_Msg_Pub.Count_AND_Get
11934: ( p_count => x_msg_count,
11935: p_data => x_msg_data,
11936: p_encoded => Fnd_Api.G_FALSE
11937: );