[Home] [Help]
57: -- x_return_status OUT VARCHAR2
58: -- x_msg_count OUT NUMBER
59: -- x_msg_data OUT VARCHAR2
60: -- Version : Current version 1.0
61: -- Note: This automatic generated procedure definition, it includes standard IN/OUT parameters
62: -- and basic operation, developer must manually add parameters and business logic as necessary.
63: --
64: -- History
65: --
118: END IF;
119:
120:
121:
122: -- Standard call to check for call compatibility.
123: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
124: p_api_version_number,
125: l_api_name,
126: G_PKG_NAME)
152:
153: WHEN FND_API.G_EXC_ERROR THEN
154: ROLLBACK TO LOCK_Ozf_Disc_Line_PVT;
155: x_return_status := FND_API.G_RET_STS_ERROR;
156: -- Standard call to get message count and if count=1, get the message
157: FND_MSG_PUB.Count_And_Get (
158: p_encoded => FND_API.G_FALSE,
159: p_count => x_msg_count,
160: p_data => x_msg_data
162:
163: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
164: ROLLBACK TO LOCK_Ozf_Disc_Line_PVT;
165: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
166: -- Standard call to get message count and if count=1, get the message
167: FND_MSG_PUB.Count_And_Get (
168: p_encoded => FND_API.G_FALSE,
169: p_count => x_msg_count,
170: p_data => x_msg_data
176: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
177: THEN
178: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
179: END IF;
180: -- Standard call to get message count and if count=1, get the message
181: FND_MSG_PUB.Count_And_Get (
182: p_encoded => FND_API.G_FALSE,
183: p_count => x_msg_count,
184: p_data => x_msg_data
749: -- x_return_status := FND_API.G_RET_STS_ERROR;
750:
751: -- Debug Message
752: OZF_UTILITY_PVT.debug_message('Private API: Validate_dm_model_rec');
753: -- Standard call to get message count and if count is 1, get message info.
754: FND_MSG_PUB.Count_And_Get
755: (p_count => x_msg_count,
756: p_data => x_msg_data
757: );
774: l_object_version_number NUMBER;
775: l_ozf_offer_line_rec ozf_offer_line_rec_type;
776:
777: BEGIN
778: -- Standard Start of API savepoint
779: SAVEPOINT validate_ozf_disc_line_;
780:
781: -- Standard call to check for call compatibility.
782: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
777: BEGIN
778: -- Standard Start of API savepoint
779: SAVEPOINT validate_ozf_disc_line_;
780:
781: -- Standard call to check for call compatibility.
782: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
783: p_api_version_number,
784: l_api_name,
785: G_PKG_NAME)
846: -- Debug Message
847: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
848:
849:
850: -- Standard call to get message count and if count is 1, get message info.
851: FND_MSG_PUB.Count_And_Get
852: (p_count => x_msg_count,
853: p_data => x_msg_data
854: );
860:
861: WHEN FND_API.G_EXC_ERROR THEN
862: ROLLBACK TO VALIDATE_Ozf_Disc_Line_;
863: x_return_status := FND_API.G_RET_STS_ERROR;
864: -- Standard call to get message count and if count=1, get the message
865: FND_MSG_PUB.Count_And_Get (
866: p_encoded => FND_API.G_FALSE,
867: p_count => x_msg_count,
868: p_data => x_msg_data
870:
871: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
872: ROLLBACK TO VALIDATE_Ozf_Disc_Line_;
873: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
874: -- Standard call to get message count and if count=1, get the message
875: FND_MSG_PUB.Count_And_Get (
876: p_encoded => FND_API.G_FALSE,
877: p_count => x_msg_count,
878: p_data => x_msg_data
884: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
885: THEN
886: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
887: END IF;
888: -- Standard call to get message count and if count=1, get the message
889: FND_MSG_PUB.Count_And_Get (
890: p_encoded => FND_API.G_FALSE,
891: p_count => x_msg_count,
892: p_data => x_msg_data
924: -- x_return_status OUT VARCHAR2
925: -- x_msg_count OUT NUMBER
926: -- x_msg_data OUT VARCHAR2
927: -- Version : Current version 1.0
928: -- Note: This automatic generated procedure definition, it includes standard IN/OUT parameters
929: -- and basic operation, developer must manually add parameters and business logic as necessary.
930: --
931: -- History
932: --
966: SELECT 1
967: FROM OZF_OFFER_DISCOUNT_LINES
968: WHERE offer_discount_line_id = l_id;
969: BEGIN
970: -- Standard Start of API savepoint
971: SAVEPOINT create_ozf_disc_line_pvt;
972:
973: -- Standard call to check for call compatibility.
974: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
969: BEGIN
970: -- Standard Start of API savepoint
971: SAVEPOINT create_ozf_disc_line_pvt;
972:
973: -- Standard call to check for call compatibility.
974: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
975: p_api_version_number,
976: l_api_name,
977: G_PKG_NAME)
1107: --
1108: -- End of API body
1109: --
1110:
1111: -- Standard check for p_commit
1112: IF FND_API.to_Boolean( p_commit )
1113: THEN
1114: COMMIT WORK;
1115: END IF;
1117:
1118: -- Debug Message
1119: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
1120:
1121: -- Standard call to get message count and if count is 1, get message info.
1122: FND_MSG_PUB.Count_And_Get
1123: (p_count => x_msg_count,
1124: p_data => x_msg_data
1125: );
1131:
1132: WHEN FND_API.G_EXC_ERROR THEN
1133: ROLLBACK TO CREATE_Ozf_Disc_Line_PVT;
1134: x_return_status := FND_API.G_RET_STS_ERROR;
1135: -- Standard call to get message count and if count=1, get the message
1136: FND_MSG_PUB.Count_And_Get (
1137: p_encoded => FND_API.G_FALSE,
1138: p_count => x_msg_count,
1139: p_data => x_msg_data
1141:
1142: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1143: ROLLBACK TO CREATE_Ozf_Disc_Line_PVT;
1144: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1145: -- Standard call to get message count and if count=1, get the message
1146: FND_MSG_PUB.Count_And_Get (
1147: p_encoded => FND_API.G_FALSE,
1148: p_count => x_msg_count,
1149: p_data => x_msg_data
1155: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1156: THEN
1157: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1158: END IF;
1159: -- Standard call to get message count and if count=1, get the message
1160: FND_MSG_PUB.Count_And_Get (
1161: p_encoded => FND_API.G_FALSE,
1162: p_count => x_msg_count,
1163: p_data => x_msg_data
1187: -- x_return_status OUT VARCHAR2
1188: -- x_msg_count OUT NUMBER
1189: -- x_msg_data OUT VARCHAR2
1190: -- Version : Current version 1.0
1191: -- Note: This automatic generated procedure definition, it includes standard IN/OUT parameters
1192: -- and basic operation, developer must manually add parameters and business logic as necessary.
1193: --
1194: -- History
1195: --
1230: l_tar_ozf_offer_line_rec ozf_offer_line_rec_type := P_ozf_offer_line_rec;
1231: l_rowid ROWID;
1232:
1233: BEGIN
1234: -- Standard Start of API savepoint
1235: SAVEPOINT update_ozf_disc_line_pvt;
1236:
1237: -- Standard call to check for call compatibility.
1238: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1233: BEGIN
1234: -- Standard Start of API savepoint
1235: SAVEPOINT update_ozf_disc_line_pvt;
1236:
1237: -- Standard call to check for call compatibility.
1238: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1239: p_api_version_number,
1240: l_api_name,
1241: G_PKG_NAME)
1364: --
1365: -- End of API body.
1366: --
1367:
1368: -- Standard check for p_commit
1369: IF FND_API.to_Boolean( p_commit )
1370: THEN
1371: COMMIT WORK;
1372: END IF;
1375: -- Debug Message
1376: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
1377:
1378:
1379: -- Standard call to get message count and if count is 1, get message info.
1380: FND_MSG_PUB.Count_And_Get
1381: (p_count => x_msg_count,
1382: p_data => x_msg_data
1383: );
1389:
1390: WHEN FND_API.G_EXC_ERROR THEN
1391: ROLLBACK TO UPDATE_Ozf_Disc_Line_PVT;
1392: x_return_status := FND_API.G_RET_STS_ERROR;
1393: -- Standard call to get message count and if count=1, get the message
1394: FND_MSG_PUB.Count_And_Get (
1395: p_encoded => FND_API.G_FALSE,
1396: p_count => x_msg_count,
1397: p_data => x_msg_data
1399:
1400: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1401: ROLLBACK TO UPDATE_Ozf_Disc_Line_PVT;
1402: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1403: -- Standard call to get message count and if count=1, get the message
1404: FND_MSG_PUB.Count_And_Get (
1405: p_encoded => FND_API.G_FALSE,
1406: p_count => x_msg_count,
1407: p_data => x_msg_data
1413: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1414: THEN
1415: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1416: END IF;
1417: -- Standard call to get message count and if count=1, get the message
1418: FND_MSG_PUB.Count_And_Get (
1419: p_encoded => FND_API.G_FALSE,
1420: p_count => x_msg_count,
1421: p_data => x_msg_data
1446: -- x_return_status OUT VARCHAR2
1447: -- x_msg_count OUT NUMBER
1448: -- x_msg_data OUT VARCHAR2
1449: -- Version : Current version 1.0
1450: -- Note: This automatic generated procedure definition, it includes standard IN/OUT parameters
1451: -- and basic operation, developer must manually add parameters and business logic as necessary.
1452: --
1453: -- History
1454: --
1474: L_API_VERSION_NUMBER CONSTANT NUMBER := 1.0;
1475: l_object_version_number NUMBER;
1476:
1477: BEGIN
1478: -- Standard Start of API savepoint
1479: SAVEPOINT delete_ozf_disc_line_pvt;
1480:
1481: -- Standard call to check for call compatibility.
1482: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1477: BEGIN
1478: -- Standard Start of API savepoint
1479: SAVEPOINT delete_ozf_disc_line_pvt;
1480:
1481: -- Standard call to check for call compatibility.
1482: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1483: p_api_version_number,
1484: l_api_name,
1485: G_PKG_NAME)
1517: --
1518: -- End of API body
1519: --
1520:
1521: -- Standard check for p_commit
1522: IF FND_API.to_Boolean( p_commit )
1523: THEN
1524: COMMIT WORK;
1525: END IF;
1528: -- Debug Message
1529: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
1530:
1531:
1532: -- Standard call to get message count and if count is 1, get message info.
1533: FND_MSG_PUB.Count_And_Get
1534: (p_count => x_msg_count,
1535: p_data => x_msg_data
1536: );
1542:
1543: WHEN FND_API.G_EXC_ERROR THEN
1544: ROLLBACK TO DELETE_Ozf_Disc_Line_PVT;
1545: x_return_status := FND_API.G_RET_STS_ERROR;
1546: -- Standard call to get message count and if count=1, get the message
1547: FND_MSG_PUB.Count_And_Get (
1548: p_encoded => FND_API.G_FALSE,
1549: p_count => x_msg_count,
1550: p_data => x_msg_data
1552:
1553: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1554: ROLLBACK TO DELETE_Ozf_Disc_Line_PVT;
1555: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1556: -- Standard call to get message count and if count=1, get the message
1557: FND_MSG_PUB.Count_And_Get (
1558: p_encoded => FND_API.G_FALSE,
1559: p_count => x_msg_count,
1560: p_data => x_msg_data
1566: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1567: THEN
1568: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1569: END IF;
1570: -- Standard call to get message count and if count=1, get the message
1571: FND_MSG_PUB.Count_And_Get (
1572: p_encoded => FND_API.G_FALSE,
1573: p_count => x_msg_count,
1574: p_data => x_msg_data
1601: -- x_return_status OUT VARCHAR2
1602: -- x_msg_count OUT NUMBER
1603: -- x_msg_data OUT VARCHAR2
1604: -- Version : Current version 1.0
1605: -- Note: This automatic generated procedure definition, it includes standard IN/OUT parameters
1606: -- and basic operation, developer must manually add parameters and business logic as necessary.
1607: --
1608: -- History
1609: --
1643: END IF;
1644:
1645:
1646:
1647: -- Standard call to check for call compatibility.
1648: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1649: p_api_version_number,
1650: l_api_name,
1651: G_PKG_NAME)
1677:
1678: WHEN FND_API.G_EXC_ERROR THEN
1679: ROLLBACK TO Lock_Ozf_Prod_Line_PVT;
1680: x_return_status := FND_API.G_RET_STS_ERROR;
1681: -- Standard call to get message count and if count=1, get the message
1682: FND_MSG_PUB.Count_And_Get (
1683: p_encoded => FND_API.G_FALSE,
1684: p_count => x_msg_count,
1685: p_data => x_msg_data
1687:
1688: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1689: ROLLBACK TO Lock_Ozf_Prod_Line_PVT;
1690: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1691: -- Standard call to get message count and if count=1, get the message
1692: FND_MSG_PUB.Count_And_Get (
1693: p_encoded => FND_API.G_FALSE,
1694: p_count => x_msg_count,
1695: p_data => x_msg_data
1701: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1702: THEN
1703: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1704: END IF;
1705: -- Standard call to get message count and if count=1, get the message
1706: FND_MSG_PUB.Count_And_Get (
1707: p_encoded => FND_API.G_FALSE,
1708: p_count => x_msg_count,
1709: p_data => x_msg_data
2123: -- x_return_status := FND_API.G_RET_STS_ERROR;
2124:
2125: -- Debug Message
2126: OZF_UTILITY_PVT.debug_message('Private API: Validate_dm_model_rec');
2127: -- Standard call to get message count and if count is 1, get message info.
2128: FND_MSG_PUB.Count_And_Get
2129: (p_count => x_msg_count,
2130: p_data => x_msg_data
2131: );
2146: l_object_version_number NUMBER;
2147: l_ozf_prod_rec ozf_prod_rec_type;
2148:
2149: BEGIN
2150: -- Standard Start of API savepoint
2151: SAVEPOINT validate_create_ozf_prod_line_;
2152:
2153: -- Standard call to check for call compatibility.
2154: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2149: BEGIN
2150: -- Standard Start of API savepoint
2151: SAVEPOINT validate_create_ozf_prod_line_;
2152:
2153: -- Standard call to check for call compatibility.
2154: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2155: p_api_version_number,
2156: l_api_name,
2157: G_PKG_NAME)
2214: -- Debug Message
2215: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
2216:
2217:
2218: -- Standard call to get message count and if count is 1, get message info.
2219: FND_MSG_PUB.Count_And_Get
2220: (p_count => x_msg_count,
2221: p_data => x_msg_data
2222: );
2228:
2229: WHEN FND_API.G_EXC_ERROR THEN
2230: ROLLBACK TO VALIDATE_Create_Ozf_Prod_Line_;
2231: x_return_status := FND_API.G_RET_STS_ERROR;
2232: -- Standard call to get message count and if count=1, get the message
2233: FND_MSG_PUB.Count_And_Get (
2234: p_encoded => FND_API.G_FALSE,
2235: p_count => x_msg_count,
2236: p_data => x_msg_data
2238:
2239: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2240: ROLLBACK TO VALIDATE_Create_Ozf_Prod_Line_;
2241: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2242: -- Standard call to get message count and if count=1, get the message
2243: FND_MSG_PUB.Count_And_Get (
2244: p_encoded => FND_API.G_FALSE,
2245: p_count => x_msg_count,
2246: p_data => x_msg_data
2252: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2253: THEN
2254: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2255: END IF;
2256: -- Standard call to get message count and if count=1, get the message
2257: FND_MSG_PUB.Count_And_Get (
2258: p_encoded => FND_API.G_FALSE,
2259: p_count => x_msg_count,
2260: p_data => x_msg_data
2285: -- x_return_status OUT VARCHAR2
2286: -- x_msg_count OUT NUMBER
2287: -- x_msg_data OUT VARCHAR2
2288: -- Version : Current version 1.0
2289: -- Note: This automatic generated procedure definition, it includes standard IN/OUT parameters
2290: -- and basic operation, developer must manually add parameters and business logic as necessary.
2291: --
2292: -- History
2293: --
2328: SELECT 1
2329: FROM OZF_OFFER_DISCOUNT_PRODUCTS
2330: WHERE off_discount_product_id = l_id;
2331: BEGIN
2332: -- Standard Start of API savepoint
2333: SAVEPOINT Create_Ozf_Prod_Line_pvt;
2334:
2335: -- Standard call to check for call compatibility.
2336: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2331: BEGIN
2332: -- Standard Start of API savepoint
2333: SAVEPOINT Create_Ozf_Prod_Line_pvt;
2334:
2335: -- Standard call to check for call compatibility.
2336: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2337: p_api_version_number,
2338: l_api_name,
2339: G_PKG_NAME)
2446: --
2447: -- End of API body
2448: --
2449:
2450: -- Standard check for p_commit
2451: IF FND_API.to_Boolean( p_commit )
2452: THEN
2453: COMMIT WORK;
2454: END IF;
2457: -- Debug Message
2458: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
2459:
2460:
2461: -- Standard call to get message count and if count is 1, get message info.
2462: FND_MSG_PUB.Count_And_Get
2463: (p_count => x_msg_count,
2464: p_data => x_msg_data
2465: );
2471:
2472: WHEN FND_API.G_EXC_ERROR THEN
2473: ROLLBACK TO Create_Ozf_Prod_Line_PVT;
2474: x_return_status := FND_API.G_RET_STS_ERROR;
2475: -- Standard call to get message count and if count=1, get the message
2476: FND_MSG_PUB.Count_And_Get (
2477: p_encoded => FND_API.G_FALSE,
2478: p_count => x_msg_count,
2479: p_data => x_msg_data
2481:
2482: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2483: ROLLBACK TO Create_Ozf_Prod_Line_PVT;
2484: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2485: -- Standard call to get message count and if count=1, get the message
2486: FND_MSG_PUB.Count_And_Get (
2487: p_encoded => FND_API.G_FALSE,
2488: p_count => x_msg_count,
2489: p_data => x_msg_data
2495: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2496: THEN
2497: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2498: END IF;
2499: -- Standard call to get message count and if count=1, get the message
2500: FND_MSG_PUB.Count_And_Get (
2501: p_encoded => FND_API.G_FALSE,
2502: p_count => x_msg_count,
2503: p_data => x_msg_data
2527: -- x_return_status OUT VARCHAR2
2528: -- x_msg_count OUT NUMBER
2529: -- x_msg_data OUT VARCHAR2
2530: -- Version : Current version 1.0
2531: -- Note: This automatic generated procedure definition, it includes standard IN/OUT parameters
2532: -- and basic operation, developer must manually add parameters and business logic as necessary.
2533: --
2534: -- History
2535: --
2570: l_tar_ozf_prod_rec ozf_prod_rec_type := P_ozf_prod_rec;
2571: l_rowid ROWID;
2572:
2573: BEGIN
2574: -- Standard Start of API savepoint
2575: SAVEPOINT Update_Ozf_Prod_Line_pvt;
2576:
2577: -- Standard call to check for call compatibility.
2578: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2573: BEGIN
2574: -- Standard Start of API savepoint
2575: SAVEPOINT Update_Ozf_Prod_Line_pvt;
2576:
2577: -- Standard call to check for call compatibility.
2578: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2579: p_api_version_number,
2580: l_api_name,
2581: G_PKG_NAME)
2679: --
2680: -- End of API body.
2681: --
2682:
2683: -- Standard check for p_commit
2684: IF FND_API.to_Boolean( p_commit )
2685: THEN
2686: COMMIT WORK;
2687: END IF;
2690: -- Debug Message
2691: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
2692:
2693:
2694: -- Standard call to get message count and if count is 1, get message info.
2695: FND_MSG_PUB.Count_And_Get
2696: (p_count => x_msg_count,
2697: p_data => x_msg_data
2698: );
2704:
2705: WHEN FND_API.G_EXC_ERROR THEN
2706: ROLLBACK TO Update_Ozf_Prod_Line_PVT;
2707: x_return_status := FND_API.G_RET_STS_ERROR;
2708: -- Standard call to get message count and if count=1, get the message
2709: FND_MSG_PUB.Count_And_Get (
2710: p_encoded => FND_API.G_FALSE,
2711: p_count => x_msg_count,
2712: p_data => x_msg_data
2714:
2715: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2716: ROLLBACK TO Update_Ozf_Prod_Line_PVT;
2717: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2718: -- Standard call to get message count and if count=1, get the message
2719: FND_MSG_PUB.Count_And_Get (
2720: p_encoded => FND_API.G_FALSE,
2721: p_count => x_msg_count,
2722: p_data => x_msg_data
2728: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2729: THEN
2730: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2731: END IF;
2732: -- Standard call to get message count and if count=1, get the message
2733: FND_MSG_PUB.Count_And_Get (
2734: p_encoded => FND_API.G_FALSE,
2735: p_count => x_msg_count,
2736: p_data => x_msg_data
2773: EXCEPTION
2774: WHEN FND_API.G_EXC_ERROR THEN
2775: ROLLBACK TO Delete_Exclusions_sp;
2776: x_return_status := FND_API.G_RET_STS_ERROR;
2777: -- Standard call to get message count and if count=1, get the message
2778: FND_MSG_PUB.Count_And_Get (
2779: p_encoded => FND_API.G_FALSE,
2780: p_count => x_msg_count,
2781: p_data => x_msg_data
2783:
2784: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2785: ROLLBACK TO Delete_Exclusions_sp;
2786: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2787: -- Standard call to get message count and if count=1, get the message
2788: FND_MSG_PUB.Count_And_Get (
2789: p_encoded => FND_API.G_FALSE,
2790: p_count => x_msg_count,
2791: p_data => x_msg_data
2797: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2798: THEN
2799: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2800: END IF;
2801: -- Standard call to get message count and if count=1, get the message
2802: FND_MSG_PUB.Count_And_Get (
2803: p_encoded => FND_API.G_FALSE,
2804: p_count => x_msg_count,
2805: p_data => x_msg_data
2831: -- x_return_status OUT VARCHAR2
2832: -- x_msg_count OUT NUMBER
2833: -- x_msg_data OUT VARCHAR2
2834: -- Version : Current version 1.0
2835: -- Note: This automatic generated procedure definition, it includes standard IN/OUT parameters
2836: -- and basic operation, developer must manually add parameters and business logic as necessary.
2837: --
2838: -- History
2839: --
2863: select offer_id FROM ozf_offer_discount_products where off_discount_product_id = p_off_discount_product_id;
2864: l_offer_id ozf_offers.offer_id%type;
2865:
2866: BEGIN
2867: -- Standard Start of API savepoint
2868: SAVEPOINT Delete_Ozf_Prod_Line_pvt;
2869:
2870: -- Standard call to check for call compatibility.
2871: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2866: BEGIN
2867: -- Standard Start of API savepoint
2868: SAVEPOINT Delete_Ozf_Prod_Line_pvt;
2869:
2870: -- Standard call to check for call compatibility.
2871: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2872: p_api_version_number,
2873: l_api_name,
2874: G_PKG_NAME)
2926: --
2927: -- End of API body
2928: --
2929:
2930: -- Standard check for p_commit
2931: IF FND_API.to_Boolean( p_commit )
2932: THEN
2933: COMMIT WORK;
2934: END IF;
2937: -- Debug Message
2938: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
2939:
2940:
2941: -- Standard call to get message count and if count is 1, get message info.
2942: FND_MSG_PUB.Count_And_Get
2943: (p_count => x_msg_count,
2944: p_data => x_msg_data
2945: );
2951:
2952: WHEN FND_API.G_EXC_ERROR THEN
2953: ROLLBACK TO Delete_Ozf_Prod_Line_PVT;
2954: x_return_status := FND_API.G_RET_STS_ERROR;
2955: -- Standard call to get message count and if count=1, get the message
2956: FND_MSG_PUB.Count_And_Get (
2957: p_encoded => FND_API.G_FALSE,
2958: p_count => x_msg_count,
2959: p_data => x_msg_data
2961:
2962: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2963: ROLLBACK TO Delete_Ozf_Prod_Line_PVT;
2964: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2965: -- Standard call to get message count and if count=1, get the message
2966: FND_MSG_PUB.Count_And_Get (
2967: p_encoded => FND_API.G_FALSE,
2968: p_count => x_msg_count,
2969: p_data => x_msg_data
2975: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2976: THEN
2977: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2978: END IF;
2979: -- Standard call to get message count and if count=1, get the message
2980: FND_MSG_PUB.Count_And_Get (
2981: p_encoded => FND_API.G_FALSE,
2982: p_count => x_msg_count,
2983: p_data => x_msg_data
3011: -- x_return_status OUT VARCHAR2
3012: -- x_msg_count OUT NUMBER
3013: -- x_msg_data OUT VARCHAR2
3014: -- Version : Current version 1.0
3015: -- Note: This automatic generated procedure definition, it includes standard IN/OUT parameters
3016: -- and basic operation, developer must manually add parameters and business logic as necessary.
3017: --
3018: -- History
3019: --
3053: END IF;
3054:
3055:
3056:
3057: -- Standard call to check for call compatibility.
3058: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
3059: p_api_version_number,
3060: l_api_name,
3061: G_PKG_NAME)
3087:
3088: WHEN FND_API.G_EXC_ERROR THEN
3089: ROLLBACK TO LOCK_Prod_Reln_PVT;
3090: x_return_status := FND_API.G_RET_STS_ERROR;
3091: -- Standard call to get message count and if count=1, get the message
3092: FND_MSG_PUB.Count_And_Get (
3093: p_encoded => FND_API.G_FALSE,
3094: p_count => x_msg_count,
3095: p_data => x_msg_data
3097:
3098: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3099: ROLLBACK TO LOCK_Prod_Reln_PVT;
3100: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3101: -- Standard call to get message count and if count=1, get the message
3102: FND_MSG_PUB.Count_And_Get (
3103: p_encoded => FND_API.G_FALSE,
3104: p_count => x_msg_count,
3105: p_data => x_msg_data
3111: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3112: THEN
3113: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3114: END IF;
3115: -- Standard call to get message count and if count=1, get the message
3116: FND_MSG_PUB.Count_And_Get (
3117: p_encoded => FND_API.G_FALSE,
3118: p_count => x_msg_count,
3119: p_data => x_msg_data
3414: -- x_return_status := FND_API.G_RET_STS_ERROR;
3415:
3416: -- Debug Message
3417: OZF_UTILITY_PVT.debug_message('Private API: Validate_dm_model_rec');
3418: -- Standard call to get message count and if count is 1, get message info.
3419: FND_MSG_PUB.Count_And_Get
3420: (p_count => x_msg_count,
3421: p_data => x_msg_data
3422: );
3440: l_object_version_number NUMBER;
3441: l_prod_reln_rec prod_reln_rec_type;
3442:
3443: BEGIN
3444: -- Standard Start of API savepoint
3445: SAVEPOINT validate_prod_reln_;
3446:
3447: -- Standard call to check for call compatibility.
3448: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
3443: BEGIN
3444: -- Standard Start of API savepoint
3445: SAVEPOINT validate_prod_reln_;
3446:
3447: -- Standard call to check for call compatibility.
3448: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
3449: p_api_version_number,
3450: l_api_name,
3451: G_PKG_NAME)
3514: -- Debug Message
3515: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
3516:
3517:
3518: -- Standard call to get message count and if count is 1, get message info.
3519: FND_MSG_PUB.Count_And_Get
3520: (p_count => x_msg_count,
3521: p_data => x_msg_data
3522: );
3528:
3529: WHEN FND_API.G_EXC_ERROR THEN
3530: ROLLBACK TO VALIDATE_Prod_Reln_;
3531: x_return_status := FND_API.G_RET_STS_ERROR;
3532: -- Standard call to get message count and if count=1, get the message
3533: FND_MSG_PUB.Count_And_Get (
3534: p_encoded => FND_API.G_FALSE,
3535: p_count => x_msg_count,
3536: p_data => x_msg_data
3538:
3539: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3540: ROLLBACK TO VALIDATE_Prod_Reln_;
3541: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3542: -- Standard call to get message count and if count=1, get the message
3543: FND_MSG_PUB.Count_And_Get (
3544: p_encoded => FND_API.G_FALSE,
3545: p_count => x_msg_count,
3546: p_data => x_msg_data
3552: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3553: THEN
3554: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3555: END IF;
3556: -- Standard call to get message count and if count=1, get the message
3557: FND_MSG_PUB.Count_And_Get (
3558: p_encoded => FND_API.G_FALSE,
3559: p_count => x_msg_count,
3560: p_data => x_msg_data
3588: -- x_return_status OUT VARCHAR2
3589: -- x_msg_count OUT NUMBER
3590: -- x_msg_data OUT VARCHAR2
3591: -- Version : Current version 1.0
3592: -- Note: This automatic generated procedure definition, it includes standard IN/OUT parameters
3593: -- and basic operation, developer must manually add parameters and business logic as necessary.
3594: --
3595: -- History
3596: --
3631: SELECT 1
3632: FROM OZF_DISCOUNT_PRODUCT_RELN
3633: WHERE discount_product_reln_id = l_id;
3634: BEGIN
3635: -- Standard Start of API savepoint
3636: SAVEPOINT create_prod_reln_pvt;
3637:
3638: -- Standard call to check for call compatibility.
3639: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
3634: BEGIN
3635: -- Standard Start of API savepoint
3636: SAVEPOINT create_prod_reln_pvt;
3637:
3638: -- Standard call to check for call compatibility.
3639: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
3640: p_api_version_number,
3641: l_api_name,
3642: G_PKG_NAME)
3738: --
3739: -- End of API body
3740: --
3741:
3742: -- Standard check for p_commit
3743: IF FND_API.to_Boolean( p_commit )
3744: THEN
3745: COMMIT WORK;
3746: END IF;
3749: -- Debug Message
3750: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
3751:
3752:
3753: -- Standard call to get message count and if count is 1, get message info.
3754: FND_MSG_PUB.Count_And_Get
3755: (p_count => x_msg_count,
3756: p_data => x_msg_data
3757: );
3763:
3764: WHEN FND_API.G_EXC_ERROR THEN
3765: ROLLBACK TO CREATE_Prod_Reln_PVT;
3766: x_return_status := FND_API.G_RET_STS_ERROR;
3767: -- Standard call to get message count and if count=1, get the message
3768: FND_MSG_PUB.Count_And_Get (
3769: p_encoded => FND_API.G_FALSE,
3770: p_count => x_msg_count,
3771: p_data => x_msg_data
3773:
3774: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3775: ROLLBACK TO CREATE_Prod_Reln_PVT;
3776: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3777: -- Standard call to get message count and if count=1, get the message
3778: FND_MSG_PUB.Count_And_Get (
3779: p_encoded => FND_API.G_FALSE,
3780: p_count => x_msg_count,
3781: p_data => x_msg_data
3787: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3788: THEN
3789: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3790: END IF;
3791: -- Standard call to get message count and if count=1, get the message
3792: FND_MSG_PUB.Count_And_Get (
3793: p_encoded => FND_API.G_FALSE,
3794: p_count => x_msg_count,
3795: p_data => x_msg_data
3819: -- x_return_status OUT VARCHAR2
3820: -- x_msg_count OUT NUMBER
3821: -- x_msg_data OUT VARCHAR2
3822: -- Version : Current version 1.0
3823: -- Note: This automatic generated procedure definition, it includes standard IN/OUT parameters
3824: -- and basic operation, developer must manually add parameters and business logic as necessary.
3825: --
3826: -- History
3827: --
3862: l_tar_prod_reln_rec prod_reln_rec_type := P_prod_reln_rec;
3863: l_rowid ROWID;
3864:
3865: BEGIN
3866: -- Standard Start of API savepoint
3867: SAVEPOINT update_prod_reln_pvt;
3868:
3869: -- Standard call to check for call compatibility.
3870: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
3865: BEGIN
3866: -- Standard Start of API savepoint
3867: SAVEPOINT update_prod_reln_pvt;
3868:
3869: -- Standard call to check for call compatibility.
3870: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
3871: p_api_version_number,
3872: l_api_name,
3873: G_PKG_NAME)
3964: --
3965: -- End of API body.
3966: --
3967:
3968: -- Standard check for p_commit
3969: IF FND_API.to_Boolean( p_commit )
3970: THEN
3971: COMMIT WORK;
3972: END IF;
3975: -- Debug Message
3976: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
3977:
3978:
3979: -- Standard call to get message count and if count is 1, get message info.
3980: FND_MSG_PUB.Count_And_Get
3981: (p_count => x_msg_count,
3982: p_data => x_msg_data
3983: );
3989:
3990: WHEN FND_API.G_EXC_ERROR THEN
3991: ROLLBACK TO UPDATE_Prod_Reln_PVT;
3992: x_return_status := FND_API.G_RET_STS_ERROR;
3993: -- Standard call to get message count and if count=1, get the message
3994: FND_MSG_PUB.Count_And_Get (
3995: p_encoded => FND_API.G_FALSE,
3996: p_count => x_msg_count,
3997: p_data => x_msg_data
3999:
4000: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4001: ROLLBACK TO UPDATE_Prod_Reln_PVT;
4002: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4003: -- Standard call to get message count and if count=1, get the message
4004: FND_MSG_PUB.Count_And_Get (
4005: p_encoded => FND_API.G_FALSE,
4006: p_count => x_msg_count,
4007: p_data => x_msg_data
4013: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4014: THEN
4015: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4016: END IF;
4017: -- Standard call to get message count and if count=1, get the message
4018: FND_MSG_PUB.Count_And_Get (
4019: p_encoded => FND_API.G_FALSE,
4020: p_count => x_msg_count,
4021: p_data => x_msg_data
4046: -- x_return_status OUT VARCHAR2
4047: -- x_msg_count OUT NUMBER
4048: -- x_msg_data OUT VARCHAR2
4049: -- Version : Current version 1.0
4050: -- Note: This automatic generated procedure definition, it includes standard IN/OUT parameters
4051: -- and basic operation, developer must manually add parameters and business logic as necessary.
4052: --
4053: -- History
4054: --
4074: L_API_VERSION_NUMBER CONSTANT NUMBER := 1.0;
4075: l_object_version_number NUMBER;
4076:
4077: BEGIN
4078: -- Standard Start of API savepoint
4079: SAVEPOINT delete_prod_reln_pvt;
4080:
4081: -- Standard call to check for call compatibility.
4082: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
4077: BEGIN
4078: -- Standard Start of API savepoint
4079: SAVEPOINT delete_prod_reln_pvt;
4080:
4081: -- Standard call to check for call compatibility.
4082: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
4083: p_api_version_number,
4084: l_api_name,
4085: G_PKG_NAME)
4117: --
4118: -- End of API body
4119: --
4120:
4121: -- Standard check for p_commit
4122: IF FND_API.to_Boolean( p_commit )
4123: THEN
4124: COMMIT WORK;
4125: END IF;
4128: -- Debug Message
4129: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
4130:
4131:
4132: -- Standard call to get message count and if count is 1, get message info.
4133: FND_MSG_PUB.Count_And_Get
4134: (p_count => x_msg_count,
4135: p_data => x_msg_data
4136: );
4142:
4143: WHEN FND_API.G_EXC_ERROR THEN
4144: ROLLBACK TO DELETE_Prod_Reln_PVT;
4145: x_return_status := FND_API.G_RET_STS_ERROR;
4146: -- Standard call to get message count and if count=1, get the message
4147: FND_MSG_PUB.Count_And_Get (
4148: p_encoded => FND_API.G_FALSE,
4149: p_count => x_msg_count,
4150: p_data => x_msg_data
4152:
4153: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4154: ROLLBACK TO DELETE_Prod_Reln_PVT;
4155: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4156: -- Standard call to get message count and if count=1, get the message
4157: FND_MSG_PUB.Count_And_Get (
4158: p_encoded => FND_API.G_FALSE,
4159: p_count => x_msg_count,
4160: p_data => x_msg_data
4166: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4167: THEN
4168: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4169: END IF;
4170: -- Standard call to get message count and if count=1, get the message
4171: FND_MSG_PUB.Count_And_Get (
4172: p_encoded => FND_API.G_FALSE,
4173: p_count => x_msg_count,
4174: p_data => x_msg_data
4273:
4274: BEGIN
4275: SAVEPOINT Create_Product_Pvt;
4276:
4277: -- Standard call to check for call compatibility.
4278: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
4279: p_api_version_number,
4280: l_api_name,
4281: G_PKG_NAME)
4350: EXCEPTION
4351: WHEN FND_API.G_EXC_ERROR THEN
4352: ROLLBACK TO Create_Product_pvt;
4353: x_return_status := FND_API.G_RET_STS_ERROR;
4354: -- Standard call to get message count and if count=1, get the message
4355: FND_MSG_PUB.Count_And_Get (
4356: p_encoded => FND_API.G_FALSE,
4357: p_count => l_msg_count,
4358: p_data => l_msg_data
4360:
4361: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4362: ROLLBACK TO Create_Product_pvt;
4363: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4364: -- Standard call to get message count and if count=1, get the message
4365: FND_MSG_PUB.Count_And_Get (
4366: p_encoded => FND_API.G_FALSE,
4367: p_count => l_msg_count,
4368: p_data => l_msg_data
4374: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4375: THEN
4376: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4377: END IF;
4378: -- Standard call to get message count and if count=1, get the message
4379: FND_MSG_PUB.Count_And_Get (
4380: p_encoded => FND_API.G_FALSE,
4381: p_count => l_msg_count,
4382: p_data => l_msg_data
4450: BEGIN
4451: SAVEPOINT Create_offer_line_pvt;
4452: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
4453:
4454: -- Standard call to check for call compatibility.
4455: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
4456: p_api_version_number,
4457: l_api_name,
4458: G_PKG_NAME)
4522: -- Debug Message
4523: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
4524:
4525:
4526: -- Standard call to get message count and if count is 1, get message info.
4527: FND_MSG_PUB.Count_And_Get
4528: (p_count => x_msg_count,
4529: p_data => x_msg_data
4530: );
4534:
4535: WHEN FND_API.G_EXC_ERROR THEN
4536: ROLLBACK TO Create_offer_line_pvt;
4537: x_return_status := FND_API.G_RET_STS_ERROR;
4538: -- Standard call to get message count and if count=1, get the message
4539: FND_MSG_PUB.Count_And_Get (
4540: p_encoded => FND_API.G_FALSE,
4541: p_count => x_msg_count,
4542: p_data => x_msg_data
4544:
4545: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4546: ROLLBACK TO Create_offer_line_pvt;
4547: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4548: -- Standard call to get message count and if count=1, get the message
4549: FND_MSG_PUB.Count_And_Get (
4550: p_encoded => FND_API.G_FALSE,
4551: p_count => x_msg_count,
4552: p_data => x_msg_data
4558: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4559: THEN
4560: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4561: END IF;
4562: -- Standard call to get message count and if count=1, get the message
4563: FND_MSG_PUB.Count_And_Get (
4564: p_encoded => FND_API.G_FALSE,
4565: p_count => x_msg_count,
4566: p_data => x_msg_data
4698: BEGIN
4699: SAVEPOINT Create_discount_line_pvt;
4700: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
4701:
4702: -- Standard call to check for call compatibility.
4703: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
4704: p_api_version_number,
4705: l_api_name,
4706: G_PKG_NAME)
4763: -- Debug Message
4764: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
4765:
4766:
4767: -- Standard call to get message count and if count is 1, get message info.
4768: FND_MSG_PUB.Count_And_Get
4769: (p_count => x_msg_count,
4770: p_data => x_msg_data
4771: );
4774:
4775: WHEN FND_API.G_EXC_ERROR THEN
4776: ROLLBACK TO Create_discount_line_pvt;
4777: x_return_status := FND_API.G_RET_STS_ERROR;
4778: -- Standard call to get message count and if count=1, get the message
4779: FND_MSG_PUB.Count_And_Get (
4780: p_encoded => FND_API.G_FALSE,
4781: p_count => x_msg_count,
4782: p_data => x_msg_data
4784:
4785: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4786: ROLLBACK TO Create_discount_line_pvt;
4787: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4788: -- Standard call to get message count and if count=1, get the message
4789: FND_MSG_PUB.Count_And_Get (
4790: p_encoded => FND_API.G_FALSE,
4791: p_count => x_msg_count,
4792: p_data => x_msg_data
4798: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4799: THEN
4800: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4801: END IF;
4802: -- Standard call to get message count and if count=1, get the message
4803: FND_MSG_PUB.Count_And_Get (
4804: p_encoded => FND_API.G_FALSE,
4805: p_count => x_msg_count,
4806: p_data => x_msg_data
4872: l_ozf_offer_line_rec ozf_offer_line_rec_type ;
4873: BEGIN
4874: SAVEPOINT Update_offer_line_pvt;
4875:
4876: -- Standard call to check for call compatibility.
4877: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
4878: p_api_version_number,
4879: l_api_name,
4880: G_PKG_NAME)
4940: -- Debug Message
4941: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
4942:
4943:
4944: -- Standard call to get message count and if count is 1, get message info.
4945: FND_MSG_PUB.Count_And_Get
4946: (p_count => x_msg_count,
4947: p_data => x_msg_data
4948: );
4950: EXCEPTION
4951: WHEN FND_API.G_EXC_ERROR THEN
4952: ROLLBACK TO Update_offer_line_pvt;
4953: x_return_status := FND_API.G_RET_STS_ERROR;
4954: -- Standard call to get message count and if count=1, get the message
4955: FND_MSG_PUB.Count_And_Get (
4956: p_encoded => FND_API.G_FALSE,
4957: p_count => x_msg_count,
4958: p_data => x_msg_data
4960:
4961: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4962: ROLLBACK TO Update_offer_line_pvt;
4963: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4964: -- Standard call to get message count and if count=1, get the message
4965: FND_MSG_PUB.Count_And_Get (
4966: p_encoded => FND_API.G_FALSE,
4967: p_count => x_msg_count,
4968: p_data => x_msg_data
4974: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4975: THEN
4976: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4977: END IF;
4978: -- Standard call to get message count and if count=1, get the message
4979: FND_MSG_PUB.Count_And_Get (
4980: p_encoded => FND_API.G_FALSE,
4981: p_count => x_msg_count,
4982: p_data => x_msg_data
5018: BEGIN
5019: SAVEPOINT Update_discount_line_pvt;
5020: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
5021:
5022: -- Standard call to check for call compatibility.
5023: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
5024: p_api_version_number,
5025: l_api_name,
5026: G_PKG_NAME)
5099: -- Debug Message
5100: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
5101:
5102:
5103: -- Standard call to get message count and if count is 1, get message info.
5104: FND_MSG_PUB.Count_And_Get
5105: (p_count => x_msg_count,
5106: p_data => x_msg_data
5107: );
5111:
5112: WHEN FND_API.G_EXC_ERROR THEN
5113: ROLLBACK TO Update_discount_line_pvt;
5114: x_return_status := FND_API.G_RET_STS_ERROR;
5115: -- Standard call to get message count and if count=1, get the message
5116: FND_MSG_PUB.Count_And_Get (
5117: p_encoded => FND_API.G_FALSE,
5118: p_count => x_msg_count,
5119: p_data => x_msg_data
5121:
5122: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5123: ROLLBACK TO Update_discount_line_pvt;
5124: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5125: -- Standard call to get message count and if count=1, get the message
5126: FND_MSG_PUB.Count_And_Get (
5127: p_encoded => FND_API.G_FALSE,
5128: p_count => x_msg_count,
5129: p_data => x_msg_data
5135: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5136: THEN
5137: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
5138: END IF;
5139: -- Standard call to get message count and if count=1, get the message
5140: FND_MSG_PUB.Count_And_Get (
5141: p_encoded => FND_API.G_FALSE,
5142: p_count => x_msg_count,
5143: p_data => x_msg_data
5246: l_discount_line_id NUMBER;
5247: BEGIN
5248: SAVEPOINT Update_product_Pvt;
5249:
5250: -- Standard call to check for call compatibility.
5251: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
5252: p_api_version_number,
5253: l_api_name,
5254: G_PKG_NAME)
5325: -- Debug Message
5326: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
5327:
5328:
5329: -- Standard call to get message count and if count is 1, get message info.
5330: FND_MSG_PUB.Count_And_Get
5331: (p_count => l_msg_count,
5332: p_data => l_msg_data
5333: );
5335: EXCEPTION
5336: WHEN FND_API.G_EXC_ERROR THEN
5337: ROLLBACK TO Update_product_Pvt;
5338: x_return_status := FND_API.G_RET_STS_ERROR;
5339: -- Standard call to get message count and if count=1, get the message
5340: FND_MSG_PUB.Count_And_Get (
5341: p_encoded => FND_API.G_FALSE,
5342: p_count => l_msg_count,
5343: p_data => l_msg_data
5345:
5346: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5347: ROLLBACK TO Update_product_Pvt;
5348: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5349: -- Standard call to get message count and if count=1, get the message
5350: FND_MSG_PUB.Count_And_Get (
5351: p_encoded => FND_API.G_FALSE,
5352: p_count => l_msg_count,
5353: p_data => l_msg_data
5359: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5360: THEN
5361: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
5362: END IF;
5363: -- Standard call to get message count and if count=1, get the message
5364: FND_MSG_PUB.Count_And_Get (
5365: p_encoded => FND_API.G_FALSE,
5366: p_count => l_msg_count,
5367: p_data => l_msg_data
5422:
5423: BEGIN
5424: SAVEPOINT Delete_Relation_Pvt;
5425:
5426: -- Standard call to check for call compatibility.
5427: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
5428: p_api_version_number,
5429: l_api_name,
5430: G_PKG_NAME)
5461: -- Debug Message
5462: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
5463:
5464:
5465: -- Standard call to get message count and if count is 1, get message info.
5466: FND_MSG_PUB.Count_And_Get
5467: (p_count => l_msg_count,
5468: p_data => l_msg_data
5469: );
5471: EXCEPTION
5472: WHEN FND_API.G_EXC_ERROR THEN
5473: ROLLBACK TO Delete_Relation_Pvt;
5474: x_return_status := FND_API.G_RET_STS_ERROR;
5475: -- Standard call to get message count and if count=1, get the message
5476: FND_MSG_PUB.Count_And_Get (
5477: p_encoded => FND_API.G_FALSE,
5478: p_count => l_msg_count,
5479: p_data => l_msg_data
5481:
5482: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5483: ROLLBACK TO Delete_Relation_Pvt;
5484: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5485: -- Standard call to get message count and if count=1, get the message
5486: FND_MSG_PUB.Count_And_Get (
5487: p_encoded => FND_API.G_FALSE,
5488: p_count => l_msg_count,
5489: p_data => l_msg_data
5495: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5496: THEN
5497: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
5498: END IF;
5499: -- Standard call to get message count and if count=1, get the message
5500: FND_MSG_PUB.Count_And_Get (
5501: p_encoded => FND_API.G_FALSE,
5502: p_count => l_msg_count,
5503: p_data => l_msg_data
5561:
5562: BEGIN
5563: SAVEPOINT Delete_Product_Pvt;
5564:
5565: -- Standard call to check for call compatibility.
5566: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
5567: p_api_version_number,
5568: l_api_name,
5569: G_PKG_NAME)
5614: -- Debug Message
5615: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
5616:
5617:
5618: -- Standard call to get message count and if count is 1, get message info.
5619: FND_MSG_PUB.Count_And_Get
5620: (p_count => l_msg_count,
5621: p_data => l_msg_data
5622: );
5624: EXCEPTION
5625: WHEN FND_API.G_EXC_ERROR THEN
5626: ROLLBACK TO Delete_Product_Pvt;
5627: x_return_status := FND_API.G_RET_STS_ERROR;
5628: -- Standard call to get message count and if count=1, get the message
5629: FND_MSG_PUB.Count_And_Get (
5630: p_encoded => FND_API.G_FALSE,
5631: p_count => l_msg_count,
5632: p_data => l_msg_data
5634:
5635: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5636: ROLLBACK TO Delete_Product_Pvt;
5637: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5638: -- Standard call to get message count and if count=1, get the message
5639: FND_MSG_PUB.Count_And_Get (
5640: p_encoded => FND_API.G_FALSE,
5641: p_count => l_msg_count,
5642: p_data => l_msg_data
5648: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5649: THEN
5650: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
5651: END IF;
5652: -- Standard call to get message count and if count=1, get the message
5653: FND_MSG_PUB.Count_And_Get (
5654: p_encoded => FND_API.G_FALSE,
5655: p_count => l_msg_count,
5656: p_data => l_msg_data
5730:
5731: BEGIN
5732: SAVEPOINT Delete_offer_line_Pvt;
5733:
5734: -- Standard call to check for call compatibility.
5735: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
5736: p_api_version_number,
5737: l_api_name,
5738: G_PKG_NAME)
5824: -- Debug Message
5825: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
5826:
5827:
5828: -- Standard call to get message count and if count is 1, get message info.
5829: FND_MSG_PUB.Count_And_Get
5830: (p_count => x_msg_count,
5831: p_data => x_msg_data
5832: );
5834: EXCEPTION
5835: WHEN FND_API.G_EXC_ERROR THEN
5836: ROLLBACK TO Delete_offer_line_pvt;
5837: x_return_status := FND_API.G_RET_STS_ERROR;
5838: -- Standard call to get message count and if count=1, get the message
5839: FND_MSG_PUB.Count_And_Get (
5840: p_encoded => FND_API.G_FALSE,
5841: p_count => x_msg_count,
5842: p_data => x_msg_data
5844:
5845: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5846: ROLLBACK TO Delete_offer_line_pvt;
5847: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5848: -- Standard call to get message count and if count=1, get the message
5849: FND_MSG_PUB.Count_And_Get (
5850: p_encoded => FND_API.G_FALSE,
5851: p_count => x_msg_count,
5852: p_data => x_msg_data
5858: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5859: THEN
5860: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
5861: END IF;
5862: -- Standard call to get message count and if count=1, get the message
5863: FND_MSG_PUB.Count_And_Get (
5864: p_encoded => FND_API.G_FALSE,
5865: p_count => x_msg_count,
5866: p_data => x_msg_data
5969: l_prod_rec c_prod_info%rowtype;
5970: BEGIN
5971: SAVEPOINT Create_Product_Exclusion_PVT;
5972:
5973: -- Standard call to check for call compatibility.
5974: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
5975: p_api_version_number,
5976: l_api_name,
5977: G_PKG_NAME)
6061: EXCEPTION
6062: WHEN FND_API.G_EXC_ERROR THEN
6063: ROLLBACK TO Create_Product_Exclusion_PVT;
6064: x_return_status := FND_API.G_RET_STS_ERROR;
6065: -- Standard call to get message count and if count=1, get the message
6066: FND_MSG_PUB.Count_And_Get (
6067: p_encoded => FND_API.G_FALSE,
6068: p_count => x_msg_count,
6069: p_data => x_msg_data
6071:
6072: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6073: ROLLBACK TO Create_Product_Exclusion_PVT;
6074: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6075: -- Standard call to get message count and if count=1, get the message
6076: FND_MSG_PUB.Count_And_Get (
6077: p_encoded => FND_API.G_FALSE,
6078: p_count => x_msg_count,
6079: p_data => x_msg_data
6085: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6086: THEN
6087: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
6088: END IF;
6089: -- Standard call to get message count and if count=1, get the message
6090: FND_MSG_PUB.Count_And_Get (
6091: p_encoded => FND_API.G_FALSE,
6092: p_count => x_msg_count,
6093: p_data => x_msg_data
6126:
6127: BEGIN
6128: SAVEPOINT Update_Product_Exclusion_PVT;
6129:
6130: -- Standard call to check for call compatibility.
6131: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
6132: p_api_version_number,
6133: l_api_name,
6134: G_PKG_NAME)
6202: EXCEPTION
6203: WHEN FND_API.G_EXC_ERROR THEN
6204: ROLLBACK TO Update_Product_Exclusion_PVT;
6205: x_return_status := FND_API.G_RET_STS_ERROR;
6206: -- Standard call to get message count and if count=1, get the message
6207: FND_MSG_PUB.Count_And_Get (
6208: p_encoded => FND_API.G_FALSE,
6209: p_count => x_msg_count,
6210: p_data => x_msg_data
6212:
6213: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6214: ROLLBACK TO Update_Product_Exclusion_PVT;
6215: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6216: -- Standard call to get message count and if count=1, get the message
6217: FND_MSG_PUB.Count_And_Get (
6218: p_encoded => FND_API.G_FALSE,
6219: p_count => x_msg_count,
6220: p_data => x_msg_data
6226: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6227: THEN
6228: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
6229: END IF;
6230: -- Standard call to get message count and if count=1, get the message
6231: FND_MSG_PUB.Count_And_Get (
6232: p_encoded => FND_API.G_FALSE,
6233: p_count => x_msg_count,
6234: p_data => x_msg_data
6489: l_tier_rec ozf_offer_tier_rec_type := p_tier_rec;
6490: BEGIN
6491: SAVEPOINT Create_Disc_tiers_PVT;
6492:
6493: -- Standard call to check for call compatibility.
6494: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
6495: p_api_version_number,
6496: l_api_name,
6497: G_PKG_NAME)
6566: EXCEPTION
6567: WHEN FND_API.G_EXC_ERROR THEN
6568: ROLLBACK TO Create_Disc_tiers_PVT;
6569: x_return_status := FND_API.G_RET_STS_ERROR;
6570: -- Standard call to get message count and if count=1, get the message
6571: FND_MSG_PUB.Count_And_Get (
6572: p_encoded => FND_API.G_FALSE,
6573: p_count => x_msg_count,
6574: p_data => x_msg_data
6576:
6577: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6578: ROLLBACK TO Create_Disc_tiers_PVT;
6579: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6580: -- Standard call to get message count and if count=1, get the message
6581: FND_MSG_PUB.Count_And_Get (
6582: p_encoded => FND_API.G_FALSE,
6583: p_count => x_msg_count,
6584: p_data => x_msg_data
6590: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6591: THEN
6592: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
6593: END IF;
6594: -- Standard call to get message count and if count=1, get the message
6595: FND_MSG_PUB.Count_And_Get (
6596: p_encoded => FND_API.G_FALSE,
6597: p_count => x_msg_count,
6598: p_data => x_msg_data
6630: l_tier_rec ozf_offer_tier_rec_type := p_tier_rec;
6631: BEGIN
6632: SAVEPOINT Create_Disc_tiers_PVT;
6633:
6634: -- Standard call to check for call compatibility.
6635: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
6636: p_api_version_number,
6637: l_api_name,
6638: G_PKG_NAME)
6702: EXCEPTION
6703: WHEN FND_API.G_EXC_ERROR THEN
6704: ROLLBACK TO Create_Disc_tiers_PVT;
6705: x_return_status := FND_API.G_RET_STS_ERROR;
6706: -- Standard call to get message count and if count=1, get the message
6707: FND_MSG_PUB.Count_And_Get (
6708: p_encoded => FND_API.G_FALSE,
6709: p_count => x_msg_count,
6710: p_data => x_msg_data
6712:
6713: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6714: ROLLBACK TO Create_Disc_tiers_PVT;
6715: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6716: -- Standard call to get message count and if count=1, get the message
6717: FND_MSG_PUB.Count_And_Get (
6718: p_encoded => FND_API.G_FALSE,
6719: p_count => x_msg_count,
6720: p_data => x_msg_data
6726: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6727: THEN
6728: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
6729: END IF;
6730: -- Standard call to get message count and if count=1, get the message
6731: FND_MSG_PUB.Count_And_Get (
6732: p_encoded => FND_API.G_FALSE,
6733: p_count => x_msg_count,
6734: p_data => x_msg_data
6762:
6763: BEGIN
6764: SAVEPOINT Delete_Disc_tiers_PVT;
6765:
6766: -- Standard call to check for call compatibility.
6767: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
6768: p_api_version_number,
6769: l_api_name,
6770: G_PKG_NAME)
6801: EXCEPTION
6802: WHEN FND_API.G_EXC_ERROR THEN
6803: ROLLBACK TO Delete_Disc_tiers_PVT;
6804: x_return_status := FND_API.G_RET_STS_ERROR;
6805: -- Standard call to get message count and if count=1, get the message
6806: FND_MSG_PUB.Count_And_Get (
6807: p_encoded => FND_API.G_FALSE,
6808: p_count => x_msg_count,
6809: p_data => x_msg_data
6811:
6812: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6813: ROLLBACK TO Delete_Disc_tiers_PVT;
6814: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6815: -- Standard call to get message count and if count=1, get the message
6816: FND_MSG_PUB.Count_And_Get (
6817: p_encoded => FND_API.G_FALSE,
6818: p_count => x_msg_count,
6819: p_data => x_msg_data
6825: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6826: THEN
6827: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
6828: END IF;
6829: -- Standard call to get message count and if count=1, get the message
6830: FND_MSG_PUB.Count_And_Get (
6831: p_encoded => FND_API.G_FALSE,
6832: p_count => x_msg_count,
6833: p_data => x_msg_data
6899:
6900: BEGIN
6901: SAVEPOINT Delete_tier_line_Pvt;
6902:
6903: -- Standard call to check for call compatibility.
6904: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
6905: p_api_version_number,
6906: l_api_name,
6907: G_PKG_NAME)
6964: -- Debug Message
6965: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
6966:
6967:
6968: -- Standard call to get message count and if count is 1, get message info.
6969: FND_MSG_PUB.Count_And_Get
6970: (p_count => x_msg_count,
6971: p_data => x_msg_data
6972: );
6974: EXCEPTION
6975: WHEN FND_API.G_EXC_ERROR THEN
6976: ROLLBACK TO Delete_tier_line_pvt;
6977: x_return_status := FND_API.G_RET_STS_ERROR;
6978: -- Standard call to get message count and if count=1, get the message
6979: FND_MSG_PUB.Count_And_Get (
6980: p_encoded => FND_API.G_FALSE,
6981: p_count => x_msg_count,
6982: p_data => x_msg_data
6984:
6985: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6986: ROLLBACK TO Delete_tier_line_pvt;
6987: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6988: -- Standard call to get message count and if count=1, get the message
6989: FND_MSG_PUB.Count_And_Get (
6990: p_encoded => FND_API.G_FALSE,
6991: p_count => x_msg_count,
6992: p_data => x_msg_data
6998: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6999: THEN
7000: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
7001: END IF;
7002: -- Standard call to get message count and if count=1, get the message
7003: FND_MSG_PUB.Count_And_Get (
7004: p_encoded => FND_API.G_FALSE,
7005: p_count => x_msg_count,
7006: p_data => x_msg_data