[Home] [Help]
58: -- x_return_status OUT VARCHAR2
59: -- x_msg_count OUT NUMBER
60: -- x_msg_data OUT VARCHAR2
61: -- Version : Current version 1.0
62: -- Note: This automatic generated procedure definition, it includes standard IN/OUT parameters
63: -- and basic operation, developer must manually add parameters and business logic as necessary.
64: --
65: -- History
66: --
119: END IF;
120:
121:
122:
123: -- Standard call to check for call compatibility.
124: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
125: p_api_version_number,
126: l_api_name,
127: G_PKG_NAME)
153:
154: WHEN FND_API.G_EXC_ERROR THEN
155: ROLLBACK TO LOCK_Ozf_Disc_Line_PVT;
156: x_return_status := FND_API.G_RET_STS_ERROR;
157: -- Standard call to get message count and if count=1, get the message
158: FND_MSG_PUB.Count_And_Get (
159: p_encoded => FND_API.G_FALSE,
160: p_count => x_msg_count,
161: p_data => x_msg_data
163:
164: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
165: ROLLBACK TO LOCK_Ozf_Disc_Line_PVT;
166: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
167: -- Standard call to get message count and if count=1, get the message
168: FND_MSG_PUB.Count_And_Get (
169: p_encoded => FND_API.G_FALSE,
170: p_count => x_msg_count,
171: p_data => x_msg_data
177: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
178: THEN
179: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
180: END IF;
181: -- Standard call to get message count and if count=1, get the message
182: FND_MSG_PUB.Count_And_Get (
183: p_encoded => FND_API.G_FALSE,
184: p_count => x_msg_count,
185: p_data => x_msg_data
750: -- x_return_status := FND_API.G_RET_STS_ERROR;
751:
752: -- Debug Message
753: OZF_UTILITY_PVT.debug_message('Private API: Validate_dm_model_rec');
754: -- Standard call to get message count and if count is 1, get message info.
755: FND_MSG_PUB.Count_And_Get
756: (p_count => x_msg_count,
757: p_data => x_msg_data
758: );
775: l_object_version_number NUMBER;
776: l_ozf_offer_line_rec ozf_offer_line_rec_type;
777:
778: BEGIN
779: -- Standard Start of API savepoint
780: SAVEPOINT validate_ozf_disc_line_;
781:
782: -- Standard call to check for call compatibility.
783: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
778: BEGIN
779: -- Standard Start of API savepoint
780: SAVEPOINT validate_ozf_disc_line_;
781:
782: -- Standard call to check for call compatibility.
783: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
784: p_api_version_number,
785: l_api_name,
786: G_PKG_NAME)
847: -- Debug Message
848: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
849:
850:
851: -- Standard call to get message count and if count is 1, get message info.
852: FND_MSG_PUB.Count_And_Get
853: (p_count => x_msg_count,
854: p_data => x_msg_data
855: );
861:
862: WHEN FND_API.G_EXC_ERROR THEN
863: ROLLBACK TO VALIDATE_Ozf_Disc_Line_;
864: x_return_status := FND_API.G_RET_STS_ERROR;
865: -- Standard call to get message count and if count=1, get the message
866: FND_MSG_PUB.Count_And_Get (
867: p_encoded => FND_API.G_FALSE,
868: p_count => x_msg_count,
869: p_data => x_msg_data
871:
872: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
873: ROLLBACK TO VALIDATE_Ozf_Disc_Line_;
874: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
875: -- Standard call to get message count and if count=1, get the message
876: FND_MSG_PUB.Count_And_Get (
877: p_encoded => FND_API.G_FALSE,
878: p_count => x_msg_count,
879: p_data => x_msg_data
885: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
886: THEN
887: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
888: END IF;
889: -- Standard call to get message count and if count=1, get the message
890: FND_MSG_PUB.Count_And_Get (
891: p_encoded => FND_API.G_FALSE,
892: p_count => x_msg_count,
893: p_data => x_msg_data
925: -- x_return_status OUT VARCHAR2
926: -- x_msg_count OUT NUMBER
927: -- x_msg_data OUT VARCHAR2
928: -- Version : Current version 1.0
929: -- Note: This automatic generated procedure definition, it includes standard IN/OUT parameters
930: -- and basic operation, developer must manually add parameters and business logic as necessary.
931: --
932: -- History
933: --
967: SELECT 1
968: FROM OZF_OFFER_DISCOUNT_LINES
969: WHERE offer_discount_line_id = l_id;
970: BEGIN
971: -- Standard Start of API savepoint
972: SAVEPOINT create_ozf_disc_line_pvt;
973:
974: -- Standard call to check for call compatibility.
975: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
970: BEGIN
971: -- Standard Start of API savepoint
972: SAVEPOINT create_ozf_disc_line_pvt;
973:
974: -- Standard call to check for call compatibility.
975: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
976: p_api_version_number,
977: l_api_name,
978: G_PKG_NAME)
1108: --
1109: -- End of API body
1110: --
1111:
1112: -- Standard check for p_commit
1113: IF FND_API.to_Boolean( p_commit )
1114: THEN
1115: COMMIT WORK;
1116: END IF;
1118:
1119: -- Debug Message
1120: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
1121:
1122: -- Standard call to get message count and if count is 1, get message info.
1123: FND_MSG_PUB.Count_And_Get
1124: (p_count => x_msg_count,
1125: p_data => x_msg_data
1126: );
1132:
1133: WHEN FND_API.G_EXC_ERROR THEN
1134: ROLLBACK TO CREATE_Ozf_Disc_Line_PVT;
1135: x_return_status := FND_API.G_RET_STS_ERROR;
1136: -- Standard call to get message count and if count=1, get the message
1137: FND_MSG_PUB.Count_And_Get (
1138: p_encoded => FND_API.G_FALSE,
1139: p_count => x_msg_count,
1140: p_data => x_msg_data
1142:
1143: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1144: ROLLBACK TO CREATE_Ozf_Disc_Line_PVT;
1145: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1146: -- Standard call to get message count and if count=1, get the message
1147: FND_MSG_PUB.Count_And_Get (
1148: p_encoded => FND_API.G_FALSE,
1149: p_count => x_msg_count,
1150: p_data => x_msg_data
1156: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1157: THEN
1158: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1159: END IF;
1160: -- Standard call to get message count and if count=1, get the message
1161: FND_MSG_PUB.Count_And_Get (
1162: p_encoded => FND_API.G_FALSE,
1163: p_count => x_msg_count,
1164: p_data => x_msg_data
1188: -- x_return_status OUT VARCHAR2
1189: -- x_msg_count OUT NUMBER
1190: -- x_msg_data OUT VARCHAR2
1191: -- Version : Current version 1.0
1192: -- Note: This automatic generated procedure definition, it includes standard IN/OUT parameters
1193: -- and basic operation, developer must manually add parameters and business logic as necessary.
1194: --
1195: -- History
1196: --
1231: l_tar_ozf_offer_line_rec ozf_offer_line_rec_type := P_ozf_offer_line_rec;
1232: l_rowid ROWID;
1233:
1234: BEGIN
1235: -- Standard Start of API savepoint
1236: SAVEPOINT update_ozf_disc_line_pvt;
1237:
1238: -- Standard call to check for call compatibility.
1239: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1234: BEGIN
1235: -- Standard Start of API savepoint
1236: SAVEPOINT update_ozf_disc_line_pvt;
1237:
1238: -- Standard call to check for call compatibility.
1239: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1240: p_api_version_number,
1241: l_api_name,
1242: G_PKG_NAME)
1365: --
1366: -- End of API body.
1367: --
1368:
1369: -- Standard check for p_commit
1370: IF FND_API.to_Boolean( p_commit )
1371: THEN
1372: COMMIT WORK;
1373: END IF;
1376: -- Debug Message
1377: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
1378:
1379:
1380: -- Standard call to get message count and if count is 1, get message info.
1381: FND_MSG_PUB.Count_And_Get
1382: (p_count => x_msg_count,
1383: p_data => x_msg_data
1384: );
1390:
1391: WHEN FND_API.G_EXC_ERROR THEN
1392: ROLLBACK TO UPDATE_Ozf_Disc_Line_PVT;
1393: x_return_status := FND_API.G_RET_STS_ERROR;
1394: -- Standard call to get message count and if count=1, get the message
1395: FND_MSG_PUB.Count_And_Get (
1396: p_encoded => FND_API.G_FALSE,
1397: p_count => x_msg_count,
1398: p_data => x_msg_data
1400:
1401: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1402: ROLLBACK TO UPDATE_Ozf_Disc_Line_PVT;
1403: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1404: -- Standard call to get message count and if count=1, get the message
1405: FND_MSG_PUB.Count_And_Get (
1406: p_encoded => FND_API.G_FALSE,
1407: p_count => x_msg_count,
1408: p_data => x_msg_data
1414: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1415: THEN
1416: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1417: END IF;
1418: -- Standard call to get message count and if count=1, get the message
1419: FND_MSG_PUB.Count_And_Get (
1420: p_encoded => FND_API.G_FALSE,
1421: p_count => x_msg_count,
1422: p_data => x_msg_data
1447: -- x_return_status OUT VARCHAR2
1448: -- x_msg_count OUT NUMBER
1449: -- x_msg_data OUT VARCHAR2
1450: -- Version : Current version 1.0
1451: -- Note: This automatic generated procedure definition, it includes standard IN/OUT parameters
1452: -- and basic operation, developer must manually add parameters and business logic as necessary.
1453: --
1454: -- History
1455: --
1475: L_API_VERSION_NUMBER CONSTANT NUMBER := 1.0;
1476: l_object_version_number NUMBER;
1477:
1478: BEGIN
1479: -- Standard Start of API savepoint
1480: SAVEPOINT delete_ozf_disc_line_pvt;
1481:
1482: -- Standard call to check for call compatibility.
1483: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1478: BEGIN
1479: -- Standard Start of API savepoint
1480: SAVEPOINT delete_ozf_disc_line_pvt;
1481:
1482: -- Standard call to check for call compatibility.
1483: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1484: p_api_version_number,
1485: l_api_name,
1486: G_PKG_NAME)
1518: --
1519: -- End of API body
1520: --
1521:
1522: -- Standard check for p_commit
1523: IF FND_API.to_Boolean( p_commit )
1524: THEN
1525: COMMIT WORK;
1526: END IF;
1529: -- Debug Message
1530: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
1531:
1532:
1533: -- Standard call to get message count and if count is 1, get message info.
1534: FND_MSG_PUB.Count_And_Get
1535: (p_count => x_msg_count,
1536: p_data => x_msg_data
1537: );
1543:
1544: WHEN FND_API.G_EXC_ERROR THEN
1545: ROLLBACK TO DELETE_Ozf_Disc_Line_PVT;
1546: x_return_status := FND_API.G_RET_STS_ERROR;
1547: -- Standard call to get message count and if count=1, get the message
1548: FND_MSG_PUB.Count_And_Get (
1549: p_encoded => FND_API.G_FALSE,
1550: p_count => x_msg_count,
1551: p_data => x_msg_data
1553:
1554: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1555: ROLLBACK TO DELETE_Ozf_Disc_Line_PVT;
1556: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1557: -- Standard call to get message count and if count=1, get the message
1558: FND_MSG_PUB.Count_And_Get (
1559: p_encoded => FND_API.G_FALSE,
1560: p_count => x_msg_count,
1561: p_data => x_msg_data
1567: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1568: THEN
1569: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1570: END IF;
1571: -- Standard call to get message count and if count=1, get the message
1572: FND_MSG_PUB.Count_And_Get (
1573: p_encoded => FND_API.G_FALSE,
1574: p_count => x_msg_count,
1575: p_data => x_msg_data
1602: -- x_return_status OUT VARCHAR2
1603: -- x_msg_count OUT NUMBER
1604: -- x_msg_data OUT VARCHAR2
1605: -- Version : Current version 1.0
1606: -- Note: This automatic generated procedure definition, it includes standard IN/OUT parameters
1607: -- and basic operation, developer must manually add parameters and business logic as necessary.
1608: --
1609: -- History
1610: --
1644: END IF;
1645:
1646:
1647:
1648: -- Standard call to check for call compatibility.
1649: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1650: p_api_version_number,
1651: l_api_name,
1652: G_PKG_NAME)
1678:
1679: WHEN FND_API.G_EXC_ERROR THEN
1680: ROLLBACK TO Lock_Ozf_Prod_Line_PVT;
1681: x_return_status := FND_API.G_RET_STS_ERROR;
1682: -- Standard call to get message count and if count=1, get the message
1683: FND_MSG_PUB.Count_And_Get (
1684: p_encoded => FND_API.G_FALSE,
1685: p_count => x_msg_count,
1686: p_data => x_msg_data
1688:
1689: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1690: ROLLBACK TO Lock_Ozf_Prod_Line_PVT;
1691: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1692: -- Standard call to get message count and if count=1, get the message
1693: FND_MSG_PUB.Count_And_Get (
1694: p_encoded => FND_API.G_FALSE,
1695: p_count => x_msg_count,
1696: p_data => x_msg_data
1702: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1703: THEN
1704: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1705: END IF;
1706: -- Standard call to get message count and if count=1, get the message
1707: FND_MSG_PUB.Count_And_Get (
1708: p_encoded => FND_API.G_FALSE,
1709: p_count => x_msg_count,
1710: p_data => x_msg_data
2124: -- x_return_status := FND_API.G_RET_STS_ERROR;
2125:
2126: -- Debug Message
2127: OZF_UTILITY_PVT.debug_message('Private API: Validate_dm_model_rec');
2128: -- Standard call to get message count and if count is 1, get message info.
2129: FND_MSG_PUB.Count_And_Get
2130: (p_count => x_msg_count,
2131: p_data => x_msg_data
2132: );
2147: l_object_version_number NUMBER;
2148: l_ozf_prod_rec ozf_prod_rec_type;
2149:
2150: BEGIN
2151: -- Standard Start of API savepoint
2152: SAVEPOINT validate_create_ozf_prod_line_;
2153:
2154: -- Standard call to check for call compatibility.
2155: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2150: BEGIN
2151: -- Standard Start of API savepoint
2152: SAVEPOINT validate_create_ozf_prod_line_;
2153:
2154: -- Standard call to check for call compatibility.
2155: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2156: p_api_version_number,
2157: l_api_name,
2158: G_PKG_NAME)
2215: -- Debug Message
2216: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
2217:
2218:
2219: -- Standard call to get message count and if count is 1, get message info.
2220: FND_MSG_PUB.Count_And_Get
2221: (p_count => x_msg_count,
2222: p_data => x_msg_data
2223: );
2229:
2230: WHEN FND_API.G_EXC_ERROR THEN
2231: ROLLBACK TO VALIDATE_Create_Ozf_Prod_Line_;
2232: x_return_status := FND_API.G_RET_STS_ERROR;
2233: -- Standard call to get message count and if count=1, get the message
2234: FND_MSG_PUB.Count_And_Get (
2235: p_encoded => FND_API.G_FALSE,
2236: p_count => x_msg_count,
2237: p_data => x_msg_data
2239:
2240: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2241: ROLLBACK TO VALIDATE_Create_Ozf_Prod_Line_;
2242: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2243: -- Standard call to get message count and if count=1, get the message
2244: FND_MSG_PUB.Count_And_Get (
2245: p_encoded => FND_API.G_FALSE,
2246: p_count => x_msg_count,
2247: p_data => x_msg_data
2253: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2254: THEN
2255: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2256: END IF;
2257: -- Standard call to get message count and if count=1, get the message
2258: FND_MSG_PUB.Count_And_Get (
2259: p_encoded => FND_API.G_FALSE,
2260: p_count => x_msg_count,
2261: p_data => x_msg_data
2286: -- x_return_status OUT VARCHAR2
2287: -- x_msg_count OUT NUMBER
2288: -- x_msg_data OUT VARCHAR2
2289: -- Version : Current version 1.0
2290: -- Note: This automatic generated procedure definition, it includes standard IN/OUT parameters
2291: -- and basic operation, developer must manually add parameters and business logic as necessary.
2292: --
2293: -- History
2294: --
2329: SELECT 1
2330: FROM OZF_OFFER_DISCOUNT_PRODUCTS
2331: WHERE off_discount_product_id = l_id;
2332: BEGIN
2333: -- Standard Start of API savepoint
2334: SAVEPOINT Create_Ozf_Prod_Line_pvt;
2335:
2336: -- Standard call to check for call compatibility.
2337: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2332: BEGIN
2333: -- Standard Start of API savepoint
2334: SAVEPOINT Create_Ozf_Prod_Line_pvt;
2335:
2336: -- Standard call to check for call compatibility.
2337: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2338: p_api_version_number,
2339: l_api_name,
2340: G_PKG_NAME)
2447: --
2448: -- End of API body
2449: --
2450:
2451: -- Standard check for p_commit
2452: IF FND_API.to_Boolean( p_commit )
2453: THEN
2454: COMMIT WORK;
2455: END IF;
2458: -- Debug Message
2459: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
2460:
2461:
2462: -- Standard call to get message count and if count is 1, get message info.
2463: FND_MSG_PUB.Count_And_Get
2464: (p_count => x_msg_count,
2465: p_data => x_msg_data
2466: );
2472:
2473: WHEN FND_API.G_EXC_ERROR THEN
2474: ROLLBACK TO Create_Ozf_Prod_Line_PVT;
2475: x_return_status := FND_API.G_RET_STS_ERROR;
2476: -- Standard call to get message count and if count=1, get the message
2477: FND_MSG_PUB.Count_And_Get (
2478: p_encoded => FND_API.G_FALSE,
2479: p_count => x_msg_count,
2480: p_data => x_msg_data
2482:
2483: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2484: ROLLBACK TO Create_Ozf_Prod_Line_PVT;
2485: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2486: -- Standard call to get message count and if count=1, get the message
2487: FND_MSG_PUB.Count_And_Get (
2488: p_encoded => FND_API.G_FALSE,
2489: p_count => x_msg_count,
2490: p_data => x_msg_data
2496: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2497: THEN
2498: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2499: END IF;
2500: -- Standard call to get message count and if count=1, get the message
2501: FND_MSG_PUB.Count_And_Get (
2502: p_encoded => FND_API.G_FALSE,
2503: p_count => x_msg_count,
2504: p_data => x_msg_data
2528: -- x_return_status OUT VARCHAR2
2529: -- x_msg_count OUT NUMBER
2530: -- x_msg_data OUT VARCHAR2
2531: -- Version : Current version 1.0
2532: -- Note: This automatic generated procedure definition, it includes standard IN/OUT parameters
2533: -- and basic operation, developer must manually add parameters and business logic as necessary.
2534: --
2535: -- History
2536: --
2571: l_tar_ozf_prod_rec ozf_prod_rec_type := P_ozf_prod_rec;
2572: l_rowid ROWID;
2573:
2574: BEGIN
2575: -- Standard Start of API savepoint
2576: SAVEPOINT Update_Ozf_Prod_Line_pvt;
2577:
2578: -- Standard call to check for call compatibility.
2579: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2574: BEGIN
2575: -- Standard Start of API savepoint
2576: SAVEPOINT Update_Ozf_Prod_Line_pvt;
2577:
2578: -- Standard call to check for call compatibility.
2579: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2580: p_api_version_number,
2581: l_api_name,
2582: G_PKG_NAME)
2680: --
2681: -- End of API body.
2682: --
2683:
2684: -- Standard check for p_commit
2685: IF FND_API.to_Boolean( p_commit )
2686: THEN
2687: COMMIT WORK;
2688: END IF;
2691: -- Debug Message
2692: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
2693:
2694:
2695: -- Standard call to get message count and if count is 1, get message info.
2696: FND_MSG_PUB.Count_And_Get
2697: (p_count => x_msg_count,
2698: p_data => x_msg_data
2699: );
2705:
2706: WHEN FND_API.G_EXC_ERROR THEN
2707: ROLLBACK TO Update_Ozf_Prod_Line_PVT;
2708: x_return_status := FND_API.G_RET_STS_ERROR;
2709: -- Standard call to get message count and if count=1, get the message
2710: FND_MSG_PUB.Count_And_Get (
2711: p_encoded => FND_API.G_FALSE,
2712: p_count => x_msg_count,
2713: p_data => x_msg_data
2715:
2716: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2717: ROLLBACK TO Update_Ozf_Prod_Line_PVT;
2718: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2719: -- Standard call to get message count and if count=1, get the message
2720: FND_MSG_PUB.Count_And_Get (
2721: p_encoded => FND_API.G_FALSE,
2722: p_count => x_msg_count,
2723: p_data => x_msg_data
2729: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2730: THEN
2731: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2732: END IF;
2733: -- Standard call to get message count and if count=1, get the message
2734: FND_MSG_PUB.Count_And_Get (
2735: p_encoded => FND_API.G_FALSE,
2736: p_count => x_msg_count,
2737: p_data => x_msg_data
2774: EXCEPTION
2775: WHEN FND_API.G_EXC_ERROR THEN
2776: ROLLBACK TO Delete_Exclusions_sp;
2777: x_return_status := FND_API.G_RET_STS_ERROR;
2778: -- Standard call to get message count and if count=1, get the message
2779: FND_MSG_PUB.Count_And_Get (
2780: p_encoded => FND_API.G_FALSE,
2781: p_count => x_msg_count,
2782: p_data => x_msg_data
2784:
2785: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2786: ROLLBACK TO Delete_Exclusions_sp;
2787: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2788: -- Standard call to get message count and if count=1, get the message
2789: FND_MSG_PUB.Count_And_Get (
2790: p_encoded => FND_API.G_FALSE,
2791: p_count => x_msg_count,
2792: p_data => x_msg_data
2798: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2799: THEN
2800: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2801: END IF;
2802: -- Standard call to get message count and if count=1, get the message
2803: FND_MSG_PUB.Count_And_Get (
2804: p_encoded => FND_API.G_FALSE,
2805: p_count => x_msg_count,
2806: p_data => x_msg_data
2832: -- x_return_status OUT VARCHAR2
2833: -- x_msg_count OUT NUMBER
2834: -- x_msg_data OUT VARCHAR2
2835: -- Version : Current version 1.0
2836: -- Note: This automatic generated procedure definition, it includes standard IN/OUT parameters
2837: -- and basic operation, developer must manually add parameters and business logic as necessary.
2838: --
2839: -- History
2840: --
2864: select offer_id FROM ozf_offer_discount_products where off_discount_product_id = p_off_discount_product_id;
2865: l_offer_id ozf_offers.offer_id%type;
2866:
2867: BEGIN
2868: -- Standard Start of API savepoint
2869: SAVEPOINT Delete_Ozf_Prod_Line_pvt;
2870:
2871: -- Standard call to check for call compatibility.
2872: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2867: BEGIN
2868: -- Standard Start of API savepoint
2869: SAVEPOINT Delete_Ozf_Prod_Line_pvt;
2870:
2871: -- Standard call to check for call compatibility.
2872: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2873: p_api_version_number,
2874: l_api_name,
2875: G_PKG_NAME)
2927: --
2928: -- End of API body
2929: --
2930:
2931: -- Standard check for p_commit
2932: IF FND_API.to_Boolean( p_commit )
2933: THEN
2934: COMMIT WORK;
2935: END IF;
2938: -- Debug Message
2939: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
2940:
2941:
2942: -- Standard call to get message count and if count is 1, get message info.
2943: FND_MSG_PUB.Count_And_Get
2944: (p_count => x_msg_count,
2945: p_data => x_msg_data
2946: );
2952:
2953: WHEN FND_API.G_EXC_ERROR THEN
2954: ROLLBACK TO Delete_Ozf_Prod_Line_PVT;
2955: x_return_status := FND_API.G_RET_STS_ERROR;
2956: -- Standard call to get message count and if count=1, get the message
2957: FND_MSG_PUB.Count_And_Get (
2958: p_encoded => FND_API.G_FALSE,
2959: p_count => x_msg_count,
2960: p_data => x_msg_data
2962:
2963: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2964: ROLLBACK TO Delete_Ozf_Prod_Line_PVT;
2965: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2966: -- Standard call to get message count and if count=1, get the message
2967: FND_MSG_PUB.Count_And_Get (
2968: p_encoded => FND_API.G_FALSE,
2969: p_count => x_msg_count,
2970: p_data => x_msg_data
2976: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2977: THEN
2978: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2979: END IF;
2980: -- Standard call to get message count and if count=1, get the message
2981: FND_MSG_PUB.Count_And_Get (
2982: p_encoded => FND_API.G_FALSE,
2983: p_count => x_msg_count,
2984: p_data => x_msg_data
3012: -- x_return_status OUT VARCHAR2
3013: -- x_msg_count OUT NUMBER
3014: -- x_msg_data OUT VARCHAR2
3015: -- Version : Current version 1.0
3016: -- Note: This automatic generated procedure definition, it includes standard IN/OUT parameters
3017: -- and basic operation, developer must manually add parameters and business logic as necessary.
3018: --
3019: -- History
3020: --
3054: END IF;
3055:
3056:
3057:
3058: -- Standard call to check for call compatibility.
3059: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
3060: p_api_version_number,
3061: l_api_name,
3062: G_PKG_NAME)
3088:
3089: WHEN FND_API.G_EXC_ERROR THEN
3090: ROLLBACK TO LOCK_Prod_Reln_PVT;
3091: x_return_status := FND_API.G_RET_STS_ERROR;
3092: -- Standard call to get message count and if count=1, get the message
3093: FND_MSG_PUB.Count_And_Get (
3094: p_encoded => FND_API.G_FALSE,
3095: p_count => x_msg_count,
3096: p_data => x_msg_data
3098:
3099: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3100: ROLLBACK TO LOCK_Prod_Reln_PVT;
3101: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3102: -- Standard call to get message count and if count=1, get the message
3103: FND_MSG_PUB.Count_And_Get (
3104: p_encoded => FND_API.G_FALSE,
3105: p_count => x_msg_count,
3106: p_data => x_msg_data
3112: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3113: THEN
3114: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3115: END IF;
3116: -- Standard call to get message count and if count=1, get the message
3117: FND_MSG_PUB.Count_And_Get (
3118: p_encoded => FND_API.G_FALSE,
3119: p_count => x_msg_count,
3120: p_data => x_msg_data
3415: -- x_return_status := FND_API.G_RET_STS_ERROR;
3416:
3417: -- Debug Message
3418: OZF_UTILITY_PVT.debug_message('Private API: Validate_dm_model_rec');
3419: -- Standard call to get message count and if count is 1, get message info.
3420: FND_MSG_PUB.Count_And_Get
3421: (p_count => x_msg_count,
3422: p_data => x_msg_data
3423: );
3441: l_object_version_number NUMBER;
3442: l_prod_reln_rec prod_reln_rec_type;
3443:
3444: BEGIN
3445: -- Standard Start of API savepoint
3446: SAVEPOINT validate_prod_reln_;
3447:
3448: -- Standard call to check for call compatibility.
3449: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
3444: BEGIN
3445: -- Standard Start of API savepoint
3446: SAVEPOINT validate_prod_reln_;
3447:
3448: -- Standard call to check for call compatibility.
3449: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
3450: p_api_version_number,
3451: l_api_name,
3452: G_PKG_NAME)
3515: -- Debug Message
3516: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
3517:
3518:
3519: -- Standard call to get message count and if count is 1, get message info.
3520: FND_MSG_PUB.Count_And_Get
3521: (p_count => x_msg_count,
3522: p_data => x_msg_data
3523: );
3529:
3530: WHEN FND_API.G_EXC_ERROR THEN
3531: ROLLBACK TO VALIDATE_Prod_Reln_;
3532: x_return_status := FND_API.G_RET_STS_ERROR;
3533: -- Standard call to get message count and if count=1, get the message
3534: FND_MSG_PUB.Count_And_Get (
3535: p_encoded => FND_API.G_FALSE,
3536: p_count => x_msg_count,
3537: p_data => x_msg_data
3539:
3540: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3541: ROLLBACK TO VALIDATE_Prod_Reln_;
3542: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3543: -- Standard call to get message count and if count=1, get the message
3544: FND_MSG_PUB.Count_And_Get (
3545: p_encoded => FND_API.G_FALSE,
3546: p_count => x_msg_count,
3547: p_data => x_msg_data
3553: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3554: THEN
3555: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3556: END IF;
3557: -- Standard call to get message count and if count=1, get the message
3558: FND_MSG_PUB.Count_And_Get (
3559: p_encoded => FND_API.G_FALSE,
3560: p_count => x_msg_count,
3561: p_data => x_msg_data
3589: -- x_return_status OUT VARCHAR2
3590: -- x_msg_count OUT NUMBER
3591: -- x_msg_data OUT VARCHAR2
3592: -- Version : Current version 1.0
3593: -- Note: This automatic generated procedure definition, it includes standard IN/OUT parameters
3594: -- and basic operation, developer must manually add parameters and business logic as necessary.
3595: --
3596: -- History
3597: --
3632: SELECT 1
3633: FROM OZF_DISCOUNT_PRODUCT_RELN
3634: WHERE discount_product_reln_id = l_id;
3635: BEGIN
3636: -- Standard Start of API savepoint
3637: SAVEPOINT create_prod_reln_pvt;
3638:
3639: -- Standard call to check for call compatibility.
3640: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
3635: BEGIN
3636: -- Standard Start of API savepoint
3637: SAVEPOINT create_prod_reln_pvt;
3638:
3639: -- Standard call to check for call compatibility.
3640: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
3641: p_api_version_number,
3642: l_api_name,
3643: G_PKG_NAME)
3739: --
3740: -- End of API body
3741: --
3742:
3743: -- Standard check for p_commit
3744: IF FND_API.to_Boolean( p_commit )
3745: THEN
3746: COMMIT WORK;
3747: END IF;
3750: -- Debug Message
3751: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
3752:
3753:
3754: -- Standard call to get message count and if count is 1, get message info.
3755: FND_MSG_PUB.Count_And_Get
3756: (p_count => x_msg_count,
3757: p_data => x_msg_data
3758: );
3764:
3765: WHEN FND_API.G_EXC_ERROR THEN
3766: ROLLBACK TO CREATE_Prod_Reln_PVT;
3767: x_return_status := FND_API.G_RET_STS_ERROR;
3768: -- Standard call to get message count and if count=1, get the message
3769: FND_MSG_PUB.Count_And_Get (
3770: p_encoded => FND_API.G_FALSE,
3771: p_count => x_msg_count,
3772: p_data => x_msg_data
3774:
3775: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3776: ROLLBACK TO CREATE_Prod_Reln_PVT;
3777: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3778: -- Standard call to get message count and if count=1, get the message
3779: FND_MSG_PUB.Count_And_Get (
3780: p_encoded => FND_API.G_FALSE,
3781: p_count => x_msg_count,
3782: p_data => x_msg_data
3788: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3789: THEN
3790: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3791: END IF;
3792: -- Standard call to get message count and if count=1, get the message
3793: FND_MSG_PUB.Count_And_Get (
3794: p_encoded => FND_API.G_FALSE,
3795: p_count => x_msg_count,
3796: p_data => x_msg_data
3820: -- x_return_status OUT VARCHAR2
3821: -- x_msg_count OUT NUMBER
3822: -- x_msg_data OUT VARCHAR2
3823: -- Version : Current version 1.0
3824: -- Note: This automatic generated procedure definition, it includes standard IN/OUT parameters
3825: -- and basic operation, developer must manually add parameters and business logic as necessary.
3826: --
3827: -- History
3828: --
3863: l_tar_prod_reln_rec prod_reln_rec_type := P_prod_reln_rec;
3864: l_rowid ROWID;
3865:
3866: BEGIN
3867: -- Standard Start of API savepoint
3868: SAVEPOINT update_prod_reln_pvt;
3869:
3870: -- Standard call to check for call compatibility.
3871: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
3866: BEGIN
3867: -- Standard Start of API savepoint
3868: SAVEPOINT update_prod_reln_pvt;
3869:
3870: -- Standard call to check for call compatibility.
3871: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
3872: p_api_version_number,
3873: l_api_name,
3874: G_PKG_NAME)
3965: --
3966: -- End of API body.
3967: --
3968:
3969: -- Standard check for p_commit
3970: IF FND_API.to_Boolean( p_commit )
3971: THEN
3972: COMMIT WORK;
3973: END IF;
3976: -- Debug Message
3977: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
3978:
3979:
3980: -- Standard call to get message count and if count is 1, get message info.
3981: FND_MSG_PUB.Count_And_Get
3982: (p_count => x_msg_count,
3983: p_data => x_msg_data
3984: );
3990:
3991: WHEN FND_API.G_EXC_ERROR THEN
3992: ROLLBACK TO UPDATE_Prod_Reln_PVT;
3993: x_return_status := FND_API.G_RET_STS_ERROR;
3994: -- Standard call to get message count and if count=1, get the message
3995: FND_MSG_PUB.Count_And_Get (
3996: p_encoded => FND_API.G_FALSE,
3997: p_count => x_msg_count,
3998: p_data => x_msg_data
4000:
4001: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4002: ROLLBACK TO UPDATE_Prod_Reln_PVT;
4003: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4004: -- Standard call to get message count and if count=1, get the message
4005: FND_MSG_PUB.Count_And_Get (
4006: p_encoded => FND_API.G_FALSE,
4007: p_count => x_msg_count,
4008: p_data => x_msg_data
4014: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4015: THEN
4016: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4017: END IF;
4018: -- Standard call to get message count and if count=1, get the message
4019: FND_MSG_PUB.Count_And_Get (
4020: p_encoded => FND_API.G_FALSE,
4021: p_count => x_msg_count,
4022: p_data => x_msg_data
4047: -- x_return_status OUT VARCHAR2
4048: -- x_msg_count OUT NUMBER
4049: -- x_msg_data OUT VARCHAR2
4050: -- Version : Current version 1.0
4051: -- Note: This automatic generated procedure definition, it includes standard IN/OUT parameters
4052: -- and basic operation, developer must manually add parameters and business logic as necessary.
4053: --
4054: -- History
4055: --
4075: L_API_VERSION_NUMBER CONSTANT NUMBER := 1.0;
4076: l_object_version_number NUMBER;
4077:
4078: BEGIN
4079: -- Standard Start of API savepoint
4080: SAVEPOINT delete_prod_reln_pvt;
4081:
4082: -- Standard call to check for call compatibility.
4083: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
4078: BEGIN
4079: -- Standard Start of API savepoint
4080: SAVEPOINT delete_prod_reln_pvt;
4081:
4082: -- Standard call to check for call compatibility.
4083: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
4084: p_api_version_number,
4085: l_api_name,
4086: G_PKG_NAME)
4118: --
4119: -- End of API body
4120: --
4121:
4122: -- Standard check for p_commit
4123: IF FND_API.to_Boolean( p_commit )
4124: THEN
4125: COMMIT WORK;
4126: END IF;
4129: -- Debug Message
4130: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
4131:
4132:
4133: -- Standard call to get message count and if count is 1, get message info.
4134: FND_MSG_PUB.Count_And_Get
4135: (p_count => x_msg_count,
4136: p_data => x_msg_data
4137: );
4143:
4144: WHEN FND_API.G_EXC_ERROR THEN
4145: ROLLBACK TO DELETE_Prod_Reln_PVT;
4146: x_return_status := FND_API.G_RET_STS_ERROR;
4147: -- Standard call to get message count and if count=1, get the message
4148: FND_MSG_PUB.Count_And_Get (
4149: p_encoded => FND_API.G_FALSE,
4150: p_count => x_msg_count,
4151: p_data => x_msg_data
4153:
4154: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4155: ROLLBACK TO DELETE_Prod_Reln_PVT;
4156: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4157: -- Standard call to get message count and if count=1, get the message
4158: FND_MSG_PUB.Count_And_Get (
4159: p_encoded => FND_API.G_FALSE,
4160: p_count => x_msg_count,
4161: p_data => x_msg_data
4167: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4168: THEN
4169: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4170: END IF;
4171: -- Standard call to get message count and if count=1, get the message
4172: FND_MSG_PUB.Count_And_Get (
4173: p_encoded => FND_API.G_FALSE,
4174: p_count => x_msg_count,
4175: p_data => x_msg_data
4274:
4275: BEGIN
4276: SAVEPOINT Create_Product_Pvt;
4277:
4278: -- Standard call to check for call compatibility.
4279: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
4280: p_api_version_number,
4281: l_api_name,
4282: G_PKG_NAME)
4351: EXCEPTION
4352: WHEN FND_API.G_EXC_ERROR THEN
4353: ROLLBACK TO Create_Product_pvt;
4354: x_return_status := FND_API.G_RET_STS_ERROR;
4355: -- Standard call to get message count and if count=1, get the message
4356: FND_MSG_PUB.Count_And_Get (
4357: p_encoded => FND_API.G_FALSE,
4358: p_count => l_msg_count,
4359: p_data => l_msg_data
4361:
4362: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4363: ROLLBACK TO Create_Product_pvt;
4364: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4365: -- Standard call to get message count and if count=1, get the message
4366: FND_MSG_PUB.Count_And_Get (
4367: p_encoded => FND_API.G_FALSE,
4368: p_count => l_msg_count,
4369: p_data => l_msg_data
4375: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4376: THEN
4377: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4378: END IF;
4379: -- Standard call to get message count and if count=1, get the message
4380: FND_MSG_PUB.Count_And_Get (
4381: p_encoded => FND_API.G_FALSE,
4382: p_count => l_msg_count,
4383: p_data => l_msg_data
4451: BEGIN
4452: SAVEPOINT Create_offer_line_pvt;
4453: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
4454:
4455: -- Standard call to check for call compatibility.
4456: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
4457: p_api_version_number,
4458: l_api_name,
4459: G_PKG_NAME)
4523: -- Debug Message
4524: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
4525:
4526:
4527: -- Standard call to get message count and if count is 1, get message info.
4528: FND_MSG_PUB.Count_And_Get
4529: (p_count => x_msg_count,
4530: p_data => x_msg_data
4531: );
4535:
4536: WHEN FND_API.G_EXC_ERROR THEN
4537: ROLLBACK TO Create_offer_line_pvt;
4538: x_return_status := FND_API.G_RET_STS_ERROR;
4539: -- Standard call to get message count and if count=1, get the message
4540: FND_MSG_PUB.Count_And_Get (
4541: p_encoded => FND_API.G_FALSE,
4542: p_count => x_msg_count,
4543: p_data => x_msg_data
4545:
4546: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4547: ROLLBACK TO Create_offer_line_pvt;
4548: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4549: -- Standard call to get message count and if count=1, get the message
4550: FND_MSG_PUB.Count_And_Get (
4551: p_encoded => FND_API.G_FALSE,
4552: p_count => x_msg_count,
4553: p_data => x_msg_data
4559: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4560: THEN
4561: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4562: END IF;
4563: -- Standard call to get message count and if count=1, get the message
4564: FND_MSG_PUB.Count_And_Get (
4565: p_encoded => FND_API.G_FALSE,
4566: p_count => x_msg_count,
4567: p_data => x_msg_data
4717: BEGIN
4718: SAVEPOINT Create_discount_line_pvt;
4719: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
4720:
4721: -- Standard call to check for call compatibility.
4722: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
4723: p_api_version_number,
4724: l_api_name,
4725: G_PKG_NAME)
4782: -- Debug Message
4783: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
4784:
4785:
4786: -- Standard call to get message count and if count is 1, get message info.
4787: FND_MSG_PUB.Count_And_Get
4788: (p_count => x_msg_count,
4789: p_data => x_msg_data
4790: );
4793:
4794: WHEN FND_API.G_EXC_ERROR THEN
4795: ROLLBACK TO Create_discount_line_pvt;
4796: x_return_status := FND_API.G_RET_STS_ERROR;
4797: -- Standard call to get message count and if count=1, get the message
4798: FND_MSG_PUB.Count_And_Get (
4799: p_encoded => FND_API.G_FALSE,
4800: p_count => x_msg_count,
4801: p_data => x_msg_data
4803:
4804: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4805: ROLLBACK TO Create_discount_line_pvt;
4806: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4807: -- Standard call to get message count and if count=1, get the message
4808: FND_MSG_PUB.Count_And_Get (
4809: p_encoded => FND_API.G_FALSE,
4810: p_count => x_msg_count,
4811: p_data => x_msg_data
4817: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4818: THEN
4819: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4820: END IF;
4821: -- Standard call to get message count and if count=1, get the message
4822: FND_MSG_PUB.Count_And_Get (
4823: p_encoded => FND_API.G_FALSE,
4824: p_count => x_msg_count,
4825: p_data => x_msg_data
4891: l_ozf_offer_line_rec ozf_offer_line_rec_type ;
4892: BEGIN
4893: SAVEPOINT Update_offer_line_pvt;
4894:
4895: -- Standard call to check for call compatibility.
4896: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
4897: p_api_version_number,
4898: l_api_name,
4899: G_PKG_NAME)
4959: -- Debug Message
4960: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
4961:
4962:
4963: -- Standard call to get message count and if count is 1, get message info.
4964: FND_MSG_PUB.Count_And_Get
4965: (p_count => x_msg_count,
4966: p_data => x_msg_data
4967: );
4969: EXCEPTION
4970: WHEN FND_API.G_EXC_ERROR THEN
4971: ROLLBACK TO Update_offer_line_pvt;
4972: x_return_status := FND_API.G_RET_STS_ERROR;
4973: -- Standard call to get message count and if count=1, get the message
4974: FND_MSG_PUB.Count_And_Get (
4975: p_encoded => FND_API.G_FALSE,
4976: p_count => x_msg_count,
4977: p_data => x_msg_data
4979:
4980: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4981: ROLLBACK TO Update_offer_line_pvt;
4982: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4983: -- Standard call to get message count and if count=1, get the message
4984: FND_MSG_PUB.Count_And_Get (
4985: p_encoded => FND_API.G_FALSE,
4986: p_count => x_msg_count,
4987: p_data => x_msg_data
4993: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4994: THEN
4995: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4996: END IF;
4997: -- Standard call to get message count and if count=1, get the message
4998: FND_MSG_PUB.Count_And_Get (
4999: p_encoded => FND_API.G_FALSE,
5000: p_count => x_msg_count,
5001: p_data => x_msg_data
5037: BEGIN
5038: SAVEPOINT Update_discount_line_pvt;
5039: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
5040:
5041: -- Standard call to check for call compatibility.
5042: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
5043: p_api_version_number,
5044: l_api_name,
5045: G_PKG_NAME)
5118: -- Debug Message
5119: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
5120:
5121:
5122: -- Standard call to get message count and if count is 1, get message info.
5123: FND_MSG_PUB.Count_And_Get
5124: (p_count => x_msg_count,
5125: p_data => x_msg_data
5126: );
5130:
5131: WHEN FND_API.G_EXC_ERROR THEN
5132: ROLLBACK TO Update_discount_line_pvt;
5133: x_return_status := FND_API.G_RET_STS_ERROR;
5134: -- Standard call to get message count and if count=1, get the message
5135: FND_MSG_PUB.Count_And_Get (
5136: p_encoded => FND_API.G_FALSE,
5137: p_count => x_msg_count,
5138: p_data => x_msg_data
5140:
5141: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5142: ROLLBACK TO Update_discount_line_pvt;
5143: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5144: -- Standard call to get message count and if count=1, get the message
5145: FND_MSG_PUB.Count_And_Get (
5146: p_encoded => FND_API.G_FALSE,
5147: p_count => x_msg_count,
5148: p_data => x_msg_data
5154: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5155: THEN
5156: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
5157: END IF;
5158: -- Standard call to get message count and if count=1, get the message
5159: FND_MSG_PUB.Count_And_Get (
5160: p_encoded => FND_API.G_FALSE,
5161: p_count => x_msg_count,
5162: p_data => x_msg_data
5265: l_discount_line_id NUMBER;
5266: BEGIN
5267: SAVEPOINT Update_product_Pvt;
5268:
5269: -- Standard call to check for call compatibility.
5270: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
5271: p_api_version_number,
5272: l_api_name,
5273: G_PKG_NAME)
5344: -- Debug Message
5345: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
5346:
5347:
5348: -- Standard call to get message count and if count is 1, get message info.
5349: FND_MSG_PUB.Count_And_Get
5350: (p_count => l_msg_count,
5351: p_data => l_msg_data
5352: );
5354: EXCEPTION
5355: WHEN FND_API.G_EXC_ERROR THEN
5356: ROLLBACK TO Update_product_Pvt;
5357: x_return_status := FND_API.G_RET_STS_ERROR;
5358: -- Standard call to get message count and if count=1, get the message
5359: FND_MSG_PUB.Count_And_Get (
5360: p_encoded => FND_API.G_FALSE,
5361: p_count => l_msg_count,
5362: p_data => l_msg_data
5364:
5365: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5366: ROLLBACK TO Update_product_Pvt;
5367: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5368: -- Standard call to get message count and if count=1, get the message
5369: FND_MSG_PUB.Count_And_Get (
5370: p_encoded => FND_API.G_FALSE,
5371: p_count => l_msg_count,
5372: p_data => l_msg_data
5378: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5379: THEN
5380: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
5381: END IF;
5382: -- Standard call to get message count and if count=1, get the message
5383: FND_MSG_PUB.Count_And_Get (
5384: p_encoded => FND_API.G_FALSE,
5385: p_count => l_msg_count,
5386: p_data => l_msg_data
5441:
5442: BEGIN
5443: SAVEPOINT Delete_Relation_Pvt;
5444:
5445: -- Standard call to check for call compatibility.
5446: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
5447: p_api_version_number,
5448: l_api_name,
5449: G_PKG_NAME)
5480: -- Debug Message
5481: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
5482:
5483:
5484: -- Standard call to get message count and if count is 1, get message info.
5485: FND_MSG_PUB.Count_And_Get
5486: (p_count => l_msg_count,
5487: p_data => l_msg_data
5488: );
5490: EXCEPTION
5491: WHEN FND_API.G_EXC_ERROR THEN
5492: ROLLBACK TO Delete_Relation_Pvt;
5493: x_return_status := FND_API.G_RET_STS_ERROR;
5494: -- Standard call to get message count and if count=1, get the message
5495: FND_MSG_PUB.Count_And_Get (
5496: p_encoded => FND_API.G_FALSE,
5497: p_count => l_msg_count,
5498: p_data => l_msg_data
5500:
5501: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5502: ROLLBACK TO Delete_Relation_Pvt;
5503: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5504: -- Standard call to get message count and if count=1, get the message
5505: FND_MSG_PUB.Count_And_Get (
5506: p_encoded => FND_API.G_FALSE,
5507: p_count => l_msg_count,
5508: p_data => l_msg_data
5514: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5515: THEN
5516: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
5517: END IF;
5518: -- Standard call to get message count and if count=1, get the message
5519: FND_MSG_PUB.Count_And_Get (
5520: p_encoded => FND_API.G_FALSE,
5521: p_count => l_msg_count,
5522: p_data => l_msg_data
5580:
5581: BEGIN
5582: SAVEPOINT Delete_Product_Pvt;
5583:
5584: -- Standard call to check for call compatibility.
5585: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
5586: p_api_version_number,
5587: l_api_name,
5588: G_PKG_NAME)
5633: -- Debug Message
5634: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
5635:
5636:
5637: -- Standard call to get message count and if count is 1, get message info.
5638: FND_MSG_PUB.Count_And_Get
5639: (p_count => l_msg_count,
5640: p_data => l_msg_data
5641: );
5643: EXCEPTION
5644: WHEN FND_API.G_EXC_ERROR THEN
5645: ROLLBACK TO Delete_Product_Pvt;
5646: x_return_status := FND_API.G_RET_STS_ERROR;
5647: -- Standard call to get message count and if count=1, get the message
5648: FND_MSG_PUB.Count_And_Get (
5649: p_encoded => FND_API.G_FALSE,
5650: p_count => l_msg_count,
5651: p_data => l_msg_data
5653:
5654: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5655: ROLLBACK TO Delete_Product_Pvt;
5656: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5657: -- Standard call to get message count and if count=1, get the message
5658: FND_MSG_PUB.Count_And_Get (
5659: p_encoded => FND_API.G_FALSE,
5660: p_count => l_msg_count,
5661: p_data => l_msg_data
5667: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5668: THEN
5669: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
5670: END IF;
5671: -- Standard call to get message count and if count=1, get the message
5672: FND_MSG_PUB.Count_And_Get (
5673: p_encoded => FND_API.G_FALSE,
5674: p_count => l_msg_count,
5675: p_data => l_msg_data
5749:
5750: BEGIN
5751: SAVEPOINT Delete_offer_line_Pvt;
5752:
5753: -- Standard call to check for call compatibility.
5754: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
5755: p_api_version_number,
5756: l_api_name,
5757: G_PKG_NAME)
5843: -- Debug Message
5844: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
5845:
5846:
5847: -- Standard call to get message count and if count is 1, get message info.
5848: FND_MSG_PUB.Count_And_Get
5849: (p_count => x_msg_count,
5850: p_data => x_msg_data
5851: );
5853: EXCEPTION
5854: WHEN FND_API.G_EXC_ERROR THEN
5855: ROLLBACK TO Delete_offer_line_pvt;
5856: x_return_status := FND_API.G_RET_STS_ERROR;
5857: -- Standard call to get message count and if count=1, get the message
5858: FND_MSG_PUB.Count_And_Get (
5859: p_encoded => FND_API.G_FALSE,
5860: p_count => x_msg_count,
5861: p_data => x_msg_data
5863:
5864: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5865: ROLLBACK TO Delete_offer_line_pvt;
5866: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5867: -- Standard call to get message count and if count=1, get the message
5868: FND_MSG_PUB.Count_And_Get (
5869: p_encoded => FND_API.G_FALSE,
5870: p_count => x_msg_count,
5871: p_data => x_msg_data
5877: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5878: THEN
5879: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
5880: END IF;
5881: -- Standard call to get message count and if count=1, get the message
5882: FND_MSG_PUB.Count_And_Get (
5883: p_encoded => FND_API.G_FALSE,
5884: p_count => x_msg_count,
5885: p_data => x_msg_data
5988: l_prod_rec c_prod_info%rowtype;
5989: BEGIN
5990: SAVEPOINT Create_Product_Exclusion_PVT;
5991:
5992: -- Standard call to check for call compatibility.
5993: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
5994: p_api_version_number,
5995: l_api_name,
5996: G_PKG_NAME)
6080: EXCEPTION
6081: WHEN FND_API.G_EXC_ERROR THEN
6082: ROLLBACK TO Create_Product_Exclusion_PVT;
6083: x_return_status := FND_API.G_RET_STS_ERROR;
6084: -- Standard call to get message count and if count=1, get the message
6085: FND_MSG_PUB.Count_And_Get (
6086: p_encoded => FND_API.G_FALSE,
6087: p_count => x_msg_count,
6088: p_data => x_msg_data
6090:
6091: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6092: ROLLBACK TO Create_Product_Exclusion_PVT;
6093: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6094: -- Standard call to get message count and if count=1, get the message
6095: FND_MSG_PUB.Count_And_Get (
6096: p_encoded => FND_API.G_FALSE,
6097: p_count => x_msg_count,
6098: p_data => x_msg_data
6104: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6105: THEN
6106: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
6107: END IF;
6108: -- Standard call to get message count and if count=1, get the message
6109: FND_MSG_PUB.Count_And_Get (
6110: p_encoded => FND_API.G_FALSE,
6111: p_count => x_msg_count,
6112: p_data => x_msg_data
6145:
6146: BEGIN
6147: SAVEPOINT Update_Product_Exclusion_PVT;
6148:
6149: -- Standard call to check for call compatibility.
6150: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
6151: p_api_version_number,
6152: l_api_name,
6153: G_PKG_NAME)
6221: EXCEPTION
6222: WHEN FND_API.G_EXC_ERROR THEN
6223: ROLLBACK TO Update_Product_Exclusion_PVT;
6224: x_return_status := FND_API.G_RET_STS_ERROR;
6225: -- Standard call to get message count and if count=1, get the message
6226: FND_MSG_PUB.Count_And_Get (
6227: p_encoded => FND_API.G_FALSE,
6228: p_count => x_msg_count,
6229: p_data => x_msg_data
6231:
6232: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6233: ROLLBACK TO Update_Product_Exclusion_PVT;
6234: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6235: -- Standard call to get message count and if count=1, get the message
6236: FND_MSG_PUB.Count_And_Get (
6237: p_encoded => FND_API.G_FALSE,
6238: p_count => x_msg_count,
6239: p_data => x_msg_data
6245: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6246: THEN
6247: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
6248: END IF;
6249: -- Standard call to get message count and if count=1, get the message
6250: FND_MSG_PUB.Count_And_Get (
6251: p_encoded => FND_API.G_FALSE,
6252: p_count => x_msg_count,
6253: p_data => x_msg_data
6526: l_tier_rec ozf_offer_tier_rec_type := p_tier_rec;
6527: BEGIN
6528: SAVEPOINT Create_Disc_tiers_PVT;
6529:
6530: -- Standard call to check for call compatibility.
6531: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
6532: p_api_version_number,
6533: l_api_name,
6534: G_PKG_NAME)
6603: EXCEPTION
6604: WHEN FND_API.G_EXC_ERROR THEN
6605: ROLLBACK TO Create_Disc_tiers_PVT;
6606: x_return_status := FND_API.G_RET_STS_ERROR;
6607: -- Standard call to get message count and if count=1, get the message
6608: FND_MSG_PUB.Count_And_Get (
6609: p_encoded => FND_API.G_FALSE,
6610: p_count => x_msg_count,
6611: p_data => x_msg_data
6613:
6614: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6615: ROLLBACK TO Create_Disc_tiers_PVT;
6616: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6617: -- Standard call to get message count and if count=1, get the message
6618: FND_MSG_PUB.Count_And_Get (
6619: p_encoded => FND_API.G_FALSE,
6620: p_count => x_msg_count,
6621: p_data => x_msg_data
6627: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6628: THEN
6629: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
6630: END IF;
6631: -- Standard call to get message count and if count=1, get the message
6632: FND_MSG_PUB.Count_And_Get (
6633: p_encoded => FND_API.G_FALSE,
6634: p_count => x_msg_count,
6635: p_data => x_msg_data
6667: l_tier_rec ozf_offer_tier_rec_type := p_tier_rec;
6668: BEGIN
6669: SAVEPOINT Create_Disc_tiers_PVT;
6670:
6671: -- Standard call to check for call compatibility.
6672: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
6673: p_api_version_number,
6674: l_api_name,
6675: G_PKG_NAME)
6739: EXCEPTION
6740: WHEN FND_API.G_EXC_ERROR THEN
6741: ROLLBACK TO Create_Disc_tiers_PVT;
6742: x_return_status := FND_API.G_RET_STS_ERROR;
6743: -- Standard call to get message count and if count=1, get the message
6744: FND_MSG_PUB.Count_And_Get (
6745: p_encoded => FND_API.G_FALSE,
6746: p_count => x_msg_count,
6747: p_data => x_msg_data
6749:
6750: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6751: ROLLBACK TO Create_Disc_tiers_PVT;
6752: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6753: -- Standard call to get message count and if count=1, get the message
6754: FND_MSG_PUB.Count_And_Get (
6755: p_encoded => FND_API.G_FALSE,
6756: p_count => x_msg_count,
6757: p_data => x_msg_data
6763: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6764: THEN
6765: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
6766: END IF;
6767: -- Standard call to get message count and if count=1, get the message
6768: FND_MSG_PUB.Count_And_Get (
6769: p_encoded => FND_API.G_FALSE,
6770: p_count => x_msg_count,
6771: p_data => x_msg_data
6799:
6800: BEGIN
6801: SAVEPOINT Delete_Disc_tiers_PVT;
6802:
6803: -- Standard call to check for call compatibility.
6804: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
6805: p_api_version_number,
6806: l_api_name,
6807: G_PKG_NAME)
6838: EXCEPTION
6839: WHEN FND_API.G_EXC_ERROR THEN
6840: ROLLBACK TO Delete_Disc_tiers_PVT;
6841: x_return_status := FND_API.G_RET_STS_ERROR;
6842: -- Standard call to get message count and if count=1, get the message
6843: FND_MSG_PUB.Count_And_Get (
6844: p_encoded => FND_API.G_FALSE,
6845: p_count => x_msg_count,
6846: p_data => x_msg_data
6848:
6849: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6850: ROLLBACK TO Delete_Disc_tiers_PVT;
6851: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6852: -- Standard call to get message count and if count=1, get the message
6853: FND_MSG_PUB.Count_And_Get (
6854: p_encoded => FND_API.G_FALSE,
6855: p_count => x_msg_count,
6856: p_data => x_msg_data
6862: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6863: THEN
6864: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
6865: END IF;
6866: -- Standard call to get message count and if count=1, get the message
6867: FND_MSG_PUB.Count_And_Get (
6868: p_encoded => FND_API.G_FALSE,
6869: p_count => x_msg_count,
6870: p_data => x_msg_data
6936:
6937: BEGIN
6938: SAVEPOINT Delete_tier_line_Pvt;
6939:
6940: -- Standard call to check for call compatibility.
6941: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
6942: p_api_version_number,
6943: l_api_name,
6944: G_PKG_NAME)
7001: -- Debug Message
7002: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
7003:
7004:
7005: -- Standard call to get message count and if count is 1, get message info.
7006: FND_MSG_PUB.Count_And_Get
7007: (p_count => x_msg_count,
7008: p_data => x_msg_data
7009: );
7011: EXCEPTION
7012: WHEN FND_API.G_EXC_ERROR THEN
7013: ROLLBACK TO Delete_tier_line_pvt;
7014: x_return_status := FND_API.G_RET_STS_ERROR;
7015: -- Standard call to get message count and if count=1, get the message
7016: FND_MSG_PUB.Count_And_Get (
7017: p_encoded => FND_API.G_FALSE,
7018: p_count => x_msg_count,
7019: p_data => x_msg_data
7021:
7022: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7023: ROLLBACK TO Delete_tier_line_pvt;
7024: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7025: -- Standard call to get message count and if count=1, get the message
7026: FND_MSG_PUB.Count_And_Get (
7027: p_encoded => FND_API.G_FALSE,
7028: p_count => x_msg_count,
7029: p_data => x_msg_data
7035: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
7036: THEN
7037: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
7038: END IF;
7039: -- Standard call to get message count and if count=1, get the message
7040: FND_MSG_PUB.Count_And_Get (
7041: p_encoded => FND_API.G_FALSE,
7042: p_count => x_msg_count,
7043: p_data => x_msg_data