237:
238: If HZ_CLASS_VALIDATE_V2PUB.is_valid_delimiter(p_class_cat_rec.class_category,p_class_cat_rec.delimiter)='N'
239: then
240: FND_MESSAGE.SET_NAME('AR', 'HZ_INVALID_DELIMITER');
241: FND_MSG_PUB.ADD;
242: RAISE FND_API.G_EXC_ERROR;
243: end if;
244:
245: HZ_CLASS_CATEGORIES_PKG.Insert_Row (
310: OR (p_object_version_number = l_object_version_number))
311: THEN
312: FND_MESSAGE.SET_NAME('AR', 'HZ_API_RECORD_CHANGED');
313: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_CLASS_CATEGORIES');
314: FND_MSG_PUB.ADD;
315: RAISE FND_API.G_EXC_ERROR;
316: END IF;
317:
318: p_object_version_number := nvl(l_object_version_number, 1) + 1;
320: EXCEPTION WHEN NO_DATA_FOUND THEN
321: FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_RECORD');
322: FND_MESSAGE.SET_TOKEN('RECORD', 'HZ_CLASS_CATEGORIES');
323: FND_MESSAGE.SET_TOKEN('VALUE', 'p_class_cat_rec.class_category');
324: FND_MSG_PUB.ADD;
325: RAISE FND_API.G_EXC_ERROR;
326: END;
327:
328: -- call for validations.
337: then
338: If HZ_CLASS_VALIDATE_V2PUB.is_valid_delimiter(p_class_cat_rec.class_category,p_class_cat_rec.delimiter)='N'
339: then
340: FND_MESSAGE.SET_NAME('AR', 'HZ_INVALID_DELIMITER');
341: FND_MSG_PUB.ADD;
342: RAISE FND_API.G_EXC_ERROR;
343: end if;
344: end if;
345:
488: OR (p_object_version_number = l_object_version_number))
489: THEN
490: FND_MESSAGE.SET_NAME('AR', 'HZ_API_RECORD_CHANGED');
491: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_CLASS_CODE_RELATIONS');
492: FND_MSG_PUB.ADD;
493: RAISE FND_API.G_EXC_ERROR;
494: END IF;
495:
496: p_object_version_number := nvl(l_object_version_number, 1) + 1;
498: EXCEPTION WHEN NO_DATA_FOUND THEN
499: FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_RECORD');
500: FND_MESSAGE.SET_TOKEN('RECORD', 'HZ_CLASS_CODE_RELATIONS');
501: FND_MESSAGE.SET_TOKEN('VALUE', 'p_class_code_rel_rec.class_category');
502: FND_MSG_PUB.ADD;
503: RAISE FND_API.G_EXC_ERROR;
504: END;
505:
506: -- call for validations.
707: --
708: FND_MESSAGE.SET_NAME('AR', 'HZ_DSS_NO_INSERT_PRIVILEGE');
709: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',
710: hz_dss_util_pub.get_display_name('HZ_CODE_ASSIGNMENTS', null));
711: FND_MSG_PUB.ADD;
712: RAISE FND_API.G_EXC_ERROR;
713: end if;
714: END IF;
715:
944: p_object_version_number = l_object_version_number))
945: THEN
946: FND_MESSAGE.SET_NAME('AR', 'HZ_API_RECORD_CHANGED');
947: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_CODE_ASSIGNMENTS');
948: FND_MSG_PUB.ADD;
949: RAISE FND_API.G_EXC_ERROR;
950: END IF;
951:
952: p_object_version_number := nvl(l_object_version_number, 1) + 1;
954: EXCEPTION WHEN NO_DATA_FOUND THEN
955: FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_RECORD');
956: FND_MESSAGE.SET_TOKEN('RECORD', 'HZ_CODE_ASSIGNMENTS');
957: FND_MESSAGE.SET_TOKEN('VALUE', 'p_code_assignment_rec.code_assignment_id');
958: FND_MSG_PUB.ADD;
959: RAISE FND_API.G_EXC_ERROR;
960: END;
961:
962: -- call for validations.
1314: OR (p_object_version_number = l_object_version_number))
1315: THEN
1316: FND_MESSAGE.SET_NAME('AR', 'HZ_API_RECORD_CHANGED');
1317: FND_MESSAGE.SET_TOKEN('TABLE', 'HZ_CLASS_CATEGORY_USES');
1318: FND_MSG_PUB.ADD;
1319: RAISE FND_API.G_EXC_ERROR;
1320: END IF;
1321:
1322: p_object_version_number := nvl(l_object_version_number, 1) + 1;
1324: EXCEPTION WHEN NO_DATA_FOUND THEN
1325: FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_RECORD');
1326: FND_MESSAGE.SET_TOKEN('RECORD', 'HZ_CLASS_CATEGORY_USES');
1327: FND_MESSAGE.SET_TOKEN('VALUE', 'p_class_category_use_rec.class_category');
1328: FND_MSG_PUB.ADD;
1329: RAISE FND_API.G_EXC_ERROR;
1330: END;
1331:
1332: -- call for validations.
1403: SAVEPOINT create_class_category;
1404:
1405: -- initialize message list if p_init_msg_list is set to TRUE.
1406: IF FND_API.to_Boolean(p_init_msg_list) THEN
1407: FND_MSG_PUB.initialize;
1408: END IF;
1409:
1410: -- initialize API return status to success.
1411: x_return_status := FND_API.G_RET_STS_SUCCESS;
1426:
1427: END IF;
1428:
1429: -- standard call to get message count and if count is 1, get message info.
1430: FND_MSG_PUB.Count_And_Get(
1431: p_encoded => FND_API.G_FALSE,
1432: p_count => x_msg_count,
1433: p_data => x_msg_data);
1434:
1435: EXCEPTION
1436: WHEN FND_API.G_EXC_ERROR THEN
1437: ROLLBACK TO create_class_category;
1438: x_return_status := FND_API.G_RET_STS_ERROR;
1439: FND_MSG_PUB.Count_And_Get(
1440: p_encoded => FND_API.G_FALSE,
1441: p_count => x_msg_count,
1442: p_data => x_msg_data);
1443:
1443:
1444: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1445: ROLLBACK TO create_class_category;
1446: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1447: FND_MSG_PUB.Count_And_Get(
1448: p_encoded => FND_API.G_FALSE,
1449: p_count => x_msg_count,
1450: p_data => x_msg_data);
1451:
1453: ROLLBACK TO create_class_category;
1454: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1455: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1456: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1457: FND_MSG_PUB.ADD;
1458: FND_MSG_PUB.Count_And_Get(
1459: p_encoded => FND_API.G_FALSE,
1460: p_count => x_msg_count,
1461: p_data => x_msg_data);
1454: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1455: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1456: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1457: FND_MSG_PUB.ADD;
1458: FND_MSG_PUB.Count_And_Get(
1459: p_encoded => FND_API.G_FALSE,
1460: p_count => x_msg_count,
1461: p_data => x_msg_data);
1462: END create_class_category;
1511: SAVEPOINT update_class_category;
1512:
1513: -- initialize message list if p_init_msg_list is set to TRUE.
1514: IF FND_API.to_Boolean(p_init_msg_list) THEN
1515: FND_MSG_PUB.initialize;
1516: END IF;
1517:
1518: -- initialize API return status to success.
1519: x_return_status := FND_API.G_RET_STS_SUCCESS;
1550:
1551: END IF;
1552:
1553: -- standard call to get message count and if count is 1, get message info.
1554: FND_MSG_PUB.Count_And_Get(
1555: p_encoded => FND_API.G_FALSE,
1556: p_count => x_msg_count,
1557: p_data => x_msg_data);
1558:
1559: EXCEPTION
1560: WHEN FND_API.G_EXC_ERROR THEN
1561: ROLLBACK TO update_class_category;
1562: x_return_status := FND_API.G_RET_STS_ERROR;
1563: FND_MSG_PUB.Count_And_Get(
1564: p_encoded => FND_API.G_FALSE,
1565: p_count => x_msg_count,
1566: p_data => x_msg_data);
1567:
1567:
1568: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1569: ROLLBACK TO update_class_category;
1570: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
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);
1575:
1577: ROLLBACK TO update_class_category;
1578: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1579: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1580: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1581: FND_MSG_PUB.ADD;
1582: FND_MSG_PUB.Count_And_Get(
1583: p_encoded => FND_API.G_FALSE,
1584: p_count => x_msg_count,
1585: p_data => x_msg_data);
1578: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1579: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1580: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1581: FND_MSG_PUB.ADD;
1582: FND_MSG_PUB.Count_And_Get(
1583: p_encoded => FND_API.G_FALSE,
1584: p_count => x_msg_count,
1585: p_data => x_msg_data);
1586:
1633: SAVEPOINT create_class_code_relation;
1634:
1635: -- initialize message list if p_init_msg_list is set to TRUE.
1636: IF FND_API.to_Boolean(p_init_msg_list) THEN
1637: FND_MSG_PUB.initialize;
1638: END IF;
1639:
1640: -- initialize API return status to success.
1641: x_return_status := FND_API.G_RET_STS_SUCCESS;
1655:
1656: END IF;
1657:
1658: -- standard call to get message count and if count is 1, get message info.
1659: FND_MSG_PUB.Count_And_Get(
1660: p_encoded => FND_API.G_FALSE,
1661: p_count => x_msg_count,
1662: p_data => x_msg_data);
1663:
1664: EXCEPTION
1665: WHEN FND_API.G_EXC_ERROR THEN
1666: ROLLBACK TO create_class_code_relation;
1667: x_return_status := FND_API.G_RET_STS_ERROR;
1668: FND_MSG_PUB.Count_And_Get(
1669: p_encoded => FND_API.G_FALSE,
1670: p_count => x_msg_count,
1671: p_data => x_msg_data);
1672:
1672:
1673: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1674: ROLLBACK TO create_class_code_relation;
1675: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1676: FND_MSG_PUB.Count_And_Get(
1677: p_encoded => FND_API.G_FALSE,
1678: p_count => x_msg_count,
1679: p_data => x_msg_data);
1680:
1682: ROLLBACK TO create_class_code_relation;
1683: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1684: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1685: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1686: FND_MSG_PUB.ADD;
1687: FND_MSG_PUB.Count_And_Get(
1688: p_encoded => FND_API.G_FALSE,
1689: p_count => x_msg_count,
1690: p_data => x_msg_data);
1683: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1684: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1685: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1686: FND_MSG_PUB.ADD;
1687: FND_MSG_PUB.Count_And_Get(
1688: p_encoded => FND_API.G_FALSE,
1689: p_count => x_msg_count,
1690: p_data => x_msg_data);
1691: END create_class_code_relation;
1740: SAVEPOINT update_class_code_relation;
1741:
1742: -- initialize message list if p_init_msg_list is set to TRUE.
1743: IF FND_API.to_Boolean(p_init_msg_list) THEN
1744: FND_MSG_PUB.initialize;
1745: END IF;
1746:
1747: -- initialize API return status to success.
1748: x_return_status := FND_API.G_RET_STS_SUCCESS;
1782:
1783: END IF;
1784:
1785: -- standard call to get message count and if count is 1, get message info.
1786: FND_MSG_PUB.Count_And_Get(
1787: p_encoded => FND_API.G_FALSE,
1788: p_count => x_msg_count,
1789: p_data => x_msg_data);
1790:
1791: EXCEPTION
1792: WHEN FND_API.G_EXC_ERROR THEN
1793: ROLLBACK TO update_class_code_relation;
1794: x_return_status := FND_API.G_RET_STS_ERROR;
1795: FND_MSG_PUB.Count_And_Get(
1796: p_encoded => FND_API.G_FALSE,
1797: p_count => x_msg_count,
1798: p_data => x_msg_data);
1799:
1799:
1800: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1801: ROLLBACK TO update_class_code_relation;
1802: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1803: FND_MSG_PUB.Count_And_Get(
1804: p_encoded => FND_API.G_FALSE,
1805: p_count => x_msg_count,
1806: p_data => x_msg_data);
1807:
1809: ROLLBACK TO update_class_code_relation;
1810: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1811: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1812: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1813: FND_MSG_PUB.ADD;
1814: FND_MSG_PUB.Count_And_Get(
1815: p_encoded => FND_API.G_FALSE,
1816: p_count => x_msg_count,
1817: p_data => x_msg_data);
1810: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1811: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1812: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1813: FND_MSG_PUB.ADD;
1814: FND_MSG_PUB.Count_And_Get(
1815: p_encoded => FND_API.G_FALSE,
1816: p_count => x_msg_count,
1817: p_data => x_msg_data);
1818:
1878: SAVEPOINT create_code_assignment;
1879:
1880: -- initialize message list if p_init_msg_list is set to TRUE.
1881: IF FND_API.to_Boolean(p_init_msg_list) THEN
1882: FND_MSG_PUB.initialize;
1883: END IF;
1884:
1885: -- initialize API return status to success.
1886: x_return_status := FND_API.G_RET_STS_SUCCESS;
1920: END IF;
1921: END IF;
1922:
1923: -- standard call to get message count and if count is 1, get message info.
1924: FND_MSG_PUB.Count_And_Get(
1925: p_encoded => FND_API.G_FALSE,
1926: p_count => x_msg_count,
1927: p_data => x_msg_data);
1928:
1929: EXCEPTION
1930: WHEN FND_API.G_EXC_ERROR THEN
1931: ROLLBACK TO create_code_assignment;
1932: x_return_status := FND_API.G_RET_STS_ERROR;
1933: FND_MSG_PUB.Count_And_Get(
1934: p_encoded => FND_API.G_FALSE,
1935: p_count => x_msg_count,
1936: p_data => x_msg_data);
1937:
1937:
1938: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1939: ROLLBACK TO create_code_assignment;
1940: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1941: FND_MSG_PUB.Count_And_Get(
1942: p_encoded => FND_API.G_FALSE,
1943: p_count => x_msg_count,
1944: p_data => x_msg_data);
1945:
1947: ROLLBACK TO create_code_assignment;
1948: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1949: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1950: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1951: FND_MSG_PUB.ADD;
1952: FND_MSG_PUB.Count_And_Get(
1953: p_encoded => FND_API.G_FALSE,
1954: p_count => x_msg_count,
1955: p_data => x_msg_data);
1948: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1949: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1950: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1951: FND_MSG_PUB.ADD;
1952: FND_MSG_PUB.Count_And_Get(
1953: p_encoded => FND_API.G_FALSE,
1954: p_count => x_msg_count,
1955: p_data => x_msg_data);
1956: END create_code_assignment;
2010: SAVEPOINT update_code_assignment;
2011:
2012: -- initialize message list if p_init_msg_list is set to TRUE.
2013: IF FND_API.to_Boolean(p_init_msg_list) THEN
2014: FND_MSG_PUB.initialize;
2015: END IF;
2016:
2017: -- initialize API return status to success.
2018: x_return_status := FND_API.G_RET_STS_SUCCESS;
2067: -- Bug 3835601: replaced the dss message with a more user friendly message
2068: --
2069: FND_MESSAGE.SET_NAME('AR', 'HZ_DSS_NO_UPDATE_PRIVILEGE');
2070: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',
2071: hz_dss_util_pub.get_display_name('HZ_CODE_ASSIGNMENTS', null)); FND_MSG_PUB.ADD;
2072: RAISE FND_API.G_EXC_ERROR;
2073: end if;
2074: END IF;
2075:
2095: END IF;
2096:
2097: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
2098: -- standard call to get message count and if count is 1, get message info.
2099: FND_MSG_PUB.Count_And_Get(
2100: p_encoded => FND_API.G_FALSE,
2101: p_count => x_msg_count,
2102: p_data => x_msg_data);
2103:
2105: WHEN FND_API.G_EXC_ERROR THEN
2106: ROLLBACK TO update_code_assignment;
2107: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
2108: x_return_status := FND_API.G_RET_STS_ERROR;
2109: FND_MSG_PUB.Count_And_Get(
2110: p_encoded => FND_API.G_FALSE,
2111: p_count => x_msg_count,
2112: p_data => x_msg_data);
2113:
2114: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2115: ROLLBACK TO update_code_assignment;
2116: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
2117: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2118: FND_MSG_PUB.Count_And_Get(
2119: p_encoded => FND_API.G_FALSE,
2120: p_count => x_msg_count,
2121: p_data => x_msg_data);
2122:
2125: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
2126: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2127: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
2128: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
2129: FND_MSG_PUB.ADD;
2130: FND_MSG_PUB.Count_And_Get(
2131: p_encoded => FND_API.G_FALSE,
2132: p_count => x_msg_count,
2133: p_data => x_msg_data);
2126: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2127: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
2128: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
2129: FND_MSG_PUB.ADD;
2130: FND_MSG_PUB.Count_And_Get(
2131: p_encoded => FND_API.G_FALSE,
2132: p_count => x_msg_count,
2133: p_data => x_msg_data);
2134:
2211: SAVEPOINT set_primary_code_assign;
2212:
2213: --Initialize message list if p_init_msg_list is set to TRUE.
2214: IF FND_API.to_Boolean(p_init_msg_list) THEN
2215: FND_MSG_PUB.initialize;
2216: END IF;
2217:
2218: --Initialize API return status to success.
2219: x_return_status := FND_API.G_RET_STS_SUCCESS;
2300: NULL;
2301: END IF;
2302:
2303: --Standard call to get message count and if count is 1, get message info.
2304: FND_MSG_PUB.Count_And_Get(
2305: p_encoded => FND_API.G_FALSE,
2306: p_count => x_msg_count,
2307: p_data => x_msg_data);
2308:
2309: EXCEPTION
2310: WHEN FND_API.G_EXC_ERROR THEN
2311: ROLLBACK TO set_primary_code_assign;
2312: x_return_status := FND_API.G_RET_STS_ERROR;
2313: FND_MSG_PUB.Count_And_Get(
2314: p_encoded => FND_API.G_FALSE,
2315: p_count => x_msg_count,
2316: p_data => x_msg_data);
2317:
2317:
2318: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2319: ROLLBACK TO set_primary_code_assign;
2320: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2321: FND_MSG_PUB.Count_And_Get(
2322: p_encoded => FND_API.G_FALSE,
2323: p_count => x_msg_count,
2324: p_data => x_msg_data);
2325:
2327: ROLLBACK TO set_primary_code_assign;
2328: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2329: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
2330: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
2331: FND_MSG_PUB.ADD;
2332: FND_MSG_PUB.Count_And_Get(
2333: p_encoded => FND_API.G_FALSE,
2334: p_count => x_msg_count,
2335: p_data => x_msg_data);
2328: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2329: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
2330: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
2331: FND_MSG_PUB.ADD;
2332: FND_MSG_PUB.Count_And_Get(
2333: p_encoded => FND_API.G_FALSE,
2334: p_count => x_msg_count,
2335: p_data => x_msg_data);
2336: END;
2382: SAVEPOINT create_class_category_use;
2383:
2384: -- initialize message list if p_init_msg_list is TRUE
2385: IF FND_API.to_Boolean(p_init_msg_list) THEN
2386: FND_MSG_PUB.INITIALIZE;
2387: END IF;
2388:
2389: -- initialize API return status to SUCCESS
2390: x_return_status := FND_API.G_RET_STS_SUCCESS;
2405:
2406: END IF;
2407:
2408: -- standard Call to get message count and if count is 1 get message info.
2409: FND_MSG_PUB.count_and_get(
2410: p_encoded => fnd_api.g_false,
2411: p_count => x_msg_count,
2412: p_data => x_msg_data );
2413:
2414: EXCEPTION
2415: WHEN FND_API.G_EXC_ERROR THEN
2416: ROLLBACK TO create_class_category_use;
2417: x_return_status := FND_API.G_RET_STS_ERROR;
2418: FND_MSG_PUB.Count_And_Get(
2419: p_encoded => FND_API.G_FALSE,
2420: p_count => x_msg_count,
2421: p_data => x_msg_data );
2422:
2422:
2423: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2424: ROLLBACK TO create_class_category_use;
2425: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2426: FND_MSG_PUB.Count_And_Get(
2427: p_encoded => FND_API.G_FALSE,
2428: p_count => x_msg_count,
2429: p_data => x_msg_data );
2430:
2432: ROLLBACK TO create_class_category_use;
2433: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2434: FND_MESSAGE.Set_Name('AR','HZ_API_OTHERS_EXCEP');
2435: FND_MESSAGE.Set_Token('ERROR',SQLERRM);
2436: FND_MSG_PUB.Count_And_Get(
2437: p_encoded => FND_API.G_FALSE,
2438: p_count => x_msg_count,
2439: p_data => x_msg_data );
2440:
2490: SAVEPOINT update_class_category_use;
2491:
2492: -- initialize message list if p_init_msg_list is set to TRUE.
2493: IF FND_API.to_Boolean(p_init_msg_list) THEN
2494: FND_MSG_PUB.initialize;
2495: END IF;
2496:
2497: -- Initialize API return status to success.
2498: x_return_status := FND_API.G_RET_STS_SUCCESS;
2530:
2531: END IF;
2532:
2533: -- standard call to get message count and if count is 1, get message info.
2534: FND_MSG_PUB.Count_And_Get(
2535: p_encoded => FND_API.G_FALSE,
2536: p_count => x_msg_count,
2537: p_data => x_msg_data);
2538:
2540: WHEN FND_API.G_EXC_ERROR THEN
2541: ROLLBACK TO update_class_category_use;
2542: x_return_status := FND_API.G_RET_STS_ERROR;
2543:
2544: FND_MSG_PUB.Count_And_Get(
2545: p_encoded => FND_API.G_FALSE,
2546: p_count => x_msg_count,
2547: p_data => x_msg_data );
2548:
2549: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2550: ROLLBACK TO update_class_category_use;
2551: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2552:
2553: FND_MSG_PUB.Count_And_Get(
2554: p_encoded => FND_API.G_FALSE,
2555: p_count => x_msg_count,
2556: p_data => x_msg_data );
2557:
2560: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2561:
2562: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OTHERS_EXCEP' );
2563: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
2564: FND_MSG_PUB.ADD;
2565:
2566: FND_MSG_PUB.Count_And_Get(
2567: p_encoded => FND_API.G_FALSE,
2568: p_count => x_msg_count,
2562: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OTHERS_EXCEP' );
2563: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
2564: FND_MSG_PUB.ADD;
2565:
2566: FND_MSG_PUB.Count_And_Get(
2567: p_encoded => FND_API.G_FALSE,
2568: p_count => x_msg_count,
2569: p_data => x_msg_data );
2570:
2798: BEGIN
2799:
2800: --Initialize message list if p_init_msg_list is set to TRUE.
2801: IF FND_API.to_Boolean(p_init_msg_list) THEN
2802: FND_MSG_PUB.initialize;
2803: END IF;
2804:
2805: --Initialize API return status to success.
2806: x_return_status := FND_API.G_RET_STS_SUCCESS;
2809: IF p_class_category IS NULL OR
2810: p_class_category = FND_API.G_MISS_CHAR THEN
2811: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
2812: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'class_category' );
2813: FND_MSG_PUB.ADD;
2814: RAISE FND_API.G_EXC_ERROR;
2815: END IF;
2816:
2817: x_class_category_rec.class_category := p_class_category;
2826: X_DELIMITER => x_class_category_rec.delimiter
2827: );
2828:
2829: --Standard call to get message count and if count is 1, get message info.
2830: FND_MSG_PUB.Count_And_Get(
2831: p_encoded => FND_API.G_FALSE,
2832: p_count => x_msg_count,
2833: p_data => x_msg_data );
2834:
2835: EXCEPTION
2836: WHEN FND_API.G_EXC_ERROR THEN
2837: x_return_status := FND_API.G_RET_STS_ERROR;
2838:
2839: FND_MSG_PUB.Count_And_Get(
2840: p_encoded => FND_API.G_FALSE,
2841: p_count => x_msg_count,
2842: p_data => x_msg_data );
2843:
2843:
2844: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2845: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2846:
2847: FND_MSG_PUB.Count_And_Get(
2848: p_encoded => FND_API.G_FALSE,
2849: p_count => x_msg_count,
2850: p_data => x_msg_data );
2851:
2853: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2854:
2855: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OTHERS_EXCEP' );
2856: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
2857: FND_MSG_PUB.ADD;
2858:
2859: FND_MSG_PUB.Count_And_Get(
2860: p_encoded => FND_API.G_FALSE,
2861: p_count => x_msg_count,
2855: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OTHERS_EXCEP' );
2856: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
2857: FND_MSG_PUB.ADD;
2858:
2859: FND_MSG_PUB.Count_And_Get(
2860: p_encoded => FND_API.G_FALSE,
2861: p_count => x_msg_count,
2862: p_data => x_msg_data );
2863:
2909: BEGIN
2910:
2911: --Initialize message list if p_init_msg_list is set to TRUE.
2912: IF FND_API.to_Boolean(p_init_msg_list) THEN
2913: FND_MSG_PUB.initialize;
2914: END IF;
2915:
2916: --Initialize API return status to success.
2917: x_return_status := FND_API.G_RET_STS_SUCCESS;
2920: IF p_class_category IS NULL OR
2921: p_class_category = FND_API.G_MISS_CHAR THEN
2922: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
2923: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'class_category' );
2924: FND_MSG_PUB.ADD;
2925: RAISE FND_API.G_EXC_ERROR;
2926: END IF;
2927:
2928: IF p_owner_table IS NULL OR
2928: IF p_owner_table IS NULL OR
2929: p_owner_table = FND_API.G_MISS_CHAR THEN
2930: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
2931: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'owner_table' );
2932: FND_MSG_PUB.ADD;
2933: RAISE FND_API.G_EXC_ERROR;
2934: END IF;
2935:
2936: x_class_category_use_rec.class_category := p_class_category;
2945: X_APPLICATION_ID => x_class_category_use_rec.application_id
2946: );
2947:
2948: --Standard call to get message count and if count is 1, get message info.
2949: FND_MSG_PUB.Count_And_Get(
2950: p_encoded => FND_API.G_FALSE,
2951: p_count => x_msg_count,
2952: p_data => x_msg_data );
2953:
2954: EXCEPTION
2955: WHEN FND_API.G_EXC_ERROR THEN
2956: x_return_status := FND_API.G_RET_STS_ERROR;
2957:
2958: FND_MSG_PUB.Count_And_Get(
2959: p_encoded => FND_API.G_FALSE,
2960: p_count => x_msg_count,
2961: p_data => x_msg_data );
2962:
2962:
2963: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2964: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2965:
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 );
2970:
2972: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2973:
2974: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OTHERS_EXCEP' );
2975: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
2976: FND_MSG_PUB.ADD;
2977:
2978: FND_MSG_PUB.Count_And_Get(
2979: p_encoded => FND_API.G_FALSE,
2980: p_count => x_msg_count,
2974: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OTHERS_EXCEP' );
2975: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
2976: FND_MSG_PUB.ADD;
2977:
2978: FND_MSG_PUB.Count_And_Get(
2979: p_encoded => FND_API.G_FALSE,
2980: p_count => x_msg_count,
2981: p_data => x_msg_data );
2982:
3032: BEGIN
3033:
3034: --Initialize message list if p_init_msg_list is set to TRUE.
3035: IF FND_API.to_Boolean(p_init_msg_list) THEN
3036: FND_MSG_PUB.initialize;
3037: END IF;
3038:
3039: --Initialize API return status to success.
3040: x_return_status := FND_API.G_RET_STS_SUCCESS;
3043: IF p_class_category IS NULL OR
3044: p_class_category = FND_API.G_MISS_CHAR THEN
3045: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
3046: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'class_category' );
3047: FND_MSG_PUB.ADD;
3048: RAISE FND_API.G_EXC_ERROR;
3049: END IF;
3050:
3051: IF p_class_code IS NULL OR
3051: IF p_class_code IS NULL OR
3052: p_class_code = FND_API.G_MISS_CHAR THEN
3053: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
3054: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'class_code' );
3055: FND_MSG_PUB.ADD;
3056: RAISE FND_API.G_EXC_ERROR;
3057: END IF;
3058:
3059: IF p_sub_class_code IS NULL OR
3059: IF p_sub_class_code IS NULL OR
3060: p_sub_class_code = FND_API.G_MISS_CHAR THEN
3061: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
3062: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'sub_class_code' );
3063: FND_MSG_PUB.ADD;
3064: RAISE FND_API.G_EXC_ERROR;
3065: END IF;
3066:
3067: IF p_start_date_active IS NULL OR
3067: IF p_start_date_active IS NULL OR
3068: p_start_date_active = FND_API.G_MISS_DATE THEN
3069: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
3070: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'start_date_active' );
3071: FND_MSG_PUB.ADD;
3072: RAISE FND_API.G_EXC_ERROR;
3073: END IF;
3074:
3075: x_class_code_relation_rec.class_category := p_class_category;
3087: X_APPLICATION_ID => x_class_code_relation_rec.application_id
3088: );
3089:
3090: --Standard call to get message count and if count is 1, get message info.
3091: FND_MSG_PUB.Count_And_Get(
3092: p_encoded => FND_API.G_FALSE,
3093: p_count => x_msg_count,
3094: p_data => x_msg_data );
3095:
3096: EXCEPTION
3097: WHEN FND_API.G_EXC_ERROR THEN
3098: x_return_status := FND_API.G_RET_STS_ERROR;
3099:
3100: FND_MSG_PUB.Count_And_Get(
3101: p_encoded => FND_API.G_FALSE,
3102: p_count => x_msg_count,
3103: p_data => x_msg_data );
3104:
3104:
3105: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3106: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3107:
3108: FND_MSG_PUB.Count_And_Get(
3109: p_encoded => FND_API.G_FALSE,
3110: p_count => x_msg_count,
3111: p_data => x_msg_data );
3112:
3114: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3115:
3116: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OTHERS_EXCEP' );
3117: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
3118: FND_MSG_PUB.ADD;
3119:
3120: FND_MSG_PUB.Count_And_Get(
3121: p_encoded => FND_API.G_FALSE,
3122: p_count => x_msg_count,
3116: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OTHERS_EXCEP' );
3117: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
3118: FND_MSG_PUB.ADD;
3119:
3120: FND_MSG_PUB.Count_And_Get(
3121: p_encoded => FND_API.G_FALSE,
3122: p_count => x_msg_count,
3123: p_data => x_msg_data );
3124:
3171: BEGIN
3172:
3173: --Initialize message list if p_init_msg_list is set to TRUE.
3174: IF FND_API.to_Boolean(p_init_msg_list) THEN
3175: FND_MSG_PUB.initialize;
3176: END IF;
3177:
3178: --Initialize API return status to success.
3179: x_return_status := FND_API.G_RET_STS_SUCCESS;
3182: IF p_code_assignment_id IS NULL OR
3183: p_code_assignment_id = FND_API.G_MISS_NUM THEN
3184: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
3185: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'code_assignment_id' );
3186: FND_MSG_PUB.ADD;
3187: RAISE FND_API.G_EXC_ERROR;
3188: END IF;
3189:
3190: x_code_assignment_rec.code_assignment_id := p_code_assignment_id;
3213:
3214: );
3215:
3216: --Standard call to get message count and if count is 1, get message info.
3217: FND_MSG_PUB.Count_And_Get(
3218: p_encoded => FND_API.G_FALSE,
3219: p_count => x_msg_count,
3220: p_data => x_msg_data );
3221:
3222: EXCEPTION
3223: WHEN FND_API.G_EXC_ERROR THEN
3224: x_return_status := FND_API.G_RET_STS_ERROR;
3225:
3226: FND_MSG_PUB.Count_And_Get(
3227: p_encoded => FND_API.G_FALSE,
3228: p_count => x_msg_count,
3229: p_data => x_msg_data );
3230:
3230:
3231: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3232: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3233:
3234: FND_MSG_PUB.Count_And_Get(
3235: p_encoded => FND_API.G_FALSE,
3236: p_count => x_msg_count,
3237: p_data => x_msg_data );
3238:
3240: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3241:
3242: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OTHERS_EXCEP' );
3243: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
3244: FND_MSG_PUB.ADD;
3245:
3246: FND_MSG_PUB.Count_And_Get(
3247: p_encoded => FND_API.G_FALSE,
3248: p_count => x_msg_count,
3242: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OTHERS_EXCEP' );
3243: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
3244: FND_MSG_PUB.ADD;
3245:
3246: FND_MSG_PUB.Count_And_Get(
3247: p_encoded => FND_API.G_FALSE,
3248: p_count => x_msg_count,
3249: p_data => x_msg_data );
3250:
3562: savepoint create_class_code;
3563:
3564: -- initialize message list if p_init_msg_list is set to TRUE.
3565: IF FND_API.to_Boolean(p_init_msg_list) THEN
3566: FND_MSG_PUB.initialize;
3567: END IF;
3568:
3569: -- Initialize return status to SUCCESS
3570: x_return_status := FND_API.G_RET_STS_SUCCESS;
3571:
3572: If HZ_CLASS_VALIDATE_V2PUB.is_valid_class_code_meaning(l_class_code_rec.type,l_class_code_rec.meaning)='N'
3573: then
3574: FND_MESSAGE.SET_NAME('AR', 'HZ_MODIFY_CLASS_CODE_MEANING');
3575: FND_MSG_PUB.ADD;
3576: RAISE FND_API.G_EXC_ERROR;
3577: end if;
3578:
3579: --Bug fix 2783498
3657:
3658: WHEN FND_API.G_EXC_ERROR THEN
3659: ROLLBACK TO create_class_code;
3660: x_return_status := FND_API.G_RET_STS_ERROR;
3661: FND_MSG_PUB.Count_And_Get(
3662: p_encoded => FND_API.G_FALSE,
3663: p_count => x_msg_count,
3664: p_data => x_msg_data);
3665:
3665:
3666: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3667: ROLLBACK TO create_class_code ;
3668: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3669: FND_MSG_PUB.Count_And_Get(
3670: p_encoded => FND_API.G_FALSE,
3671: p_count => x_msg_count,
3672: p_data => x_msg_data);
3673:
3675: ROLLBACK TO create_class_code;
3676: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3677: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
3678: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3679: FND_MSG_PUB.ADD;
3680: FND_MSG_PUB.Count_And_Get(
3681: p_encoded => FND_API.G_FALSE,
3682: p_count => x_msg_count,
3683: p_data => x_msg_data);
3676: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3677: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
3678: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3679: FND_MSG_PUB.ADD;
3680: FND_MSG_PUB.Count_And_Get(
3681: p_encoded => FND_API.G_FALSE,
3682: p_count => x_msg_count,
3683: p_data => x_msg_data);
3684:
3735: savepoint update_class_code;
3736:
3737: -- initialize message list if p_init_msg_list is set to TRUE.
3738: IF FND_API.to_Boolean(p_init_msg_list) THEN
3739: FND_MSG_PUB.initialize;
3740: END IF;
3741:
3742: --Bug fix 2783498
3743: SELECT start_date_active,end_date_active into l_start_date_active,l_end_date_active
3767: then
3768: If HZ_CLASS_VALIDATE_V2PUB.is_valid_class_code_meaning(l_class_code_rec.type,l_class_code_rec.meaning)='N'
3769: then
3770: FND_MESSAGE.SET_NAME('AR', 'HZ_MODIFY_CLASS_CODE_MEANING');
3771: FND_MSG_PUB.ADD;
3772: RAISE FND_API.G_EXC_ERROR;
3773: end if;
3774: end if;
3775:
3821:
3822: WHEN FND_API.G_EXC_ERROR THEN
3823: ROLLBACK TO update_class_code;
3824: x_return_status := FND_API.G_RET_STS_ERROR;
3825: FND_MSG_PUB.Count_And_Get(
3826: p_encoded => FND_API.G_FALSE,
3827: p_count => x_msg_count,
3828: p_data => x_msg_data);
3829:
3829:
3830: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3831: ROLLBACK TO update_class_code ;
3832: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3833: FND_MSG_PUB.Count_And_Get(
3834: p_encoded => FND_API.G_FALSE,
3835: p_count => x_msg_count,
3836: p_data => x_msg_data);
3837:
3839: ROLLBACK TO update_class_code;
3840: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3841: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
3842: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3843: FND_MSG_PUB.ADD;
3844: FND_MSG_PUB.Count_And_Get(
3845: p_encoded => FND_API.G_FALSE,
3846: p_count => x_msg_count,
3847: p_data => x_msg_data);
3840: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3841: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
3842: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3843: FND_MSG_PUB.ADD;
3844: FND_MSG_PUB.Count_And_Get(
3845: p_encoded => FND_API.G_FALSE,
3846: p_count => x_msg_count,
3847: p_data => x_msg_data);
3848:
3943:
3944: EXCEPTION
3945: WHEN FND_API.G_EXC_ERROR THEN
3946: x_return_status := FND_API.G_RET_STS_ERROR;
3947: FND_MSG_PUB.Count_And_Get(
3948: p_encoded => FND_API.G_FALSE,
3949: p_count => x_msg_count,
3950: p_data => x_msg_data);
3951:
3950: p_data => x_msg_data);
3951:
3952: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3953: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3954: FND_MSG_PUB.Count_And_Get(
3955: p_encoded => FND_API.G_FALSE,
3956: p_count => x_msg_count,
3957: p_data => x_msg_data);
3958:
3959: WHEN OTHERS THEN
3960: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3961: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
3962: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3963: FND_MSG_PUB.ADD;
3964: FND_MSG_PUB.Count_And_Get(
3965: p_encoded => FND_API.G_FALSE,
3966: p_count => x_msg_count,
3967: p_data => x_msg_data);
3960: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3961: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
3962: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3963: FND_MSG_PUB.ADD;
3964: FND_MSG_PUB.Count_And_Get(
3965: p_encoded => FND_API.G_FALSE,
3966: p_count => x_msg_count,
3967: p_data => x_msg_data);
3968: