[Home] [Help]
127: * DESCRIPTION
128: * Turn on debug mode.
129: *
130: * EXTERNAL PROCEDURES/FUNCTIONS ACCESSED
131: * HZ_UTILITY_V2PUB.enable_debug
132: *
133: * MODIFICATION HISTORY
134: *
135: * 07-23-2001 Jianying Huang o Created.
145: IF g_debug_count = 1 THEN
146: IF fnd_profile.value('HZ_API_FILE_DEBUG_ON') = 'Y' OR
147: fnd_profile.value('HZ_API_DBMS_DEBUG_ON') = 'Y'
148: THEN
149: hz_utility_v2pub.enable_debug;
150: g_debug := TRUE;
151: END IF;
152: END IF;
153:
161: * DESCRIPTION
162: * Turn off debug mode.
163: *
164: * EXTERNAL PROCEDURES/FUNCTIONS ACCESSED
165: * hz_utility_v2pub.disable_debug
166: *
167: * MODIFICATION HISTORY
168: *
169: * 07-23-2001 Jianying Huang o Created.
176: IF g_debug THEN
177: g_debug_count := g_debug_count - 1;
178:
179: IF g_debug_count = 0 THEN
180: hz_utility_v2pub.disable_debug;
181: g_debug := FALSE;
182: END IF;
183: END IF;
184:
1209:
1210: BEGIN
1211: -- Debug info.
1212: /*IF g_debug THEN
1213: hz_utility_v2pub.debug ('validate_contact_point_main (+)');
1214: END IF;
1215: */
1216: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1217: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_contact_point_main (+)',
1213: hz_utility_v2pub.debug ('validate_contact_point_main (+)');
1214: END IF;
1215: */
1216: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1217: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_contact_point_main (+)',
1218: p_msg_level=>fnd_log.level_procedure);
1219: END IF;
1220: -- Select fields for later use during update.
1221: IF p_create_update_flag = 'U' THEN
1251: IF c_update%NOTFOUND THEN
1252: CLOSE c_update;
1253: -- Debug info.
1254: /*IF g_debug THEN
1255: hz_utility_v2pub.debug ('could not find record to update, rowid='||
1256: p_rowid);
1257: END IF;
1258: */
1259: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1256: p_rowid);
1257: END IF;
1258: */
1259: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1260: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'could not find record to update, rowid='||p_rowid,
1261: p_msg_level=>fnd_log.level_statement);
1262: END IF;
1263:
1264: RAISE NO_DATA_FOUND;
1270: --------------------------------------
1271: -- validate contact_point_id
1272: --------------------------------------
1273: /****Logical APIs - validation not required****/
1274: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
1275: -- If primary key value is passed, check for uniqueness.
1276: -- If primary key value is not passed, it will be generated
1277: -- from sequence by table handler.
1278:
1292: END IF;
1293: CLOSE c_dup;
1294:
1295: /*IF g_debug THEN
1296: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1297: 'check that contact_point_id is unique during creation. ' ||
1298: ' x_return_status = ' || x_return_status, l_debug_prefix);
1299: END IF;
1300: */
1298: ' x_return_status = ' || x_return_status, l_debug_prefix);
1299: END IF;
1300: */
1301: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1302: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'check that contact_point_id is unique during creation. ' ||
1303: ' x_return_status = ' || x_return_status,
1304:
1305: p_msg_level=>fnd_log.level_statement);
1306: END IF;
1308: END IF;
1309: END IF;
1310:
1311: /*IF g_debug THEN
1312: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1313: '(+) after validate contact_point_id ... ' ||
1314: 'x_return_status = ' || x_return_status, l_debug_prefix);
1315: END IF;
1316: */
1314: 'x_return_status = ' || x_return_status, l_debug_prefix);
1315: END IF;
1316: */
1317: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1318: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate contact_point_id ... ' ||
1319: 'x_return_status = ' || x_return_status,
1320:
1321: p_msg_level=>fnd_log.level_statement);
1322: END IF;
1325: --------------------------------------
1326: -- validate contact_point_type
1327: --------------------------------------
1328: /****Logical APIs - validation not required****/
1329: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
1330: -- contact_point_type is mandatory field
1331: -- Since contact_point_type is non-updateable, we only need to check
1332: -- mandatory during creation.
1333:
1338: p_column_value => p_contact_point_rec.contact_point_type,
1339: x_return_status => x_return_status);
1340:
1341: /*IF g_debug THEN
1342: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1343: 'contact_point_type is mandatory. ' ||
1344: 'x_return_status = ' || x_return_status, l_debug_prefix);
1345: END IF;
1346: */
1344: 'x_return_status = ' || x_return_status, l_debug_prefix);
1345: END IF;
1346: */
1347: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1348: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'contact_point_type is mandatory. ' ||
1349: 'x_return_status = ' || x_return_status,
1350:
1351: p_msg_level=>fnd_log.level_statement);
1352: END IF;
1363: p_old_column_value => l_contact_point_type,
1364: x_return_status => x_return_status);
1365:
1366: /*IF g_debug THEN
1367: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1368: 'contact_point_type is non-updateable. ' ||
1369: 'x_return_status = ' || x_return_status, l_debug_prefix);
1370: END IF;
1371: */
1369: 'x_return_status = ' || x_return_status, l_debug_prefix);
1370: END IF;
1371: */
1372: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1373: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'contact_point_type is non-updateable. ' ||
1374: 'x_return_status = ' || x_return_status,
1375: p_msg_level=>fnd_log.level_statement);
1376: END IF;
1377:
1388: p_column_value => p_contact_point_rec.contact_point_type,
1389: x_return_status => x_return_status);
1390:
1391: /*IF g_debug THEN
1392: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1393: 'contact_point_type is lookup code in lookup type COMMUNICATION_TYPE. ' ||
1394: 'x_return_status = ' || x_return_status, l_debug_prefix);
1395: END IF;
1396: */
1394: 'x_return_status = ' || x_return_status, l_debug_prefix);
1395: END IF;
1396: */
1397: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1398: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'contact_point_type is lookup code in lookup type COMMUNICATION_TYPE. ' ||
1399: 'x_return_status = ' || x_return_status,
1400: p_msg_level=>fnd_log.level_statement);
1401: END IF;
1402:
1402:
1403: END IF;
1404:
1405: /*IF g_debug THEN
1406: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1407: '(+) after validate contact_point_type ... ' ||
1408: 'x_return_status = ' || x_return_status, l_debug_prefix);
1409: END IF;
1410: */
1408: 'x_return_status = ' || x_return_status, l_debug_prefix);
1409: END IF;
1410: */
1411: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1412: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate contact_point_type ... ' ||
1413: 'x_return_status = ' || x_return_status,
1414: p_msg_level=>fnd_log.level_statement);
1415: END IF;
1416: END IF;
1418: --------------------------------------
1419: -- validate owner_table_name
1420: --------------------------------------
1421: /****Logical APIs - validation not required****/
1422: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
1423: -- owner_table_name is mandatory field
1424: -- Since owner_table_name is non-updateable, we only need to check
1425: -- mandatory during creation.
1426:
1431: p_column_value => p_contact_point_rec.owner_table_name,
1432: x_return_status => x_return_status);
1433:
1434: /*IF g_debug THEN
1435: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1436: 'owner_table_name is mandatory. ' ||
1437: 'x_return_status = ' || x_return_status, l_debug_prefix);
1438: END IF;
1439: */
1437: 'x_return_status = ' || x_return_status, l_debug_prefix);
1438: END IF;
1439: */
1440: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1441: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'owner_table_name is mandatory. ' ||
1442: 'x_return_status = ' || x_return_status,
1443: p_msg_level=>fnd_log.level_statement);
1444: END IF;
1445:
1455: p_old_column_value => l_owner_table_name,
1456: x_return_status => x_return_status);
1457:
1458: /*IF g_debug THEN
1459: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1460: 'owner_table_name is non-updateable. ' ||
1461: 'x_return_status = ' || x_return_status, l_debug_prefix);
1462: END IF;
1463: */
1461: 'x_return_status = ' || x_return_status, l_debug_prefix);
1462: END IF;
1463: */
1464: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1465: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'owner_table_name is non-updateable. ' ||
1466: 'x_return_status = ' || x_return_status,
1467: p_msg_level=>fnd_log.level_statement);
1468: END IF;
1469:
1480: p_column_value => p_contact_point_rec.owner_table_name,
1481: x_return_status => x_return_status);
1482:
1483: /*IF g_debug THEN
1484: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1485: 'owner_table_name is lookup code in lookup type OWNER_TABLE_NAME. ' ||
1486: 'x_return_status = ' || x_return_status, l_debug_prefix);
1487: END IF;
1488: */
1486: 'x_return_status = ' || x_return_status, l_debug_prefix);
1487: END IF;
1488: */
1489: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1490: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'owner_table_name is lookup code in lookup type OWNER_TABLE_NAME. ' ||
1491: 'x_return_status = ' || x_return_status,
1492: p_msg_level=>fnd_log.level_statement);
1493: END IF;
1494:
1494:
1495: END IF;
1496:
1497: /*IF g_debug THEN
1498: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1499: '(+) after validate owner_table_name ... ' ||
1500: 'x_return_status = ' || x_return_status, l_debug_prefix);
1501: END IF;
1502: */
1500: 'x_return_status = ' || x_return_status, l_debug_prefix);
1501: END IF;
1502: */
1503: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1504: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate owner_table_name ... ' ||
1505: 'x_return_status = ' || x_return_status,
1506: p_msg_level=>fnd_log.level_statement);
1507: END IF;
1508: END IF;
1510: --------------------------------------
1511: -- validate owner_table_id
1512: --------------------------------------
1513: /****Logical APIs - validation not required****/
1514: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
1515: -- owner_table_id is mandatory field
1516: -- Since owner_table_id is non-updateable, we only need to check mandatory
1517: -- during creation.
1518:
1523: p_column_value => p_contact_point_rec.owner_table_id,
1524: x_return_status => x_return_status);
1525:
1526: /*IF g_debug THEN
1527: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1528: 'owner_table_id is mandatory. ' ||
1529: 'x_return_status = ' || x_return_status, l_debug_prefix);
1530: END IF;
1531: */
1529: 'x_return_status = ' || x_return_status, l_debug_prefix);
1530: END IF;
1531: */
1532: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1533: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'owner_table_id is mandatory. ' ||
1534: 'x_return_status = ' || x_return_status,
1535: p_msg_level=>fnd_log.level_statement);
1536: END IF;
1537:
1547: p_old_column_value => l_owner_table_id,
1548: x_return_status => x_return_status);
1549:
1550: /*IF g_debug THEN
1551: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1552: 'owner_table_id is non-updateable. ' ||
1553: 'x_return_status = ' || x_return_status, l_debug_prefix);
1554: END IF;
1555: */
1553: 'x_return_status = ' || x_return_status, l_debug_prefix);
1554: END IF;
1555: */
1556: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1557: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'owner_table_id is non-updateable. ' ||
1558: 'x_return_status = ' || x_return_status,
1559: p_msg_level=>fnd_log.level_statement);
1560: END IF;
1561:
1602: x_return_status := fnd_api.g_ret_sts_error;
1603: END IF;
1604:
1605: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1606: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1607: p_message=>'owner_table_id is foreign key of hz_parties if owner_table_name = HZ_PARTIES and is foreign key of hz_party_sites if owner_table_name = HZ_PARTY_SITES. ' ||
1608: 'x_return_status = ' || x_return_status,
1609: p_msg_level=>fnd_log.level_statement);
1610: END IF;
1611:
1612: END IF;
1613:
1614: /*IF g_debug THEN
1615: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1616: '(+) after validate owner_table_id ... ' ||
1617: 'x_return_status = ' || x_return_status, l_debug_prefix);
1618: END IF;
1619: */
1617: 'x_return_status = ' || x_return_status, l_debug_prefix);
1618: END IF;
1619: */
1620: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1621: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate owner_table_id ... ' ||
1622: 'x_return_status = ' || x_return_status,
1623: p_msg_level=>fnd_log.level_statement);
1624: END IF;
1625: END IF;
1627: --------------------------------------
1628: -- validate orig_system_reference
1629: --------------------------------------
1630: /****Logical APIs - validation not required****/
1631: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
1632: IF (p_contact_point_rec.orig_system is not null
1633: and p_contact_point_rec.orig_system <>fnd_api.g_miss_char)
1634: and (p_contact_point_rec.orig_system_reference is not null
1635: and p_contact_point_rec.orig_system_reference <>fnd_api.g_miss_char)
1670: p_old_column_value => l_orig_system_reference,
1671: x_return_status => x_return_status);
1672:
1673: /*IF g_debug THEN
1674: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1675: 'orig_system_reference is non-updateable. ' ||
1676: 'x_return_status = ' || x_return_status, l_debug_prefix);
1677: END IF;
1678: */
1677: END IF;
1678: */
1679:
1680: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1681: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'orig_system_reference is non-updateable. ' ||
1682: 'x_return_status = ' || x_return_status,
1683: p_msg_level=>fnd_log.level_statement);
1684: END IF;
1685:
1685:
1686: END IF;
1687:
1688: /*IF g_debug THEN
1689: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1690: '(+) after validate orig_system_reference ... ' ||
1691: 'x_return_status = ' || x_return_status, l_debug_prefix);
1692: END IF;
1693: */
1691: 'x_return_status = ' || x_return_status, l_debug_prefix);
1692: END IF;
1693: */
1694: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1695: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate orig_system_reference ... ' ||
1696: 'x_return_status = ' || x_return_status,
1697: p_msg_level=>fnd_log.level_statement);
1698: END IF;
1699: END IF;
1718: x_return_status => x_return_status);
1719:
1720:
1721: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1722: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'content_source_type is non-updateable. ' ||
1723: 'x_return_status = ' || x_return_status,
1724: p_msg_level=>fnd_log.level_statement);
1725: END IF;
1726:
1737: p_column_value => p_contact_point_rec.content_source_type,
1738: x_return_status => x_return_status);
1739:
1740: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1741: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'content_source_type is lookup code in lookup type CONTENT_SOURCE_TYPE. ' ||
1742: 'x_return_status = ' || x_return_status,
1743: p_msg_level=>fnd_log.level_statement);
1744: END IF;
1745:
1746: END IF;
1747:
1748:
1749: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1750: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate content_source_type ... ' ||
1751: 'x_return_status = ' || x_return_status,
1752: p_msg_level=>fnd_log.level_statement);
1753: END IF;
1754:
1785: p_column_value => p_contact_point_rec.status,
1786: x_return_status => x_return_status);
1787:
1788: /*IF g_debug THEN
1789: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1790: 'Status cannot be updated to null. ' ||
1791: 'x_return_status = ' || x_return_status, l_debug_prefix);
1792: END IF;
1793: */
1791: 'x_return_status = ' || x_return_status, l_debug_prefix);
1792: END IF;
1793: */
1794: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1795: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'Status cannot be updated to null. ' ||
1796: 'x_return_status = ' || x_return_status,
1797: p_msg_level=>fnd_log.level_statement);
1798: END IF;
1799:
1799:
1800: END IF;
1801:
1802: /****Logical APIs - validation not required****/
1803: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
1804: -- status is lookup code in lookup type REGISTRY_STATUS
1805: IF p_contact_point_rec.status IS NOT NULL AND
1806: p_contact_point_rec.status <> fnd_api.g_miss_char AND
1807: (p_create_update_flag = 'C' OR
1814: p_column_value => p_contact_point_rec.status,
1815: x_return_status => x_return_status);
1816:
1817: /*IF g_debug THEN
1818: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1819: 'status is lookup code in lookup type REGISTRY_STATUS. ' ||
1820: 'x_return_status = ' || x_return_status, l_debug_prefix);
1821: END IF;
1822: */
1820: 'x_return_status = ' || x_return_status, l_debug_prefix);
1821: END IF;
1822: */
1823: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1824: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'status is lookup code in lookup type REGISTRY_STATUS. ' ||
1825: 'x_return_status = ' || x_return_status,
1826: p_msg_level=>fnd_log.level_statement);
1827: END IF;
1828:
1829: END IF;
1830: END IF;
1831:
1832: /*IF g_debug THEN
1833: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1834: '(+) after validate status ... ' ||
1835: 'x_return_status = ' || x_return_status, l_debug_prefix);
1836: END IF;
1837: */
1835: 'x_return_status = ' || x_return_status, l_debug_prefix);
1836: END IF;
1837: */
1838: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1839: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate status ... ' ||
1840: 'x_return_status = ' || x_return_status,
1841: p_msg_level=>fnd_log.level_statement);
1842: END IF;
1843:
1845: --------------------------------------
1846: -- validate primary_flag
1847: --------------------------------------
1848: /****Logical APIs - validation not required****/
1849: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
1850: -- primary_flag is lookup code in lookup type YES/NO
1851: IF p_contact_point_rec.primary_flag IS NOT NULL AND
1852: p_contact_point_rec.primary_flag <> fnd_api.g_miss_char
1853: THEN
1857: p_column_value => p_contact_point_rec.primary_flag,
1858: x_return_status => x_return_status);
1859:
1860: /*IF g_debug THEN
1861: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1862: 'primary_flag is lookup code in lookup type YES/NO. ' ||
1863: 'x_return_status = ' || x_return_status, l_debug_prefix);
1864: END IF;
1865: */
1863: 'x_return_status = ' || x_return_status, l_debug_prefix);
1864: END IF;
1865: */
1866: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1867: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'primary_flag is lookup code in lookup type YES/NO. ' ||
1868: 'x_return_status = ' || x_return_status,
1869: p_msg_level=>fnd_log.level_statement);
1870: END IF;
1871:
1915: l_error := FALSE;
1916: END IF;
1917:
1918: /*IF g_debug THEN
1919: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1920: 'an inactive contact is never marked as primary. ' ||
1921: 'x_return_status = ' || x_return_status, l_debug_prefix);
1922: END IF;
1923: */
1921: 'x_return_status = ' || x_return_status, l_debug_prefix);
1922: END IF;
1923: */
1924: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1925: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'an inactive contact is never marked as primary. ' ||
1926: 'x_return_status = ' || x_return_status,
1927: p_msg_level=>fnd_log.level_statement);
1928: END IF;
1929:
1958: -- reset l_error for later use.
1959: l_error := FALSE;
1960: END IF;
1961: /*IF g_debug THEN
1962: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1963: 'an inactive contact is never marked as preferred. ' ||
1964: 'x_return_status = ' || x_return_status, l_debug_prefix);
1965: END IF;
1966: */
1964: 'x_return_status = ' || x_return_status, l_debug_prefix);
1965: END IF;
1966: */
1967: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1968: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'an inactive contact is never marked as preferred. ' ||
1969: 'x_return_status = ' || x_return_status,
1970: p_msg_level=>fnd_log.level_statement);
1971: END IF;
1972:
2012: END IF;
2013: END IF;
2014: END IF;
2015: /*IF g_debug THEN
2016: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2017: 'Purpose cannot be NULL when the contact point is preferred ' ||'x_return_status = ' ||
2018: x_return_status, l_debug_prefix);
2019: END IF;
2020: */
2018: x_return_status, l_debug_prefix);
2019: END IF;
2020: */
2021: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2022: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2023: p_message=>'Purpose cannot be NULL when the contact point is preferred ' ||'x_return_status = ' ||
2024: x_return_status,
2025: p_msg_level=>fnd_log.level_statement);
2026: END IF;
2052: p_column_value => p_contact_point_rec.contact_point_purpose,
2053: x_return_status => x_return_status);
2054:
2055: /*IF g_debug THEN
2056: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2057: 'contact_point_purpose is lookup code in lookup type CONTACT_POINT_PURPOSE if contact_point_type <> WEB. ' ||
2058: 'x_return_status = ' || x_return_status, l_debug_prefix);
2059: END IF;
2060: */
2058: 'x_return_status = ' || x_return_status, l_debug_prefix);
2059: END IF;
2060: */
2061: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2062: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2063: p_message=>'contact_point_purpose is lookup code in lookup type CONTACT_POINT_PURPOSE if contact_point_type <> WEB. ' ||
2064: 'x_return_status = ' || x_return_status,
2065: p_msg_level=>fnd_log.level_statement);
2066: END IF;
2067:
2068: END IF;
2069:
2070: /*IF g_debug THEN
2071: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2072: '(+) after validate contact_point_purpose ... ' ||
2073: 'x_return_status = ' || x_return_status, l_debug_prefix);
2074: END IF;
2075: */
2073: 'x_return_status = ' || x_return_status, l_debug_prefix);
2074: END IF;
2075: */
2076: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2077: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate contact_point_purpose ... ' ||
2078: 'x_return_status = ' || x_return_status,
2079:
2080: p_msg_level=>fnd_log.level_statement);
2081: END IF;
2095: p_column_value => p_contact_point_rec.primary_by_purpose,
2096: x_return_status => x_return_status);
2097:
2098: /*IF g_debug THEN
2099: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2100: 'primary_by_purpose is lookup code in lookup type YES/NO. ' ||
2101: 'x_return_status = ' || x_return_status, l_debug_prefix);
2102: END IF;
2103: */
2101: 'x_return_status = ' || x_return_status, l_debug_prefix);
2102: END IF;
2103: */
2104: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2105: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2106: p_message=>'primary_by_purpose is lookup code in lookup type YES/NO. ' ||
2107: 'x_return_status = ' || x_return_status,
2108: p_msg_level=>fnd_log.level_statement);
2109: END IF;
2110:
2111: END IF;
2112:
2113: /*IF g_debug THEN
2114: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2115: '(+) after validate primary_by_purpose ... ' ||
2116: 'x_return_status = ' || x_return_status, l_debug_prefix);
2117: END IF;
2118: */
2116: 'x_return_status = ' || x_return_status, l_debug_prefix);
2117: END IF;
2118: */
2119: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2120: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate primary_by_purpose ... ' ||
2121: 'x_return_status = ' || x_return_status,
2122: p_msg_level=>fnd_log.level_statement);
2123: END IF;
2124:
2166: x_return_status => x_return_status);
2167:
2168:
2169: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2170: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2171: p_message=>'EDI : edi_id_number is mandatory. ' ||
2172: 'x_return_status = ' || x_return_status,
2173: p_msg_level=>fnd_log.level_statement);
2174: END IF;
2217: p_column_value => p_email_rec.email_format,
2218: x_return_status => x_return_status);
2219:
2220: /*IF g_debug THEN
2221: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2222: 'EMAIL : email_format cannot be updated to null. ' ||
2223: 'x_return_status = ' || x_return_status, l_debug_prefix);
2224: END IF;
2225: */
2223: 'x_return_status = ' || x_return_status, l_debug_prefix);
2224: END IF;
2225: */
2226: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2227: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2228: p_message=>'EMAIL : email_format cannot be updated to null. ' ||
2229: 'x_return_status = ' || x_return_status,
2230: p_msg_level=>fnd_log.level_statement);
2231: END IF;
2248: p_new_actual_content_source=> p_contact_point_rec.actual_content_source,
2249: p_entity_name => 'HZ_CONTACT_POINTS',
2250: x_return_status => x_return_status);
2251: -- Bug 4693719 : set global variable to Y
2252: HZ_UTILITY_V2PUB.G_UPDATE_ACS := 'Y';
2253: END IF;
2254: END IF;
2255:
2256:
2268: p_column_value => p_email_rec.email_format,
2269: x_return_status => x_return_status);
2270:
2271: /*IF g_debug THEN
2272: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2273: 'EMAIL : email_format is lookup code in lookup type EMAIL_FORMAT. '
2274: || 'x_return_status = ' || x_return_status, l_debug_prefix);
2275: END IF;
2276: */
2274: || 'x_return_status = ' || x_return_status, l_debug_prefix);
2275: END IF;
2276: */
2277: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2278: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2279: p_message=>'EMAIL : email_format is lookup code in lookup type EMAIL_FORMAT. '
2280: || 'x_return_status = ' || x_return_status,
2281: p_msg_level=>fnd_log.level_statement);
2282: END IF;
2283:
2284: END IF;
2285:
2286: /*IF g_debug THEN
2287: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2288: '(+) after validate email_format ... ' ||
2289: 'x_return_status = ' || x_return_status, l_debug_prefix);
2290: END IF;
2291: */
2289: 'x_return_status = ' || x_return_status, l_debug_prefix);
2290: END IF;
2291: */
2292: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2293: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2294: p_message=>'(+) after validate email_format ... ' ||
2295: 'x_return_status = ' || x_return_status,
2296: p_msg_level=>fnd_log.level_statement);
2297: END IF;
2308: p_column_value => p_email_rec.email_address,
2309: x_return_status => x_return_status);
2310:
2311: /*IF g_debug THEN
2312: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2313: 'EMAIL : email_address is mandatory. ' ||
2314: 'x_return_status = ' || x_return_status, l_debug_prefix);
2315: END IF;
2316: */
2314: 'x_return_status = ' || x_return_status, l_debug_prefix);
2315: END IF;
2316: */
2317: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2318: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2319: p_message=>'EMAIL : email_address is mandatory. ' ||
2320: 'x_return_status = ' || x_return_status,
2321: p_msg_level=>fnd_log.level_statement);
2322: END IF;
2363: -- Reset l_error for later use.
2364: l_error := TRUE;
2365: END IF;
2366: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2367: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2368: p_message=>'PHONE : phone_number and phone_area_code or raw_phone_umber must be passed in. However, you can not pass both two. ' || 'x_return_status = ' || x_return_status,
2369: p_msg_level=>fnd_log.level_statement);
2370: END IF;
2371:
2381: p_column_value => p_phone_rec.phone_line_type,
2382: x_return_status => x_return_status);
2383:
2384: /*IF g_debug THEN
2385: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2386: 'PHONE : phone_line_type is mandatory. ' ||
2387: 'x_return_status = ' || x_return_status, l_debug_prefix);
2388: END IF;
2389: */
2387: 'x_return_status = ' || x_return_status, l_debug_prefix);
2388: END IF;
2389: */
2390: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2391: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'PHONE : phone_line_type is mandatory. ' ||
2392: 'x_return_status = ' || x_return_status,
2393: p_msg_level=>fnd_log.level_statement);
2394: END IF;
2395:
2408: p_column_value => p_phone_rec.phone_line_type,
2409: x_return_status => x_return_status);
2410:
2411: /*IF g_debug THEN
2412: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2413: 'PHONE : phone_line_type is lookup code in lookup type PHONE_LINE_TYPE. ' ||
2414: 'x_return_status = ' || x_return_status, l_debug_prefix);
2415: END IF;
2416: */
2414: 'x_return_status = ' || x_return_status, l_debug_prefix);
2415: END IF;
2416: */
2417: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2418: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2419: p_message=>'PHONE : phone_line_type is lookup code in lookup type PHONE_LINE_TYPE. ' ||
2420: 'x_return_status = ' || x_return_status,
2421: p_msg_level=>fnd_log.level_statement);
2422: END IF;
2423:
2424: END IF;
2425:
2426: /*IF g_debug THEN
2427: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2428: '(+) after validate phone_line_type ... ' ||
2429: 'x_return_status = ' || x_return_status, l_debug_prefix);
2430: END IF;
2431: */
2429: 'x_return_status = ' || x_return_status, l_debug_prefix);
2430: END IF;
2431: */
2432: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2433: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate phone_line_type ... ' ||
2434: 'x_return_status = ' || x_return_status,
2435: p_msg_level=>fnd_log.level_statement);
2436: END IF;
2437:
2458:
2459: CLOSE c_timezone;
2460:
2461: /*IF g_debug THEN
2462: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2463: 'PHONE : timezone_id is foreign key of hz_timezones. ' ||
2464: 'x_return_status = ' || x_return_status, l_debug_prefix);
2465: END IF;
2466: */
2464: 'x_return_status = ' || x_return_status, l_debug_prefix);
2465: END IF;
2466: */
2467: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2468: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2469: p_message=>'PHONE : timezone_id is foreign key of hz_timezones. ' ||
2470: 'x_return_status = ' || x_return_status,
2471: p_msg_level=>fnd_log.level_statement);
2472: END IF;
2473:
2474: END IF;
2475:
2476: /*IF g_debug THEN
2477: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2478: '(+) after validate timezone_id ... ' ||
2479: 'x_return_status = ' || x_return_status, l_debug_prefix);
2480: END IF;
2481: */
2479: 'x_return_status = ' || x_return_status, l_debug_prefix);
2480: END IF;
2481: */
2482: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2483: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2484: p_message=>'(+) after validate timezone_id ... ' ||
2485: 'x_return_status = ' || x_return_status,
2486: p_msg_level=>fnd_log.level_statement);
2487: END IF;
2513:
2514: CLOSE c_countrycode;
2515:
2516: /*IF g_debug THEN
2517: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2518: 'PHONE : phone_country_code is foreign key of hz_phone_country_codes. ' ||
2519: 'x_return_status = ' || x_return_status, l_debug_prefix);
2520: END IF;
2521: */
2519: 'x_return_status = ' || x_return_status, l_debug_prefix);
2520: END IF;
2521: */
2522: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2523: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2524: p_message=>'PHONE : phone_country_code is foreign key of hz_phone_country_codes. ' ||
2525: 'x_return_status = ' || x_return_status,
2526: p_msg_level=>fnd_log.level_statement);
2527: END IF;
2528:
2529: END IF;
2530:
2531: /*IF g_debug THEN
2532: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2533: '(+) after validate phone_country_code ... ' ||
2534: 'x_return_status = ' || x_return_status, l_debug_prefix);
2535: END IF;
2536: */
2534: 'x_return_status = ' || x_return_status, l_debug_prefix);
2535: END IF;
2536: */
2537: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2538: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2539: p_message=>'(+) after validate phone_country_code ... ' ||
2540: 'x_return_status = ' || x_return_status,
2541: p_msg_level=>fnd_log.level_statement);
2542: END IF;
2554: p_column_value => p_phone_rec.phone_number,
2555: x_return_status => l_return_status);
2556:
2557: /*IF g_debug THEN
2558: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2559: '(+) phone_number cannot be updated to NULL... ' ||
2560: 'x_return_status = ' || x_return_status, l_debug_prefix);
2561: END IF;
2562: */
2560: 'x_return_status = ' || x_return_status, l_debug_prefix);
2561: END IF;
2562: */
2563: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2564: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2565: p_message=>'(+) phone_number cannot be updated to NULL... ' ||
2566: 'x_return_status = ' || x_return_status,
2567: p_msg_level=>fnd_log.level_statement);
2568: END IF;
2569:
2570: END IF;
2571:
2572: /*IF g_debug THEN
2573: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2574: '(+) after validate phone_number ... ' ||
2575: 'x_return_status = ' || x_return_status, l_debug_prefix);
2576: END IF;
2577: */
2575: 'x_return_status = ' || x_return_status, l_debug_prefix);
2576: END IF;
2577: */
2578: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2579: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2580: p_message=>'(+) after validate phone_number ... ' ||
2581: 'x_return_status = ' || x_return_status,
2582: p_msg_level=>fnd_log.level_statement);
2583: END IF;
2601: p_phone_rec.raw_phone_number IS NOT NULL) /* AND
2602: db_actual_content_source = 'DNB' AND*/
2603: -- SSM SST Integration and Extension
2604: --NVL(FND_PROFILE.value('HZ_UPDATE_THIRD_PARTY_DATA'), 'N') = 'N'
2605: -- HZ_UTILITY_V2PUB.is_purchased_content_source(db_actual_content_source) = 'Y'
2606: THEN
2607: l_return_status := FND_API.G_RET_STS_SUCCESS;
2608: validate_nonupdateable (
2609: p_column => 'phone_area_code',
2654: p_new_actual_content_source=> p_contact_point_rec.actual_content_source,
2655: p_entity_name => 'HZ_CONTACT_POINTS',
2656: x_return_status => x_return_status);
2657: -- Bug 4693719 : set global variable to Y
2658: HZ_UTILITY_V2PUB.G_UPDATE_ACS := 'Y';
2659:
2660: /*FND_MESSAGE.SET_NAME('AR', 'HZ_NOTALLOW_UPDATE_THIRD_PARTY');
2661: FND_MSG_PUB.ADD;
2662: x_return_status := FND_API.G_RET_STS_ERROR;
2663: */
2664: END IF;
2665:
2666: /*IF g_debug THEN
2667: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2668: 'dnb phones are non-updateable. ' ||
2669: 'x_return_status = ' || x_return_status, l_debug_prefix);
2670: END IF;
2671: */
2669: 'x_return_status = ' || x_return_status, l_debug_prefix);
2670: END IF;
2671: */
2672: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2673: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2674: p_message=>'dnb phones are non-updateable. ' ||
2675: 'x_return_status = ' || x_return_status,
2676: p_msg_level=>fnd_log.level_statement);
2677: END IF;
2678:
2679: END IF;
2680:
2681: /*IF g_debug THEN
2682: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2683: '(+) after validate dnb phones ... ' ||
2684: 'x_return_status = ' || x_return_status, l_debug_prefix);
2685: END IF;
2686: */
2684: 'x_return_status = ' || x_return_status, l_debug_prefix);
2685: END IF;
2686: */
2687: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2688: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate dnb phones ... ' ||
2689: 'x_return_status = ' || x_return_status,
2690: p_msg_level=>fnd_log.level_statement);
2691: END IF;
2692:
2704: p_column_value => p_telex_rec.telex_number,
2705: x_return_status => x_return_status);
2706:
2707: /*IF g_debug THEN
2708: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2709: 'TELEX : telex_number is mandatory. ' ||
2710: 'x_return_status = ' || x_return_status, l_debug_prefix);
2711: END IF;
2712: */
2710: 'x_return_status = ' || x_return_status, l_debug_prefix);
2711: END IF;
2712: */
2713: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2714: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'TELEX : telex_number is mandatory. ' ||
2715: 'x_return_status = ' || x_return_status,
2716: p_msg_level=>fnd_log.level_statement);
2717: END IF;
2718:
2733: p_new_actual_content_source=> p_contact_point_rec.actual_content_source,
2734: p_entity_name => 'HZ_CONTACT_POINTS',
2735: x_return_status => x_return_status);
2736: -- Bug 4693719 : set global variable to Y
2737: HZ_UTILITY_V2PUB.G_UPDATE_ACS := 'Y';
2738: END IF;
2739: END IF;
2740:
2741: ELSIF l_contact_point_type = 'WEB' THEN
2751: p_column_value => p_web_rec.web_type,
2752: x_return_status => x_return_status);
2753:
2754: /*IF g_debug THEN
2755: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2756: 'WEB : web_type is mandatory. ' ||
2757: 'x_return_status = ' || x_return_status, l_debug_prefix);
2758: END IF;
2759: */
2757: 'x_return_status = ' || x_return_status, l_debug_prefix);
2758: END IF;
2759: */
2760: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2761: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'WEB : web_type is mandatory. ' ||
2762: 'x_return_status = ' || x_return_status,
2763: p_msg_level=>fnd_log.level_statement);
2764: END IF;
2765:
2775: p_column_value => p_web_rec.url,
2776: x_return_status => x_return_status);
2777:
2778: /*IF g_debug THEN
2779: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2780: 'WEB : url is mandatory. ' ||
2781: 'x_return_status = ' || x_return_status, l_debug_prefix);
2782: END IF;
2783: */
2781: 'x_return_status = ' || x_return_status, l_debug_prefix);
2782: END IF;
2783: */
2784: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2785: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'WEB : url is mandatory. ' ||
2786: 'x_return_status = ' || x_return_status,
2787: p_msg_level=>fnd_log.level_statement);
2788: END IF;
2789:
2804: p_new_actual_content_source=> p_contact_point_rec.actual_content_source,
2805: p_entity_name => 'HZ_CONTACT_POINTS',
2806: x_return_status => x_return_status);
2807: -- Bug 4693719 : set global variable to Y
2808: HZ_UTILITY_V2PUB.G_UPDATE_ACS := 'Y';
2809: END IF;
2810: END IF;
2811:
2812: --------------------------------------
2830: x_return_status => x_return_status);
2831:
2832:
2833: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2834: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2835: p_message=>'WEB : contact_point_purpose is lookup code in lookup type CONTACT_POINT_PURPOSE_WEB if contact_point_type = WEB. ' || 'x_return_status = ' || x_return_status,
2836: p_msg_level=>fnd_log.level_statement);
2837: END IF;
2838:
2838:
2839: END IF;
2840:
2841: /*IF g_debug THEN
2842: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2843: '(+) after validate telex_number ... ' ||
2844: 'x_return_status = ' || x_return_status, l_debug_prefix);
2845: END IF;
2846: */
2844: 'x_return_status = ' || x_return_status, l_debug_prefix);
2845: END IF;
2846: */
2847: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2848: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate telex_number ... ' ||
2849: 'x_return_status = ' || x_return_status,
2850: p_msg_level=>fnd_log.level_statement);
2851: END IF;
2852:
2853: END IF;
2854:
2855: -- Debug info.
2856: /*IF g_debug THEN
2857: hz_utility_v2pub.debug ('validate_contact_point_main (-)');
2858: END IF;
2859: */
2860: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2861: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_contact_point_main (-)',
2857: hz_utility_v2pub.debug ('validate_contact_point_main (-)');
2858: END IF;
2859: */
2860: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2861: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_contact_point_main (-)',
2862: p_msg_level=>fnd_log.level_procedure);
2863: END IF;
2864:
2865: END validate_contact_point_main;
2932: --enable_debug;
2933:
2934: -- Debug info.
2935: /*IF g_debug THEN
2936: hz_utility_v2pub.debug ('validate_party (+)');
2937: END IF;
2938: */
2939: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2940: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_party (+)',
2936: hz_utility_v2pub.debug ('validate_party (+)');
2937: END IF;
2938: */
2939: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2940: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_party (+)',
2941: p_msg_level=>fnd_log.level_procedure);
2942: END IF;
2943:
2944: -----------------------
2953: p_old_column_value => p_old_party_rec.party_number,
2954: x_return_status => x_return_status);
2955:
2956: /*IF g_debug THEN
2957: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2958: 'party_number is non-updateable. ' ||
2959: 'x_return_status = ' || x_return_status, l_debug_prefix);
2960: END IF;
2961: */
2959: 'x_return_status = ' || x_return_status, l_debug_prefix);
2960: END IF;
2961: */
2962: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2963: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_number is non-updateable. ' ||
2964: 'x_return_status = ' || x_return_status,
2965: p_msg_level=>fnd_log.level_statement);
2966: END IF;
2967: END IF;
2969: ---------------------------------
2970: -- validate orig_system_reference
2971: ---------------------------------
2972: /****Logical APIs - validation not required****/
2973: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
2974: IF (p_party_rec.orig_system is not null
2975: and p_party_rec.orig_system <>fnd_api.g_miss_char)
2976: and (p_party_rec.orig_system_reference is not null
2977: and p_party_rec.orig_system_reference <>fnd_api.g_miss_char)
3010: p_old_column_value => p_old_party_rec.orig_system_reference,
3011: x_return_status => x_return_status);
3012:
3013: /*IF g_debug THEN
3014: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
3015: 'orig_system_reference is non-updateable. ' ||
3016: 'x_return_status = ' || x_return_status, l_debug_prefix);
3017: END IF;
3018: */
3016: 'x_return_status = ' || x_return_status, l_debug_prefix);
3017: END IF;
3018: */
3019: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3020: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'orig_system_reference is non-updateable. ' ||
3021: 'x_return_status = ' || x_return_status,
3022: p_msg_level=>fnd_log.level_statement);
3023: END IF;
3024: END IF;
3035: p_column_value => p_party_rec.status,
3036: x_return_status => x_return_status);
3037:
3038: /*IF g_debug THEN
3039: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
3040: 'status is not updateable to null. ' ||
3041: 'x_return_status = ' || x_return_status, l_debug_prefix);
3042: END IF;
3043: */
3041: 'x_return_status = ' || x_return_status, l_debug_prefix);
3042: END IF;
3043: */
3044: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3045: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'status is not updateable to null. ' ||
3046: 'x_return_status = ' || x_return_status,
3047: p_msg_level=>fnd_log.level_statement);
3048: END IF;
3049: END IF;
3048: END IF;
3049: END IF;
3050:
3051: /****Logical APIs - validation not required****/
3052: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
3053: -- status is lookup code in lookup type REGISTRY_STATUS
3054: IF p_party_rec.status IS NOT NULL
3055: AND
3056: p_party_rec.status <> fnd_api.g_miss_char
3069: p_column_value => p_party_rec.status,
3070: x_return_status => x_return_status);
3071:
3072: /*IF g_debug THEN
3073: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
3074: 'status is lookup code in lookup type REGISTRY_STATUS. ' ||
3075: 'x_return_status = ' || x_return_status, l_debug_prefix);
3076: END IF;
3077: */
3075: 'x_return_status = ' || x_return_status, l_debug_prefix);
3076: END IF;
3077: */
3078: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3079: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
3080: p_message=>'status is lookup code in lookup type REGISTRY_STATUS. ' ||
3081: 'x_return_status = ' || x_return_status,
3082: p_msg_level=>fnd_log.level_statement);
3083: END IF;
3141: p_column_value => p_party_rec.category_code,
3142: x_return_status => x_return_status);
3143:
3144: /*IF g_debug THEN
3145: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
3146: 'category_code is lookup code in lookup type CUSTOMER_CATEGORY. ' ||
3147: 'x_return_status = ' || x_return_status, l_debug_prefix);
3148: END IF;
3149: */
3147: 'x_return_status = ' || x_return_status, l_debug_prefix);
3148: END IF;
3149: */
3150: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3151: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
3152: p_message=>'category_code is lookup code in lookup type CUSTOMER_CATEGORY. ' ||
3153: 'x_return_status = ' || x_return_status,
3154: p_msg_level=>fnd_log.level_statement);
3155: END IF;
3156: END IF;
3157:
3158: -- Debug info.
3159: /*IF g_debug THEN
3160: hz_utility_v2pub.debug ('validate_party (-)');
3161: END IF;
3162: */
3163: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3164: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_party (-)',
3160: hz_utility_v2pub.debug ('validate_party (-)');
3161: END IF;
3162: */
3163: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3164: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_party (-)',
3165: p_msg_level=>fnd_log.level_procedure);
3166: END IF;
3167:
3168: --disable_debug;
3236: --enable_debug;
3237:
3238: -- Debug info.
3239: /*IF g_debug THEN
3240: hz_utility_v2pub.debug ('validate_person (+)');
3241: END IF;
3242: */
3243: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3244: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_person (+)',
3240: hz_utility_v2pub.debug ('validate_person (+)');
3241: END IF;
3242: */
3243: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3244: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_person (+)',
3245: p_msg_level=>fnd_log.level_procedure);
3246: END IF;
3247:
3248: -------------------------------------------------------------------------
3270:
3271: END IF; -- profile = N
3272:
3273: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
3274: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
3275: p_message=>'Person Name Update Allowed Check...' ||
3276: 'x_return_status : ' || x_return_status ||
3277: '. Profile AR_CHANGE_CUST_NAME value :'||l_change_cust_name_profile,
3278: p_msg_level=>fnd_log.level_statement);
3310: END IF;
3311: END IF;
3312:
3313: /*IF g_debug THEN
3314: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
3315: 'first_name or last_name is mandatory. ' ||
3316: 'x_return_status = ' || x_return_status, l_debug_prefix);
3317: END IF;
3318: */
3316: 'x_return_status = ' || x_return_status, l_debug_prefix);
3317: END IF;
3318: */
3319: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3320: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'first_name or last_name is mandatory. ' ||
3321: 'x_return_status = ' || x_return_status,
3322: p_msg_level=>fnd_log.level_statement);
3323: END IF;
3324:
3345: p_column_value => p_person_rec.person_pre_name_adjunct,
3346: x_return_status => x_return_status);
3347:
3348: /*IF g_debug THEN
3349: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
3350: 'person_pre_name_adjunct in lookup CONTACT_TITLE. ' ||
3351: 'x_return_status = ' || x_return_status, l_debug_prefix);
3352: END IF;
3353: */
3351: 'x_return_status = ' || x_return_status, l_debug_prefix);
3352: END IF;
3353: */
3354: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3355: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
3356: p_message=>'person_pre_name_adjunct in lookup CONTACT_TITLE. ' ||
3357: 'x_return_status = ' || x_return_status,
3358: p_msg_level=>fnd_log.level_statement);
3359: END IF;
3362: ----------------------------------
3363: -- validate head_of_household_flag
3364: ----------------------------------
3365: /****Logical APIs - validation not required****/
3366: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
3367: -- head_of_household_flag is lookup code in lookup type YES/NO
3368: validate_lookup (
3369: p_column => 'head_of_household_flag',
3370: p_lookup_type => 'YES/NO',
3371: p_column_value => p_person_rec.head_of_household_flag,
3372: x_return_status => x_return_status);
3373:
3374: /*IF g_debug THEN
3375: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
3376: 'head_of_household_flag in lookup YES/NO. ' ||
3377: 'x_return_status = ' || x_return_status, l_debug_prefix);
3378: END IF;
3379: */
3377: 'x_return_status = ' || x_return_status, l_debug_prefix);
3378: END IF;
3379: */
3380: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3381: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
3382: p_message=>'head_of_household_flag in lookup YES/NO. ' ||
3383: 'x_return_status = ' || x_return_status,
3384: p_msg_level=>fnd_log.level_statement);
3385: END IF;
3413: p_lookup_type => 'OWN_RENT_IND',
3414: p_column_value => p_person_rec.rent_own_ind,
3415: x_return_status => x_return_status);
3416: /*IF g_debug THEN
3417: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
3418: 'rent_own_ind in lookup OWN_RENT_IND. ' ||
3419: 'x_return_status = ' || x_return_status, l_debug_prefix);
3420: END IF;
3421: */
3419: 'x_return_status = ' || x_return_status, l_debug_prefix);
3420: END IF;
3421: */
3422: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3423: hz_utility_v2pub.debug(
3424: p_prefix=>l_debug_prefix,
3425: p_message=>'rent_own_ind in lookup OWN_RENT_IND. ' ||
3426: 'x_return_status = ' || x_return_status,
3427: p_msg_level=>fnd_log.level_statement);
3431: -------------------------
3432: -- validate deceased_flag
3433: -------------------------
3434: /****Logical APIs - validation not required****/
3435: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
3436: -- deceased_flag is lookup code in lookup type YES/NO
3437: validate_lookup (
3438: p_column => 'deceased_flag',
3439: p_lookup_type => 'YES/NO',
3440: p_column_value => p_person_rec.deceased_flag,
3441: x_return_status => x_return_status);
3442:
3443: /*IF g_debug THEN
3444: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
3445: 'deceased_flag in lookup YES/NO. ' ||
3446: 'x_return_status = ' || x_return_status, l_debug_prefix);
3447: END IF;
3448: */
3446: 'x_return_status = ' || x_return_status, l_debug_prefix);
3447: END IF;
3448: */
3449: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3450: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'deceased_flag in lookup YES/NO. ' ||
3451: 'x_return_status = ' || x_return_status,
3452: p_msg_level=>fnd_log.level_statement);
3453: END IF;
3454: END IF;
3472: x_return_status := fnd_api.g_ret_sts_error;
3473: END IF;
3474:
3475: /*IF g_debug THEN
3476: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
3477: 'check that deceased_flag is Y when date_of_death is not null. ' ||
3478: ' x_return_status = ' || x_return_status, l_debug_prefix);
3479: END IF;
3480: */
3478: ' x_return_status = ' || x_return_status, l_debug_prefix);
3479: END IF;
3480: */
3481: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3482: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
3483: p_message=>'check that deceased_flag is Y when date_of_death is not null. ' ||
3484: ' x_return_status = ' || x_return_status,
3485: p_msg_level=>fnd_log.level_statement);
3486: END IF;
3506: x_return_status := fnd_api.g_ret_sts_error;
3507: END IF;
3508:
3509: /*IF g_debug THEN
3510: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
3511: 'after validating date_of_birth and date_of_death against SYSDATE ' ||
3512: 'x_return_status = ' || x_return_status, l_debug_prefix);
3513: END IF;
3514: */
3512: 'x_return_status = ' || x_return_status, l_debug_prefix);
3513: END IF;
3514: */
3515: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3516: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
3517: p_message=>'after validating date_of_birth and date_of_death against SYSDATE ' ||
3518: 'x_return_status = ' || x_return_status,
3519: p_msg_level=>fnd_log.level_statement);
3520: END IF;
3562:
3563:
3564:
3565: /*IF g_debug THEN
3566: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
3567: 'check whether date_of_death is greater then or equal to date_of_birth. ' ||
3568: 'x_return_status = ' || x_return_status, l_debug_prefix);
3569: END IF;
3570: */
3568: 'x_return_status = ' || x_return_status, l_debug_prefix);
3569: END IF;
3570: */
3571: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3572: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
3573: p_message=>'check whether date_of_death is greater then or equal to date_of_birth. ' ||
3574: 'x_return_status = ' || x_return_status,
3575: p_msg_level=>fnd_log.level_statement);
3576: END IF;
3576: END IF;
3577: END IF;
3578:
3579: /*IF g_debug THEN
3580: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
3581: '(+) after validating the date_of_death and date_of_birth... ' ||
3582: 'x_return_status = ' || x_return_status, l_debug_prefix);
3583: END IF;
3584: */
3582: 'x_return_status = ' || x_return_status, l_debug_prefix);
3583: END IF;
3584: */
3585: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3586: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
3587: p_message=>'(+) after validating the date_of_death and date_of_birth... ' ||
3588: 'x_return_status = ' || x_return_status,
3589: p_msg_level=>fnd_log.level_statement);
3590: END IF;
3614: x_return_status => x_return_status);
3615:
3616:
3617: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3618: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
3619: p_message=>'content_source_type in lookup CONTENT_SOURCE_TYPE. ' ||
3620: 'x_return_status = ' || x_return_status,
3621: p_msg_level=>fnd_log.level_statement);
3622: END IF;
3645: p_column_value => p_person_rec.marital_status,
3646: x_return_status => x_return_status);
3647:
3648: /*IF g_debug THEN
3649: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
3650: 'marital_status in lookup MARITAL_STATUS. ' ||
3651: 'x_return_status = ' || x_return_status, l_debug_prefix);
3652: END IF;
3653: */
3651: 'x_return_status = ' || x_return_status, l_debug_prefix);
3652: END IF;
3653: */
3654: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3655: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
3656: p_message=>'marital_status in lookup MARITAL_STATUS. ' ||
3657: 'x_return_status = ' || x_return_status,
3658: p_msg_level=>fnd_log.level_statement);
3659: END IF;
3697: p_column_value => p_person_rec.gender,
3698: x_return_status => x_return_status);
3699:
3700: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3701: hz_utility_v2pub.debug(
3702: p_prefix => l_debug_prefix,
3703: p_message => 'gender in lookup HZ_GENDER. ' ||
3704: 'x_return_status = ' || x_return_status,
3705: p_msg_level=>fnd_log.level_statement);
3723: p_column_value => p_person_rec.person_iden_type,
3724: x_return_status => x_return_status);
3725:
3726: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3727: hz_utility_v2pub.debug(
3728: p_prefix => l_debug_prefix,
3729: p_message => 'person_iden_type in lookup HZ_PERSON_IDEN_TYPE. ' ||
3730: 'x_return_status = ' || x_return_status,
3731: p_msg_level=>fnd_log.level_statement);
3747:
3748:
3749: -- Debug info.
3750: /*IF g_debug THEN
3751: hz_utility_v2pub.debug ('validate_person (-)');
3752: END IF;
3753: */
3754: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3755: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_person (-)',
3751: hz_utility_v2pub.debug ('validate_person (-)');
3752: END IF;
3753: */
3754: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3755: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_person (-)',
3756: p_msg_level=>fnd_log.level_procedure);
3757: END IF;
3758:
3759: --disable_debug;
3825:
3826: -- Debug info.
3827: /*IF g_debug
3828: THEN
3829: hz_utility_v2pub.debug ('validate_hr_security (+)');
3830: END IF;
3831: */
3832: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3833: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_hr_security (+)',
3829: hz_utility_v2pub.debug ('validate_hr_security (+)');
3830: END IF;
3831: */
3832: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3833: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_hr_security (+)',
3834: p_msg_level=>fnd_log.level_procedure);
3835: END IF;
3836:
3837:
3995:
3996: -- Debug info.
3997: /*IF g_debug
3998: THEN
3999: hz_utility_v2pub.debug ('validate_hr_security (-)');
4000: END IF;
4001: */
4002: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
4003: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_hr_security (-)',
3999: hz_utility_v2pub.debug ('validate_hr_security (-)');
4000: END IF;
4001: */
4002: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
4003: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_hr_security (-)',
4004: p_msg_level=>fnd_log.level_procedure);
4005: END IF;
4006:
4007: --disable_debug;
4057: --enable_debug;
4058:
4059: -- Debug info.
4060: /*IF g_debug THEN
4061: hz_utility_v2pub.debug ('validate_group (+)');
4062: END IF;
4063: */
4064: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
4065: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_group (+)',
4061: hz_utility_v2pub.debug ('validate_group (+)');
4062: END IF;
4063: */
4064: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
4065: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_group (+)',
4066: p_msg_level=>fnd_log.level_procedure);
4067: END IF;
4068:
4069: ----------------------
4077: p_column_value => p_group_rec.group_name,
4078: x_return_status => x_return_status);
4079:
4080: /*IF g_debug THEN
4081: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
4082: 'group_name is mandatory field. ' ||
4083: 'x_return_status = ' || x_return_status, l_debug_prefix);
4084: END IF;
4085: */
4083: 'x_return_status = ' || x_return_status, l_debug_prefix);
4084: END IF;
4085: */
4086: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4087: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'group_name is mandatory field. ' ||
4088: 'x_return_status = ' || x_return_status,
4089: p_msg_level=>fnd_log.level_statement);
4090: END IF;
4091:
4100: p_column_value => p_group_rec.group_type,
4101: x_return_status => x_return_status);
4102:
4103: /*IF g_debug THEN
4104: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
4105: 'group_type is mandatory field. ' ||
4106: 'x_return_status = ' || x_return_status, l_debug_prefix);
4107: END IF;
4108: */
4106: 'x_return_status = ' || x_return_status, l_debug_prefix);
4107: END IF;
4108: */
4109: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4110: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'group_type is mandatory field. ' ||
4111: 'x_return_status = ' || x_return_status,
4112: p_msg_level=>fnd_log.level_statement);
4113: END IF;
4114:
4209: --enable_debug;
4210:
4211: -- Debug info.
4212: /*IF g_debug THEN
4213: hz_utility_v2pub.debug ('validate_organization (+)');
4214: END IF;
4215: */
4216: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
4217: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_organization (+)',
4213: hz_utility_v2pub.debug ('validate_organization (+)');
4214: END IF;
4215: */
4216: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
4217: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_organization (+)',
4218: p_msg_level=>fnd_log.level_procedure);
4219: END IF;
4220:
4221:
4251:
4252: END IF; -- profile = N
4253:
4254: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
4255: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
4256: p_message=>'Org Name Update Allowed Check...' ||
4257: 'x_return_status : ' || x_return_status ||
4258: '. Profile AR_CHANGE_CUST_NAME value :'||l_change_org_name_profile,
4259: p_msg_level=>fnd_log.level_statement);
4272: p_column_value => p_organization_rec.organization_name,
4273: x_return_status => x_return_status);
4274:
4275: /*IF g_debug THEN
4276: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
4277: 'organization_name is mandatory field. ' ||
4278: 'x_return_status = ' || x_return_status, l_debug_prefix);
4279: END IF;
4280: */
4278: 'x_return_status = ' || x_return_status, l_debug_prefix);
4279: END IF;
4280: */
4281: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4282: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'organization_name is mandatory field. ' ||
4283: 'x_return_status = ' || x_return_status,
4284: p_msg_level=>fnd_log.level_statement);
4285: END IF;
4286:
4291: p_column_value => p_organization_rec.organization_name,
4292: x_return_status => x_return_status);
4293:
4294: /*IF g_debug THEN
4295: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
4296: 'organization_name cannot be updated to null. ' ||
4297: 'x_return_status = ' || x_return_status, l_debug_prefix);
4298: END IF;
4299: */
4297: 'x_return_status = ' || x_return_status, l_debug_prefix);
4298: END IF;
4299: */
4300: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4301: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'organization_name cannot be updated to null. ' ||
4302: 'x_return_status = ' || x_return_status,
4303: p_msg_level=>fnd_log.level_statement);
4304: END IF;
4305: END IF;
4307: ------------------------------
4308: -- validate gsa_indicator_flag
4309: ------------------------------
4310: /****Logical APIs - validation not required****/
4311: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
4312: -- gsa_indicator_flag is lookup code in lookup type YES/NO
4313: validate_lookup (
4314: p_column => 'gsa_indicator_flag',
4315: p_lookup_type => 'YES/NO',
4316: p_column_value => p_organization_rec.gsa_indicator_flag,
4317: x_return_status => x_return_status);
4318:
4319: /*IF g_debug THEN
4320: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
4321: 'gsa_indicator_flag should be in lookup YES/NO. ' ||
4322: 'x_return_status = ' || x_return_status, l_debug_prefix);
4323: END IF;
4324: */
4322: 'x_return_status = ' || x_return_status, l_debug_prefix);
4323: END IF;
4324: */
4325: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4326: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'gsa_indicator_flag should be in lookup YES/NO. ' ||
4327: 'x_return_status = ' || x_return_status,
4328: p_msg_level=>fnd_log.level_statement);
4329: END IF;
4330: END IF;
4352: p_column_value => p_organization_rec.sic_code_type,
4353: x_return_status => x_return_status);
4354:
4355: /*IF g_debug THEN
4356: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
4357: 'sic_code_type should be in lookup SIC_CODE_TYPE' ||
4358: 'x_return_status = ' || x_return_status, l_debug_prefix);
4359: END IF;
4360: */
4358: 'x_return_status = ' || x_return_status, l_debug_prefix);
4359: END IF;
4360: */
4361: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4362: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'sic_code_type should be in lookup SIC_CODE_TYPE' ||
4363: 'x_return_status = ' || x_return_status,
4364: p_msg_level=>fnd_log.level_statement);
4365: END IF;
4366: END IF;
4388: p_column_value => p_organization_rec.fiscal_yearend_month,
4389: x_return_status => x_return_status);
4390:
4391: /*IF g_debug THEN
4392: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
4393: 'fiscal_yearend_month should be in lookup MONTH' ||
4394: 'x_return_status = ' || x_return_status, l_debug_prefix);
4395: END IF;
4396: */
4394: 'x_return_status = ' || x_return_status, l_debug_prefix);
4395: END IF;
4396: */
4397: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4398: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'fiscal_yearend_month should be in lookup MONTH' ||
4399: 'x_return_status = ' || x_return_status,
4400: p_msg_level=>fnd_log.level_statement);
4401: END IF;
4402: END IF;
4404: -------------------------
4405: -- validate internal_flag
4406: -------------------------
4407: /****Logical APIs - validation not required****/
4408: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
4409: -- internal_flag is lookup code in lookup type YES/NO
4410: validate_lookup (
4411: p_column => 'internal_flag',
4412: p_lookup_type => 'YES/NO',
4413: p_column_value => p_organization_rec.internal_flag,
4414: x_return_status => x_return_status);
4415:
4416: /*IF g_debug THEN
4417: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
4418: 'internal_flag should be in lookup YES/NO. ' ||
4419: 'x_return_status = ' || x_return_status, l_debug_prefix);
4420: END IF;
4421: */
4419: 'x_return_status = ' || x_return_status, l_debug_prefix);
4420: END IF;
4421: */
4422: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4423: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'internal_flag should be in lookup YES/NO. ' ||
4424: 'x_return_status = ' || x_return_status,
4425: p_msg_level=>fnd_log.level_statement);
4426: END IF;
4427: END IF;
4449: p_column_value => p_organization_rec.legal_status,
4450: x_return_status => x_return_status);
4451:
4452: /*IF g_debug THEN
4453: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
4454: 'legal_status is lookup code in lookup type LEGAL_STATUS. ' ||
4455: 'x_return_status = ' || x_return_status, l_debug_prefix);
4456: END IF;*/
4457:
4455: 'x_return_status = ' || x_return_status, l_debug_prefix);
4456: END IF;*/
4457:
4458: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4459: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'legal_status is lookup code in lookup type LEGAL_STATUS. ' ||
4460: 'x_return_status = ' || x_return_status,
4461: p_msg_level=>fnd_log.level_statement);
4462: END IF;
4463: END IF;
4485: p_column_value => p_organization_rec.hq_branch_ind,
4486: x_return_status => x_return_status);
4487:
4488: /*IF g_debug THEN
4489: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
4490: 'hq_branch_ind is lookup code in lookup type HQ_BRANCH_IND. ' ||
4491: 'x_return_status = ' || x_return_status, l_debug_prefix);
4492: END IF;
4493: */
4491: 'x_return_status = ' || x_return_status, l_debug_prefix);
4492: END IF;
4493: */
4494: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4495: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
4496: p_message=>'hq_branch_ind is lookup code in lookup type HQ_BRANCH_IND. ' ||
4497: 'x_return_status = ' || x_return_status,
4498: p_msg_level=>fnd_log.level_statement);
4499: END IF;
4502: -----------------------
4503: -- validate branch_flag
4504: -----------------------
4505: /****Logical APIs - validation not required****/
4506: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
4507: -- branch_flag is lookup code in lookup type YES/NO
4508: validate_lookup (
4509: p_column => 'branch_flag',
4510: p_lookup_type => 'YES/NO',
4511: p_column_value => p_organization_rec.branch_flag,
4512: x_return_status => x_return_status);
4513:
4514: /*IF g_debug THEN
4515: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
4516: 'branch_flag should be in lookup YES/NO. ' ||
4517: 'x_return_status = ' || x_return_status, l_debug_prefix);
4518: END IF;
4519: */
4517: 'x_return_status = ' || x_return_status, l_debug_prefix);
4518: END IF;
4519: */
4520: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4521: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'branch_flag should be in lookup YES/NO. ' ||
4522: 'x_return_status = ' || x_return_status,
4523: p_msg_level=>fnd_log.level_statement);
4524: END IF;
4525: END IF;
4527: -------------------
4528: -- validate oob_ind
4529: -------------------
4530: /****Logical APIs - validation not required****/
4531: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
4532: -- oob_ind is lookup code in lookup type YES/NO
4533: validate_lookup (
4534: p_column => 'oob_ind',
4535: p_lookup_type => 'YES/NO',
4536: p_column_value => p_organization_rec.oob_ind,
4537: x_return_status => x_return_status);
4538:
4539: /*IF g_debug THEN
4540: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
4541: 'oob_ind should be in lookup YES/NO. ' ||
4542: 'x_return_status = ' || x_return_status, l_debug_prefix);
4543: END IF;
4544: */
4542: 'x_return_status = ' || x_return_status, l_debug_prefix);
4543: END IF;
4544: */
4545: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4546: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'oob_ind should be in lookup YES/NO. ' ||
4547: 'x_return_status = ' || x_return_status,
4548: p_msg_level=>fnd_log.level_statement);
4549: END IF;
4550: END IF;
4552: ----------------------
4553: -- validate import_ind
4554: ----------------------
4555: /****Logical APIs - validation not required****/
4556: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
4557: -- import_ind is lookup code in lookup type YES/NO
4558: validate_lookup (
4559: p_column => 'import_ind',
4560: p_lookup_type => 'YES/NO',
4561: p_column_value => p_organization_rec.import_ind,
4562: x_return_status => x_return_status);
4563:
4564: /*IF g_debug THEN
4565: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
4566: 'import_ind should be in lookup YES/NO. ' ||
4567: 'x_return_status = ' || x_return_status, l_debug_prefix);
4568: END IF;
4569: */
4567: 'x_return_status = ' || x_return_status, l_debug_prefix);
4568: END IF;
4569: */
4570: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4571: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'import_ind should be in lookup YES/NO. ' ||
4572: 'x_return_status = ' || x_return_status,
4573: p_msg_level=>fnd_log.level_statement);
4574: END IF;
4575: END IF;
4577: ----------------------
4578: -- validate export_ind
4579: ----------------------
4580: /****Logical APIs - validation not required****/
4581: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
4582: -- export_ind is lookup code in lookup type YES/NO
4583: validate_lookup (
4584: p_column => 'export_ind',
4585: p_lookup_type => 'YES/NO',
4586: p_column_value => p_organization_rec.export_ind,
4587: x_return_status => x_return_status);
4588:
4589: /*IF g_debug THEN
4590: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
4591: 'export_ind should be in lookup YES/NO. ' ||
4592: 'x_return_status = ' || x_return_status, l_debug_prefix);
4593: END IF;
4594: */
4592: 'x_return_status = ' || x_return_status, l_debug_prefix);
4593: END IF;
4594: */
4595: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4596: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'export_ind should be in lookup YES/NO. ' ||
4597: 'x_return_status = ' || x_return_status,
4598: p_msg_level=>fnd_log.level_statement);
4599: END IF;
4600: END IF;
4602: -----------------------------
4603: -- validate labor_surplus_ind
4604: -----------------------------
4605: /****Logical APIs - validation not required****/
4606: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
4607: -- labor_surplus_ind is lookup code in lookup type YES/NO
4608: validate_lookup (
4609: p_column => 'labor_surplus_ind',
4610: p_lookup_type => 'YES/NO',
4611: p_column_value => p_organization_rec.labor_surplus_ind,
4612: x_return_status => x_return_status);
4613:
4614: /*IF g_debug THEN
4615: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
4616: 'labor_surplus_ind should be in lookup YES/NO. ' ||
4617: 'x_return_status = ' || x_return_status, l_debug_prefix);
4618: END IF;
4619: */
4617: 'x_return_status = ' || x_return_status, l_debug_prefix);
4618: END IF;
4619: */
4620: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4621: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'labor_surplus_ind should be in lookup YES/NO. ' ||
4622: 'x_return_status = ' || x_return_status,
4623: p_msg_level=>fnd_log.level_statement);
4624: END IF;
4625: END IF;
4638: p_column_value => p_organization_rec.debarment_ind,
4639: x_return_status => x_return_status);
4640:
4641: IF g_debug THEN
4642: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
4643: 'debarment_ind should be in lookup YES/NO. ' ||
4644: 'x_return_status = ' || x_return_status, l_debug_prefix);
4645: END IF;
4646: */
4648: ------------------------------
4649: -- validate minority_owned_ind
4650: ------------------------------
4651: /****Logical APIs - validation not required****/
4652: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
4653: -- minority_owned_ind is lookup code in lookup type YES/NO
4654: validate_lookup (
4655: p_column => 'minority_owned_ind',
4656: p_lookup_type => 'YES/NO',
4657: p_column_value => p_organization_rec.minority_owned_ind,
4658: x_return_status => x_return_status);
4659:
4660: /*IF g_debug THEN
4661: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
4662: 'minority_owned_ind should be in lookup YES/NO. ' ||
4663: 'x_return_status = ' || x_return_status, l_debug_prefix);
4664: END IF;
4665: */
4663: 'x_return_status = ' || x_return_status, l_debug_prefix);
4664: END IF;
4665: */
4666: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4667: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'minority_owned_ind should be in lookup YES/NO. ' ||
4668: 'x_return_status = ' || x_return_status,
4669: p_msg_level=>fnd_log.level_statement);
4670: END IF;
4671: END IF;
4673: ---------------------------
4674: -- validate woman_owned_ind
4675: ---------------------------
4676: /****Logical APIs - validation not required****/
4677: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
4678: -- woman_owned_ind is lookup code in lookup type YES/NO
4679: validate_lookup (
4680: p_column => 'woman_owned_ind',
4681: p_lookup_type => 'YES/NO',
4682: p_column_value => p_organization_rec.woman_owned_ind,
4683: x_return_status => x_return_status);
4684:
4685: /*IF g_debug THEN
4686: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
4687: 'minority_owned_ind should be in lookup YES/NO. ' ||
4688: 'x_return_status = ' || x_return_status, l_debug_prefix);
4689: END IF;
4690: */
4688: 'x_return_status = ' || x_return_status, l_debug_prefix);
4689: END IF;
4690: */
4691: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4692: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'minority_owned_ind should be in lookup YES/NO. ' ||
4693: 'x_return_status = ' || x_return_status,
4694: p_msg_level=>fnd_log.level_statement);
4695: END IF;
4696: END IF;
4698: -------------------------
4699: -- validate disadv_8a_ind
4700: -------------------------
4701: /****Logical APIs - validation not required****/
4702: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
4703: -- disadv_8a_ind is lookup code in lookup type YES/NO
4704: validate_lookup (
4705: p_column => 'disadv_8a_ind',
4706: p_lookup_type => 'YES/NO',
4707: p_column_value => p_organization_rec.disadv_8a_ind,
4708: x_return_status => x_return_status);
4709:
4710: /*IF g_debug THEN
4711: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
4712: 'disadv_8a_ind should be in lookup YES/NO. ' ||
4713: 'x_return_status = ' || x_return_status, l_debug_prefix);
4714: END IF;
4715: */
4713: 'x_return_status = ' || x_return_status, l_debug_prefix);
4714: END IF;
4715: */
4716: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4717: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'disadv_8a_ind should be in lookup YES/NO. ' ||
4718: 'x_return_status = ' || x_return_status,
4719: p_msg_level=>fnd_log.level_statement);
4720: END IF;
4721: END IF;
4723: -------------------------
4724: -- validate small_bus_ind
4725: -------------------------
4726: /****Logical APIs - validation not required****/
4727: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
4728: -- small_bus_ind is lookup code in lookup type YES/NO
4729: validate_lookup (
4730: p_column => 'small_bus_ind',
4731: p_lookup_type => 'YES/NO',
4732: p_column_value => p_organization_rec.small_bus_ind,
4733: x_return_status => x_return_status);
4734:
4735: /*IF g_debug THEN
4736: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
4737: 'small_bus_ind should be in lookup YES/NO. ' ||
4738: 'x_return_status = ' || x_return_status, l_debug_prefix);
4739: END IF;
4740: */
4738: 'x_return_status = ' || x_return_status, l_debug_prefix);
4739: END IF;
4740: */
4741: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4742: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'small_bus_ind should be in lookup YES/NO. ' ||
4743: 'x_return_status = ' || x_return_status,
4744: p_msg_level=>fnd_log.level_statement);
4745: END IF;
4746: END IF;
4772: x_return_status => x_return_status);
4773:
4774:
4775: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4776: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
4777: p_message=>'failure_score_commentary is lookup code in lookup type FAILURE_SCORE_COMMENTARY. ' ||
4778: 'x_return_status = ' || x_return_status,
4779: p_msg_level=>fnd_log.level_statement);
4780: END IF;
4806: p_column_value => p_organization_rec.credit_score_commentary,
4807: x_return_status => x_return_status);
4808:
4809: IF g_debug THEN
4810: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
4811: 'credit_score_commentary is lookup code in lookup type CREDIT_SCORE_COMMENTARY. ' ||
4812: 'x_return_status = ' || x_return_status, l_debug_prefix);
4813: END IF;
4814:
4838: p_column_value => p_organization_rec.local_bus_iden_type,
4839: x_return_status => x_return_status);
4840:
4841: /*IF g_debug THEN
4842: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
4843: 'local_bus_iden_type is lookup code in lookup type LOCAL_BUS_IDEN_TYPE. ' ||
4844: 'x_return_status = ' || x_return_status, l_debug_prefix);
4845: END IF;
4846: */
4844: 'x_return_status = ' || x_return_status, l_debug_prefix);
4845: END IF;
4846: */
4847: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4848: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'local_bus_iden_type is lookup code in lookup type LOCAL_BUS_IDEN_TYPE. ' ||
4849: 'x_return_status = ' || x_return_status,
4850: p_msg_level=>fnd_log.level_statement);
4851: END IF;
4852:
4875: p_column_value => p_organization_rec.registration_type,
4876: x_return_status => x_return_status);
4877:
4878: /*IF g_debug THEN
4879: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
4880: 'registration_type is lookup code in lookup type REGISTRATION_TYPE. ' ||
4881: 'x_return_status = ' || x_return_status, l_debug_prefix);
4882: END IF;
4883: */
4881: 'x_return_status = ' || x_return_status, l_debug_prefix);
4882: END IF;
4883: */
4884: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4885: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
4886: p_message=>'registration_type is lookup code in lookup type REGISTRATION_TYPE. ' ||
4887: 'x_return_status = ' || x_return_status,
4888: p_msg_level=>fnd_log.level_statement);
4889: END IF;
4902: p_column_value => p_organization_rec.total_emp_est_ind,
4903: x_return_status => x_return_status);
4904:
4905: /*IF g_debug THEN
4906: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
4907: 'total_emp_est_ind should be in lookup YES/NO. ' ||
4908: 'x_return_status = ' || x_return_status, l_debug_prefix);
4909: END IF;
4910: */
4909: END IF;
4910: */
4911: /*
4912: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4913: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'total_emp_est_ind should be in lookup YES/NO. ' ||
4914: 'x_return_status = ' || x_return_status,
4915: p_msg_level=>fnd_log.level_statement);
4916: END IF;
4917: */
4918: --------------------------
4919: -- validate parent_sub_ind
4920: --------------------------
4921: /****Logical APIs - validation not required****/
4922: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
4923: -- parent_sub_ind is lookup code in lookup type YES/NO
4924: validate_lookup (
4925: p_column => 'parent_sub_ind',
4926: p_lookup_type => 'YES/NO',
4927: p_column_value => p_organization_rec.parent_sub_ind,
4928: x_return_status => x_return_status);
4929:
4930: /*IF g_debug THEN
4931: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
4932: 'parent_sub_ind should be in lookup YES/NO. ' ||
4933: 'x_return_status = ' || x_return_status, l_debug_prefix);
4934: END IF;
4935: */
4933: 'x_return_status = ' || x_return_status, l_debug_prefix);
4934: END IF;
4935: */
4936: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4937: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'parent_sub_ind should be in lookup YES/NO. ' ||
4938: 'x_return_status = ' || x_return_status,
4939: p_msg_level=>fnd_log.level_statement);
4940: END IF;
4941: END IF;
4963: p_column_value => p_organization_rec.local_activity_code_type,
4964: x_return_status => x_return_status);
4965:
4966: /*IF g_debug THEN
4967: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
4968: 'local_activity_code_type is lookup code in lookup type LOCAL_ACTIVITY_CODE_TYPE. ' ||
4969: 'x_return_status = ' || x_return_status, l_debug_prefix);
4970: END IF;
4971: */
4969: 'x_return_status = ' || x_return_status, l_debug_prefix);
4970: END IF;
4971: */
4972: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4973: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
4974: p_message=>'local_activity_code_type is lookup code in lookup type LOCAL_ACTIVITY_CODE_TYPE. ' ||
4975: 'x_return_status = ' || x_return_status,
4976: p_msg_level=>fnd_log.level_statement);
4977: END IF;
5012: x_return_status => x_return_status);
5013:
5014:
5015: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5016: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
5017: p_message=>'local_activity_code is lookup code in lookup type ' || p_organization_rec.local_activity_code_type || '.' ||
5018: 'x_return_status = ' || x_return_status,
5019: p_msg_level=>fnd_log.level_statement);
5020: END IF;
5025: ------------------------------------
5026: -- validate public_private_ownership_flag
5027: ------------------------------------
5028: /****Logical APIs - validation not required****/
5029: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
5030: -- public_private_ownership_flag is lookup code in lookup type YES/NO
5031: validate_lookup (
5032: p_column => 'public_private_ownership_flag',
5033: p_lookup_type => 'YES/NO',
5034: p_column_value => p_organization_rec.public_private_ownership_flag,
5035: x_return_status => x_return_status);
5036:
5037: /*IF g_debug THEN
5038: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
5039: 'public_private_ownership_flag should be in lookup YES/NO. ' ||
5040: 'x_return_status = ' || x_return_status, l_debug_prefix);
5041: END IF;
5042: */
5040: 'x_return_status = ' || x_return_status, l_debug_prefix);
5041: END IF;
5042: */
5043: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5044: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
5045: p_message=>'public_private_ownership_flag should be in lookup YES/NO. ' ||
5046: 'x_return_status = ' || x_return_status,
5047: p_msg_level=>fnd_log.level_statement);
5048: END IF;
5061: p_column_value => p_organization_rec.emp_at_primary_adr_est_ind,
5062: x_return_status => x_return_status);
5063:
5064: /*IF g_debug THEN
5065: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
5066: 'emp_at_primary_adr_est_ind should be in lookup YES/NO. ' ||
5067: 'x_return_status = ' || x_return_status, l_debug_prefix);
5068: END IF;
5069: */
5068: END IF;
5069: */
5070: /*
5071: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5072: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
5073: p_message=>'emp_at_primary_adr_est_ind should be in lookup YES/NO. ' ||
5074: 'x_return_status = ' || x_return_status,
5075: p_msg_level=>fnd_log.level_statement);
5076: END IF;
5097: p_column_value => p_organization_rec.content_source_type,
5098: x_return_status => x_return_status);
5099:
5100: IF g_debug THEN
5101: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
5102: 'content_source_type is lookup code in lookup type CONTENT_SOURCE_TYPE. ' ||
5103: 'x_return_status = ' || x_return_status, l_debug_prefix);
5104: END IF;
5105: **/
5118: p_column_value => p_organization_rec.credit_score_commentary2,
5119: x_return_status => x_return_status);
5120:
5121: IF g_debug THEN
5122: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
5123: 'credit_score_commentary2 is lookup code in lookup type CREDIT_SCORE_COMMENTARY. ' ||
5124: 'x_return_status = ' || x_return_status, l_debug_prefix);
5125: END IF;
5126:
5135: p_column_value => p_organization_rec.credit_score_commentary3,
5136: x_return_status => x_return_status);
5137:
5138: IF g_debug THEN
5139: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
5140: 'credit_score_commentary3 is lookup code in lookup type CREDIT_SCORE_COMMENTARY. ' ||
5141: 'x_return_status = ' || x_return_status, l_debug_prefix);
5142: END IF;
5143:
5152: p_column_value => p_organization_rec.credit_score_commentary4,
5153: x_return_status => x_return_status);
5154:
5155: IF g_debug THEN
5156: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
5157: 'credit_score_commentary4 is lookup code in lookup type CREDIT_SCORE_COMMENTARY. ' ||
5158: 'x_return_status = ' || x_return_status, l_debug_prefix);
5159: END IF;
5160:
5169: p_column_value => p_organization_rec.credit_score_commentary5,
5170: x_return_status => x_return_status);
5171:
5172: IF g_debug THEN
5173: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
5174: 'credit_score_commentary5 is lookup code in lookup type CREDIT_SCORE_COMMENTARY. ' ||
5175: 'x_return_status = ' || x_return_status, l_debug_prefix);
5176: END IF;
5177:
5186: p_column_value => p_organization_rec.credit_score_commentary6,
5187: x_return_status => x_return_status);
5188:
5189: IF g_debug THEN
5190: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
5191: 'credit_score_commentary6 is lookup code in lookup type CREDIT_SCORE_COMMENTARY. ' ||
5192: 'x_return_status = ' || x_return_status, l_debug_prefix);
5193: END IF;
5194:
5203: p_column_value => p_organization_rec.credit_score_commentary7,
5204: x_return_status => x_return_status);
5205:
5206: IF g_debug THEN
5207: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
5208: 'credit_score_commentary7 is lookup code in lookup type CREDIT_SCORE_COMMENTARY. ' ||
5209: 'x_return_status = ' || x_return_status, l_debug_prefix);
5210: END IF;
5211:
5220: p_column_value => p_organization_rec.credit_score_commentary8,
5221: x_return_status => x_return_status);
5222:
5223: IF g_debug THEN
5224: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
5225: 'credit_score_commentary8 is lookup code in lookup type CREDIT_SCORE_COMMENTARY. ' ||
5226: 'x_return_status = ' || x_return_status, l_debug_prefix);
5227: END IF;
5228:
5237: p_column_value => p_organization_rec.credit_score_commentary9,
5238: x_return_status => x_return_status);
5239:
5240: IF g_debug THEN
5241: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
5242: 'credit_score_commentary9 is lookup code in lookup type CREDIT_SCORE_COMMENTARY. ' ||
5243: 'x_return_status = ' || x_return_status, l_debug_prefix);
5244: END IF;
5245:
5254: p_column_value => p_organization_rec.credit_score_commentary10,
5255: x_return_status => x_return_status);
5256:
5257: IF g_debug THEN
5258: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
5259: 'credit_score_commentary10 is lookup code in lookup type CREDIT_SCORE_COMMENTARY. ' ||
5260: 'x_return_status = ' || x_return_status, l_debug_prefix);
5261: END IF;
5262:
5272: p_column_value => p_organization_rec.failure_score_commentary2,
5273: x_return_status => x_return_status);
5274:
5275: IF g_debug THEN
5276: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
5277: 'failure_score_commentary2 is lookup code in lookup type FAILURE_SCORE_COMMENTARY. ' ||
5278: 'x_return_status = ' || x_return_status, l_debug_prefix);
5279: END IF;
5280:
5289: p_column_value => p_organization_rec.failure_score_commentary3,
5290: x_return_status => x_return_status);
5291:
5292: IF g_debug THEN
5293: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
5294: 'failure_score_commentary3 is lookup code in lookup type FAILURE_SCORE_COMMENTARY. ' ||
5295: 'x_return_status = ' || x_return_status, l_debug_prefix);
5296: END IF;
5297:
5306: p_column_value => p_organization_rec.failure_score_commentary4,
5307: x_return_status => x_return_status);
5308:
5309: IF g_debug THEN
5310: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
5311: 'failure_score_commentary4 is lookup code in lookup type FAILURE_SCORE_COMMENTARY. ' ||
5312: 'x_return_status = ' || x_return_status, l_debug_prefix);
5313: END IF;
5314:
5323: p_column_value => p_organization_rec.failure_score_commentary5,
5324: x_return_status => x_return_status);
5325:
5326: IF g_debug THEN
5327: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
5328: 'failure_score_commentary5 is lookup code in lookup type FAILURE_SCORE_COMMENTARY. ' ||
5329: 'x_return_status = ' || x_return_status, l_debug_prefix);
5330: END IF;
5331:
5340: p_column_value => p_organization_rec.failure_score_commentary6,
5341: x_return_status => x_return_status);
5342:
5343: IF g_debug THEN
5344: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
5345: 'failure_score_commentary6 is lookup code in lookup type FAILURE_SCORE_COMMENTARY. ' ||
5346: 'x_return_status = ' || x_return_status, l_debug_prefix);
5347: END IF;
5348:
5357: p_column_value => p_organization_rec.failure_score_commentary7,
5358: x_return_status => x_return_status);
5359:
5360: IF g_debug THEN
5361: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
5362: 'failure_score_commentary7 is lookup code in lookup type FAILURE_SCORE_COMMENTARY. ' ||
5363: 'x_return_status = ' || x_return_status, l_debug_prefix);
5364: END IF;
5365:
5374: p_column_value => p_organization_rec.failure_score_commentary8,
5375: x_return_status => x_return_status);
5376:
5377: IF g_debug THEN
5378: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
5379: 'failure_score_commentary8 is lookup code in lookup type FAILURE_SCORE_COMMENTARY. ' ||
5380: 'x_return_status = ' || x_return_status, l_debug_prefix);
5381: END IF;
5382:
5391: p_column_value => p_organization_rec.failure_score_commentary9,
5392: x_return_status => x_return_status);
5393:
5394: IF g_debug THEN
5395: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
5396: 'failure_score_commentary9 is lookup code in lookup type FAILURE_SCORE_COMMENTARY. ' ||
5397: 'x_return_status = ' || x_return_status, l_debug_prefix);
5398: END IF;
5399:
5408: p_column_value => p_organization_rec.failure_score_commentary10,
5409: x_return_status => x_return_status);
5410:
5411: IF g_debug THEN
5412: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
5413: 'failure_score_commentary10 is lookup code in lookup type FAILURE_SCORE_COMMENTARY. ' ||
5414: 'x_return_status = ' || x_return_status, l_debug_prefix);
5415: END IF;
5416:
5443: x_return_status := fnd_api.g_ret_sts_error;
5444: END;
5445:
5446: IF g_debug THEN
5447: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
5448: 'maximum_credit_currency_code is foreign key of fnd_currencies.currency_code. ' ||
5449: 'x_return_status = ' || x_return_status, l_debug_prefix);
5450: END IF;
5451:
5463: p_column_value => p_organization_rec.total_employees_ind,
5464: x_return_status => x_return_status);
5465:
5466: /*IF g_debug THEN
5467: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
5468: 'total_employees_ind is lookup code in lookup type TOTAL_EMPLOYEES_INDICATOR. ' ||
5469: 'x_return_status = ' || x_return_status, l_debug_prefix);
5470: END IF;
5471: */
5469: 'x_return_status = ' || x_return_status, l_debug_prefix);
5470: END IF;
5471: */
5472: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5473: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'total_employees_ind is lookup code in lookup type TOTAL_EMPLOYEES_INDICATOR. ' ||
5474: 'x_return_status = ' || x_return_status,
5475: p_msg_level=>fnd_log.level_statement);
5476: END IF;
5477:
5486: p_column_value => p_organization_rec.total_emp_est_ind,
5487: x_return_status => x_return_status);
5488:
5489: /*IF g_debug THEN
5490: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
5491: 'total_emp_est_ind is lookup code in lookup type TOTAL_EMP_EST_IND. ' ||
5492: 'x_return_status = ' || x_return_status, l_debug_prefix);
5493: END IF;
5494: */
5492: 'x_return_status = ' || x_return_status, l_debug_prefix);
5493: END IF;
5494: */
5495: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5496: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
5497: p_message=>'total_emp_est_ind is lookup code in lookup type TOTAL_EMP_EST_IND. ' ||
5498: 'x_return_status = ' || x_return_status,
5499: p_msg_level=>fnd_log.level_statement);
5500: END IF;
5510: p_column_value => p_organization_rec.total_emp_min_ind,
5511: x_return_status => x_return_status);
5512:
5513: /*IF g_debug THEN
5514: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
5515: 'total_emp_min_ind is lookup code in lookup type TOTAL_EMP_MIN_IND. ' ||
5516: 'x_return_status = ' || x_return_status, l_debug_prefix);
5517: END IF;
5518: */
5516: 'x_return_status = ' || x_return_status, l_debug_prefix);
5517: END IF;
5518: */
5519: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5520: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
5521: p_message=>'total_emp_min_ind is lookup code in lookup type TOTAL_EMP_MIN_IND. ' ||
5522: 'x_return_status = ' || x_return_status,
5523: p_msg_level=>fnd_log.level_statement);
5524: END IF;
5534: p_column_value => p_organization_rec.emp_at_primary_adr_est_ind,
5535: x_return_status => x_return_status);
5536:
5537: /*IF g_debug THEN
5538: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
5539: 'emp_at_primary_adr_est_ind is lookup code in lookup type EMP_AT_PRIMARY_ADR_EST_IND. ' ||
5540: 'x_return_status = ' || x_return_status, l_debug_prefix);
5541: END IF;
5542: */
5540: 'x_return_status = ' || x_return_status, l_debug_prefix);
5541: END IF;
5542: */
5543: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5544: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'emp_at_primary_adr_est_ind is lookup code in lookup type EMP_AT_PRIMARY_ADR_EST_IND. ' ||
5545: 'x_return_status = ' || x_return_status,
5546: p_msg_level=>fnd_log.level_statement);
5547: END IF;
5548:
5557: p_column_value => p_organization_rec.emp_at_primary_adr_min_ind,
5558: x_return_status => x_return_status);
5559:
5560: /*IF g_debug THEN
5561: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
5562: 'emp_at_primary_adr_min_ind is lookup code in lookup type EMP_AT_PRIMARY_ADR_MIN_IND. ' ||
5563: 'x_return_status = ' || x_return_status, l_debug_prefix);
5564: END IF;
5565: */
5563: 'x_return_status = ' || x_return_status, l_debug_prefix);
5564: END IF;
5565: */
5566: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5567: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
5568: p_message=>'emp_at_primary_adr_min_ind is lookup code in lookup type EMP_AT_PRIMARY_ADR_MIN_IND. ' ||
5569: 'x_return_status = ' || x_return_status,
5570: p_msg_level=>fnd_log.level_statement);
5571: END IF;
5598: p_lookup_type => 'OWN_RENT_IND',
5599: p_column_value => p_organization_rec.rent_own_ind,
5600: x_return_status => x_return_status);
5601: /*IF g_debug THEN
5602: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
5603: 'rent_own_ind in lookup OWN_RENT_IND. ' ||
5604: 'x_return_status = ' || x_return_status, l_debug_prefix);
5605: END IF;
5606: */
5604: 'x_return_status = ' || x_return_status, l_debug_prefix);
5605: END IF;
5606: */
5607: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5608: hz_utility_v2pub.debug(
5609: p_prefix=>l_debug_prefix,
5610: p_message=>'rent_own_ind in lookup OWN_RENT_IND. ' ||
5611: 'x_return_status = ' || x_return_status,
5612: p_msg_level=>fnd_log.level_statement);
5630: p_organization_rec.principal_title IS NOT NULL OR
5631: p_organization_rec.principal_name IS NOT NULL ) AND
5632: /*p_organization_rec.actual_content_source = 'DNB' AND
5633: NVL(FND_PROFILE.value('HZ_UPDATE_THIRD_PARTY_DATA'), 'N') = 'N'*/
5634: /* HZ_UTILITY_V2PUB.is_purchased_content_source(p_organization_rec.actual_content_source) = 'Y' AND
5635: p_organization_rec.actual_content_source <> HZ_PARTY_V2PUB.G_MISS_CONTENT_SOURCE_TYPE
5636: THEN
5637: l_return_status := FND_API.G_RET_STS_SUCCESS;
5638:
5664: x_return_status => l_return_status,
5665: p_raise_error => 'N');
5666:
5667: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5668: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'ceo_title will be considered DNB-only attributes.
5669: If you want to identify the CEO, you should not update these column,
5670: but rather add an appropriate Org Contact.',
5671: p_msg_level=>fnd_log.level_statement);
5672: END IF;
5698: x_return_status := fnd_api.g_ret_sts_error;
5699: END;
5700:
5701: /*IF g_debug THEN
5702: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
5703: 'displayed_duns_party_id is foreign key of hz_parties.party_id. ' ||
5704: 'x_return_status = ' || x_return_status, l_debug_prefix);
5705: END IF;
5706: */
5704: 'x_return_status = ' || x_return_status, l_debug_prefix);
5705: END IF;
5706: */
5707: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5708: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
5709: p_message=>'displayed_duns_party_id is foreign key of hz_parties.party_id. ' ||
5710: 'x_return_status = ' || x_return_status,
5711: p_msg_level=>fnd_log.level_statement);
5712: END IF;
5742: p_column_value => p_organization_rec.home_country,
5743: x_return_status => x_return_status);
5744:
5745: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
5746: hz_utility_v2pub.debug(
5747: p_prefix => l_debug_prefix,
5748: p_message => 'home_country should be in fnd_territories.territory_code. ' ||
5749: 'x_return_status = ' || x_return_status,
5750: p_msg_level => fnd_log.level_statement);
5750: p_msg_level => fnd_log.level_statement);
5751: END IF;
5752:
5753: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5754: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_organization (-)',
5755: p_msg_level=>fnd_log.level_procedure);
5756: END IF;
5757:
5758: --disable_debug;
5801: BEGIN
5802:
5803: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level
5804: THEN
5805: hz_utility_v2pub.debug(
5806: p_prefix => l_debug_prefix,
5807: p_message => 'validate_global_loc_num(+)',
5808: p_msg_level => fnd_log.level_procedure
5809: );
5857: END IF;
5858:
5859: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level
5860: THEN
5861: hz_utility_v2pub.debug(
5862: p_prefix => l_debug_prefix,
5863: p_message => 'validate_global_loc_num(-)',
5864: p_msg_level => fnd_log.level_procedure
5865: );
5941: --enable_debug;
5942:
5943: -- Debug info.
5944: /*IF g_debug THEN
5945: hz_utility_v2pub.debug ('validate_party_site (+)');
5946: END IF;
5947: */
5948: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5949: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_party_site (+)',
5945: hz_utility_v2pub.debug ('validate_party_site (+)');
5946: END IF;
5947: */
5948: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5949: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_party_site (+)',
5950: p_msg_level=>fnd_log.level_procedure);
5951: END IF;
5952:
5953: -- select fields for later use during update.
5983: --------------------
5984: -- validate party_id
5985: --------------------
5986: /****Logical APIs - validation not required****/
5987: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
5988: -- party_id is mandatory field
5989: validate_mandatory (
5990: p_create_update_flag => p_create_update_flag,
5991: p_column => 'party_id',
5992: p_column_value => p_party_site_rec.party_id,
5993: x_return_status => x_return_status);
5994:
5995: /*IF g_debug THEN
5996: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
5997: 'party_id is mandatory field. ' ||
5998: 'x_return_status = ' || x_return_status, l_debug_prefix);
5999: END IF;
6000: */
5998: 'x_return_status = ' || x_return_status, l_debug_prefix);
5999: END IF;
6000: */
6001: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6002: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id is mandatory field. ' ||
6003: 'x_return_status = ' || x_return_status,
6004: p_msg_level=>fnd_log.level_statement);
6005: END IF;
6006:
6013: p_old_column_value => l_party_id,
6014: x_return_status => x_return_status);
6015:
6016: /*IF g_debug THEN
6017: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
6018: 'party_id is non-updateable field. ' ||
6019: 'x_return_status = ' || x_return_status, l_debug_prefix);
6020: END IF;
6021: */
6019: 'x_return_status = ' || x_return_status, l_debug_prefix);
6020: END IF;
6021: */
6022: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6023: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id is non-updateable field. ' ||
6024: 'x_return_status = ' || x_return_status,
6025: p_msg_level=>fnd_log.level_statement);
6026: END IF;
6027:
6053: x_return_status := fnd_api.g_ret_sts_error;
6054: END;
6055:
6056: /*IF g_debug THEN
6057: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
6058: 'party_id is foreign key of hz_parties. ' ||
6059: 'x_return_status = ' || x_return_status, l_debug_prefix);
6060: END IF;
6061: */
6059: 'x_return_status = ' || x_return_status, l_debug_prefix);
6060: END IF;
6061: */
6062: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6063: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id is foreign key of hz_parties. ' ||
6064: 'x_return_status = ' || x_return_status,
6065: p_msg_level=>fnd_log.level_statement);
6066: END IF;
6067:
6071: -----------------------
6072: -- validate location_id
6073: -----------------------
6074: /****Logical APIs - validation not required****/
6075: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
6076: -- location_id is mandatory field
6077: validate_mandatory (
6078: p_create_update_flag => p_create_update_flag,
6079: p_column => 'location_id',
6080: p_column_value => p_party_site_rec.location_id,
6081: x_return_status => x_return_status);
6082:
6083: /*IF g_debug THEN
6084: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
6085: 'location_id is mandatory field. ' ||
6086: 'x_return_status = ' || x_return_status, l_debug_prefix);
6087: END IF;
6088: */
6086: 'x_return_status = ' || x_return_status, l_debug_prefix);
6087: END IF;
6088: */
6089: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6090: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'location_id is mandatory field. ' ||
6091: 'x_return_status = ' || x_return_status,
6092: p_msg_level=>fnd_log.level_statement);
6093: END IF;
6094:
6101: p_old_column_value => l_location_id,
6102: x_return_status => x_return_status);
6103:
6104: /*IF g_debug THEN
6105: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
6106: 'location_id is non-updateable field. ' ||
6107: 'x_return_status = ' || x_return_status, l_debug_prefix);
6108: END IF;
6109: */
6107: 'x_return_status = ' || x_return_status, l_debug_prefix);
6108: END IF;
6109: */
6110: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6111: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'location_id is non-updateable field. ' ||
6112: 'x_return_status = ' || x_return_status,
6113: p_msg_level=>fnd_log.level_statement);
6114: END IF;
6115:
6145: x_return_status := fnd_api.g_ret_sts_error;
6146: END;
6147:
6148: /*IF g_debug THEN
6149: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
6150: 'location_id is foreign key of hz_locations. ' ||
6151: 'x_return_status = ' || x_return_status, l_debug_prefix);
6152: END IF;
6153: */
6151: 'x_return_status = ' || x_return_status, l_debug_prefix);
6152: END IF;
6153: */
6154: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6155: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'location_id is foreign key of hz_locations. ' ||
6156: 'x_return_status = ' || x_return_status,
6157: p_msg_level=>fnd_log.level_statement);
6158: END IF;
6159:
6172: p_old_column_value => l_party_site_number,
6173: x_return_status => x_return_status);
6174:
6175: /*IF g_debug THEN
6176: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
6177: 'party_site_number is non-updateable field. ' ||
6178: 'x_return_status = ' || x_return_status, l_debug_prefix);
6179: END IF;
6180: */
6178: 'x_return_status = ' || x_return_status, l_debug_prefix);
6179: END IF;
6180: */
6181: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6182: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_site_number is non-updateable field. ' ||
6183: 'x_return_status = ' || x_return_status,
6184: p_msg_level=>fnd_log.level_statement);
6185: END IF;
6186:
6189: ---------------------------------
6190: -- validate orig_system_reference
6191: ---------------------------------
6192: /****Logical APIs - validation not required****/
6193: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
6194: IF (p_party_site_rec.orig_system is not null
6195: and p_party_site_rec.orig_system <>fnd_api.g_miss_char)
6196: and (p_party_site_rec.orig_system_reference is not null
6197: and p_party_site_rec.orig_system_reference <>fnd_api.g_miss_char)
6230: p_old_column_value => l_orig_system_reference,
6231: x_return_status => x_return_status);
6232:
6233: /*IF g_debug THEN
6234: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
6235: 'orig_system_reference is non-updateable field. ' ||
6236: 'x_return_status = ' || x_return_status, l_debug_prefix);
6237: END IF;
6238: */
6236: 'x_return_status = ' || x_return_status, l_debug_prefix);
6237: END IF;
6238: */
6239: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6240: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'orig_system_reference is non-updateable field. ' ||
6241: 'x_return_status = ' || x_return_status,
6242: p_msg_level=>fnd_log.level_statement);
6243: END IF;
6244:
6256: p_column_value => p_party_site_rec.status,
6257: x_return_status => x_return_status);
6258:
6259: /*IF g_debug THEN
6260: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
6261: 'status cannot be set to null during update. ' ||
6262: 'x_return_status = ' || x_return_status, l_debug_prefix);
6263: END IF;
6264: */
6262: 'x_return_status = ' || x_return_status, l_debug_prefix);
6263: END IF;
6264: */
6265: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6266: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'status cannot be set to null during update. ' ||
6267: 'x_return_status = ' || x_return_status,
6268: p_msg_level=>fnd_log.level_statement);
6269: END IF;
6270:
6288: END IF;
6289: END IF;
6290:
6291: /****Logical APIs - validation not required****/
6292: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
6293: -- status is lookup code in lookup type REGISTRY_STATUS
6294: IF p_party_site_rec.status IS NOT NULL
6295: AND
6296: p_party_site_rec.status <> fnd_api.g_miss_char
6309: p_column_value => p_party_site_rec.status,
6310: x_return_status => x_return_status);
6311:
6312: /*IF g_debug THEN
6313: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
6314: 'status is lookup code in lookup type REGISTRY_STATUS. ' ||
6315: 'x_return_status = ' || x_return_status, l_debug_prefix);
6316: END IF;
6317: */
6315: 'x_return_status = ' || x_return_status, l_debug_prefix);
6316: END IF;
6317: */
6318: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6319: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
6320: p_message=>'status is lookup code in lookup type REGISTRY_STATUS. ' ||
6321: 'x_return_status = ' || x_return_status,
6322: p_msg_level=>fnd_log.level_statement);
6323: END IF;
6328: ------------------------------------
6329: -- validate identifying_address_flag
6330: ------------------------------------
6331: /****Logical APIs - validation not required****/
6332: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
6333: -- identifying_address_flag is lookup code in lookup type YES/NO
6334: validate_lookup (
6335: p_column => 'identifying_address_flag',
6336: p_lookup_type => 'YES/NO',
6338: x_return_status => x_return_status
6339: );
6340:
6341: /*IF g_debug THEN
6342: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
6343: 'identifying_address_flag should be in lookup YES/NO. ' ||
6344: 'x_return_status = ' || x_return_status, l_debug_prefix);
6345: END IF;
6346: */
6344: 'x_return_status = ' || x_return_status, l_debug_prefix);
6345: END IF;
6346: */
6347: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6348: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'identifying_address_flag should be in lookup YES/NO. ' ||
6349: 'x_return_status = ' || x_return_status,
6350: p_msg_level=>fnd_log.level_statement);
6351: END IF;
6352: END IF;
6379: x_return_status := FND_API.G_RET_STS_ERROR;
6380: END IF;
6381:
6382: /*IF g_debug THEN
6383: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
6384: 'If the identify address flag is set to Yes, the status column should not be Inactive.' ||
6385: 'x_return_status = ' || x_return_status,
6386: l_debug_prefix
6387: );
6387: );
6388: END IF;
6389: */
6390: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6391: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
6392: p_message=>'If the identify address flag is set to Yes, the status column should not be Inactive.' ||
6393: 'x_return_status = ' || x_return_status,
6394: p_msg_level=>fnd_log.level_statement);
6395: END IF;
6422: x_return_status := fnd_api.g_ret_sts_error;
6423: END;
6424:
6425: -- IF g_debug THEN
6426: -- hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
6427: -- 'language has foreign key fnd_languages.language_code. ' ||
6428: -- 'x_return_status = ' || x_return_status, l_debug_prefix);
6429: -- END IF;
6430:
6428: -- 'x_return_status = ' || x_return_status, l_debug_prefix);
6429: -- END IF;
6430:
6431: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6432: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
6433: p_message=>'language has foreign key fnd_languages.language_code. ' ||
6434: 'x_return_status = ' || x_return_status,
6435: p_msg_level=>fnd_log.level_statement);
6436: END IF;
6476: p_old_application_id => l_application_id,
6477: x_return_status => x_return_status);
6478:
6479: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6480: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_party_site (-)',
6481: p_msg_level=>fnd_log.level_procedure);
6482: END IF;
6483:
6484: END validate_party_site;
6546: --enable_debug;
6547:
6548: -- Debug info.
6549: /*IF g_debug THEN
6550: hz_utility_v2pub.debug ('validate_party_site_use (+)');
6551: END IF;
6552: */
6553: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6554: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_party_site_use (+)',
6550: hz_utility_v2pub.debug ('validate_party_site_use (+)');
6551: END IF;
6552: */
6553: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6554: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_party_site_use (+)',
6555: p_msg_level=>fnd_log.level_procedure);
6556: END IF;
6557:
6558: -- select fields for later use during update.
6582: -------------------------
6583: -- validate party_site_id
6584: -------------------------
6585: /****Logical APIs - validation not required****/
6586: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
6587: -- party_site_id is mandatory field
6588: validate_mandatory (
6589: p_create_update_flag => p_create_update_flag,
6590: p_column => 'party_site_id',
6599: p_old_column_value => l_party_site_id,
6600: x_return_status => x_return_status);
6601:
6602: /*IF g_debug THEN
6603: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
6604: 'party_site_id is non-updateable field. ' ||
6605: 'x_return_status = ' || x_return_status, l_debug_prefix);
6606: END IF;
6607: */
6605: 'x_return_status = ' || x_return_status, l_debug_prefix);
6606: END IF;
6607: */
6608: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6609: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_site_id is non-updateable field. ' ||
6610: 'x_return_status = ' || x_return_status,
6611: p_msg_level=>fnd_log.level_statement);
6612: END IF;
6613:
6637: x_return_status := fnd_api.g_ret_sts_error;
6638: END;
6639:
6640: /*IF g_debug THEN
6641: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
6642: 'party_site_id is foreign key of hz_party_sites.party_site_id. ' ||
6643: 'x_return_status = ' || x_return_status, l_debug_prefix);
6644: END IF;
6645: */
6643: 'x_return_status = ' || x_return_status, l_debug_prefix);
6644: END IF;
6645: */
6646: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6647: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
6648: p_message=>'party_site_id is foreign key of hz_party_sites.party_site_id. ' ||
6649: 'x_return_status = ' || x_return_status,
6650: p_msg_level=>fnd_log.level_statement);
6651: END IF;
6664: p_column_value => p_party_site_use_rec.site_use_type,
6665: x_return_status => x_return_status);
6666:
6667: /*IF g_debug THEN
6668: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
6669: 'site_use_type is mandatory field. ' ||
6670: 'x_return_status = ' || x_return_status, l_debug_prefix);
6671: END IF;
6672: */
6670: 'x_return_status = ' || x_return_status, l_debug_prefix);
6671: END IF;
6672: */
6673: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6674: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'site_use_type is mandatory field. ' ||
6675: 'x_return_status = ' || x_return_status,
6676: p_msg_level=>fnd_log.level_statement);
6677: END IF;
6678:
6685: p_old_column_value => l_site_use_type,
6686: x_return_status => x_return_status);
6687:
6688: /*IF g_debug THEN
6689: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
6690: 'site_use_type is non-updateable field. ' ||
6691: 'x_return_status = ' || x_return_status, l_debug_prefix);
6692: END IF;
6693: */
6691: 'x_return_status = ' || x_return_status, l_debug_prefix);
6692: END IF;
6693: */
6694: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6695: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'site_use_type is non-updateable field. ' ||
6696: 'x_return_status = ' || x_return_status,
6697: p_msg_level=>fnd_log.level_statement);
6698: END IF;
6699:
6706: p_column_value => p_party_site_use_rec.site_use_type,
6707: x_return_status => x_return_status);
6708:
6709: /*IF g_debug THEN
6710: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
6711: 'site_use_type is lookup code in lookup type PARTY_SITE_USE_CODE. ' ||
6712: 'x_return_status = ' || x_return_status, l_debug_prefix);
6713: END IF;
6714: */
6712: 'x_return_status = ' || x_return_status, l_debug_prefix);
6713: END IF;
6714: */
6715: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6716: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
6717: p_message=>'site_use_type is lookup code in lookup type PARTY_SITE_USE_CODE. ' ||
6718: 'x_return_status = ' || x_return_status,
6719: p_msg_level=>fnd_log.level_statement);
6720: END IF;
6723: ----------------------------
6724: -- validate primary_per_type
6725: ----------------------------
6726: /****Logical APIs - validation not required****/
6727: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
6728: -- primary_per_type is lookup code in lookup type YES/NO
6729: validate_lookup (
6730: p_column => 'primary_per_type',
6731: p_lookup_type => 'YES/NO',
6732: p_column_value => p_party_site_use_rec.primary_per_type,
6733: x_return_status => x_return_status);
6734:
6735: /*IF g_debug THEN
6736: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
6737: 'primary_per_type should be in lookup YES/NO. ' ||
6738: 'x_return_status = ' || x_return_status, l_debug_prefix);
6739: END IF;
6740: */
6738: 'x_return_status = ' || x_return_status, l_debug_prefix);
6739: END IF;
6740: */
6741: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6742: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'primary_per_type should be in lookup YES/NO. ' ||
6743: 'x_return_status = ' || x_return_status,
6744: p_msg_level=>fnd_log.level_statement);
6745: END IF;
6746: END IF;
6769: NULL;
6770: END;
6771:
6772: /*IF g_debug THEN
6773: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
6774: 'combination of party_site_id and site_use_type is unique. ' ||
6775: 'x_return_status = ' || x_return_status, l_debug_prefix);
6776: END IF;
6777: */
6775: 'x_return_status = ' || x_return_status, l_debug_prefix);
6776: END IF;
6777: */
6778: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6779: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
6780: p_message=>'combination of party_site_id and site_use_type is unique. ' ||
6781: 'x_return_status = ' || x_return_status,
6782: p_msg_level=>fnd_log.level_statement);
6783: END IF;
6795: x_return_status => x_return_status);
6796: END IF;
6797:
6798: /****Logical APIs - validation not required****/
6799: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
6800: -- status is lookup code in lookup type REGISTRY_STATUS
6801: IF p_party_site_use_rec.status IS NOT NULL
6802: AND
6803: p_party_site_use_rec.status <> fnd_api.g_miss_char
6816: p_column_value => p_party_site_use_rec.status,
6817: x_return_status => x_return_status);
6818:
6819: /*IF g_debug THEN
6820: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
6821: 'status is lookup code in lookup type REGISTRY_STATUS. ' ||
6822: 'x_return_status = ' || x_return_status, l_debug_prefix);
6823: END IF;
6824: */
6822: 'x_return_status = ' || x_return_status, l_debug_prefix);
6823: END IF;
6824: */
6825: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6826: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
6827: p_message=>'status is lookup code in lookup type REGISTRY_STATUS. ' ||
6828: 'x_return_status = ' || x_return_status,
6829: p_msg_level=>fnd_log.level_statement);
6830: END IF;
6871:
6872:
6873: -- Debug info.
6874: /*IF g_debug THEN
6875: hz_utility_v2pub.debug ('validate_party_site_use (-)');
6876: END IF;
6877: */
6878: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6879: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_party_site_use (-)',
6875: hz_utility_v2pub.debug ('validate_party_site_use (-)');
6876: END IF;
6877: */
6878: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6879: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_party_site_use (-)',
6880: p_msg_level=>fnd_log.level_procedure);
6881: END IF;
6882:
6883:
6939: --enable_debug;
6940:
6941: -- Debug info.
6942: /*IF g_debug THEN
6943: hz_utility_v2pub.debug ('validate_org_contact (+)');
6944: END IF;
6945: */
6946: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6947: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_org_contact (+)',
6943: hz_utility_v2pub.debug ('validate_org_contact (+)');
6944: END IF;
6945: */
6946: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6947: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_org_contact (+)',
6948: p_msg_level=>fnd_log.level_procedure);
6949: END IF;
6950:
6951:
6979: p_old_column_value => l_party_relationship_id,
6980: x_return_status => x_return_status);
6981:
6982: /*IF g_debug THEN
6983: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
6984: 'party_relationship_id is non-updateable field. ' ||
6985: 'x_return_status = ' || x_return_status, l_debug_prefix);
6986: END IF;
6987: */
6985: 'x_return_status = ' || x_return_status, l_debug_prefix);
6986: END IF;
6987: */
6988: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6989: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_relationship_id is non-updateable field. ' ||
6990: 'x_return_status = ' || x_return_status,
6991: p_msg_level=>fnd_log.level_statement);
6992: END IF;
6993:
7018: p_column_value => p_org_contact_rec.title,
7019: x_return_status => x_return_status);
7020:
7021: -- IF g_debug THEN
7022: -- hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7023: -- 'title is lookup code in lookup type CONTACT_TITLE. ' ||
7024: -- 'x_return_status = ' || x_return_status, l_debug_prefix);
7025: --- END IF;
7026:
7024: -- 'x_return_status = ' || x_return_status, l_debug_prefix);
7025: --- END IF;
7026:
7027: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7028: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'title is lookup code in lookup type CONTACT_TITLE. ' ||
7029: 'x_return_status = ' || x_return_status,
7030: p_msg_level=>fnd_log.level_statement);
7031: END IF;
7032:
7057: p_column_value => p_org_contact_rec.job_title_code,
7058: x_return_status => x_return_status);
7059:
7060: /*IF g_debug THEN
7061: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7062: 'job_title_code is lookup code in lookup type RESPONSIBILITY. ' ||
7063: 'x_return_status = ' || x_return_status, l_debug_prefix);
7064: END IF;
7065: */
7063: 'x_return_status = ' || x_return_status, l_debug_prefix);
7064: END IF;
7065: */
7066: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7067: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7068: p_message=>'job_title_code is lookup code in lookup type RESPONSIBILITY. ' ||
7069: 'x_return_status = ' || x_return_status,
7070: p_msg_level=>fnd_log.level_statement);
7071: END IF;
7076: -------------------------------
7077: -- validate decision_maker_flag
7078: -------------------------------
7079: /****Logical APIs - validation not required****/
7080: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
7081: -- decision_maker_flag is lookup code in lookup type YES/NO
7082: validate_lookup (
7083: p_column => 'decision_maker_flag',
7084: p_lookup_type => 'YES/NO',
7085: p_column_value => p_org_contact_rec.decision_maker_flag,
7086: x_return_status => x_return_status);
7087:
7088: /*IF g_debug THEN
7089: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7090: 'decision_maker_flag should be in lookup YES/NO. ' ||
7091: 'x_return_status = ' || x_return_status, l_debug_prefix);
7092: END IF;
7093: */
7091: 'x_return_status = ' || x_return_status, l_debug_prefix);
7092: END IF;
7093: */
7094: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7095: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'decision_maker_flag should be in lookup YES/NO. ' ||
7096: 'x_return_status = ' || x_return_status,
7097: p_msg_level=>fnd_log.level_statement);
7098: END IF;
7099: END IF;
7101: ------------------------------
7102: -- validate reference_use_flag
7103: ------------------------------
7104: /****Logical APIs - validation not required****/
7105: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
7106: -- reference_use_flag is lookup code in lookup type YES/NO
7107: validate_lookup (
7108: p_column => 'reference_use_flag',
7109: p_lookup_type => 'YES/NO',
7110: p_column_value => p_org_contact_rec.reference_use_flag,
7111: x_return_status => x_return_status);
7112:
7113: /*IF g_debug THEN
7114: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7115: 'reference_use_flag should be in lookup YES/NO. ' ||
7116: 'x_return_status = ' || x_return_status, l_debug_prefix);
7117: END IF;
7118: */
7116: 'x_return_status = ' || x_return_status, l_debug_prefix);
7117: END IF;
7118: */
7119: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7120: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'reference_use_flag should be in lookup YES/NO. ' ||
7121: 'x_return_status = ' || x_return_status,
7122: p_msg_level=>fnd_log.level_statement);
7123: END IF;
7124: END IF;
7146: p_column_value => p_org_contact_rec.department_code,
7147: x_return_status => x_return_status);
7148:
7149: /*IF g_debug THEN
7150: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7151: 'department_code is lookup code in lookup type DEPARTMENT_TYPE. ' ||
7152: 'x_return_status = ' || x_return_status, l_debug_prefix);
7153: END IF;
7154: */
7152: 'x_return_status = ' || x_return_status, l_debug_prefix);
7153: END IF;
7154: */
7155: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7156: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7157: p_message=>'department_code is lookup code in lookup type DEPARTMENT_TYPE. ' ||
7158: 'x_return_status = ' || x_return_status,
7159: p_msg_level=>fnd_log.level_statement);
7160: END IF;
7187: x_return_status := fnd_api.g_ret_sts_error;
7188: END;
7189:
7190: /*IF g_debug THEN
7191: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7192: 'party_site_id is foreign key to hz_party_sites.party_site_id. ' ||
7193: 'x_return_status = ' || x_return_status, l_debug_prefix);
7194: END IF;
7195: */
7193: 'x_return_status = ' || x_return_status, l_debug_prefix);
7194: END IF;
7195: */
7196: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7197: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7198: p_message=>'party_site_id is foreign key to hz_party_sites.party_site_id. ' ||
7199: 'x_return_status = ' || x_return_status,
7200: p_msg_level=>fnd_log.level_statement);
7201: END IF;
7222: x_return_status := fnd_api.g_ret_sts_error;
7223: END;
7224:
7225: /*IF g_debug THEN
7226: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7227: 'party_id of party site should be same as the object_id of the relationship record. ' ||
7228: 'x_return_status = ' || x_return_status, l_debug_prefix);
7229: END IF;
7230: */
7228: 'x_return_status = ' || x_return_status, l_debug_prefix);
7229: END IF;
7230: */
7231: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7232: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7233: p_message=>'party_id of party site should be same as the object_id of the relationship record. ' ||
7234: 'x_return_status = ' || x_return_status,
7235: p_msg_level=>fnd_log.level_statement);
7236: END IF;
7258: p_old_application_id => l_application_id,
7259: x_return_status => x_return_status);
7260:
7261: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
7262: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_org_contact (-)',
7263: p_msg_level=>fnd_log.level_procedure);
7264: END IF;
7265:
7266: END validate_org_contact;
7323: --enable_debug;
7324:
7325: -- Debug info.
7326: /*IF g_debug THEN
7327: hz_utility_v2pub.debug ('validate_org_contact_role (+)');
7328: END IF;
7329: */
7330: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
7331: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_org_contact_role (+)',
7327: hz_utility_v2pub.debug ('validate_org_contact_role (+)');
7328: END IF;
7329: */
7330: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
7331: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_org_contact_role (+)',
7332: p_msg_level=>fnd_log.level_procedure);
7333: END IF;
7334:
7335: IF p_create_update_flag = 'U' THEN
7350: --------------------------
7351: -- validate org_contact_id
7352: --------------------------
7353: /****Logical APIs - validation not required****/
7354: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
7355: -- org_contact_id is mandatory field
7356: validate_mandatory (
7357: p_create_update_flag => p_create_update_flag,
7358: p_column => 'org_contact_id',
7359: p_column_value => p_org_contact_role_rec.org_contact_id,
7360: x_return_status => x_return_status);
7361:
7362: /*IF g_debug THEN
7363: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7364: 'org_contact_id is mandatory field. ' ||
7365: 'x_return_status = ' || x_return_status, l_debug_prefix);
7366: END IF;
7367: */
7365: 'x_return_status = ' || x_return_status, l_debug_prefix);
7366: END IF;
7367: */
7368: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7369: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'org_contact_id is mandatory field. ' ||
7370: 'x_return_status = ' || x_return_status,
7371: p_msg_level=>fnd_log.level_statement);
7372: END IF;
7373:
7379: p_old_column_value => l_org_contact_id,
7380: x_return_status => x_return_status);
7381:
7382: /*IF g_debug THEN
7383: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7384: 'org_contact_id is non-updateable field. ' ||
7385: 'x_return_status = ' || x_return_status, l_debug_prefix);
7386: END IF;
7387: */
7385: 'x_return_status = ' || x_return_status, l_debug_prefix);
7386: END IF;
7387: */
7388: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7389: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'org_contact_id is non-updateable field. ' ||
7390: 'x_return_status = ' || x_return_status,
7391: p_msg_level=>fnd_log.level_statement);
7392: END IF;
7393:
7416: x_return_status := fnd_api.g_ret_sts_error;
7417: END;
7418:
7419: /*IF g_debug THEN
7420: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7421: 'org_contact_id is foreign key of hz_org_contacts.org_contact_id. ' ||
7422: 'x_return_status = ' || x_return_status, l_debug_prefix);
7423: END IF;
7424: */
7422: 'x_return_status = ' || x_return_status, l_debug_prefix);
7423: END IF;
7424: */
7425: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7426: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7427: p_message=>'org_contact_id is foreign key of hz_org_contacts.org_contact_id. ' ||
7428: 'x_return_status = ' || x_return_status,
7429: p_msg_level=>fnd_log.level_statement);
7430: END IF;
7435: ---------------------------------
7436: -- validate orig_system_reference
7437: ---------------------------------
7438: /****Logical APIs - validation not required****/
7439: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
7440: IF (p_org_contact_role_rec.orig_system is not null
7441: and p_org_contact_role_rec.orig_system <>fnd_api.g_miss_char)
7442: and (p_org_contact_role_rec.orig_system_reference is not null
7443: and p_org_contact_role_rec.orig_system_reference <>fnd_api.g_miss_char)
7477: p_old_column_value => l_orig_system_reference,
7478: x_return_status => x_return_status);
7479:
7480: /*IF g_debug THEN
7481: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7482: 'orig_system_reference is non-updateable field. ' ||
7483: 'x_return_status = ' || x_return_status, l_debug_prefix);
7484: END IF;
7485: */
7483: 'x_return_status = ' || x_return_status, l_debug_prefix);
7484: END IF;
7485: */
7486: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7487: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7488: p_message=>'orig_system_reference is non-updateable field. ' ||
7489: 'x_return_status = ' || x_return_status,
7490: p_msg_level=>fnd_log.level_statement);
7491: END IF;
7504: p_column_value => p_org_contact_role_rec.role_type,
7505: x_return_status => x_return_status);
7506:
7507: /*IF g_debug THEN
7508: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7509: 'role_type is mandatory field. ' ||
7510: 'x_return_status = ' || x_return_status, l_debug_prefix);
7511: END IF;
7512: */
7510: 'x_return_status = ' || x_return_status, l_debug_prefix);
7511: END IF;
7512: */
7513: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7514: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'role_type is mandatory field. ' ||
7515: 'x_return_status = ' || x_return_status,
7516: p_msg_level=>fnd_log.level_statement);
7517: END IF;
7518:
7523: p_column_value => p_org_contact_role_rec.role_type,
7524: x_return_status => x_return_status);
7525:
7526: /*IF g_debug THEN
7527: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7528: 'role_type cannot be set to null during update. ' ||
7529: 'x_return_status = ' || x_return_status, l_debug_prefix);
7530: END IF;
7531: */
7529: 'x_return_status = ' || x_return_status, l_debug_prefix);
7530: END IF;
7531: */
7532: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7533: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7534: p_message=>'role_type cannot be set to null during update. ' ||
7535: 'x_return_status = ' || x_return_status,
7536: p_msg_level=>fnd_log.level_statement);
7537: END IF;
7545: p_column_value => p_org_contact_role_rec.role_type,
7546: x_return_status => x_return_status);
7547:
7548: /*IF g_debug THEN
7549: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7550: 'role_type is lookup code in lookup type CONTACT_ROLE_TYPE. ' ||
7551: 'x_return_status = ' || x_return_status, l_debug_prefix);
7552: END IF;
7553: */
7551: 'x_return_status = ' || x_return_status, l_debug_prefix);
7552: END IF;
7553: */
7554: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7555: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7556: p_message=>'role_type is lookup code in lookup type CONTACT_ROLE_TYPE. ' ||
7557: 'x_return_status = ' || x_return_status,
7558: p_msg_level=>fnd_log.level_statement);
7559: END IF;
7561: ------------------------
7562: -- validate primary_flag
7563: ------------------------
7564: /****Logical APIs - validation not required****/
7565: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
7566: -- primary_flag is lookup code in lookup type YES/NO
7567: validate_lookup (
7568: p_column => 'primary_flag',
7569: p_lookup_type => 'YES/NO',
7570: p_column_value => p_org_contact_role_rec.primary_flag,
7571: x_return_status => x_return_status);
7572:
7573: /*IF g_debug THEN
7574: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7575: 'primary_flag should be in lookup YES/NO. ' ||
7576: 'x_return_status = ' || x_return_status, l_debug_prefix);
7577: END IF;
7578: */
7576: 'x_return_status = ' || x_return_status, l_debug_prefix);
7577: END IF;
7578: */
7579: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7580: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'primary_flag should be in lookup YES/NO. ' ||
7581: 'x_return_status = ' || x_return_status,
7582: p_msg_level=>fnd_log.level_statement);
7583: END IF;
7584: END IF;
7604: NULL;
7605: END;
7606:
7607: /*IF g_debug THEN
7608: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7609: 'primary_flag can be set only for one record of org_contact_id. ' ||
7610: 'x_return_status = ' || x_return_status, l_debug_prefix);
7611: END IF;
7612: */
7610: 'x_return_status = ' || x_return_status, l_debug_prefix);
7611: END IF;
7612: */
7613: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7614: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7615: p_message=>'primary_flag can be set only for one record of org_contact_id. ' ||
7616: 'x_return_status = ' || x_return_status,
7617: p_msg_level=>fnd_log.level_statement);
7618: END IF;
7646: NULL;
7647: END;
7648:
7649: /*IF g_debug THEN
7650: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7651: 'combination of org_contact_id and role_type must be unique. ' ||
7652: 'x_return_status = ' || x_return_status, l_debug_prefix);
7653: END IF;
7654: */
7652: 'x_return_status = ' || x_return_status, l_debug_prefix);
7653: END IF;
7654: */
7655: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7656: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7657: p_message=>'combination of org_contact_id and role_type must be unique. ' ||
7658: 'x_return_status = ' || x_return_status,
7659: p_msg_level=>fnd_log.level_statement);
7660: END IF;
7670: p_column_value => p_org_contact_role_rec.primary_contact_per_role_type,
7671: x_return_status => x_return_status);
7672:
7673: /*IF g_debug THEN
7674: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7675: 'primary_contact_per_role_type should be in lookup YES/NO. ' ||
7676: 'x_return_status = ' || x_return_status, l_debug_prefix);
7677: END IF;
7678: */
7676: 'x_return_status = ' || x_return_status, l_debug_prefix);
7677: END IF;
7678: */
7679: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7680: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7681: p_message=>'primary_contact_per_role_type should be in lookup YES/NO. ' ||
7682: 'x_return_status = ' || x_return_status,
7683: p_msg_level=>fnd_log.level_statement);
7684: END IF;
7717: NULL;
7718: END;
7719:
7720: /*IF g_debug THEN
7721: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7722: 'only one org contact can be set as primary within same organization party. ' ||
7723: 'x_return_status = ' || x_return_status, l_debug_prefix);
7724: END IF;
7725: */
7723: 'x_return_status = ' || x_return_status, l_debug_prefix);
7724: END IF;
7725: */
7726: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7727: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7728: p_message=>'only one org contact can be set as primary within same organization party. ' ||
7729: 'x_return_status = ' || x_return_status,
7730: p_msg_level=>fnd_log.level_statement);
7731: END IF;
7735: ------------------
7736: -- validate status
7737: ------------------
7738: /****Logical APIs - validation not required****/
7739: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
7740: -- status is lookup code in lookup type REGISTRY_STATUS
7741: IF p_org_contact_role_rec.status IS NOT NULL
7742: AND
7743: p_org_contact_role_rec.status <> fnd_api.g_miss_char
7756: p_column_value => p_org_contact_role_rec.status,
7757: x_return_status => x_return_status);
7758:
7759: /*IF g_debug THEN
7760: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7761: 'status is lookup code in lookup type REGISTRY_STATUS. ' ||
7762: 'x_return_status = ' || x_return_status, l_debug_prefix);
7763: END IF;
7764: */
7762: 'x_return_status = ' || x_return_status, l_debug_prefix);
7763: END IF;
7764: */
7765: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7766: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7767: p_message=>'status is lookup code in lookup type REGISTRY_STATUS. ' ||
7768: 'x_return_status = ' || x_return_status,
7769: p_msg_level=>fnd_log.level_statement);
7770: END IF;
7800: p_old_application_id => l_application_id,
7801: x_return_status => x_return_status);
7802:
7803: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
7804: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_org_contact_role (-)',
7805: p_msg_level=>fnd_log.level_procedure);
7806: END IF;
7807:
7808: END validate_org_contact_role;
7874: --enable_debug;
7875:
7876: -- Debug info.
7877: /*IF g_debug THEN
7878: hz_utility_v2pub.debug ('validate_person_language (+)');
7879: END IF;
7880: */
7881: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
7882: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_person_language (+)',
7878: hz_utility_v2pub.debug ('validate_person_language (+)');
7879: END IF;
7880: */
7881: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
7882: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_person_language (+)',
7883: p_msg_level=>fnd_log.level_procedure);
7884: END IF;
7885:
7886: -- do the query to get old values for update
7905: --------------------------
7906: -- validation for party_id
7907: --------------------------
7908: /****Logical APIs - validation not required****/
7909: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
7910: -- party_id is mandatory field
7911: IF p_create_update_flag = 'C' THEN
7912: validate_mandatory (
7913: p_create_update_flag => p_create_update_flag,
7915: p_column_value => p_person_language_rec.party_id,
7916: x_return_status => x_return_status);
7917:
7918: /*IF g_debug THEN
7919: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7920: 'party_id is mandatory field. ' ||
7921: 'x_return_status = ' || x_return_status, l_debug_prefix);
7922: END IF;
7923: */
7921: 'x_return_status = ' || x_return_status, l_debug_prefix);
7922: END IF;
7923: */
7924: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7925: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id is mandatory field. ' ||
7926: 'x_return_status = ' || x_return_status,
7927: p_msg_level=>fnd_log.level_statement);
7928: END IF;
7929:
7937: p_old_column_value => l_party_id,
7938: x_return_status => x_return_status);
7939:
7940: /*IF g_debug THEN
7941: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7942: 'party_id is non-updateable field. ' ||
7943: 'x_return_status = ' || x_return_status, l_debug_prefix);
7944: END IF;
7945: */
7943: 'x_return_status = ' || x_return_status, l_debug_prefix);
7944: END IF;
7945: */
7946: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7947: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id is non-updateable field. ' ||
7948: 'x_return_status = ' || x_return_status,
7949: p_msg_level=>fnd_log.level_statement);
7950: END IF;
7951:
7974: x_return_status := fnd_api.g_ret_sts_error;
7975: END;
7976:
7977: /*IF g_debug THEN
7978: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7979: 'party_id has foreign key hz_parties.party_id. ' ||
7980: 'x_return_status = ' || x_return_status, l_debug_prefix);
7981: END IF;
7982: */
7980: 'x_return_status = ' || x_return_status, l_debug_prefix);
7981: END IF;
7982: */
7983: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7984: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id has foreign key hz_parties.party_id. ' ||
7985: 'x_return_status = ' || x_return_status,
7986: p_msg_level=>fnd_log.level_statement);
7987: END IF;
7988:
8001: p_column_value => p_person_language_rec.language_name,
8002: x_return_status => x_return_status);
8003:
8004: /*IF g_debug THEN
8005: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8006: 'language_name is mandatory field. ' ||
8007: 'x_return_status = ' || x_return_status, l_debug_prefix);
8008: END IF;
8009: */
8007: 'x_return_status = ' || x_return_status, l_debug_prefix);
8008: END IF;
8009: */
8010: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8011: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'language_name is mandatory field. ' ||
8012: 'x_return_status = ' || x_return_status,
8013: p_msg_level=>fnd_log.level_statement);
8014: END IF;
8015:
8023: p_old_column_value => l_language_name,
8024: x_return_status => x_return_status);
8025:
8026: /*IF g_debug THEN
8027: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8028: 'language_name is non-updateable field. ' ||
8029: 'x_return_status = ' || x_return_status, l_debug_prefix);
8030: END IF;
8031: */
8029: 'x_return_status = ' || x_return_status, l_debug_prefix);
8030: END IF;
8031: */
8032: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8033: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'language_name is non-updateable field. ' ||
8034: 'x_return_status = ' || x_return_status,
8035: p_msg_level=>fnd_log.level_statement);
8036: END IF;
8037:
8057: x_return_status := fnd_api.g_ret_sts_error;
8058: END;
8059:
8060: /*IF g_debug THEN
8061: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8062: 'language_name has foreign key fnd_languages.language_code. ' ||
8063: 'x_return_status = ' || x_return_status, l_debug_prefix);
8064: END IF;
8065: */
8063: 'x_return_status = ' || x_return_status, l_debug_prefix);
8064: END IF;
8065: */
8066: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8067: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8068: p_message=>'language_name has foreign key fnd_languages.language_code. ' ||
8069: 'x_return_status = ' || x_return_status,
8070: p_msg_level=>fnd_log.level_statement);
8071: END IF;
8094: ---------------------------------
8095: -- validation for native_language
8096: ---------------------------------
8097: /****Logical APIs - validation not required****/
8098: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
8099: -- native_language is lookup code in lookup type YES/NO
8100: validate_lookup (
8101: p_column => 'native_language',
8102: p_lookup_type => 'YES/NO',
8103: p_column_value => p_person_language_rec.native_language,
8104: x_return_status => x_return_status);
8105:
8106: /*IF g_debug THEN
8107: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8108: 'native_language should be in lookup YES/NO. ' ||
8109: 'x_return_status = ' || x_return_status, l_debug_prefix);
8110: END IF;
8111: */
8109: 'x_return_status = ' || x_return_status, l_debug_prefix);
8110: END IF;
8111: */
8112: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8113: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'native_language should be in lookup YES/NO. ' ||
8114: 'x_return_status = ' || x_return_status,
8115: p_msg_level=>fnd_log.level_statement);
8116: END IF;
8117: END IF;
8128: x_return_status => x_return_status);
8129:
8130:
8131: /*IF g_debug THEN
8132: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8133: 'spoken_comprehension_level should be in lookup HZ_LANGUAGE_PROFICIENCY. ' ||
8134: 'x_return_status = ' || x_return_status, l_debug_prefix);
8135: END IF;
8136: */
8134: 'x_return_status = ' || x_return_status, l_debug_prefix);
8135: END IF;
8136: */
8137: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8138: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8139: p_message=>'spoken_comprehension_level should be in lookup HZ_LANGUAGE_PROFICIENCY. ' ||
8140: 'x_return_status = ' || x_return_status,
8141: p_msg_level=>fnd_log.level_statement);
8142: END IF;
8145: --------------------------------------------
8146: -- validation for primary_language_indicator
8147: --------------------------------------------
8148: /****Logical APIs - validation not required****/
8149: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
8150: -- primary_language_indicator is lookup code in lookup type YES/NO
8151: validate_lookup (
8152: p_column => 'primary_language_indicator',
8153: p_lookup_type => 'YES/NO',
8154: p_column_value => p_person_language_rec.primary_language_indicator,
8155: x_return_status => x_return_status);
8156:
8157: /*IF g_debug THEN
8158: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8159: 'primary_language_indicator should be in lookup YES/NO. ' ||
8160: 'x_return_status = ' || x_return_status, l_debug_prefix);
8161: END IF;
8162: */
8160: 'x_return_status = ' || x_return_status, l_debug_prefix);
8161: END IF;
8162: */
8163: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8164: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8165: p_message=>'primary_language_indicator should be in lookup YES/NO. ' ||
8166: 'x_return_status = ' || x_return_status,
8167: p_msg_level=>fnd_log.level_statement);
8168: END IF;
8171: ------------------------
8172: -- validation for status
8173: ------------------------
8174: /****Logical APIs - validation not required****/
8175: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
8176: -- status is lookup code in lookup type REGISTRY_STATUS
8177: IF p_person_language_rec.status IS NOT NULL
8178: AND
8179: p_person_language_rec.status <> fnd_api.g_miss_char
8192: p_column_value => p_person_language_rec.status,
8193: x_return_status => x_return_status);
8194:
8195: /*IF g_debug THEN
8196: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8197: 'status is lookup code in lookup type REGISTRY_STATUS. ' ||
8198: 'x_return_status = ' || x_return_status, l_debug_prefix);
8199: END IF;
8200: */
8198: 'x_return_status = ' || x_return_status, l_debug_prefix);
8199: END IF;
8200: */
8201: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8202: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8203: p_message=>'status is lookup code in lookup type REGISTRY_STATUS. ' ||
8204: 'x_return_status = ' || x_return_status,
8205: p_msg_level=>fnd_log.level_statement);
8206: END IF;
8264: fnd_msg_pub.add;
8265: x_return_status := FND_API.G_RET_STS_ERROR;
8266:
8267: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8268: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8269: p_message=>'If the primary_language_indicator is set to Yes, the status column should not be Inactive.' ||
8270: 'x_return_status = ' || x_return_status,
8271: p_msg_level=>fnd_log.level_statement);
8272: END IF;
8283: fnd_msg_pub.add;
8284: x_return_status := FND_API.G_RET_STS_ERROR;
8285:
8286: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8287: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8288: p_message=>'If the primary_language_indicator is set to Yes, the status column should not be Inactive.' ||
8289: 'x_return_status = ' || x_return_status,
8290: p_msg_level=>fnd_log.level_statement);
8291: END IF;
8293: END IF;
8294: END IF; -- corresponding to IF p_create_update_flag = 'C'
8295:
8296: /*IF g_debug THEN
8297: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8298: 'If the primary_language_indicator is set to Yes, the status column should not be Inactive.' ||
8299: 'x_return_status = ' || x_return_status,
8300: l_debug_prefix
8301: );
8322: p_old_application_id => l_application_id,
8323: x_return_status => x_return_status);
8324:
8325: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8326: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_person_language (-)',
8327: p_msg_level=>fnd_log.level_procedure);
8328: END IF;
8329:
8330: END validate_person_language;
8393: --enable_debug;
8394:
8395: -- Debug info.
8396: /*IF g_debug THEN
8397: hz_utility_v2pub.debug ('validate_citizenship (+)');
8398: END IF;
8399: */
8400: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8401: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_citizenship (+)',
8397: hz_utility_v2pub.debug ('validate_citizenship (+)');
8398: END IF;
8399: */
8400: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8401: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_citizenship (+)',
8402: p_msg_level=>fnd_log.level_procedure);
8403: END IF;
8404:
8405: -- do the query to get old values for update
8423: --------------------------------------
8424: -- validate citizenship_id
8425: --------------------------------------
8426: /****Logical APIs - validation not required****/
8427: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
8428: -- If primary key value is passed, check for uniqueness.
8429: -- If primary key value is not passed, it will be generated
8430: -- from sequence by table handler.
8431:
8445: END IF;
8446: CLOSE citizen_cur;
8447:
8448: /*IF g_debug THEN
8449: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8450: 'check that citizenship_id is unique during creation. ' ||
8451: ' x_return_status = ' || x_return_status, l_debug_prefix);
8452: END IF;
8453: */
8451: ' x_return_status = ' || x_return_status, l_debug_prefix);
8452: END IF;
8453: */
8454: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8455: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8456: p_message=>'check that citizenship_id is unique during creation. ' ||
8457: ' x_return_status = ' || x_return_status,
8458: p_msg_level=>fnd_log.level_statement);
8459: END IF;
8461: END IF;
8462: END IF;
8463:
8464: /*IF g_debug THEN
8465: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8466: '(+) after validate citizenship_id ... ' ||
8467: 'x_return_status = ' || x_return_status, l_debug_prefix);
8468: END IF;
8469: */
8467: 'x_return_status = ' || x_return_status, l_debug_prefix);
8468: END IF;
8469: */
8470: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8471: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate citizenship_id ... ' ||
8472: 'x_return_status = ' || x_return_status,
8473: p_msg_level=>fnd_log.level_statement);
8474: END IF;
8475:
8482: p_old_column_value => l_citizenship_id,
8483: x_return_status => x_return_status);
8484:
8485: /*IF g_debug THEN
8486: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8487: 'citizenship_id is non-updateable field. ' ||
8488: 'x_return_status = ' || x_return_status, l_debug_prefix);
8489: END IF;
8490: */
8488: 'x_return_status = ' || x_return_status, l_debug_prefix);
8489: END IF;
8490: */
8491: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8492: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'citizenship_id is non-updateable field. ' ||
8493: 'x_return_status = ' || x_return_status,
8494: p_msg_level=>fnd_log.level_statement);
8495: END IF;
8496:
8501: --------------------------
8502: -- validation for party_id
8503: --------------------------
8504: /****Logical APIs - validation not required****/
8505: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
8506: -- party_id is mandatory field
8507: IF p_create_update_flag = 'C' THEN
8508: validate_mandatory (
8509: p_create_update_flag => p_create_update_flag,
8511: p_column_value => p_citizenship_rec.party_id,
8512: x_return_status => x_return_status);
8513:
8514: /*IF g_debug THEN
8515: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8516: 'party_id is mandatory field. ' ||
8517: 'x_return_status = ' || x_return_status, l_debug_prefix);
8518: END IF;
8519: */
8517: 'x_return_status = ' || x_return_status, l_debug_prefix);
8518: END IF;
8519: */
8520: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8521: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id is mandatory field. ' ||
8522: 'x_return_status = ' || x_return_status,
8523: p_msg_level=>fnd_log.level_statement);
8524: END IF;
8525:
8534: p_old_column_value => l_party_id,
8535: x_return_status => x_return_status);
8536:
8537: /*IF g_debug THEN
8538: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8539: 'party_id is non-updateable field. ' ||
8540: 'x_return_status = ' || x_return_status, l_debug_prefix);
8541: END IF;
8542: */
8540: 'x_return_status = ' || x_return_status, l_debug_prefix);
8541: END IF;
8542: */
8543: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8544: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id is non-updateable field. ' ||
8545: 'x_return_status = ' || x_return_status,
8546: p_msg_level=>fnd_log.level_statement);
8547: END IF;
8548:
8574: x_return_status := fnd_api.g_ret_sts_error;
8575: END;
8576:
8577: /*IF g_debug THEN
8578: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8579: 'party_id has foreign key hz_parties.party_id. ' ||
8580: 'x_return_status = ' || x_return_status, l_debug_prefix);
8581: END IF;
8582: */
8580: 'x_return_status = ' || x_return_status, l_debug_prefix);
8581: END IF;
8582: */
8583: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8584: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id has foreign key hz_parties.party_id. ' ||
8585: 'x_return_status = ' || x_return_status,
8586: p_msg_level=>fnd_log.level_statement);
8587: END IF;
8588:
8603: x_return_status => x_return_status);
8604:
8605:
8606: /*IF g_debug THEN
8607: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8608: 'birth_or_selected should be in lookup HZ_CITIZENSHIP_ACQUISITION. ' ||
8609: 'x_return_status = ' || x_return_status, l_debug_prefix);
8610: END IF;
8611: */
8609: 'x_return_status = ' || x_return_status, l_debug_prefix);
8610: END IF;
8611: */
8612: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8613: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8614: p_message=>'birth_or_selected should be in lookup HZ_CITIZENSHIP_ACQUISITION. ' ||
8615: 'x_return_status = ' || x_return_status,
8616: p_msg_level=>fnd_log.level_statement);
8617: END IF;
8630: p_column_value => p_citizenship_rec.country_code,
8631: x_return_status => x_return_status);
8632:
8633: /*IF g_debug THEN
8634: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8635: 'country_code is mandatory field. ' ||
8636: 'x_return_status = ' || x_return_status, l_debug_prefix);
8637: END IF;
8638: */
8636: 'x_return_status = ' || x_return_status, l_debug_prefix);
8637: END IF;
8638: */
8639: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8640: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8641: p_message=>'country_code is mandatory field. ' ||
8642: 'x_return_status = ' || x_return_status,
8643: p_msg_level=>fnd_log.level_statement);
8644: END IF;
8652: p_column_value => p_citizenship_rec.country_code,
8653: x_return_status => x_return_status);
8654:
8655: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
8656: hz_utility_v2pub.debug(
8657: p_prefix => l_debug_prefix,
8658: p_message => 'country_code should be in fnd_territories.territory_code. ' ||
8659: 'x_return_status = ' || x_return_status,
8660: p_msg_level => fnd_log.level_statement);
8673: ------------------------
8674: -- validation for status
8675: ------------------------
8676: /****Logical APIs - validation not required****/
8677: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
8678: -- status is lookup code in lookup type REGISTRY_STATUS
8679: IF p_citizenship_rec.status IS NOT NULL
8680: AND
8681: p_citizenship_rec.status <> fnd_api.g_miss_char
8694: p_column_value => p_citizenship_rec.status,
8695: x_return_status => x_return_status);
8696:
8697: /*IF g_debug THEN
8698: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8699: 'status is lookup code in lookup type REGISTRY_STATUS. ' ||
8700: 'x_return_status = ' || x_return_status, l_debug_prefix);
8701: END IF;
8702: */
8700: 'x_return_status = ' || x_return_status, l_debug_prefix);
8701: END IF;
8702: */
8703: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8704: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8705: p_message=>'status is lookup code in lookup type REGISTRY_STATUS. ' ||
8706: 'x_return_status = ' || x_return_status,
8707: p_msg_level=>fnd_log.level_statement);
8708: END IF;
8739: p_old_application_id => l_application_id,
8740: x_return_status => x_return_status);
8741:
8742: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8743: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_citizenship (-)',
8744: p_msg_level=>fnd_log.level_procedure);
8745: END IF;
8746:
8747: END validate_citizenship;
8825: --enable_debug;
8826:
8827: -- Debug info.
8828: /*IF g_debug THEN
8829: hz_utility_v2pub.debug ('validate_education (+)');
8830: END IF;
8831: */
8832: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8833: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_education (+)',
8829: hz_utility_v2pub.debug ('validate_education (+)');
8830: END IF;
8831: */
8832: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8833: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_education (+)',
8834: p_msg_level=>fnd_log.level_procedure);
8835: END IF;
8836:
8837:
8866: --------------------------------------
8867: -- validate education_id
8868: --------------------------------------
8869: /****Logical APIs - validation not required****/
8870: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
8871: -- If primary key value is passed, check for uniqueness.
8872: -- If primary key value is not passed, it will be generated
8873: -- from sequence by table handler.
8874:
8889: END IF;
8890: CLOSE education_cur;
8891:
8892: /*IF g_debug THEN
8893: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8894: 'check that education_id is unique during creation. ' ||
8895: ' x_return_status = ' || x_return_status, l_debug_prefix);
8896: END IF;
8897: */
8895: ' x_return_status = ' || x_return_status, l_debug_prefix);
8896: END IF;
8897: */
8898: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8899: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8900: p_message=>'check that education_id is unique during creation. ' ||
8901: ' x_return_status = ' || x_return_status,
8902: p_msg_level=>fnd_log.level_statement);
8903: END IF;
8914: p_old_column_value => l_education_id,
8915: x_return_status => x_return_status);
8916:
8917: /*IF g_debug THEN
8918: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8919: 'education_id is non-updateable field. ' ||
8920: 'x_return_status = ' || x_return_status, l_debug_prefix);
8921: END IF;
8922: */
8920: 'x_return_status = ' || x_return_status, l_debug_prefix);
8921: END IF;
8922: */
8923: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8924: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'education_id is non-updateable field. ' ||
8925: 'x_return_status = ' || x_return_status,
8926: p_msg_level=>fnd_log.level_statement);
8927: END IF;
8928:
8928:
8929: END IF;
8930:
8931: /*IF g_debug THEN
8932: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8933: '(+) after validate education_id ... ' ||
8934: 'x_return_status = ' || x_return_status, l_debug_prefix);
8935: END IF;
8936: */
8934: 'x_return_status = ' || x_return_status, l_debug_prefix);
8935: END IF;
8936: */
8937: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8938: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate education_id ... ' ||
8939: 'x_return_status = ' || x_return_status,
8940: p_msg_level=>fnd_log.level_statement);
8941: END IF;
8942: END IF;
8944: --------------------------
8945: -- validation for party_id
8946: --------------------------
8947: /****Logical APIs - validation not required****/
8948: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
8949: -- party_id is mandatory field
8950: IF p_create_update_flag = 'C' THEN
8951: validate_mandatory (
8952: p_create_update_flag => p_create_update_flag,
8954: p_column_value => p_education_rec.party_id,
8955: x_return_status => x_return_status);
8956:
8957: /*IF g_debug THEN
8958: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8959: 'party_id is mandatory field. ' ||
8960: 'x_return_status = ' || x_return_status, l_debug_prefix);
8961: END IF;
8962: */
8960: 'x_return_status = ' || x_return_status, l_debug_prefix);
8961: END IF;
8962: */
8963: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8964: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id is mandatory field. ' ||
8965: 'x_return_status = ' || x_return_status,
8966: p_msg_level=>fnd_log.level_statement);
8967: END IF;
8968:
8977: p_old_column_value => l_party_id,
8978: x_return_status => x_return_status);
8979:
8980: /*IF g_debug THEN
8981: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8982: 'party_id is non-updateable field. ' ||
8983: 'x_return_status = ' || x_return_status, l_debug_prefix);
8984: END IF;
8985: */
8983: 'x_return_status = ' || x_return_status, l_debug_prefix);
8984: END IF;
8985: */
8986: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8987: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id is non-updateable field. ' ||
8988: 'x_return_status = ' || x_return_status,
8989: p_msg_level=>fnd_log.level_statement);
8990: END IF;
8991:
9016: x_return_status := fnd_api.g_ret_sts_error;
9017: END;
9018:
9019: /*IF g_debug THEN
9020: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9021: 'party_id has foreign key hz_parties.party_id. ' ||
9022: 'x_return_status = ' || x_return_status, l_debug_prefix);
9023: END IF;
9024: */
9022: 'x_return_status = ' || x_return_status, l_debug_prefix);
9023: END IF;
9024: */
9025: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9026: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id has foreign key hz_parties.party_id. ' ||
9027: 'x_return_status = ' || x_return_status,
9028: p_msg_level=>fnd_log.level_statement);
9029: END IF;
9030:
9081: x_return_status => x_return_status
9082: );
9083:
9084: /*IF g_debug THEN
9085: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9086: 'check whether last_date_attended is greater then or equal to start_date_attended. ' ||
9087: 'x_return_status = ' || x_return_status, l_debug_prefix);
9088: END IF;
9089: */
9087: 'x_return_status = ' || x_return_status, l_debug_prefix);
9088: END IF;
9089: */
9090: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9091: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9092: p_message=>'check whether last_date_attended is greater then or equal to start_date_attended. ' ||
9093: 'x_return_status = ' || x_return_status,
9094: p_msg_level=>fnd_log.level_statement);
9095: END IF;
9096:
9097: END IF;
9098:
9099: /*IF g_debug THEN
9100: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9101: '(+) after validating the last_date_attended and start_date_attended... ' ||
9102: 'x_return_status = ' || x_return_status, l_debug_prefix);
9103: END IF;
9104: */
9102: 'x_return_status = ' || x_return_status, l_debug_prefix);
9103: END IF;
9104: */
9105: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9106: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9107: p_message=>'(+) after validating the last_date_attended and start_date_attended... ' ||
9108: 'x_return_status = ' || x_return_status,
9109: p_msg_level=>fnd_log.level_statement);
9110: END IF;
9151: x_return_status := fnd_api.g_ret_sts_error;
9152: END IF;
9153:
9154: /*IF g_debug THEN
9155: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9156: 'check that school_attended_name is empty when school_party_id isn t. '||
9157: ' x_return_status = ' || x_return_status, l_debug_prefix);
9158: END IF;
9159: */
9157: ' x_return_status = ' || x_return_status, l_debug_prefix);
9158: END IF;
9159: */
9160: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9161: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9162: p_message=>'check that school_attended_name is empty when school_party_id isn t. '||
9163: ' x_return_status = ' || x_return_status,
9164: p_msg_level=>fnd_log.level_statement);
9165: END IF;
9191: x_return_status := fnd_api.g_ret_sts_error;
9192: END;
9193:
9194: /*IF g_debug THEN
9195: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9196: 'school_party_id should be in hz_parties.party_id. ' ||
9197: 'x_return_status = ' || x_return_status, l_debug_prefix);
9198: END IF;
9199: */
9197: 'x_return_status = ' || x_return_status, l_debug_prefix);
9198: END IF;
9199: */
9200: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9201: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9202: p_message=>'school_party_id should be in hz_parties.party_id. ' ||
9203: 'x_return_status = ' || x_return_status,
9204: p_msg_level=>fnd_log.level_statement);
9205: END IF;
9238: x_return_status => x_return_status);
9239:
9240:
9241: /*IF g_debug THEN
9242: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9243: 'type_of_school should be in lookup HZ_TYPE_OF_SCHOOL. ' ||
9244: 'x_return_status = ' || x_return_status, l_debug_prefix);
9245: END IF;
9246: */
9244: 'x_return_status = ' || x_return_status, l_debug_prefix);
9245: END IF;
9246: */
9247: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9248: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9249: p_message=>'type_of_school should be in lookup HZ_TYPE_OF_SCHOOL. ' ||
9250: 'x_return_status = ' || x_return_status,
9251: p_msg_level=>fnd_log.level_statement);
9252: END IF;
9256: ------------------------
9257: -- validation for status
9258: ------------------------
9259: /****Logical APIs - validation not required****/
9260: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
9261: -- status is lookup code in lookup type REGISTRY_STATUS
9262: IF p_education_rec.status IS NOT NULL
9263: AND
9264: p_education_rec.status <> fnd_api.g_miss_char
9277: p_column_value => p_education_rec.status,
9278: x_return_status => x_return_status);
9279:
9280: /*IF g_debug THEN
9281: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9282: 'status is lookup code in lookup type REGISTRY_STATUS. ' ||
9283: 'x_return_status = ' || x_return_status, l_debug_prefix);
9284: END IF;
9285: */
9283: 'x_return_status = ' || x_return_status, l_debug_prefix);
9284: END IF;
9285: */
9286: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9287: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9288: p_message=>'status is lookup code in lookup type REGISTRY_STATUS. ' ||
9289: 'x_return_status = ' || x_return_status,
9290: p_msg_level=>fnd_log.level_statement);
9291: END IF;
9323: p_old_application_id => l_application_id,
9324: x_return_status => x_return_status);
9325:
9326: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
9327: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_education (-)',
9328: p_msg_level=>fnd_log.level_procedure);
9329: END IF;
9330:
9331: END validate_education;
9409: --enable_debug;
9410:
9411: -- Debug info.
9412: /*IF g_debug THEN
9413: hz_utility_v2pub.debug ('validate_employment_history (+)');
9414: END IF;
9415: */
9416: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
9417: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_employment_history (+)',
9413: hz_utility_v2pub.debug ('validate_employment_history (+)');
9414: END IF;
9415: */
9416: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
9417: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_employment_history (+)',
9418: p_msg_level=>fnd_log.level_procedure);
9419: END IF;
9420:
9421: -- do the query to get old values for update
9453: --------------------------------------
9454: -- validate employment_history_id
9455: --------------------------------------
9456: /****Logical APIs - validation not required****/
9457: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
9458: -- If primary key value is passed, check for uniqueness.
9459: -- If primary key value is not passed, it will be generated
9460: -- from sequence by table handler.
9461:
9476: END IF;
9477: CLOSE employment_history_cur;
9478:
9479: /*IF g_debug THEN
9480: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9481: 'check that employment_history_id is unique during creation. ' ||
9482: ' x_return_status = ' || x_return_status, l_debug_prefix);
9483: END IF;
9484: */
9482: ' x_return_status = ' || x_return_status, l_debug_prefix);
9483: END IF;
9484: */
9485: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9486: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9487: p_message=>'check that employment_history_id is unique during creation. ' ||
9488: ' x_return_status = ' || x_return_status,
9489: p_msg_level=>fnd_log.level_statement);
9490: END IF;
9501: p_old_column_value => l_employment_history_id,
9502: x_return_status => x_return_status);
9503:
9504: /*IF g_debug THEN
9505: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9506: 'employment_history_id is non-updateable field. ' ||
9507: 'x_return_status = ' || x_return_status, l_debug_prefix);
9508: END IF;
9509: */
9507: 'x_return_status = ' || x_return_status, l_debug_prefix);
9508: END IF;
9509: */
9510: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9511: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9512: p_message=>'employment_history_id is non-updateable field. ' ||
9513: 'x_return_status = ' || x_return_status,
9514: p_msg_level=>fnd_log.level_statement);
9515: END IF;
9516:
9517: END IF;
9518:
9519: /*IF g_debug THEN
9520: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9521: '(+) after validation of employment_history_id ... ' ||
9522: 'x_return_status = ' || x_return_status, l_debug_prefix);
9523: END IF;
9524: */
9522: 'x_return_status = ' || x_return_status, l_debug_prefix);
9523: END IF;
9524: */
9525: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9526: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9527: p_message=>'(+) after validation of employment_history_id ... ' ||
9528: 'x_return_status = ' || x_return_status,
9529: p_msg_level=>fnd_log.level_statement);
9530: END IF;
9533: --------------------------
9534: -- validation for party_id
9535: --------------------------
9536: /****Logical APIs - validation not required****/
9537: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
9538: -- party_id is mandatory field
9539: IF p_create_update_flag = 'C' THEN
9540: validate_mandatory (
9541: p_create_update_flag => p_create_update_flag,
9543: p_column_value => p_employment_history_rec.party_id,
9544: x_return_status => x_return_status);
9545:
9546: /*IF g_debug THEN
9547: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9548: 'party_id is mandatory field. ' ||
9549: 'x_return_status = ' || x_return_status, l_debug_prefix);
9550: END IF;
9551: */
9549: 'x_return_status = ' || x_return_status, l_debug_prefix);
9550: END IF;
9551: */
9552: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9553: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id is mandatory field. ' ||
9554: 'x_return_status = ' || x_return_status,
9555: p_msg_level=>fnd_log.level_statement);
9556: END IF;
9557:
9566: p_old_column_value => l_party_id,
9567: x_return_status => x_return_status);
9568:
9569: /*IF g_debug THEN
9570: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9571: 'party_id is non-updateable field. ' ||
9572: 'x_return_status = ' || x_return_status, l_debug_prefix);
9573: END IF;
9574: */
9572: 'x_return_status = ' || x_return_status, l_debug_prefix);
9573: END IF;
9574: */
9575: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9576: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id is non-updateable field. ' ||
9577: 'x_return_status = ' || x_return_status,
9578: p_msg_level=>fnd_log.level_statement);
9579: END IF;
9580:
9604: x_return_status := fnd_api.g_ret_sts_error;
9605: END;
9606:
9607: /*IF g_debug THEN
9608: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9609: 'party_id has foreign key hz_parties.party_id. ' ||
9610: 'x_return_status = ' || x_return_status, l_debug_prefix);
9611: END IF;
9612: */
9610: 'x_return_status = ' || x_return_status, l_debug_prefix);
9611: END IF;
9612: */
9613: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9614: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id has foreign key hz_parties.party_id. ' ||
9615: 'x_return_status = ' || x_return_status,
9616: p_msg_level=>fnd_log.level_statement);
9617: END IF;
9618:
9668: x_return_status => x_return_status
9669: );
9670:
9671: /*IF g_debug THEN
9672: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9673: 'check whether end_date is greater than or equal to begin_date. ' ||
9674: 'x_return_status = ' || x_return_status, l_debug_prefix);
9675: END IF;
9676: */
9674: 'x_return_status = ' || x_return_status, l_debug_prefix);
9675: END IF;
9676: */
9677: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9678: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9679: p_message=>'check whether end_date is greater than or equal to begin_date. ' ||
9680: 'x_return_status = ' || x_return_status,
9681: p_msg_level=>fnd_log.level_statement);
9682: END IF;
9683:
9684: END IF;
9685:
9686: /*IF g_debug THEN
9687: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9688: '(+) after validating the begin_date and end_date... ' ||
9689: 'x_return_status = ' || x_return_status, l_debug_prefix);
9690: END IF;
9691: */
9689: 'x_return_status = ' || x_return_status, l_debug_prefix);
9690: END IF;
9691: */
9692: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9693: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9694: p_message=>'(+) after validating the begin_date and end_date... ' ||
9695: 'x_return_status = ' || x_return_status,
9696: p_msg_level=>fnd_log.level_statement);
9697: END IF;
9710: x_return_status => x_return_status);
9711:
9712:
9713: /*IF g_debug THEN
9714: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9715: 'employment_type_code should be in lookup HZ_EMPLOYMENT_TYPE. ' ||
9716: 'x_return_status = ' || x_return_status, l_debug_prefix);
9717: END IF;
9718: */
9716: 'x_return_status = ' || x_return_status, l_debug_prefix);
9717: END IF;
9718: */
9719: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9720: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9721: p_message=>'employment_type_code should be in lookup HZ_EMPLOYMENT_TYPE. ' ||
9722: 'x_return_status = ' || x_return_status,
9723: p_msg_level=>fnd_log.level_statement);
9724: END IF;
9737: x_return_status => x_return_status);
9738:
9739:
9740: /*IF g_debug THEN
9741: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9742: 'employed_as_title_code should be in lookup RESPONSIBILITY. ' ||
9743: 'x_return_status = ' || x_return_status, l_debug_prefix);
9744: END IF;
9745: */
9743: 'x_return_status = ' || x_return_status, l_debug_prefix);
9744: END IF;
9745: */
9746: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9747: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9748: p_message=>'employed_as_title_code should be in lookup RESPONSIBILITY. ' ||
9749: 'x_return_status = ' || x_return_status,
9750: p_msg_level=>fnd_log.level_statement);
9751: END IF;
9792: fnd_msg_pub.add;
9793: x_return_status := fnd_api.g_ret_sts_error;
9794:
9795: /*IF g_debug THEN
9796: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9797: 'check that employed_as_title is empty when employed_as_title_code isn t. '||
9798: ' x_return_status = ' || x_return_status, l_debug_prefix);
9799: END IF;
9800: */
9798: ' x_return_status = ' || x_return_status, l_debug_prefix);
9799: END IF;
9800: */
9801: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9802: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9803: p_message=>'check that employed_as_title is empty when employed_as_title_code isn t. '||
9804: ' x_return_status = ' || x_return_status,
9805: p_msg_level=>fnd_log.level_statement);
9806: END IF;
9808: END IF;
9809:
9810:
9811: /*IF g_debug THEN
9812: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9813: '(+) after validating employed_as_title ... ' ||
9814: 'x_return_status = ' || x_return_status, l_debug_prefix);
9815: END IF;
9816: */
9814: 'x_return_status = ' || x_return_status, l_debug_prefix);
9815: END IF;
9816: */
9817: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9818: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9819: p_message=>'(+) after validating employed_as_title ... ' ||
9820: 'x_return_status = ' || x_return_status,
9821: p_msg_level=>fnd_log.level_statement);
9822: END IF;
9849: x_return_status := fnd_api.g_ret_sts_error;
9850: END;
9851:
9852: /*IF g_debug THEN
9853: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9854: 'employed_by_party_id should be in hz_parties.party_id. ' ||
9855: 'x_return_status = ' || x_return_status, l_debug_prefix);
9856: END IF;
9857: */
9855: 'x_return_status = ' || x_return_status, l_debug_prefix);
9856: END IF;
9857: */
9858: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9859: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9860: p_message=>'employed_by_party_id should be in hz_parties.party_id. ' ||
9861: 'x_return_status = ' || x_return_status,
9862: p_msg_level=>fnd_log.level_statement);
9863: END IF;
9905: fnd_msg_pub.add;
9906: x_return_status := fnd_api.g_ret_sts_error;
9907:
9908: /*IF g_debug THEN
9909: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9910: 'check that employed_by_name_company is empty when employed_by_party_id isn t. ' ||
9911: ' x_return_status = ' || x_return_status, l_debug_prefix);
9912: END IF;
9913: */
9911: ' x_return_status = ' || x_return_status, l_debug_prefix);
9912: END IF;
9913: */
9914: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9915: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9916: p_message=>'check that employed_by_name_company is empty when employed_by_party_id isn t. ' ||
9917: ' x_return_status = ' || x_return_status,
9918: p_msg_level=>fnd_log.level_statement);
9919: END IF;
9921: END IF;
9922:
9923:
9924: /*IF g_debug THEN
9925: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9926: '(+) after validating employed_by_name_company ... ' ||
9927: 'x_return_status = ' || x_return_status, l_debug_prefix);
9928: END IF;
9929: */
9927: 'x_return_status = ' || x_return_status, l_debug_prefix);
9928: END IF;
9929: */
9930: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9931: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9932: p_message=>'(+) after validating employed_by_name_company ... ' ||
9933: 'x_return_status = ' || x_return_status,
9934: p_msg_level=>fnd_log.level_statement);
9935: END IF;
9960: x_return_status := fnd_api.g_ret_sts_error;
9961: END IF;
9962:
9963: /*IF g_debug THEN
9964: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9965: 'check that weekly_work_hours is 1 to 168 value range. ' ||
9966: ' x_return_status = ' || x_return_status, l_debug_prefix);
9967: END IF;
9968: */
9966: ' x_return_status = ' || x_return_status, l_debug_prefix);
9967: END IF;
9968: */
9969: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9970: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9971: p_message=>'check that weekly_work_hours is 1 to 168 value range. ' ||
9972: ' x_return_status = ' || x_return_status,
9973: p_msg_level=>fnd_log.level_statement);
9974: END IF;
9976: END IF;
9977:
9978:
9979: /*IF g_debug THEN
9980: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9981: '(+) after validating weekly_work_hours ... ' ||
9982: 'x_return_status = ' || x_return_status, l_debug_prefix);
9983: END IF;
9984: */
9982: 'x_return_status = ' || x_return_status, l_debug_prefix);
9983: END IF;
9984: */
9985: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9986: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9987: p_message=>'(+) after validating weekly_work_hours ... ' ||
9988: 'x_return_status = ' || x_return_status,
9989: p_msg_level=>fnd_log.level_statement);
9990: END IF;
10003: p_column_value => p_employment_history_rec.faculty_position_flag,
10004: x_return_status => x_return_status);
10005:
10006: /*IF g_debug THEN
10007: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10008: 'faculty_position_flag is mandatory field. ' ||
10009: 'x_return_status = ' || x_return_status, l_debug_prefix);
10010: END IF;
10011: */
10009: 'x_return_status = ' || x_return_status, l_debug_prefix);
10010: END IF;
10011: */
10012: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10013: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'faculty_position_flag is mandatory field. ' ||
10014: 'x_return_status = ' || x_return_status,
10015: p_msg_level=>fnd_log.level_statement);
10016: END IF;
10017:
10025: x_return_status => x_return_status);
10026:
10027:
10028: /*IF g_debug THEN
10029: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10030: 'faculty_position_flag should be in lookup YES/NO. ' ||
10031: 'x_return_status = ' || x_return_status, l_debug_prefix);
10032: END IF;
10033: */
10031: 'x_return_status = ' || x_return_status, l_debug_prefix);
10032: END IF;
10033: */
10034: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10035: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'faculty_position_flag should be in lookup YES/NO. ' ||
10036: 'x_return_status = ' || x_return_status,
10037: p_msg_level=>fnd_log.level_statement);
10038: END IF;
10039:
10069: x_return_status => x_return_status);
10070:
10071:
10072: /*IF g_debug THEN
10073: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10074: 'tenure_code should be in lookup HZ_TENURE_CODE. ' ||
10075: ' x_return_status = ' || x_return_status, l_debug_prefix);
10076: END IF;
10077: */
10075: ' x_return_status = ' || x_return_status, l_debug_prefix);
10076: END IF;
10077: */
10078: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10079: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10080: p_message=>'tenure_code should be in lookup HZ_TENURE_CODE. ' ||
10081: ' x_return_status = ' || x_return_status,
10082: p_msg_level=>fnd_log.level_statement);
10083: END IF;
10093:
10094: END IF;
10095:
10096: /*IF g_debug THEN
10097: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10098: '(+) after validating tenure_code ... ' ||
10099: 'x_return_status = ' || x_return_status, l_debug_prefix);
10100: END IF;
10101: */
10099: 'x_return_status = ' || x_return_status, l_debug_prefix);
10100: END IF;
10101: */
10102: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10103: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validating tenure_code ... ' ||
10104: 'x_return_status = ' || x_return_status,
10105: p_msg_level=>fnd_log.level_statement);
10106: END IF;
10107:
10128: x_return_status := fnd_api.g_ret_sts_error;
10129: END IF;
10130:
10131: /*IF g_debug THEN
10132: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10133: 'check that fraction_of_tenure is 0 to 100 value range. ' ||
10134: ' x_return_status = ' || x_return_status, l_debug_prefix);
10135: END IF;
10136: */
10134: ' x_return_status = ' || x_return_status, l_debug_prefix);
10135: END IF;
10136: */
10137: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10138: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10139: p_message=>'check that fraction_of_tenure is 0 to 100 value range. ' ||
10140: ' x_return_status = ' || x_return_status,
10141: p_msg_level=>fnd_log.level_statement);
10142: END IF;
10155:
10156: END IF;
10157:
10158: /*IF g_debug THEN
10159: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10160: '(+) after validating fraction_of_tenure ... ' ||
10161: 'x_return_status = ' || x_return_status, l_debug_prefix);
10162: END IF;
10163: */
10161: 'x_return_status = ' || x_return_status, l_debug_prefix);
10162: END IF;
10163: */
10164: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10165: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validating fraction_of_tenure ... ' ||
10166: 'x_return_status = ' || x_return_status,
10167: p_msg_level=>fnd_log.level_statement);
10168: END IF;
10169:
10172: ------------------------
10173: -- validation for status
10174: ------------------------
10175: /****Logical APIs - validation not required****/
10176: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
10177: -- status is lookup code in lookup type REGISTRY_STATUS
10178: IF p_employment_history_rec.status IS NOT NULL
10179: AND
10180: p_employment_history_rec.status <> fnd_api.g_miss_char
10193: p_column_value => p_employment_history_rec.status,
10194: x_return_status => x_return_status);
10195:
10196: /*IF g_debug THEN
10197: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10198: 'status is lookup code in lookup type REGISTRY_STATUS. ' ||
10199: 'x_return_status = ' || x_return_status, l_debug_prefix);
10200: END IF;
10201: */
10199: 'x_return_status = ' || x_return_status, l_debug_prefix);
10200: END IF;
10201: */
10202: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10203: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10204: p_message=>'status is lookup code in lookup type REGISTRY_STATUS. ' ||
10205: 'x_return_status = ' || x_return_status,
10206: p_msg_level=>fnd_log.level_statement);
10207: END IF;
10239: p_old_application_id => l_application_id,
10240: x_return_status => x_return_status);
10241:
10242: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
10243: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_employment_history (-)',
10244: p_msg_level=>fnd_log.level_procedure);
10245: END IF;
10246:
10247: END validate_employment_history;
10306: --enable_debug;
10307:
10308: -- Debug info.
10309: /*IF g_debug THEN
10310: hz_utility_v2pub.debug ('validate_work_class (+)');
10311: END IF;
10312: */
10313: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
10314: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_work_class (+)',
10310: hz_utility_v2pub.debug ('validate_work_class (+)');
10311: END IF;
10312: */
10313: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
10314: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_work_class (+)',
10315: p_msg_level=>fnd_log.level_procedure);
10316: END IF;
10317:
10318: -- do the query to get old values for update
10336: --------------------------------------
10337: -- validate work_class_id
10338: --------------------------------------
10339: /****Logical APIs - validation not required****/
10340: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
10341: -- If primary key value is passed, check for uniqueness.
10342: -- If primary key value is not passed, it will be generated
10343: -- from sequence by table handler.
10344:
10359: END IF;
10360: CLOSE work_class_cur;
10361:
10362: /*IF g_debug THEN
10363: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10364: 'check that work_class_id is unique during creation. ' ||
10365: ' x_return_status = ' || x_return_status, l_debug_prefix);
10366: END IF;
10367: */
10365: ' x_return_status = ' || x_return_status, l_debug_prefix);
10366: END IF;
10367: */
10368: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10369: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10370: p_message=>'check that work_class_id is unique during creation. ' ||
10371: ' x_return_status = ' || x_return_status,
10372: p_msg_level=>fnd_log.level_statement);
10373: END IF;
10384: p_old_column_value => l_work_class_id,
10385: x_return_status => x_return_status);
10386:
10387: /*IF g_debug THEN
10388: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10389: 'work_class_id is non-updateable field. ' ||
10390: 'x_return_status = ' || x_return_status, l_debug_prefix);
10391: END IF;
10392: */
10390: 'x_return_status = ' || x_return_status, l_debug_prefix);
10391: END IF;
10392: */
10393: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10394: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'work_class_id is non-updateable field. ' ||
10395: 'x_return_status = ' || x_return_status,
10396: p_msg_level=>fnd_log.level_statement);
10397: END IF;
10398:
10398:
10399: END IF;
10400:
10401: /*IF g_debug THEN
10402: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10403: '(+) after validation of work_class_id ... ' ||
10404: 'x_return_status = ' || x_return_status, l_debug_prefix);
10405: END IF;
10406: */
10404: 'x_return_status = ' || x_return_status, l_debug_prefix);
10405: END IF;
10406: */
10407: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10408: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validation of work_class_id ... ' ||
10409: 'x_return_status = ' || x_return_status,
10410: p_msg_level=>fnd_log.level_statement);
10411: END IF;
10412: END IF;
10414: ---------------------------------------
10415: -- validation for employment_history_id
10416: ---------------------------------------
10417: /****Logical APIs - validation not required****/
10418: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
10419: -- employment_history_id is mandatory field
10420: IF p_create_update_flag = 'C' THEN
10421: validate_mandatory (
10422: p_create_update_flag => p_create_update_flag,
10424: p_column_value => p_work_class_rec.employment_history_id,
10425: x_return_status => x_return_status);
10426:
10427: /*IF g_debug THEN
10428: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10429: 'employment_history_id is mandatory field. ' ||
10430: 'x_return_status = ' || x_return_status, l_debug_prefix);
10431: END IF;
10432: */
10430: 'x_return_status = ' || x_return_status, l_debug_prefix);
10431: END IF;
10432: */
10433: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10434: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'employment_history_id is mandatory field. ' ||
10435: 'x_return_status = ' || x_return_status,
10436: p_msg_level=>fnd_log.level_statement);
10437: END IF;
10438:
10447: p_old_column_value => l_employment_history_id,
10448: x_return_status => x_return_status);
10449:
10450: /*IF g_debug THEN
10451: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10452: 'employment_history_id is non-updateable field. ' ||
10453: 'x_return_status = ' || x_return_status, l_debug_prefix);
10454: END IF;
10455: */
10453: 'x_return_status = ' || x_return_status, l_debug_prefix);
10454: END IF;
10455: */
10456: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10457: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'employment_history_id is non-updateable field. ' ||
10458: 'x_return_status = ' || x_return_status,
10459: p_msg_level=>fnd_log.level_statement);
10460: END IF;
10461:
10485: x_return_status := fnd_api.g_ret_sts_error;
10486: END;
10487:
10488: /*IF g_debug THEN
10489: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10490: 'employment_history_id has foreign key hz_employment_history.employment_history_id. ' ||
10491: 'x_return_status = ' || x_return_status, l_debug_prefix);
10492: END IF;
10493: */
10491: 'x_return_status = ' || x_return_status, l_debug_prefix);
10492: END IF;
10493: */
10494: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10495: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10496: p_message=>'employment_history_id has foreign key hz_employment_history.employment_history_id. ' ||
10497: 'x_return_status = ' || x_return_status,
10498: p_msg_level=>fnd_log.level_statement);
10499: END IF;
10514: p_column_value => p_work_class_rec.work_class_name,
10515: x_return_status => x_return_status);
10516:
10517: /*IF g_debug THEN
10518: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10519: 'work_class_name is mandatory field. ' ||
10520: 'x_return_status = ' || x_return_status, l_debug_prefix);
10521: END IF;
10522: */
10520: 'x_return_status = ' || x_return_status, l_debug_prefix);
10521: END IF;
10522: */
10523: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10524: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'work_class_name is mandatory field. ' ||
10525: 'x_return_status = ' || x_return_status,
10526: p_msg_level=>fnd_log.level_statement);
10527: END IF;
10528:
10530: ------------------------
10531: -- validation for status
10532: ------------------------
10533: /****Logical APIs - validation not required****/
10534: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
10535: -- status is lookup code in lookup type REGISTRY_STATUS
10536: IF p_work_class_rec.status IS NOT NULL
10537: AND
10538: p_work_class_rec.status <> fnd_api.g_miss_char
10551: p_column_value => p_work_class_rec.status,
10552: x_return_status => x_return_status);
10553:
10554: /*IF g_debug THEN
10555: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10556: 'status is lookup code in lookup type REGISTRY_STATUS. ' ||
10557: 'x_return_status = ' || x_return_status, l_debug_prefix);
10558: END IF;
10559: */
10557: 'x_return_status = ' || x_return_status, l_debug_prefix);
10558: END IF;
10559: */
10560: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10561: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10562: p_message=>'status is lookup code in lookup type REGISTRY_STATUS. ' ||
10563: 'x_return_status = ' || x_return_status,
10564: p_msg_level=>fnd_log.level_statement);
10565: END IF;
10597: p_old_application_id => l_application_id,
10598: x_return_status => x_return_status);
10599:
10600: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
10601: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_work_class (-)',
10602: p_msg_level=>fnd_log.level_procedure);
10603: END IF;
10604:
10605: END validate_work_class;
10667: --enable_debug;
10668:
10669: -- Debug info.
10670: /*IF g_debug THEN
10671: hz_utility_v2pub.debug ('validate_person_interest (+)');
10672: END IF;
10673: */
10674: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
10675: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_person_interest (+)',
10671: hz_utility_v2pub.debug ('validate_person_interest (+)');
10672: END IF;
10673: */
10674: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
10675: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_person_interest (+)',
10676: p_msg_level=>fnd_log.level_procedure);
10677: END IF;
10678:
10679:
10698: --------------------------------------
10699: -- validate person_interest_id
10700: --------------------------------------
10701: /****Logical APIs - validation not required****/
10702: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
10703: -- If primary key value is passed, check for uniqueness.
10704: -- If primary key value is not passed, it will be generated
10705: -- from sequence by table handler.
10706:
10721: END IF;
10722: CLOSE person_interest_cur;
10723:
10724: /*IF g_debug THEN
10725: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10726: 'check that person_interest_id is unique during creation. ' ||
10727: ' x_return_status = ' || x_return_status, l_debug_prefix);
10728: END IF;
10729: */
10727: ' x_return_status = ' || x_return_status, l_debug_prefix);
10728: END IF;
10729: */
10730: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10731: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10732: p_message=>'check that person_interest_id is unique during creation. ' ||
10733: ' x_return_status = ' || x_return_status,
10734: p_msg_level=>fnd_log.level_statement);
10735: END IF;
10746: p_old_column_value => l_person_interest_id,
10747: x_return_status => x_return_status);
10748:
10749: /*IF g_debug THEN
10750: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10751: 'person_interest_id is non-updateable field. ' ||
10752: 'x_return_status = ' || x_return_status, l_debug_prefix);
10753: END IF;
10754: */
10752: 'x_return_status = ' || x_return_status, l_debug_prefix);
10753: END IF;
10754: */
10755: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10756: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'person_interest_id is non-updateable field. ' ||
10757: 'x_return_status = ' || x_return_status,
10758: p_msg_level=>fnd_log.level_statement);
10759: END IF;
10760:
10760:
10761: END IF;
10762:
10763: /*IF g_debug THEN
10764: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10765: '(+) after validation of person_interest_id ... ' ||
10766: 'x_return_status = ' || x_return_status, l_debug_prefix);
10767: END IF;
10768: */
10766: 'x_return_status = ' || x_return_status, l_debug_prefix);
10767: END IF;
10768: */
10769: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10770: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validation of person_interest_id ... ' ||
10771: 'x_return_status = ' || x_return_status,
10772: p_msg_level=>fnd_log.level_statement);
10773: END IF;
10774: END IF;
10776: --------------------------
10777: -- validation for party_id
10778: --------------------------
10779: /****Logical APIs - validation not required****/
10780: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
10781: -- party_id is mandatory field
10782: IF p_create_update_flag = 'C' THEN
10783: validate_mandatory (
10784: p_create_update_flag => p_create_update_flag,
10786: p_column_value => p_person_interest_rec.party_id,
10787: x_return_status => x_return_status);
10788:
10789: /*IF g_debug THEN
10790: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10791: 'party_id is mandatory field. ' ||
10792: 'x_return_status = ' || x_return_status, l_debug_prefix);
10793: END IF;
10794: */
10792: 'x_return_status = ' || x_return_status, l_debug_prefix);
10793: END IF;
10794: */
10795: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10796: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id is mandatory field. ' ||
10797: 'x_return_status = ' || x_return_status,
10798: p_msg_level=>fnd_log.level_statement);
10799: END IF;
10800:
10809: p_old_column_value => l_party_id,
10810: x_return_status => x_return_status);
10811:
10812: /*IF g_debug THEN
10813: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10814: 'party_id is non-updateable field. ' ||
10815: 'x_return_status = ' || x_return_status, l_debug_prefix);
10816: END IF;
10817: */
10815: 'x_return_status = ' || x_return_status, l_debug_prefix);
10816: END IF;
10817: */
10818: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10819: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id is non-updateable field. ' ||
10820: 'x_return_status = ' || x_return_status,
10821: p_msg_level=>fnd_log.level_statement);
10822: END IF;
10823:
10852: x_return_status := fnd_api.g_ret_sts_error;
10853: END;
10854:
10855: /*IF g_debug THEN
10856: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10857: 'party_id has foreign key hz_parties.party_id. ' ||
10858: 'x_return_status = ' || x_return_status, l_debug_prefix);
10859: END IF;
10860: */
10858: 'x_return_status = ' || x_return_status, l_debug_prefix);
10859: END IF;
10860: */
10861: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10862: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id has foreign key hz_parties.party_id. ' ||
10863: 'x_return_status = ' || x_return_status,
10864: p_msg_level=>fnd_log.level_statement);
10865: END IF;
10866:
10871: ---------------------------------
10872: -- validation for sport_indicator
10873: ---------------------------------
10874: /****Logical APIs - validation not required****/
10875: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
10876: -- sport_indicator is mandatory field
10877:
10878:
10879: -- sport_indicator is validated against lookup type YES/NO
10884: x_return_status => x_return_status);
10885:
10886:
10887: /*IF g_debug THEN
10888: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10889: 'sport_indicator should be in lookup YES/NO. ' ||
10890: 'x_return_status = ' || x_return_status, l_debug_prefix);
10891: END IF;
10892: */
10890: 'x_return_status = ' || x_return_status, l_debug_prefix);
10891: END IF;
10892: */
10893: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10894: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'sport_indicator should be in lookup YES/NO. ' ||
10895: 'x_return_status = ' || x_return_status,
10896: p_msg_level=>fnd_log.level_statement);
10897: END IF;
10898: END IF;
10909: p_column_value => p_person_interest_rec.interest_name,
10910: x_return_status => x_return_status);
10911:
10912: /*IF g_debug THEN
10913: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10914: 'interest_name is mandatory field. ' ||
10915: 'x_return_status = ' || x_return_status, l_debug_prefix);
10916: END IF;
10917: */
10915: 'x_return_status = ' || x_return_status, l_debug_prefix);
10916: END IF;
10917: */
10918: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10919: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'interest_name is mandatory field. ' ||
10920: 'x_return_status = ' || x_return_status,
10921: p_msg_level=>fnd_log.level_statement);
10922: END IF;
10923:
10925: ------------------------
10926: -- validation for status
10927: ------------------------
10928: /****Logical APIs - validation not required****/
10929: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
10930: -- status is lookup code in lookup type REGISTRY_STATUS
10931: IF p_person_interest_rec.status IS NOT NULL
10932: AND
10933: p_person_interest_rec.status <> fnd_api.g_miss_char
10946: p_column_value => p_person_interest_rec.status,
10947: x_return_status => x_return_status);
10948:
10949: /*IF g_debug THEN
10950: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10951: 'status is lookup code in lookup type REGISTRY_STATUS. ' ||
10952: 'x_return_status = ' || x_return_status, l_debug_prefix);
10953: END IF;
10954: */
10952: 'x_return_status = ' || x_return_status, l_debug_prefix);
10953: END IF;
10954: */
10955: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10956: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10957: p_message=>'status is lookup code in lookup type REGISTRY_STATUS. ' ||
10958: 'x_return_status = ' || x_return_status,
10959: p_msg_level=>fnd_log.level_statement);
10960: END IF;
10992: p_old_application_id => l_application_id,
10993: x_return_status => x_return_status);
10994:
10995: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
10996: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_person_interest (-)',
10997: p_msg_level=>fnd_log.level_procedure);
10998: END IF;
10999:
11000: END validate_person_interest;
11083: --enable_debug;
11084:
11085: -- Debug info.
11086: /*IF g_debug THEN
11087: hz_utility_v2pub.debug ('validate_location (+)');
11088: END IF;
11089: */
11090: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
11091: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_location (+)',
11087: hz_utility_v2pub.debug ('validate_location (+)');
11088: END IF;
11089: */
11090: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
11091: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_location (+)',
11092: p_msg_level=>fnd_log.level_procedure);
11093: END IF;
11094:
11095:
11176: p_column_value => p_location_rec.country,
11177: x_return_status => x_return_status);
11178:
11179: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
11180: hz_utility_v2pub.debug(
11181: p_prefix => l_debug_prefix,
11182: p_message => 'country has foreign key fnd_territories.territory_code. ' ||
11183: 'x_return_status = ' || x_return_status,
11184: p_msg_level => fnd_log.level_statement);
11204: x_return_status => x_return_status);
11205:
11206:
11207: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
11208: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'content_source_type is non-updateable. ' ||
11209: 'x_return_status = ' || x_return_status,
11210: p_msg_level=>fnd_log.level_statement);
11211: END IF;
11212: END IF;
11218: p_column_value => p_location_rec.content_source_type,
11219: x_return_status => x_return_status);
11220:
11221: IF g_debug THEN
11222: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
11223: 'content_source_type is lookup code in lookup type CONTENT_SOURCE_TYPE. ' ||
11224: 'x_return_status = ' || x_return_status, l_debug_prefix);
11225: END IF;
11226: */
11259: -- SSM SST Integration and Extension
11260: -- Check Updateability using mix-n-match procedure rather than checking the
11261: -- profile value.
11262: /*NVL(FND_PROFILE.value('HZ_UPDATE_THIRD_PARTY_DATA'), 'N') = 'N'*/
11263: --HZ_UTILITY_V2PUB.is_purchased_content_source(db_actual_content_source) = 'Y'
11264: THEN
11265: l_return_status := FND_API.G_RET_STS_SUCCESS;
11266:
11267: validate_nonupdateable (
11376: p_new_actual_content_source => p_location_rec.actual_content_source,
11377: p_entity_name => 'HZ_LOCATIONS',
11378: x_return_status => x_return_status);
11379: -- Bug 4693719 : set global variable to Y
11380: HZ_UTILITY_V2PUB.G_UPDATE_ACS := 'Y';
11381: /*
11382: FND_MESSAGE.SET_NAME('AR', 'HZ_NOTALLOW_UPDATE_THIRD_PARTY');
11383: FND_MSG_PUB.ADD;
11384: x_return_status := FND_API.G_RET_STS_ERROR;
11385: */
11386: END IF;
11387:
11388: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
11389: hz_utility_v2pub.debug(
11390: p_prefix=>l_debug_prefix,
11391: p_message=>'third party address components are non-updateable. ' ||
11392: 'x_return_status = ' || x_return_status,
11393: p_msg_level=>fnd_log.level_statement);
11394: END IF;
11395: END IF;
11396:
11397: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
11398: hz_utility_v2pub.debug(
11399: p_prefix=>l_debug_prefix,
11400: p_message=>'(+) after validate third party address components ... ' ||
11401: 'x_return_status = ' || x_return_status,
11402: p_msg_level=>fnd_log.level_statement);
11426: x_return_status := fnd_api.g_ret_sts_error;
11427: END;
11428:
11429: /*IF g_debug THEN
11430: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
11431: 'language has foreign key fnd_languages.language_code (installed). ' ||
11432: 'x_return_status = ' || x_return_status, l_debug_prefix);
11433: END IF;
11434: */
11432: 'x_return_status = ' || x_return_status, l_debug_prefix);
11433: END IF;
11434: */
11435: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
11436: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
11437: p_message=>'language has foreign key fnd_languages.language_code (installed). ' ||
11438: 'x_return_status = ' || x_return_status,
11439: p_msg_level=>fnd_log.level_statement);
11440: END IF;
11463: x_return_status := fnd_api.g_ret_sts_error;
11464: END;
11465:
11466: /*IF g_debug THEN
11467: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
11468: 'timezone_id has foreign key hz_timezones.timezone_id. ' ||
11469: 'x_return_status = ' || x_return_status, l_debug_prefix);
11470: END IF;
11471: */
11469: 'x_return_status = ' || x_return_status, l_debug_prefix);
11470: END IF;
11471: */
11472: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
11473: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
11474: p_message=>'timezone_id has foreign key hz_timezones.timezone_id. ' ||
11475: 'x_return_status = ' || x_return_status,
11476: p_msg_level=>fnd_log.level_statement);
11477: END IF;
11535: END IF;
11536:
11537: -- Debug info.
11538: /*IF g_debug THEN
11539: hz_utility_v2pub.debug ('validate_location (-)');
11540: END IF;
11541: */
11542: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
11543: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_location (-)',
11539: hz_utility_v2pub.debug ('validate_location (-)');
11540: END IF;
11541: */
11542: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
11543: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_location (-)',
11544: p_msg_level=>fnd_log.level_procedure);
11545: END IF;
11546:
11547: --disable_debug;
11629: --enable_debug;
11630:
11631: -- Debug info.
11632: /*IF g_debug THEN
11633: hz_utility_v2pub.debug ('tax_location_validation (+)');
11634: END IF;
11635: */
11636: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
11637: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'tax_location_validation (+)',
11633: hz_utility_v2pub.debug ('tax_location_validation (+)');
11634: END IF;
11635: */
11636: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
11637: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'tax_location_validation (+)',
11638: p_msg_level=>fnd_log.level_procedure);
11639: END IF;
11640:
11641: -- tax location validation:
11760: END IF;
11761:
11762: -- Debug info.
11763: /*IF g_debug THEN
11764: hz_utility_v2pub.debug ('tax_location_validation (-)');
11765: END IF;
11766: */
11767: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
11768: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'tax_location_validation (-)',
11764: hz_utility_v2pub.debug ('tax_location_validation (-)');
11765: END IF;
11766: */
11767: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
11768: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'tax_location_validation (-)',
11769: p_msg_level=>fnd_log.level_procedure);
11770: END IF;
11771:
11772: --disable_debug;
11845: --enable_debug;
11846:
11847: -- Debug info.
11848: /*IF g_debug THEN
11849: hz_utility_v2pub.debug ('validate_relationship_type (+)');
11850: END IF;
11851: */
11852: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
11853: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_relationship_type (+)',
11849: hz_utility_v2pub.debug ('validate_relationship_type (+)');
11850: END IF;
11851: */
11852: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
11853: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_relationship_type (+)',
11854: p_msg_level=>fnd_log.level_procedure);
11855: END IF;
11856:
11857: -- select columns needed to be checked from table during update
11971: p_column_value => p_relationship_type_rec.relationship_type,
11972: x_return_status => x_return_status);
11973:
11974: /*IF g_debug THEN
11975: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
11976: 'relationship_type is mandatory. ' ||
11977: 'x_return_status = ' || x_return_status, l_debug_prefix);
11978: END IF;
11979: */
11977: 'x_return_status = ' || x_return_status, l_debug_prefix);
11978: END IF;
11979: */
11980: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
11981: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'relationship_type is mandatory. ' ||
11982: 'x_return_status = ' || x_return_status,
11983: p_msg_level=>fnd_log.level_statement);
11984: END IF;
11985:
11993: x_return_status => x_return_status);
11994: END IF;
11995:
11996: /*IF g_debug THEN
11997: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
11998: 'relationship_type is non-updateable. ' ||
11999: 'x_return_status = ' || x_return_status, l_debug_prefix);
12000: END IF;
12001: */
11999: 'x_return_status = ' || x_return_status, l_debug_prefix);
12000: END IF;
12001: */
12002: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12003: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'relationship_type is non-updateable. ' ||
12004: 'x_return_status = ' || x_return_status,
12005: p_msg_level=>fnd_log.level_statement);
12006: END IF;
12007:
12019: p_column_value => p_relationship_type_rec.status,
12020: x_return_status => x_return_status);
12021:
12022: /*IF g_debug THEN
12023: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12024: 'status cannot be set to null during update. ' ||
12025: 'x_return_status = ' || x_return_status, l_debug_prefix);
12026: END IF;
12027: */
12025: 'x_return_status = ' || x_return_status, l_debug_prefix);
12026: END IF;
12027: */
12028: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12029: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'status cannot be set to null during update. ' ||
12030: 'x_return_status = ' || x_return_status,
12031: p_msg_level=>fnd_log.level_statement);
12032: END IF;
12033:
12053: p_column_value => p_relationship_type_rec.status,
12054: x_return_status => x_return_status);
12055:
12056: /*IF g_debug THEN
12057: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12058: 'status is lookup code in lookup type CODE_STATUS. ' ||
12059: 'x_return_status = ' || x_return_status, l_debug_prefix);
12060: END IF;
12061: */
12059: 'x_return_status = ' || x_return_status, l_debug_prefix);
12060: END IF;
12061: */
12062: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12063: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12064: p_message=>'status is lookup code in lookup type CODE_STATUS. ' ||
12065: 'x_return_status = ' || x_return_status,
12066: p_msg_level=>fnd_log.level_statement);
12067: END IF;
12080: p_column_value => p_relationship_type_rec.create_party_flag,
12081: x_return_status => x_return_status);
12082:
12083: /*IF g_debug THEN
12084: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12085: 'create_party_flag should be in lookup YES/NO. ' ||
12086: 'x_return_status = ' || x_return_status, l_debug_prefix);
12087: END IF;
12088: */
12086: 'x_return_status = ' || x_return_status, l_debug_prefix);
12087: END IF;
12088: */
12089: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12090: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'create_party_flag should be in lookup YES/NO. ' ||
12091: 'x_return_status = ' || x_return_status,
12092: p_msg_level=>fnd_log.level_statement);
12093: END IF;
12094:
12157: END IF;
12158: END IF;
12159:
12160: /*IF g_debug THEN
12161: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12162: 'create_party_flag is updateable/non-updateable. ' ||
12163: 'x_return_status = ' || x_return_status, l_debug_prefix);
12164: END IF;
12165: */
12163: 'x_return_status = ' || x_return_status, l_debug_prefix);
12164: END IF;
12165: */
12166: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12167: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'create_party_flag is updateable/non-updateable. ' ||
12168: 'x_return_status = ' || x_return_status,
12169: p_msg_level=>fnd_log.level_statement);
12170: END IF;
12171:
12181: p_column_value => p_relationship_type_rec.allow_circular_relationships,
12182: x_return_status => x_return_status);
12183:
12184: /*IF g_debug THEN
12185: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12186: 'allow_circular_relationships should be in lookup YES/NO. ' ||
12187: 'x_return_status = ' || x_return_status, l_debug_prefix);
12188: END IF;
12189: */
12187: 'x_return_status = ' || x_return_status, l_debug_prefix);
12188: END IF;
12189: */
12190: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12191: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12192: p_message=>'allow_circular_relationships should be in lookup YES/NO. ' ||
12193: 'x_return_status = ' || x_return_status,
12194: p_msg_level=>fnd_log.level_statement);
12195: END IF;
12203: p_old_column_value => l_allow_circular_relationships,
12204: x_return_status => x_return_status);
12205:
12206: /*IF g_debug THEN
12207: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12208: 'allow_circular_relationships is non-updateable. ' ||
12209: 'x_return_status = ' || x_return_status, l_debug_prefix);
12210: END IF;
12211: */
12209: 'x_return_status = ' || x_return_status, l_debug_prefix);
12210: END IF;
12211: */
12212: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12213: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12214: p_message=>'allow_circular_relationships is non-updateable. ' ||
12215: 'x_return_status = ' || x_return_status,
12216: p_msg_level=>fnd_log.level_statement);
12217: END IF;
12230: p_column_value => p_relationship_type_rec.allow_relate_to_self_flag,
12231: x_return_status => x_return_status);
12232:
12233: /*IF g_debug THEN
12234: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12235: 'allow_relate_to_self_flag should be in lookup YES/NO. ' ||
12236: 'x_return_status = ' || x_return_status, l_debug_prefix);
12237: END IF;
12238: */
12236: 'x_return_status = ' || x_return_status, l_debug_prefix);
12237: END IF;
12238: */
12239: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12240: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12241: p_message=>'allow_relate_to_self_flag should be in lookup YES/NO. ' ||
12242: 'x_return_status = ' || x_return_status,
12243: p_msg_level=>fnd_log.level_statement);
12244: END IF;
12252: p_old_column_value => l_allow_relate_to_self_flag,
12253: x_return_status => x_return_status);
12254:
12255: /*IF g_debug THEN
12256: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12257: 'allow_relate_to_self_flag is non-updateable. ' ||
12258: 'x_return_status = ' || x_return_status, l_debug_prefix);
12259: END IF;
12260: */
12258: 'x_return_status = ' || x_return_status, l_debug_prefix);
12259: END IF;
12260: */
12261: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12262: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'allow_relate_to_self_flag is non-updateable. ' ||
12263: 'x_return_status = ' || x_return_status,
12264: p_msg_level=>fnd_log.level_statement);
12265: END IF;
12266:
12285: p_column_value => p_relationship_type_rec.forward_rel_code,
12286: x_return_status => x_return_status);
12287:
12288: /*IF g_debug THEN
12289: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12290: 'forward_rel_code is lookup code in lookup type PARTY_RELATIONS_TYPE. ' ||
12291: 'x_return_status = ' || x_return_status, l_debug_prefix);
12292: END IF;
12293: */
12291: 'x_return_status = ' || x_return_status, l_debug_prefix);
12292: END IF;
12293: */
12294: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12295: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12296: p_message=>'forward_rel_code is lookup code in lookup type PARTY_RELATIONS_TYPE. ' ||
12297: 'x_return_status = ' || x_return_status,
12298: p_msg_level=>fnd_log.level_statement);
12299: END IF;
12307: p_old_column_value => l_forward_rel_code,
12308: x_return_status => x_return_status);
12309:
12310: /*IF g_debug THEN
12311: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12312: 'forward_rel_code is non-updateable. ' ||
12313: 'x_return_status = ' || x_return_status, l_debug_prefix);
12314: END IF;
12315: */
12313: 'x_return_status = ' || x_return_status, l_debug_prefix);
12314: END IF;
12315: */
12316: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12317: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'forward_rel_code is non-updateable. ' ||
12318: 'x_return_status = ' || x_return_status,
12319: p_msg_level=>fnd_log.level_statement);
12320: END IF;
12321:
12340: p_column_value => p_relationship_type_rec.backward_rel_code,
12341: x_return_status => x_return_status);
12342:
12343: /*IF g_debug THEN
12344: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12345: 'backward_rel_code is lookup code in lookup type PARTY_RELATIONS_TYPE. ' ||
12346: 'x_return_status = ' || x_return_status, l_debug_prefix);
12347: END IF;
12348: */
12346: 'x_return_status = ' || x_return_status, l_debug_prefix);
12347: END IF;
12348: */
12349: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12350: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12351: p_message=>'backward_rel_code is lookup code in lookup type PARTY_RELATIONS_TYPE. ' ||
12352: 'x_return_status = ' || x_return_status,
12353: p_msg_level=>fnd_log.level_statement);
12354: END IF;
12362: p_old_column_value => l_backward_rel_code,
12363: x_return_status => x_return_status);
12364:
12365: /*IF g_debug THEN
12366: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12367: 'backward_rel_code is non-updateable. ' ||
12368: 'x_return_status = ' || x_return_status, l_debug_prefix);
12369: END IF;
12370: */
12368: 'x_return_status = ' || x_return_status, l_debug_prefix);
12369: END IF;
12370: */
12371: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12372: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'backward_rel_code is non-updateable. ' ||
12373: 'x_return_status = ' || x_return_status,
12374: p_msg_level=>fnd_log.level_statement);
12375: END IF;
12376:
12388: p_column_value => p_relationship_type_rec.direction_code,
12389: x_return_status => x_return_status);
12390:
12391: /*IF g_debug THEN
12392: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12393: 'direction_code is mandatory. ' ||
12394: 'x_return_status = ' || x_return_status, l_debug_prefix);
12395: END IF;
12396: */
12394: 'x_return_status = ' || x_return_status, l_debug_prefix);
12395: END IF;
12396: */
12397: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12398: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'direction_code is mandatory. ' ||
12399: 'x_return_status = ' || x_return_status,
12400: p_msg_level=>fnd_log.level_statement);
12401: END IF;
12402:
12408: p_column_value => p_relationship_type_rec.direction_code,
12409: x_return_status => x_return_status);
12410:
12411: /*IF g_debug THEN
12412: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12413: 'direction_code is lookup code in lookup type DIRECTION_CODE. ' ||
12414: 'x_return_status = ' || x_return_status, l_debug_prefix);
12415: END IF;
12416: */
12414: 'x_return_status = ' || x_return_status, l_debug_prefix);
12415: END IF;
12416: */
12417: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12418: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12419: p_message=>'direction_code is lookup code in lookup type DIRECTION_CODE. ' ||
12420: 'x_return_status = ' || x_return_status,
12421: p_msg_level=>fnd_log.level_statement);
12422: END IF;
12430: p_old_column_value => l_direction_code,
12431: x_return_status => x_return_status);
12432:
12433: /*IF g_debug THEN
12434: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12435: 'direction_code is non-updateable. ' ||
12436: 'x_return_status = ' || x_return_status, l_debug_prefix);
12437: END IF;
12438: */
12436: 'x_return_status = ' || x_return_status, l_debug_prefix);
12437: END IF;
12438: */
12439: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12440: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'direction_code is non-updateable. ' ||
12441: 'x_return_status = ' || x_return_status,
12442: p_msg_level=>fnd_log.level_statement);
12443: END IF;
12444:
12456: p_column_value => p_relationship_type_rec.subject_type,
12457: x_return_status => x_return_status);
12458:
12459: /*IF g_debug THEN
12460: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12461: 'subject_type is mandatory. ' ||
12462: 'x_return_status = ' || x_return_status, l_debug_prefix);
12463: END IF;
12464: */
12462: 'x_return_status = ' || x_return_status, l_debug_prefix);
12463: END IF;
12464: */
12465: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12466: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'subject_type is mandatory. ' ||
12467: 'x_return_status = ' || x_return_status,
12468: p_msg_level=>fnd_log.level_statement);
12469: END IF;
12470:
12489: x_return_status := fnd_api.g_ret_sts_error;
12490: END;
12491:
12492: /*IF g_debug THEN
12493: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12494: 'subject_type has foreign key fnd_object_instance_sets.instance_set_name. ' ||
12495: 'x_return_status = ' || x_return_status, l_debug_prefix);
12496: END IF;
12497: */
12495: 'x_return_status = ' || x_return_status, l_debug_prefix);
12496: END IF;
12497: */
12498: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12499: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12500: p_message=>'subject_type has foreign key fnd_object_instance_sets.instance_set_name. ' ||
12501: 'x_return_status = ' || x_return_status,
12502: p_msg_level=>fnd_log.level_statement);
12503: END IF;
12513: p_old_column_value => l_subject_type,
12514: x_return_status => x_return_status);
12515:
12516: /*IF g_debug THEN
12517: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12518: 'subject_type is non-updateable. ' ||
12519: 'x_return_status = ' || x_return_status, l_debug_prefix);
12520: END IF;
12521: */
12519: 'x_return_status = ' || x_return_status, l_debug_prefix);
12520: END IF;
12521: */
12522: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12523: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'subject_type is non-updateable. ' ||
12524: 'x_return_status = ' || x_return_status,
12525: p_msg_level=>fnd_log.level_statement);
12526: END IF;
12527:
12539: p_column_value => p_relationship_type_rec.object_type,
12540: x_return_status => x_return_status);
12541:
12542: /*IF g_debug THEN
12543: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12544: 'object_type is mandatory. ' ||
12545: 'x_return_status = ' || x_return_status, l_debug_prefix);
12546: END IF;
12547: */
12545: 'x_return_status = ' || x_return_status, l_debug_prefix);
12546: END IF;
12547: */
12548: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12549: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'object_type is mandatory. ' ||
12550: 'x_return_status = ' || x_return_status,
12551: p_msg_level=>fnd_log.level_statement);
12552: END IF;
12553:
12572: x_return_status := fnd_api.g_ret_sts_error;
12573: END;
12574:
12575: /*IF g_debug THEN
12576: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12577: 'object_type has foreign key fnd_object_instance_sets.instance_set_name. ' ||
12578: 'x_return_status = ' || x_return_status, l_debug_prefix);
12579: END IF;
12580: */
12578: 'x_return_status = ' || x_return_status, l_debug_prefix);
12579: END IF;
12580: */
12581: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12582: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12583: p_message=>'object_type has foreign key fnd_object_instance_sets.instance_set_name. ' ||
12584: 'x_return_status = ' || x_return_status,
12585: p_msg_level=>fnd_log.level_statement);
12586: END IF;
12596: p_old_column_value => l_object_type,
12597: x_return_status => x_return_status);
12598:
12599: /*IF g_debug THEN
12600: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12601: 'object_type is non-updateable. ' ||
12602: 'x_return_status = ' || x_return_status, l_debug_prefix);
12603: END IF;
12604: */
12602: 'x_return_status = ' || x_return_status, l_debug_prefix);
12603: END IF;
12604: */
12605: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12606: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'object_type is non-updateable. ' ||
12607: 'x_return_status = ' || x_return_status,
12608: p_msg_level=>fnd_log.level_statement);
12609: END IF;
12610:
12703: x_return_status := FND_API.G_RET_STS_ERROR;
12704: END IF;
12705:
12706: /*IF g_debug THEN
12707: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12708: 'validate the combination of forward_rel_code, subject_type, object_type. ' ||
12709: 'x_return_status = ' || x_return_status, l_debug_prefix);
12710: END IF;
12711: */
12709: 'x_return_status = ' || x_return_status, l_debug_prefix);
12710: END IF;
12711: */
12712: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12713: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12714: p_message=>'validate the combination of forward_rel_code,backward_rel_code, subject_type, object_type. ' ||
12715: 'x_return_status = ' || x_return_status,
12716: p_msg_level=>fnd_log.level_statement);
12717: END IF;
12743: NULL;
12744: END;
12745:
12746: /*IF g_debug THEN
12747: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12748: 'check for duplicate record. ' ||
12749: 'x_return_status = ' || x_return_status, l_debug_prefix);
12750: END IF;
12751: */
12749: 'x_return_status = ' || x_return_status, l_debug_prefix);
12750: END IF;
12751: */
12752: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12753: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'check for duplicate record. ' ||
12754: 'x_return_status = ' || x_return_status,
12755: p_msg_level=>fnd_log.level_statement);
12756: END IF;
12757:
12781: x_return_status := FND_API.G_RET_STS_ERROR;
12782: END IF;
12783:
12784: /*IF g_debug THEN
12785: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12786: 'validate direction_code. ' ||
12787: 'x_return_status = ' || x_return_status, l_debug_prefix);
12788: END IF;
12789: */
12787: 'x_return_status = ' || x_return_status, l_debug_prefix);
12788: END IF;
12789: */
12790: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12791: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate direction_code. ' ||
12792: 'x_return_status = ' || x_return_status,
12793: p_msg_level=>fnd_log.level_statement);
12794: END IF;
12795:
12805: p_column_value => p_relationship_type_rec.hierarchical_flag,
12806: x_return_status => x_return_status );
12807:
12808: /*IF G_DEBUG THEN
12809: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12810: 'hierarchical_flag in lookup YES/NO. ' ||
12811: 'x_return_status = ' || x_return_status, l_debug_prefix );
12812: END IF;
12813: */
12811: 'x_return_status = ' || x_return_status, l_debug_prefix );
12812: END IF;
12813: */
12814: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12815: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hierarchical_flag in lookup YES/NO. ' ||
12816: 'x_return_status = ' || x_return_status,
12817: p_msg_level=>fnd_log.level_statement);
12818: END IF;
12819:
12826: p_old_column_value => l_hierarchical_flag,
12827: x_return_status => x_return_status);
12828:
12829: /*IF g_debug THEN
12830: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12831: 'hierarchical_flag is non-updateable. ' ||
12832: 'x_return_status = ' || x_return_status, l_debug_prefix);
12833: END IF;
12834: */
12832: 'x_return_status = ' || x_return_status, l_debug_prefix);
12833: END IF;
12834: */
12835: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12836: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hierarchical_flag is non-updateable. ' ||
12837: 'x_return_status = ' || x_return_status,
12838: p_msg_level=>fnd_log.level_statement);
12839: END IF;
12840:
12858: x_return_status := FND_API.G_RET_STS_ERROR;
12859: END IF;
12860: END IF;
12861: /*IF g_debug THEN
12862: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12863: 'if hierarchical_flag = ''Y'', then allow_circular_relationships must be ''N''. ' ||
12864: 'x_return_status = ' || x_return_status, l_debug_prefix);
12865: END IF;
12866: */
12864: 'x_return_status = ' || x_return_status, l_debug_prefix);
12865: END IF;
12866: */
12867: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12868: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12869: p_message=>'if hierarchical_flag = ''Y'', then allow_circular_relationships must be ''N''. ' ||
12870: 'x_return_status = ' || x_return_status,
12871: p_msg_level=>fnd_log.level_statement);
12872: END IF;
12890: x_return_status := FND_API.G_RET_STS_ERROR;
12891: END IF;
12892: END IF;
12893: /*IF g_debug THEN
12894: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12895: 'if hierarchical_flag = ''Y'', the direction_code must be ''P'' or ''C''. ' ||
12896: 'x_return_status = ' || x_return_status, l_debug_prefix);
12897: END IF;
12898: */
12896: 'x_return_status = ' || x_return_status, l_debug_prefix);
12897: END IF;
12898: */
12899: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12900: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12901: p_message=>'if hierarchical_flag = ''Y'', the direction_code must be ''P'' or ''C''. ' ||
12902: 'x_return_status = ' || x_return_status,
12903: p_msg_level=>fnd_log.level_statement);
12904: END IF;
12974: x_return_status := FND_API.G_RET_STS_ERROR;
12975: END IF;
12976: END IF;
12977: /*IF g_debug THEN
12978: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12979: 'if hierarchical_flag = ''Y'', then allow_relate_to_self_flag must be ''N''. ' ||
12980: 'x_return_status = ' || x_return_status, l_debug_prefix);
12981: END IF;
12982: */
12980: 'x_return_status = ' || x_return_status, l_debug_prefix);
12981: END IF;
12982: */
12983: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12984: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12985: p_message=>'if hierarchical_flag = ''Y'', then allow_relate_to_self_flag must be ''N''. ' ||
12986: 'x_return_status = ' || x_return_status,
12987: p_msg_level=>fnd_log.level_statement);
12988: END IF;
13007: x_return_status := FND_API.G_RET_STS_ERROR;
13008: END IF;
13009: END IF;
13010: /*IF g_debug THEN
13011: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
13012: 'if hierarchical_flag = ''Y'', the direction_code must be ''P'' or ''C''. ' ||
13013: 'x_return_status = ' || x_return_status, l_debug_prefix);
13014: END IF;
13015: */
13013: 'x_return_status = ' || x_return_status, l_debug_prefix);
13014: END IF;
13015: */
13016: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13017: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
13018: p_message=>'if hierarchical_flag = ''Y'', the direction_code must be ''P'' or ''C''. ' ||
13019: 'x_return_status = ' || x_return_status,
13020: p_msg_level=>fnd_log.level_statement);
13021: END IF;
13050: END IF;
13051: END IF;
13052:
13053: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13054: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
13055: p_message=>'if hierarchical_flag = ''N'', the multiple_parent_allowed must be ''Y''. ' ||
13056: 'x_return_status = ' || x_return_status,
13057: p_msg_level=>fnd_log.level_statement);
13058: END IF;
13094: WHEN NO_DATA_FOUND THEN
13095: NULL;
13096: END;
13097: /*IF g_debug THEN
13098: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
13099: 'all relationship type records with same relationship_type value must have same values for hierarchical_flag. ' ||
13100: 'x_return_status = ' || x_return_status, l_debug_prefix);
13101: END IF;
13102: */
13100: 'x_return_status = ' || x_return_status, l_debug_prefix);
13101: END IF;
13102: */
13103: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13104: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
13105: p_message=>'all relationship type records with same relationship_type value must have same values for hierarchical_flag. ' ||
13106: 'x_return_status = ' || x_return_status,
13107: p_msg_level=>fnd_log.level_statement);
13108: END IF;
13141: NULL;
13142: END;
13143:
13144: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13145: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
13146: p_message=>'all relationship type records with same relationship_type value must have same values for'||
13147: ' allow_circular_relationships. ' ||
13148: 'x_return_status = ' || x_return_status,
13149: p_msg_level=>fnd_log.level_statement);
13183: WHEN NO_DATA_FOUND THEN
13184: NULL;
13185: END;
13186: /*IF g_debug THEN
13187: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
13188: 'all relationship type records with same relationship_type value must have same values for multiple_parent_allowed. ' ||
13189: 'x_return_status = ' || x_return_status, l_debug_prefix);
13190: END IF;
13191: */
13189: 'x_return_status = ' || x_return_status, l_debug_prefix);
13190: END IF;
13191: */
13192: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13193: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
13194: p_message=>'all relationship type records with same relationship_type value must have same values for multiple_parent_allowed. ' ||
13195: 'x_return_status = ' || x_return_status,
13196: p_msg_level=>fnd_log.level_statement);
13197: END IF;
13209: p_column_value => p_relationship_type_rec.incl_unrelated_entities,
13210: x_return_status => x_return_status );
13211:
13212: /*IF G_DEBUG THEN
13213: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
13214: 'incl_unrelated_entities in lookup YES/NO. ' ||
13215: 'x_return_status = ' || x_return_status, l_debug_prefix );
13216: END IF;
13217: */
13215: 'x_return_status = ' || x_return_status, l_debug_prefix );
13216: END IF;
13217: */
13218: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13219: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'incl_unrelated_entities in lookup YES/NO. ' ||
13220: 'x_return_status = ' || x_return_status,
13221: p_msg_level=>fnd_log.level_statement);
13222: END IF;
13223:
13233: p_column_value => p_relationship_type_rec.multiple_parent_allowed,
13234: x_return_status => x_return_status );
13235:
13236: /*IF G_DEBUG THEN
13237: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
13238: 'multiple_parent_allowed in lookup YES/NO. ' ||
13239: 'x_return_status = ' || x_return_status, l_debug_prefix );
13240: END IF;
13241: */
13239: 'x_return_status = ' || x_return_status, l_debug_prefix );
13240: END IF;
13241: */
13242: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13243: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'multiple_parent_allowed in lookup YES/NO. ' ||
13244: 'x_return_status = ' || x_return_status,
13245: p_msg_level=>fnd_log.level_statement);
13246: END IF;
13247:
13254: p_old_column_value => l_multiple_parent_allowed,
13255: x_return_status => x_return_status);
13256:
13257: /*IF g_debug THEN
13258: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
13259: 'multiple_parent_allowed is non-updateable. ' ||
13260: 'x_return_status = ' || x_return_status, l_debug_prefix);
13261: END IF;
13262: */
13260: 'x_return_status = ' || x_return_status, l_debug_prefix);
13261: END IF;
13262: */
13263: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13264: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'multiple_parent_allowed is non-updateable. ' ||
13265: 'x_return_status = ' || x_return_status,
13266: p_msg_level=>fnd_log.level_statement);
13267: END IF;
13268:
13289: p_old_application_id => l_application_id,
13290: x_return_status => x_return_status);
13291:
13292: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
13293: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_relationship_type (-)',
13294: p_msg_level=>fnd_log.level_procedure);
13295: END IF;
13296:
13297: --bug 3491584
13303: fnd_msg_pub.add;
13304: x_return_status := fnd_api.g_ret_sts_error;
13305:
13306: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13307: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
13308: p_message=>'Same subject and object type because the relationship phrase pair has the same subject (forward) and object (backward) phrase. ' ||
13309: 'x_return_status = ' || x_return_status,
13310: p_msg_level=>fnd_log.level_statement);
13311: END IF;
13421: --enable_debug;
13422:
13423: -- Debug info.
13424: /*IF g_debug THEN
13425: hz_utility_v2pub.debug ('validate_relationship (+)');
13426: END IF;
13427: */
13428: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
13429: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_relationship (+)',
13425: hz_utility_v2pub.debug ('validate_relationship (+)');
13426: END IF;
13427: */
13428: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
13429: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_relationship (+)',
13430: p_msg_level=>fnd_log.level_procedure);
13431: END IF;
13432:
13433: -- select columns needed to be checked from table during update
13482: p_column_value => p_relationship_rec.relationship_type,
13483: x_return_status => x_return_status);
13484:
13485: /*IF g_debug THEN
13486: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'relationship_type is mandatory. ' ||
13487: 'x_return_status = ' || x_return_status,
13488: l_debug_prefix);
13489: END IF;
13490: */
13488: l_debug_prefix);
13489: END IF;
13490: */
13491: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13492: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'relationship_type is mandatory. ' ||
13493: 'x_return_status = ' || x_return_status,
13494: p_msg_level=>fnd_log.level_statement);
13495: END IF;
13496:
13503: x_return_status => x_return_status
13504: );
13505:
13506: /*IF g_debug THEN
13507: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'relationship_type is non-updateable. ' ||
13508: 'x_return_status = ' || x_return_status,
13509: l_debug_prefix);
13510: END IF;
13511: */
13509: l_debug_prefix);
13510: END IF;
13511: */
13512: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13513: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'relationship_type is non-updateable. ' ||
13514: 'x_return_status = ' || x_return_status,
13515: p_msg_level=>fnd_log.level_statement);
13516: END IF;
13517:
13529: x_return_status => x_return_status
13530: );
13531:
13532: /*IF g_debug THEN
13533: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'relationship_code is mandatory. ' ||
13534: 'x_return_status = ' || x_return_status,
13535: l_debug_prefix);
13536: END IF;
13537: */
13535: l_debug_prefix);
13536: END IF;
13537: */
13538: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13539: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'relationship_code is mandatory. ' ||
13540: 'x_return_status = ' || x_return_status,
13541: p_msg_level=>fnd_log.level_statement);
13542: END IF;
13543:
13550: x_return_status => x_return_status
13551: );
13552:
13553: /*IF g_debug THEN
13554: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'relationship_code is non-updateable. ' ||
13555: 'x_return_status = ' || x_return_status,
13556: l_debug_prefix);
13557: END IF;
13558: */
13556: l_debug_prefix);
13557: END IF;
13558: */
13559: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13560: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'relationship_code is non-updateable. ' ||
13561: 'x_return_status = ' || x_return_status,
13562: p_msg_level=>fnd_log.level_statement);
13563: END IF;
13564: END IF;
13572: x_return_status => x_return_status
13573: );
13574:
13575: /*IF g_debug THEN
13576: hz_utility_v2pub.debug (
13577: 'relationship_code is lookup code in lookup type PARTY_RELATIONS_TYPE. ' ||
13578: 'x_return_status = ' || x_return_status,
13579: l_debug_prefix);
13580: END IF;
13579: l_debug_prefix);
13580: END IF;
13581: */
13582: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13583: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
13584: p_message=>'relationship_code is lookup code in lookup type PARTY_RELATIONS_TYPE. ' ||
13585: 'x_return_status = ' || x_return_status,
13586: p_msg_level=>fnd_log.level_statement);
13587: END IF;
13590: ----------------------
13591: -- validate subject_id
13592: ----------------------
13593: /****Logical APIs - validation not required****/
13594: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
13595: -- subject_id is mandatory
13596: validate_mandatory (
13597: p_create_update_flag => p_create_update_flag,
13598: p_column => 'subject_id',
13599: p_column_value => p_relationship_rec.subject_id,
13600: x_return_status => x_return_status);
13601:
13602: /*IF g_debug THEN
13603: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'subject_id is mandatory. ' ||
13604: 'x_return_status = ' || x_return_status,
13605: l_debug_prefix);
13606: END IF;
13607: */
13605: l_debug_prefix);
13606: END IF;
13607: */
13608: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13609: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'subject_id is mandatory. ' ||
13610: 'x_return_status = ' || x_return_status,
13611: p_msg_level=>fnd_log.level_statement);
13612: END IF;
13613:
13620: x_return_status => x_return_status
13621: );
13622:
13623: /*IF g_debug THEN
13624: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'subject_id is non-updateable. ' ||
13625: 'x_return_status = ' || x_return_status,
13626: l_debug_prefix);
13627: END IF;
13628: */
13626: l_debug_prefix);
13627: END IF;
13628: */
13629: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13630: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'subject_id is non-updateable. ' ||
13631: 'x_return_status = ' || x_return_status,
13632: p_msg_level=>fnd_log.level_statement);
13633: END IF;
13634:
13655: x_return_status := fnd_api.g_ret_sts_error;
13656: END IF;
13657:
13658: /*IF g_debug THEN
13659: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'subject_id belongs to subject_type. ' ||
13660: 'x_return_status = ' || x_return_status,
13661: l_debug_prefix);
13662: END IF;
13663: */
13661: l_debug_prefix);
13662: END IF;
13663: */
13664: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13665: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'subject_id belongs to subject_type. ' ||
13666: 'x_return_status = ' || x_return_status,
13667: p_msg_level=>fnd_log.level_statement);
13668: END IF;
13669:
13672: ------------------------------
13673: -- validate subject_table_name
13674: ------------------------------
13675: /****Logical APIs - validation not required****/
13676: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
13677: -- subject_table_name is mandatory
13678: validate_mandatory (
13679: p_create_update_flag => p_create_update_flag,
13680: p_column => 'subject_table_name',
13681: p_column_value => p_relationship_rec.subject_table_name,
13682: x_return_status => x_return_status);
13683:
13684: /*IF g_debug THEN
13685: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'subject_table_name is mandatory. ' ||
13686: 'x_return_status = ' || x_return_status,
13687: l_debug_prefix);
13688: END IF;
13689: */
13687: l_debug_prefix);
13688: END IF;
13689: */
13690: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13691: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'subject_table_name is mandatory. ' ||
13692: 'x_return_status = ' || x_return_status,
13693: p_msg_level=>fnd_log.level_statement);
13694: END IF;
13695:
13701: p_old_column_value => l_subject_table_name,
13702: x_return_status => x_return_status);
13703:
13704: /*IF g_debug THEN
13705: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'subject_table_name is non-updateable. ' ||
13706: 'x_return_status = ' || x_return_status,
13707: l_debug_prefix);
13708: END IF;
13709: */
13707: l_debug_prefix);
13708: END IF;
13709: */
13710: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13711: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'subject_table_name is non-updateable. ' ||
13712: 'x_return_status = ' || x_return_status,
13713: p_msg_level=>fnd_log.level_statement);
13714: END IF;
13715:
13737: x_return_status := fnd_api.g_ret_sts_error;
13738: END;
13739:
13740: /*IF g_debug THEN
13741: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
13742: 'subject_table_name has foreign key fnd_objects.obj_name. ' ||
13743: 'x_return_status = ' || x_return_status,
13744: l_debug_prefix
13745: );
13745: );
13746: END IF;
13747: */
13748: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13749: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
13750: p_message=>'subject_table_name has foreign key fnd_objects.obj_name. ' ||
13751: 'x_return_status = ' || x_return_status,
13752: p_msg_level=>fnd_log.level_statement);
13753: END IF;
13758: ------------------------
13759: -- validate subject_type
13760: ------------------------
13761: /****Logical APIs - validation not required****/
13762: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
13763: -- subject_type is mandatory
13764: validate_mandatory (
13765: p_create_update_flag => p_create_update_flag,
13766: p_column => 'subject_type',
13768: x_return_status => x_return_status
13769: );
13770:
13771: /*IF g_debug THEN
13772: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'subject_type is mandatory. ' ||
13773: 'x_return_status = ' || x_return_status,
13774: l_debug_prefix);
13775: END IF;
13776: */
13774: l_debug_prefix);
13775: END IF;
13776: */
13777: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13778: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'subject_type is mandatory. ' ||
13779: 'x_return_status = ' || x_return_status,
13780: p_msg_level=>fnd_log.level_statement);
13781: END IF;
13782:
13788: p_old_column_value => l_subject_type,
13789: x_return_status => x_return_status);
13790:
13791: /*IF g_debug THEN
13792: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'subject_type is non-updateable. ' ||
13793: 'x_return_status = ' || x_return_status,
13794: l_debug_prefix);
13795: END IF;
13796: */
13794: l_debug_prefix);
13795: END IF;
13796: */
13797: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13798: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'subject_type is non-updateable. ' ||
13799: 'x_return_status = ' || x_return_status,
13800: p_msg_level=>fnd_log.level_statement);
13801: END IF;
13802: END IF;
13823: x_return_status := fnd_api.g_ret_sts_error;
13824: END;
13825:
13826: /*IF g_debug THEN
13827: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
13828: 'subject_type has foreign key fnd_object_instance_sets.instance_set_name. ' ||
13829: 'x_return_status = ' || x_return_status,
13830: l_debug_prefix
13831: );
13831: );
13832: END IF;
13833: */
13834: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13835: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
13836: p_message=>'subject_type has foreign key fnd_object_instance_sets.instance_set_name. ' ||
13837: 'x_return_status = ' || x_return_status,
13838: p_msg_level=>fnd_log.level_statement);
13839: END IF;
13844: ---------------------
13845: -- validate object_id
13846: ---------------------
13847: /****Logical APIs - validation not required****/
13848: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
13849: -- object_id is mandatory
13850: validate_mandatory (
13851: p_create_update_flag => p_create_update_flag,
13852: p_column => 'object_id',
13854: x_return_status => x_return_status
13855: );
13856:
13857: /*IF g_debug THEN
13858: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'object_id is mandatory. ' ||
13859: 'x_return_status = ' || x_return_status,
13860: l_debug_prefix);
13861: END IF;
13862: */
13860: l_debug_prefix);
13861: END IF;
13862: */
13863: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13864: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'object_id is mandatory. ' ||
13865: 'x_return_status = ' || x_return_status,
13866: p_msg_level=>fnd_log.level_statement);
13867: END IF;
13868:
13874: p_old_column_value => l_object_id,
13875: x_return_status => x_return_status);
13876:
13877: /*IF g_debug THEN
13878: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'object_id is non-updateable. ' ||
13879: 'x_return_status = ' || x_return_status,
13880: l_debug_prefix);
13881: END IF;
13882: */
13880: l_debug_prefix);
13881: END IF;
13882: */
13883: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13884: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'object_id is non-updateable. ' ||
13885: 'x_return_status = ' || x_return_status,
13886: p_msg_level=>fnd_log.level_statement);
13887: END IF;
13888:
13909: x_return_status := fnd_api.g_ret_sts_error;
13910: END IF;
13911:
13912: /*IF g_debug THEN
13913: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'object_id belongs to object_type. ' ||
13914: 'x_return_status = ' || x_return_status,
13915: l_debug_prefix);
13916: END IF;
13917: */
13915: l_debug_prefix);
13916: END IF;
13917: */
13918: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13919: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'object_id belongs to object_type. ' ||
13920: 'x_return_status = ' || x_return_status,
13921: p_msg_level=>fnd_log.level_statement);
13922: END IF;
13923:
13926: -----------------------------
13927: -- validate object_table_name
13928: -----------------------------
13929: /****Logical APIs - validation not required****/
13930: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
13931: -- object_table_name is mandatory
13932: validate_mandatory (
13933: p_create_update_flag => p_create_update_flag,
13934: p_column => 'object_table_name',
13936: x_return_status => x_return_status
13937: );
13938:
13939: /*IF g_debug THEN
13940: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'object_table_name is mandatory. ' ||
13941: 'x_return_status = ' || x_return_status,
13942: l_debug_prefix);
13943: END IF;
13944: */
13942: l_debug_prefix);
13943: END IF;
13944: */
13945: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13946: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'object_table_name is mandatory. ' ||
13947: 'x_return_status = ' || x_return_status,
13948: p_msg_level=>fnd_log.level_statement);
13949: END IF;
13950:
13957: x_return_status => x_return_status
13958: );
13959:
13960: /*IF g_debug THEN
13961: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'object_table_name is non-updateable. ' ||
13962: 'x_return_status = ' || x_return_status,
13963: l_debug_prefix);
13964: END IF;
13965: */
13963: l_debug_prefix);
13964: END IF;
13965: */
13966: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13967: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'object_table_name is non-updateable. ' ||
13968: 'x_return_status = ' || x_return_status,
13969: p_msg_level=>fnd_log.level_statement);
13970: END IF;
13971:
13993: x_return_status := fnd_api.g_ret_sts_error;
13994: END;
13995:
13996: /*IF g_debug THEN
13997: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
13998: 'object_table_name has foreign key fnd_objects.obj_name. ' ||
13999: 'x_return_status = ' || x_return_status,
14000: l_debug_prefix
14001: );
14001: );
14002: END IF;
14003: */
14004: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
14005: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
14006: p_message=>'object_table_name has foreign key fnd_objects.obj_name. ' ||
14007: 'x_return_status = ' || x_return_status,
14008: p_msg_level=>fnd_log.level_statement);
14009: END IF;
14014: -----------------------
14015: -- validate object_type
14016: -----------------------
14017: /****Logical APIs - validation not required****/
14018: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
14019: -- object_type is mandatory
14020: validate_mandatory (
14021: p_create_update_flag => p_create_update_flag,
14022: p_column => 'object_type',
14024: x_return_status => x_return_status
14025: );
14026:
14027: /*IF g_debug THEN
14028: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'object_type is mandatory. ' ||
14029: 'x_return_status = ' || x_return_status,
14030: l_debug_prefix);
14031: END IF;
14032: */
14030: l_debug_prefix);
14031: END IF;
14032: */
14033: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
14034: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'object_type is mandatory. ' ||
14035: 'x_return_status = ' || x_return_status,
14036: p_msg_level=>fnd_log.level_statement);
14037: END IF;
14038:
14045: x_return_status => x_return_status
14046: );
14047:
14048: /*IF g_debug THEN
14049: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'object_type is non-updateable. ' ||
14050: 'x_return_status = ' || x_return_status,
14051: l_debug_prefix);
14052: END IF;
14053: */
14051: l_debug_prefix);
14052: END IF;
14053: */
14054: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
14055: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'object_type is non-updateable. ' ||
14056: 'x_return_status = ' || x_return_status,
14057: p_msg_level=>fnd_log.level_statement);
14058: END IF;
14059:
14081: x_return_status := fnd_api.g_ret_sts_error;
14082: END;
14083:
14084: /*IF g_debug THEN
14085: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
14086: 'object_type has foreign key fnd_object_instance_sets.instance_set_name. ' ||
14087: 'x_return_status = ' || x_return_status,
14088: l_debug_prefix
14089: );
14089: );
14090: END IF;
14091: */
14092: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
14093: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
14094: p_message=>'object_type has foreign key fnd_object_instance_sets.instance_set_name. ' ||
14095: 'x_return_status = ' || x_return_status,
14096: p_msg_level=>fnd_log.level_statement);
14097: END IF;
14113: x_return_status => x_return_status
14114: );
14115:
14116: IF g_debug THEN
14117: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'start_date is mandatory. ' ||
14118: 'x_return_status = ' || x_return_status,
14119: l_debug_prefix);
14120: END IF;
14121: */
14128: x_return_status => x_return_status
14129: );
14130:
14131: /*IF g_debug THEN
14132: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
14133: 'start_date cannot be set to null during update. ' ||
14134: 'x_return_status = ' || x_return_status,
14135: l_debug_prefix
14136: );
14136: );
14137: END IF;
14138: */
14139: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
14140: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
14141: p_message=>'start_date cannot be set to null during update. ' ||
14142: 'x_return_status = ' || x_return_status,
14143: p_msg_level=>fnd_log.level_statement);
14144: END IF;
14157: p_old_column_value => l_party_id,
14158: x_return_status => x_return_status);
14159:
14160: /*IF g_debug THEN
14161: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'party_id is non-updateable. ' ||
14162: 'x_return_status = ' || x_return_status,
14163: l_debug_prefix);
14164: END IF;
14165: */
14163: l_debug_prefix);
14164: END IF;
14165: */
14166: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
14167: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id is non-updateable. ' ||
14168: 'x_return_status = ' || x_return_status,
14169: p_msg_level=>fnd_log.level_statement);
14170: END IF;
14171:
14183: x_return_status => x_return_status
14184: );
14185:
14186: /*IF g_debug THEN
14187: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
14188: 'status cannot be set to null during update. ' ||
14189: 'x_return_status = ' || x_return_status,
14190: l_debug_prefix);
14191: END IF;
14190: l_debug_prefix);
14191: END IF;
14192: */
14193: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
14194: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'status cannot be set to null during update. ' ||
14195: 'x_return_status = ' || x_return_status,
14196: p_msg_level=>fnd_log.level_statement);
14197: END IF;
14198:
14198:
14199: END IF;
14200:
14201: /****Logical APIs - validation not required****/
14202: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
14203: -- status is lookup code in lookup type REGISTRY_STATUS
14204: IF p_relationship_rec.status IS NOT NULL
14205: AND p_relationship_rec.status <> fnd_api.g_miss_char
14206: AND (p_create_update_flag = 'C'
14215: x_return_status => x_return_status
14216: );
14217:
14218: /*IF g_debug THEN
14219: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
14220: 'status is lookup code in lookup type REGISTRY_STATUS. ' ||
14221: 'x_return_status = ' || x_return_status,
14222: l_debug_prefix);
14223: END IF;
14222: l_debug_prefix);
14223: END IF;
14224: */
14225: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
14226: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
14227: p_message=>'status is lookup code in lookup type REGISTRY_STATUS. ' ||
14228: 'x_return_status = ' || x_return_status,
14229: p_msg_level=>fnd_log.level_statement);
14230: END IF;
14253: );
14254:
14255:
14256: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
14257: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'content_source_type is non-updateable. ' ||
14258: 'x_return_status = ' || x_return_status,
14259: p_msg_level=>fnd_log.level_statement);
14260: END IF;
14261:
14269: x_return_status => x_return_status
14270: );
14271:
14272: IF g_debug THEN
14273: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
14274: 'content_source_type is lookup code in lookup type CONTENT_SOURCE_TYPE. ' ||
14275: 'x_return_status = ' || x_return_status,
14276: l_debug_prefix
14277: );
14332: END IF;
14333: END IF;
14334:
14335: /*IF g_debug THEN
14336: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
14337: 'end_date must be null or greater than start date. ' ||
14338: 'x_return_status = ' || x_return_status,
14339: l_debug_prefix);
14340: END IF;
14339: l_debug_prefix);
14340: END IF;
14341: */
14342: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
14343: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'end_date must be null or greater than start date. ' ||
14344: 'x_return_status = ' || x_return_status,
14345: p_msg_level=>fnd_log.level_statement);
14346: END IF;
14347:
14380: -- END IF;
14381: -- CLOSE c1;
14382:
14383: /*IF g_debug THEN
14384: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
14385: 'there should not be any date overlap between two identical relationships. ' ||
14386: 'x_return_status = ' || x_return_status, l_debug_prefix);
14387: END IF;
14388: */
14386: 'x_return_status = ' || x_return_status, l_debug_prefix);
14387: END IF;
14388: */
14389: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
14390: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
14391: p_message=>'there should not be any date overlap between two identical relationships. ' ||
14392: 'x_return_status = ' || x_return_status,
14393: p_msg_level=>fnd_log.level_statement);
14394: END IF;
14413: p_old_application_id => l_application_id,
14414: x_return_status => x_return_status);
14415:
14416: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14417: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_relationship (-)',
14418: p_msg_level=>fnd_log.level_procedure);
14419: END IF;
14420:
14421: END validate_relationship;
14473: --enable_debug;
14474:
14475: -- Debug info.
14476: /*IF g_debug THEN
14477: hz_utility_v2pub.debug ('validate_contact_point (+)');
14478: END IF;
14479: */
14480: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14481: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_contact_point (+)',
14477: hz_utility_v2pub.debug ('validate_contact_point (+)');
14478: END IF;
14479: */
14480: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14481: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_contact_point (+)',
14482: p_msg_level=>fnd_log.level_procedure);
14483: END IF;
14484:
14485:
14496: );
14497:
14498: -- Debug info.
14499: /*IF g_debug THEN
14500: hz_utility_v2pub.debug ('validate_contact_point (-)');
14501: END IF;
14502: */
14503: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14504: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_contact_point (-)',
14500: hz_utility_v2pub.debug ('validate_contact_point (-)');
14501: END IF;
14502: */
14503: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14504: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_contact_point (-)',
14505: p_msg_level=>fnd_log.level_procedure);
14506: END IF;
14507:
14508:
14547: --enable_debug;
14548:
14549: -- Debug info.
14550: /*IF g_debug THEN
14551: hz_utility_v2pub.debug ('validate_edi_contact_point (+)');
14552: END IF;
14553: */
14554: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14555: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_edi_contact_point (+)',
14551: hz_utility_v2pub.debug ('validate_edi_contact_point (+)');
14552: END IF;
14553: */
14554: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14555: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_edi_contact_point (+)',
14556: p_msg_level=>fnd_log.level_procedure);
14557: END IF;
14558:
14559:
14566: );
14567:
14568: -- Debug info.
14569: /*IF g_debug THEN
14570: hz_utility_v2pub.debug ('validate_edi_contact_point (-)');
14571: END IF;
14572: */
14573: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14574: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_edi_contact_point (-)',
14570: hz_utility_v2pub.debug ('validate_edi_contact_point (-)');
14571: END IF;
14572: */
14573: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14574: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_edi_contact_point (-)',
14575: p_msg_level=>fnd_log.level_procedure);
14576: END IF;
14577:
14578:
14617: --enable_debug;
14618:
14619: -- Debug info.
14620: /*IF g_debug THEN
14621: hz_utility_v2pub.debug ('validate_eft_contact_point (+)');
14622: END IF;
14623: */
14624: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14625: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_eft_contact_point (+)',
14621: hz_utility_v2pub.debug ('validate_eft_contact_point (+)');
14622: END IF;
14623: */
14624: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14625: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_eft_contact_point (+)',
14626: p_msg_level=>fnd_log.level_procedure);
14627: END IF;
14628:
14629:
14636: );
14637:
14638: -- Debug info.
14639: /*IF g_debug THEN
14640: hz_utility_v2pub.debug ('validate_eft_contact_point (-)');
14641: END IF;
14642: */
14643: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14644: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_eft_contact_point (-)',
14640: hz_utility_v2pub.debug ('validate_eft_contact_point (-)');
14641: END IF;
14642: */
14643: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14644: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_eft_contact_point (-)',
14645: p_msg_level=>fnd_log.level_procedure);
14646: END IF;
14647:
14648:
14687: --enable_debug;
14688:
14689: -- Debug info.
14690: /*IF g_debug THEN
14691: hz_utility_v2pub.debug ('validate_web_contact_point (+)');
14692: END IF;
14693: */
14694: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14695: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_web_contact_point (+)',
14691: hz_utility_v2pub.debug ('validate_web_contact_point (+)');
14692: END IF;
14693: */
14694: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14695: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_web_contact_point (+)',
14696: p_msg_level=>fnd_log.level_procedure);
14697: END IF;
14698:
14699:
14706: );
14707:
14708: -- Debug info.
14709: /*IF g_debug THEN
14710: hz_utility_v2pub.debug ('validate_web_contact_point (-)');
14711: END IF;
14712: */
14713:
14714:
14712: */
14713:
14714:
14715: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14716: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_web_contact_point (-)',
14717: p_msg_level=>fnd_log.level_procedure);
14718: END IF;
14719:
14720: -- Check if API is called in debug mode. If yes, disable debug.
14759:
14760: -- Debug info.
14761:
14762: /*IF g_debug THEN
14763: hz_utility_v2pub.debug ('validate_phone_contact_point (+)');
14764: END IF;
14765: */
14766: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14767: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_phone_contact_point (+)',
14763: hz_utility_v2pub.debug ('validate_phone_contact_point (+)');
14764: END IF;
14765: */
14766: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14767: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_phone_contact_point (+)',
14768: p_msg_level=>fnd_log.level_procedure);
14769: END IF;
14770:
14771:
14778: );
14779:
14780: -- Debug info.
14781: /*IF g_debug THEN
14782: hz_utility_v2pub.debug ('validate_phone_contact_point (-)');
14783: END IF;
14784: */
14785: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14786: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_phone_contact_point (-)',
14782: hz_utility_v2pub.debug ('validate_phone_contact_point (-)');
14783: END IF;
14784: */
14785: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14786: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_phone_contact_point (-)',
14787: p_msg_level=>fnd_log.level_procedure);
14788: END IF;
14789:
14790: -- Check if API is called in debug mode. If yes, disable debug.
14828: --enable_debug;
14829:
14830: -- Debug info.
14831: /*IF g_debug THEN
14832: hz_utility_v2pub.debug ('validate_telex_contact_point (+)');
14833: END IF;
14834: */
14835: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14836: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_telex_contact_point (+)',
14832: hz_utility_v2pub.debug ('validate_telex_contact_point (+)');
14833: END IF;
14834: */
14835: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14836: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_telex_contact_point (+)',
14837: p_msg_level=>fnd_log.level_procedure);
14838: END IF;
14839:
14840:
14847: );
14848:
14849: -- Debug info.
14850: /*IF g_debug THEN
14851: hz_utility_v2pub.debug ('validate_telex_contact_point (-)');
14852: END IF;
14853: */
14854: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14855: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_telex_contact_point (-)',
14851: hz_utility_v2pub.debug ('validate_telex_contact_point (-)');
14852: END IF;
14853: */
14854: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14855: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_telex_contact_point (-)',
14856: p_msg_level=>fnd_log.level_procedure);
14857: END IF;
14858:
14859:
14898: --enable_debug;
14899:
14900: -- Debug info.
14901: /*IF g_debug THEN
14902: hz_utility_v2pub.debug ('validate_email_contact_point (+)');
14903: END IF;
14904: */
14905: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14906: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_email_contact_point (+)',
14902: hz_utility_v2pub.debug ('validate_email_contact_point (+)');
14903: END IF;
14904: */
14905: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14906: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_email_contact_point (+)',
14907: p_msg_level=>fnd_log.level_procedure);
14908: END IF;
14909:
14910:
14917: );
14918:
14919: -- Debug info.
14920: /*IF g_debug THEN
14921: hz_utility_v2pub.debug ('validate_email_contact_point (-)');
14922: END IF;
14923: */
14924: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14925: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_email_contact_point (-)',
14921: hz_utility_v2pub.debug ('validate_email_contact_point (-)');
14922: END IF;
14923: */
14924: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14925: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_email_contact_point (-)',
14926: p_msg_level=>fnd_log.level_procedure);
14927: END IF;
14928:
14929:
14939: l_debug_prefix VARCHAR2(30) := '';
14940: BEGIN
14941: -- Debug info.
14942: /* IF G_DEBUG THEN
14943: HZ_UTILITY_V2PUB.debug ( 'validate_org_nonsupport_column (+)' );
14944: END IF;
14945: */
14946: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14947: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_org_nonsupport_column (+)',
14943: HZ_UTILITY_V2PUB.debug ( 'validate_org_nonsupport_column (+)' );
14944: END IF;
14945: */
14946: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14947: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_org_nonsupport_column (+)',
14948: p_msg_level=>fnd_log.level_procedure);
14949: END IF;
14950:
14951:
15625: END IF;
15626:
15627: -- Debug info.
15628: /*IF G_DEBUG THEN
15629: HZ_UTILITY_V2PUB.debug ( 'validate_org_nonsupport_column (-)' );
15630: END IF;
15631: */
15632: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
15633: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_org_nonsupport_column (-)',
15629: HZ_UTILITY_V2PUB.debug ( 'validate_org_nonsupport_column (-)' );
15630: END IF;
15631: */
15632: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
15633: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_org_nonsupport_column (-)',
15634: p_msg_level=>fnd_log.level_procedure);
15635: END IF;
15636:
15637: END validate_org_nonsupport_column;
15806: --enable_debug;
15807:
15808: -- Debug info.
15809: /*IF g_debug THEN
15810: hz_utility_v2pub.debug ('validate_financial_report (+)');
15811: END IF;
15812: */
15813: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
15814: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_financial_report (+)',
15810: hz_utility_v2pub.debug ('validate_financial_report (+)');
15811: END IF;
15812: */
15813: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
15814: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_financial_report (+)',
15815: p_msg_level=>fnd_log.level_procedure);
15816: END IF;
15817:
15818:
15884: -------------------------------------
15885: -- validation for financial_report_id
15886: -------------------------------------
15887: /****Logical APIs - validation not required****/
15888: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
15889: --check for unique financial_report_id
15890: IF p_create_update_flag = 'C' THEN
15891: IF p_financial_report_rec.financial_report_id IS NOT NULL AND
15892: p_financial_report_rec.financial_report_id <> fnd_api.g_miss_num
15903: END IF;
15904: CLOSE c_dup_financial_report_id;
15905:
15906: /*IF g_debug THEN
15907: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
15908: 'check that financial_report_id is unique during creation. ' ||
15909: ' x_return_status = ' || x_return_status, l_debug_prefix);
15910: END IF;
15911: */
15909: ' x_return_status = ' || x_return_status, l_debug_prefix);
15910: END IF;
15911: */
15912: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
15913: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'check that financial_report_id is unique during creation. ' ||
15914: ' x_return_status = ' || x_return_status,
15915: p_msg_level=>fnd_log.level_statement);
15916: END IF;
15917:
15919: END IF;
15920: END IF;
15921:
15922: /*IF g_debug THEN
15923: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
15924: '(+) after validate financial_report_id ... ' ||
15925: 'x_return_status = ' || x_return_status, l_debug_prefix);
15926: END IF;
15927: */
15925: 'x_return_status = ' || x_return_status, l_debug_prefix);
15926: END IF;
15927: */
15928: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
15929: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate financial_report_id ... ' ||
15930: 'x_return_status = ' || x_return_status,
15931: p_msg_level=>fnd_log.level_statement);
15932: END IF;
15933:
15940: p_old_column_value => l_financial_report_id,
15941: x_return_status => x_return_status);
15942:
15943: /*IF g_debug THEN
15944: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
15945: 'financial_report_id is non-updateable field. ' ||
15946: 'x_return_status = ' || x_return_status, l_debug_prefix);
15947: END IF;
15948: */
15946: 'x_return_status = ' || x_return_status, l_debug_prefix);
15947: END IF;
15948: */
15949: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
15950: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'financial_report_id is non-updateable field. ' ||
15951: 'x_return_status = ' || x_return_status,
15952: p_msg_level=>fnd_log.level_statement);
15953: END IF;
15954:
15959: --------------------------
15960: -- validation for party_id
15961: --------------------------
15962: /****Logical APIs - validation not required****/
15963: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
15964: -- party_id is mandatory field
15965: IF p_create_update_flag = 'C' THEN
15966: validate_mandatory (
15967: p_create_update_flag => p_create_update_flag,
15969: p_column_value => p_financial_report_rec.party_id,
15970: x_return_status => x_return_status);
15971:
15972: /*IF g_debug THEN
15973: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
15974: 'party_id is mandatory field. ' ||
15975: 'x_return_status = ' || x_return_status, l_debug_prefix);
15976: END IF;
15977: */
15975: 'x_return_status = ' || x_return_status, l_debug_prefix);
15976: END IF;
15977: */
15978: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
15979: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id is mandatory field. ' ||
15980: 'x_return_status = ' || x_return_status,
15981: p_msg_level=>fnd_log.level_statement);
15982: END IF;
15983:
15992: p_old_column_value => l_party_id,
15993: x_return_status => x_return_status);
15994:
15995: /*IF g_debug THEN
15996: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
15997: 'party_id is non-updateable field. ' ||
15998: 'x_return_status = ' || x_return_status, l_debug_prefix);
15999: END IF;
16000: */
15998: 'x_return_status = ' || x_return_status, l_debug_prefix);
15999: END IF;
16000: */
16001: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16002: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id is non-updateable field. ' ||
16003: 'x_return_status = ' || x_return_status,
16004: p_msg_level=>fnd_log.level_statement);
16005: END IF;
16006:
16030: x_return_status := fnd_api.g_ret_sts_error;
16031: END;
16032: */
16033: /*IF g_debug THEN
16034: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16035: 'party_id has foreign key hz_parties.party_id. ' ||
16036: 'x_return_status = ' || x_return_status, l_debug_prefix);
16037: END IF;
16038: */
16036: 'x_return_status = ' || x_return_status, l_debug_prefix);
16037: END IF;
16038: */
16039: /* IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16040: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id has foreign key hz_parties.party_id. ' ||
16041: 'x_return_status = ' || x_return_status,
16042: p_msg_level=>fnd_log.level_statement);
16043: END IF;
16044:
16084: --Bug 2886268: Commented out the following call as it is throwing erroneous message
16085: --check_organization(p_financial_report_rec.party_id, x_return_status);
16086: END IF;
16087: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16088: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id has foreign key hz_parties.party_id. ' ||
16089: 'x_return_status = ' || x_return_status,
16090: p_msg_level=>fnd_log.level_statement);
16091: END IF;
16092: END IF;
16270: END IF;
16271: CLOSE c_unique_financial_report_rec;
16272:
16273: /*IF g_debug THEN
16274: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16275: 'The following column combination should be unique:' ||
16276: ' PARTY_ID, FINANCIAL_REPORT_TYPE, DOCUMENT_REFERENCE, DATE_REPORT_ISSUED, ' ||
16277: ' (ISSUED_PERIOD or REPORT_START_DATE and REPORT_END_DATE).' ||
16278: ' x_return_status = ' || x_return_status, l_debug_prefix);
16278: ' x_return_status = ' || x_return_status, l_debug_prefix);
16279: END IF;
16280: */
16281: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16282: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16283: p_message=>'The following column combination should be unique:' ||
16284: ' PARTY_ID, FINANCIAL_REPORT_TYPE, DOCUMENT_REFERENCE, DATE_REPORT_ISSUED, ' ||
16285: ' (ISSUED_PERIOD or REPORT_START_DATE and REPORT_END_DATE).' ||
16286: ' x_return_status = ' || x_return_status,
16296: p_old_column_value => l_type_of_financial_report,
16297: x_return_status => x_return_status);
16298:
16299: /*IF g_debug THEN
16300: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16301: 'type_of_financial_report is non-updateable field. ' ||
16302: 'x_return_status = ' || x_return_status, l_debug_prefix);
16303: END IF;
16304: */
16302: 'x_return_status = ' || x_return_status, l_debug_prefix);
16303: END IF;
16304: */
16305: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16306: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'type_of_financial_report is non-updateable field. ' ||
16307: 'x_return_status = ' || x_return_status,
16308: p_msg_level=>fnd_log.level_statement);
16309: END IF;
16310:
16318: p_old_column_value => l_document_reference,
16319: x_return_status => x_return_status);
16320:
16321: /*IF g_debug THEN
16322: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16323: 'document_reference is non-updateable field. ' ||
16324: 'x_return_status = ' || x_return_status, l_debug_prefix);
16325: END IF;
16326: */
16324: 'x_return_status = ' || x_return_status, l_debug_prefix);
16325: END IF;
16326: */
16327: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16328: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'document_reference is non-updateable field. ' ||
16329: 'x_return_status = ' || x_return_status,
16330: p_msg_level=>fnd_log.level_statement);
16331: END IF;
16332:
16340: p_old_column_value => trunc(l_date_report_issued),
16341: x_return_status => x_return_status);
16342:
16343: /*IF g_debug THEN
16344: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16345: 'date_report_issued is non-updateable field. ' ||
16346: 'x_return_status = ' || x_return_status, l_debug_prefix);
16347: END IF;
16348: */
16346: 'x_return_status = ' || x_return_status, l_debug_prefix);
16347: END IF;
16348: */
16349: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16350: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'date_report_issued is non-updateable field. ' ||
16351: 'x_return_status = ' || x_return_status,
16352: p_msg_level=>fnd_log.level_statement);
16353: END IF;
16354:
16362: p_old_column_value => l_issued_period,
16363: x_return_status => x_return_status);
16364:
16365: /*IF g_debug THEN
16366: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16367: 'issued_period is non-updateable field. ' ||
16368: 'x_return_status = ' || x_return_status, l_debug_prefix);
16369: END IF;
16370: */
16368: 'x_return_status = ' || x_return_status, l_debug_prefix);
16369: END IF;
16370: */
16371: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16372: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'issued_period is non-updateable field. ' ||
16373: 'x_return_status = ' || x_return_status,
16374: p_msg_level=>fnd_log.level_statement);
16375: END IF;
16376:
16384: p_old_column_value => trunc(l_report_start_date),
16385: x_return_status => x_return_status);
16386:
16387: /*IF g_debug THEN
16388: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16389: 'report_start_date is non-updateable field. ' ||
16390: 'x_return_status = ' || x_return_status, l_debug_prefix);
16391: END IF;
16392: */
16390: 'x_return_status = ' || x_return_status, l_debug_prefix);
16391: END IF;
16392: */
16393: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16394: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'report_start_date is non-updateable field. ' ||
16395: 'x_return_status = ' || x_return_status,
16396: p_msg_level=>fnd_log.level_statement);
16397: END IF;
16398:
16406: p_old_column_value => trunc(l_report_end_date),
16407: x_return_status => x_return_status);
16408:
16409: /*IF g_debug THEN
16410: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16411: 'report_end_date is non-updateable field. ' ||
16412: 'x_return_status = ' || x_return_status, l_debug_prefix);
16413: END IF;
16414: */
16412: 'x_return_status = ' || x_return_status, l_debug_prefix);
16413: END IF;
16414: */
16415: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16416: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'report_end_date is non-updateable field. ' ||
16417: 'x_return_status = ' || x_return_status,
16418: p_msg_level=>fnd_log.level_statement);
16419: END IF;
16420:
16424: --Lookup Validations
16425: --validation for audit_ind
16426: ------------------------------------
16427: /****Logical APIs - validation not required****/
16428: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
16429: -- audit_ind is lookup code in lookup type YES/NO
16430: validate_lookup (
16431: p_column => 'audit_ind',
16432: p_lookup_type => 'YES/NO',
16433: p_column_value => p_financial_report_rec.audit_ind,
16434: x_return_status => x_return_status);
16435:
16436: /*IF g_debug THEN
16437: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16438: 'audit_ind should be in lookup YES/NO. ' ||
16439: 'x_return_status = ' || x_return_status, l_debug_prefix);
16440: END IF;
16441: */
16439: 'x_return_status = ' || x_return_status, l_debug_prefix);
16440: END IF;
16441: */
16442: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16443: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'audit_ind should be in lookup YES/NO. ' ||
16444: 'x_return_status = ' || x_return_status,
16445: p_msg_level=>fnd_log.level_statement);
16446: END IF;
16447: END IF;
16449: ----------------------------------
16450: -- validation for consolidated_ind
16451: ----------------------------------
16452: /****Logical APIs - validation not required****/
16453: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
16454: -- consolidated_ind is lookup code in lookup type YES/NO
16455: validate_lookup (
16456: p_column => 'consolidated_ind',
16457: p_lookup_type => 'YES/NO',
16458: p_column_value => p_financial_report_rec.consolidated_ind,
16459: x_return_status => x_return_status);
16460:
16461: /*IF g_debug THEN
16462: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16463: 'consolidated_ind should be in lookup YES/NO. ' ||
16464: 'x_return_status = ' || x_return_status, l_debug_prefix);
16465: END IF;
16466: */
16464: 'x_return_status = ' || x_return_status, l_debug_prefix);
16465: END IF;
16466: */
16467: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16468: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'consolidated_ind should be in lookup YES/NO. ' ||
16469: 'x_return_status = ' || x_return_status,
16470: p_msg_level=>fnd_log.level_statement);
16471: END IF;
16472: END IF;
16474: ------------------------------------
16475: --validation for estimated_ind
16476: ------------------------------------
16477: /****Logical APIs - validation not required****/
16478: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
16479: -- estimated_ind is lookup code in lookup type YES/NO
16480: validate_lookup (
16481: p_column => 'estimated_ind',
16482: p_lookup_type => 'YES/NO',
16483: p_column_value => p_financial_report_rec.estimated_ind,
16484: x_return_status => x_return_status);
16485:
16486: /*IF g_debug THEN
16487: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16488: 'estimated_ind should be in lookup YES/NO. ' ||
16489: 'x_return_status = ' || x_return_status, l_debug_prefix);
16490: END IF;
16491: */
16489: 'x_return_status = ' || x_return_status, l_debug_prefix);
16490: END IF;
16491: */
16492: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16493: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'estimated_ind should be in lookup YES/NO. ' ||
16494: 'x_return_status = ' || x_return_status,
16495: p_msg_level=>fnd_log.level_statement);
16496: END IF;
16497: END IF;
16499: ----------------------------------
16500: -- validation for fiscal_ind
16501: ----------------------------------
16502: /****Logical APIs - validation not required****/
16503: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
16504: -- fiscal_ind is lookup code in lookup type YES/NO
16505: validate_lookup (
16506: p_column => 'fiscal_ind',
16507: p_lookup_type => 'YES/NO',
16508: p_column_value => p_financial_report_rec.fiscal_ind,
16509: x_return_status => x_return_status);
16510:
16511: /*IF g_debug THEN
16512: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16513: 'fiscal_ind should be in lookup YES/NO. ' ||
16514: 'x_return_status = ' || x_return_status, l_debug_prefix);
16515: END IF;
16516: */
16514: 'x_return_status = ' || x_return_status, l_debug_prefix);
16515: END IF;
16516: */
16517: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16518: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'fiscal_ind should be in lookup YES/NO. ' ||
16519: 'x_return_status = ' || x_return_status,
16520: p_msg_level=>fnd_log.level_statement);
16521: END IF;
16522: END IF;
16527: ----------------------------------
16528: -- validation for final_ind
16529: ----------------------------------
16530: /****Logical APIs - validation not required****/
16531: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
16532: -- fiscal_ind is lookup code in lookup type YES/NO
16533: validate_lookup (
16534: p_column => 'final_ind',
16535: p_lookup_type => 'YES/NO',
16536: p_column_value => p_financial_report_rec.final_ind,
16537: x_return_status => x_return_status);
16538:
16539: /*IF g_debug THEN
16540: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16541: 'final_ind should be in lookup YES/NO. ' ||
16542: 'x_return_status = ' || x_return_status, l_debug_prefix);
16543: END IF;
16544: */
16542: 'x_return_status = ' || x_return_status, l_debug_prefix);
16543: END IF;
16544: */
16545: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16546: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'final_ind should be in lookup YES/NO. ' ||
16547: 'x_return_status = ' || x_return_status,
16548: p_msg_level=>fnd_log.level_statement);
16549: END IF;
16550: END IF;
16552: ------------------------------------
16553: --validation for forecast_ind
16554: ------------------------------------
16555: /****Logical APIs - validation not required****/
16556: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
16557: -- forecast_ind is lookup code in lookup type YES/NO
16558: validate_lookup (
16559: p_column => 'forecast_ind',
16560: p_lookup_type => 'YES/NO',
16561: p_column_value => p_financial_report_rec.forecast_ind,
16562: x_return_status => x_return_status);
16563:
16564: /*IF g_debug THEN
16565: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16566: 'forecast_ind should be in lookup YES/NO. ' ||
16567: 'x_return_status = ' || x_return_status, l_debug_prefix);
16568: END IF;
16569: */
16567: 'x_return_status = ' || x_return_status, l_debug_prefix);
16568: END IF;
16569: */
16570: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16571: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'forecast_ind should be in lookup YES/NO. ' ||
16572: 'x_return_status = ' || x_return_status,
16573: p_msg_level=>fnd_log.level_statement);
16574: END IF;
16575: END IF;
16577: ----------------------------------
16578: -- validation for opening_ind
16579: ----------------------------------
16580: /****Logical APIs - validation not required****/
16581: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
16582: -- opening_ind is lookup code in lookup type YES/NO
16583: validate_lookup (
16584: p_column => 'opening_ind',
16585: p_lookup_type => 'YES/NO',
16586: p_column_value => p_financial_report_rec.opening_ind,
16587: x_return_status => x_return_status);
16588:
16589: /*IF g_debug THEN
16590: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16591: 'opening_ind should be in lookup YES/NO. ' ||
16592: 'x_return_status = ' || x_return_status, l_debug_prefix);
16593: END IF;
16594: */
16592: 'x_return_status = ' || x_return_status, l_debug_prefix);
16593: END IF;
16594: */
16595: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16596: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'opening_ind should be in lookup YES/NO. ' ||
16597: 'x_return_status = ' || x_return_status,
16598: p_msg_level=>fnd_log.level_statement);
16599: END IF;
16600: END IF;
16602: ------------------------------------
16603: --validation for proforma_ind
16604: ------------------------------------
16605: /****Logical APIs - validation not required****/
16606: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
16607: -- proforma_ind is lookup code in lookup type YES/NO
16608: validate_lookup (
16609: p_column => 'proforma_ind',
16610: p_lookup_type => 'YES/NO',
16611: p_column_value => p_financial_report_rec.proforma_ind,
16612: x_return_status => x_return_status);
16613:
16614: /*IF g_debug THEN
16615: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16616: 'proforma_ind should be in lookup YES/NO. ' ||
16617: 'x_return_status = ' || x_return_status, l_debug_prefix);
16618: END IF;
16619: */
16617: 'x_return_status = ' || x_return_status, l_debug_prefix);
16618: END IF;
16619: */
16620: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16621: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'proforma_ind should be in lookup YES/NO. ' ||
16622: 'x_return_status = ' || x_return_status,
16623: p_msg_level=>fnd_log.level_statement);
16624: END IF;
16625: END IF;
16627: ----------------------------------
16628: -- validation for qualified_ind
16629: ----------------------------------
16630: /****Logical APIs - validation not required****/
16631: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
16632: -- qualified_ind is lookup code in lookup type YES/NO
16633: validate_lookup (
16634: p_column => 'qualified_ind',
16635: p_lookup_type => 'YES/NO',
16636: p_column_value => p_financial_report_rec.qualified_ind,
16637: x_return_status => x_return_status);
16638:
16639: /*IF g_debug THEN
16640: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16641: 'qualified_ind should be in lookup YES/NO. ' ||
16642: 'x_return_status = ' || x_return_status, l_debug_prefix);
16643: END IF;
16644: */
16642: 'x_return_status = ' || x_return_status, l_debug_prefix);
16643: END IF;
16644: */
16645: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16646: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'qualified_ind should be in lookup YES/NO. ' ||
16647: 'x_return_status = ' || x_return_status,
16648: p_msg_level=>fnd_log.level_statement);
16649: END IF;
16650: END IF;
16652: ------------------------------------
16653: --validation for restated_ind
16654: ------------------------------------
16655: /****Logical APIs - validation not required****/
16656: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
16657: -- restated_ind is lookup code in lookup type YES/NO
16658: validate_lookup (
16659: p_column => 'restated_ind',
16660: p_lookup_type => 'YES/NO',
16661: p_column_value => p_financial_report_rec.restated_ind,
16662: x_return_status => x_return_status);
16663:
16664: /*IF g_debug THEN
16665: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16666: 'restated_ind should be in lookup YES/NO. ' ||
16667: 'x_return_status = ' || x_return_status, l_debug_prefix);
16668: END IF;
16669: */
16667: 'x_return_status = ' || x_return_status, l_debug_prefix);
16668: END IF;
16669: */
16670: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16671: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'restated_ind should be in lookup YES/NO. ' ||
16672: 'x_return_status = ' || x_return_status,
16673: p_msg_level=>fnd_log.level_statement);
16674: END IF;
16675: END IF;
16677: ----------------------------------
16678: -- validation for signed_by_principals_ind
16679: ----------------------------------
16680: /****Logical APIs - validation not required****/
16681: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
16682: -- signed_by_principals_ind is lookup code in lookup type YES/NO
16683: validate_lookup (
16684: p_column => 'signed_by_principals_ind',
16685: p_lookup_type => 'YES/NO',
16686: p_column_value => p_financial_report_rec.signed_by_principals_ind,
16687: x_return_status => x_return_status);
16688:
16689: /*IF g_debug THEN
16690: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16691: 'signed_by_principals_ind should be in lookup YES/NO. ' ||
16692: 'x_return_status = ' || x_return_status, l_debug_prefix);
16693: END IF;
16694: */
16692: 'x_return_status = ' || x_return_status, l_debug_prefix);
16693: END IF;
16694: */
16695: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16696: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'signed_by_principals_ind should be in lookup YES/NO. ' ||
16697: 'x_return_status = ' || x_return_status,
16698: p_msg_level=>fnd_log.level_statement);
16699: END IF;
16700: END IF;
16702: ------------------------------------
16703: --validation for trial_balance_ind
16704: ------------------------------------
16705: /****Logical APIs - validation not required****/
16706: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
16707: -- trial_balance_ind is lookup code in lookup type YES/NO
16708: validate_lookup (
16709: p_column => 'trial_balance_ind',
16710: p_lookup_type => 'YES/NO',
16711: p_column_value => p_financial_report_rec.trial_balance_ind,
16712: x_return_status => x_return_status);
16713:
16714: /*IF g_debug THEN
16715: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16716: 'trial_balance_ind should be in lookup YES/NO. ' ||
16717: 'x_return_status = ' || x_return_status, l_debug_prefix);
16718: END IF;
16719: */
16717: 'x_return_status = ' || x_return_status, l_debug_prefix);
16718: END IF;
16719: */
16720: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16721: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'trial_balance_ind should be in lookup YES/NO. ' ||
16722: 'x_return_status = ' || x_return_status,
16723: p_msg_level=>fnd_log.level_statement);
16724: END IF;
16725: END IF;
16727: ----------------------------------
16728: -- validation for unbalanced_ind
16729: ----------------------------------
16730: /****Logical APIs - validation not required****/
16731: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
16732: -- unbalanced_ind is lookup code in lookup type YES/NO
16733: validate_lookup (
16734: p_column => 'unbalanced_ind',
16735: p_lookup_type => 'YES/NO',
16736: p_column_value => p_financial_report_rec.unbalanced_ind,
16737: x_return_status => x_return_status);
16738:
16739: /*IF g_debug THEN
16740: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16741: 'unbalanced_ind should be in lookup YES/NO. ' ||
16742: 'x_return_status = ' || x_return_status, l_debug_prefix);
16743: END IF;
16744: */
16742: 'x_return_status = ' || x_return_status, l_debug_prefix);
16743: END IF;
16744: */
16745: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16746: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'unbalanced_ind should be in lookup YES/NO. ' ||
16747: 'x_return_status = ' || x_return_status,
16748: p_msg_level=>fnd_log.level_statement);
16749: END IF;
16750: END IF;
16752: ------------------------
16753: -- validation for status
16754: ------------------------
16755: /****Logical APIs - validation not required****/
16756: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
16757: -- status is lookup code in lookup type REGISTRY_STATUS
16758: IF p_financial_report_rec.status IS NOT NULL
16759: AND
16760: p_financial_report_rec.status <> fnd_api.g_miss_char
16773: p_column_value => p_financial_report_rec.status,
16774: x_return_status => x_return_status);
16775:
16776: /*IF g_debug THEN
16777: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16778: 'status is lookup code in lookup type REGISTRY_STATUS. ' ||
16779: 'x_return_status = ' || x_return_status, l_debug_prefix);
16780: END IF;
16781: */
16779: 'x_return_status = ' || x_return_status, l_debug_prefix);
16780: END IF;
16781: */
16782: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16783: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=> 'status is lookup code in lookup type REGISTRY_STATUS. ' ||
16784: 'x_return_status = ' || x_return_status,
16785: p_msg_level=>fnd_log.level_statement);
16786: END IF;
16787:
16809: p_column_value => p_financial_report_rec.actual_content_source,
16810: x_return_status => x_return_status);
16811:
16812: /*IF g_debug THEN
16813: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16814: 'actual_content_source is mandatory field. ' ||
16815: 'x_return_status = ' || x_return_status, l_debug_prefix);
16816: END IF;
16817: */
16815: 'x_return_status = ' || x_return_status, l_debug_prefix);
16816: END IF;
16817: */
16818: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16819: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'actual_content_source is mandatory field. ' ||
16820: 'x_return_status = ' || x_return_status,
16821: p_msg_level=>fnd_log.level_statement);
16822: END IF;
16823:
16833: p_column_value => p_financial_report_rec.actual_content_source,
16834: x_return_status => x_return_status);
16835: */
16836: /*IF g_debug THEN
16837: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16838: 'actual_content_source should be in lookup CONTENT_SOURCE_TYPE. ' ||
16839: 'x_return_status = ' || x_return_status, l_debug_prefix);
16840: END IF;
16841: */
16840: END IF;
16841: */
16842: /*
16843: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16844: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16845: p_message=>'actual_content_source should be in lookup CONTENT_SOURCE_TYPE. ' ||
16846: 'x_return_status = ' || x_return_status,
16847: p_msg_level=>fnd_log.level_statement);
16848: END IF;
16869: p_old_created_by_module => l_created_by_module,
16870: x_return_status => x_return_status);
16871:
16872: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
16873: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_financial_report (-)',
16874: p_msg_level=>fnd_log.level_procedure);
16875: END IF;
16876:
16877: END validate_financial_report;
16942: --enable_debug;
16943:
16944: -- Debug info.
16945: /*IF g_debug THEN
16946: hz_utility_v2pub.debug ('validate_financial_number (+)');
16947: END IF;
16948: */
16949: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
16950: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_financial_number (+)',
16946: hz_utility_v2pub.debug ('validate_financial_number (+)');
16947: END IF;
16948: */
16949: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
16950: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_financial_number (+)',
16951: p_msg_level=>fnd_log.level_procedure);
16952: END IF;
16953:
16954: -- do the query to get old values for update
16971: -------------------------------------
16972: -- validation for financial_number_id
16973: -------------------------------------
16974: /****Logical APIs - validation not required****/
16975: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
16976: --check for unique financial_number_id
16977: IF p_create_update_flag = 'C' THEN
16978: IF p_financial_number_rec.financial_number_id IS NOT NULL AND
16979: p_financial_number_rec.financial_number_id <> fnd_api.g_miss_num
16990: END IF;
16991: CLOSE c_dup_financial_number_id;
16992:
16993: /*IF g_debug THEN
16994: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16995: 'check that financial_number_id is unique during creation. ' ||
16996: ' x_return_status = ' || x_return_status, l_debug_prefix);
16997: END IF;
16998: */
16996: ' x_return_status = ' || x_return_status, l_debug_prefix);
16997: END IF;
16998: */
16999: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17000: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'check that financial_number_id is unique during creation. ' ||
17001: ' x_return_status = ' || x_return_status,
17002: p_msg_level=>fnd_log.level_statement);
17003: END IF;
17004:
17005: END IF;
17006: END IF;
17007:
17008: /*IF g_debug THEN
17009: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17010: '(+) after validate financial_number_id ... ' ||
17011: 'x_return_status = ' || x_return_status, l_debug_prefix);
17012: END IF;
17013: */
17011: 'x_return_status = ' || x_return_status, l_debug_prefix);
17012: END IF;
17013: */
17014: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17015: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate financial_number_id ... ' ||
17016: 'x_return_status = ' || x_return_status,
17017: p_msg_level=>fnd_log.level_statement);
17018: END IF;
17019:
17025: p_old_column_value => l_financial_number_id,
17026: x_return_status => x_return_status);
17027:
17028: /*IF g_debug THEN
17029: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17030: 'financial_number_id is non-updateable field. ' ||
17031: 'x_return_status = ' || x_return_status, l_debug_prefix);
17032: END IF;
17033: */
17031: 'x_return_status = ' || x_return_status, l_debug_prefix);
17032: END IF;
17033: */
17034: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17035: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'financial_number_id is non-updateable field. ' ||
17036: 'x_return_status = ' || x_return_status,
17037: p_msg_level=>fnd_log.level_statement);
17038: END IF;
17039:
17043: -------------------------------------
17044: -- validation for financial_report_id
17045: -------------------------------------
17046: /****Logical APIs - validation not required****/
17047: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
17048: --Must exist in HZ_FINANCIAL_REPORTS. Non-updateable.
17049: -- financial_report_id has foreign key HZ_FINANCIAL_REPORTS.FINANCIAL_REPORT_ID
17050: IF p_create_update_flag = 'C'
17051: AND
17072: x_return_status := fnd_api.g_ret_sts_error;
17073: END;
17074:
17075: /*IF g_debug THEN
17076: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17077: 'financial_report_id has foreign key hz_financial_reports.financial_report_id. ' ||
17078: 'x_return_status = ' || x_return_status, l_debug_prefix);
17079: END IF;
17080: */
17078: 'x_return_status = ' || x_return_status, l_debug_prefix);
17079: END IF;
17080: */
17081: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17082: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17083: p_message=>'financial_report_id has foreign key hz_financial_reports.financial_report_id. ' ||
17084: 'x_return_status = ' || x_return_status,
17085: p_msg_level=>fnd_log.level_statement);
17086: END IF;
17095: p_old_column_value => l_financial_report_id,
17096: x_return_status => x_return_status);
17097:
17098: /*IF g_debug THEN
17099: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17100: 'financial_report_id is non-updateable field. ' ||
17101: 'x_return_status = ' || x_return_status, l_debug_prefix);
17102: END IF;
17103: */
17101: 'x_return_status = ' || x_return_status, l_debug_prefix);
17102: END IF;
17103: */
17104: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17105: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'financial_report_id is non-updateable field. ' ||
17106: 'x_return_status = ' || x_return_status,
17107: p_msg_level=>fnd_log.level_statement);
17108: END IF;
17109:
17117: p_column_value => p_financial_number_rec.financial_report_id,
17118: x_return_status => x_return_status);
17119:
17120: /*IF g_debug THEN
17121: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17122: 'financial_report_id is mandatory field. ' ||
17123: 'x_return_status = ' || x_return_status, l_debug_prefix);
17124: END IF;
17125: */
17123: 'x_return_status = ' || x_return_status, l_debug_prefix);
17124: END IF;
17125: */
17126: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17127: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'financial_report_id is mandatory field. ' ||
17128: 'x_return_status = ' || x_return_status,
17129: p_msg_level=>fnd_log.level_statement);
17130: END IF;
17131:
17149: END IF;
17150: CLOSE c_unique_financial_number_rec;
17151:
17152: /*IF g_debug THEN
17153: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17154: 'The following column combination should be unique:' ||
17155: ' FINANCIAL_REPORT_ID, FINANCIAL_NUMBER_NAME. ' ||
17156: ' x_return_status = ' || x_return_status, l_debug_prefix);
17157: END IF;
17156: ' x_return_status = ' || x_return_status, l_debug_prefix);
17157: END IF;
17158: */
17159: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17160: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'The following column combination should be unique:' ||
17161: ' FINANCIAL_REPORT_ID, FINANCIAL_NUMBER_NAME. ' ||
17162: ' x_return_status = ' || x_return_status,
17163: p_msg_level=>fnd_log.level_statement);
17164: END IF;
17173: p_old_column_value => l_financial_number_name,
17174: x_return_status => x_return_status);
17175:
17176: /*IF g_debug THEN
17177: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17178: 'financial_number_name is non-updateable field. ' ||
17179: 'x_return_status = ' || x_return_status, l_debug_prefix);
17180: END IF;
17181: */
17179: 'x_return_status = ' || x_return_status, l_debug_prefix);
17180: END IF;
17181: */
17182: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17183: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17184: p_message=>'financial_number_name is non-updateable field. ' ||
17185: 'x_return_status = ' || x_return_status,
17186: p_msg_level=>fnd_log.level_statement);
17187: END IF;
17198: p_column_value => p_financial_number_rec.financial_number_name,
17199: x_return_status => x_return_status);
17200:
17201: /*IF g_debug THEN
17202: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17203: 'financial_number_name should be in lookup YES/NO. ' ||
17204: 'x_return_status = ' || x_return_status, l_debug_prefix);
17205: END IF;
17206: */
17204: 'x_return_status = ' || x_return_status, l_debug_prefix);
17205: END IF;
17206: */
17207: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17208: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17209: p_message=>'financial_number_name should be in lookup YES/NO. ' ||
17210: 'x_return_status = ' || x_return_status,
17211: p_msg_level=>fnd_log.level_statement);
17212: END IF;
17214: ------------------------
17215: -- validation for status
17216: ------------------------
17217: /****Logical APIs - validation not required****/
17218: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
17219: -- status is lookup code in lookup type REGISTRY_STATUS
17220: IF p_financial_number_rec.status IS NOT NULL
17221: AND
17222: p_financial_number_rec.status <> fnd_api.g_miss_char
17235: p_column_value => p_financial_number_rec.status,
17236: x_return_status => x_return_status);
17237:
17238: /*IF g_debug THEN
17239: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17240: 'status is lookup code in lookup type REGISTRY_STATUS. ' ||
17241: 'x_return_status = ' || x_return_status, l_debug_prefix);
17242: END IF;
17243: */
17241: 'x_return_status = ' || x_return_status, l_debug_prefix);
17242: END IF;
17243: */
17244: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17245: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17246: p_message=>'status is lookup code in lookup type REGISTRY_STATUS. ' ||
17247: 'x_return_status = ' || x_return_status,
17248: p_msg_level=>fnd_log.level_statement);
17249: END IF;
17269: p_old_created_by_module => l_created_by_module,
17270: x_return_status => x_return_status);
17271:
17272: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
17273: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_financial_number (-)',
17274: p_msg_level=>fnd_log.level_procedure);
17275: END IF;
17276:
17277: END validate_financial_number;
17399: --enable_debug;
17400:
17401: -- Debug info.
17402: /*IF g_debug THEN
17403: hz_utility_v2pub.debug ('validate_credit_rating (+)');
17404: END IF;
17405: */
17406: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
17407: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_credit_rating (+)',
17403: hz_utility_v2pub.debug ('validate_credit_rating (+)');
17404: END IF;
17405: */
17406: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
17407: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_credit_rating (+)',
17408: p_msg_level=>fnd_log.level_procedure);
17409: END IF;
17410:
17411: -- do the query to get old values for update
17496: -------------------------------------
17497: -- validation for credit_rating_id
17498: -------------------------------------
17499: /****Logical APIs - validation not required****/
17500: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
17501: --check for unique credit_rating_id
17502: IF p_create_update_flag = 'C' THEN
17503: IF p_credit_rating_rec.credit_rating_id IS NOT NULL AND
17504: p_credit_rating_rec.credit_rating_id <> fnd_api.g_miss_num
17515: END IF;
17516: CLOSE c_dup_credit_rating_id;
17517:
17518: /*IF g_debug THEN
17519: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17520: 'check that credit_rating_id is unique during creation. ' ||
17521: ' x_return_status = ' || x_return_status, l_debug_prefix);
17522: END IF;
17523: */
17521: ' x_return_status = ' || x_return_status, l_debug_prefix);
17522: END IF;
17523: */
17524: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17525: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17526: p_message=>'check that credit_rating_id is unique during creation. ' ||
17527: ' x_return_status = ' || x_return_status,
17528: p_msg_level=>fnd_log.level_statement);
17529: END IF;
17531: END IF;
17532: END IF;
17533:
17534: /*IF g_debug THEN
17535: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17536: '(+) after validate credit_rating_id ... ' ||
17537: 'x_return_status = ' || x_return_status, l_debug_prefix);
17538: END IF;
17539: */
17537: 'x_return_status = ' || x_return_status, l_debug_prefix);
17538: END IF;
17539: */
17540: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17541: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate credit_rating_id ... ' ||
17542: 'x_return_status = ' || x_return_status,
17543: p_msg_level=>fnd_log.level_statement);
17544: END IF;
17545:
17551: p_old_column_value => l_credit_rating_id,
17552: x_return_status => x_return_status);
17553:
17554: /*IF g_debug THEN
17555: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17556: 'credit_rating_id is non-updateable field. ' ||
17557: 'x_return_status = ' || x_return_status, l_debug_prefix);
17558: END IF;
17559: */
17557: 'x_return_status = ' || x_return_status, l_debug_prefix);
17558: END IF;
17559: */
17560: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17561: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'credit_rating_id is non-updateable field. ' ||
17562: 'x_return_status = ' || x_return_status,
17563: p_msg_level=>fnd_log.level_statement);
17564: END IF;
17565:
17569: -------------------------------------
17570: -- validation for party_id
17571: -------------------------------------
17572: /****Logical APIs - validation not required****/
17573: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
17574: --party_id is a mandatory field
17575: IF p_create_update_flag = 'C' THEN
17576: validate_mandatory (
17577: p_create_update_flag => p_create_update_flag,
17579: p_column_value => p_credit_rating_rec.party_id,
17580: x_return_status => x_return_status);
17581:
17582: /*IF g_debug THEN
17583: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17584: 'party_id is mandatory field. ' ||
17585: 'x_return_status = ' || x_return_status, l_debug_prefix);
17586: END IF;
17587: */
17585: 'x_return_status = ' || x_return_status, l_debug_prefix);
17586: END IF;
17587: */
17588: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17589: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id is mandatory field. ' ||
17590: 'x_return_status = ' || x_return_status,
17591: p_msg_level=>fnd_log.level_statement);
17592: END IF;
17593:
17615: x_return_status := fnd_api.g_ret_sts_error;
17616: END;
17617:
17618: /*IF g_debug THEN
17619: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17620: 'party_id has foreign key hz_parties.party_id. ' ||
17621: 'x_return_status = ' || x_return_status, l_debug_prefix);
17622: END IF;
17623: */
17621: 'x_return_status = ' || x_return_status, l_debug_prefix);
17622: END IF;
17623: */
17624: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17625: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id has foreign key hz_parties.party_id. ' ||
17626: 'x_return_status = ' || x_return_status,
17627: p_msg_level=>fnd_log.level_statement);
17628: END IF;
17629:
17637: p_old_column_value => l_party_id,
17638: x_return_status => x_return_status);
17639:
17640: /*IF g_debug THEN
17641: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17642: 'party_id is non-updateable field. ' ||
17643: 'x_return_status = ' || x_return_status, l_debug_prefix);
17644: END IF;
17645: */
17643: 'x_return_status = ' || x_return_status, l_debug_prefix);
17644: END IF;
17645: */
17646: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17647: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id is non-updateable field. ' ||
17648: 'x_return_status = ' || x_return_status,
17649: p_msg_level=>fnd_log.level_statement);
17650: END IF;
17651:
17676: | END IF;
17677: | CLOSE c_unique_credit_rating_rec;
17678: |
17679: | IF g_debug THEN
17680: | hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17681: | 'The following column combination should be unique:' ||
17682: | ' PARTY_ID, TRUNC(RATED_AS_OF_DATE), RATING_ORGANIZATION, and ACTUAL_CONTENT_SOURCE. ' ||
17683: | ' x_return_status = ' || x_return_status, l_debug_prefix);
17684: | END IF;
17696: p_old_column_value => trunc(l_rated_as_of_date),
17697: x_return_status => x_return_status);
17698:
17699: /*IF g_debug THEN
17700: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17701: 'rated_as_of_date is non-updateable field. ' ||
17702: 'x_return_status = ' || x_return_status, l_debug_prefix);
17703: END IF;
17704: */
17702: 'x_return_status = ' || x_return_status, l_debug_prefix);
17703: END IF;
17704: */
17705: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17706: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'rated_as_of_date is non-updateable field. ' ||
17707: 'x_return_status = ' || x_return_status,
17708: p_msg_level=>fnd_log.level_statement);
17709: END IF;
17710:
17719: p_old_column_value => l_rating_organization,
17720: x_return_status => x_return_status);
17721:
17722: /*IF g_debug THEN
17723: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17724: 'rating_organization is non-updateable field. ' ||
17725: 'x_return_status = ' || x_return_status, l_debug_prefix);
17726: END IF;
17727: */
17725: 'x_return_status = ' || x_return_status, l_debug_prefix);
17726: END IF;
17727: */
17728: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17729: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'rating_organization is non-updateable field. ' ||
17730: 'x_return_status = ' || x_return_status,
17731: p_msg_level=>fnd_log.level_statement);
17732: END IF;
17733:
17735: ----------------------------------
17736: -- validation for fincl_embt_ind
17737: ----------------------------------
17738: /****Logical APIs - validation not required****/
17739: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
17740: --bug 2843453, fincl_embt_ind should be validated against YES/NO instead
17741: --of REGISTRY_STATUS
17742: -- fincl_embt_ind is lookup code in lookup type YES/NO
17743: validate_lookup (
17746: p_column_value => p_credit_rating_rec.fincl_embt_ind,
17747: x_return_status => x_return_status);
17748:
17749: /*IF g_debug THEN
17750: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17751: 'fincl_embt_ind should be in lookup YES/NO. ' ||
17752: 'x_return_status = ' || x_return_status, l_debug_prefix);
17753: END IF;
17754: */
17752: 'x_return_status = ' || x_return_status, l_debug_prefix);
17753: END IF;
17754: */
17755: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17756: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'fincl_embt_ind should be in lookup YES/NO. ' ||
17757: 'x_return_status = ' || x_return_status,
17758: p_msg_level=>fnd_log.level_statement);
17759: END IF;
17760: END IF;
17770: p_column_value => p_credit_rating_rec.credit_score_commentary,
17771: x_return_status => x_return_status);
17772:
17773: /*IF g_debug THEN
17774: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17775: 'credit_score_commentary should be in lookup CREDIT_SCORE_COMMENTARY. ' ||
17776: 'x_return_status = ' || x_return_status, l_debug_prefix);
17777: END IF;
17778: */
17776: 'x_return_status = ' || x_return_status, l_debug_prefix);
17777: END IF;
17778: */
17779: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17780: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17781: p_message=>'credit_score_commentary should be in lookup CREDIT_SCORE_COMMENTARY. ' ||
17782: 'x_return_status = ' || x_return_status,
17783: p_msg_level=>fnd_log.level_statement);
17784: END IF;
17795: p_column_value => p_credit_rating_rec.credit_score_commentary2,
17796: x_return_status => x_return_status);
17797:
17798: /*IF g_debug THEN
17799: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17800: 'credit_score_commentary2 should be in lookup CREDIT_SCORE_COMMENTARY. ' ||
17801: 'x_return_status = ' || x_return_status, l_debug_prefix);
17802: END IF;
17803: */
17801: 'x_return_status = ' || x_return_status, l_debug_prefix);
17802: END IF;
17803: */
17804: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17805: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'credit_score_commentary2 should be in lookup CREDIT_SCORE_COMMENTARY. ' ||
17806: 'x_return_status = ' || x_return_status,
17807: p_msg_level=>fnd_log.level_statement);
17808: END IF;
17809:
17818: p_column_value => p_credit_rating_rec.credit_score_commentary3,
17819: x_return_status => x_return_status);
17820:
17821: /*IF g_debug THEN
17822: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17823: 'credit_score_commentary3 should be in lookup CREDIT_SCORE_COMMENTARY. ' ||
17824: 'x_return_status = ' || x_return_status, l_debug_prefix);
17825: END IF;
17826: */
17824: 'x_return_status = ' || x_return_status, l_debug_prefix);
17825: END IF;
17826: */
17827: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17828: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'credit_score_commentary3 should be in lookup CREDIT_SCORE_COMMENTARY. ' ||
17829: 'x_return_status = ' || x_return_status,
17830: p_msg_level=>fnd_log.level_statement);
17831: END IF;
17832:
17841: p_column_value => p_credit_rating_rec.credit_score_commentary4,
17842: x_return_status => x_return_status);
17843:
17844: /*IF g_debug THEN
17845: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17846: 'credit_score_commentary4 should be in lookup CREDIT_SCORE_COMMENTARY. ' ||
17847: 'x_return_status = ' || x_return_status, l_debug_prefix);
17848: END IF;
17849: */
17847: 'x_return_status = ' || x_return_status, l_debug_prefix);
17848: END IF;
17849: */
17850: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17851: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'credit_score_commentary4 should be in lookup CREDIT_SCORE_COMMENTARY. ' ||
17852: 'x_return_status = ' || x_return_status,
17853: p_msg_level=>fnd_log.level_statement);
17854: END IF;
17855:
17864: p_column_value => p_credit_rating_rec.credit_score_commentary5,
17865: x_return_status => x_return_status);
17866:
17867: /*IF g_debug THEN
17868: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17869: 'credit_score_commentary5 should be in lookup CREDIT_SCORE_COMMENTARY. ' ||
17870: 'x_return_status = ' || x_return_status, l_debug_prefix);
17871: END IF;
17872: */
17870: 'x_return_status = ' || x_return_status, l_debug_prefix);
17871: END IF;
17872: */
17873: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17874: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'credit_score_commentary5 should be in lookup CREDIT_SCORE_COMMENTARY. ' ||
17875: 'x_return_status = ' || x_return_status,
17876: p_msg_level=>fnd_log.level_statement);
17877: END IF;
17878:
17887: p_column_value => p_credit_rating_rec.credit_score_commentary6,
17888: x_return_status => x_return_status);
17889:
17890: /*IF g_debug THEN
17891: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17892: 'credit_score_commentary6 should be in lookup CREDIT_SCORE_COMMENTARY. ' ||
17893: 'x_return_status = ' || x_return_status, l_debug_prefix);
17894: END IF;
17895: */
17893: 'x_return_status = ' || x_return_status, l_debug_prefix);
17894: END IF;
17895: */
17896: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17897: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'credit_score_commentary6 should be in lookup CREDIT_SCORE_COMMENTARY. ' ||
17898: 'x_return_status = ' || x_return_status,
17899: p_msg_level=>fnd_log.level_statement);
17900: END IF;
17901:
17910: p_column_value => p_credit_rating_rec.credit_score_commentary7,
17911: x_return_status => x_return_status);
17912:
17913: /*IF g_debug THEN
17914: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17915: 'credit_score_commentary7 should be in lookup CREDIT_SCORE_COMMENTARY. ' ||
17916: 'x_return_status = ' || x_return_status, l_debug_prefix);
17917: END IF;
17918: */
17916: 'x_return_status = ' || x_return_status, l_debug_prefix);
17917: END IF;
17918: */
17919: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17920: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'credit_score_commentary7 should be in lookup CREDIT_SCORE_COMMENTARY. ' ||
17921: 'x_return_status = ' || x_return_status,
17922: p_msg_level=>fnd_log.level_statement);
17923: END IF;
17924:
17933: p_column_value => p_credit_rating_rec.credit_score_commentary8,
17934: x_return_status => x_return_status);
17935:
17936: /*IF g_debug THEN
17937: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17938: 'credit_score_commentary8 should be in lookup CREDIT_SCORE_COMMENTARY. ' ||
17939: 'x_return_status = ' || x_return_status, l_debug_prefix);
17940: END IF;
17941: */
17939: 'x_return_status = ' || x_return_status, l_debug_prefix);
17940: END IF;
17941: */
17942: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17943: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17944: p_message=>'credit_score_commentary8 should be in lookup CREDIT_SCORE_COMMENTARY. ' ||
17945: 'x_return_status = ' || x_return_status,
17946: p_msg_level=>fnd_log.level_statement);
17947: END IF;
17957: p_column_value => p_credit_rating_rec.credit_score_commentary9,
17958: x_return_status => x_return_status);
17959:
17960: /*IF g_debug THEN
17961: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17962: 'credit_score_commentary9 should be in lookup CREDIT_SCORE_COMMENTARY. ' ||
17963: 'x_return_status = ' || x_return_status, l_debug_prefix);
17964: END IF;
17965: */
17963: 'x_return_status = ' || x_return_status, l_debug_prefix);
17964: END IF;
17965: */
17966: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17967: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17968: p_message=>'credit_score_commentary9 should be in lookup CREDIT_SCORE_COMMENTARY. ' ||
17969: 'x_return_status = ' || x_return_status,
17970: p_msg_level=>fnd_log.level_statement);
17971: END IF;
17981: p_column_value => p_credit_rating_rec.credit_score_commentary10,
17982: x_return_status => x_return_status);
17983:
17984: /*IF g_debug THEN
17985: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17986: 'credit_score_commentary10 should be in lookup CREDIT_SCORE_COMMENTARY. ' ||
17987: 'x_return_status = ' || x_return_status, l_debug_prefix);
17988: END IF;
17989: */
17987: 'x_return_status = ' || x_return_status, l_debug_prefix);
17988: END IF;
17989: */
17990: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17991: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17992: p_message=>'credit_score_commentary10 should be in lookup CREDIT_SCORE_COMMENTARY. ' ||
17993: 'x_return_status = ' || x_return_status,
17994: p_msg_level=>fnd_log.level_statement);
17995: END IF;
18005: p_column_value => p_credit_rating_rec.failure_score_commentary,
18006: x_return_status => x_return_status);
18007:
18008: /*IF g_debug THEN
18009: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18010: 'failure_score_commentary should be in lookup FAILURE_SCORE_COMMENTARY. ' ||
18011: 'x_return_status = ' || x_return_status, l_debug_prefix);
18012: END IF;
18013: */
18011: 'x_return_status = ' || x_return_status, l_debug_prefix);
18012: END IF;
18013: */
18014: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
18015: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18016: p_message=>'failure_score_commentary should be in lookup FAILURE_SCORE_COMMENTARY. ' ||
18017: 'x_return_status = ' || x_return_status,
18018: p_msg_level=>fnd_log.level_statement);
18019: END IF;
18029: p_column_value => p_credit_rating_rec.failure_score_commentary2,
18030: x_return_status => x_return_status);
18031:
18032: /*IF g_debug THEN
18033: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18034: 'failure_score_commentary2 should be in lookup FAILURE_SCORE_COMMENTARY. ' ||
18035: 'x_return_status = ' || x_return_status, l_debug_prefix);
18036: END IF;
18037: */
18035: 'x_return_status = ' || x_return_status, l_debug_prefix);
18036: END IF;
18037: */
18038: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
18039: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18040: p_message=>'failure_score_commentary2 should be in lookup FAILURE_SCORE_COMMENTARY. ' ||
18041: 'x_return_status = ' || x_return_status,
18042: p_msg_level=>fnd_log.level_statement);
18043: END IF;
18053: p_column_value => p_credit_rating_rec.failure_score_commentary3,
18054: x_return_status => x_return_status);
18055:
18056: /*IF g_debug THEN
18057: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18058: 'failure_score_commentary2 should be in lookup FAILURE_SCORE_COMMENTARY. ' ||
18059: 'x_return_status = ' || x_return_status, l_debug_prefix);
18060: END IF;
18061: */
18059: 'x_return_status = ' || x_return_status, l_debug_prefix);
18060: END IF;
18061: */
18062: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
18063: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18064: p_message=>'failure_score_commentary2 should be in lookup FAILURE_SCORE_COMMENTARY. ' ||
18065: 'x_return_status = ' || x_return_status,
18066: p_msg_level=>fnd_log.level_statement);
18067: END IF;
18077: p_column_value => p_credit_rating_rec.failure_score_commentary4,
18078: x_return_status => x_return_status);
18079:
18080: /*IF g_debug THEN
18081: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18082: 'failure_score_commentary4 should be in lookup FAILURE_SCORE_COMMENTARY. ' ||
18083: 'x_return_status = ' || x_return_status, l_debug_prefix);
18084: END IF;
18085: */
18083: 'x_return_status = ' || x_return_status, l_debug_prefix);
18084: END IF;
18085: */
18086: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
18087: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18088: p_message=>'failure_score_commentary4 should be in lookup FAILURE_SCORE_COMMENTARY. ' ||
18089: 'x_return_status = ' || x_return_status,
18090: p_msg_level=>fnd_log.level_statement);
18091: END IF;
18101: p_column_value => p_credit_rating_rec.failure_score_commentary5,
18102: x_return_status => x_return_status);
18103:
18104: /*IF g_debug THEN
18105: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18106: 'failure_score_commentary5 should be in lookup FAILURE_SCORE_COMMENTARY. ' ||
18107: 'x_return_status = ' || x_return_status, l_debug_prefix);
18108: END IF;
18109: */
18107: 'x_return_status = ' || x_return_status, l_debug_prefix);
18108: END IF;
18109: */
18110: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
18111: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18112: p_message=>'failure_score_commentary5 should be in lookup FAILURE_SCORE_COMMENTARY. ' ||
18113: 'x_return_status = ' || x_return_status,
18114: p_msg_level=>fnd_log.level_statement);
18115: END IF;
18125: p_column_value => p_credit_rating_rec.failure_score_commentary6,
18126: x_return_status => x_return_status);
18127:
18128: /*IF g_debug THEN
18129: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18130: 'failure_score_commentary6 should be in lookup FAILURE_SCORE_COMMENTARY. ' ||
18131: 'x_return_status = ' || x_return_status, l_debug_prefix);
18132: END IF;
18133: */
18131: 'x_return_status = ' || x_return_status, l_debug_prefix);
18132: END IF;
18133: */
18134: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
18135: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18136: p_message=>'failure_score_commentary6 should be in lookup FAILURE_SCORE_COMMENTARY. ' ||
18137: 'x_return_status = ' || x_return_status,
18138: p_msg_level=>fnd_log.level_statement);
18139: END IF;
18149: p_column_value => p_credit_rating_rec.failure_score_commentary7,
18150: x_return_status => x_return_status);
18151:
18152: /*IF g_debug THEN
18153: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18154: 'failure_score_commentary7 should be in lookup FAILURE_SCORE_COMMENTARY. ' ||
18155: 'x_return_status = ' || x_return_status, l_debug_prefix);
18156: END IF;
18157: */
18155: 'x_return_status = ' || x_return_status, l_debug_prefix);
18156: END IF;
18157: */
18158: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
18159: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18160: p_message=>'failure_score_commentary7 should be in lookup FAILURE_SCORE_COMMENTARY. ' ||
18161: 'x_return_status = ' || x_return_status,
18162: p_msg_level=>fnd_log.level_statement);
18163: END IF;
18173: p_column_value => p_credit_rating_rec.failure_score_commentary8,
18174: x_return_status => x_return_status);
18175:
18176: /*IF g_debug THEN
18177: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18178: 'failure_score_commentary8 should be in lookup FAILURE_SCORE_COMMENTARY. ' ||
18179: 'x_return_status = ' || x_return_status, l_debug_prefix);
18180: END IF;
18181: */
18179: 'x_return_status = ' || x_return_status, l_debug_prefix);
18180: END IF;
18181: */
18182: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
18183: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18184: p_message=>'failure_score_commentary8 should be in lookup FAILURE_SCORE_COMMENTARY. ' ||
18185: 'x_return_status = ' || x_return_status,
18186: p_msg_level=>fnd_log.level_statement);
18187: END IF;
18197: p_column_value => p_credit_rating_rec.failure_score_commentary9,
18198: x_return_status => x_return_status);
18199:
18200: /*IF g_debug THEN
18201: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18202: 'failure_score_commentary9 should be in lookup FAILURE_SCORE_COMMENTARY. ' ||
18203: 'x_return_status = ' || x_return_status, l_debug_prefix);
18204: END IF;
18205: */
18203: 'x_return_status = ' || x_return_status, l_debug_prefix);
18204: END IF;
18205: */
18206: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
18207: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18208: p_message=>'failure_score_commentary9 should be in lookup FAILURE_SCORE_COMMENTARY. ' ||
18209: 'x_return_status = ' || x_return_status,
18210: p_msg_level=>fnd_log.level_statement);
18211: END IF;
18221: p_column_value => p_credit_rating_rec.failure_score_commentary10,
18222: x_return_status => x_return_status);
18223:
18224: /*IF g_debug THEN
18225: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18226: 'failure_score_commentary10 should be in lookup FAILURE_SCORE_COMMENTARY. ' ||
18227: 'x_return_status = ' || x_return_status, l_debug_prefix);
18228: END IF;
18229: */
18227: 'x_return_status = ' || x_return_status, l_debug_prefix);
18228: END IF;
18229: */
18230: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
18231: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18232: p_message=>'failure_score_commentary10 should be in lookup FAILURE_SCORE_COMMENTARY. ' ||
18233: 'x_return_status = ' || x_return_status,
18234: p_msg_level=>fnd_log.level_statement);
18235: END IF;
18245: p_column_value => p_credit_rating_rec.credit_score_override_code,
18246: x_return_status => x_return_status);
18247:
18248: /*IF g_debug THEN
18249: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18250: 'credit_score_override_code should be in lookup FAILURE_SCORE_OVERRIDE_CODE. ' ||
18251: 'x_return_status = ' || x_return_status, l_debug_prefix);
18252: END IF;
18253: */
18251: 'x_return_status = ' || x_return_status, l_debug_prefix);
18252: END IF;
18253: */
18254: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
18255: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18256: p_message=>'credit_score_override_code should be in lookup FAILURE_SCORE_OVERRIDE_CODE. ' ||
18257: 'x_return_status = ' || x_return_status,
18258: p_msg_level=>fnd_log.level_statement);
18259: END IF;
18261: --------------------------------------------
18262: -- validation for debarment_ind
18263: --------------------------------------------
18264: /****Logical APIs - validation not required****/
18265: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
18266: -- debarment_ind is lookup code in lookup type YES/NO
18267: validate_lookup (
18268: p_column => 'debarment_ind',
18269: p_lookup_type => 'YES/NO',
18270: p_column_value => p_credit_rating_rec.debarment_ind,
18271: x_return_status => x_return_status);
18272:
18273: /*IF g_debug THEN
18274: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18275: 'debarment_ind should be in lookup YES/NO. ' ||
18276: 'x_return_status = ' || x_return_status, l_debug_prefix);
18277: END IF;
18278: */
18276: 'x_return_status = ' || x_return_status, l_debug_prefix);
18277: END IF;
18278: */
18279: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
18280: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'debarment_ind should be in lookup YES/NO. ' ||
18281: 'x_return_status = ' || x_return_status,
18282: p_msg_level=>fnd_log.level_statement);
18283: END IF;
18284: END IF;
18286: --------------------------------------------
18287: -- validation for suit_ind
18288: --------------------------------------------
18289: /****Logical APIs - validation not required****/
18290: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
18291: -- suit_ind is lookup code in lookup type YES/NO
18292: validate_lookup (
18293: p_column => 'suit_ind',
18294: p_lookup_type => 'YES/NO',
18295: p_column_value => p_credit_rating_rec.suit_ind,
18296: x_return_status => x_return_status);
18297:
18298: /*IF g_debug THEN
18299: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18300: 'suit_ind should be in lookup YES/NO. ' ||
18301: 'x_return_status = ' || x_return_status, l_debug_prefix);
18302: END IF;
18303: */
18301: 'x_return_status = ' || x_return_status, l_debug_prefix);
18302: END IF;
18303: */
18304: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
18305: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'suit_ind should be in lookup YES/NO. ' ||
18306: 'x_return_status = ' || x_return_status,
18307: p_msg_level=>fnd_log.level_statement);
18308: END IF;
18309: END IF;
18311: --------------------------------------------
18312: -- validation for lien_ind
18313: --------------------------------------------
18314: /****Logical APIs - validation not required****/
18315: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
18316: -- lien_ind is lookup code in lookup type YES/NO
18317: validate_lookup (
18318: p_column => 'lien_ind',
18319: p_lookup_type => 'YES/NO',
18320: p_column_value => p_credit_rating_rec.lien_ind,
18321: x_return_status => x_return_status);
18322:
18323: /*IF g_debug THEN
18324: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18325: 'lien_ind should be in lookup YES/NO. ' ||
18326: 'x_return_status = ' || x_return_status, l_debug_prefix);
18327: END IF;
18328: */
18326: 'x_return_status = ' || x_return_status, l_debug_prefix);
18327: END IF;
18328: */
18329: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
18330: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'lien_ind should be in lookup YES/NO. ' ||
18331: 'x_return_status = ' || x_return_status,
18332: p_msg_level=>fnd_log.level_statement);
18333: END IF;
18334: END IF;
18336: --------------------------------------------
18337: -- validation for judgement_ind
18338: --------------------------------------------
18339: /****Logical APIs - validation not required****/
18340: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
18341: -- judgement_ind is lookup code in lookup type YES/NO
18342: validate_lookup (
18343: p_column => 'judgement_ind',
18344: p_lookup_type => 'YES/NO',
18345: p_column_value => p_credit_rating_rec.judgement_ind,
18346: x_return_status => x_return_status);
18347:
18348: /*IF g_debug THEN
18349: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18350: 'judgement_ind should be in lookup YES/NO. ' ||
18351: 'x_return_status = ' || x_return_status, l_debug_prefix);
18352: END IF;
18353: */
18351: 'x_return_status = ' || x_return_status, l_debug_prefix);
18352: END IF;
18353: */
18354: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
18355: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'judgement_ind should be in lookup YES/NO. ' ||
18356: 'x_return_status = ' || x_return_status,
18357: p_msg_level=>fnd_log.level_statement);
18358: END IF;
18359: END IF;
18361: --------------------------------------------
18362: -- validation for no_trade_ind
18363: --------------------------------------------
18364: /****Logical APIs - validation not required****/
18365: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
18366: -- no_trade_ind is lookup code in lookup type YES/NO
18367: validate_lookup (
18368: p_column => 'no_trade_ind',
18369: p_lookup_type => 'YES/NO',
18370: p_column_value => p_credit_rating_rec.no_trade_ind,
18371: x_return_status => x_return_status);
18372:
18373: /*IF g_debug THEN
18374: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18375: 'no_trade_ind should be in lookup YES/NO. ' ||
18376: 'x_return_status = ' || x_return_status, l_debug_prefix);
18377: END IF;
18378: */
18376: 'x_return_status = ' || x_return_status, l_debug_prefix);
18377: END IF;
18378: */
18379: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
18380: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'no_trade_ind should be in lookup YES/NO. ' ||
18381: 'x_return_status = ' || x_return_status,
18382: p_msg_level=>fnd_log.level_statement);
18383: END IF;
18384: END IF;
18394: p_column_value => p_credit_rating_rec.prnt_hq_bkcy_ind,
18395: x_return_status => x_return_status);
18396:
18397: /*IF g_debug THEN
18398: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18399: 'prnt_hq_bkcy_ind should be in lookup PRNT_HQ_IND. ' ||
18400: 'x_return_status = ' || x_return_status, l_debug_prefix);
18401: END IF;
18402: */
18400: 'x_return_status = ' || x_return_status, l_debug_prefix);
18401: END IF;
18402: */
18403: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
18404: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'prnt_hq_bkcy_ind should be in lookup PRNT_HQ_IND. ' ||
18405: 'x_return_status = ' || x_return_status,
18406: p_msg_level=>fnd_log.level_statement);
18407: END IF;
18408:
18439: x_return_status := fnd_api.g_ret_sts_error;
18440: END;
18441:
18442: /*IF g_debug THEN
18443: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18444: 'maximum_credit_currency_code has foreign key fnd_currencies.currency_code. ' ||
18445: 'x_return_status = ' || x_return_status, l_debug_prefix);
18446: END IF;
18447: */
18445: 'x_return_status = ' || x_return_status, l_debug_prefix);
18446: END IF;
18447: */
18448: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
18449: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18450: p_message=>'maximum_credit_currency_code has foreign key fnd_currencies.currency_code. ' ||
18451: 'x_return_status = ' || x_return_status,
18452: p_msg_level=>fnd_log.level_statement);
18453: END IF;
18458: ------------------------
18459: -- validation for status
18460: ------------------------
18461: /****Logical APIs - validation not required****/
18462: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
18463: -- status is lookup code in lookup type REGISTRY_STATUS
18464: IF p_credit_rating_rec.status IS NOT NULL
18465: AND
18466: p_credit_rating_rec.status <> fnd_api.g_miss_char
18479: p_column_value => p_credit_rating_rec.status,
18480: x_return_status => x_return_status);
18481:
18482: /*IF g_debug THEN
18483: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18484: 'status is lookup code in lookup type REGISTRY_STATUS. ' ||
18485: 'x_return_status = ' || x_return_status, l_debug_prefix);
18486: END IF;
18487: */
18485: 'x_return_status = ' || x_return_status, l_debug_prefix);
18486: END IF;
18487: */
18488: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
18489: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18490: p_message=>'status is lookup code in lookup type REGISTRY_STATUS. ' ||
18491: 'x_return_status = ' || x_return_status,
18492: p_msg_level=>fnd_log.level_statement);
18493: END IF;
18577: p_column_value => p_credit_rating_rec.actual_content_source,
18578: x_return_status => x_return_status);
18579: */
18580: /*IF g_debug THEN
18581: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18582: 'actual_content_source should be in lookup CONTENT_SOURCE_TYPE. ' ||
18583: 'x_return_status = ' || x_return_status, l_debug_prefix);
18584: END IF;
18585: */
18584: END IF;
18585: */
18586: /*
18587: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
18588: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18589: p_message=>'actual_content_source should be in lookup CONTENT_SOURCE_TYPE. ' ||
18590: 'x_return_status = ' || x_return_status,
18591: p_msg_level=>fnd_log.level_statement);
18592: END IF;
18603: x_return_status => x_return_status );
18604:
18605: -- Debug info.
18606: /*IF g_debug THEN
18607: hz_utility_v2pub.debug ('validate_credit_rating (-)');
18608: END IF;
18609: */
18610: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
18611: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_credit_rating (-)',
18607: hz_utility_v2pub.debug ('validate_credit_rating (-)');
18608: END IF;
18609: */
18610: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
18611: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_credit_rating (-)',
18612: p_msg_level=>fnd_log.level_procedure);
18613: END IF;
18614:
18615: --disable_debug;
18641:
18642: BEGIN
18643:
18644: -- skip mandatory and non-updateable check from logical API
18645: IF HZ_UTILITY_V2PUB.G_CALLING_API IS NULL THEN
18646: -- created_by_module is mandatory field
18647: -- Since created_by_module is non-updateable, we only need to check mandatory
18648: -- during creation.
18649:
18654: p_column_value => p_created_by_module,
18655: x_return_status => x_return_status);
18656:
18657: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
18658: hz_utility_v2pub.debug(
18659: p_prefix => '',
18660: p_message => l_column || ' is mandatory. ' ||
18661: 'x_return_status = ' || x_return_status,
18662: p_msg_level => fnd_log.level_statement);
18676: p_restricted => 'N',
18677: x_return_status => x_return_status);
18678:
18679: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
18680: hz_utility_v2pub.debug(
18681: p_prefix => '',
18682: p_message => l_column || ' is non-updateable. It can be updated from NULL to a value. ' ||
18683: 'x_return_status = ' || x_return_status,
18684: p_msg_level => fnd_log.level_statement);
18700: p_column_value => p_created_by_module,
18701: x_return_status => x_return_status);
18702:
18703: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
18704: hz_utility_v2pub.debug(
18705: p_prefix => '',
18706: p_message => l_column || ' is lookup code in lookup type HZ_CREATED_BY_MODULES. ' ||
18707: 'x_return_status = ' || x_return_status,
18708: p_msg_level => fnd_log.level_statement);
18709: END IF;
18710: END IF;
18711:
18712: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
18713: hz_utility_v2pub.debug(
18714: p_prefix => '',
18715: p_message => 'after validate ' || l_column || ' ... ' ||
18716: 'x_return_status = ' || x_return_status,
18717: p_msg_level => fnd_log.level_statement);
18744:
18745: BEGIN
18746:
18747: -- skip non-updateable check from logical API
18748: IF HZ_UTILITY_V2PUB.G_CALLING_API IS NULL THEN
18749: -- application_id is non-updateable field. But it can be updated from NULL
18750: -- to some value.
18751:
18752: IF p_create_update_flag = 'U' AND
18759: p_restricted => 'N',
18760: x_return_status => x_return_status);
18761:
18762: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
18763: hz_utility_v2pub.debug(
18764: p_prefix => '',
18765: p_message => l_column || ' is non-updateable. It can be updated from NULL to a value. ' ||
18766: 'x_return_status = ' || x_return_status,
18767: p_msg_level => fnd_log.level_statement);
18769: END IF;
18770: END IF;
18771:
18772: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
18773: hz_utility_v2pub.debug(
18774: p_prefix => '',
18775: p_message => 'after validate ' || l_column || ' ... ' ||
18776: 'x_return_status = ' || x_return_status,
18777: p_msg_level => fnd_log.level_statement);