[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;
6772: NULL;
6773: END;
6774: end if;
6775: /*IF g_debug THEN
6776: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
6777: 'combination of party_site_id and site_use_type is unique. ' ||
6778: 'x_return_status = ' || x_return_status, l_debug_prefix);
6779: END IF;
6780: */
6778: 'x_return_status = ' || x_return_status, l_debug_prefix);
6779: END IF;
6780: */
6781: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6782: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
6783: p_message=>'combination of party_site_id and site_use_type is unique. ' ||
6784: 'x_return_status = ' || x_return_status,
6785: p_msg_level=>fnd_log.level_statement);
6786: END IF;
6798: x_return_status => x_return_status);
6799: END IF;
6800:
6801: /****Logical APIs - validation not required****/
6802: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
6803: -- status is lookup code in lookup type REGISTRY_STATUS
6804: IF p_party_site_use_rec.status IS NOT NULL
6805: AND
6806: p_party_site_use_rec.status <> fnd_api.g_miss_char
6819: p_column_value => p_party_site_use_rec.status,
6820: x_return_status => x_return_status);
6821:
6822: /*IF g_debug THEN
6823: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
6824: 'status is lookup code in lookup type REGISTRY_STATUS. ' ||
6825: 'x_return_status = ' || x_return_status, l_debug_prefix);
6826: END IF;
6827: */
6825: 'x_return_status = ' || x_return_status, l_debug_prefix);
6826: END IF;
6827: */
6828: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6829: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
6830: p_message=>'status is lookup code in lookup type REGISTRY_STATUS. ' ||
6831: 'x_return_status = ' || x_return_status,
6832: p_msg_level=>fnd_log.level_statement);
6833: END IF;
6874:
6875:
6876: -- Debug info.
6877: /*IF g_debug THEN
6878: hz_utility_v2pub.debug ('validate_party_site_use (-)');
6879: END IF;
6880: */
6881: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6882: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_party_site_use (-)',
6878: hz_utility_v2pub.debug ('validate_party_site_use (-)');
6879: END IF;
6880: */
6881: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6882: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_party_site_use (-)',
6883: p_msg_level=>fnd_log.level_procedure);
6884: END IF;
6885:
6886:
6942: --enable_debug;
6943:
6944: -- Debug info.
6945: /*IF g_debug THEN
6946: hz_utility_v2pub.debug ('validate_org_contact (+)');
6947: END IF;
6948: */
6949: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6950: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_org_contact (+)',
6946: hz_utility_v2pub.debug ('validate_org_contact (+)');
6947: END IF;
6948: */
6949: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6950: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_org_contact (+)',
6951: p_msg_level=>fnd_log.level_procedure);
6952: END IF;
6953:
6954:
6982: p_old_column_value => l_party_relationship_id,
6983: x_return_status => x_return_status);
6984:
6985: /*IF g_debug THEN
6986: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
6987: 'party_relationship_id is non-updateable field. ' ||
6988: 'x_return_status = ' || x_return_status, l_debug_prefix);
6989: END IF;
6990: */
6988: 'x_return_status = ' || x_return_status, l_debug_prefix);
6989: END IF;
6990: */
6991: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6992: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_relationship_id is non-updateable field. ' ||
6993: 'x_return_status = ' || x_return_status,
6994: p_msg_level=>fnd_log.level_statement);
6995: END IF;
6996:
7021: p_column_value => p_org_contact_rec.title,
7022: x_return_status => x_return_status);
7023:
7024: -- IF g_debug THEN
7025: -- hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7026: -- 'title is lookup code in lookup type CONTACT_TITLE. ' ||
7027: -- 'x_return_status = ' || x_return_status, l_debug_prefix);
7028: --- END IF;
7029:
7027: -- 'x_return_status = ' || x_return_status, l_debug_prefix);
7028: --- END IF;
7029:
7030: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7031: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'title is lookup code in lookup type CONTACT_TITLE. ' ||
7032: 'x_return_status = ' || x_return_status,
7033: p_msg_level=>fnd_log.level_statement);
7034: END IF;
7035:
7060: p_column_value => p_org_contact_rec.job_title_code,
7061: x_return_status => x_return_status);
7062:
7063: /*IF g_debug THEN
7064: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7065: 'job_title_code is lookup code in lookup type RESPONSIBILITY. ' ||
7066: 'x_return_status = ' || x_return_status, l_debug_prefix);
7067: END IF;
7068: */
7066: 'x_return_status = ' || x_return_status, l_debug_prefix);
7067: END IF;
7068: */
7069: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7070: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7071: p_message=>'job_title_code is lookup code in lookup type RESPONSIBILITY. ' ||
7072: 'x_return_status = ' || x_return_status,
7073: p_msg_level=>fnd_log.level_statement);
7074: END IF;
7079: -------------------------------
7080: -- validate decision_maker_flag
7081: -------------------------------
7082: /****Logical APIs - validation not required****/
7083: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
7084: -- decision_maker_flag is lookup code in lookup type YES/NO
7085: validate_lookup (
7086: p_column => 'decision_maker_flag',
7087: p_lookup_type => 'YES/NO',
7088: p_column_value => p_org_contact_rec.decision_maker_flag,
7089: x_return_status => x_return_status);
7090:
7091: /*IF g_debug THEN
7092: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7093: 'decision_maker_flag should be in lookup YES/NO. ' ||
7094: 'x_return_status = ' || x_return_status, l_debug_prefix);
7095: END IF;
7096: */
7094: 'x_return_status = ' || x_return_status, l_debug_prefix);
7095: END IF;
7096: */
7097: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7098: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'decision_maker_flag should be in lookup YES/NO. ' ||
7099: 'x_return_status = ' || x_return_status,
7100: p_msg_level=>fnd_log.level_statement);
7101: END IF;
7102: END IF;
7104: ------------------------------
7105: -- validate reference_use_flag
7106: ------------------------------
7107: /****Logical APIs - validation not required****/
7108: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
7109: -- reference_use_flag is lookup code in lookup type YES/NO
7110: validate_lookup (
7111: p_column => 'reference_use_flag',
7112: p_lookup_type => 'YES/NO',
7113: p_column_value => p_org_contact_rec.reference_use_flag,
7114: x_return_status => x_return_status);
7115:
7116: /*IF g_debug THEN
7117: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7118: 'reference_use_flag should be in lookup YES/NO. ' ||
7119: 'x_return_status = ' || x_return_status, l_debug_prefix);
7120: END IF;
7121: */
7119: 'x_return_status = ' || x_return_status, l_debug_prefix);
7120: END IF;
7121: */
7122: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7123: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'reference_use_flag should be in lookup YES/NO. ' ||
7124: 'x_return_status = ' || x_return_status,
7125: p_msg_level=>fnd_log.level_statement);
7126: END IF;
7127: END IF;
7149: p_column_value => p_org_contact_rec.department_code,
7150: x_return_status => x_return_status);
7151:
7152: /*IF g_debug THEN
7153: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7154: 'department_code is lookup code in lookup type DEPARTMENT_TYPE. ' ||
7155: 'x_return_status = ' || x_return_status, l_debug_prefix);
7156: END IF;
7157: */
7155: 'x_return_status = ' || x_return_status, l_debug_prefix);
7156: END IF;
7157: */
7158: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7159: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7160: p_message=>'department_code is lookup code in lookup type DEPARTMENT_TYPE. ' ||
7161: 'x_return_status = ' || x_return_status,
7162: p_msg_level=>fnd_log.level_statement);
7163: END IF;
7190: x_return_status := fnd_api.g_ret_sts_error;
7191: END;
7192:
7193: /*IF g_debug THEN
7194: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7195: 'party_site_id is foreign key to hz_party_sites.party_site_id. ' ||
7196: 'x_return_status = ' || x_return_status, l_debug_prefix);
7197: END IF;
7198: */
7196: 'x_return_status = ' || x_return_status, l_debug_prefix);
7197: END IF;
7198: */
7199: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7200: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7201: p_message=>'party_site_id is foreign key to hz_party_sites.party_site_id. ' ||
7202: 'x_return_status = ' || x_return_status,
7203: p_msg_level=>fnd_log.level_statement);
7204: END IF;
7225: x_return_status := fnd_api.g_ret_sts_error;
7226: END;
7227:
7228: /*IF g_debug THEN
7229: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7230: 'party_id of party site should be same as the object_id of the relationship record. ' ||
7231: 'x_return_status = ' || x_return_status, l_debug_prefix);
7232: END IF;
7233: */
7231: 'x_return_status = ' || x_return_status, l_debug_prefix);
7232: END IF;
7233: */
7234: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7235: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7236: p_message=>'party_id of party site should be same as the object_id of the relationship record. ' ||
7237: 'x_return_status = ' || x_return_status,
7238: p_msg_level=>fnd_log.level_statement);
7239: END IF;
7261: p_old_application_id => l_application_id,
7262: x_return_status => x_return_status);
7263:
7264: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
7265: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_org_contact (-)',
7266: p_msg_level=>fnd_log.level_procedure);
7267: END IF;
7268:
7269: END validate_org_contact;
7326: --enable_debug;
7327:
7328: -- Debug info.
7329: /*IF g_debug THEN
7330: hz_utility_v2pub.debug ('validate_org_contact_role (+)');
7331: END IF;
7332: */
7333: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
7334: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_org_contact_role (+)',
7330: hz_utility_v2pub.debug ('validate_org_contact_role (+)');
7331: END IF;
7332: */
7333: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
7334: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_org_contact_role (+)',
7335: p_msg_level=>fnd_log.level_procedure);
7336: END IF;
7337:
7338: IF p_create_update_flag = 'U' THEN
7353: --------------------------
7354: -- validate org_contact_id
7355: --------------------------
7356: /****Logical APIs - validation not required****/
7357: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
7358: -- org_contact_id is mandatory field
7359: validate_mandatory (
7360: p_create_update_flag => p_create_update_flag,
7361: p_column => 'org_contact_id',
7362: p_column_value => p_org_contact_role_rec.org_contact_id,
7363: x_return_status => x_return_status);
7364:
7365: /*IF g_debug THEN
7366: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7367: 'org_contact_id is mandatory field. ' ||
7368: 'x_return_status = ' || x_return_status, l_debug_prefix);
7369: END IF;
7370: */
7368: 'x_return_status = ' || x_return_status, l_debug_prefix);
7369: END IF;
7370: */
7371: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7372: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'org_contact_id is mandatory field. ' ||
7373: 'x_return_status = ' || x_return_status,
7374: p_msg_level=>fnd_log.level_statement);
7375: END IF;
7376:
7382: p_old_column_value => l_org_contact_id,
7383: x_return_status => x_return_status);
7384:
7385: /*IF g_debug THEN
7386: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7387: 'org_contact_id is non-updateable field. ' ||
7388: 'x_return_status = ' || x_return_status, l_debug_prefix);
7389: END IF;
7390: */
7388: 'x_return_status = ' || x_return_status, l_debug_prefix);
7389: END IF;
7390: */
7391: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7392: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'org_contact_id is non-updateable field. ' ||
7393: 'x_return_status = ' || x_return_status,
7394: p_msg_level=>fnd_log.level_statement);
7395: END IF;
7396:
7419: x_return_status := fnd_api.g_ret_sts_error;
7420: END;
7421:
7422: /*IF g_debug THEN
7423: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7424: 'org_contact_id is foreign key of hz_org_contacts.org_contact_id. ' ||
7425: 'x_return_status = ' || x_return_status, l_debug_prefix);
7426: END IF;
7427: */
7425: 'x_return_status = ' || x_return_status, l_debug_prefix);
7426: END IF;
7427: */
7428: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7429: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7430: p_message=>'org_contact_id is foreign key of hz_org_contacts.org_contact_id. ' ||
7431: 'x_return_status = ' || x_return_status,
7432: p_msg_level=>fnd_log.level_statement);
7433: END IF;
7438: ---------------------------------
7439: -- validate orig_system_reference
7440: ---------------------------------
7441: /****Logical APIs - validation not required****/
7442: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
7443: IF (p_org_contact_role_rec.orig_system is not null
7444: and p_org_contact_role_rec.orig_system <>fnd_api.g_miss_char)
7445: and (p_org_contact_role_rec.orig_system_reference is not null
7446: and p_org_contact_role_rec.orig_system_reference <>fnd_api.g_miss_char)
7480: p_old_column_value => l_orig_system_reference,
7481: x_return_status => x_return_status);
7482:
7483: /*IF g_debug THEN
7484: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7485: 'orig_system_reference is non-updateable field. ' ||
7486: 'x_return_status = ' || x_return_status, l_debug_prefix);
7487: END IF;
7488: */
7486: 'x_return_status = ' || x_return_status, l_debug_prefix);
7487: END IF;
7488: */
7489: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7490: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7491: p_message=>'orig_system_reference is non-updateable field. ' ||
7492: 'x_return_status = ' || x_return_status,
7493: p_msg_level=>fnd_log.level_statement);
7494: END IF;
7507: p_column_value => p_org_contact_role_rec.role_type,
7508: x_return_status => x_return_status);
7509:
7510: /*IF g_debug THEN
7511: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7512: 'role_type is mandatory field. ' ||
7513: 'x_return_status = ' || x_return_status, l_debug_prefix);
7514: END IF;
7515: */
7513: 'x_return_status = ' || x_return_status, l_debug_prefix);
7514: END IF;
7515: */
7516: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7517: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'role_type is mandatory field. ' ||
7518: 'x_return_status = ' || x_return_status,
7519: p_msg_level=>fnd_log.level_statement);
7520: END IF;
7521:
7526: p_column_value => p_org_contact_role_rec.role_type,
7527: x_return_status => x_return_status);
7528:
7529: /*IF g_debug THEN
7530: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7531: 'role_type cannot be set to null during update. ' ||
7532: 'x_return_status = ' || x_return_status, l_debug_prefix);
7533: END IF;
7534: */
7532: 'x_return_status = ' || x_return_status, l_debug_prefix);
7533: END IF;
7534: */
7535: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7536: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7537: p_message=>'role_type cannot be set to null during update. ' ||
7538: 'x_return_status = ' || x_return_status,
7539: p_msg_level=>fnd_log.level_statement);
7540: END IF;
7548: p_column_value => p_org_contact_role_rec.role_type,
7549: x_return_status => x_return_status);
7550:
7551: /*IF g_debug THEN
7552: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7553: 'role_type is lookup code in lookup type CONTACT_ROLE_TYPE. ' ||
7554: 'x_return_status = ' || x_return_status, l_debug_prefix);
7555: END IF;
7556: */
7554: 'x_return_status = ' || x_return_status, l_debug_prefix);
7555: END IF;
7556: */
7557: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7558: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7559: p_message=>'role_type is lookup code in lookup type CONTACT_ROLE_TYPE. ' ||
7560: 'x_return_status = ' || x_return_status,
7561: p_msg_level=>fnd_log.level_statement);
7562: END IF;
7564: ------------------------
7565: -- validate primary_flag
7566: ------------------------
7567: /****Logical APIs - validation not required****/
7568: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
7569: -- primary_flag is lookup code in lookup type YES/NO
7570: validate_lookup (
7571: p_column => 'primary_flag',
7572: p_lookup_type => 'YES/NO',
7573: p_column_value => p_org_contact_role_rec.primary_flag,
7574: x_return_status => x_return_status);
7575:
7576: /*IF g_debug THEN
7577: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7578: 'primary_flag should be in lookup YES/NO. ' ||
7579: 'x_return_status = ' || x_return_status, l_debug_prefix);
7580: END IF;
7581: */
7579: 'x_return_status = ' || x_return_status, l_debug_prefix);
7580: END IF;
7581: */
7582: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7583: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'primary_flag should be in lookup YES/NO. ' ||
7584: 'x_return_status = ' || x_return_status,
7585: p_msg_level=>fnd_log.level_statement);
7586: END IF;
7587: END IF;
7607: NULL;
7608: END;
7609:
7610: /*IF g_debug THEN
7611: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7612: 'primary_flag can be set only for one record of org_contact_id. ' ||
7613: 'x_return_status = ' || x_return_status, l_debug_prefix);
7614: END IF;
7615: */
7613: 'x_return_status = ' || x_return_status, l_debug_prefix);
7614: END IF;
7615: */
7616: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7617: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7618: p_message=>'primary_flag can be set only for one record of org_contact_id. ' ||
7619: 'x_return_status = ' || x_return_status,
7620: p_msg_level=>fnd_log.level_statement);
7621: END IF;
7649: NULL;
7650: END;
7651:
7652: /*IF g_debug THEN
7653: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7654: 'combination of org_contact_id and role_type must be unique. ' ||
7655: 'x_return_status = ' || x_return_status, l_debug_prefix);
7656: END IF;
7657: */
7655: 'x_return_status = ' || x_return_status, l_debug_prefix);
7656: END IF;
7657: */
7658: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7659: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7660: p_message=>'combination of org_contact_id and role_type must be unique. ' ||
7661: 'x_return_status = ' || x_return_status,
7662: p_msg_level=>fnd_log.level_statement);
7663: END IF;
7673: p_column_value => p_org_contact_role_rec.primary_contact_per_role_type,
7674: x_return_status => x_return_status);
7675:
7676: /*IF g_debug THEN
7677: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7678: 'primary_contact_per_role_type should be in lookup YES/NO. ' ||
7679: 'x_return_status = ' || x_return_status, l_debug_prefix);
7680: END IF;
7681: */
7679: 'x_return_status = ' || x_return_status, l_debug_prefix);
7680: END IF;
7681: */
7682: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7683: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7684: p_message=>'primary_contact_per_role_type should be in lookup YES/NO. ' ||
7685: 'x_return_status = ' || x_return_status,
7686: p_msg_level=>fnd_log.level_statement);
7687: END IF;
7720: NULL;
7721: END;
7722:
7723: /*IF g_debug THEN
7724: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7725: 'only one org contact can be set as primary within same organization party. ' ||
7726: 'x_return_status = ' || x_return_status, l_debug_prefix);
7727: END IF;
7728: */
7726: 'x_return_status = ' || x_return_status, l_debug_prefix);
7727: END IF;
7728: */
7729: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7730: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7731: p_message=>'only one org contact can be set as primary within same organization party. ' ||
7732: 'x_return_status = ' || x_return_status,
7733: p_msg_level=>fnd_log.level_statement);
7734: END IF;
7738: ------------------
7739: -- validate status
7740: ------------------
7741: /****Logical APIs - validation not required****/
7742: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
7743: -- status is lookup code in lookup type REGISTRY_STATUS
7744: IF p_org_contact_role_rec.status IS NOT NULL
7745: AND
7746: p_org_contact_role_rec.status <> fnd_api.g_miss_char
7759: p_column_value => p_org_contact_role_rec.status,
7760: x_return_status => x_return_status);
7761:
7762: /*IF g_debug THEN
7763: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7764: 'status is lookup code in lookup type REGISTRY_STATUS. ' ||
7765: 'x_return_status = ' || x_return_status, l_debug_prefix);
7766: END IF;
7767: */
7765: 'x_return_status = ' || x_return_status, l_debug_prefix);
7766: END IF;
7767: */
7768: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7769: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7770: p_message=>'status is lookup code in lookup type REGISTRY_STATUS. ' ||
7771: 'x_return_status = ' || x_return_status,
7772: p_msg_level=>fnd_log.level_statement);
7773: END IF;
7803: p_old_application_id => l_application_id,
7804: x_return_status => x_return_status);
7805:
7806: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
7807: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_org_contact_role (-)',
7808: p_msg_level=>fnd_log.level_procedure);
7809: END IF;
7810:
7811: END validate_org_contact_role;
7877: --enable_debug;
7878:
7879: -- Debug info.
7880: /*IF g_debug THEN
7881: hz_utility_v2pub.debug ('validate_person_language (+)');
7882: END IF;
7883: */
7884: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
7885: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_person_language (+)',
7881: hz_utility_v2pub.debug ('validate_person_language (+)');
7882: END IF;
7883: */
7884: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
7885: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_person_language (+)',
7886: p_msg_level=>fnd_log.level_procedure);
7887: END IF;
7888:
7889: -- do the query to get old values for update
7908: --------------------------
7909: -- validation for party_id
7910: --------------------------
7911: /****Logical APIs - validation not required****/
7912: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
7913: -- party_id is mandatory field
7914: IF p_create_update_flag = 'C' THEN
7915: validate_mandatory (
7916: p_create_update_flag => p_create_update_flag,
7918: p_column_value => p_person_language_rec.party_id,
7919: x_return_status => x_return_status);
7920:
7921: /*IF g_debug THEN
7922: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7923: 'party_id is mandatory field. ' ||
7924: 'x_return_status = ' || x_return_status, l_debug_prefix);
7925: END IF;
7926: */
7924: 'x_return_status = ' || x_return_status, l_debug_prefix);
7925: END IF;
7926: */
7927: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7928: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id is mandatory field. ' ||
7929: 'x_return_status = ' || x_return_status,
7930: p_msg_level=>fnd_log.level_statement);
7931: END IF;
7932:
7940: p_old_column_value => l_party_id,
7941: x_return_status => x_return_status);
7942:
7943: /*IF g_debug THEN
7944: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7945: 'party_id is non-updateable field. ' ||
7946: 'x_return_status = ' || x_return_status, l_debug_prefix);
7947: END IF;
7948: */
7946: 'x_return_status = ' || x_return_status, l_debug_prefix);
7947: END IF;
7948: */
7949: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7950: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id is non-updateable field. ' ||
7951: 'x_return_status = ' || x_return_status,
7952: p_msg_level=>fnd_log.level_statement);
7953: END IF;
7954:
7977: x_return_status := fnd_api.g_ret_sts_error;
7978: END;
7979:
7980: /*IF g_debug THEN
7981: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
7982: 'party_id has foreign key hz_parties.party_id. ' ||
7983: 'x_return_status = ' || x_return_status, l_debug_prefix);
7984: END IF;
7985: */
7983: 'x_return_status = ' || x_return_status, l_debug_prefix);
7984: END IF;
7985: */
7986: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7987: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id has foreign key hz_parties.party_id. ' ||
7988: 'x_return_status = ' || x_return_status,
7989: p_msg_level=>fnd_log.level_statement);
7990: END IF;
7991:
8004: p_column_value => p_person_language_rec.language_name,
8005: x_return_status => x_return_status);
8006:
8007: /*IF g_debug THEN
8008: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8009: 'language_name is mandatory field. ' ||
8010: 'x_return_status = ' || x_return_status, l_debug_prefix);
8011: END IF;
8012: */
8010: 'x_return_status = ' || x_return_status, l_debug_prefix);
8011: END IF;
8012: */
8013: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8014: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'language_name is mandatory field. ' ||
8015: 'x_return_status = ' || x_return_status,
8016: p_msg_level=>fnd_log.level_statement);
8017: END IF;
8018:
8026: p_old_column_value => l_language_name,
8027: x_return_status => x_return_status);
8028:
8029: /*IF g_debug THEN
8030: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8031: 'language_name is non-updateable field. ' ||
8032: 'x_return_status = ' || x_return_status, l_debug_prefix);
8033: END IF;
8034: */
8032: 'x_return_status = ' || x_return_status, l_debug_prefix);
8033: END IF;
8034: */
8035: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8036: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'language_name is non-updateable field. ' ||
8037: 'x_return_status = ' || x_return_status,
8038: p_msg_level=>fnd_log.level_statement);
8039: END IF;
8040:
8060: x_return_status := fnd_api.g_ret_sts_error;
8061: END;
8062:
8063: /*IF g_debug THEN
8064: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8065: 'language_name has foreign key fnd_languages.language_code. ' ||
8066: 'x_return_status = ' || x_return_status, l_debug_prefix);
8067: END IF;
8068: */
8066: 'x_return_status = ' || x_return_status, l_debug_prefix);
8067: END IF;
8068: */
8069: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8070: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8071: p_message=>'language_name has foreign key fnd_languages.language_code. ' ||
8072: 'x_return_status = ' || x_return_status,
8073: p_msg_level=>fnd_log.level_statement);
8074: END IF;
8097: ---------------------------------
8098: -- validation for native_language
8099: ---------------------------------
8100: /****Logical APIs - validation not required****/
8101: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
8102: -- native_language is lookup code in lookup type YES/NO
8103: validate_lookup (
8104: p_column => 'native_language',
8105: p_lookup_type => 'YES/NO',
8106: p_column_value => p_person_language_rec.native_language,
8107: x_return_status => x_return_status);
8108:
8109: /*IF g_debug THEN
8110: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8111: 'native_language should be in lookup YES/NO. ' ||
8112: 'x_return_status = ' || x_return_status, l_debug_prefix);
8113: END IF;
8114: */
8112: 'x_return_status = ' || x_return_status, l_debug_prefix);
8113: END IF;
8114: */
8115: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8116: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'native_language should be in lookup YES/NO. ' ||
8117: 'x_return_status = ' || x_return_status,
8118: p_msg_level=>fnd_log.level_statement);
8119: END IF;
8120: END IF;
8131: x_return_status => x_return_status);
8132:
8133:
8134: /*IF g_debug THEN
8135: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8136: 'spoken_comprehension_level should be in lookup HZ_LANGUAGE_PROFICIENCY. ' ||
8137: 'x_return_status = ' || x_return_status, l_debug_prefix);
8138: END IF;
8139: */
8137: 'x_return_status = ' || x_return_status, l_debug_prefix);
8138: END IF;
8139: */
8140: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8141: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8142: p_message=>'spoken_comprehension_level should be in lookup HZ_LANGUAGE_PROFICIENCY. ' ||
8143: 'x_return_status = ' || x_return_status,
8144: p_msg_level=>fnd_log.level_statement);
8145: END IF;
8148: --------------------------------------------
8149: -- validation for primary_language_indicator
8150: --------------------------------------------
8151: /****Logical APIs - validation not required****/
8152: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
8153: -- primary_language_indicator is lookup code in lookup type YES/NO
8154: validate_lookup (
8155: p_column => 'primary_language_indicator',
8156: p_lookup_type => 'YES/NO',
8157: p_column_value => p_person_language_rec.primary_language_indicator,
8158: x_return_status => x_return_status);
8159:
8160: /*IF g_debug THEN
8161: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8162: 'primary_language_indicator should be in lookup YES/NO. ' ||
8163: 'x_return_status = ' || x_return_status, l_debug_prefix);
8164: END IF;
8165: */
8163: 'x_return_status = ' || x_return_status, l_debug_prefix);
8164: END IF;
8165: */
8166: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8167: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8168: p_message=>'primary_language_indicator should be in lookup YES/NO. ' ||
8169: 'x_return_status = ' || x_return_status,
8170: p_msg_level=>fnd_log.level_statement);
8171: END IF;
8174: ------------------------
8175: -- validation for status
8176: ------------------------
8177: /****Logical APIs - validation not required****/
8178: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
8179: -- status is lookup code in lookup type REGISTRY_STATUS
8180: IF p_person_language_rec.status IS NOT NULL
8181: AND
8182: p_person_language_rec.status <> fnd_api.g_miss_char
8195: p_column_value => p_person_language_rec.status,
8196: x_return_status => x_return_status);
8197:
8198: /*IF g_debug THEN
8199: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8200: 'status is lookup code in lookup type REGISTRY_STATUS. ' ||
8201: 'x_return_status = ' || x_return_status, l_debug_prefix);
8202: END IF;
8203: */
8201: 'x_return_status = ' || x_return_status, l_debug_prefix);
8202: END IF;
8203: */
8204: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8205: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8206: p_message=>'status is lookup code in lookup type REGISTRY_STATUS. ' ||
8207: 'x_return_status = ' || x_return_status,
8208: p_msg_level=>fnd_log.level_statement);
8209: END IF;
8267: fnd_msg_pub.add;
8268: x_return_status := FND_API.G_RET_STS_ERROR;
8269:
8270: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8271: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8272: p_message=>'If the primary_language_indicator is set to Yes, the status column should not be Inactive.' ||
8273: 'x_return_status = ' || x_return_status,
8274: p_msg_level=>fnd_log.level_statement);
8275: END IF;
8286: fnd_msg_pub.add;
8287: x_return_status := FND_API.G_RET_STS_ERROR;
8288:
8289: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8290: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8291: p_message=>'If the primary_language_indicator is set to Yes, the status column should not be Inactive.' ||
8292: 'x_return_status = ' || x_return_status,
8293: p_msg_level=>fnd_log.level_statement);
8294: END IF;
8296: END IF;
8297: END IF; -- corresponding to IF p_create_update_flag = 'C'
8298:
8299: /*IF g_debug THEN
8300: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8301: 'If the primary_language_indicator is set to Yes, the status column should not be Inactive.' ||
8302: 'x_return_status = ' || x_return_status,
8303: l_debug_prefix
8304: );
8325: p_old_application_id => l_application_id,
8326: x_return_status => x_return_status);
8327:
8328: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8329: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_person_language (-)',
8330: p_msg_level=>fnd_log.level_procedure);
8331: END IF;
8332:
8333: END validate_person_language;
8396: --enable_debug;
8397:
8398: -- Debug info.
8399: /*IF g_debug THEN
8400: hz_utility_v2pub.debug ('validate_citizenship (+)');
8401: END IF;
8402: */
8403: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8404: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_citizenship (+)',
8400: hz_utility_v2pub.debug ('validate_citizenship (+)');
8401: END IF;
8402: */
8403: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8404: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_citizenship (+)',
8405: p_msg_level=>fnd_log.level_procedure);
8406: END IF;
8407:
8408: -- do the query to get old values for update
8426: --------------------------------------
8427: -- validate citizenship_id
8428: --------------------------------------
8429: /****Logical APIs - validation not required****/
8430: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
8431: -- If primary key value is passed, check for uniqueness.
8432: -- If primary key value is not passed, it will be generated
8433: -- from sequence by table handler.
8434:
8448: END IF;
8449: CLOSE citizen_cur;
8450:
8451: /*IF g_debug THEN
8452: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8453: 'check that citizenship_id is unique during creation. ' ||
8454: ' x_return_status = ' || x_return_status, l_debug_prefix);
8455: END IF;
8456: */
8454: ' x_return_status = ' || x_return_status, l_debug_prefix);
8455: END IF;
8456: */
8457: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8458: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8459: p_message=>'check that citizenship_id is unique during creation. ' ||
8460: ' x_return_status = ' || x_return_status,
8461: p_msg_level=>fnd_log.level_statement);
8462: END IF;
8464: END IF;
8465: END IF;
8466:
8467: /*IF g_debug THEN
8468: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8469: '(+) after validate citizenship_id ... ' ||
8470: 'x_return_status = ' || x_return_status, l_debug_prefix);
8471: END IF;
8472: */
8470: 'x_return_status = ' || x_return_status, l_debug_prefix);
8471: END IF;
8472: */
8473: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8474: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate citizenship_id ... ' ||
8475: 'x_return_status = ' || x_return_status,
8476: p_msg_level=>fnd_log.level_statement);
8477: END IF;
8478:
8485: p_old_column_value => l_citizenship_id,
8486: x_return_status => x_return_status);
8487:
8488: /*IF g_debug THEN
8489: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8490: 'citizenship_id is non-updateable field. ' ||
8491: 'x_return_status = ' || x_return_status, l_debug_prefix);
8492: END IF;
8493: */
8491: 'x_return_status = ' || x_return_status, l_debug_prefix);
8492: END IF;
8493: */
8494: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8495: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'citizenship_id is non-updateable field. ' ||
8496: 'x_return_status = ' || x_return_status,
8497: p_msg_level=>fnd_log.level_statement);
8498: END IF;
8499:
8504: --------------------------
8505: -- validation for party_id
8506: --------------------------
8507: /****Logical APIs - validation not required****/
8508: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
8509: -- party_id is mandatory field
8510: IF p_create_update_flag = 'C' THEN
8511: validate_mandatory (
8512: p_create_update_flag => p_create_update_flag,
8514: p_column_value => p_citizenship_rec.party_id,
8515: x_return_status => x_return_status);
8516:
8517: /*IF g_debug THEN
8518: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8519: 'party_id is mandatory field. ' ||
8520: 'x_return_status = ' || x_return_status, l_debug_prefix);
8521: END IF;
8522: */
8520: 'x_return_status = ' || x_return_status, l_debug_prefix);
8521: END IF;
8522: */
8523: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8524: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id is mandatory field. ' ||
8525: 'x_return_status = ' || x_return_status,
8526: p_msg_level=>fnd_log.level_statement);
8527: END IF;
8528:
8537: p_old_column_value => l_party_id,
8538: x_return_status => x_return_status);
8539:
8540: /*IF g_debug THEN
8541: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8542: 'party_id is non-updateable field. ' ||
8543: 'x_return_status = ' || x_return_status, l_debug_prefix);
8544: END IF;
8545: */
8543: 'x_return_status = ' || x_return_status, l_debug_prefix);
8544: END IF;
8545: */
8546: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8547: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id is non-updateable field. ' ||
8548: 'x_return_status = ' || x_return_status,
8549: p_msg_level=>fnd_log.level_statement);
8550: END IF;
8551:
8577: x_return_status := fnd_api.g_ret_sts_error;
8578: END;
8579:
8580: /*IF g_debug THEN
8581: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8582: 'party_id has foreign key hz_parties.party_id. ' ||
8583: 'x_return_status = ' || x_return_status, l_debug_prefix);
8584: END IF;
8585: */
8583: 'x_return_status = ' || x_return_status, l_debug_prefix);
8584: END IF;
8585: */
8586: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8587: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id has foreign key hz_parties.party_id. ' ||
8588: 'x_return_status = ' || x_return_status,
8589: p_msg_level=>fnd_log.level_statement);
8590: END IF;
8591:
8606: x_return_status => x_return_status);
8607:
8608:
8609: /*IF g_debug THEN
8610: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8611: 'birth_or_selected should be in lookup HZ_CITIZENSHIP_ACQUISITION. ' ||
8612: 'x_return_status = ' || x_return_status, l_debug_prefix);
8613: END IF;
8614: */
8612: 'x_return_status = ' || x_return_status, l_debug_prefix);
8613: END IF;
8614: */
8615: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8616: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8617: p_message=>'birth_or_selected should be in lookup HZ_CITIZENSHIP_ACQUISITION. ' ||
8618: 'x_return_status = ' || x_return_status,
8619: p_msg_level=>fnd_log.level_statement);
8620: END IF;
8633: p_column_value => p_citizenship_rec.country_code,
8634: x_return_status => x_return_status);
8635:
8636: /*IF g_debug THEN
8637: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8638: 'country_code is mandatory field. ' ||
8639: 'x_return_status = ' || x_return_status, l_debug_prefix);
8640: END IF;
8641: */
8639: 'x_return_status = ' || x_return_status, l_debug_prefix);
8640: END IF;
8641: */
8642: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8643: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8644: p_message=>'country_code is mandatory field. ' ||
8645: 'x_return_status = ' || x_return_status,
8646: p_msg_level=>fnd_log.level_statement);
8647: END IF;
8655: p_column_value => p_citizenship_rec.country_code,
8656: x_return_status => x_return_status);
8657:
8658: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
8659: hz_utility_v2pub.debug(
8660: p_prefix => l_debug_prefix,
8661: p_message => 'country_code should be in fnd_territories.territory_code. ' ||
8662: 'x_return_status = ' || x_return_status,
8663: p_msg_level => fnd_log.level_statement);
8676: ------------------------
8677: -- validation for status
8678: ------------------------
8679: /****Logical APIs - validation not required****/
8680: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
8681: -- status is lookup code in lookup type REGISTRY_STATUS
8682: IF p_citizenship_rec.status IS NOT NULL
8683: AND
8684: p_citizenship_rec.status <> fnd_api.g_miss_char
8697: p_column_value => p_citizenship_rec.status,
8698: x_return_status => x_return_status);
8699:
8700: /*IF g_debug THEN
8701: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8702: 'status is lookup code in lookup type REGISTRY_STATUS. ' ||
8703: 'x_return_status = ' || x_return_status, l_debug_prefix);
8704: END IF;
8705: */
8703: 'x_return_status = ' || x_return_status, l_debug_prefix);
8704: END IF;
8705: */
8706: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8707: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8708: p_message=>'status is lookup code in lookup type REGISTRY_STATUS. ' ||
8709: 'x_return_status = ' || x_return_status,
8710: p_msg_level=>fnd_log.level_statement);
8711: END IF;
8742: p_old_application_id => l_application_id,
8743: x_return_status => x_return_status);
8744:
8745: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8746: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_citizenship (-)',
8747: p_msg_level=>fnd_log.level_procedure);
8748: END IF;
8749:
8750: END validate_citizenship;
8828: --enable_debug;
8829:
8830: -- Debug info.
8831: /*IF g_debug THEN
8832: hz_utility_v2pub.debug ('validate_education (+)');
8833: END IF;
8834: */
8835: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8836: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_education (+)',
8832: hz_utility_v2pub.debug ('validate_education (+)');
8833: END IF;
8834: */
8835: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8836: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_education (+)',
8837: p_msg_level=>fnd_log.level_procedure);
8838: END IF;
8839:
8840:
8869: --------------------------------------
8870: -- validate education_id
8871: --------------------------------------
8872: /****Logical APIs - validation not required****/
8873: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
8874: -- If primary key value is passed, check for uniqueness.
8875: -- If primary key value is not passed, it will be generated
8876: -- from sequence by table handler.
8877:
8892: END IF;
8893: CLOSE education_cur;
8894:
8895: /*IF g_debug THEN
8896: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8897: 'check that education_id is unique during creation. ' ||
8898: ' x_return_status = ' || x_return_status, l_debug_prefix);
8899: END IF;
8900: */
8898: ' x_return_status = ' || x_return_status, l_debug_prefix);
8899: END IF;
8900: */
8901: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8902: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8903: p_message=>'check that education_id is unique during creation. ' ||
8904: ' x_return_status = ' || x_return_status,
8905: p_msg_level=>fnd_log.level_statement);
8906: END IF;
8917: p_old_column_value => l_education_id,
8918: x_return_status => x_return_status);
8919:
8920: /*IF g_debug THEN
8921: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8922: 'education_id is non-updateable field. ' ||
8923: 'x_return_status = ' || x_return_status, l_debug_prefix);
8924: END IF;
8925: */
8923: 'x_return_status = ' || x_return_status, l_debug_prefix);
8924: END IF;
8925: */
8926: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8927: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'education_id is non-updateable field. ' ||
8928: 'x_return_status = ' || x_return_status,
8929: p_msg_level=>fnd_log.level_statement);
8930: END IF;
8931:
8931:
8932: END IF;
8933:
8934: /*IF g_debug THEN
8935: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8936: '(+) after validate education_id ... ' ||
8937: 'x_return_status = ' || x_return_status, l_debug_prefix);
8938: END IF;
8939: */
8937: 'x_return_status = ' || x_return_status, l_debug_prefix);
8938: END IF;
8939: */
8940: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8941: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate education_id ... ' ||
8942: 'x_return_status = ' || x_return_status,
8943: p_msg_level=>fnd_log.level_statement);
8944: END IF;
8945: END IF;
8947: --------------------------
8948: -- validation for party_id
8949: --------------------------
8950: /****Logical APIs - validation not required****/
8951: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
8952: -- party_id is mandatory field
8953: IF p_create_update_flag = 'C' THEN
8954: validate_mandatory (
8955: p_create_update_flag => p_create_update_flag,
8957: p_column_value => p_education_rec.party_id,
8958: x_return_status => x_return_status);
8959:
8960: /*IF g_debug THEN
8961: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8962: 'party_id is mandatory field. ' ||
8963: 'x_return_status = ' || x_return_status, l_debug_prefix);
8964: END IF;
8965: */
8963: 'x_return_status = ' || x_return_status, l_debug_prefix);
8964: END IF;
8965: */
8966: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8967: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id is mandatory field. ' ||
8968: 'x_return_status = ' || x_return_status,
8969: p_msg_level=>fnd_log.level_statement);
8970: END IF;
8971:
8980: p_old_column_value => l_party_id,
8981: x_return_status => x_return_status);
8982:
8983: /*IF g_debug THEN
8984: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
8985: 'party_id is non-updateable field. ' ||
8986: 'x_return_status = ' || x_return_status, l_debug_prefix);
8987: END IF;
8988: */
8986: 'x_return_status = ' || x_return_status, l_debug_prefix);
8987: END IF;
8988: */
8989: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8990: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id is non-updateable field. ' ||
8991: 'x_return_status = ' || x_return_status,
8992: p_msg_level=>fnd_log.level_statement);
8993: END IF;
8994:
9019: x_return_status := fnd_api.g_ret_sts_error;
9020: END;
9021:
9022: /*IF g_debug THEN
9023: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9024: 'party_id has foreign key hz_parties.party_id. ' ||
9025: 'x_return_status = ' || x_return_status, l_debug_prefix);
9026: END IF;
9027: */
9025: 'x_return_status = ' || x_return_status, l_debug_prefix);
9026: END IF;
9027: */
9028: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9029: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id has foreign key hz_parties.party_id. ' ||
9030: 'x_return_status = ' || x_return_status,
9031: p_msg_level=>fnd_log.level_statement);
9032: END IF;
9033:
9084: x_return_status => x_return_status
9085: );
9086:
9087: /*IF g_debug THEN
9088: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9089: 'check whether last_date_attended is greater then or equal to start_date_attended. ' ||
9090: 'x_return_status = ' || x_return_status, l_debug_prefix);
9091: END IF;
9092: */
9090: 'x_return_status = ' || x_return_status, l_debug_prefix);
9091: END IF;
9092: */
9093: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9094: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9095: p_message=>'check whether last_date_attended is greater then or equal to start_date_attended. ' ||
9096: 'x_return_status = ' || x_return_status,
9097: p_msg_level=>fnd_log.level_statement);
9098: END IF;
9099:
9100: END IF;
9101:
9102: /*IF g_debug THEN
9103: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9104: '(+) after validating the last_date_attended and start_date_attended... ' ||
9105: 'x_return_status = ' || x_return_status, l_debug_prefix);
9106: END IF;
9107: */
9105: 'x_return_status = ' || x_return_status, l_debug_prefix);
9106: END IF;
9107: */
9108: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9109: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9110: p_message=>'(+) after validating the last_date_attended and start_date_attended... ' ||
9111: 'x_return_status = ' || x_return_status,
9112: p_msg_level=>fnd_log.level_statement);
9113: END IF;
9154: x_return_status := fnd_api.g_ret_sts_error;
9155: END IF;
9156:
9157: /*IF g_debug THEN
9158: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9159: 'check that school_attended_name is empty when school_party_id isn t. '||
9160: ' x_return_status = ' || x_return_status, l_debug_prefix);
9161: END IF;
9162: */
9160: ' x_return_status = ' || x_return_status, l_debug_prefix);
9161: END IF;
9162: */
9163: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9164: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9165: p_message=>'check that school_attended_name is empty when school_party_id isn t. '||
9166: ' x_return_status = ' || x_return_status,
9167: p_msg_level=>fnd_log.level_statement);
9168: END IF;
9194: x_return_status := fnd_api.g_ret_sts_error;
9195: END;
9196:
9197: /*IF g_debug THEN
9198: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9199: 'school_party_id should be in hz_parties.party_id. ' ||
9200: 'x_return_status = ' || x_return_status, l_debug_prefix);
9201: END IF;
9202: */
9200: 'x_return_status = ' || x_return_status, l_debug_prefix);
9201: END IF;
9202: */
9203: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9204: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9205: p_message=>'school_party_id should be in hz_parties.party_id. ' ||
9206: 'x_return_status = ' || x_return_status,
9207: p_msg_level=>fnd_log.level_statement);
9208: END IF;
9241: x_return_status => x_return_status);
9242:
9243:
9244: /*IF g_debug THEN
9245: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9246: 'type_of_school should be in lookup HZ_TYPE_OF_SCHOOL. ' ||
9247: 'x_return_status = ' || x_return_status, l_debug_prefix);
9248: END IF;
9249: */
9247: 'x_return_status = ' || x_return_status, l_debug_prefix);
9248: END IF;
9249: */
9250: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9251: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9252: p_message=>'type_of_school should be in lookup HZ_TYPE_OF_SCHOOL. ' ||
9253: 'x_return_status = ' || x_return_status,
9254: p_msg_level=>fnd_log.level_statement);
9255: END IF;
9259: ------------------------
9260: -- validation for status
9261: ------------------------
9262: /****Logical APIs - validation not required****/
9263: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
9264: -- status is lookup code in lookup type REGISTRY_STATUS
9265: IF p_education_rec.status IS NOT NULL
9266: AND
9267: p_education_rec.status <> fnd_api.g_miss_char
9280: p_column_value => p_education_rec.status,
9281: x_return_status => x_return_status);
9282:
9283: /*IF g_debug THEN
9284: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9285: 'status is lookup code in lookup type REGISTRY_STATUS. ' ||
9286: 'x_return_status = ' || x_return_status, l_debug_prefix);
9287: END IF;
9288: */
9286: 'x_return_status = ' || x_return_status, l_debug_prefix);
9287: END IF;
9288: */
9289: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9290: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9291: p_message=>'status is lookup code in lookup type REGISTRY_STATUS. ' ||
9292: 'x_return_status = ' || x_return_status,
9293: p_msg_level=>fnd_log.level_statement);
9294: END IF;
9326: p_old_application_id => l_application_id,
9327: x_return_status => x_return_status);
9328:
9329: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
9330: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_education (-)',
9331: p_msg_level=>fnd_log.level_procedure);
9332: END IF;
9333:
9334: END validate_education;
9412: --enable_debug;
9413:
9414: -- Debug info.
9415: /*IF g_debug THEN
9416: hz_utility_v2pub.debug ('validate_employment_history (+)');
9417: END IF;
9418: */
9419: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
9420: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_employment_history (+)',
9416: hz_utility_v2pub.debug ('validate_employment_history (+)');
9417: END IF;
9418: */
9419: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
9420: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_employment_history (+)',
9421: p_msg_level=>fnd_log.level_procedure);
9422: END IF;
9423:
9424: -- do the query to get old values for update
9456: --------------------------------------
9457: -- validate employment_history_id
9458: --------------------------------------
9459: /****Logical APIs - validation not required****/
9460: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
9461: -- If primary key value is passed, check for uniqueness.
9462: -- If primary key value is not passed, it will be generated
9463: -- from sequence by table handler.
9464:
9479: END IF;
9480: CLOSE employment_history_cur;
9481:
9482: /*IF g_debug THEN
9483: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9484: 'check that employment_history_id is unique during creation. ' ||
9485: ' x_return_status = ' || x_return_status, l_debug_prefix);
9486: END IF;
9487: */
9485: ' x_return_status = ' || x_return_status, l_debug_prefix);
9486: END IF;
9487: */
9488: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9489: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9490: p_message=>'check that employment_history_id is unique during creation. ' ||
9491: ' x_return_status = ' || x_return_status,
9492: p_msg_level=>fnd_log.level_statement);
9493: END IF;
9504: p_old_column_value => l_employment_history_id,
9505: x_return_status => x_return_status);
9506:
9507: /*IF g_debug THEN
9508: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9509: 'employment_history_id is non-updateable field. ' ||
9510: 'x_return_status = ' || x_return_status, l_debug_prefix);
9511: END IF;
9512: */
9510: 'x_return_status = ' || x_return_status, l_debug_prefix);
9511: END IF;
9512: */
9513: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9514: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9515: p_message=>'employment_history_id is non-updateable field. ' ||
9516: 'x_return_status = ' || x_return_status,
9517: p_msg_level=>fnd_log.level_statement);
9518: END IF;
9519:
9520: END IF;
9521:
9522: /*IF g_debug THEN
9523: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9524: '(+) after validation of employment_history_id ... ' ||
9525: 'x_return_status = ' || x_return_status, l_debug_prefix);
9526: END IF;
9527: */
9525: 'x_return_status = ' || x_return_status, l_debug_prefix);
9526: END IF;
9527: */
9528: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9529: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9530: p_message=>'(+) after validation of employment_history_id ... ' ||
9531: 'x_return_status = ' || x_return_status,
9532: p_msg_level=>fnd_log.level_statement);
9533: END IF;
9536: --------------------------
9537: -- validation for party_id
9538: --------------------------
9539: /****Logical APIs - validation not required****/
9540: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
9541: -- party_id is mandatory field
9542: IF p_create_update_flag = 'C' THEN
9543: validate_mandatory (
9544: p_create_update_flag => p_create_update_flag,
9546: p_column_value => p_employment_history_rec.party_id,
9547: x_return_status => x_return_status);
9548:
9549: /*IF g_debug THEN
9550: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9551: 'party_id is mandatory field. ' ||
9552: 'x_return_status = ' || x_return_status, l_debug_prefix);
9553: END IF;
9554: */
9552: 'x_return_status = ' || x_return_status, l_debug_prefix);
9553: END IF;
9554: */
9555: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9556: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id is mandatory field. ' ||
9557: 'x_return_status = ' || x_return_status,
9558: p_msg_level=>fnd_log.level_statement);
9559: END IF;
9560:
9569: p_old_column_value => l_party_id,
9570: x_return_status => x_return_status);
9571:
9572: /*IF g_debug THEN
9573: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9574: 'party_id is non-updateable field. ' ||
9575: 'x_return_status = ' || x_return_status, l_debug_prefix);
9576: END IF;
9577: */
9575: 'x_return_status = ' || x_return_status, l_debug_prefix);
9576: END IF;
9577: */
9578: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9579: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id is non-updateable field. ' ||
9580: 'x_return_status = ' || x_return_status,
9581: p_msg_level=>fnd_log.level_statement);
9582: END IF;
9583:
9607: x_return_status := fnd_api.g_ret_sts_error;
9608: END;
9609:
9610: /*IF g_debug THEN
9611: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9612: 'party_id has foreign key hz_parties.party_id. ' ||
9613: 'x_return_status = ' || x_return_status, l_debug_prefix);
9614: END IF;
9615: */
9613: 'x_return_status = ' || x_return_status, l_debug_prefix);
9614: END IF;
9615: */
9616: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9617: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id has foreign key hz_parties.party_id. ' ||
9618: 'x_return_status = ' || x_return_status,
9619: p_msg_level=>fnd_log.level_statement);
9620: END IF;
9621:
9671: x_return_status => x_return_status
9672: );
9673:
9674: /*IF g_debug THEN
9675: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9676: 'check whether end_date is greater than or equal to begin_date. ' ||
9677: 'x_return_status = ' || x_return_status, l_debug_prefix);
9678: END IF;
9679: */
9677: 'x_return_status = ' || x_return_status, l_debug_prefix);
9678: END IF;
9679: */
9680: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9681: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9682: p_message=>'check whether end_date is greater than or equal to begin_date. ' ||
9683: 'x_return_status = ' || x_return_status,
9684: p_msg_level=>fnd_log.level_statement);
9685: END IF;
9686:
9687: END IF;
9688:
9689: /*IF g_debug THEN
9690: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9691: '(+) after validating the begin_date and end_date... ' ||
9692: 'x_return_status = ' || x_return_status, l_debug_prefix);
9693: END IF;
9694: */
9692: 'x_return_status = ' || x_return_status, l_debug_prefix);
9693: END IF;
9694: */
9695: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9696: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9697: p_message=>'(+) after validating the begin_date and end_date... ' ||
9698: 'x_return_status = ' || x_return_status,
9699: p_msg_level=>fnd_log.level_statement);
9700: END IF;
9713: x_return_status => x_return_status);
9714:
9715:
9716: /*IF g_debug THEN
9717: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9718: 'employment_type_code should be in lookup HZ_EMPLOYMENT_TYPE. ' ||
9719: 'x_return_status = ' || x_return_status, l_debug_prefix);
9720: END IF;
9721: */
9719: 'x_return_status = ' || x_return_status, l_debug_prefix);
9720: END IF;
9721: */
9722: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9723: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9724: p_message=>'employment_type_code should be in lookup HZ_EMPLOYMENT_TYPE. ' ||
9725: 'x_return_status = ' || x_return_status,
9726: p_msg_level=>fnd_log.level_statement);
9727: END IF;
9740: x_return_status => x_return_status);
9741:
9742:
9743: /*IF g_debug THEN
9744: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9745: 'employed_as_title_code should be in lookup RESPONSIBILITY. ' ||
9746: 'x_return_status = ' || x_return_status, l_debug_prefix);
9747: END IF;
9748: */
9746: 'x_return_status = ' || x_return_status, l_debug_prefix);
9747: END IF;
9748: */
9749: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9750: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9751: p_message=>'employed_as_title_code should be in lookup RESPONSIBILITY. ' ||
9752: 'x_return_status = ' || x_return_status,
9753: p_msg_level=>fnd_log.level_statement);
9754: END IF;
9795: fnd_msg_pub.add;
9796: x_return_status := fnd_api.g_ret_sts_error;
9797:
9798: /*IF g_debug THEN
9799: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9800: 'check that employed_as_title is empty when employed_as_title_code isn t. '||
9801: ' x_return_status = ' || x_return_status, l_debug_prefix);
9802: END IF;
9803: */
9801: ' x_return_status = ' || x_return_status, l_debug_prefix);
9802: END IF;
9803: */
9804: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9805: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9806: p_message=>'check that employed_as_title is empty when employed_as_title_code isn t. '||
9807: ' x_return_status = ' || x_return_status,
9808: p_msg_level=>fnd_log.level_statement);
9809: END IF;
9811: END IF;
9812:
9813:
9814: /*IF g_debug THEN
9815: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9816: '(+) after validating employed_as_title ... ' ||
9817: 'x_return_status = ' || x_return_status, l_debug_prefix);
9818: END IF;
9819: */
9817: 'x_return_status = ' || x_return_status, l_debug_prefix);
9818: END IF;
9819: */
9820: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9821: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9822: p_message=>'(+) after validating employed_as_title ... ' ||
9823: 'x_return_status = ' || x_return_status,
9824: p_msg_level=>fnd_log.level_statement);
9825: END IF;
9852: x_return_status := fnd_api.g_ret_sts_error;
9853: END;
9854:
9855: /*IF g_debug THEN
9856: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9857: 'employed_by_party_id should be in hz_parties.party_id. ' ||
9858: 'x_return_status = ' || x_return_status, l_debug_prefix);
9859: END IF;
9860: */
9858: 'x_return_status = ' || x_return_status, l_debug_prefix);
9859: END IF;
9860: */
9861: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9862: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9863: p_message=>'employed_by_party_id should be in hz_parties.party_id. ' ||
9864: 'x_return_status = ' || x_return_status,
9865: p_msg_level=>fnd_log.level_statement);
9866: END IF;
9908: fnd_msg_pub.add;
9909: x_return_status := fnd_api.g_ret_sts_error;
9910:
9911: /*IF g_debug THEN
9912: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9913: 'check that employed_by_name_company is empty when employed_by_party_id isn t. ' ||
9914: ' x_return_status = ' || x_return_status, l_debug_prefix);
9915: END IF;
9916: */
9914: ' x_return_status = ' || x_return_status, l_debug_prefix);
9915: END IF;
9916: */
9917: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9918: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9919: p_message=>'check that employed_by_name_company is empty when employed_by_party_id isn t. ' ||
9920: ' x_return_status = ' || x_return_status,
9921: p_msg_level=>fnd_log.level_statement);
9922: END IF;
9924: END IF;
9925:
9926:
9927: /*IF g_debug THEN
9928: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9929: '(+) after validating employed_by_name_company ... ' ||
9930: 'x_return_status = ' || x_return_status, l_debug_prefix);
9931: END IF;
9932: */
9930: 'x_return_status = ' || x_return_status, l_debug_prefix);
9931: END IF;
9932: */
9933: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9934: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9935: p_message=>'(+) after validating employed_by_name_company ... ' ||
9936: 'x_return_status = ' || x_return_status,
9937: p_msg_level=>fnd_log.level_statement);
9938: END IF;
9963: x_return_status := fnd_api.g_ret_sts_error;
9964: END IF;
9965:
9966: /*IF g_debug THEN
9967: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9968: 'check that weekly_work_hours is 1 to 168 value range. ' ||
9969: ' x_return_status = ' || x_return_status, l_debug_prefix);
9970: END IF;
9971: */
9969: ' x_return_status = ' || x_return_status, l_debug_prefix);
9970: END IF;
9971: */
9972: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9973: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9974: p_message=>'check that weekly_work_hours is 1 to 168 value range. ' ||
9975: ' x_return_status = ' || x_return_status,
9976: p_msg_level=>fnd_log.level_statement);
9977: END IF;
9979: END IF;
9980:
9981:
9982: /*IF g_debug THEN
9983: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9984: '(+) after validating weekly_work_hours ... ' ||
9985: 'x_return_status = ' || x_return_status, l_debug_prefix);
9986: END IF;
9987: */
9985: 'x_return_status = ' || x_return_status, l_debug_prefix);
9986: END IF;
9987: */
9988: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9989: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
9990: p_message=>'(+) after validating weekly_work_hours ... ' ||
9991: 'x_return_status = ' || x_return_status,
9992: p_msg_level=>fnd_log.level_statement);
9993: END IF;
10006: p_column_value => p_employment_history_rec.faculty_position_flag,
10007: x_return_status => x_return_status);
10008:
10009: /*IF g_debug THEN
10010: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10011: 'faculty_position_flag is mandatory field. ' ||
10012: 'x_return_status = ' || x_return_status, l_debug_prefix);
10013: END IF;
10014: */
10012: 'x_return_status = ' || x_return_status, l_debug_prefix);
10013: END IF;
10014: */
10015: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10016: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'faculty_position_flag is mandatory field. ' ||
10017: 'x_return_status = ' || x_return_status,
10018: p_msg_level=>fnd_log.level_statement);
10019: END IF;
10020:
10028: x_return_status => x_return_status);
10029:
10030:
10031: /*IF g_debug THEN
10032: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10033: 'faculty_position_flag should be in lookup YES/NO. ' ||
10034: 'x_return_status = ' || x_return_status, l_debug_prefix);
10035: END IF;
10036: */
10034: 'x_return_status = ' || x_return_status, l_debug_prefix);
10035: END IF;
10036: */
10037: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10038: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'faculty_position_flag should be in lookup YES/NO. ' ||
10039: 'x_return_status = ' || x_return_status,
10040: p_msg_level=>fnd_log.level_statement);
10041: END IF;
10042:
10072: x_return_status => x_return_status);
10073:
10074:
10075: /*IF g_debug THEN
10076: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10077: 'tenure_code should be in lookup HZ_TENURE_CODE. ' ||
10078: ' x_return_status = ' || x_return_status, l_debug_prefix);
10079: END IF;
10080: */
10078: ' x_return_status = ' || x_return_status, l_debug_prefix);
10079: END IF;
10080: */
10081: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10082: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10083: p_message=>'tenure_code should be in lookup HZ_TENURE_CODE. ' ||
10084: ' x_return_status = ' || x_return_status,
10085: p_msg_level=>fnd_log.level_statement);
10086: END IF;
10096:
10097: END IF;
10098:
10099: /*IF g_debug THEN
10100: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10101: '(+) after validating tenure_code ... ' ||
10102: 'x_return_status = ' || x_return_status, l_debug_prefix);
10103: END IF;
10104: */
10102: 'x_return_status = ' || x_return_status, l_debug_prefix);
10103: END IF;
10104: */
10105: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10106: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validating tenure_code ... ' ||
10107: 'x_return_status = ' || x_return_status,
10108: p_msg_level=>fnd_log.level_statement);
10109: END IF;
10110:
10131: x_return_status := fnd_api.g_ret_sts_error;
10132: END IF;
10133:
10134: /*IF g_debug THEN
10135: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10136: 'check that fraction_of_tenure is 0 to 100 value range. ' ||
10137: ' x_return_status = ' || x_return_status, l_debug_prefix);
10138: END IF;
10139: */
10137: ' x_return_status = ' || x_return_status, l_debug_prefix);
10138: END IF;
10139: */
10140: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10141: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10142: p_message=>'check that fraction_of_tenure is 0 to 100 value range. ' ||
10143: ' x_return_status = ' || x_return_status,
10144: p_msg_level=>fnd_log.level_statement);
10145: END IF;
10158:
10159: END IF;
10160:
10161: /*IF g_debug THEN
10162: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10163: '(+) after validating fraction_of_tenure ... ' ||
10164: 'x_return_status = ' || x_return_status, l_debug_prefix);
10165: END IF;
10166: */
10164: 'x_return_status = ' || x_return_status, l_debug_prefix);
10165: END IF;
10166: */
10167: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10168: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validating fraction_of_tenure ... ' ||
10169: 'x_return_status = ' || x_return_status,
10170: p_msg_level=>fnd_log.level_statement);
10171: END IF;
10172:
10175: ------------------------
10176: -- validation for status
10177: ------------------------
10178: /****Logical APIs - validation not required****/
10179: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
10180: -- status is lookup code in lookup type REGISTRY_STATUS
10181: IF p_employment_history_rec.status IS NOT NULL
10182: AND
10183: p_employment_history_rec.status <> fnd_api.g_miss_char
10196: p_column_value => p_employment_history_rec.status,
10197: x_return_status => x_return_status);
10198:
10199: /*IF g_debug THEN
10200: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10201: 'status is lookup code in lookup type REGISTRY_STATUS. ' ||
10202: 'x_return_status = ' || x_return_status, l_debug_prefix);
10203: END IF;
10204: */
10202: 'x_return_status = ' || x_return_status, l_debug_prefix);
10203: END IF;
10204: */
10205: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10206: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10207: p_message=>'status is lookup code in lookup type REGISTRY_STATUS. ' ||
10208: 'x_return_status = ' || x_return_status,
10209: p_msg_level=>fnd_log.level_statement);
10210: END IF;
10242: p_old_application_id => l_application_id,
10243: x_return_status => x_return_status);
10244:
10245: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
10246: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_employment_history (-)',
10247: p_msg_level=>fnd_log.level_procedure);
10248: END IF;
10249:
10250: END validate_employment_history;
10309: --enable_debug;
10310:
10311: -- Debug info.
10312: /*IF g_debug THEN
10313: hz_utility_v2pub.debug ('validate_work_class (+)');
10314: END IF;
10315: */
10316: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
10317: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_work_class (+)',
10313: hz_utility_v2pub.debug ('validate_work_class (+)');
10314: END IF;
10315: */
10316: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
10317: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_work_class (+)',
10318: p_msg_level=>fnd_log.level_procedure);
10319: END IF;
10320:
10321: -- do the query to get old values for update
10339: --------------------------------------
10340: -- validate work_class_id
10341: --------------------------------------
10342: /****Logical APIs - validation not required****/
10343: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
10344: -- If primary key value is passed, check for uniqueness.
10345: -- If primary key value is not passed, it will be generated
10346: -- from sequence by table handler.
10347:
10362: END IF;
10363: CLOSE work_class_cur;
10364:
10365: /*IF g_debug THEN
10366: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10367: 'check that work_class_id is unique during creation. ' ||
10368: ' x_return_status = ' || x_return_status, l_debug_prefix);
10369: END IF;
10370: */
10368: ' x_return_status = ' || x_return_status, l_debug_prefix);
10369: END IF;
10370: */
10371: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10372: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10373: p_message=>'check that work_class_id is unique during creation. ' ||
10374: ' x_return_status = ' || x_return_status,
10375: p_msg_level=>fnd_log.level_statement);
10376: END IF;
10387: p_old_column_value => l_work_class_id,
10388: x_return_status => x_return_status);
10389:
10390: /*IF g_debug THEN
10391: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10392: 'work_class_id is non-updateable field. ' ||
10393: 'x_return_status = ' || x_return_status, l_debug_prefix);
10394: END IF;
10395: */
10393: 'x_return_status = ' || x_return_status, l_debug_prefix);
10394: END IF;
10395: */
10396: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10397: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'work_class_id is non-updateable field. ' ||
10398: 'x_return_status = ' || x_return_status,
10399: p_msg_level=>fnd_log.level_statement);
10400: END IF;
10401:
10401:
10402: END IF;
10403:
10404: /*IF g_debug THEN
10405: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10406: '(+) after validation of work_class_id ... ' ||
10407: 'x_return_status = ' || x_return_status, l_debug_prefix);
10408: END IF;
10409: */
10407: 'x_return_status = ' || x_return_status, l_debug_prefix);
10408: END IF;
10409: */
10410: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10411: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validation of work_class_id ... ' ||
10412: 'x_return_status = ' || x_return_status,
10413: p_msg_level=>fnd_log.level_statement);
10414: END IF;
10415: END IF;
10417: ---------------------------------------
10418: -- validation for employment_history_id
10419: ---------------------------------------
10420: /****Logical APIs - validation not required****/
10421: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
10422: -- employment_history_id is mandatory field
10423: IF p_create_update_flag = 'C' THEN
10424: validate_mandatory (
10425: p_create_update_flag => p_create_update_flag,
10427: p_column_value => p_work_class_rec.employment_history_id,
10428: x_return_status => x_return_status);
10429:
10430: /*IF g_debug THEN
10431: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10432: 'employment_history_id is mandatory field. ' ||
10433: 'x_return_status = ' || x_return_status, l_debug_prefix);
10434: END IF;
10435: */
10433: 'x_return_status = ' || x_return_status, l_debug_prefix);
10434: END IF;
10435: */
10436: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10437: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'employment_history_id is mandatory field. ' ||
10438: 'x_return_status = ' || x_return_status,
10439: p_msg_level=>fnd_log.level_statement);
10440: END IF;
10441:
10450: p_old_column_value => l_employment_history_id,
10451: x_return_status => x_return_status);
10452:
10453: /*IF g_debug THEN
10454: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10455: 'employment_history_id is non-updateable field. ' ||
10456: 'x_return_status = ' || x_return_status, l_debug_prefix);
10457: END IF;
10458: */
10456: 'x_return_status = ' || x_return_status, l_debug_prefix);
10457: END IF;
10458: */
10459: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10460: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'employment_history_id is non-updateable field. ' ||
10461: 'x_return_status = ' || x_return_status,
10462: p_msg_level=>fnd_log.level_statement);
10463: END IF;
10464:
10488: x_return_status := fnd_api.g_ret_sts_error;
10489: END;
10490:
10491: /*IF g_debug THEN
10492: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10493: 'employment_history_id has foreign key hz_employment_history.employment_history_id. ' ||
10494: 'x_return_status = ' || x_return_status, l_debug_prefix);
10495: END IF;
10496: */
10494: 'x_return_status = ' || x_return_status, l_debug_prefix);
10495: END IF;
10496: */
10497: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10498: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10499: p_message=>'employment_history_id has foreign key hz_employment_history.employment_history_id. ' ||
10500: 'x_return_status = ' || x_return_status,
10501: p_msg_level=>fnd_log.level_statement);
10502: END IF;
10517: p_column_value => p_work_class_rec.work_class_name,
10518: x_return_status => x_return_status);
10519:
10520: /*IF g_debug THEN
10521: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10522: 'work_class_name is mandatory field. ' ||
10523: 'x_return_status = ' || x_return_status, l_debug_prefix);
10524: END IF;
10525: */
10523: 'x_return_status = ' || x_return_status, l_debug_prefix);
10524: END IF;
10525: */
10526: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10527: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'work_class_name is mandatory field. ' ||
10528: 'x_return_status = ' || x_return_status,
10529: p_msg_level=>fnd_log.level_statement);
10530: END IF;
10531:
10533: ------------------------
10534: -- validation for status
10535: ------------------------
10536: /****Logical APIs - validation not required****/
10537: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
10538: -- status is lookup code in lookup type REGISTRY_STATUS
10539: IF p_work_class_rec.status IS NOT NULL
10540: AND
10541: p_work_class_rec.status <> fnd_api.g_miss_char
10554: p_column_value => p_work_class_rec.status,
10555: x_return_status => x_return_status);
10556:
10557: /*IF g_debug THEN
10558: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10559: 'status is lookup code in lookup type REGISTRY_STATUS. ' ||
10560: 'x_return_status = ' || x_return_status, l_debug_prefix);
10561: END IF;
10562: */
10560: 'x_return_status = ' || x_return_status, l_debug_prefix);
10561: END IF;
10562: */
10563: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10564: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10565: p_message=>'status is lookup code in lookup type REGISTRY_STATUS. ' ||
10566: 'x_return_status = ' || x_return_status,
10567: p_msg_level=>fnd_log.level_statement);
10568: END IF;
10600: p_old_application_id => l_application_id,
10601: x_return_status => x_return_status);
10602:
10603: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
10604: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_work_class (-)',
10605: p_msg_level=>fnd_log.level_procedure);
10606: END IF;
10607:
10608: END validate_work_class;
10670: --enable_debug;
10671:
10672: -- Debug info.
10673: /*IF g_debug THEN
10674: hz_utility_v2pub.debug ('validate_person_interest (+)');
10675: END IF;
10676: */
10677: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
10678: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_person_interest (+)',
10674: hz_utility_v2pub.debug ('validate_person_interest (+)');
10675: END IF;
10676: */
10677: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
10678: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_person_interest (+)',
10679: p_msg_level=>fnd_log.level_procedure);
10680: END IF;
10681:
10682:
10701: --------------------------------------
10702: -- validate person_interest_id
10703: --------------------------------------
10704: /****Logical APIs - validation not required****/
10705: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
10706: -- If primary key value is passed, check for uniqueness.
10707: -- If primary key value is not passed, it will be generated
10708: -- from sequence by table handler.
10709:
10724: END IF;
10725: CLOSE person_interest_cur;
10726:
10727: /*IF g_debug THEN
10728: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10729: 'check that person_interest_id is unique during creation. ' ||
10730: ' x_return_status = ' || x_return_status, l_debug_prefix);
10731: END IF;
10732: */
10730: ' x_return_status = ' || x_return_status, l_debug_prefix);
10731: END IF;
10732: */
10733: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10734: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10735: p_message=>'check that person_interest_id is unique during creation. ' ||
10736: ' x_return_status = ' || x_return_status,
10737: p_msg_level=>fnd_log.level_statement);
10738: END IF;
10749: p_old_column_value => l_person_interest_id,
10750: x_return_status => x_return_status);
10751:
10752: /*IF g_debug THEN
10753: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10754: 'person_interest_id is non-updateable field. ' ||
10755: 'x_return_status = ' || x_return_status, l_debug_prefix);
10756: END IF;
10757: */
10755: 'x_return_status = ' || x_return_status, l_debug_prefix);
10756: END IF;
10757: */
10758: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10759: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'person_interest_id is non-updateable field. ' ||
10760: 'x_return_status = ' || x_return_status,
10761: p_msg_level=>fnd_log.level_statement);
10762: END IF;
10763:
10763:
10764: END IF;
10765:
10766: /*IF g_debug THEN
10767: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10768: '(+) after validation of person_interest_id ... ' ||
10769: 'x_return_status = ' || x_return_status, l_debug_prefix);
10770: END IF;
10771: */
10769: 'x_return_status = ' || x_return_status, l_debug_prefix);
10770: END IF;
10771: */
10772: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10773: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validation of person_interest_id ... ' ||
10774: 'x_return_status = ' || x_return_status,
10775: p_msg_level=>fnd_log.level_statement);
10776: END IF;
10777: END IF;
10779: --------------------------
10780: -- validation for party_id
10781: --------------------------
10782: /****Logical APIs - validation not required****/
10783: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
10784: -- party_id is mandatory field
10785: IF p_create_update_flag = 'C' THEN
10786: validate_mandatory (
10787: p_create_update_flag => p_create_update_flag,
10789: p_column_value => p_person_interest_rec.party_id,
10790: x_return_status => x_return_status);
10791:
10792: /*IF g_debug THEN
10793: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10794: 'party_id is mandatory field. ' ||
10795: 'x_return_status = ' || x_return_status, l_debug_prefix);
10796: END IF;
10797: */
10795: 'x_return_status = ' || x_return_status, l_debug_prefix);
10796: END IF;
10797: */
10798: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10799: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id is mandatory field. ' ||
10800: 'x_return_status = ' || x_return_status,
10801: p_msg_level=>fnd_log.level_statement);
10802: END IF;
10803:
10812: p_old_column_value => l_party_id,
10813: x_return_status => x_return_status);
10814:
10815: /*IF g_debug THEN
10816: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10817: 'party_id is non-updateable field. ' ||
10818: 'x_return_status = ' || x_return_status, l_debug_prefix);
10819: END IF;
10820: */
10818: 'x_return_status = ' || x_return_status, l_debug_prefix);
10819: END IF;
10820: */
10821: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10822: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id is non-updateable field. ' ||
10823: 'x_return_status = ' || x_return_status,
10824: p_msg_level=>fnd_log.level_statement);
10825: END IF;
10826:
10855: x_return_status := fnd_api.g_ret_sts_error;
10856: END;
10857:
10858: /*IF g_debug THEN
10859: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10860: 'party_id has foreign key hz_parties.party_id. ' ||
10861: 'x_return_status = ' || x_return_status, l_debug_prefix);
10862: END IF;
10863: */
10861: 'x_return_status = ' || x_return_status, l_debug_prefix);
10862: END IF;
10863: */
10864: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10865: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id has foreign key hz_parties.party_id. ' ||
10866: 'x_return_status = ' || x_return_status,
10867: p_msg_level=>fnd_log.level_statement);
10868: END IF;
10869:
10874: ---------------------------------
10875: -- validation for sport_indicator
10876: ---------------------------------
10877: /****Logical APIs - validation not required****/
10878: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
10879: -- sport_indicator is mandatory field
10880:
10881:
10882: -- sport_indicator is validated against lookup type YES/NO
10887: x_return_status => x_return_status);
10888:
10889:
10890: /*IF g_debug THEN
10891: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10892: 'sport_indicator should be in lookup YES/NO. ' ||
10893: 'x_return_status = ' || x_return_status, l_debug_prefix);
10894: END IF;
10895: */
10893: 'x_return_status = ' || x_return_status, l_debug_prefix);
10894: END IF;
10895: */
10896: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10897: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'sport_indicator should be in lookup YES/NO. ' ||
10898: 'x_return_status = ' || x_return_status,
10899: p_msg_level=>fnd_log.level_statement);
10900: END IF;
10901: END IF;
10912: p_column_value => p_person_interest_rec.interest_name,
10913: x_return_status => x_return_status);
10914:
10915: /*IF g_debug THEN
10916: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10917: 'interest_name is mandatory field. ' ||
10918: 'x_return_status = ' || x_return_status, l_debug_prefix);
10919: END IF;
10920: */
10918: 'x_return_status = ' || x_return_status, l_debug_prefix);
10919: END IF;
10920: */
10921: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10922: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'interest_name is mandatory field. ' ||
10923: 'x_return_status = ' || x_return_status,
10924: p_msg_level=>fnd_log.level_statement);
10925: END IF;
10926:
10928: ------------------------
10929: -- validation for status
10930: ------------------------
10931: /****Logical APIs - validation not required****/
10932: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
10933: -- status is lookup code in lookup type REGISTRY_STATUS
10934: IF p_person_interest_rec.status IS NOT NULL
10935: AND
10936: p_person_interest_rec.status <> fnd_api.g_miss_char
10949: p_column_value => p_person_interest_rec.status,
10950: x_return_status => x_return_status);
10951:
10952: /*IF g_debug THEN
10953: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10954: 'status is lookup code in lookup type REGISTRY_STATUS. ' ||
10955: 'x_return_status = ' || x_return_status, l_debug_prefix);
10956: END IF;
10957: */
10955: 'x_return_status = ' || x_return_status, l_debug_prefix);
10956: END IF;
10957: */
10958: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10959: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
10960: p_message=>'status is lookup code in lookup type REGISTRY_STATUS. ' ||
10961: 'x_return_status = ' || x_return_status,
10962: p_msg_level=>fnd_log.level_statement);
10963: END IF;
10995: p_old_application_id => l_application_id,
10996: x_return_status => x_return_status);
10997:
10998: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
10999: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_person_interest (-)',
11000: p_msg_level=>fnd_log.level_procedure);
11001: END IF;
11002:
11003: END validate_person_interest;
11086: --enable_debug;
11087:
11088: -- Debug info.
11089: /*IF g_debug THEN
11090: hz_utility_v2pub.debug ('validate_location (+)');
11091: END IF;
11092: */
11093: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
11094: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_location (+)',
11090: hz_utility_v2pub.debug ('validate_location (+)');
11091: END IF;
11092: */
11093: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
11094: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_location (+)',
11095: p_msg_level=>fnd_log.level_procedure);
11096: END IF;
11097:
11098:
11179: p_column_value => p_location_rec.country,
11180: x_return_status => x_return_status);
11181:
11182: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
11183: hz_utility_v2pub.debug(
11184: p_prefix => l_debug_prefix,
11185: p_message => 'country has foreign key fnd_territories.territory_code. ' ||
11186: 'x_return_status = ' || x_return_status,
11187: p_msg_level => fnd_log.level_statement);
11207: x_return_status => x_return_status);
11208:
11209:
11210: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
11211: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'content_source_type is non-updateable. ' ||
11212: 'x_return_status = ' || x_return_status,
11213: p_msg_level=>fnd_log.level_statement);
11214: END IF;
11215: END IF;
11221: p_column_value => p_location_rec.content_source_type,
11222: x_return_status => x_return_status);
11223:
11224: IF g_debug THEN
11225: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
11226: 'content_source_type is lookup code in lookup type CONTENT_SOURCE_TYPE. ' ||
11227: 'x_return_status = ' || x_return_status, l_debug_prefix);
11228: END IF;
11229: */
11262: -- SSM SST Integration and Extension
11263: -- Check Updateability using mix-n-match procedure rather than checking the
11264: -- profile value.
11265: /*NVL(FND_PROFILE.value('HZ_UPDATE_THIRD_PARTY_DATA'), 'N') = 'N'*/
11266: --HZ_UTILITY_V2PUB.is_purchased_content_source(db_actual_content_source) = 'Y'
11267: THEN
11268: l_return_status := FND_API.G_RET_STS_SUCCESS;
11269:
11270: validate_nonupdateable (
11379: p_new_actual_content_source => p_location_rec.actual_content_source,
11380: p_entity_name => 'HZ_LOCATIONS',
11381: x_return_status => x_return_status);
11382: -- Bug 4693719 : set global variable to Y
11383: HZ_UTILITY_V2PUB.G_UPDATE_ACS := 'Y';
11384: /*
11385: FND_MESSAGE.SET_NAME('AR', 'HZ_NOTALLOW_UPDATE_THIRD_PARTY');
11386: FND_MSG_PUB.ADD;
11387: x_return_status := FND_API.G_RET_STS_ERROR;
11388: */
11389: END IF;
11390:
11391: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
11392: hz_utility_v2pub.debug(
11393: p_prefix=>l_debug_prefix,
11394: p_message=>'third party address components are non-updateable. ' ||
11395: 'x_return_status = ' || x_return_status,
11396: p_msg_level=>fnd_log.level_statement);
11397: END IF;
11398: END IF;
11399:
11400: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
11401: hz_utility_v2pub.debug(
11402: p_prefix=>l_debug_prefix,
11403: p_message=>'(+) after validate third party address components ... ' ||
11404: 'x_return_status = ' || x_return_status,
11405: p_msg_level=>fnd_log.level_statement);
11429: x_return_status := fnd_api.g_ret_sts_error;
11430: END;
11431:
11432: /*IF g_debug THEN
11433: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
11434: 'language has foreign key fnd_languages.language_code (installed). ' ||
11435: 'x_return_status = ' || x_return_status, l_debug_prefix);
11436: END IF;
11437: */
11435: 'x_return_status = ' || x_return_status, l_debug_prefix);
11436: END IF;
11437: */
11438: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
11439: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
11440: p_message=>'language has foreign key fnd_languages.language_code (installed). ' ||
11441: 'x_return_status = ' || x_return_status,
11442: p_msg_level=>fnd_log.level_statement);
11443: END IF;
11473: x_return_status := fnd_api.g_ret_sts_error;
11474: END;
11475:
11476: /*IF g_debug THEN
11477: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
11478: 'timezone_id has foreign key hz_timezones.timezone_id. ' ||
11479: 'x_return_status = ' || x_return_status, l_debug_prefix);
11480: END IF;
11481: */
11479: 'x_return_status = ' || x_return_status, l_debug_prefix);
11480: END IF;
11481: */
11482: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
11483: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
11484: p_message=>'timezone_id has foreign key hz_timezones.timezone_id. ' ||
11485: 'x_return_status = ' || x_return_status,
11486: p_msg_level=>fnd_log.level_statement);
11487: END IF;
11545: END IF;
11546:
11547: -- Debug info.
11548: /*IF g_debug THEN
11549: hz_utility_v2pub.debug ('validate_location (-)');
11550: END IF;
11551: */
11552: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
11553: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_location (-)',
11549: hz_utility_v2pub.debug ('validate_location (-)');
11550: END IF;
11551: */
11552: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
11553: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_location (-)',
11554: p_msg_level=>fnd_log.level_procedure);
11555: END IF;
11556:
11557: --disable_debug;
11639: --enable_debug;
11640:
11641: -- Debug info.
11642: /*IF g_debug THEN
11643: hz_utility_v2pub.debug ('tax_location_validation (+)');
11644: END IF;
11645: */
11646: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
11647: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'tax_location_validation (+)',
11643: hz_utility_v2pub.debug ('tax_location_validation (+)');
11644: END IF;
11645: */
11646: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
11647: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'tax_location_validation (+)',
11648: p_msg_level=>fnd_log.level_procedure);
11649: END IF;
11650:
11651: -- tax location validation:
11770: END IF;
11771:
11772: -- Debug info.
11773: /*IF g_debug THEN
11774: hz_utility_v2pub.debug ('tax_location_validation (-)');
11775: END IF;
11776: */
11777: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
11778: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'tax_location_validation (-)',
11774: hz_utility_v2pub.debug ('tax_location_validation (-)');
11775: END IF;
11776: */
11777: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
11778: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'tax_location_validation (-)',
11779: p_msg_level=>fnd_log.level_procedure);
11780: END IF;
11781:
11782: --disable_debug;
11855: --enable_debug;
11856:
11857: -- Debug info.
11858: /*IF g_debug THEN
11859: hz_utility_v2pub.debug ('validate_relationship_type (+)');
11860: END IF;
11861: */
11862: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
11863: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_relationship_type (+)',
11859: hz_utility_v2pub.debug ('validate_relationship_type (+)');
11860: END IF;
11861: */
11862: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
11863: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_relationship_type (+)',
11864: p_msg_level=>fnd_log.level_procedure);
11865: END IF;
11866:
11867: -- select columns needed to be checked from table during update
11981: p_column_value => p_relationship_type_rec.relationship_type,
11982: x_return_status => x_return_status);
11983:
11984: /*IF g_debug THEN
11985: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
11986: 'relationship_type is mandatory. ' ||
11987: 'x_return_status = ' || x_return_status, l_debug_prefix);
11988: END IF;
11989: */
11987: 'x_return_status = ' || x_return_status, l_debug_prefix);
11988: END IF;
11989: */
11990: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
11991: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'relationship_type is mandatory. ' ||
11992: 'x_return_status = ' || x_return_status,
11993: p_msg_level=>fnd_log.level_statement);
11994: END IF;
11995:
12003: x_return_status => x_return_status);
12004: END IF;
12005:
12006: /*IF g_debug THEN
12007: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12008: 'relationship_type is non-updateable. ' ||
12009: 'x_return_status = ' || x_return_status, l_debug_prefix);
12010: END IF;
12011: */
12009: 'x_return_status = ' || x_return_status, l_debug_prefix);
12010: END IF;
12011: */
12012: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12013: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'relationship_type is non-updateable. ' ||
12014: 'x_return_status = ' || x_return_status,
12015: p_msg_level=>fnd_log.level_statement);
12016: END IF;
12017:
12029: p_column_value => p_relationship_type_rec.status,
12030: x_return_status => x_return_status);
12031:
12032: /*IF g_debug THEN
12033: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12034: 'status cannot be set to null during update. ' ||
12035: 'x_return_status = ' || x_return_status, l_debug_prefix);
12036: END IF;
12037: */
12035: 'x_return_status = ' || x_return_status, l_debug_prefix);
12036: END IF;
12037: */
12038: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12039: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'status cannot be set to null during update. ' ||
12040: 'x_return_status = ' || x_return_status,
12041: p_msg_level=>fnd_log.level_statement);
12042: END IF;
12043:
12063: p_column_value => p_relationship_type_rec.status,
12064: x_return_status => x_return_status);
12065:
12066: /*IF g_debug THEN
12067: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12068: 'status is lookup code in lookup type CODE_STATUS. ' ||
12069: 'x_return_status = ' || x_return_status, l_debug_prefix);
12070: END IF;
12071: */
12069: 'x_return_status = ' || x_return_status, l_debug_prefix);
12070: END IF;
12071: */
12072: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12073: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12074: p_message=>'status is lookup code in lookup type CODE_STATUS. ' ||
12075: 'x_return_status = ' || x_return_status,
12076: p_msg_level=>fnd_log.level_statement);
12077: END IF;
12090: p_column_value => p_relationship_type_rec.create_party_flag,
12091: x_return_status => x_return_status);
12092:
12093: /*IF g_debug THEN
12094: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12095: 'create_party_flag should be in lookup YES/NO. ' ||
12096: 'x_return_status = ' || x_return_status, l_debug_prefix);
12097: END IF;
12098: */
12096: 'x_return_status = ' || x_return_status, l_debug_prefix);
12097: END IF;
12098: */
12099: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12100: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'create_party_flag should be in lookup YES/NO. ' ||
12101: 'x_return_status = ' || x_return_status,
12102: p_msg_level=>fnd_log.level_statement);
12103: END IF;
12104:
12167: END IF;
12168: END IF;
12169:
12170: /*IF g_debug THEN
12171: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12172: 'create_party_flag is updateable/non-updateable. ' ||
12173: 'x_return_status = ' || x_return_status, l_debug_prefix);
12174: END IF;
12175: */
12173: 'x_return_status = ' || x_return_status, l_debug_prefix);
12174: END IF;
12175: */
12176: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12177: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'create_party_flag is updateable/non-updateable. ' ||
12178: 'x_return_status = ' || x_return_status,
12179: p_msg_level=>fnd_log.level_statement);
12180: END IF;
12181:
12191: p_column_value => p_relationship_type_rec.allow_circular_relationships,
12192: x_return_status => x_return_status);
12193:
12194: /*IF g_debug THEN
12195: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12196: 'allow_circular_relationships should be in lookup YES/NO. ' ||
12197: 'x_return_status = ' || x_return_status, l_debug_prefix);
12198: END IF;
12199: */
12197: 'x_return_status = ' || x_return_status, l_debug_prefix);
12198: END IF;
12199: */
12200: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12201: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12202: p_message=>'allow_circular_relationships should be in lookup YES/NO. ' ||
12203: 'x_return_status = ' || x_return_status,
12204: p_msg_level=>fnd_log.level_statement);
12205: END IF;
12213: p_old_column_value => l_allow_circular_relationships,
12214: x_return_status => x_return_status);
12215:
12216: /*IF g_debug THEN
12217: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12218: 'allow_circular_relationships is non-updateable. ' ||
12219: 'x_return_status = ' || x_return_status, l_debug_prefix);
12220: END IF;
12221: */
12219: 'x_return_status = ' || x_return_status, l_debug_prefix);
12220: END IF;
12221: */
12222: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12223: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12224: p_message=>'allow_circular_relationships is non-updateable. ' ||
12225: 'x_return_status = ' || x_return_status,
12226: p_msg_level=>fnd_log.level_statement);
12227: END IF;
12240: p_column_value => p_relationship_type_rec.allow_relate_to_self_flag,
12241: x_return_status => x_return_status);
12242:
12243: /*IF g_debug THEN
12244: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12245: 'allow_relate_to_self_flag should be in lookup YES/NO. ' ||
12246: 'x_return_status = ' || x_return_status, l_debug_prefix);
12247: END IF;
12248: */
12246: 'x_return_status = ' || x_return_status, l_debug_prefix);
12247: END IF;
12248: */
12249: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12250: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12251: p_message=>'allow_relate_to_self_flag should be in lookup YES/NO. ' ||
12252: 'x_return_status = ' || x_return_status,
12253: p_msg_level=>fnd_log.level_statement);
12254: END IF;
12262: p_old_column_value => l_allow_relate_to_self_flag,
12263: x_return_status => x_return_status);
12264:
12265: /*IF g_debug THEN
12266: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12267: 'allow_relate_to_self_flag is non-updateable. ' ||
12268: 'x_return_status = ' || x_return_status, l_debug_prefix);
12269: END IF;
12270: */
12268: 'x_return_status = ' || x_return_status, l_debug_prefix);
12269: END IF;
12270: */
12271: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12272: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'allow_relate_to_self_flag is non-updateable. ' ||
12273: 'x_return_status = ' || x_return_status,
12274: p_msg_level=>fnd_log.level_statement);
12275: END IF;
12276:
12295: p_column_value => p_relationship_type_rec.forward_rel_code,
12296: x_return_status => x_return_status);
12297:
12298: /*IF g_debug THEN
12299: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12300: 'forward_rel_code is lookup code in lookup type PARTY_RELATIONS_TYPE. ' ||
12301: 'x_return_status = ' || x_return_status, l_debug_prefix);
12302: END IF;
12303: */
12301: 'x_return_status = ' || x_return_status, l_debug_prefix);
12302: END IF;
12303: */
12304: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12305: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12306: p_message=>'forward_rel_code is lookup code in lookup type PARTY_RELATIONS_TYPE. ' ||
12307: 'x_return_status = ' || x_return_status,
12308: p_msg_level=>fnd_log.level_statement);
12309: END IF;
12317: p_old_column_value => l_forward_rel_code,
12318: x_return_status => x_return_status);
12319:
12320: /*IF g_debug THEN
12321: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12322: 'forward_rel_code is non-updateable. ' ||
12323: 'x_return_status = ' || x_return_status, l_debug_prefix);
12324: END IF;
12325: */
12323: 'x_return_status = ' || x_return_status, l_debug_prefix);
12324: END IF;
12325: */
12326: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12327: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'forward_rel_code is non-updateable. ' ||
12328: 'x_return_status = ' || x_return_status,
12329: p_msg_level=>fnd_log.level_statement);
12330: END IF;
12331:
12350: p_column_value => p_relationship_type_rec.backward_rel_code,
12351: x_return_status => x_return_status);
12352:
12353: /*IF g_debug THEN
12354: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12355: 'backward_rel_code is lookup code in lookup type PARTY_RELATIONS_TYPE. ' ||
12356: 'x_return_status = ' || x_return_status, l_debug_prefix);
12357: END IF;
12358: */
12356: 'x_return_status = ' || x_return_status, l_debug_prefix);
12357: END IF;
12358: */
12359: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12360: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12361: p_message=>'backward_rel_code is lookup code in lookup type PARTY_RELATIONS_TYPE. ' ||
12362: 'x_return_status = ' || x_return_status,
12363: p_msg_level=>fnd_log.level_statement);
12364: END IF;
12372: p_old_column_value => l_backward_rel_code,
12373: x_return_status => x_return_status);
12374:
12375: /*IF g_debug THEN
12376: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12377: 'backward_rel_code is non-updateable. ' ||
12378: 'x_return_status = ' || x_return_status, l_debug_prefix);
12379: END IF;
12380: */
12378: 'x_return_status = ' || x_return_status, l_debug_prefix);
12379: END IF;
12380: */
12381: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12382: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'backward_rel_code is non-updateable. ' ||
12383: 'x_return_status = ' || x_return_status,
12384: p_msg_level=>fnd_log.level_statement);
12385: END IF;
12386:
12398: p_column_value => p_relationship_type_rec.direction_code,
12399: x_return_status => x_return_status);
12400:
12401: /*IF g_debug THEN
12402: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12403: 'direction_code is mandatory. ' ||
12404: 'x_return_status = ' || x_return_status, l_debug_prefix);
12405: END IF;
12406: */
12404: 'x_return_status = ' || x_return_status, l_debug_prefix);
12405: END IF;
12406: */
12407: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12408: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'direction_code is mandatory. ' ||
12409: 'x_return_status = ' || x_return_status,
12410: p_msg_level=>fnd_log.level_statement);
12411: END IF;
12412:
12418: p_column_value => p_relationship_type_rec.direction_code,
12419: x_return_status => x_return_status);
12420:
12421: /*IF g_debug THEN
12422: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12423: 'direction_code is lookup code in lookup type DIRECTION_CODE. ' ||
12424: 'x_return_status = ' || x_return_status, l_debug_prefix);
12425: END IF;
12426: */
12424: 'x_return_status = ' || x_return_status, l_debug_prefix);
12425: END IF;
12426: */
12427: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12428: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12429: p_message=>'direction_code is lookup code in lookup type DIRECTION_CODE. ' ||
12430: 'x_return_status = ' || x_return_status,
12431: p_msg_level=>fnd_log.level_statement);
12432: END IF;
12440: p_old_column_value => l_direction_code,
12441: x_return_status => x_return_status);
12442:
12443: /*IF g_debug THEN
12444: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12445: 'direction_code is non-updateable. ' ||
12446: 'x_return_status = ' || x_return_status, l_debug_prefix);
12447: END IF;
12448: */
12446: 'x_return_status = ' || x_return_status, l_debug_prefix);
12447: END IF;
12448: */
12449: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12450: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'direction_code is non-updateable. ' ||
12451: 'x_return_status = ' || x_return_status,
12452: p_msg_level=>fnd_log.level_statement);
12453: END IF;
12454:
12466: p_column_value => p_relationship_type_rec.subject_type,
12467: x_return_status => x_return_status);
12468:
12469: /*IF g_debug THEN
12470: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12471: 'subject_type is mandatory. ' ||
12472: 'x_return_status = ' || x_return_status, l_debug_prefix);
12473: END IF;
12474: */
12472: 'x_return_status = ' || x_return_status, l_debug_prefix);
12473: END IF;
12474: */
12475: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12476: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'subject_type is mandatory. ' ||
12477: 'x_return_status = ' || x_return_status,
12478: p_msg_level=>fnd_log.level_statement);
12479: END IF;
12480:
12499: x_return_status := fnd_api.g_ret_sts_error;
12500: END;
12501:
12502: /*IF g_debug THEN
12503: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12504: 'subject_type has foreign key fnd_object_instance_sets.instance_set_name. ' ||
12505: 'x_return_status = ' || x_return_status, l_debug_prefix);
12506: END IF;
12507: */
12505: 'x_return_status = ' || x_return_status, l_debug_prefix);
12506: END IF;
12507: */
12508: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12509: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12510: p_message=>'subject_type has foreign key fnd_object_instance_sets.instance_set_name. ' ||
12511: 'x_return_status = ' || x_return_status,
12512: p_msg_level=>fnd_log.level_statement);
12513: END IF;
12523: p_old_column_value => l_subject_type,
12524: x_return_status => x_return_status);
12525:
12526: /*IF g_debug THEN
12527: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12528: 'subject_type is non-updateable. ' ||
12529: 'x_return_status = ' || x_return_status, l_debug_prefix);
12530: END IF;
12531: */
12529: 'x_return_status = ' || x_return_status, l_debug_prefix);
12530: END IF;
12531: */
12532: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12533: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'subject_type is non-updateable. ' ||
12534: 'x_return_status = ' || x_return_status,
12535: p_msg_level=>fnd_log.level_statement);
12536: END IF;
12537:
12549: p_column_value => p_relationship_type_rec.object_type,
12550: x_return_status => x_return_status);
12551:
12552: /*IF g_debug THEN
12553: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12554: 'object_type is mandatory. ' ||
12555: 'x_return_status = ' || x_return_status, l_debug_prefix);
12556: END IF;
12557: */
12555: 'x_return_status = ' || x_return_status, l_debug_prefix);
12556: END IF;
12557: */
12558: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12559: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'object_type is mandatory. ' ||
12560: 'x_return_status = ' || x_return_status,
12561: p_msg_level=>fnd_log.level_statement);
12562: END IF;
12563:
12582: x_return_status := fnd_api.g_ret_sts_error;
12583: END;
12584:
12585: /*IF g_debug THEN
12586: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12587: 'object_type has foreign key fnd_object_instance_sets.instance_set_name. ' ||
12588: 'x_return_status = ' || x_return_status, l_debug_prefix);
12589: END IF;
12590: */
12588: 'x_return_status = ' || x_return_status, l_debug_prefix);
12589: END IF;
12590: */
12591: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12592: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12593: p_message=>'object_type has foreign key fnd_object_instance_sets.instance_set_name. ' ||
12594: 'x_return_status = ' || x_return_status,
12595: p_msg_level=>fnd_log.level_statement);
12596: END IF;
12606: p_old_column_value => l_object_type,
12607: x_return_status => x_return_status);
12608:
12609: /*IF g_debug THEN
12610: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12611: 'object_type is non-updateable. ' ||
12612: 'x_return_status = ' || x_return_status, l_debug_prefix);
12613: END IF;
12614: */
12612: 'x_return_status = ' || x_return_status, l_debug_prefix);
12613: END IF;
12614: */
12615: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12616: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'object_type is non-updateable. ' ||
12617: 'x_return_status = ' || x_return_status,
12618: p_msg_level=>fnd_log.level_statement);
12619: END IF;
12620:
12713: x_return_status := FND_API.G_RET_STS_ERROR;
12714: END IF;
12715:
12716: /*IF g_debug THEN
12717: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12718: 'validate the combination of forward_rel_code, subject_type, object_type. ' ||
12719: 'x_return_status = ' || x_return_status, l_debug_prefix);
12720: END IF;
12721: */
12719: 'x_return_status = ' || x_return_status, l_debug_prefix);
12720: END IF;
12721: */
12722: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12723: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12724: p_message=>'validate the combination of forward_rel_code,backward_rel_code, subject_type, object_type. ' ||
12725: 'x_return_status = ' || x_return_status,
12726: p_msg_level=>fnd_log.level_statement);
12727: END IF;
12753: NULL;
12754: END;
12755:
12756: /*IF g_debug THEN
12757: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12758: 'check for duplicate record. ' ||
12759: 'x_return_status = ' || x_return_status, l_debug_prefix);
12760: END IF;
12761: */
12759: 'x_return_status = ' || x_return_status, l_debug_prefix);
12760: END IF;
12761: */
12762: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12763: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'check for duplicate record. ' ||
12764: 'x_return_status = ' || x_return_status,
12765: p_msg_level=>fnd_log.level_statement);
12766: END IF;
12767:
12791: x_return_status := FND_API.G_RET_STS_ERROR;
12792: END IF;
12793:
12794: /*IF g_debug THEN
12795: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12796: 'validate direction_code. ' ||
12797: 'x_return_status = ' || x_return_status, l_debug_prefix);
12798: END IF;
12799: */
12797: 'x_return_status = ' || x_return_status, l_debug_prefix);
12798: END IF;
12799: */
12800: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12801: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate direction_code. ' ||
12802: 'x_return_status = ' || x_return_status,
12803: p_msg_level=>fnd_log.level_statement);
12804: END IF;
12805:
12815: p_column_value => p_relationship_type_rec.hierarchical_flag,
12816: x_return_status => x_return_status );
12817:
12818: /*IF G_DEBUG THEN
12819: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12820: 'hierarchical_flag in lookup YES/NO. ' ||
12821: 'x_return_status = ' || x_return_status, l_debug_prefix );
12822: END IF;
12823: */
12821: 'x_return_status = ' || x_return_status, l_debug_prefix );
12822: END IF;
12823: */
12824: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12825: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hierarchical_flag in lookup YES/NO. ' ||
12826: 'x_return_status = ' || x_return_status,
12827: p_msg_level=>fnd_log.level_statement);
12828: END IF;
12829:
12836: p_old_column_value => l_hierarchical_flag,
12837: x_return_status => x_return_status);
12838:
12839: /*IF g_debug THEN
12840: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12841: 'hierarchical_flag is non-updateable. ' ||
12842: 'x_return_status = ' || x_return_status, l_debug_prefix);
12843: END IF;
12844: */
12842: 'x_return_status = ' || x_return_status, l_debug_prefix);
12843: END IF;
12844: */
12845: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12846: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hierarchical_flag is non-updateable. ' ||
12847: 'x_return_status = ' || x_return_status,
12848: p_msg_level=>fnd_log.level_statement);
12849: END IF;
12850:
12868: x_return_status := FND_API.G_RET_STS_ERROR;
12869: END IF;
12870: END IF;
12871: /*IF g_debug THEN
12872: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12873: 'if hierarchical_flag = ''Y'', then allow_circular_relationships must be ''N''. ' ||
12874: 'x_return_status = ' || x_return_status, l_debug_prefix);
12875: END IF;
12876: */
12874: 'x_return_status = ' || x_return_status, l_debug_prefix);
12875: END IF;
12876: */
12877: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12878: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12879: p_message=>'if hierarchical_flag = ''Y'', then allow_circular_relationships must be ''N''. ' ||
12880: 'x_return_status = ' || x_return_status,
12881: p_msg_level=>fnd_log.level_statement);
12882: END IF;
12900: x_return_status := FND_API.G_RET_STS_ERROR;
12901: END IF;
12902: END IF;
12903: /*IF g_debug THEN
12904: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12905: 'if hierarchical_flag = ''Y'', the direction_code must be ''P'' or ''C''. ' ||
12906: 'x_return_status = ' || x_return_status, l_debug_prefix);
12907: END IF;
12908: */
12906: 'x_return_status = ' || x_return_status, l_debug_prefix);
12907: END IF;
12908: */
12909: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12910: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12911: p_message=>'if hierarchical_flag = ''Y'', the direction_code must be ''P'' or ''C''. ' ||
12912: 'x_return_status = ' || x_return_status,
12913: p_msg_level=>fnd_log.level_statement);
12914: END IF;
12984: x_return_status := FND_API.G_RET_STS_ERROR;
12985: END IF;
12986: END IF;
12987: /*IF g_debug THEN
12988: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12989: 'if hierarchical_flag = ''Y'', then allow_relate_to_self_flag must be ''N''. ' ||
12990: 'x_return_status = ' || x_return_status, l_debug_prefix);
12991: END IF;
12992: */
12990: 'x_return_status = ' || x_return_status, l_debug_prefix);
12991: END IF;
12992: */
12993: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
12994: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
12995: p_message=>'if hierarchical_flag = ''Y'', then allow_relate_to_self_flag must be ''N''. ' ||
12996: 'x_return_status = ' || x_return_status,
12997: p_msg_level=>fnd_log.level_statement);
12998: END IF;
13017: x_return_status := FND_API.G_RET_STS_ERROR;
13018: END IF;
13019: END IF;
13020: /*IF g_debug THEN
13021: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
13022: 'if hierarchical_flag = ''Y'', the direction_code must be ''P'' or ''C''. ' ||
13023: 'x_return_status = ' || x_return_status, l_debug_prefix);
13024: END IF;
13025: */
13023: 'x_return_status = ' || x_return_status, l_debug_prefix);
13024: END IF;
13025: */
13026: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13027: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
13028: p_message=>'if hierarchical_flag = ''Y'', the direction_code must be ''P'' or ''C''. ' ||
13029: 'x_return_status = ' || x_return_status,
13030: p_msg_level=>fnd_log.level_statement);
13031: END IF;
13060: END IF;
13061: END IF;
13062:
13063: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13064: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
13065: p_message=>'if hierarchical_flag = ''N'', the multiple_parent_allowed must be ''Y''. ' ||
13066: 'x_return_status = ' || x_return_status,
13067: p_msg_level=>fnd_log.level_statement);
13068: END IF;
13104: WHEN NO_DATA_FOUND THEN
13105: NULL;
13106: END;
13107: /*IF g_debug THEN
13108: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
13109: 'all relationship type records with same relationship_type value must have same values for hierarchical_flag. ' ||
13110: 'x_return_status = ' || x_return_status, l_debug_prefix);
13111: END IF;
13112: */
13110: 'x_return_status = ' || x_return_status, l_debug_prefix);
13111: END IF;
13112: */
13113: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13114: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
13115: p_message=>'all relationship type records with same relationship_type value must have same values for hierarchical_flag. ' ||
13116: 'x_return_status = ' || x_return_status,
13117: p_msg_level=>fnd_log.level_statement);
13118: END IF;
13151: NULL;
13152: END;
13153:
13154: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13155: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
13156: p_message=>'all relationship type records with same relationship_type value must have same values for'||
13157: ' allow_circular_relationships. ' ||
13158: 'x_return_status = ' || x_return_status,
13159: p_msg_level=>fnd_log.level_statement);
13193: WHEN NO_DATA_FOUND THEN
13194: NULL;
13195: END;
13196: /*IF g_debug THEN
13197: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
13198: 'all relationship type records with same relationship_type value must have same values for multiple_parent_allowed. ' ||
13199: 'x_return_status = ' || x_return_status, l_debug_prefix);
13200: END IF;
13201: */
13199: 'x_return_status = ' || x_return_status, l_debug_prefix);
13200: END IF;
13201: */
13202: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13203: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
13204: p_message=>'all relationship type records with same relationship_type value must have same values for multiple_parent_allowed. ' ||
13205: 'x_return_status = ' || x_return_status,
13206: p_msg_level=>fnd_log.level_statement);
13207: END IF;
13219: p_column_value => p_relationship_type_rec.incl_unrelated_entities,
13220: x_return_status => x_return_status );
13221:
13222: /*IF G_DEBUG THEN
13223: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
13224: 'incl_unrelated_entities in lookup YES/NO. ' ||
13225: 'x_return_status = ' || x_return_status, l_debug_prefix );
13226: END IF;
13227: */
13225: 'x_return_status = ' || x_return_status, l_debug_prefix );
13226: END IF;
13227: */
13228: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13229: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'incl_unrelated_entities in lookup YES/NO. ' ||
13230: 'x_return_status = ' || x_return_status,
13231: p_msg_level=>fnd_log.level_statement);
13232: END IF;
13233:
13243: p_column_value => p_relationship_type_rec.multiple_parent_allowed,
13244: x_return_status => x_return_status );
13245:
13246: /*IF G_DEBUG THEN
13247: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
13248: 'multiple_parent_allowed in lookup YES/NO. ' ||
13249: 'x_return_status = ' || x_return_status, l_debug_prefix );
13250: END IF;
13251: */
13249: 'x_return_status = ' || x_return_status, l_debug_prefix );
13250: END IF;
13251: */
13252: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13253: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'multiple_parent_allowed in lookup YES/NO. ' ||
13254: 'x_return_status = ' || x_return_status,
13255: p_msg_level=>fnd_log.level_statement);
13256: END IF;
13257:
13264: p_old_column_value => l_multiple_parent_allowed,
13265: x_return_status => x_return_status);
13266:
13267: /*IF g_debug THEN
13268: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
13269: 'multiple_parent_allowed is non-updateable. ' ||
13270: 'x_return_status = ' || x_return_status, l_debug_prefix);
13271: END IF;
13272: */
13270: 'x_return_status = ' || x_return_status, l_debug_prefix);
13271: END IF;
13272: */
13273: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13274: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'multiple_parent_allowed is non-updateable. ' ||
13275: 'x_return_status = ' || x_return_status,
13276: p_msg_level=>fnd_log.level_statement);
13277: END IF;
13278:
13299: p_old_application_id => l_application_id,
13300: x_return_status => x_return_status);
13301:
13302: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
13303: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_relationship_type (-)',
13304: p_msg_level=>fnd_log.level_procedure);
13305: END IF;
13306:
13307: --bug 3491584
13313: fnd_msg_pub.add;
13314: x_return_status := fnd_api.g_ret_sts_error;
13315:
13316: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13317: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
13318: p_message=>'Same subject and object type because the relationship phrase pair has the same subject (forward) and object (backward) phrase. ' ||
13319: 'x_return_status = ' || x_return_status,
13320: p_msg_level=>fnd_log.level_statement);
13321: END IF;
13431: --enable_debug;
13432:
13433: -- Debug info.
13434: /*IF g_debug THEN
13435: hz_utility_v2pub.debug ('validate_relationship (+)');
13436: END IF;
13437: */
13438: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
13439: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_relationship (+)',
13435: hz_utility_v2pub.debug ('validate_relationship (+)');
13436: END IF;
13437: */
13438: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
13439: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_relationship (+)',
13440: p_msg_level=>fnd_log.level_procedure);
13441: END IF;
13442:
13443: -- select columns needed to be checked from table during update
13492: p_column_value => p_relationship_rec.relationship_type,
13493: x_return_status => x_return_status);
13494:
13495: /*IF g_debug THEN
13496: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'relationship_type is mandatory. ' ||
13497: 'x_return_status = ' || x_return_status,
13498: l_debug_prefix);
13499: END IF;
13500: */
13498: l_debug_prefix);
13499: END IF;
13500: */
13501: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13502: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'relationship_type is mandatory. ' ||
13503: 'x_return_status = ' || x_return_status,
13504: p_msg_level=>fnd_log.level_statement);
13505: END IF;
13506:
13513: x_return_status => x_return_status
13514: );
13515:
13516: /*IF g_debug THEN
13517: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'relationship_type is non-updateable. ' ||
13518: 'x_return_status = ' || x_return_status,
13519: l_debug_prefix);
13520: END IF;
13521: */
13519: l_debug_prefix);
13520: END IF;
13521: */
13522: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13523: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'relationship_type is non-updateable. ' ||
13524: 'x_return_status = ' || x_return_status,
13525: p_msg_level=>fnd_log.level_statement);
13526: END IF;
13527:
13539: x_return_status => x_return_status
13540: );
13541:
13542: /*IF g_debug THEN
13543: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'relationship_code is mandatory. ' ||
13544: 'x_return_status = ' || x_return_status,
13545: l_debug_prefix);
13546: END IF;
13547: */
13545: l_debug_prefix);
13546: END IF;
13547: */
13548: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13549: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'relationship_code is mandatory. ' ||
13550: 'x_return_status = ' || x_return_status,
13551: p_msg_level=>fnd_log.level_statement);
13552: END IF;
13553:
13560: x_return_status => x_return_status
13561: );
13562:
13563: /*IF g_debug THEN
13564: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'relationship_code is non-updateable. ' ||
13565: 'x_return_status = ' || x_return_status,
13566: l_debug_prefix);
13567: END IF;
13568: */
13566: l_debug_prefix);
13567: END IF;
13568: */
13569: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13570: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'relationship_code is non-updateable. ' ||
13571: 'x_return_status = ' || x_return_status,
13572: p_msg_level=>fnd_log.level_statement);
13573: END IF;
13574: END IF;
13582: x_return_status => x_return_status
13583: );
13584:
13585: /*IF g_debug THEN
13586: hz_utility_v2pub.debug (
13587: 'relationship_code is lookup code in lookup type PARTY_RELATIONS_TYPE. ' ||
13588: 'x_return_status = ' || x_return_status,
13589: l_debug_prefix);
13590: END IF;
13589: l_debug_prefix);
13590: END IF;
13591: */
13592: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13593: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
13594: p_message=>'relationship_code is lookup code in lookup type PARTY_RELATIONS_TYPE. ' ||
13595: 'x_return_status = ' || x_return_status,
13596: p_msg_level=>fnd_log.level_statement);
13597: END IF;
13600: ----------------------
13601: -- validate subject_id
13602: ----------------------
13603: /****Logical APIs - validation not required****/
13604: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
13605: -- subject_id is mandatory
13606: validate_mandatory (
13607: p_create_update_flag => p_create_update_flag,
13608: p_column => 'subject_id',
13609: p_column_value => p_relationship_rec.subject_id,
13610: x_return_status => x_return_status);
13611:
13612: /*IF g_debug THEN
13613: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'subject_id is mandatory. ' ||
13614: 'x_return_status = ' || x_return_status,
13615: l_debug_prefix);
13616: END IF;
13617: */
13615: l_debug_prefix);
13616: END IF;
13617: */
13618: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13619: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'subject_id is mandatory. ' ||
13620: 'x_return_status = ' || x_return_status,
13621: p_msg_level=>fnd_log.level_statement);
13622: END IF;
13623:
13630: x_return_status => x_return_status
13631: );
13632:
13633: /*IF g_debug THEN
13634: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'subject_id is non-updateable. ' ||
13635: 'x_return_status = ' || x_return_status,
13636: l_debug_prefix);
13637: END IF;
13638: */
13636: l_debug_prefix);
13637: END IF;
13638: */
13639: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13640: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'subject_id is non-updateable. ' ||
13641: 'x_return_status = ' || x_return_status,
13642: p_msg_level=>fnd_log.level_statement);
13643: END IF;
13644:
13665: x_return_status := fnd_api.g_ret_sts_error;
13666: END IF;
13667:
13668: /*IF g_debug THEN
13669: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'subject_id belongs to subject_type. ' ||
13670: 'x_return_status = ' || x_return_status,
13671: l_debug_prefix);
13672: END IF;
13673: */
13671: l_debug_prefix);
13672: END IF;
13673: */
13674: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13675: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'subject_id belongs to subject_type. ' ||
13676: 'x_return_status = ' || x_return_status,
13677: p_msg_level=>fnd_log.level_statement);
13678: END IF;
13679:
13682: ------------------------------
13683: -- validate subject_table_name
13684: ------------------------------
13685: /****Logical APIs - validation not required****/
13686: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
13687: -- subject_table_name is mandatory
13688: validate_mandatory (
13689: p_create_update_flag => p_create_update_flag,
13690: p_column => 'subject_table_name',
13691: p_column_value => p_relationship_rec.subject_table_name,
13692: x_return_status => x_return_status);
13693:
13694: /*IF g_debug THEN
13695: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'subject_table_name is mandatory. ' ||
13696: 'x_return_status = ' || x_return_status,
13697: l_debug_prefix);
13698: END IF;
13699: */
13697: l_debug_prefix);
13698: END IF;
13699: */
13700: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13701: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'subject_table_name is mandatory. ' ||
13702: 'x_return_status = ' || x_return_status,
13703: p_msg_level=>fnd_log.level_statement);
13704: END IF;
13705:
13711: p_old_column_value => l_subject_table_name,
13712: x_return_status => x_return_status);
13713:
13714: /*IF g_debug THEN
13715: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'subject_table_name is non-updateable. ' ||
13716: 'x_return_status = ' || x_return_status,
13717: l_debug_prefix);
13718: END IF;
13719: */
13717: l_debug_prefix);
13718: END IF;
13719: */
13720: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13721: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'subject_table_name is non-updateable. ' ||
13722: 'x_return_status = ' || x_return_status,
13723: p_msg_level=>fnd_log.level_statement);
13724: END IF;
13725:
13747: x_return_status := fnd_api.g_ret_sts_error;
13748: END;
13749:
13750: /*IF g_debug THEN
13751: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
13752: 'subject_table_name has foreign key fnd_objects.obj_name. ' ||
13753: 'x_return_status = ' || x_return_status,
13754: l_debug_prefix
13755: );
13755: );
13756: END IF;
13757: */
13758: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13759: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
13760: p_message=>'subject_table_name has foreign key fnd_objects.obj_name. ' ||
13761: 'x_return_status = ' || x_return_status,
13762: p_msg_level=>fnd_log.level_statement);
13763: END IF;
13768: ------------------------
13769: -- validate subject_type
13770: ------------------------
13771: /****Logical APIs - validation not required****/
13772: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
13773: -- subject_type is mandatory
13774: validate_mandatory (
13775: p_create_update_flag => p_create_update_flag,
13776: p_column => 'subject_type',
13778: x_return_status => x_return_status
13779: );
13780:
13781: /*IF g_debug THEN
13782: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'subject_type is mandatory. ' ||
13783: 'x_return_status = ' || x_return_status,
13784: l_debug_prefix);
13785: END IF;
13786: */
13784: l_debug_prefix);
13785: END IF;
13786: */
13787: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13788: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'subject_type is mandatory. ' ||
13789: 'x_return_status = ' || x_return_status,
13790: p_msg_level=>fnd_log.level_statement);
13791: END IF;
13792:
13798: p_old_column_value => l_subject_type,
13799: x_return_status => x_return_status);
13800:
13801: /*IF g_debug THEN
13802: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'subject_type is non-updateable. ' ||
13803: 'x_return_status = ' || x_return_status,
13804: l_debug_prefix);
13805: END IF;
13806: */
13804: l_debug_prefix);
13805: END IF;
13806: */
13807: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13808: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'subject_type is non-updateable. ' ||
13809: 'x_return_status = ' || x_return_status,
13810: p_msg_level=>fnd_log.level_statement);
13811: END IF;
13812: END IF;
13833: x_return_status := fnd_api.g_ret_sts_error;
13834: END;
13835:
13836: /*IF g_debug THEN
13837: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
13838: 'subject_type has foreign key fnd_object_instance_sets.instance_set_name. ' ||
13839: 'x_return_status = ' || x_return_status,
13840: l_debug_prefix
13841: );
13841: );
13842: END IF;
13843: */
13844: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13845: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
13846: p_message=>'subject_type has foreign key fnd_object_instance_sets.instance_set_name. ' ||
13847: 'x_return_status = ' || x_return_status,
13848: p_msg_level=>fnd_log.level_statement);
13849: END IF;
13854: ---------------------
13855: -- validate object_id
13856: ---------------------
13857: /****Logical APIs - validation not required****/
13858: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
13859: -- object_id is mandatory
13860: validate_mandatory (
13861: p_create_update_flag => p_create_update_flag,
13862: p_column => 'object_id',
13864: x_return_status => x_return_status
13865: );
13866:
13867: /*IF g_debug THEN
13868: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'object_id is mandatory. ' ||
13869: 'x_return_status = ' || x_return_status,
13870: l_debug_prefix);
13871: END IF;
13872: */
13870: l_debug_prefix);
13871: END IF;
13872: */
13873: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13874: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'object_id is mandatory. ' ||
13875: 'x_return_status = ' || x_return_status,
13876: p_msg_level=>fnd_log.level_statement);
13877: END IF;
13878:
13884: p_old_column_value => l_object_id,
13885: x_return_status => x_return_status);
13886:
13887: /*IF g_debug THEN
13888: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'object_id is non-updateable. ' ||
13889: 'x_return_status = ' || x_return_status,
13890: l_debug_prefix);
13891: END IF;
13892: */
13890: l_debug_prefix);
13891: END IF;
13892: */
13893: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13894: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'object_id is non-updateable. ' ||
13895: 'x_return_status = ' || x_return_status,
13896: p_msg_level=>fnd_log.level_statement);
13897: END IF;
13898:
13919: x_return_status := fnd_api.g_ret_sts_error;
13920: END IF;
13921:
13922: /*IF g_debug THEN
13923: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'object_id belongs to object_type. ' ||
13924: 'x_return_status = ' || x_return_status,
13925: l_debug_prefix);
13926: END IF;
13927: */
13925: l_debug_prefix);
13926: END IF;
13927: */
13928: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13929: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'object_id belongs to object_type. ' ||
13930: 'x_return_status = ' || x_return_status,
13931: p_msg_level=>fnd_log.level_statement);
13932: END IF;
13933:
13936: -----------------------------
13937: -- validate object_table_name
13938: -----------------------------
13939: /****Logical APIs - validation not required****/
13940: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
13941: -- object_table_name is mandatory
13942: validate_mandatory (
13943: p_create_update_flag => p_create_update_flag,
13944: p_column => 'object_table_name',
13946: x_return_status => x_return_status
13947: );
13948:
13949: /*IF g_debug THEN
13950: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'object_table_name is mandatory. ' ||
13951: 'x_return_status = ' || x_return_status,
13952: l_debug_prefix);
13953: END IF;
13954: */
13952: l_debug_prefix);
13953: END IF;
13954: */
13955: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13956: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'object_table_name is mandatory. ' ||
13957: 'x_return_status = ' || x_return_status,
13958: p_msg_level=>fnd_log.level_statement);
13959: END IF;
13960:
13967: x_return_status => x_return_status
13968: );
13969:
13970: /*IF g_debug THEN
13971: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'object_table_name is non-updateable. ' ||
13972: 'x_return_status = ' || x_return_status,
13973: l_debug_prefix);
13974: END IF;
13975: */
13973: l_debug_prefix);
13974: END IF;
13975: */
13976: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
13977: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'object_table_name is non-updateable. ' ||
13978: 'x_return_status = ' || x_return_status,
13979: p_msg_level=>fnd_log.level_statement);
13980: END IF;
13981:
14003: x_return_status := fnd_api.g_ret_sts_error;
14004: END;
14005:
14006: /*IF g_debug THEN
14007: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
14008: 'object_table_name has foreign key fnd_objects.obj_name. ' ||
14009: 'x_return_status = ' || x_return_status,
14010: l_debug_prefix
14011: );
14011: );
14012: END IF;
14013: */
14014: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
14015: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
14016: p_message=>'object_table_name has foreign key fnd_objects.obj_name. ' ||
14017: 'x_return_status = ' || x_return_status,
14018: p_msg_level=>fnd_log.level_statement);
14019: END IF;
14024: -----------------------
14025: -- validate object_type
14026: -----------------------
14027: /****Logical APIs - validation not required****/
14028: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
14029: -- object_type is mandatory
14030: validate_mandatory (
14031: p_create_update_flag => p_create_update_flag,
14032: p_column => 'object_type',
14034: x_return_status => x_return_status
14035: );
14036:
14037: /*IF g_debug THEN
14038: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'object_type is mandatory. ' ||
14039: 'x_return_status = ' || x_return_status,
14040: l_debug_prefix);
14041: END IF;
14042: */
14040: l_debug_prefix);
14041: END IF;
14042: */
14043: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
14044: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'object_type is mandatory. ' ||
14045: 'x_return_status = ' || x_return_status,
14046: p_msg_level=>fnd_log.level_statement);
14047: END IF;
14048:
14055: x_return_status => x_return_status
14056: );
14057:
14058: /*IF g_debug THEN
14059: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'object_type is non-updateable. ' ||
14060: 'x_return_status = ' || x_return_status,
14061: l_debug_prefix);
14062: END IF;
14063: */
14061: l_debug_prefix);
14062: END IF;
14063: */
14064: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
14065: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'object_type is non-updateable. ' ||
14066: 'x_return_status = ' || x_return_status,
14067: p_msg_level=>fnd_log.level_statement);
14068: END IF;
14069:
14091: x_return_status := fnd_api.g_ret_sts_error;
14092: END;
14093:
14094: /*IF g_debug THEN
14095: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
14096: 'object_type has foreign key fnd_object_instance_sets.instance_set_name. ' ||
14097: 'x_return_status = ' || x_return_status,
14098: l_debug_prefix
14099: );
14099: );
14100: END IF;
14101: */
14102: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
14103: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
14104: p_message=>'object_type has foreign key fnd_object_instance_sets.instance_set_name. ' ||
14105: 'x_return_status = ' || x_return_status,
14106: p_msg_level=>fnd_log.level_statement);
14107: END IF;
14123: x_return_status => x_return_status
14124: );
14125:
14126: IF g_debug THEN
14127: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'start_date is mandatory. ' ||
14128: 'x_return_status = ' || x_return_status,
14129: l_debug_prefix);
14130: END IF;
14131: */
14138: x_return_status => x_return_status
14139: );
14140:
14141: /*IF g_debug THEN
14142: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
14143: 'start_date cannot be set to null during update. ' ||
14144: 'x_return_status = ' || x_return_status,
14145: l_debug_prefix
14146: );
14146: );
14147: END IF;
14148: */
14149: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
14150: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
14151: p_message=>'start_date cannot be set to null during update. ' ||
14152: 'x_return_status = ' || x_return_status,
14153: p_msg_level=>fnd_log.level_statement);
14154: END IF;
14167: p_old_column_value => l_party_id,
14168: x_return_status => x_return_status);
14169:
14170: /*IF g_debug THEN
14171: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'party_id is non-updateable. ' ||
14172: 'x_return_status = ' || x_return_status,
14173: l_debug_prefix);
14174: END IF;
14175: */
14173: l_debug_prefix);
14174: END IF;
14175: */
14176: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
14177: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id is non-updateable. ' ||
14178: 'x_return_status = ' || x_return_status,
14179: p_msg_level=>fnd_log.level_statement);
14180: END IF;
14181:
14193: x_return_status => x_return_status
14194: );
14195:
14196: /*IF g_debug THEN
14197: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
14198: 'status cannot be set to null during update. ' ||
14199: 'x_return_status = ' || x_return_status,
14200: l_debug_prefix);
14201: END IF;
14200: l_debug_prefix);
14201: END IF;
14202: */
14203: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
14204: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'status cannot be set to null during update. ' ||
14205: 'x_return_status = ' || x_return_status,
14206: p_msg_level=>fnd_log.level_statement);
14207: END IF;
14208:
14208:
14209: END IF;
14210:
14211: /****Logical APIs - validation not required****/
14212: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
14213: -- status is lookup code in lookup type REGISTRY_STATUS
14214: IF p_relationship_rec.status IS NOT NULL
14215: AND p_relationship_rec.status <> fnd_api.g_miss_char
14216: AND (p_create_update_flag = 'C'
14225: x_return_status => x_return_status
14226: );
14227:
14228: /*IF g_debug THEN
14229: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
14230: 'status is lookup code in lookup type REGISTRY_STATUS. ' ||
14231: 'x_return_status = ' || x_return_status,
14232: l_debug_prefix);
14233: END IF;
14232: l_debug_prefix);
14233: END IF;
14234: */
14235: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
14236: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
14237: p_message=>'status is lookup code in lookup type REGISTRY_STATUS. ' ||
14238: 'x_return_status = ' || x_return_status,
14239: p_msg_level=>fnd_log.level_statement);
14240: END IF;
14263: );
14264:
14265:
14266: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
14267: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'content_source_type is non-updateable. ' ||
14268: 'x_return_status = ' || x_return_status,
14269: p_msg_level=>fnd_log.level_statement);
14270: END IF;
14271:
14279: x_return_status => x_return_status
14280: );
14281:
14282: IF g_debug THEN
14283: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
14284: 'content_source_type is lookup code in lookup type CONTENT_SOURCE_TYPE. ' ||
14285: 'x_return_status = ' || x_return_status,
14286: l_debug_prefix
14287: );
14342: END IF;
14343: END IF;
14344:
14345: /*IF g_debug THEN
14346: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
14347: 'end_date must be null or greater than start date. ' ||
14348: 'x_return_status = ' || x_return_status,
14349: l_debug_prefix);
14350: END IF;
14349: l_debug_prefix);
14350: END IF;
14351: */
14352: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
14353: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'end_date must be null or greater than start date. ' ||
14354: 'x_return_status = ' || x_return_status,
14355: p_msg_level=>fnd_log.level_statement);
14356: END IF;
14357:
14400: -- END IF;
14401: -- CLOSE c1;
14402: END IF;
14403: /*IF g_debug THEN
14404: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
14405: 'there should not be any date overlap between two identical relationships. ' ||
14406: 'x_return_status = ' || x_return_status, l_debug_prefix);
14407: END IF;
14408: */
14406: 'x_return_status = ' || x_return_status, l_debug_prefix);
14407: END IF;
14408: */
14409: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
14410: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
14411: p_message=>'there should not be any date overlap between two identical relationships. ' ||
14412: 'x_return_status = ' || x_return_status,
14413: p_msg_level=>fnd_log.level_statement);
14414: END IF;
14433: p_old_application_id => l_application_id,
14434: x_return_status => x_return_status);
14435:
14436: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14437: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_relationship (-)',
14438: p_msg_level=>fnd_log.level_procedure);
14439: END IF;
14440:
14441: END validate_relationship;
14493: --enable_debug;
14494:
14495: -- Debug info.
14496: /*IF g_debug THEN
14497: hz_utility_v2pub.debug ('validate_contact_point (+)');
14498: END IF;
14499: */
14500: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14501: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_contact_point (+)',
14497: hz_utility_v2pub.debug ('validate_contact_point (+)');
14498: END IF;
14499: */
14500: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14501: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_contact_point (+)',
14502: p_msg_level=>fnd_log.level_procedure);
14503: END IF;
14504:
14505:
14516: );
14517:
14518: -- Debug info.
14519: /*IF g_debug THEN
14520: hz_utility_v2pub.debug ('validate_contact_point (-)');
14521: END IF;
14522: */
14523: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14524: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_contact_point (-)',
14520: hz_utility_v2pub.debug ('validate_contact_point (-)');
14521: END IF;
14522: */
14523: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14524: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_contact_point (-)',
14525: p_msg_level=>fnd_log.level_procedure);
14526: END IF;
14527:
14528:
14567: --enable_debug;
14568:
14569: -- Debug info.
14570: /*IF g_debug THEN
14571: hz_utility_v2pub.debug ('validate_edi_contact_point (+)');
14572: END IF;
14573: */
14574: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14575: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_edi_contact_point (+)',
14571: hz_utility_v2pub.debug ('validate_edi_contact_point (+)');
14572: END IF;
14573: */
14574: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14575: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_edi_contact_point (+)',
14576: p_msg_level=>fnd_log.level_procedure);
14577: END IF;
14578:
14579:
14586: );
14587:
14588: -- Debug info.
14589: /*IF g_debug THEN
14590: hz_utility_v2pub.debug ('validate_edi_contact_point (-)');
14591: END IF;
14592: */
14593: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14594: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_edi_contact_point (-)',
14590: hz_utility_v2pub.debug ('validate_edi_contact_point (-)');
14591: END IF;
14592: */
14593: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14594: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_edi_contact_point (-)',
14595: p_msg_level=>fnd_log.level_procedure);
14596: END IF;
14597:
14598:
14637: --enable_debug;
14638:
14639: -- Debug info.
14640: /*IF g_debug THEN
14641: hz_utility_v2pub.debug ('validate_eft_contact_point (+)');
14642: END IF;
14643: */
14644: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14645: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_eft_contact_point (+)',
14641: hz_utility_v2pub.debug ('validate_eft_contact_point (+)');
14642: END IF;
14643: */
14644: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14645: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_eft_contact_point (+)',
14646: p_msg_level=>fnd_log.level_procedure);
14647: END IF;
14648:
14649:
14656: );
14657:
14658: -- Debug info.
14659: /*IF g_debug THEN
14660: hz_utility_v2pub.debug ('validate_eft_contact_point (-)');
14661: END IF;
14662: */
14663: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14664: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_eft_contact_point (-)',
14660: hz_utility_v2pub.debug ('validate_eft_contact_point (-)');
14661: END IF;
14662: */
14663: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14664: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_eft_contact_point (-)',
14665: p_msg_level=>fnd_log.level_procedure);
14666: END IF;
14667:
14668:
14707: --enable_debug;
14708:
14709: -- Debug info.
14710: /*IF g_debug THEN
14711: hz_utility_v2pub.debug ('validate_web_contact_point (+)');
14712: END IF;
14713: */
14714: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14715: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_web_contact_point (+)',
14711: hz_utility_v2pub.debug ('validate_web_contact_point (+)');
14712: END IF;
14713: */
14714: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14715: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_web_contact_point (+)',
14716: p_msg_level=>fnd_log.level_procedure);
14717: END IF;
14718:
14719:
14726: );
14727:
14728: -- Debug info.
14729: /*IF g_debug THEN
14730: hz_utility_v2pub.debug ('validate_web_contact_point (-)');
14731: END IF;
14732: */
14733:
14734:
14732: */
14733:
14734:
14735: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14736: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_web_contact_point (-)',
14737: p_msg_level=>fnd_log.level_procedure);
14738: END IF;
14739:
14740: -- Check if API is called in debug mode. If yes, disable debug.
14779:
14780: -- Debug info.
14781:
14782: /*IF g_debug THEN
14783: hz_utility_v2pub.debug ('validate_phone_contact_point (+)');
14784: END IF;
14785: */
14786: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14787: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_phone_contact_point (+)',
14783: hz_utility_v2pub.debug ('validate_phone_contact_point (+)');
14784: END IF;
14785: */
14786: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14787: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_phone_contact_point (+)',
14788: p_msg_level=>fnd_log.level_procedure);
14789: END IF;
14790:
14791:
14798: );
14799:
14800: -- Debug info.
14801: /*IF g_debug THEN
14802: hz_utility_v2pub.debug ('validate_phone_contact_point (-)');
14803: END IF;
14804: */
14805: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14806: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_phone_contact_point (-)',
14802: hz_utility_v2pub.debug ('validate_phone_contact_point (-)');
14803: END IF;
14804: */
14805: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14806: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_phone_contact_point (-)',
14807: p_msg_level=>fnd_log.level_procedure);
14808: END IF;
14809:
14810: -- Check if API is called in debug mode. If yes, disable debug.
14848: --enable_debug;
14849:
14850: -- Debug info.
14851: /*IF g_debug THEN
14852: hz_utility_v2pub.debug ('validate_telex_contact_point (+)');
14853: END IF;
14854: */
14855: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14856: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_telex_contact_point (+)',
14852: hz_utility_v2pub.debug ('validate_telex_contact_point (+)');
14853: END IF;
14854: */
14855: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14856: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_telex_contact_point (+)',
14857: p_msg_level=>fnd_log.level_procedure);
14858: END IF;
14859:
14860:
14867: );
14868:
14869: -- Debug info.
14870: /*IF g_debug THEN
14871: hz_utility_v2pub.debug ('validate_telex_contact_point (-)');
14872: END IF;
14873: */
14874: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14875: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_telex_contact_point (-)',
14871: hz_utility_v2pub.debug ('validate_telex_contact_point (-)');
14872: END IF;
14873: */
14874: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14875: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_telex_contact_point (-)',
14876: p_msg_level=>fnd_log.level_procedure);
14877: END IF;
14878:
14879:
14918: --enable_debug;
14919:
14920: -- Debug info.
14921: /*IF g_debug THEN
14922: hz_utility_v2pub.debug ('validate_email_contact_point (+)');
14923: END IF;
14924: */
14925: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14926: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_email_contact_point (+)',
14922: hz_utility_v2pub.debug ('validate_email_contact_point (+)');
14923: END IF;
14924: */
14925: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14926: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_email_contact_point (+)',
14927: p_msg_level=>fnd_log.level_procedure);
14928: END IF;
14929:
14930:
14937: );
14938:
14939: -- Debug info.
14940: /*IF g_debug THEN
14941: hz_utility_v2pub.debug ('validate_email_contact_point (-)');
14942: END IF;
14943: */
14944: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14945: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_email_contact_point (-)',
14941: hz_utility_v2pub.debug ('validate_email_contact_point (-)');
14942: END IF;
14943: */
14944: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14945: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_email_contact_point (-)',
14946: p_msg_level=>fnd_log.level_procedure);
14947: END IF;
14948:
14949:
14959: l_debug_prefix VARCHAR2(30) := '';
14960: BEGIN
14961: -- Debug info.
14962: /* IF G_DEBUG THEN
14963: HZ_UTILITY_V2PUB.debug ( 'validate_org_nonsupport_column (+)' );
14964: END IF;
14965: */
14966: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14967: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_org_nonsupport_column (+)',
14963: HZ_UTILITY_V2PUB.debug ( 'validate_org_nonsupport_column (+)' );
14964: END IF;
14965: */
14966: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
14967: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_org_nonsupport_column (+)',
14968: p_msg_level=>fnd_log.level_procedure);
14969: END IF;
14970:
14971:
15645: END IF;
15646:
15647: -- Debug info.
15648: /*IF G_DEBUG THEN
15649: HZ_UTILITY_V2PUB.debug ( 'validate_org_nonsupport_column (-)' );
15650: END IF;
15651: */
15652: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
15653: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_org_nonsupport_column (-)',
15649: HZ_UTILITY_V2PUB.debug ( 'validate_org_nonsupport_column (-)' );
15650: END IF;
15651: */
15652: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
15653: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_org_nonsupport_column (-)',
15654: p_msg_level=>fnd_log.level_procedure);
15655: END IF;
15656:
15657: END validate_org_nonsupport_column;
15826: --enable_debug;
15827:
15828: -- Debug info.
15829: /*IF g_debug THEN
15830: hz_utility_v2pub.debug ('validate_financial_report (+)');
15831: END IF;
15832: */
15833: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
15834: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_financial_report (+)',
15830: hz_utility_v2pub.debug ('validate_financial_report (+)');
15831: END IF;
15832: */
15833: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
15834: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_financial_report (+)',
15835: p_msg_level=>fnd_log.level_procedure);
15836: END IF;
15837:
15838:
15904: -------------------------------------
15905: -- validation for financial_report_id
15906: -------------------------------------
15907: /****Logical APIs - validation not required****/
15908: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
15909: --check for unique financial_report_id
15910: IF p_create_update_flag = 'C' THEN
15911: IF p_financial_report_rec.financial_report_id IS NOT NULL AND
15912: p_financial_report_rec.financial_report_id <> fnd_api.g_miss_num
15923: END IF;
15924: CLOSE c_dup_financial_report_id;
15925:
15926: /*IF g_debug THEN
15927: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
15928: 'check that financial_report_id is unique during creation. ' ||
15929: ' x_return_status = ' || x_return_status, l_debug_prefix);
15930: END IF;
15931: */
15929: ' x_return_status = ' || x_return_status, l_debug_prefix);
15930: END IF;
15931: */
15932: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
15933: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'check that financial_report_id is unique during creation. ' ||
15934: ' x_return_status = ' || x_return_status,
15935: p_msg_level=>fnd_log.level_statement);
15936: END IF;
15937:
15939: END IF;
15940: END IF;
15941:
15942: /*IF g_debug THEN
15943: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
15944: '(+) after validate financial_report_id ... ' ||
15945: 'x_return_status = ' || x_return_status, l_debug_prefix);
15946: END IF;
15947: */
15945: 'x_return_status = ' || x_return_status, l_debug_prefix);
15946: END IF;
15947: */
15948: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
15949: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate financial_report_id ... ' ||
15950: 'x_return_status = ' || x_return_status,
15951: p_msg_level=>fnd_log.level_statement);
15952: END IF;
15953:
15960: p_old_column_value => l_financial_report_id,
15961: x_return_status => x_return_status);
15962:
15963: /*IF g_debug THEN
15964: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
15965: 'financial_report_id is non-updateable field. ' ||
15966: 'x_return_status = ' || x_return_status, l_debug_prefix);
15967: END IF;
15968: */
15966: 'x_return_status = ' || x_return_status, l_debug_prefix);
15967: END IF;
15968: */
15969: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
15970: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'financial_report_id is non-updateable field. ' ||
15971: 'x_return_status = ' || x_return_status,
15972: p_msg_level=>fnd_log.level_statement);
15973: END IF;
15974:
15979: --------------------------
15980: -- validation for party_id
15981: --------------------------
15982: /****Logical APIs - validation not required****/
15983: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
15984: -- party_id is mandatory field
15985: IF p_create_update_flag = 'C' THEN
15986: validate_mandatory (
15987: p_create_update_flag => p_create_update_flag,
15989: p_column_value => p_financial_report_rec.party_id,
15990: x_return_status => x_return_status);
15991:
15992: /*IF g_debug THEN
15993: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
15994: 'party_id is mandatory field. ' ||
15995: 'x_return_status = ' || x_return_status, l_debug_prefix);
15996: END IF;
15997: */
15995: 'x_return_status = ' || x_return_status, l_debug_prefix);
15996: END IF;
15997: */
15998: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
15999: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id is mandatory field. ' ||
16000: 'x_return_status = ' || x_return_status,
16001: p_msg_level=>fnd_log.level_statement);
16002: END IF;
16003:
16012: p_old_column_value => l_party_id,
16013: x_return_status => x_return_status);
16014:
16015: /*IF g_debug THEN
16016: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16017: 'party_id is non-updateable field. ' ||
16018: 'x_return_status = ' || x_return_status, l_debug_prefix);
16019: END IF;
16020: */
16018: 'x_return_status = ' || x_return_status, l_debug_prefix);
16019: END IF;
16020: */
16021: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16022: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id is non-updateable field. ' ||
16023: 'x_return_status = ' || x_return_status,
16024: p_msg_level=>fnd_log.level_statement);
16025: END IF;
16026:
16050: x_return_status := fnd_api.g_ret_sts_error;
16051: END;
16052: */
16053: /*IF g_debug THEN
16054: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16055: 'party_id has foreign key hz_parties.party_id. ' ||
16056: 'x_return_status = ' || x_return_status, l_debug_prefix);
16057: END IF;
16058: */
16056: 'x_return_status = ' || x_return_status, l_debug_prefix);
16057: END IF;
16058: */
16059: /* IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16060: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id has foreign key hz_parties.party_id. ' ||
16061: 'x_return_status = ' || x_return_status,
16062: p_msg_level=>fnd_log.level_statement);
16063: END IF;
16064:
16104: --Bug 2886268: Commented out the following call as it is throwing erroneous message
16105: --check_organization(p_financial_report_rec.party_id, x_return_status);
16106: END IF;
16107: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16108: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id has foreign key hz_parties.party_id. ' ||
16109: 'x_return_status = ' || x_return_status,
16110: p_msg_level=>fnd_log.level_statement);
16111: END IF;
16112: END IF;
16290: END IF;
16291: CLOSE c_unique_financial_report_rec;
16292:
16293: /*IF g_debug THEN
16294: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16295: 'The following column combination should be unique:' ||
16296: ' PARTY_ID, FINANCIAL_REPORT_TYPE, DOCUMENT_REFERENCE, DATE_REPORT_ISSUED, ' ||
16297: ' (ISSUED_PERIOD or REPORT_START_DATE and REPORT_END_DATE).' ||
16298: ' x_return_status = ' || x_return_status, l_debug_prefix);
16298: ' x_return_status = ' || x_return_status, l_debug_prefix);
16299: END IF;
16300: */
16301: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16302: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16303: p_message=>'The following column combination should be unique:' ||
16304: ' PARTY_ID, FINANCIAL_REPORT_TYPE, DOCUMENT_REFERENCE, DATE_REPORT_ISSUED, ' ||
16305: ' (ISSUED_PERIOD or REPORT_START_DATE and REPORT_END_DATE).' ||
16306: ' x_return_status = ' || x_return_status,
16316: p_old_column_value => l_type_of_financial_report,
16317: x_return_status => x_return_status);
16318:
16319: /*IF g_debug THEN
16320: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16321: 'type_of_financial_report is non-updateable field. ' ||
16322: 'x_return_status = ' || x_return_status, l_debug_prefix);
16323: END IF;
16324: */
16322: 'x_return_status = ' || x_return_status, l_debug_prefix);
16323: END IF;
16324: */
16325: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16326: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'type_of_financial_report is non-updateable field. ' ||
16327: 'x_return_status = ' || x_return_status,
16328: p_msg_level=>fnd_log.level_statement);
16329: END IF;
16330:
16338: p_old_column_value => l_document_reference,
16339: x_return_status => x_return_status);
16340:
16341: /*IF g_debug THEN
16342: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16343: 'document_reference is non-updateable field. ' ||
16344: 'x_return_status = ' || x_return_status, l_debug_prefix);
16345: END IF;
16346: */
16344: 'x_return_status = ' || x_return_status, l_debug_prefix);
16345: END IF;
16346: */
16347: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16348: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'document_reference is non-updateable field. ' ||
16349: 'x_return_status = ' || x_return_status,
16350: p_msg_level=>fnd_log.level_statement);
16351: END IF;
16352:
16360: p_old_column_value => trunc(l_date_report_issued),
16361: x_return_status => x_return_status);
16362:
16363: /*IF g_debug THEN
16364: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16365: 'date_report_issued is non-updateable field. ' ||
16366: 'x_return_status = ' || x_return_status, l_debug_prefix);
16367: END IF;
16368: */
16366: 'x_return_status = ' || x_return_status, l_debug_prefix);
16367: END IF;
16368: */
16369: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16370: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'date_report_issued is non-updateable field. ' ||
16371: 'x_return_status = ' || x_return_status,
16372: p_msg_level=>fnd_log.level_statement);
16373: END IF;
16374:
16382: p_old_column_value => l_issued_period,
16383: x_return_status => x_return_status);
16384:
16385: /*IF g_debug THEN
16386: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16387: 'issued_period is non-updateable field. ' ||
16388: 'x_return_status = ' || x_return_status, l_debug_prefix);
16389: END IF;
16390: */
16388: 'x_return_status = ' || x_return_status, l_debug_prefix);
16389: END IF;
16390: */
16391: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16392: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'issued_period is non-updateable field. ' ||
16393: 'x_return_status = ' || x_return_status,
16394: p_msg_level=>fnd_log.level_statement);
16395: END IF;
16396:
16404: p_old_column_value => trunc(l_report_start_date),
16405: x_return_status => x_return_status);
16406:
16407: /*IF g_debug THEN
16408: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16409: 'report_start_date is non-updateable field. ' ||
16410: 'x_return_status = ' || x_return_status, l_debug_prefix);
16411: END IF;
16412: */
16410: 'x_return_status = ' || x_return_status, l_debug_prefix);
16411: END IF;
16412: */
16413: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16414: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'report_start_date is non-updateable field. ' ||
16415: 'x_return_status = ' || x_return_status,
16416: p_msg_level=>fnd_log.level_statement);
16417: END IF;
16418:
16426: p_old_column_value => trunc(l_report_end_date),
16427: x_return_status => x_return_status);
16428:
16429: /*IF g_debug THEN
16430: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16431: 'report_end_date is non-updateable field. ' ||
16432: 'x_return_status = ' || x_return_status, l_debug_prefix);
16433: END IF;
16434: */
16432: 'x_return_status = ' || x_return_status, l_debug_prefix);
16433: END IF;
16434: */
16435: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16436: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'report_end_date is non-updateable field. ' ||
16437: 'x_return_status = ' || x_return_status,
16438: p_msg_level=>fnd_log.level_statement);
16439: END IF;
16440:
16444: --Lookup Validations
16445: --validation for audit_ind
16446: ------------------------------------
16447: /****Logical APIs - validation not required****/
16448: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
16449: -- audit_ind is lookup code in lookup type YES/NO
16450: validate_lookup (
16451: p_column => 'audit_ind',
16452: p_lookup_type => 'YES/NO',
16453: p_column_value => p_financial_report_rec.audit_ind,
16454: x_return_status => x_return_status);
16455:
16456: /*IF g_debug THEN
16457: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16458: 'audit_ind should be in lookup YES/NO. ' ||
16459: 'x_return_status = ' || x_return_status, l_debug_prefix);
16460: END IF;
16461: */
16459: 'x_return_status = ' || x_return_status, l_debug_prefix);
16460: END IF;
16461: */
16462: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16463: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'audit_ind should be in lookup YES/NO. ' ||
16464: 'x_return_status = ' || x_return_status,
16465: p_msg_level=>fnd_log.level_statement);
16466: END IF;
16467: END IF;
16469: ----------------------------------
16470: -- validation for consolidated_ind
16471: ----------------------------------
16472: /****Logical APIs - validation not required****/
16473: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
16474: -- consolidated_ind is lookup code in lookup type YES/NO
16475: validate_lookup (
16476: p_column => 'consolidated_ind',
16477: p_lookup_type => 'YES/NO',
16478: p_column_value => p_financial_report_rec.consolidated_ind,
16479: x_return_status => x_return_status);
16480:
16481: /*IF g_debug THEN
16482: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16483: 'consolidated_ind should be in lookup YES/NO. ' ||
16484: 'x_return_status = ' || x_return_status, l_debug_prefix);
16485: END IF;
16486: */
16484: 'x_return_status = ' || x_return_status, l_debug_prefix);
16485: END IF;
16486: */
16487: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16488: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'consolidated_ind should be in lookup YES/NO. ' ||
16489: 'x_return_status = ' || x_return_status,
16490: p_msg_level=>fnd_log.level_statement);
16491: END IF;
16492: END IF;
16494: ------------------------------------
16495: --validation for estimated_ind
16496: ------------------------------------
16497: /****Logical APIs - validation not required****/
16498: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
16499: -- estimated_ind is lookup code in lookup type YES/NO
16500: validate_lookup (
16501: p_column => 'estimated_ind',
16502: p_lookup_type => 'YES/NO',
16503: p_column_value => p_financial_report_rec.estimated_ind,
16504: x_return_status => x_return_status);
16505:
16506: /*IF g_debug THEN
16507: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16508: 'estimated_ind should be in lookup YES/NO. ' ||
16509: 'x_return_status = ' || x_return_status, l_debug_prefix);
16510: END IF;
16511: */
16509: 'x_return_status = ' || x_return_status, l_debug_prefix);
16510: END IF;
16511: */
16512: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16513: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'estimated_ind should be in lookup YES/NO. ' ||
16514: 'x_return_status = ' || x_return_status,
16515: p_msg_level=>fnd_log.level_statement);
16516: END IF;
16517: END IF;
16519: ----------------------------------
16520: -- validation for fiscal_ind
16521: ----------------------------------
16522: /****Logical APIs - validation not required****/
16523: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
16524: -- fiscal_ind is lookup code in lookup type YES/NO
16525: validate_lookup (
16526: p_column => 'fiscal_ind',
16527: p_lookup_type => 'YES/NO',
16528: p_column_value => p_financial_report_rec.fiscal_ind,
16529: x_return_status => x_return_status);
16530:
16531: /*IF g_debug THEN
16532: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16533: 'fiscal_ind should be in lookup YES/NO. ' ||
16534: 'x_return_status = ' || x_return_status, l_debug_prefix);
16535: END IF;
16536: */
16534: 'x_return_status = ' || x_return_status, l_debug_prefix);
16535: END IF;
16536: */
16537: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16538: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'fiscal_ind should be in lookup YES/NO. ' ||
16539: 'x_return_status = ' || x_return_status,
16540: p_msg_level=>fnd_log.level_statement);
16541: END IF;
16542: END IF;
16547: ----------------------------------
16548: -- validation for final_ind
16549: ----------------------------------
16550: /****Logical APIs - validation not required****/
16551: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
16552: -- fiscal_ind is lookup code in lookup type YES/NO
16553: validate_lookup (
16554: p_column => 'final_ind',
16555: p_lookup_type => 'YES/NO',
16556: p_column_value => p_financial_report_rec.final_ind,
16557: x_return_status => x_return_status);
16558:
16559: /*IF g_debug THEN
16560: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16561: 'final_ind should be in lookup YES/NO. ' ||
16562: 'x_return_status = ' || x_return_status, l_debug_prefix);
16563: END IF;
16564: */
16562: 'x_return_status = ' || x_return_status, l_debug_prefix);
16563: END IF;
16564: */
16565: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16566: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'final_ind should be in lookup YES/NO. ' ||
16567: 'x_return_status = ' || x_return_status,
16568: p_msg_level=>fnd_log.level_statement);
16569: END IF;
16570: END IF;
16572: ------------------------------------
16573: --validation for forecast_ind
16574: ------------------------------------
16575: /****Logical APIs - validation not required****/
16576: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
16577: -- forecast_ind is lookup code in lookup type YES/NO
16578: validate_lookup (
16579: p_column => 'forecast_ind',
16580: p_lookup_type => 'YES/NO',
16581: p_column_value => p_financial_report_rec.forecast_ind,
16582: x_return_status => x_return_status);
16583:
16584: /*IF g_debug THEN
16585: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16586: 'forecast_ind should be in lookup YES/NO. ' ||
16587: 'x_return_status = ' || x_return_status, l_debug_prefix);
16588: END IF;
16589: */
16587: 'x_return_status = ' || x_return_status, l_debug_prefix);
16588: END IF;
16589: */
16590: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16591: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'forecast_ind should be in lookup YES/NO. ' ||
16592: 'x_return_status = ' || x_return_status,
16593: p_msg_level=>fnd_log.level_statement);
16594: END IF;
16595: END IF;
16597: ----------------------------------
16598: -- validation for opening_ind
16599: ----------------------------------
16600: /****Logical APIs - validation not required****/
16601: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
16602: -- opening_ind is lookup code in lookup type YES/NO
16603: validate_lookup (
16604: p_column => 'opening_ind',
16605: p_lookup_type => 'YES/NO',
16606: p_column_value => p_financial_report_rec.opening_ind,
16607: x_return_status => x_return_status);
16608:
16609: /*IF g_debug THEN
16610: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16611: 'opening_ind should be in lookup YES/NO. ' ||
16612: 'x_return_status = ' || x_return_status, l_debug_prefix);
16613: END IF;
16614: */
16612: 'x_return_status = ' || x_return_status, l_debug_prefix);
16613: END IF;
16614: */
16615: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16616: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'opening_ind should be in lookup YES/NO. ' ||
16617: 'x_return_status = ' || x_return_status,
16618: p_msg_level=>fnd_log.level_statement);
16619: END IF;
16620: END IF;
16622: ------------------------------------
16623: --validation for proforma_ind
16624: ------------------------------------
16625: /****Logical APIs - validation not required****/
16626: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
16627: -- proforma_ind is lookup code in lookup type YES/NO
16628: validate_lookup (
16629: p_column => 'proforma_ind',
16630: p_lookup_type => 'YES/NO',
16631: p_column_value => p_financial_report_rec.proforma_ind,
16632: x_return_status => x_return_status);
16633:
16634: /*IF g_debug THEN
16635: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16636: 'proforma_ind should be in lookup YES/NO. ' ||
16637: 'x_return_status = ' || x_return_status, l_debug_prefix);
16638: END IF;
16639: */
16637: 'x_return_status = ' || x_return_status, l_debug_prefix);
16638: END IF;
16639: */
16640: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16641: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'proforma_ind should be in lookup YES/NO. ' ||
16642: 'x_return_status = ' || x_return_status,
16643: p_msg_level=>fnd_log.level_statement);
16644: END IF;
16645: END IF;
16647: ----------------------------------
16648: -- validation for qualified_ind
16649: ----------------------------------
16650: /****Logical APIs - validation not required****/
16651: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
16652: -- qualified_ind is lookup code in lookup type YES/NO
16653: validate_lookup (
16654: p_column => 'qualified_ind',
16655: p_lookup_type => 'YES/NO',
16656: p_column_value => p_financial_report_rec.qualified_ind,
16657: x_return_status => x_return_status);
16658:
16659: /*IF g_debug THEN
16660: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16661: 'qualified_ind should be in lookup YES/NO. ' ||
16662: 'x_return_status = ' || x_return_status, l_debug_prefix);
16663: END IF;
16664: */
16662: 'x_return_status = ' || x_return_status, l_debug_prefix);
16663: END IF;
16664: */
16665: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16666: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'qualified_ind should be in lookup YES/NO. ' ||
16667: 'x_return_status = ' || x_return_status,
16668: p_msg_level=>fnd_log.level_statement);
16669: END IF;
16670: END IF;
16672: ------------------------------------
16673: --validation for restated_ind
16674: ------------------------------------
16675: /****Logical APIs - validation not required****/
16676: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
16677: -- restated_ind is lookup code in lookup type YES/NO
16678: validate_lookup (
16679: p_column => 'restated_ind',
16680: p_lookup_type => 'YES/NO',
16681: p_column_value => p_financial_report_rec.restated_ind,
16682: x_return_status => x_return_status);
16683:
16684: /*IF g_debug THEN
16685: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16686: 'restated_ind should be in lookup YES/NO. ' ||
16687: 'x_return_status = ' || x_return_status, l_debug_prefix);
16688: END IF;
16689: */
16687: 'x_return_status = ' || x_return_status, l_debug_prefix);
16688: END IF;
16689: */
16690: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16691: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'restated_ind should be in lookup YES/NO. ' ||
16692: 'x_return_status = ' || x_return_status,
16693: p_msg_level=>fnd_log.level_statement);
16694: END IF;
16695: END IF;
16697: ----------------------------------
16698: -- validation for signed_by_principals_ind
16699: ----------------------------------
16700: /****Logical APIs - validation not required****/
16701: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
16702: -- signed_by_principals_ind is lookup code in lookup type YES/NO
16703: validate_lookup (
16704: p_column => 'signed_by_principals_ind',
16705: p_lookup_type => 'YES/NO',
16706: p_column_value => p_financial_report_rec.signed_by_principals_ind,
16707: x_return_status => x_return_status);
16708:
16709: /*IF g_debug THEN
16710: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16711: 'signed_by_principals_ind should be in lookup YES/NO. ' ||
16712: 'x_return_status = ' || x_return_status, l_debug_prefix);
16713: END IF;
16714: */
16712: 'x_return_status = ' || x_return_status, l_debug_prefix);
16713: END IF;
16714: */
16715: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16716: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'signed_by_principals_ind should be in lookup YES/NO. ' ||
16717: 'x_return_status = ' || x_return_status,
16718: p_msg_level=>fnd_log.level_statement);
16719: END IF;
16720: END IF;
16722: ------------------------------------
16723: --validation for trial_balance_ind
16724: ------------------------------------
16725: /****Logical APIs - validation not required****/
16726: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
16727: -- trial_balance_ind is lookup code in lookup type YES/NO
16728: validate_lookup (
16729: p_column => 'trial_balance_ind',
16730: p_lookup_type => 'YES/NO',
16731: p_column_value => p_financial_report_rec.trial_balance_ind,
16732: x_return_status => x_return_status);
16733:
16734: /*IF g_debug THEN
16735: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16736: 'trial_balance_ind should be in lookup YES/NO. ' ||
16737: 'x_return_status = ' || x_return_status, l_debug_prefix);
16738: END IF;
16739: */
16737: 'x_return_status = ' || x_return_status, l_debug_prefix);
16738: END IF;
16739: */
16740: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16741: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'trial_balance_ind should be in lookup YES/NO. ' ||
16742: 'x_return_status = ' || x_return_status,
16743: p_msg_level=>fnd_log.level_statement);
16744: END IF;
16745: END IF;
16747: ----------------------------------
16748: -- validation for unbalanced_ind
16749: ----------------------------------
16750: /****Logical APIs - validation not required****/
16751: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
16752: -- unbalanced_ind is lookup code in lookup type YES/NO
16753: validate_lookup (
16754: p_column => 'unbalanced_ind',
16755: p_lookup_type => 'YES/NO',
16756: p_column_value => p_financial_report_rec.unbalanced_ind,
16757: x_return_status => x_return_status);
16758:
16759: /*IF g_debug THEN
16760: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16761: 'unbalanced_ind should be in lookup YES/NO. ' ||
16762: 'x_return_status = ' || x_return_status, l_debug_prefix);
16763: END IF;
16764: */
16762: 'x_return_status = ' || x_return_status, l_debug_prefix);
16763: END IF;
16764: */
16765: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16766: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'unbalanced_ind should be in lookup YES/NO. ' ||
16767: 'x_return_status = ' || x_return_status,
16768: p_msg_level=>fnd_log.level_statement);
16769: END IF;
16770: END IF;
16772: ------------------------
16773: -- validation for status
16774: ------------------------
16775: /****Logical APIs - validation not required****/
16776: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
16777: -- status is lookup code in lookup type REGISTRY_STATUS
16778: IF p_financial_report_rec.status IS NOT NULL
16779: AND
16780: p_financial_report_rec.status <> fnd_api.g_miss_char
16793: p_column_value => p_financial_report_rec.status,
16794: x_return_status => x_return_status);
16795:
16796: /*IF g_debug THEN
16797: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16798: 'status is lookup code in lookup type REGISTRY_STATUS. ' ||
16799: 'x_return_status = ' || x_return_status, l_debug_prefix);
16800: END IF;
16801: */
16799: 'x_return_status = ' || x_return_status, l_debug_prefix);
16800: END IF;
16801: */
16802: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16803: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=> 'status is lookup code in lookup type REGISTRY_STATUS. ' ||
16804: 'x_return_status = ' || x_return_status,
16805: p_msg_level=>fnd_log.level_statement);
16806: END IF;
16807:
16829: p_column_value => p_financial_report_rec.actual_content_source,
16830: x_return_status => x_return_status);
16831:
16832: /*IF g_debug THEN
16833: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16834: 'actual_content_source is mandatory field. ' ||
16835: 'x_return_status = ' || x_return_status, l_debug_prefix);
16836: END IF;
16837: */
16835: 'x_return_status = ' || x_return_status, l_debug_prefix);
16836: END IF;
16837: */
16838: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16839: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'actual_content_source is mandatory field. ' ||
16840: 'x_return_status = ' || x_return_status,
16841: p_msg_level=>fnd_log.level_statement);
16842: END IF;
16843:
16853: p_column_value => p_financial_report_rec.actual_content_source,
16854: x_return_status => x_return_status);
16855: */
16856: /*IF g_debug THEN
16857: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16858: 'actual_content_source should be in lookup CONTENT_SOURCE_TYPE. ' ||
16859: 'x_return_status = ' || x_return_status, l_debug_prefix);
16860: END IF;
16861: */
16860: END IF;
16861: */
16862: /*
16863: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
16864: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
16865: p_message=>'actual_content_source should be in lookup CONTENT_SOURCE_TYPE. ' ||
16866: 'x_return_status = ' || x_return_status,
16867: p_msg_level=>fnd_log.level_statement);
16868: END IF;
16889: p_old_created_by_module => l_created_by_module,
16890: x_return_status => x_return_status);
16891:
16892: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
16893: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_financial_report (-)',
16894: p_msg_level=>fnd_log.level_procedure);
16895: END IF;
16896:
16897: END validate_financial_report;
16962: --enable_debug;
16963:
16964: -- Debug info.
16965: /*IF g_debug THEN
16966: hz_utility_v2pub.debug ('validate_financial_number (+)');
16967: END IF;
16968: */
16969: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
16970: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_financial_number (+)',
16966: hz_utility_v2pub.debug ('validate_financial_number (+)');
16967: END IF;
16968: */
16969: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
16970: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_financial_number (+)',
16971: p_msg_level=>fnd_log.level_procedure);
16972: END IF;
16973:
16974: -- do the query to get old values for update
16991: -------------------------------------
16992: -- validation for financial_number_id
16993: -------------------------------------
16994: /****Logical APIs - validation not required****/
16995: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
16996: --check for unique financial_number_id
16997: IF p_create_update_flag = 'C' THEN
16998: IF p_financial_number_rec.financial_number_id IS NOT NULL AND
16999: p_financial_number_rec.financial_number_id <> fnd_api.g_miss_num
17010: END IF;
17011: CLOSE c_dup_financial_number_id;
17012:
17013: /*IF g_debug THEN
17014: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17015: 'check that financial_number_id is unique during creation. ' ||
17016: ' x_return_status = ' || x_return_status, l_debug_prefix);
17017: END IF;
17018: */
17016: ' x_return_status = ' || x_return_status, l_debug_prefix);
17017: END IF;
17018: */
17019: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17020: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'check that financial_number_id is unique during creation. ' ||
17021: ' x_return_status = ' || x_return_status,
17022: p_msg_level=>fnd_log.level_statement);
17023: END IF;
17024:
17025: END IF;
17026: END IF;
17027:
17028: /*IF g_debug THEN
17029: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17030: '(+) after validate financial_number_id ... ' ||
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=>'(+) after validate financial_number_id ... ' ||
17036: 'x_return_status = ' || x_return_status,
17037: p_msg_level=>fnd_log.level_statement);
17038: END IF;
17039:
17045: p_old_column_value => l_financial_number_id,
17046: x_return_status => x_return_status);
17047:
17048: /*IF g_debug THEN
17049: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17050: 'financial_number_id is non-updateable field. ' ||
17051: 'x_return_status = ' || x_return_status, l_debug_prefix);
17052: END IF;
17053: */
17051: 'x_return_status = ' || x_return_status, l_debug_prefix);
17052: END IF;
17053: */
17054: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17055: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'financial_number_id is non-updateable field. ' ||
17056: 'x_return_status = ' || x_return_status,
17057: p_msg_level=>fnd_log.level_statement);
17058: END IF;
17059:
17063: -------------------------------------
17064: -- validation for financial_report_id
17065: -------------------------------------
17066: /****Logical APIs - validation not required****/
17067: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
17068: --Must exist in HZ_FINANCIAL_REPORTS. Non-updateable.
17069: -- financial_report_id has foreign key HZ_FINANCIAL_REPORTS.FINANCIAL_REPORT_ID
17070: IF p_create_update_flag = 'C'
17071: AND
17092: x_return_status := fnd_api.g_ret_sts_error;
17093: END;
17094:
17095: /*IF g_debug THEN
17096: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17097: 'financial_report_id has foreign key hz_financial_reports.financial_report_id. ' ||
17098: 'x_return_status = ' || x_return_status, l_debug_prefix);
17099: END IF;
17100: */
17098: 'x_return_status = ' || x_return_status, l_debug_prefix);
17099: END IF;
17100: */
17101: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17102: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17103: p_message=>'financial_report_id has foreign key hz_financial_reports.financial_report_id. ' ||
17104: 'x_return_status = ' || x_return_status,
17105: p_msg_level=>fnd_log.level_statement);
17106: END IF;
17115: p_old_column_value => l_financial_report_id,
17116: x_return_status => x_return_status);
17117:
17118: /*IF g_debug THEN
17119: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17120: 'financial_report_id is non-updateable field. ' ||
17121: 'x_return_status = ' || x_return_status, l_debug_prefix);
17122: END IF;
17123: */
17121: 'x_return_status = ' || x_return_status, l_debug_prefix);
17122: END IF;
17123: */
17124: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17125: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'financial_report_id is non-updateable field. ' ||
17126: 'x_return_status = ' || x_return_status,
17127: p_msg_level=>fnd_log.level_statement);
17128: END IF;
17129:
17137: p_column_value => p_financial_number_rec.financial_report_id,
17138: x_return_status => x_return_status);
17139:
17140: /*IF g_debug THEN
17141: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17142: 'financial_report_id is mandatory field. ' ||
17143: 'x_return_status = ' || x_return_status, l_debug_prefix);
17144: END IF;
17145: */
17143: 'x_return_status = ' || x_return_status, l_debug_prefix);
17144: END IF;
17145: */
17146: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17147: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'financial_report_id is mandatory field. ' ||
17148: 'x_return_status = ' || x_return_status,
17149: p_msg_level=>fnd_log.level_statement);
17150: END IF;
17151:
17169: END IF;
17170: CLOSE c_unique_financial_number_rec;
17171:
17172: /*IF g_debug THEN
17173: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17174: 'The following column combination should be unique:' ||
17175: ' FINANCIAL_REPORT_ID, FINANCIAL_NUMBER_NAME. ' ||
17176: ' x_return_status = ' || x_return_status, l_debug_prefix);
17177: END IF;
17176: ' x_return_status = ' || x_return_status, l_debug_prefix);
17177: END IF;
17178: */
17179: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17180: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'The following column combination should be unique:' ||
17181: ' FINANCIAL_REPORT_ID, FINANCIAL_NUMBER_NAME. ' ||
17182: ' x_return_status = ' || x_return_status,
17183: p_msg_level=>fnd_log.level_statement);
17184: END IF;
17193: p_old_column_value => l_financial_number_name,
17194: x_return_status => x_return_status);
17195:
17196: /*IF g_debug THEN
17197: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17198: 'financial_number_name is non-updateable field. ' ||
17199: 'x_return_status = ' || x_return_status, l_debug_prefix);
17200: END IF;
17201: */
17199: 'x_return_status = ' || x_return_status, l_debug_prefix);
17200: END IF;
17201: */
17202: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17203: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17204: p_message=>'financial_number_name is non-updateable field. ' ||
17205: 'x_return_status = ' || x_return_status,
17206: p_msg_level=>fnd_log.level_statement);
17207: END IF;
17218: p_column_value => p_financial_number_rec.financial_number_name,
17219: x_return_status => x_return_status);
17220:
17221: /*IF g_debug THEN
17222: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17223: 'financial_number_name should be in lookup YES/NO. ' ||
17224: 'x_return_status = ' || x_return_status, l_debug_prefix);
17225: END IF;
17226: */
17224: 'x_return_status = ' || x_return_status, l_debug_prefix);
17225: END IF;
17226: */
17227: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17228: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17229: p_message=>'financial_number_name should be in lookup YES/NO. ' ||
17230: 'x_return_status = ' || x_return_status,
17231: p_msg_level=>fnd_log.level_statement);
17232: END IF;
17234: ------------------------
17235: -- validation for status
17236: ------------------------
17237: /****Logical APIs - validation not required****/
17238: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
17239: -- status is lookup code in lookup type REGISTRY_STATUS
17240: IF p_financial_number_rec.status IS NOT NULL
17241: AND
17242: p_financial_number_rec.status <> fnd_api.g_miss_char
17255: p_column_value => p_financial_number_rec.status,
17256: x_return_status => x_return_status);
17257:
17258: /*IF g_debug THEN
17259: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17260: 'status is lookup code in lookup type REGISTRY_STATUS. ' ||
17261: 'x_return_status = ' || x_return_status, l_debug_prefix);
17262: END IF;
17263: */
17261: 'x_return_status = ' || x_return_status, l_debug_prefix);
17262: END IF;
17263: */
17264: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17265: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17266: p_message=>'status is lookup code in lookup type REGISTRY_STATUS. ' ||
17267: 'x_return_status = ' || x_return_status,
17268: p_msg_level=>fnd_log.level_statement);
17269: END IF;
17289: p_old_created_by_module => l_created_by_module,
17290: x_return_status => x_return_status);
17291:
17292: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
17293: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_financial_number (-)',
17294: p_msg_level=>fnd_log.level_procedure);
17295: END IF;
17296:
17297: END validate_financial_number;
17419: --enable_debug;
17420:
17421: -- Debug info.
17422: /*IF g_debug THEN
17423: hz_utility_v2pub.debug ('validate_credit_rating (+)');
17424: END IF;
17425: */
17426: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
17427: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_credit_rating (+)',
17423: hz_utility_v2pub.debug ('validate_credit_rating (+)');
17424: END IF;
17425: */
17426: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
17427: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_credit_rating (+)',
17428: p_msg_level=>fnd_log.level_procedure);
17429: END IF;
17430:
17431: -- do the query to get old values for update
17516: -------------------------------------
17517: -- validation for credit_rating_id
17518: -------------------------------------
17519: /****Logical APIs - validation not required****/
17520: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
17521: --check for unique credit_rating_id
17522: IF p_create_update_flag = 'C' THEN
17523: IF p_credit_rating_rec.credit_rating_id IS NOT NULL AND
17524: p_credit_rating_rec.credit_rating_id <> fnd_api.g_miss_num
17535: END IF;
17536: CLOSE c_dup_credit_rating_id;
17537:
17538: /*IF g_debug THEN
17539: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17540: 'check that credit_rating_id is unique during creation. ' ||
17541: ' x_return_status = ' || x_return_status, l_debug_prefix);
17542: END IF;
17543: */
17541: ' x_return_status = ' || x_return_status, l_debug_prefix);
17542: END IF;
17543: */
17544: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17545: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17546: p_message=>'check that credit_rating_id is unique during creation. ' ||
17547: ' x_return_status = ' || x_return_status,
17548: p_msg_level=>fnd_log.level_statement);
17549: END IF;
17551: END IF;
17552: END IF;
17553:
17554: /*IF g_debug THEN
17555: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17556: '(+) after validate credit_rating_id ... ' ||
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=>'(+) after validate credit_rating_id ... ' ||
17562: 'x_return_status = ' || x_return_status,
17563: p_msg_level=>fnd_log.level_statement);
17564: END IF;
17565:
17571: p_old_column_value => l_credit_rating_id,
17572: x_return_status => x_return_status);
17573:
17574: /*IF g_debug THEN
17575: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17576: 'credit_rating_id is non-updateable field. ' ||
17577: 'x_return_status = ' || x_return_status, l_debug_prefix);
17578: END IF;
17579: */
17577: 'x_return_status = ' || x_return_status, l_debug_prefix);
17578: END IF;
17579: */
17580: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17581: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'credit_rating_id is non-updateable field. ' ||
17582: 'x_return_status = ' || x_return_status,
17583: p_msg_level=>fnd_log.level_statement);
17584: END IF;
17585:
17589: -------------------------------------
17590: -- validation for party_id
17591: -------------------------------------
17592: /****Logical APIs - validation not required****/
17593: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
17594: --party_id is a mandatory field
17595: IF p_create_update_flag = 'C' THEN
17596: validate_mandatory (
17597: p_create_update_flag => p_create_update_flag,
17599: p_column_value => p_credit_rating_rec.party_id,
17600: x_return_status => x_return_status);
17601:
17602: /*IF g_debug THEN
17603: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17604: 'party_id is mandatory field. ' ||
17605: 'x_return_status = ' || x_return_status, l_debug_prefix);
17606: END IF;
17607: */
17605: 'x_return_status = ' || x_return_status, l_debug_prefix);
17606: END IF;
17607: */
17608: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17609: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id is mandatory field. ' ||
17610: 'x_return_status = ' || x_return_status,
17611: p_msg_level=>fnd_log.level_statement);
17612: END IF;
17613:
17635: x_return_status := fnd_api.g_ret_sts_error;
17636: END;
17637:
17638: /*IF g_debug THEN
17639: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17640: 'party_id has foreign key hz_parties.party_id. ' ||
17641: 'x_return_status = ' || x_return_status, l_debug_prefix);
17642: END IF;
17643: */
17641: 'x_return_status = ' || x_return_status, l_debug_prefix);
17642: END IF;
17643: */
17644: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17645: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id has foreign key hz_parties.party_id. ' ||
17646: 'x_return_status = ' || x_return_status,
17647: p_msg_level=>fnd_log.level_statement);
17648: END IF;
17649:
17657: p_old_column_value => l_party_id,
17658: x_return_status => x_return_status);
17659:
17660: /*IF g_debug THEN
17661: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17662: 'party_id is non-updateable field. ' ||
17663: 'x_return_status = ' || x_return_status, l_debug_prefix);
17664: END IF;
17665: */
17663: 'x_return_status = ' || x_return_status, l_debug_prefix);
17664: END IF;
17665: */
17666: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17667: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party_id is non-updateable field. ' ||
17668: 'x_return_status = ' || x_return_status,
17669: p_msg_level=>fnd_log.level_statement);
17670: END IF;
17671:
17696: | END IF;
17697: | CLOSE c_unique_credit_rating_rec;
17698: |
17699: | IF g_debug THEN
17700: | hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17701: | 'The following column combination should be unique:' ||
17702: | ' PARTY_ID, TRUNC(RATED_AS_OF_DATE), RATING_ORGANIZATION, and ACTUAL_CONTENT_SOURCE. ' ||
17703: | ' x_return_status = ' || x_return_status, l_debug_prefix);
17704: | END IF;
17716: p_old_column_value => trunc(l_rated_as_of_date),
17717: x_return_status => x_return_status);
17718:
17719: /*IF g_debug THEN
17720: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17721: 'rated_as_of_date is non-updateable field. ' ||
17722: 'x_return_status = ' || x_return_status, l_debug_prefix);
17723: END IF;
17724: */
17722: 'x_return_status = ' || x_return_status, l_debug_prefix);
17723: END IF;
17724: */
17725: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17726: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'rated_as_of_date is non-updateable field. ' ||
17727: 'x_return_status = ' || x_return_status,
17728: p_msg_level=>fnd_log.level_statement);
17729: END IF;
17730:
17739: p_old_column_value => l_rating_organization,
17740: x_return_status => x_return_status);
17741:
17742: /*IF g_debug THEN
17743: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17744: 'rating_organization is non-updateable field. ' ||
17745: 'x_return_status = ' || x_return_status, l_debug_prefix);
17746: END IF;
17747: */
17745: 'x_return_status = ' || x_return_status, l_debug_prefix);
17746: END IF;
17747: */
17748: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17749: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'rating_organization is non-updateable field. ' ||
17750: 'x_return_status = ' || x_return_status,
17751: p_msg_level=>fnd_log.level_statement);
17752: END IF;
17753:
17755: ----------------------------------
17756: -- validation for fincl_embt_ind
17757: ----------------------------------
17758: /****Logical APIs - validation not required****/
17759: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
17760: --bug 2843453, fincl_embt_ind should be validated against YES/NO instead
17761: --of REGISTRY_STATUS
17762: -- fincl_embt_ind is lookup code in lookup type YES/NO
17763: validate_lookup (
17766: p_column_value => p_credit_rating_rec.fincl_embt_ind,
17767: x_return_status => x_return_status);
17768:
17769: /*IF g_debug THEN
17770: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17771: 'fincl_embt_ind should be in lookup YES/NO. ' ||
17772: 'x_return_status = ' || x_return_status, l_debug_prefix);
17773: END IF;
17774: */
17772: 'x_return_status = ' || x_return_status, l_debug_prefix);
17773: END IF;
17774: */
17775: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17776: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'fincl_embt_ind should be in lookup YES/NO. ' ||
17777: 'x_return_status = ' || x_return_status,
17778: p_msg_level=>fnd_log.level_statement);
17779: END IF;
17780: END IF;
17790: p_column_value => p_credit_rating_rec.credit_score_commentary,
17791: x_return_status => x_return_status);
17792:
17793: /*IF g_debug THEN
17794: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17795: 'credit_score_commentary should be in lookup CREDIT_SCORE_COMMENTARY. ' ||
17796: 'x_return_status = ' || x_return_status, l_debug_prefix);
17797: END IF;
17798: */
17796: 'x_return_status = ' || x_return_status, l_debug_prefix);
17797: END IF;
17798: */
17799: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17800: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17801: p_message=>'credit_score_commentary should be in lookup CREDIT_SCORE_COMMENTARY. ' ||
17802: 'x_return_status = ' || x_return_status,
17803: p_msg_level=>fnd_log.level_statement);
17804: END IF;
17815: p_column_value => p_credit_rating_rec.credit_score_commentary2,
17816: x_return_status => x_return_status);
17817:
17818: /*IF g_debug THEN
17819: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17820: 'credit_score_commentary2 should be in lookup CREDIT_SCORE_COMMENTARY. ' ||
17821: 'x_return_status = ' || x_return_status, l_debug_prefix);
17822: END IF;
17823: */
17821: 'x_return_status = ' || x_return_status, l_debug_prefix);
17822: END IF;
17823: */
17824: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17825: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'credit_score_commentary2 should be in lookup CREDIT_SCORE_COMMENTARY. ' ||
17826: 'x_return_status = ' || x_return_status,
17827: p_msg_level=>fnd_log.level_statement);
17828: END IF;
17829:
17838: p_column_value => p_credit_rating_rec.credit_score_commentary3,
17839: x_return_status => x_return_status);
17840:
17841: /*IF g_debug THEN
17842: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17843: 'credit_score_commentary3 should be in lookup CREDIT_SCORE_COMMENTARY. ' ||
17844: 'x_return_status = ' || x_return_status, l_debug_prefix);
17845: END IF;
17846: */
17844: 'x_return_status = ' || x_return_status, l_debug_prefix);
17845: END IF;
17846: */
17847: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17848: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'credit_score_commentary3 should be in lookup CREDIT_SCORE_COMMENTARY. ' ||
17849: 'x_return_status = ' || x_return_status,
17850: p_msg_level=>fnd_log.level_statement);
17851: END IF;
17852:
17861: p_column_value => p_credit_rating_rec.credit_score_commentary4,
17862: x_return_status => x_return_status);
17863:
17864: /*IF g_debug THEN
17865: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17866: 'credit_score_commentary4 should be in lookup CREDIT_SCORE_COMMENTARY. ' ||
17867: 'x_return_status = ' || x_return_status, l_debug_prefix);
17868: END IF;
17869: */
17867: 'x_return_status = ' || x_return_status, l_debug_prefix);
17868: END IF;
17869: */
17870: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17871: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'credit_score_commentary4 should be in lookup CREDIT_SCORE_COMMENTARY. ' ||
17872: 'x_return_status = ' || x_return_status,
17873: p_msg_level=>fnd_log.level_statement);
17874: END IF;
17875:
17884: p_column_value => p_credit_rating_rec.credit_score_commentary5,
17885: x_return_status => x_return_status);
17886:
17887: /*IF g_debug THEN
17888: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17889: 'credit_score_commentary5 should be in lookup CREDIT_SCORE_COMMENTARY. ' ||
17890: 'x_return_status = ' || x_return_status, l_debug_prefix);
17891: END IF;
17892: */
17890: 'x_return_status = ' || x_return_status, l_debug_prefix);
17891: END IF;
17892: */
17893: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17894: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'credit_score_commentary5 should be in lookup CREDIT_SCORE_COMMENTARY. ' ||
17895: 'x_return_status = ' || x_return_status,
17896: p_msg_level=>fnd_log.level_statement);
17897: END IF;
17898:
17907: p_column_value => p_credit_rating_rec.credit_score_commentary6,
17908: x_return_status => x_return_status);
17909:
17910: /*IF g_debug THEN
17911: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17912: 'credit_score_commentary6 should be in lookup CREDIT_SCORE_COMMENTARY. ' ||
17913: 'x_return_status = ' || x_return_status, l_debug_prefix);
17914: END IF;
17915: */
17913: 'x_return_status = ' || x_return_status, l_debug_prefix);
17914: END IF;
17915: */
17916: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17917: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'credit_score_commentary6 should be in lookup CREDIT_SCORE_COMMENTARY. ' ||
17918: 'x_return_status = ' || x_return_status,
17919: p_msg_level=>fnd_log.level_statement);
17920: END IF;
17921:
17930: p_column_value => p_credit_rating_rec.credit_score_commentary7,
17931: x_return_status => x_return_status);
17932:
17933: /*IF g_debug THEN
17934: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17935: 'credit_score_commentary7 should be in lookup CREDIT_SCORE_COMMENTARY. ' ||
17936: 'x_return_status = ' || x_return_status, l_debug_prefix);
17937: END IF;
17938: */
17936: 'x_return_status = ' || x_return_status, l_debug_prefix);
17937: END IF;
17938: */
17939: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17940: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'credit_score_commentary7 should be in lookup CREDIT_SCORE_COMMENTARY. ' ||
17941: 'x_return_status = ' || x_return_status,
17942: p_msg_level=>fnd_log.level_statement);
17943: END IF;
17944:
17953: p_column_value => p_credit_rating_rec.credit_score_commentary8,
17954: x_return_status => x_return_status);
17955:
17956: /*IF g_debug THEN
17957: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17958: 'credit_score_commentary8 should be in lookup CREDIT_SCORE_COMMENTARY. ' ||
17959: 'x_return_status = ' || x_return_status, l_debug_prefix);
17960: END IF;
17961: */
17959: 'x_return_status = ' || x_return_status, l_debug_prefix);
17960: END IF;
17961: */
17962: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17963: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17964: p_message=>'credit_score_commentary8 should be in lookup CREDIT_SCORE_COMMENTARY. ' ||
17965: 'x_return_status = ' || x_return_status,
17966: p_msg_level=>fnd_log.level_statement);
17967: END IF;
17977: p_column_value => p_credit_rating_rec.credit_score_commentary9,
17978: x_return_status => x_return_status);
17979:
17980: /*IF g_debug THEN
17981: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17982: 'credit_score_commentary9 should be in lookup CREDIT_SCORE_COMMENTARY. ' ||
17983: 'x_return_status = ' || x_return_status, l_debug_prefix);
17984: END IF;
17985: */
17983: 'x_return_status = ' || x_return_status, l_debug_prefix);
17984: END IF;
17985: */
17986: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
17987: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
17988: p_message=>'credit_score_commentary9 should be in lookup CREDIT_SCORE_COMMENTARY. ' ||
17989: 'x_return_status = ' || x_return_status,
17990: p_msg_level=>fnd_log.level_statement);
17991: END IF;
18001: p_column_value => p_credit_rating_rec.credit_score_commentary10,
18002: x_return_status => x_return_status);
18003:
18004: /*IF g_debug THEN
18005: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18006: 'credit_score_commentary10 should be in lookup CREDIT_SCORE_COMMENTARY. ' ||
18007: 'x_return_status = ' || x_return_status, l_debug_prefix);
18008: END IF;
18009: */
18007: 'x_return_status = ' || x_return_status, l_debug_prefix);
18008: END IF;
18009: */
18010: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
18011: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18012: p_message=>'credit_score_commentary10 should be in lookup CREDIT_SCORE_COMMENTARY. ' ||
18013: 'x_return_status = ' || x_return_status,
18014: p_msg_level=>fnd_log.level_statement);
18015: END IF;
18025: p_column_value => p_credit_rating_rec.failure_score_commentary,
18026: x_return_status => x_return_status);
18027:
18028: /*IF g_debug THEN
18029: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18030: 'failure_score_commentary should be in lookup FAILURE_SCORE_COMMENTARY. ' ||
18031: 'x_return_status = ' || x_return_status, l_debug_prefix);
18032: END IF;
18033: */
18031: 'x_return_status = ' || x_return_status, l_debug_prefix);
18032: END IF;
18033: */
18034: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
18035: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18036: p_message=>'failure_score_commentary should be in lookup FAILURE_SCORE_COMMENTARY. ' ||
18037: 'x_return_status = ' || x_return_status,
18038: p_msg_level=>fnd_log.level_statement);
18039: END IF;
18049: p_column_value => p_credit_rating_rec.failure_score_commentary2,
18050: x_return_status => x_return_status);
18051:
18052: /*IF g_debug THEN
18053: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18054: 'failure_score_commentary2 should be in lookup FAILURE_SCORE_COMMENTARY. ' ||
18055: 'x_return_status = ' || x_return_status, l_debug_prefix);
18056: END IF;
18057: */
18055: 'x_return_status = ' || x_return_status, l_debug_prefix);
18056: END IF;
18057: */
18058: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
18059: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18060: p_message=>'failure_score_commentary2 should be in lookup FAILURE_SCORE_COMMENTARY. ' ||
18061: 'x_return_status = ' || x_return_status,
18062: p_msg_level=>fnd_log.level_statement);
18063: END IF;
18073: p_column_value => p_credit_rating_rec.failure_score_commentary3,
18074: x_return_status => x_return_status);
18075:
18076: /*IF g_debug THEN
18077: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18078: 'failure_score_commentary2 should be in lookup FAILURE_SCORE_COMMENTARY. ' ||
18079: 'x_return_status = ' || x_return_status, l_debug_prefix);
18080: END IF;
18081: */
18079: 'x_return_status = ' || x_return_status, l_debug_prefix);
18080: END IF;
18081: */
18082: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
18083: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18084: p_message=>'failure_score_commentary2 should be in lookup FAILURE_SCORE_COMMENTARY. ' ||
18085: 'x_return_status = ' || x_return_status,
18086: p_msg_level=>fnd_log.level_statement);
18087: END IF;
18097: p_column_value => p_credit_rating_rec.failure_score_commentary4,
18098: x_return_status => x_return_status);
18099:
18100: /*IF g_debug THEN
18101: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18102: 'failure_score_commentary4 should be in lookup FAILURE_SCORE_COMMENTARY. ' ||
18103: 'x_return_status = ' || x_return_status, l_debug_prefix);
18104: END IF;
18105: */
18103: 'x_return_status = ' || x_return_status, l_debug_prefix);
18104: END IF;
18105: */
18106: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
18107: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18108: p_message=>'failure_score_commentary4 should be in lookup FAILURE_SCORE_COMMENTARY. ' ||
18109: 'x_return_status = ' || x_return_status,
18110: p_msg_level=>fnd_log.level_statement);
18111: END IF;
18121: p_column_value => p_credit_rating_rec.failure_score_commentary5,
18122: x_return_status => x_return_status);
18123:
18124: /*IF g_debug THEN
18125: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18126: 'failure_score_commentary5 should be in lookup FAILURE_SCORE_COMMENTARY. ' ||
18127: 'x_return_status = ' || x_return_status, l_debug_prefix);
18128: END IF;
18129: */
18127: 'x_return_status = ' || x_return_status, l_debug_prefix);
18128: END IF;
18129: */
18130: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
18131: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18132: p_message=>'failure_score_commentary5 should be in lookup FAILURE_SCORE_COMMENTARY. ' ||
18133: 'x_return_status = ' || x_return_status,
18134: p_msg_level=>fnd_log.level_statement);
18135: END IF;
18145: p_column_value => p_credit_rating_rec.failure_score_commentary6,
18146: x_return_status => x_return_status);
18147:
18148: /*IF g_debug THEN
18149: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18150: 'failure_score_commentary6 should be in lookup FAILURE_SCORE_COMMENTARY. ' ||
18151: 'x_return_status = ' || x_return_status, l_debug_prefix);
18152: END IF;
18153: */
18151: 'x_return_status = ' || x_return_status, l_debug_prefix);
18152: END IF;
18153: */
18154: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
18155: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18156: p_message=>'failure_score_commentary6 should be in lookup FAILURE_SCORE_COMMENTARY. ' ||
18157: 'x_return_status = ' || x_return_status,
18158: p_msg_level=>fnd_log.level_statement);
18159: END IF;
18169: p_column_value => p_credit_rating_rec.failure_score_commentary7,
18170: x_return_status => x_return_status);
18171:
18172: /*IF g_debug THEN
18173: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18174: 'failure_score_commentary7 should be in lookup FAILURE_SCORE_COMMENTARY. ' ||
18175: 'x_return_status = ' || x_return_status, l_debug_prefix);
18176: END IF;
18177: */
18175: 'x_return_status = ' || x_return_status, l_debug_prefix);
18176: END IF;
18177: */
18178: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
18179: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18180: p_message=>'failure_score_commentary7 should be in lookup FAILURE_SCORE_COMMENTARY. ' ||
18181: 'x_return_status = ' || x_return_status,
18182: p_msg_level=>fnd_log.level_statement);
18183: END IF;
18193: p_column_value => p_credit_rating_rec.failure_score_commentary8,
18194: x_return_status => x_return_status);
18195:
18196: /*IF g_debug THEN
18197: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18198: 'failure_score_commentary8 should be in lookup FAILURE_SCORE_COMMENTARY. ' ||
18199: 'x_return_status = ' || x_return_status, l_debug_prefix);
18200: END IF;
18201: */
18199: 'x_return_status = ' || x_return_status, l_debug_prefix);
18200: END IF;
18201: */
18202: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
18203: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18204: p_message=>'failure_score_commentary8 should be in lookup FAILURE_SCORE_COMMENTARY. ' ||
18205: 'x_return_status = ' || x_return_status,
18206: p_msg_level=>fnd_log.level_statement);
18207: END IF;
18217: p_column_value => p_credit_rating_rec.failure_score_commentary9,
18218: x_return_status => x_return_status);
18219:
18220: /*IF g_debug THEN
18221: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18222: 'failure_score_commentary9 should be in lookup FAILURE_SCORE_COMMENTARY. ' ||
18223: 'x_return_status = ' || x_return_status, l_debug_prefix);
18224: END IF;
18225: */
18223: 'x_return_status = ' || x_return_status, l_debug_prefix);
18224: END IF;
18225: */
18226: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
18227: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18228: p_message=>'failure_score_commentary9 should be in lookup FAILURE_SCORE_COMMENTARY. ' ||
18229: 'x_return_status = ' || x_return_status,
18230: p_msg_level=>fnd_log.level_statement);
18231: END IF;
18241: p_column_value => p_credit_rating_rec.failure_score_commentary10,
18242: x_return_status => x_return_status);
18243:
18244: /*IF g_debug THEN
18245: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18246: 'failure_score_commentary10 should be in lookup FAILURE_SCORE_COMMENTARY. ' ||
18247: 'x_return_status = ' || x_return_status, l_debug_prefix);
18248: END IF;
18249: */
18247: 'x_return_status = ' || x_return_status, l_debug_prefix);
18248: END IF;
18249: */
18250: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
18251: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18252: p_message=>'failure_score_commentary10 should be in lookup FAILURE_SCORE_COMMENTARY. ' ||
18253: 'x_return_status = ' || x_return_status,
18254: p_msg_level=>fnd_log.level_statement);
18255: END IF;
18265: p_column_value => p_credit_rating_rec.credit_score_override_code,
18266: x_return_status => x_return_status);
18267:
18268: /*IF g_debug THEN
18269: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18270: 'credit_score_override_code should be in lookup FAILURE_SCORE_OVERRIDE_CODE. ' ||
18271: 'x_return_status = ' || x_return_status, l_debug_prefix);
18272: END IF;
18273: */
18271: 'x_return_status = ' || x_return_status, l_debug_prefix);
18272: END IF;
18273: */
18274: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
18275: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18276: p_message=>'credit_score_override_code should be in lookup FAILURE_SCORE_OVERRIDE_CODE. ' ||
18277: 'x_return_status = ' || x_return_status,
18278: p_msg_level=>fnd_log.level_statement);
18279: END IF;
18281: --------------------------------------------
18282: -- validation for debarment_ind
18283: --------------------------------------------
18284: /****Logical APIs - validation not required****/
18285: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
18286: -- debarment_ind is lookup code in lookup type YES/NO
18287: validate_lookup (
18288: p_column => 'debarment_ind',
18289: p_lookup_type => 'YES/NO',
18290: p_column_value => p_credit_rating_rec.debarment_ind,
18291: x_return_status => x_return_status);
18292:
18293: /*IF g_debug THEN
18294: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18295: 'debarment_ind should be in lookup YES/NO. ' ||
18296: 'x_return_status = ' || x_return_status, l_debug_prefix);
18297: END IF;
18298: */
18296: 'x_return_status = ' || x_return_status, l_debug_prefix);
18297: END IF;
18298: */
18299: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
18300: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'debarment_ind should be in lookup YES/NO. ' ||
18301: 'x_return_status = ' || x_return_status,
18302: p_msg_level=>fnd_log.level_statement);
18303: END IF;
18304: END IF;
18306: --------------------------------------------
18307: -- validation for suit_ind
18308: --------------------------------------------
18309: /****Logical APIs - validation not required****/
18310: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
18311: -- suit_ind is lookup code in lookup type YES/NO
18312: validate_lookup (
18313: p_column => 'suit_ind',
18314: p_lookup_type => 'YES/NO',
18315: p_column_value => p_credit_rating_rec.suit_ind,
18316: x_return_status => x_return_status);
18317:
18318: /*IF g_debug THEN
18319: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18320: 'suit_ind should be in lookup YES/NO. ' ||
18321: 'x_return_status = ' || x_return_status, l_debug_prefix);
18322: END IF;
18323: */
18321: 'x_return_status = ' || x_return_status, l_debug_prefix);
18322: END IF;
18323: */
18324: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
18325: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'suit_ind should be in lookup YES/NO. ' ||
18326: 'x_return_status = ' || x_return_status,
18327: p_msg_level=>fnd_log.level_statement);
18328: END IF;
18329: END IF;
18331: --------------------------------------------
18332: -- validation for lien_ind
18333: --------------------------------------------
18334: /****Logical APIs - validation not required****/
18335: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
18336: -- lien_ind is lookup code in lookup type YES/NO
18337: validate_lookup (
18338: p_column => 'lien_ind',
18339: p_lookup_type => 'YES/NO',
18340: p_column_value => p_credit_rating_rec.lien_ind,
18341: x_return_status => x_return_status);
18342:
18343: /*IF g_debug THEN
18344: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18345: 'lien_ind should be in lookup YES/NO. ' ||
18346: 'x_return_status = ' || x_return_status, l_debug_prefix);
18347: END IF;
18348: */
18346: 'x_return_status = ' || x_return_status, l_debug_prefix);
18347: END IF;
18348: */
18349: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
18350: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'lien_ind should be in lookup YES/NO. ' ||
18351: 'x_return_status = ' || x_return_status,
18352: p_msg_level=>fnd_log.level_statement);
18353: END IF;
18354: END IF;
18356: --------------------------------------------
18357: -- validation for judgement_ind
18358: --------------------------------------------
18359: /****Logical APIs - validation not required****/
18360: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
18361: -- judgement_ind is lookup code in lookup type YES/NO
18362: validate_lookup (
18363: p_column => 'judgement_ind',
18364: p_lookup_type => 'YES/NO',
18365: p_column_value => p_credit_rating_rec.judgement_ind,
18366: x_return_status => x_return_status);
18367:
18368: /*IF g_debug THEN
18369: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18370: 'judgement_ind should be in lookup YES/NO. ' ||
18371: 'x_return_status = ' || x_return_status, l_debug_prefix);
18372: END IF;
18373: */
18371: 'x_return_status = ' || x_return_status, l_debug_prefix);
18372: END IF;
18373: */
18374: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
18375: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'judgement_ind should be in lookup YES/NO. ' ||
18376: 'x_return_status = ' || x_return_status,
18377: p_msg_level=>fnd_log.level_statement);
18378: END IF;
18379: END IF;
18381: --------------------------------------------
18382: -- validation for no_trade_ind
18383: --------------------------------------------
18384: /****Logical APIs - validation not required****/
18385: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
18386: -- no_trade_ind is lookup code in lookup type YES/NO
18387: validate_lookup (
18388: p_column => 'no_trade_ind',
18389: p_lookup_type => 'YES/NO',
18390: p_column_value => p_credit_rating_rec.no_trade_ind,
18391: x_return_status => x_return_status);
18392:
18393: /*IF g_debug THEN
18394: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18395: 'no_trade_ind should be in lookup YES/NO. ' ||
18396: 'x_return_status = ' || x_return_status, l_debug_prefix);
18397: END IF;
18398: */
18396: 'x_return_status = ' || x_return_status, l_debug_prefix);
18397: END IF;
18398: */
18399: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
18400: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'no_trade_ind should be in lookup YES/NO. ' ||
18401: 'x_return_status = ' || x_return_status,
18402: p_msg_level=>fnd_log.level_statement);
18403: END IF;
18404: END IF;
18414: p_column_value => p_credit_rating_rec.prnt_hq_bkcy_ind,
18415: x_return_status => x_return_status);
18416:
18417: /*IF g_debug THEN
18418: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18419: 'prnt_hq_bkcy_ind should be in lookup PRNT_HQ_IND. ' ||
18420: 'x_return_status = ' || x_return_status, l_debug_prefix);
18421: END IF;
18422: */
18420: 'x_return_status = ' || x_return_status, l_debug_prefix);
18421: END IF;
18422: */
18423: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
18424: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'prnt_hq_bkcy_ind should be in lookup PRNT_HQ_IND. ' ||
18425: 'x_return_status = ' || x_return_status,
18426: p_msg_level=>fnd_log.level_statement);
18427: END IF;
18428:
18459: x_return_status := fnd_api.g_ret_sts_error;
18460: END;
18461:
18462: /*IF g_debug THEN
18463: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18464: 'maximum_credit_currency_code has foreign key fnd_currencies.currency_code. ' ||
18465: 'x_return_status = ' || x_return_status, l_debug_prefix);
18466: END IF;
18467: */
18465: 'x_return_status = ' || x_return_status, l_debug_prefix);
18466: END IF;
18467: */
18468: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
18469: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18470: p_message=>'maximum_credit_currency_code has foreign key fnd_currencies.currency_code. ' ||
18471: 'x_return_status = ' || x_return_status,
18472: p_msg_level=>fnd_log.level_statement);
18473: END IF;
18478: ------------------------
18479: -- validation for status
18480: ------------------------
18481: /****Logical APIs - validation not required****/
18482: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
18483: -- status is lookup code in lookup type REGISTRY_STATUS
18484: IF p_credit_rating_rec.status IS NOT NULL
18485: AND
18486: p_credit_rating_rec.status <> fnd_api.g_miss_char
18499: p_column_value => p_credit_rating_rec.status,
18500: x_return_status => x_return_status);
18501:
18502: /*IF g_debug THEN
18503: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18504: 'status is lookup code in lookup type REGISTRY_STATUS. ' ||
18505: 'x_return_status = ' || x_return_status, l_debug_prefix);
18506: END IF;
18507: */
18505: 'x_return_status = ' || x_return_status, l_debug_prefix);
18506: END IF;
18507: */
18508: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
18509: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18510: p_message=>'status is lookup code in lookup type REGISTRY_STATUS. ' ||
18511: 'x_return_status = ' || x_return_status,
18512: p_msg_level=>fnd_log.level_statement);
18513: END IF;
18597: p_column_value => p_credit_rating_rec.actual_content_source,
18598: x_return_status => x_return_status);
18599: */
18600: /*IF g_debug THEN
18601: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18602: 'actual_content_source should be in lookup CONTENT_SOURCE_TYPE. ' ||
18603: 'x_return_status = ' || x_return_status, l_debug_prefix);
18604: END IF;
18605: */
18604: END IF;
18605: */
18606: /*
18607: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
18608: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
18609: p_message=>'actual_content_source should be in lookup CONTENT_SOURCE_TYPE. ' ||
18610: 'x_return_status = ' || x_return_status,
18611: p_msg_level=>fnd_log.level_statement);
18612: END IF;
18623: x_return_status => x_return_status );
18624:
18625: -- Debug info.
18626: /*IF g_debug THEN
18627: hz_utility_v2pub.debug ('validate_credit_rating (-)');
18628: END IF;
18629: */
18630: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
18631: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_credit_rating (-)',
18627: hz_utility_v2pub.debug ('validate_credit_rating (-)');
18628: END IF;
18629: */
18630: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
18631: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_credit_rating (-)',
18632: p_msg_level=>fnd_log.level_procedure);
18633: END IF;
18634:
18635: --disable_debug;
18661:
18662: BEGIN
18663:
18664: -- skip mandatory and non-updateable check from logical API
18665: IF HZ_UTILITY_V2PUB.G_CALLING_API IS NULL THEN
18666: -- created_by_module is mandatory field
18667: -- Since created_by_module is non-updateable, we only need to check mandatory
18668: -- during creation.
18669:
18674: p_column_value => p_created_by_module,
18675: x_return_status => x_return_status);
18676:
18677: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
18678: hz_utility_v2pub.debug(
18679: p_prefix => '',
18680: p_message => l_column || ' is mandatory. ' ||
18681: 'x_return_status = ' || x_return_status,
18682: p_msg_level => fnd_log.level_statement);
18696: p_restricted => 'N',
18697: x_return_status => x_return_status);
18698:
18699: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
18700: hz_utility_v2pub.debug(
18701: p_prefix => '',
18702: p_message => l_column || ' is non-updateable. It can be updated from NULL to a value. ' ||
18703: 'x_return_status = ' || x_return_status,
18704: p_msg_level => fnd_log.level_statement);
18720: p_column_value => p_created_by_module,
18721: x_return_status => x_return_status);
18722:
18723: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
18724: hz_utility_v2pub.debug(
18725: p_prefix => '',
18726: p_message => l_column || ' is lookup code in lookup type HZ_CREATED_BY_MODULES. ' ||
18727: 'x_return_status = ' || x_return_status,
18728: p_msg_level => fnd_log.level_statement);
18729: END IF;
18730: END IF;
18731:
18732: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
18733: hz_utility_v2pub.debug(
18734: p_prefix => '',
18735: p_message => 'after validate ' || l_column || ' ... ' ||
18736: 'x_return_status = ' || x_return_status,
18737: p_msg_level => fnd_log.level_statement);
18764:
18765: BEGIN
18766:
18767: -- skip non-updateable check from logical API
18768: IF HZ_UTILITY_V2PUB.G_CALLING_API IS NULL THEN
18769: -- application_id is non-updateable field. But it can be updated from NULL
18770: -- to some value.
18771:
18772: IF p_create_update_flag = 'U' AND
18779: p_restricted => 'N',
18780: x_return_status => x_return_status);
18781:
18782: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
18783: hz_utility_v2pub.debug(
18784: p_prefix => '',
18785: p_message => l_column || ' is non-updateable. It can be updated from NULL to a value. ' ||
18786: 'x_return_status = ' || x_return_status,
18787: p_msg_level => fnd_log.level_statement);
18789: END IF;
18790: END IF;
18791:
18792: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
18793: hz_utility_v2pub.debug(
18794: p_prefix => '',
18795: p_message => 'after validate ' || l_column || ' ... ' ||
18796: 'x_return_status = ' || x_return_status,
18797: p_msg_level => fnd_log.level_statement);