377: l_debug_prefix VARCHAR2(30) := '';
378: BEGIN
379: -- Debug info.
380:
381: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
382: hz_utility_v2pub.debug(p_message=>'party exists (+)',
383: p_prefix=>l_debug_prefix,
384: p_msg_level=>fnd_log.level_procedure);
385: END IF;
380:
381: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
382: hz_utility_v2pub.debug(p_message=>'party exists (+)',
383: p_prefix=>l_debug_prefix,
384: p_msg_level=>fnd_log.level_procedure);
385: END IF;
386:
387:
388:
394: END IF;
395: CLOSE c_party_exists;
396:
397: -- Debug info.
398: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
399: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
400: p_message=>'party exists (-)',
401: p_msg_level=>fnd_log.level_procedure);
402: END IF;
397: -- Debug info.
398: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
399: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
400: p_message=>'party exists (-)',
401: p_msg_level=>fnd_log.level_procedure);
402: END IF;
403:
404:
405: IF l_party_type IS NULL THEN
456: /*IF g_debug THEN
457: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_person_name (+)');
458: END IF;
459: */
460: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
461: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_person_name (+)',
462: p_msg_level=>fnd_log.level_procedure);
463: END IF;
464:
458: END IF;
459: */
460: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
461: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_person_name (+)',
462: p_msg_level=>fnd_log.level_procedure);
463: END IF;
464:
465: --
466: -- Check "backwards compatability" profile option and determine
577: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'l_person_name = '||l_person_name);
578: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_person_name (-)');
579: END IF;
580: */
581: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
582: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_person_name (-)',
583: p_msg_level=>fnd_log.level_procedure);
584: END IF;
585: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
579: END IF;
580: */
581: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
582: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_person_name (-)',
583: p_msg_level=>fnd_log.level_procedure);
584: END IF;
585: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
586: hz_utility_v2pub.debug(p_message=>'l_person_name = '||l_person_name,
587: p_prefix =>l_debug_prefix,
581: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
582: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_person_name (-)',
583: p_msg_level=>fnd_log.level_procedure);
584: END IF;
585: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
586: hz_utility_v2pub.debug(p_message=>'l_person_name = '||l_person_name,
587: p_prefix =>l_debug_prefix,
588: p_msg_level=>fnd_log.level_statement);
589: END IF;
584: END IF;
585: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
586: hz_utility_v2pub.debug(p_message=>'l_person_name = '||l_person_name,
587: p_prefix =>l_debug_prefix,
588: p_msg_level=>fnd_log.level_statement);
589: END IF;
590:
591: RETURN(SUBSTRB(l_person_name, 1, 450));
592:
625: /*IF g_debug THEN
626: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_party_name (+)');
627: END IF;
628: */
629: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
630: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_party_name (+)',
631: p_msg_level=>fnd_log.level_procedure);
632: END IF;
633:
627: END IF;
628: */
629: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
630: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_party_name (+)',
631: p_msg_level=>fnd_log.level_procedure);
632: END IF;
633:
634: IF p_person_first_name IS NOT NULL AND
635: p_person_first_name <> FND_API.G_MISS_CHAR
651: /*IF g_debug THEN
652: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'l_party_name = '||l_party_name);
653: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_party_name (-)');
654: END IF;*/
655: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
656: hz_utility_v2pub.debug(p_message=>'l_party_name = '||l_party_name,
657: p_prefix =>l_debug_prefix,
658: p_msg_level=>fnd_log.level_statement);
659: END IF;
654: END IF;*/
655: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
656: hz_utility_v2pub.debug(p_message=>'l_party_name = '||l_party_name,
657: p_prefix =>l_debug_prefix,
658: p_msg_level=>fnd_log.level_statement);
659: END IF;
660: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
661: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_party_name (-)',
662: p_msg_level=>fnd_log.level_procedure);
656: hz_utility_v2pub.debug(p_message=>'l_party_name = '||l_party_name,
657: p_prefix =>l_debug_prefix,
658: p_msg_level=>fnd_log.level_statement);
659: END IF;
660: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
661: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_party_name (-)',
662: p_msg_level=>fnd_log.level_procedure);
663: END IF;
664:
658: p_msg_level=>fnd_log.level_statement);
659: END IF;
660: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
661: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_party_name (-)',
662: p_msg_level=>fnd_log.level_procedure);
663: END IF;
664:
665:
666: RETURN l_party_name;
731: /*IF g_debug THEN
732: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_update_party_rel_name (+)');
733: END IF;
734: */
735: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
736: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_update_party_rel_name (+)',
737: p_msg_level=>fnd_log.level_procedure);
738: END IF;
739:
733: END IF;
734: */
735: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
736: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_update_party_rel_name (+)',
737: p_msg_level=>fnd_log.level_procedure);
738: END IF;
739:
740:
741: OPEN c_party_rels;
778: END LOOP;
779:
780: -- Debug info.
781:
782: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
783: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_update_party_rel_name (-)',
784: p_msg_level=>fnd_log.level_procedure);
785: END IF;
786:
780: -- Debug info.
781:
782: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
783: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_update_party_rel_name (-)',
784: p_msg_level=>fnd_log.level_procedure);
785: END IF;
786:
787: END do_update_party_rel_name;
788:
836: /*IF g_debug THEN
837: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'party profile exists (+)');
838: END IF;
839: */
840: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
841: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party profile exists (+)',
842: p_msg_level=>fnd_log.level_procedure);
843: END IF;
844:
838: END IF;
839: */
840: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
841: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party profile exists (+)',
842: p_msg_level=>fnd_log.level_procedure);
843: END IF;
844:
845: IF p_party_type = 'PERSON' THEN
846:
868: /*IF g_debug THEN
869: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'party profile exists (-)');
870: END IF;
871: */
872: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
873: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party profile exists (-)',
874: p_msg_level=>fnd_log.level_procedure);
875: END IF;
876:
870: END IF;
871: */
872: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
873: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party profile exists (-)',
874: p_msg_level=>fnd_log.level_procedure);
875: END IF;
876:
877: RETURN l_dummy;
878:
910: /*IF g_debug THEN
911: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'reset_sst_to_userentered (+)');
912: END IF;
913: */
914: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
915: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'reset_sst_to_userentered (+)',
916: p_msg_level=>fnd_log.level_procedure);
917: END IF;
918:
912: END IF;
913: */
914: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
915: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'reset_sst_to_userentered (+)',
916: p_msg_level=>fnd_log.level_procedure);
917: END IF;
918:
919: IF p_party_type = 'PERSON' THEN
920:
951: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'reset_sst_to_userentered (-)');
952: END IF;
953: */
954: /*
955: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
956: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'reset_sst_to_userentered (-)',
957: p_msg_level=>fnd_log.level_procedure);
958: END IF;
959: */
953: */
954: /*
955: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
956: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'reset_sst_to_userentered (-)',
957: p_msg_level=>fnd_log.level_procedure);
958: END IF;
959: */
960: IF SQL%NOTFOUND THEN
961: RETURN 'N';
1022: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_process_classification (+)');
1023: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'party_id = '||p_organization_rec.party_rec.party_id);
1024: END IF;
1025: */
1026: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1027: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_process_classification (+)',
1028: p_msg_level=>fnd_log.level_procedure);
1029: END IF;
1030: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1024: END IF;
1025: */
1026: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1027: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_process_classification (+)',
1028: p_msg_level=>fnd_log.level_procedure);
1029: END IF;
1030: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1031: hz_utility_v2pub.debug(p_message=>'party_id = '||p_organization_rec.party_rec.party_id,
1032: p_prefix =>l_debug_prefix,
1026: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1027: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_process_classification (+)',
1028: p_msg_level=>fnd_log.level_procedure);
1029: END IF;
1030: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1031: hz_utility_v2pub.debug(p_message=>'party_id = '||p_organization_rec.party_rec.party_id,
1032: p_prefix =>l_debug_prefix,
1033: p_msg_level=>fnd_log.level_statement);
1034: END IF;
1029: END IF;
1030: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1031: hz_utility_v2pub.debug(p_message=>'party_id = '||p_organization_rec.party_rec.party_id,
1032: p_prefix =>l_debug_prefix,
1033: p_msg_level=>fnd_log.level_statement);
1034: END IF;
1035:
1036: IF p_data_source_type = G_SST_SOURCE_TYPE THEN
1037: l_data_source_type := G_MISS_CONTENT_SOURCE_TYPE;
1245: /*IF g_debug THEN
1246: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_process_classification (-)');
1247: END IF;
1248: */
1249: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1250: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_process_classification (-)',
1251: p_msg_level=>fnd_log.level_procedure);
1252: END IF;
1253:
1247: END IF;
1248: */
1249: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1250: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_process_classification (-)',
1251: p_msg_level=>fnd_log.level_procedure);
1252: END IF;
1253:
1254: END do_process_classification;
1255:
1298: /*IF g_debug THEN
1299: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_person_profile (+)');
1300: END IF;
1301: */
1302: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1303: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_person_profile (+)',
1304: p_msg_level=>fnd_log.level_procedure);
1305: END IF;
1306:
1300: END IF;
1301: */
1302: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1303: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_person_profile (+)',
1304: p_msg_level=>fnd_log.level_procedure);
1305: END IF;
1306:
1307: -- Debug info.
1308: /*IF g_debug THEN
1310: 'hz_person_profiles_pkg.Insert_Row (+)', l_debug_prefix);
1311: END IF;
1312: */
1313:
1314: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1315: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_person_profiles_pkg.Insert_Row (+)',
1316: p_msg_level=>fnd_log.level_procedure);
1317: END IF;
1318:
1312: */
1313:
1314: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1315: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_person_profiles_pkg.Insert_Row (+)',
1316: p_msg_level=>fnd_log.level_procedure);
1317: END IF;
1318:
1319: -- call table-handler.
1320: HZ_person_profiles_pkg.Insert_Row (
1400: 'x_profile_id = ' || x_profile_id, l_debug_prefix);
1401: END IF;
1402: */
1403:
1404: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1405: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_person_profiles_pkg.Insert_Row (-) '||'x_profile_id = ' || x_profile_id,
1406: p_msg_level=>fnd_log.level_procedure);
1407: END IF;
1408:
1402: */
1403:
1404: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1405: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_person_profiles_pkg.Insert_Row (-) '||'x_profile_id = ' || x_profile_id,
1406: p_msg_level=>fnd_log.level_procedure);
1407: END IF;
1408:
1409: -- Debug info.
1410: /*IF g_debug THEN
1410: /*IF g_debug THEN
1411: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_person_profile (-)');
1412: END IF;*/
1413:
1414: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1415: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_person_profile (-)',
1416: p_msg_level=>fnd_log.level_procedure);
1417: END IF;
1418:
1412: END IF;*/
1413:
1414: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1415: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_person_profile (-)',
1416: p_msg_level=>fnd_log.level_procedure);
1417: END IF;
1418:
1419: END do_create_person_profile;
1420:
1477: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_update_person_profile (+)');
1478: END IF;
1479: */
1480:
1481: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1482: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_update_person_profile (+)',
1483: p_msg_level=>fnd_log.level_procedure);
1484: END IF;
1485:
1479: */
1480:
1481: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1482: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_update_person_profile (+)',
1483: p_msg_level=>fnd_log.level_procedure);
1484: END IF;
1485:
1486: OPEN c_person;
1487: FETCH c_person INTO
1618: hz_utility_v2pub.debug (
1619: 'hz_person_profiles_pkg.Update_Row (+) ',l_debug_prefix);
1620: END IF;
1621: */
1622: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1623: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_person_profiles_pkg.Update_Row (+)',
1624: p_msg_level=>fnd_log.level_procedure);
1625: END IF;
1626: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1620: END IF;
1621: */
1622: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1623: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_person_profiles_pkg.Update_Row (+)',
1624: p_msg_level=>fnd_log.level_procedure);
1625: END IF;
1626: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1627: hz_utility_v2pub.debug(p_message=>'profile_id = '||x_profile_id,
1628: p_prefix =>l_debug_prefix,
1622: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1623: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_person_profiles_pkg.Update_Row (+)',
1624: p_msg_level=>fnd_log.level_procedure);
1625: END IF;
1626: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1627: hz_utility_v2pub.debug(p_message=>'profile_id = '||x_profile_id,
1628: p_prefix =>l_debug_prefix,
1629: p_msg_level=>fnd_log.level_statement);
1630: END IF;
1625: END IF;
1626: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1627: hz_utility_v2pub.debug(p_message=>'profile_id = '||x_profile_id,
1628: p_prefix =>l_debug_prefix,
1629: p_msg_level=>fnd_log.level_statement);
1630: END IF;
1631:
1632: -- call table-handler.
1633: HZ_person_profiles_pkg.Update_Row (
1709: 'hz_person_profiles_pkg.Update_Row (-) ',
1710: l_debug_prefix);
1711: END IF;
1712: */
1713: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1714: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_person_profiles_pkg.Update_Row (-)',
1715: p_msg_level=>fnd_log.level_procedure);
1716:
1717: END IF;
1711: END IF;
1712: */
1713: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1714: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_person_profiles_pkg.Update_Row (-)',
1715: p_msg_level=>fnd_log.level_procedure);
1716:
1717: END IF;
1718:
1719: -- Debug info.
1720: /*IF g_debug THEN
1721: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_update_person_profile (-)');
1722: END IF;
1723: */
1724: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1725: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_update_person_profile (-)',
1726: p_msg_level=>fnd_log.level_procedure);
1727: END IF;
1728:
1722: END IF;
1723: */
1724: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1725: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_update_person_profile (-)',
1726: p_msg_level=>fnd_log.level_procedure);
1727: END IF;
1728:
1729: EXCEPTION
1730: WHEN g_resource_busy THEN
1782: /*IF g_debug THEN
1783: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_org_profile (+)');
1784: END IF;
1785: */
1786: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1787: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_org_profile (+)',
1788: p_msg_level=>fnd_log.level_procedure);
1789: END IF;
1790:
1784: END IF;
1785: */
1786: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1787: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_org_profile (+)',
1788: p_msg_level=>fnd_log.level_procedure);
1789: END IF;
1790:
1791: -- Debug info.
1792: /*IF g_debug THEN
1806: g_bank_code := NULL;
1807: g_branch_code := NULL;
1808: g_bank_or_branch_number := NULL;
1809:
1810: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1811: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'Bank related variables are assigned to local variables'
1812: ||' and used in Creating new profile.',
1813: p_msg_level=>fnd_log.level_procedure);
1814: END IF;
1809:
1810: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1811: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'Bank related variables are assigned to local variables'
1812: ||' and used in Creating new profile.',
1813: p_msg_level=>fnd_log.level_procedure);
1814: END IF;
1815:
1816: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1817: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_bank_or_branch_number : '||l_bank_or_branch_number
1812: ||' and used in Creating new profile.',
1813: p_msg_level=>fnd_log.level_procedure);
1814: END IF;
1815:
1816: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1817: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_bank_or_branch_number : '||l_bank_or_branch_number
1818: ||' l_bank_code : '||l_bank_code
1819: ||' l_branch_code : '||l_branch_code
1820: ||' p_party_id : '||p_party_id,
1817: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_bank_or_branch_number : '||l_bank_or_branch_number
1818: ||' l_bank_code : '||l_bank_code
1819: ||' l_branch_code : '||l_branch_code
1820: ||' p_party_id : '||p_party_id,
1821: p_msg_level=>fnd_log.level_procedure);
1822: END IF;
1823:
1824:
1825: END IF;
1825: END IF;
1826:
1827:
1828:
1829: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1830: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_organization_profiles_pkg.Insert_Row (+)',
1831: p_msg_level=>fnd_log.level_procedure);
1832: END IF;
1833:
1827:
1828:
1829: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1830: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_organization_profiles_pkg.Insert_Row (+)',
1831: p_msg_level=>fnd_log.level_procedure);
1832: END IF;
1833:
1834: -- call table-handler.
1835: HZ_organization_profiles_pkg.insert_row(
1993: hz_utility_v2pub.debug ('hz_organization_profiles_pkg.Insert_Row (-) ',
1994: l_debug_prefix);
1995: END IF;
1996: */
1997: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1998: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_organization_profiles_pkg.Insert_Row (-) ',
1999: p_msg_level=>fnd_log.level_procedure);
2000: END IF;
2001:
1995: END IF;
1996: */
1997: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1998: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_organization_profiles_pkg.Insert_Row (-) ',
1999: p_msg_level=>fnd_log.level_procedure);
2000: END IF;
2001:
2002: -- Debug info.
2003: /*IF g_debug THEN
2003: /*IF g_debug THEN
2004: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_org_profile (-)');
2005: END IF;
2006: */
2007: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2008: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_org_profile (-)',
2009: p_msg_level=>fnd_log.level_procedure);
2010: END IF;
2011:
2005: END IF;
2006: */
2007: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2008: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_org_profile (-)',
2009: p_msg_level=>fnd_log.level_procedure);
2010: END IF;
2011:
2012: END do_create_org_profile;
2013:
2073: /*IF g_debug THEN
2074: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_update_org_profile (+)');
2075: END IF;
2076: */
2077: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2078: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_update_org_profile (+)',
2079: p_msg_level=>fnd_log.level_procedure);
2080: END IF;
2081:
2075: END IF;
2076: */
2077: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2078: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_update_org_profile (+)',
2079: p_msg_level=>fnd_log.level_procedure);
2080: END IF;
2081:
2082: OPEN c_org;
2083: FETCH c_org INTO
2196: hz_utility_v2pub.debug ('hz_organization_profiles_pkg.Update_Row (+) ',
2197: l_debug_prefix);
2198: END IF;
2199: */
2200: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2201: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_organization_profiles_pkg.Update_Row (+) ',
2202: p_msg_level=>fnd_log.level_procedure);
2203: END IF;
2204: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2198: END IF;
2199: */
2200: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2201: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_organization_profiles_pkg.Update_Row (+) ',
2202: p_msg_level=>fnd_log.level_procedure);
2203: END IF;
2204: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2205: hz_utility_v2pub.debug(p_message=>'profile_id = '||x_profile_id,
2206: p_prefix =>l_debug_prefix,
2200: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2201: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_organization_profiles_pkg.Update_Row (+) ',
2202: p_msg_level=>fnd_log.level_procedure);
2203: END IF;
2204: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2205: hz_utility_v2pub.debug(p_message=>'profile_id = '||x_profile_id,
2206: p_prefix =>l_debug_prefix,
2207: p_msg_level=>fnd_log.level_statement);
2208: END IF;
2203: END IF;
2204: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2205: hz_utility_v2pub.debug(p_message=>'profile_id = '||x_profile_id,
2206: p_prefix =>l_debug_prefix,
2207: p_msg_level=>fnd_log.level_statement);
2208: END IF;
2209:
2210: -- call table-handler.
2211: HZ_organization_profiles_pkg.update_row (
2362: hz_utility_v2pub.debug ('hz_organization_profiles_pkg.Update_Row (-) ',
2363: l_debug_prefix);
2364: END IF;
2365: */
2366: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2367: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_organization_profiles_pkg.Update_Row (-) ',
2368: p_msg_level=>fnd_log.level_procedure);
2369: END IF;
2370:
2364: END IF;
2365: */
2366: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2367: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_organization_profiles_pkg.Update_Row (-) ',
2368: p_msg_level=>fnd_log.level_procedure);
2369: END IF;
2370:
2371: -- Debug info.
2372: /*IF g_debug THEN
2372: /*IF g_debug THEN
2373: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_update_org_profile (-)');
2374: END IF;
2375: */
2376: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2377: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_update_org_profile (-)',
2378: p_msg_level=>fnd_log.level_procedure);
2379: END IF;
2380:
2374: END IF;
2375: */
2376: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2377: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_update_org_profile (-)',
2378: p_msg_level=>fnd_log.level_procedure);
2379: END IF;
2380:
2381: EXCEPTION
2382: WHEN g_resource_busy THEN
2457: /*IF g_debug THEN
2458: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_party_profile (+)');
2459: END IF;
2460: */
2461: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2462: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_party_profile (+)',
2463: p_msg_level=>fnd_log.level_procedure);
2464: END IF;
2465:
2459: END IF;
2460: */
2461: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2462: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_party_profile (+)',
2463: p_msg_level=>fnd_log.level_procedure);
2464: END IF;
2465:
2466: IF p_party_type = 'PERSON' THEN
2467: p_person_rec.content_source_type := p_content_source_type;
2515: l_orig_sys_reference_rec.owner_table_id := p_party_id;
2516: l_orig_sys_reference_rec.created_by_module := nvl(l_created_by_module, 'TCA_V2_API');
2517: l_orig_sys_reference_rec.dqm_sync_mode := p_party_create_update_flag;
2518:
2519: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2520: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'DQM Sync Mode '||l_orig_sys_reference_rec.dqm_sync_mode,
2521: p_msg_level=>fnd_log.level_statement);
2522: END IF;
2523: hz_orig_system_ref_pub.create_orig_system_reference(
2517: l_orig_sys_reference_rec.dqm_sync_mode := p_party_create_update_flag;
2518:
2519: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2520: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'DQM Sync Mode '||l_orig_sys_reference_rec.dqm_sync_mode,
2521: p_msg_level=>fnd_log.level_statement);
2522: END IF;
2523: hz_orig_system_ref_pub.create_orig_system_reference(
2524: FND_API.G_FALSE,
2525: l_orig_sys_reference_rec,
2537: /*IF g_debug THEN
2538: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_party_profile (-)');
2539: END IF;
2540: */
2541: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2542: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_party_profile (-)',
2543: p_msg_level=>fnd_log.level_procedure);
2544: END IF;
2545:
2539: END IF;
2540: */
2541: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2542: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_party_profile (-)',
2543: p_msg_level=>fnd_log.level_procedure);
2544: END IF;
2545:
2546: END do_create_party_profile;
2547:
2587: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_update_party_profile (+)');
2588: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'party_type = '||p_party_type);
2589: END IF;
2590: */
2591: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2592: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_update_party_profile (+)',
2593: p_msg_level=>fnd_log.level_procedure);
2594:
2595: END IF;
2589: END IF;
2590: */
2591: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2592: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_update_party_profile (+)',
2593: p_msg_level=>fnd_log.level_procedure);
2594:
2595: END IF;
2596: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2597: hz_utility_v2pub.debug(p_message=>'party_type = '||p_party_type,
2592: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_update_party_profile (+)',
2593: p_msg_level=>fnd_log.level_procedure);
2594:
2595: END IF;
2596: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2597: hz_utility_v2pub.debug(p_message=>'party_type = '||p_party_type,
2598: p_prefix =>l_debug_prefix,
2599: p_msg_level=>fnd_log.level_statement);
2600: END IF;
2595: END IF;
2596: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2597: hz_utility_v2pub.debug(p_message=>'party_type = '||p_party_type,
2598: p_prefix =>l_debug_prefix,
2599: p_msg_level=>fnd_log.level_statement);
2600: END IF;
2601:
2602: IF p_party_type = 'PERSON' THEN
2603: do_update_person_profile (
2619: /*IF g_debug THEN
2620: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_update_party_profile (-)');
2621: END IF;
2622: */
2623: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2624: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_update_party_profile (-)',
2625: p_msg_level=>fnd_log.level_procedure);
2626: END IF;
2627:
2621: END IF;
2622: */
2623: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2624: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_update_party_profile (-)',
2625: p_msg_level=>fnd_log.level_procedure);
2626: END IF;
2627:
2628: END do_update_party_profile;
2629:
2669: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_get_party_profile (+)');
2670: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'party_type = '||p_party_type);
2671: END IF;
2672: */
2673: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2674: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_get_party_profile (+)',
2675: p_msg_level=>fnd_log.level_procedure);
2676: END IF;
2677: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2671: END IF;
2672: */
2673: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2674: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_get_party_profile (+)',
2675: p_msg_level=>fnd_log.level_procedure);
2676: END IF;
2677: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2678: hz_utility_v2pub.debug(p_message=>'party_type = '||p_party_type,
2679: p_prefix =>l_debug_prefix,
2673: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2674: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_get_party_profile (+)',
2675: p_msg_level=>fnd_log.level_procedure);
2676: END IF;
2677: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2678: hz_utility_v2pub.debug(p_message=>'party_type = '||p_party_type,
2679: p_prefix =>l_debug_prefix,
2680: p_msg_level=>fnd_log.level_statement);
2681: END IF;
2676: END IF;
2677: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2678: hz_utility_v2pub.debug(p_message=>'party_type = '||p_party_type,
2679: p_prefix =>l_debug_prefix,
2680: p_msg_level=>fnd_log.level_statement);
2681: END IF;
2682:
2683: IF p_party_type = 'PERSON' THEN
2684: get_person_rec (
2708: /*IF g_debug THEN
2709: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_get_party_profile (-)');
2710: END IF;
2711: */
2712: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2713: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_get_party_profile (-)',
2714: p_msg_level=>fnd_log.level_procedure);
2715: END IF;
2716:
2710: END IF;
2711: */
2712: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2713: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_get_party_profile (-)',
2714: p_msg_level=>fnd_log.level_procedure);
2715: END IF;
2716:
2717: END do_get_party_profile;
2718:
2810: /*IF g_debug THEN
2811: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_update_party_only (+)');
2812: END IF;
2813: */
2814: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2815: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_update_party_only (+)',
2816: p_msg_level=>fnd_log.level_procedure);
2817: END IF;
2818:
2812: END IF;
2813: */
2814: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2815: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_update_party_only (+)',
2816: p_msg_level=>fnd_log.level_procedure);
2817: END IF;
2818:
2819: IF p_party_type = 'PERSON' THEN
2820: l_old_party_rec := p_old_person_rec.party_rec;
3061: /*IF g_debug THEN
3062: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'Generated person key : '||l_customer_key);
3063: END IF;*/
3064:
3065: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3066: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'Generated person key : '||l_customer_key,
3067: p_msg_level=>fnd_log.level_statement);
3068: END IF;
3069:
3063: END IF;*/
3064:
3065: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3066: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'Generated person key : '||l_customer_key,
3067: p_msg_level=>fnd_log.level_statement);
3068: END IF;
3069:
3070: ELSIF p_party_type = 'ORGANIZATION' THEN
3071:
3108: /*IF g_debug THEN
3109: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'Generated organization key : '||l_customer_key);
3110: END IF;
3111: */
3112: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3113: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'Generated organization key : '||l_customer_key,
3114: p_msg_level=>fnd_log.level_statement);
3115: END IF;
3116:
3110: END IF;
3111: */
3112: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3113: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'Generated organization key : '||l_customer_key,
3114: p_msg_level=>fnd_log.level_statement);
3115: END IF;
3116:
3117: ELSIF p_party_type = 'GROUP' THEN
3118:
3137: /*IF g_debug THEN
3138: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'Generated group key : '||l_customer_key);
3139: END IF;
3140: */
3141: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3142: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'Generated group key : '||l_customer_key,
3143: p_msg_level=>fnd_log.level_statement);
3144: END IF;
3145:
3139: END IF;
3140: */
3141: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3142: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'Generated group key : '||l_customer_key,
3143: p_msg_level=>fnd_log.level_statement);
3144: END IF;
3145:
3146: END IF;
3147:
3163: hz_utility_v2pub.debug (
3164: 'hz_parties_pkg.Insert_Row (+)',l_debug_prefix);
3165: END IF;
3166: */
3167: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3168: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_parties_pkg.Insert_Row (+)',
3169: p_msg_level=>fnd_log.level_procedure);
3170: END IF;
3171:
3165: END IF;
3166: */
3167: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3168: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_parties_pkg.Insert_Row (+)',
3169: p_msg_level=>fnd_log.level_procedure);
3170: END IF;
3171:
3172: -- this is for handling orig_system_reference defaulting
3173: IF l_party_rec.party_id = FND_API.G_MISS_NUM THEN
3267: hz_utility_v2pub.debug (
3268: 'hz_parties_pkg.Insert_Row (-)', l_debug_prefix);
3269: END IF;
3270: */
3271: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3272: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_parties_pkg.Insert_Row (-)',
3273: p_msg_level=>fnd_log.level_procedure);
3274: END IF;
3275:
3269: END IF;
3270: */
3271: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3272: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_parties_pkg.Insert_Row (-)',
3273: p_msg_level=>fnd_log.level_procedure);
3274: END IF;
3275:
3276: if l_party_rec.orig_system is not null
3277: and l_party_rec.orig_system <>fnd_api.g_miss_char
3361: hz_utility_v2pub.debug (
3362: 'hz_parties_pkg.Update_Row (+)',l_debug_prefix);
3363: END IF;
3364: */
3365: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3366: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_parties_pkg.Update_Row (+)',
3367: p_msg_level=>fnd_log.level_procedure);
3368: END IF;
3369:
3363: END IF;
3364: */
3365: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3366: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_parties_pkg.Update_Row (+)',
3367: p_msg_level=>fnd_log.level_procedure);
3368: END IF;
3369:
3370: if (l_party_rec.orig_system is not null
3371: and l_party_rec.orig_system <>fnd_api.g_miss_char)
3480: hz_utility_v2pub.debug (
3481: 'hz_parties_pkg.Update_Row (-)',l_debug_prefix);
3482: END IF;
3483: */
3484: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3485: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_parties_pkg.Update_Row (-)',
3486: p_msg_level=>fnd_log.level_procedure);
3487: END IF;
3488:
3482: END IF;
3483: */
3484: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3485: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_parties_pkg.Update_Row (-)',
3486: p_msg_level=>fnd_log.level_procedure);
3487: END IF;
3488:
3489: -- Bug 4490715 : If party is PERSON / ORGANIZATION call eTax
3490: -- procedure to populate ZX_PARTY_TAX_PROFILE
3603: /*IF g_debug THEN
3604: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_update_party_only (-)');
3605: END IF;
3606: */
3607: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3608: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_update_party_only (-)',
3609: p_msg_level=>fnd_log.level_procedure);
3610: END IF;
3611:
3605: END IF;
3606: */
3607: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3608: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_update_party_only (-)',
3609: p_msg_level=>fnd_log.level_procedure);
3610: END IF;
3611:
3612:
3613: EXCEPTION
3707: /*IF g_debug THEN
3708: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_party (+)');
3709: END IF;
3710: */
3711: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3712: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_party (+)',
3713: p_msg_level=>fnd_log.level_procedure);
3714: END IF;
3715:
3709: END IF;
3710: */
3711: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3712: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_party (+)',
3713: p_msg_level=>fnd_log.level_procedure);
3714: END IF;
3715:
3716: -- assign party record and find the data source.
3717:
3849: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'l_mixnmatch_enabled = '||l_mixnmatch_enabled);
3850: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'l_selected_datasources = '||l_selected_datasources);
3851: END IF;
3852: */
3853: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3854: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_mixnmatch_enabled = '||l_mixnmatch_enabled,
3855: p_msg_level=>fnd_log.level_statement);
3856: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_selected_datasources = '||l_selected_datasources,
3857: p_msg_level=>fnd_log.level_statement);
3851: END IF;
3852: */
3853: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3854: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_mixnmatch_enabled = '||l_mixnmatch_enabled,
3855: p_msg_level=>fnd_log.level_statement);
3856: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_selected_datasources = '||l_selected_datasources,
3857: p_msg_level=>fnd_log.level_statement);
3858: END IF;
3859:
3853: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3854: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_mixnmatch_enabled = '||l_mixnmatch_enabled,
3855: p_msg_level=>fnd_log.level_statement);
3856: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_selected_datasources = '||l_selected_datasources,
3857: p_msg_level=>fnd_log.level_statement);
3858: END IF;
3859:
3860: -- If data source is SST or user-entered, we need to check if the party exist.
3861: -- If party exists, error out. Otherwise, create the SST profile and new party.
3927: /*IF g_debug THEN
3928: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'l_datasource_selected = '||l_datasource_selected);
3929: END IF;
3930: */
3931: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3932: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_datasource_selected = '||l_datasource_selected,
3933: p_msg_level=>fnd_log.level_statement);
3934: END IF;
3935:
3929: END IF;
3930: */
3931: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3932: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_datasource_selected = '||l_datasource_selected,
3933: p_msg_level=>fnd_log.level_statement);
3934: END IF;
3935:
3936: -- Error out NOCOPY if the profile with this data source already exists.
3937:
4334: /*IF g_debug THEN
4335: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_party (-)');
4336: END IF;
4337: */
4338: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
4339: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_party (-)',
4340: p_msg_level=>fnd_log.level_procedure);
4341: END IF;
4342:
4336: END IF;
4337: */
4338: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
4339: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_party (-)',
4340: p_msg_level=>fnd_log.level_procedure);
4341: END IF;
4342:
4343: END do_create_party;
4344:
4438: /*IF g_debug THEN
4439: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_update_party (+)');
4440: END IF;
4441: */
4442: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
4443: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_update_party (+)',
4444: p_msg_level=>fnd_log.level_procedure);
4445: END IF;
4446:
4440: END IF;
4441: */
4442: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
4443: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_update_party (+)',
4444: p_msg_level=>fnd_log.level_procedure);
4445: END IF;
4446:
4447: -- assign party record and find the data source.
4448:
4585: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'l_mixnmatch_enabled = '||l_mixnmatch_enabled);
4586: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'l_data_source_type = '||l_data_source_type);
4587: END IF;
4588: */
4589: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4590: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_mixnmatch_enabled = '||l_mixnmatch_enabled,
4591: p_msg_level=>fnd_log.level_statement);
4592: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_data_source_type = '||l_data_source_type,
4593: p_msg_level=>fnd_log.level_statement);
4587: END IF;
4588: */
4589: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4590: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_mixnmatch_enabled = '||l_mixnmatch_enabled,
4591: p_msg_level=>fnd_log.level_statement);
4592: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_data_source_type = '||l_data_source_type,
4593: p_msg_level=>fnd_log.level_statement);
4594:
4595: END IF;
4589: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4590: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_mixnmatch_enabled = '||l_mixnmatch_enabled,
4591: p_msg_level=>fnd_log.level_statement);
4592: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_data_source_type = '||l_data_source_type,
4593: p_msg_level=>fnd_log.level_statement);
4594:
4595: END IF;
4596:
4597: -- if mix-n-match is not enabled or we are updating third party profile or
4654: /*IF g_debug THEN
4655: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'l_datasource_selected = '||l_datasource_selected);
4656: END IF;
4657: */
4658: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4659: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_datasource_selected = '||l_datasource_selected,
4660: p_msg_level=>fnd_log.level_statement);
4661: END IF;
4662:
4656: END IF;
4657: */
4658: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4659: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_datasource_selected = '||l_datasource_selected,
4660: p_msg_level=>fnd_log.level_statement);
4661: END IF;
4662:
4663: IF l_datasource_selected = 'Y' THEN
4664: l_update_sst_profile := 'Y';
4745: /*IF g_debug THEN
4746: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'l_party_id = '||l_party_id);
4747: END IF;
4748: */
4749: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4750: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_party_id = '||l_party_id,
4751: p_msg_level=>fnd_log.level_statement);
4752: END IF;
4753: ---------------Bug 4586451
4747: END IF;
4748: */
4749: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4750: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_party_id = '||l_party_id,
4751: p_msg_level=>fnd_log.level_statement);
4752: END IF;
4753: ---------------Bug 4586451
4754: IF p_party_type ='ORGANIZATION'AND
4755: p_organization_rec.organization_name <>FND_API.G_MISS_CHAR AND
4863: /*IF g_debug THEN
4864: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_update_party (-)');
4865: END IF;
4866: */
4867: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
4868: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_update_party (-)',
4869: p_msg_level=>fnd_log.level_procedure);
4870: END IF;
4871:
4865: END IF;
4866: */
4867: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
4868: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_update_party (-)',
4869: p_msg_level=>fnd_log.level_procedure);
4870: END IF;
4871:
4872:
4873: END do_update_party;
4945: /*IF g_debug THEN
4946: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_person (+)');
4947: END IF;
4948: */
4949: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
4950: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'create_person (+)',
4951: p_msg_level=>fnd_log.level_procedure);
4952: END IF;
4953:
4947: END IF;
4948: */
4949: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
4950: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'create_person (+)',
4951: p_msg_level=>fnd_log.level_procedure);
4952: END IF;
4953:
4954:
4955: -- initialize message list if p_init_msg_list is set to TRUE.
5036: x_msg_count, x_msg_data, 'WARNING');
5037: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_person (-)');
5038: END IF;
5039: */
5040: IF fnd_log.level_exception>=fnd_log.g_current_runtime_level THEN
5041: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5042: p_msg_data=>x_msg_data,
5043: p_msg_type=>'WARNING',
5044: p_msg_level=>fnd_log.level_exception);
5040: IF fnd_log.level_exception>=fnd_log.g_current_runtime_level THEN
5041: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5042: p_msg_data=>x_msg_data,
5043: p_msg_type=>'WARNING',
5044: p_msg_level=>fnd_log.level_exception);
5045: END IF;
5046: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5047: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'create_person (-)',
5048: p_msg_level=>fnd_log.level_procedure);
5042: p_msg_data=>x_msg_data,
5043: p_msg_type=>'WARNING',
5044: p_msg_level=>fnd_log.level_exception);
5045: END IF;
5046: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5047: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'create_person (-)',
5048: p_msg_level=>fnd_log.level_procedure);
5049: END IF;
5050:
5044: p_msg_level=>fnd_log.level_exception);
5045: END IF;
5046: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5047: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'create_person (-)',
5048: p_msg_level=>fnd_log.level_procedure);
5049: END IF;
5050:
5051: -- Check if API is called in debug mode. If yes, disable debug.
5052: --disable_debug;
5072: x_msg_count, x_msg_data, 'ERROR');
5073: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_person (-)');
5074: END IF;*/
5075:
5076: IF fnd_log.level_error >= fnd_log.g_current_runtime_level THEN
5077: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5078: p_msg_data=>x_msg_data,
5079: p_msg_type=>'ERROR',
5080: p_msg_level=>fnd_log.level_error);
5076: IF fnd_log.level_error >= fnd_log.g_current_runtime_level THEN
5077: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5078: p_msg_data=>x_msg_data,
5079: p_msg_type=>'ERROR',
5080: p_msg_level=>fnd_log.level_error);
5081: END IF;
5082: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
5083: hz_utility_v2pub.debug(p_message=>'create_person (-)',
5084: p_prefix=>l_debug_prefix,
5078: p_msg_data=>x_msg_data,
5079: p_msg_type=>'ERROR',
5080: p_msg_level=>fnd_log.level_error);
5081: END IF;
5082: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
5083: hz_utility_v2pub.debug(p_message=>'create_person (-)',
5084: p_prefix=>l_debug_prefix,
5085: p_msg_level=>fnd_log.level_procedure);
5086: END IF;
5081: END IF;
5082: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
5083: hz_utility_v2pub.debug(p_message=>'create_person (-)',
5084: p_prefix=>l_debug_prefix,
5085: p_msg_level=>fnd_log.level_procedure);
5086: END IF;
5087:
5088: -- Check if API is called in debug mode. If yes, disable debug.
5089: --disable_debug;
5108: x_msg_count, x_msg_data, 'UNEXPECTED ERROR');
5109: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_person (-)');
5110: END IF;
5111: */
5112: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
5113: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5114: p_msg_data=>x_msg_data,
5115: p_msg_type=>'UNEXPECTED ERROR',
5116: p_msg_level=>fnd_log.level_error);
5112: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
5113: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5114: p_msg_data=>x_msg_data,
5115: p_msg_type=>'UNEXPECTED ERROR',
5116: p_msg_level=>fnd_log.level_error);
5117: END IF;
5118: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5119: hz_utility_v2pub.debug(p_message=>'create_person (-)',
5120: p_prefix=>l_debug_prefix,
5114: p_msg_data=>x_msg_data,
5115: p_msg_type=>'UNEXPECTED ERROR',
5116: p_msg_level=>fnd_log.level_error);
5117: END IF;
5118: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5119: hz_utility_v2pub.debug(p_message=>'create_person (-)',
5120: p_prefix=>l_debug_prefix,
5121: p_msg_level=>fnd_log.level_procedure);
5122: END IF;
5117: END IF;
5118: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5119: hz_utility_v2pub.debug(p_message=>'create_person (-)',
5120: p_prefix=>l_debug_prefix,
5121: p_msg_level=>fnd_log.level_procedure);
5122: END IF;
5123:
5124: -- Check if API is called in debug mode. If yes, disable debug.
5125: --disable_debug;
5148: x_msg_count, x_msg_data, 'SQL ERROR');
5149: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_person (-)');
5150: END IF;
5151: */
5152: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
5153: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5154: p_msg_data=>x_msg_data,
5155: p_msg_type=>'SQL ERROR',
5156: p_msg_level=>fnd_log.level_error);
5152: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
5153: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5154: p_msg_data=>x_msg_data,
5155: p_msg_type=>'SQL ERROR',
5156: p_msg_level=>fnd_log.level_error);
5157: END IF;
5158: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5159: hz_utility_v2pub.debug(p_message=>'create_person (-)',
5160: p_prefix=>l_debug_prefix,
5154: p_msg_data=>x_msg_data,
5155: p_msg_type=>'SQL ERROR',
5156: p_msg_level=>fnd_log.level_error);
5157: END IF;
5158: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5159: hz_utility_v2pub.debug(p_message=>'create_person (-)',
5160: p_prefix=>l_debug_prefix,
5161: p_msg_level=>fnd_log.level_procedure);
5162: END IF;
5157: END IF;
5158: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5159: hz_utility_v2pub.debug(p_message=>'create_person (-)',
5160: p_prefix=>l_debug_prefix,
5161: p_msg_level=>fnd_log.level_procedure);
5162: END IF;
5163:
5164:
5165: -- Check if API is called in debug mode. If yes, disable debug.
5297: /*IF g_debug THEN
5298: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_person (+)');
5299: END IF;
5300: */
5301: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5302: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'update_person (+)',
5303: p_msg_level=>fnd_log.level_procedure);
5304: END IF;
5305:
5299: END IF;
5300: */
5301: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5302: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'update_person (+)',
5303: p_msg_level=>fnd_log.level_procedure);
5304: END IF;
5305:
5306: --Bug9735521 - When Actual Content Source is NULL then 'USER_ENTERED' is assigned.
5307: IF l_person_rec.actual_content_source IS NULL THEN
5305:
5306: --Bug9735521 - When Actual Content Source is NULL then 'USER_ENTERED' is assigned.
5307: IF l_person_rec.actual_content_source IS NULL THEN
5308: l_person_rec.actual_content_source := 'USER_ENTERED';
5309: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5310: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'Actual Content Source is NULL so USER_ENTERED is assigned.',
5311: p_msg_level=>fnd_log.level_procedure);
5312: END IF;
5313: END IF;
5307: IF l_person_rec.actual_content_source IS NULL THEN
5308: l_person_rec.actual_content_source := 'USER_ENTERED';
5309: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5310: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'Actual Content Source is NULL so USER_ENTERED is assigned.',
5311: p_msg_level=>fnd_log.level_procedure);
5312: END IF;
5313: END IF;
5314:
5315: -- initialize message list if p_init_msg_list is set to TRUE.
5452: x_msg_count, x_msg_data, 'WARNING');
5453: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_person (-)');
5454: END IF;
5455: */
5456: IF fnd_log.level_exception>=fnd_log.g_current_runtime_level THEN
5457: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5458: p_msg_data=>x_msg_data,
5459: p_msg_type=>'WARNING',
5460: p_msg_level=>fnd_log.level_exception);
5456: IF fnd_log.level_exception>=fnd_log.g_current_runtime_level THEN
5457: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5458: p_msg_data=>x_msg_data,
5459: p_msg_type=>'WARNING',
5460: p_msg_level=>fnd_log.level_exception);
5461: END IF;
5462: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5463: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'update_person (-)',
5464: p_msg_level=>fnd_log.level_procedure);
5458: p_msg_data=>x_msg_data,
5459: p_msg_type=>'WARNING',
5460: p_msg_level=>fnd_log.level_exception);
5461: END IF;
5462: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5463: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'update_person (-)',
5464: p_msg_level=>fnd_log.level_procedure);
5465: END IF;
5466:
5460: p_msg_level=>fnd_log.level_exception);
5461: END IF;
5462: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5463: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'update_person (-)',
5464: p_msg_level=>fnd_log.level_procedure);
5465: END IF;
5466:
5467:
5468: -- Check if API is called in debug mode. If yes, disable debug.
5489: x_msg_count, x_msg_data, 'ERROR');
5490: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_person (-)');
5491: END IF;
5492: */
5493: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
5494: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5495: p_msg_data=>x_msg_data,
5496: p_msg_type=>'ERROR',
5497: p_msg_level=>fnd_log.level_error);
5493: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
5494: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5495: p_msg_data=>x_msg_data,
5496: p_msg_type=>'ERROR',
5497: p_msg_level=>fnd_log.level_error);
5498: END IF;
5499: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5500: hz_utility_v2pub.debug(p_message=>'update_person (-)',
5501: p_prefix=>l_debug_prefix,
5495: p_msg_data=>x_msg_data,
5496: p_msg_type=>'ERROR',
5497: p_msg_level=>fnd_log.level_error);
5498: END IF;
5499: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5500: hz_utility_v2pub.debug(p_message=>'update_person (-)',
5501: p_prefix=>l_debug_prefix,
5502: p_msg_level=>fnd_log.level_procedure);
5503: END IF;
5498: END IF;
5499: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5500: hz_utility_v2pub.debug(p_message=>'update_person (-)',
5501: p_prefix=>l_debug_prefix,
5502: p_msg_level=>fnd_log.level_procedure);
5503: END IF;
5504:
5505:
5506: -- Check if API is called in debug mode. If yes, disable debug.
5526: x_msg_count, x_msg_data, 'UNEXPECTED ERROR');
5527: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_person (-)');
5528: END IF;
5529: */
5530: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
5531: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5532: p_msg_data=>x_msg_data,
5533: p_msg_type=>'UNEXPECTED ERROR',
5534: p_msg_level=>fnd_log.level_error);
5530: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
5531: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5532: p_msg_data=>x_msg_data,
5533: p_msg_type=>'UNEXPECTED ERROR',
5534: p_msg_level=>fnd_log.level_error);
5535: END IF;
5536: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5537: hz_utility_v2pub.debug(p_message=>'update_person (-)',
5538: p_prefix=>l_debug_prefix,
5532: p_msg_data=>x_msg_data,
5533: p_msg_type=>'UNEXPECTED ERROR',
5534: p_msg_level=>fnd_log.level_error);
5535: END IF;
5536: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5537: hz_utility_v2pub.debug(p_message=>'update_person (-)',
5538: p_prefix=>l_debug_prefix,
5539: p_msg_level=>fnd_log.level_procedure);
5540: END IF;
5535: END IF;
5536: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5537: hz_utility_v2pub.debug(p_message=>'update_person (-)',
5538: p_prefix=>l_debug_prefix,
5539: p_msg_level=>fnd_log.level_procedure);
5540: END IF;
5541: -- Check if API is called in debug mode. If yes, disable debug.
5542: --disable_debug;
5543:
5565: x_msg_count, x_msg_data, 'SQL ERROR');
5566: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_person (-)');
5567: END IF;
5568: */
5569: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
5570: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5571: p_msg_data=>x_msg_data,
5572: p_msg_type=>'SQL ERROR',
5573: p_msg_level=>fnd_log.level_error);
5569: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
5570: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5571: p_msg_data=>x_msg_data,
5572: p_msg_type=>'SQL ERROR',
5573: p_msg_level=>fnd_log.level_error);
5574: END IF;
5575: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5576: hz_utility_v2pub.debug(p_message=>'update_person (-)',
5577: p_prefix=>l_debug_prefix,
5571: p_msg_data=>x_msg_data,
5572: p_msg_type=>'SQL ERROR',
5573: p_msg_level=>fnd_log.level_error);
5574: END IF;
5575: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5576: hz_utility_v2pub.debug(p_message=>'update_person (-)',
5577: p_prefix=>l_debug_prefix,
5578: p_msg_level=>fnd_log.level_procedure);
5579: END IF;
5574: END IF;
5575: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5576: hz_utility_v2pub.debug(p_message=>'update_person (-)',
5577: p_prefix=>l_debug_prefix,
5578: p_msg_level=>fnd_log.level_procedure);
5579: END IF;
5580:
5581: -- Check if API is called in debug mode. If yes, disable debug.
5582: --disable_debug;
5647: /*IF g_debug THEN
5648: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_group (+)');
5649: END IF;
5650: */
5651: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5652: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'create_group (+)',
5653: p_msg_level=>fnd_log.level_procedure);
5654: END IF;
5655:
5649: END IF;
5650: */
5651: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5652: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'create_group (+)',
5653: p_msg_level=>fnd_log.level_procedure);
5654: END IF;
5655:
5656: -- initialize message list if p_init_msg_list is set to TRUE.
5657: IF FND_API.to_Boolean(p_init_msg_list) THEN
5734: x_msg_count, x_msg_data, 'WARNING');
5735: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_group (-)');
5736: END IF;
5737: */
5738: IF fnd_log.level_exception>=fnd_log.g_current_runtime_level THEN
5739: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5740: p_msg_data=>x_msg_data,
5741: p_msg_type=>'WARNING',
5742: p_msg_level=>fnd_log.level_exception);
5738: IF fnd_log.level_exception>=fnd_log.g_current_runtime_level THEN
5739: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5740: p_msg_data=>x_msg_data,
5741: p_msg_type=>'WARNING',
5742: p_msg_level=>fnd_log.level_exception);
5743: END IF;
5744: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5745: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'create_group (-)',
5746: p_msg_level=>fnd_log.level_procedure);
5740: p_msg_data=>x_msg_data,
5741: p_msg_type=>'WARNING',
5742: p_msg_level=>fnd_log.level_exception);
5743: END IF;
5744: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5745: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'create_group (-)',
5746: p_msg_level=>fnd_log.level_procedure);
5747: END IF;
5748:
5742: p_msg_level=>fnd_log.level_exception);
5743: END IF;
5744: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5745: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'create_group (-)',
5746: p_msg_level=>fnd_log.level_procedure);
5747: END IF;
5748:
5749:
5750: -- Check if API is called in debug mode. If yes, disable debug.
5771: x_msg_count, x_msg_data, 'ERROR');
5772: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_group (-)');
5773: END IF;
5774: */
5775: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
5776: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5777: p_msg_data=>x_msg_data,
5778: p_msg_type=>'ERROR',
5779: p_msg_level=>fnd_log.level_error);
5775: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
5776: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5777: p_msg_data=>x_msg_data,
5778: p_msg_type=>'ERROR',
5779: p_msg_level=>fnd_log.level_error);
5780: END IF;
5781: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5782: hz_utility_v2pub.debug(p_message=>'create_group (-)',
5783: p_prefix=>l_debug_prefix,
5777: p_msg_data=>x_msg_data,
5778: p_msg_type=>'ERROR',
5779: p_msg_level=>fnd_log.level_error);
5780: END IF;
5781: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5782: hz_utility_v2pub.debug(p_message=>'create_group (-)',
5783: p_prefix=>l_debug_prefix,
5784: p_msg_level=>fnd_log.level_procedure);
5785: END IF;
5780: END IF;
5781: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5782: hz_utility_v2pub.debug(p_message=>'create_group (-)',
5783: p_prefix=>l_debug_prefix,
5784: p_msg_level=>fnd_log.level_procedure);
5785: END IF;
5786:
5787: -- Check if API is called in debug mode. If yes, disable debug.
5788: --disable_debug;
5807: x_msg_count, x_msg_data, 'UNEXPECTED ERROR');
5808: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_group (-)');
5809: END IF;
5810: */
5811: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
5812: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5813: p_msg_data=>x_msg_data,
5814: p_msg_type=>'UNEXPECTED ERROR',
5815: p_msg_level=>fnd_log.level_error);
5811: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
5812: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5813: p_msg_data=>x_msg_data,
5814: p_msg_type=>'UNEXPECTED ERROR',
5815: p_msg_level=>fnd_log.level_error);
5816: END IF;
5817: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5818: hz_utility_v2pub.debug(p_message=>'create_group (-)',
5819: p_prefix=>l_debug_prefix,
5813: p_msg_data=>x_msg_data,
5814: p_msg_type=>'UNEXPECTED ERROR',
5815: p_msg_level=>fnd_log.level_error);
5816: END IF;
5817: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5818: hz_utility_v2pub.debug(p_message=>'create_group (-)',
5819: p_prefix=>l_debug_prefix,
5820: p_msg_level=>fnd_log.level_procedure);
5821: END IF;
5816: END IF;
5817: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5818: hz_utility_v2pub.debug(p_message=>'create_group (-)',
5819: p_prefix=>l_debug_prefix,
5820: p_msg_level=>fnd_log.level_procedure);
5821: END IF;
5822:
5823: -- Check if API is called in debug mode. If yes, disable debug.
5824: --disable_debug;
5847: x_msg_count, x_msg_data, 'SQL ERROR');
5848: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_group (-)');
5849: END IF;
5850: */
5851: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
5852: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5853: p_msg_data=>x_msg_data,
5854: p_msg_type=>'SQL ERROR',
5855: p_msg_level=>fnd_log.level_error);
5851: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
5852: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5853: p_msg_data=>x_msg_data,
5854: p_msg_type=>'SQL ERROR',
5855: p_msg_level=>fnd_log.level_error);
5856: END IF;
5857: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5858: hz_utility_v2pub.debug(p_message=>'create_group (-)',
5859: p_prefix=>l_debug_prefix,
5853: p_msg_data=>x_msg_data,
5854: p_msg_type=>'SQL ERROR',
5855: p_msg_level=>fnd_log.level_error);
5856: END IF;
5857: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5858: hz_utility_v2pub.debug(p_message=>'create_group (-)',
5859: p_prefix=>l_debug_prefix,
5860: p_msg_level=>fnd_log.level_procedure);
5861: END IF;
5856: END IF;
5857: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5858: hz_utility_v2pub.debug(p_message=>'create_group (-)',
5859: p_prefix=>l_debug_prefix,
5860: p_msg_level=>fnd_log.level_procedure);
5861: END IF;
5862:
5863: -- Check if API is called in debug mode. If yes, disable debug.
5864: --disable_debug;
5930: /*IF g_debug THEN
5931: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_group (+)');
5932: END IF;
5933: */
5934: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5935: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'update_group (+)',
5936: p_msg_level=>fnd_log.level_procedure);
5937: END IF;
5938:
5932: END IF;
5933: */
5934: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5935: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'update_group (+)',
5936: p_msg_level=>fnd_log.level_procedure);
5937: END IF;
5938:
5939:
5940: -- initialize message list if p_init_msg_list is set to TRUE.
6069: x_msg_count, x_msg_data, 'WARNING');
6070: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_group (-)');
6071: END IF;
6072: */
6073: IF fnd_log.level_exception>=fnd_log.g_current_runtime_level THEN
6074: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6075: p_msg_data=>x_msg_data,
6076: p_msg_type=>'WARNING',
6077: p_msg_level=>fnd_log.level_exception);
6073: IF fnd_log.level_exception>=fnd_log.g_current_runtime_level THEN
6074: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6075: p_msg_data=>x_msg_data,
6076: p_msg_type=>'WARNING',
6077: p_msg_level=>fnd_log.level_exception);
6078: END IF;
6079: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6080: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'update_group (-)',
6081: p_msg_level=>fnd_log.level_procedure);
6075: p_msg_data=>x_msg_data,
6076: p_msg_type=>'WARNING',
6077: p_msg_level=>fnd_log.level_exception);
6078: END IF;
6079: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6080: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'update_group (-)',
6081: p_msg_level=>fnd_log.level_procedure);
6082: END IF;
6083:
6077: p_msg_level=>fnd_log.level_exception);
6078: END IF;
6079: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6080: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'update_group (-)',
6081: p_msg_level=>fnd_log.level_procedure);
6082: END IF;
6083:
6084: -- Check if API is called in debug mode. If yes, disable debug.
6085: --disable_debug;
6105: x_msg_count, x_msg_data, 'ERROR');
6106: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_group (-)');
6107: END IF;
6108: */
6109: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
6110: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6111: p_msg_data=>x_msg_data,
6112: p_msg_type=>'ERROR',
6113: p_msg_level=>fnd_log.level_error);
6109: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
6110: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6111: p_msg_data=>x_msg_data,
6112: p_msg_type=>'ERROR',
6113: p_msg_level=>fnd_log.level_error);
6114: END IF;
6115: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6116: hz_utility_v2pub.debug(p_message=>'update_group (-)',
6117: p_prefix=>l_debug_prefix,
6111: p_msg_data=>x_msg_data,
6112: p_msg_type=>'ERROR',
6113: p_msg_level=>fnd_log.level_error);
6114: END IF;
6115: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6116: hz_utility_v2pub.debug(p_message=>'update_group (-)',
6117: p_prefix=>l_debug_prefix,
6118: p_msg_level=>fnd_log.level_procedure);
6119: END IF;
6114: END IF;
6115: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6116: hz_utility_v2pub.debug(p_message=>'update_group (-)',
6117: p_prefix=>l_debug_prefix,
6118: p_msg_level=>fnd_log.level_procedure);
6119: END IF;
6120:
6121: -- Check if API is called in debug mode. If yes, disable debug.
6122: --disable_debug;
6141: x_msg_count, x_msg_data, 'UNEXPECTED ERROR');
6142: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_group (-)');
6143: END IF;
6144: */
6145: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
6146: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6147: p_msg_data=>x_msg_data,
6148: p_msg_type=>'UNEXPECTED ERROR',
6149: p_msg_level=>fnd_log.level_error);
6145: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
6146: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6147: p_msg_data=>x_msg_data,
6148: p_msg_type=>'UNEXPECTED ERROR',
6149: p_msg_level=>fnd_log.level_error);
6150: END IF;
6151: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6152: hz_utility_v2pub.debug(p_message=>'update_group (-)',
6153: p_prefix=>l_debug_prefix,
6147: p_msg_data=>x_msg_data,
6148: p_msg_type=>'UNEXPECTED ERROR',
6149: p_msg_level=>fnd_log.level_error);
6150: END IF;
6151: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6152: hz_utility_v2pub.debug(p_message=>'update_group (-)',
6153: p_prefix=>l_debug_prefix,
6154: p_msg_level=>fnd_log.level_procedure);
6155: END IF;
6150: END IF;
6151: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6152: hz_utility_v2pub.debug(p_message=>'update_group (-)',
6153: p_prefix=>l_debug_prefix,
6154: p_msg_level=>fnd_log.level_procedure);
6155: END IF;
6156:
6157: -- Check if API is called in debug mode. If yes, disable debug.
6158: --disable_debug;
6181: x_msg_count, x_msg_data, 'SQL ERROR');
6182: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_group (-)');
6183: END IF;
6184: */
6185: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
6186: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6187: p_msg_data=>x_msg_data,
6188: p_msg_type=>'SQL ERROR',
6189: p_msg_level=>fnd_log.level_error);
6185: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
6186: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6187: p_msg_data=>x_msg_data,
6188: p_msg_type=>'SQL ERROR',
6189: p_msg_level=>fnd_log.level_error);
6190: END IF;
6191: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6192: hz_utility_v2pub.debug(p_message=>'update_group (-)',
6193: p_prefix=>l_debug_prefix,
6187: p_msg_data=>x_msg_data,
6188: p_msg_type=>'SQL ERROR',
6189: p_msg_level=>fnd_log.level_error);
6190: END IF;
6191: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6192: hz_utility_v2pub.debug(p_message=>'update_group (-)',
6193: p_prefix=>l_debug_prefix,
6194: p_msg_level=>fnd_log.level_procedure);
6195: END IF;
6190: END IF;
6191: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6192: hz_utility_v2pub.debug(p_message=>'update_group (-)',
6193: p_prefix=>l_debug_prefix,
6194: p_msg_level=>fnd_log.level_procedure);
6195: END IF;
6196:
6197:
6198: -- Check if API is called in debug mode. If yes, disable debug.
6273: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_organization (+)');
6274: END IF;
6275: */
6276:
6277: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6278: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'create_organization (+)',
6279: p_msg_level=>fnd_log.level_procedure);
6280: END IF;
6281:
6275: */
6276:
6277: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6278: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'create_organization (+)',
6279: p_msg_level=>fnd_log.level_procedure);
6280: END IF;
6281:
6282:
6283: -- initialize message list if p_init_msg_list is set to TRUE.
6292: /*IF g_debug THEN
6293: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'before LoadDataSources (+)');
6294: END IF;
6295: */
6296: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6297: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'before LoadDataSources (+)',
6298: p_msg_level=>fnd_log.level_procedure);
6299: END IF;
6300:
6294: END IF;
6295: */
6296: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6297: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'before LoadDataSources (+)',
6298: p_msg_level=>fnd_log.level_procedure);
6299: END IF;
6300:
6301: -- enable policy function if it is disabled.
6302:
6317: /*IF g_debug THEN
6318: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'after LoadDataSources (+)');
6319: END IF;
6320: */
6321: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6322: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'after LoadDataSources (+)',
6323: p_msg_level=>fnd_log.level_procedure);
6324: END IF;
6325:
6319: END IF;
6320: */
6321: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6322: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'after LoadDataSources (+)',
6323: p_msg_level=>fnd_log.level_procedure);
6324: END IF;
6325:
6326: -- call to business logic.
6327: do_create_party(
6399: x_msg_data, 'WARNING');
6400: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_organization (-)');
6401: END IF;
6402: */
6403: IF fnd_log.level_exception>=fnd_log.g_current_runtime_level THEN
6404: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6405: p_msg_data=>x_msg_data,
6406: p_msg_type=>'WARNING',
6407: p_msg_level=>fnd_log.level_exception);
6403: IF fnd_log.level_exception>=fnd_log.g_current_runtime_level THEN
6404: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6405: p_msg_data=>x_msg_data,
6406: p_msg_type=>'WARNING',
6407: p_msg_level=>fnd_log.level_exception);
6408: END IF;
6409: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6410: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'create_organization (-)',
6411: p_msg_level=>fnd_log.level_procedure);
6405: p_msg_data=>x_msg_data,
6406: p_msg_type=>'WARNING',
6407: p_msg_level=>fnd_log.level_exception);
6408: END IF;
6409: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6410: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'create_organization (-)',
6411: p_msg_level=>fnd_log.level_procedure);
6412: END IF;
6413:
6407: p_msg_level=>fnd_log.level_exception);
6408: END IF;
6409: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6410: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'create_organization (-)',
6411: p_msg_level=>fnd_log.level_procedure);
6412: END IF;
6413:
6414:
6415: -- Check if API is called in debug mode. If yes, disable debug.
6436: x_msg_count, x_msg_data, 'ERROR');
6437: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_organization (-)');
6438: END IF;
6439: */
6440: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
6441: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6442: p_msg_data=>x_msg_data,
6443: p_msg_type=>'ERROR',
6444: p_msg_level=>fnd_log.level_error);
6440: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
6441: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6442: p_msg_data=>x_msg_data,
6443: p_msg_type=>'ERROR',
6444: p_msg_level=>fnd_log.level_error);
6445: END IF;
6446: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6447: hz_utility_v2pub.debug(p_message=>'create_organization (-)',
6448: p_prefix=>l_debug_prefix,
6442: p_msg_data=>x_msg_data,
6443: p_msg_type=>'ERROR',
6444: p_msg_level=>fnd_log.level_error);
6445: END IF;
6446: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6447: hz_utility_v2pub.debug(p_message=>'create_organization (-)',
6448: p_prefix=>l_debug_prefix,
6449: p_msg_level=>fnd_log.level_procedure);
6450: END IF;
6445: END IF;
6446: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6447: hz_utility_v2pub.debug(p_message=>'create_organization (-)',
6448: p_prefix=>l_debug_prefix,
6449: p_msg_level=>fnd_log.level_procedure);
6450: END IF;
6451:
6452: -- Check if API is called in debug mode. If yes, disable debug.
6453: --disable_debug;
6472: x_msg_count, x_msg_data, 'UNEXPECTED ERROR');
6473: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_organization (-)');
6474: END IF;
6475: */
6476: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
6477: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6478: p_msg_data=>x_msg_data,
6479: p_msg_type=>'UNEXPECTED ERROR',
6480: p_msg_level=>fnd_log.level_error);
6476: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
6477: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6478: p_msg_data=>x_msg_data,
6479: p_msg_type=>'UNEXPECTED ERROR',
6480: p_msg_level=>fnd_log.level_error);
6481: END IF;
6482: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6483: hz_utility_v2pub.debug(p_message=>'create_organization (-)',
6484: p_prefix=>l_debug_prefix,
6478: p_msg_data=>x_msg_data,
6479: p_msg_type=>'UNEXPECTED ERROR',
6480: p_msg_level=>fnd_log.level_error);
6481: END IF;
6482: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6483: hz_utility_v2pub.debug(p_message=>'create_organization (-)',
6484: p_prefix=>l_debug_prefix,
6485: p_msg_level=>fnd_log.level_procedure);
6486: END IF;
6481: END IF;
6482: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6483: hz_utility_v2pub.debug(p_message=>'create_organization (-)',
6484: p_prefix=>l_debug_prefix,
6485: p_msg_level=>fnd_log.level_procedure);
6486: END IF;
6487:
6488: -- Check if API is called in debug mode. If yes, disable debug.
6489: --disable_debug;
6512: x_msg_count, x_msg_data, 'SQL ERROR');
6513: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_organization (-)');
6514: END IF;
6515: */
6516: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
6517: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6518: p_msg_data=>x_msg_data,
6519: p_msg_type=>'SQL ERROR',
6520: p_msg_level=>fnd_log.level_error);
6516: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
6517: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6518: p_msg_data=>x_msg_data,
6519: p_msg_type=>'SQL ERROR',
6520: p_msg_level=>fnd_log.level_error);
6521: END IF;
6522: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6523: hz_utility_v2pub.debug(p_message=>'create_organization (-)',
6524: p_prefix=>l_debug_prefix,
6518: p_msg_data=>x_msg_data,
6519: p_msg_type=>'SQL ERROR',
6520: p_msg_level=>fnd_log.level_error);
6521: END IF;
6522: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6523: hz_utility_v2pub.debug(p_message=>'create_organization (-)',
6524: p_prefix=>l_debug_prefix,
6525: p_msg_level=>fnd_log.level_procedure);
6526: END IF;
6521: END IF;
6522: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6523: hz_utility_v2pub.debug(p_message=>'create_organization (-)',
6524: p_prefix=>l_debug_prefix,
6525: p_msg_level=>fnd_log.level_procedure);
6526: END IF;
6527:
6528: -- Check if API is called in debug mode. If yes, disable debug.
6529: --disable_debug;
6675: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_organization (+)');
6676: END IF;
6677: */
6678:
6679: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6680: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'update_organization (+)',
6681: p_msg_level=>fnd_log.level_procedure);
6682: END IF;
6683:
6677: */
6678:
6679: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6680: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'update_organization (+)',
6681: p_msg_level=>fnd_log.level_procedure);
6682: END IF;
6683:
6684: --Bug9735521 - When Actual Content Source is NULL then 'USER_ENTERED' is assigned.
6685: IF l_organization_rec.actual_content_source IS NULL THEN
6683:
6684: --Bug9735521 - When Actual Content Source is NULL then 'USER_ENTERED' is assigned.
6685: IF l_organization_rec.actual_content_source IS NULL THEN
6686: l_organization_rec.actual_content_source := 'USER_ENTERED';
6687: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6688: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'Actual Content Source is NULL so USER_ENTERED is assigned.',
6689: p_msg_level=>fnd_log.level_procedure);
6690: END IF;
6691: END IF;
6685: IF l_organization_rec.actual_content_source IS NULL THEN
6686: l_organization_rec.actual_content_source := 'USER_ENTERED';
6687: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6688: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'Actual Content Source is NULL so USER_ENTERED is assigned.',
6689: p_msg_level=>fnd_log.level_procedure);
6690: END IF;
6691: END IF;
6692:
6693: -- initialize message list if p_init_msg_list is set to TRUE.
6810: p_person_rec => G_MISS_PERSON_REC,
6811: p_group_rec => G_MISS_GROUP_REC );
6812:
6813:
6814: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6815: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'Before the Supplier Denorm Call',
6816: p_msg_level=>fnd_log.level_procedure);
6817: END IF;
6818:
6812:
6813:
6814: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6815: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'Before the Supplier Denorm Call',
6816: p_msg_level=>fnd_log.level_procedure);
6817: END IF;
6818:
6819: AP_TCA_SUPPLIER_SYNC_PKG.SYNC_Supplier(x_return_status => x_return_status,
6820: x_msg_count => x_msg_count,
6826: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
6827: RAISE fnd_api.g_exc_unexpected_error;
6828: END IF;
6829:
6830: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6831: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'After the Supplier Denorm Call',
6832: p_msg_level=>fnd_log.level_procedure);
6833: END IF;
6834:
6828: END IF;
6829:
6830: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6831: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'After the Supplier Denorm Call',
6832: p_msg_level=>fnd_log.level_procedure);
6833: END IF;
6834:
6835: IF l_old_organization_rec.actual_content_source IN
6836: (G_MISS_CONTENT_SOURCE_TYPE, G_SST_SOURCE_TYPE)
6879: x_msg_count, x_msg_data, 'WARNING');
6880: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_organization (-)');
6881: END IF;
6882: */
6883: IF fnd_log.level_exception>=fnd_log.g_current_runtime_level THEN
6884: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6885: p_msg_data=>x_msg_data,
6886: p_msg_type=>'WARNING',
6887: p_msg_level=>fnd_log.level_exception);
6883: IF fnd_log.level_exception>=fnd_log.g_current_runtime_level THEN
6884: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6885: p_msg_data=>x_msg_data,
6886: p_msg_type=>'WARNING',
6887: p_msg_level=>fnd_log.level_exception);
6888: END IF;
6889: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6890: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'update_organization (-)',
6891: p_msg_level=>fnd_log.level_procedure);
6885: p_msg_data=>x_msg_data,
6886: p_msg_type=>'WARNING',
6887: p_msg_level=>fnd_log.level_exception);
6888: END IF;
6889: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6890: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'update_organization (-)',
6891: p_msg_level=>fnd_log.level_procedure);
6892: END IF;
6893:
6887: p_msg_level=>fnd_log.level_exception);
6888: END IF;
6889: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6890: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'update_organization (-)',
6891: p_msg_level=>fnd_log.level_procedure);
6892: END IF;
6893:
6894: -- Check if API is called in debug mode. If yes, disable debug.
6895: --disable_debug;
6915: x_msg_count, x_msg_data, 'ERROR');
6916: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_organization (-)');
6917: END IF;
6918: */
6919: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
6920: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6921: p_msg_data=>x_msg_data,
6922: p_msg_type=>'ERROR',
6923: p_msg_level=>fnd_log.level_error);
6919: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
6920: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6921: p_msg_data=>x_msg_data,
6922: p_msg_type=>'ERROR',
6923: p_msg_level=>fnd_log.level_error);
6924: END IF;
6925: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6926: hz_utility_v2pub.debug(p_message=>'update_organization (-)',
6927: p_prefix=>l_debug_prefix,
6921: p_msg_data=>x_msg_data,
6922: p_msg_type=>'ERROR',
6923: p_msg_level=>fnd_log.level_error);
6924: END IF;
6925: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6926: hz_utility_v2pub.debug(p_message=>'update_organization (-)',
6927: p_prefix=>l_debug_prefix,
6928: p_msg_level=>fnd_log.level_procedure);
6929: END IF;
6924: END IF;
6925: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6926: hz_utility_v2pub.debug(p_message=>'update_organization (-)',
6927: p_prefix=>l_debug_prefix,
6928: p_msg_level=>fnd_log.level_procedure);
6929: END IF;
6930:
6931: -- Check if API is called in debug mode. If yes, disable debug.
6932: --disable_debug;
6951: x_msg_count, x_msg_data, 'UNEXPECTED ERROR');
6952: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_organization (-)');
6953: END IF;
6954: */
6955: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
6956: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6957: p_msg_data=>x_msg_data,
6958: p_msg_type=>'UNEXPECTED ERROR',
6959: p_msg_level=>fnd_log.level_error);
6955: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
6956: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6957: p_msg_data=>x_msg_data,
6958: p_msg_type=>'UNEXPECTED ERROR',
6959: p_msg_level=>fnd_log.level_error);
6960: END IF;
6961: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6962: hz_utility_v2pub.debug(p_message=>'update_organization (-)',
6963: p_prefix=>l_debug_prefix,
6957: p_msg_data=>x_msg_data,
6958: p_msg_type=>'UNEXPECTED ERROR',
6959: p_msg_level=>fnd_log.level_error);
6960: END IF;
6961: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6962: hz_utility_v2pub.debug(p_message=>'update_organization (-)',
6963: p_prefix=>l_debug_prefix,
6964: p_msg_level=>fnd_log.level_procedure);
6965: END IF;
6960: END IF;
6961: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6962: hz_utility_v2pub.debug(p_message=>'update_organization (-)',
6963: p_prefix=>l_debug_prefix,
6964: p_msg_level=>fnd_log.level_procedure);
6965: END IF;
6966:
6967:
6968: -- Check if API is called in debug mode. If yes, disable debug.
6992: x_msg_count, x_msg_data, 'SQL ERROR');
6993: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_organization (-)');
6994: END IF;
6995: */
6996: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
6997: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6998: p_msg_data=>x_msg_data,
6999: p_msg_type=>'SQL ERROR',
7000: p_msg_level=>fnd_log.level_error);
6996: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
6997: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6998: p_msg_data=>x_msg_data,
6999: p_msg_type=>'SQL ERROR',
7000: p_msg_level=>fnd_log.level_error);
7001: END IF;
7002: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
7003: hz_utility_v2pub.debug(p_message=>'update_organization (-)',
7004: p_prefix=>l_debug_prefix,
6998: p_msg_data=>x_msg_data,
6999: p_msg_type=>'SQL ERROR',
7000: p_msg_level=>fnd_log.level_error);
7001: END IF;
7002: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
7003: hz_utility_v2pub.debug(p_message=>'update_organization (-)',
7004: p_prefix=>l_debug_prefix,
7005: p_msg_level=>fnd_log.level_procedure);
7006: END IF;
7001: END IF;
7002: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
7003: hz_utility_v2pub.debug(p_message=>'update_organization (-)',
7004: p_prefix=>l_debug_prefix,
7005: p_msg_level=>fnd_log.level_procedure);
7006: END IF;
7007:
7008: -- Check if API is called in debug mode. If yes, disable debug.
7009: --disable_debug;
7321: g_bank_code := l_bank_code;
7322: g_branch_code := l_branch_code;
7323: g_party_id := l_party_id;
7324:
7325: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
7326: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'Bank related variables having values.',
7327: p_msg_level=>fnd_log.level_procedure);
7328: END IF;
7329:
7323: g_party_id := l_party_id;
7324:
7325: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
7326: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'Bank related variables having values.',
7327: p_msg_level=>fnd_log.level_procedure);
7328: END IF;
7329:
7330: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
7331: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'g_bank_or_branch_number : '||g_bank_or_branch_number
7326: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'Bank related variables having values.',
7327: p_msg_level=>fnd_log.level_procedure);
7328: END IF;
7329:
7330: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
7331: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'g_bank_or_branch_number : '||g_bank_or_branch_number
7332: ||' g_bank_code : '||g_bank_code
7333: ||' g_branch_code : '||g_branch_code
7334: ||' g_party_id : '||g_party_id,
7331: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'g_bank_or_branch_number : '||g_bank_or_branch_number
7332: ||' g_bank_code : '||g_bank_code
7333: ||' g_branch_code : '||g_branch_code
7334: ||' g_party_id : '||g_party_id,
7335: p_msg_level=>fnd_log.level_procedure);
7336: END IF;
7337:
7338: END IF;
7339:
8290: p_organization_rec.FAILURE_SCORE_OVERRIDE_CODE is not null OR
8291: p_organization_rec.GLOBAL_FAILURE_SCORE
8292: is not null) )
8293: THEN
8294: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8295: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'copy record from ORGANIZATION_REC_TYPE '||
8296: 'to CREDIT_RATINGS_REC_TYPE (+)',
8297: p_msg_level=>fnd_log.level_procedure);
8298: END IF;
8293: THEN
8294: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8295: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'copy record from ORGANIZATION_REC_TYPE '||
8296: 'to CREDIT_RATINGS_REC_TYPE (+)',
8297: p_msg_level=>fnd_log.level_procedure);
8298: END IF;
8299:
8300:
8301: l_credit_rating_rec.PARTY_ID := p_organization_rec.party_rec.PARTY_ID;
8352: ELSE
8353: l_credit_rating_rec.rated_as_of_date := to_date(null);
8354: END IF;
8355:
8356: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8357: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'copy record from ORGANIZATION_REC_TYPE '||
8358: 'to CREDIT_RATINGS_REC_TYPE (-)',
8359: p_msg_level=>fnd_log.level_procedure);
8360: END IF;
8355:
8356: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8357: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'copy record from ORGANIZATION_REC_TYPE '||
8358: 'to CREDIT_RATINGS_REC_TYPE (-)',
8359: p_msg_level=>fnd_log.level_procedure);
8360: END IF;
8361:
8362:
8363:
8365: /*IF g_debug THEN
8366: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'call to create credit_rating (+)');
8367: END IF;
8368: */
8369: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8370: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'call to create credit_rating (+)',
8371: p_msg_level=>fnd_log.level_procedure);
8372: END IF;
8373: /*
8367: END IF;
8368: */
8369: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8370: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'call to create credit_rating (+)',
8371: p_msg_level=>fnd_log.level_procedure);
8372: END IF;
8373: /*
8374: org_rec_to_cr_rec(
8375: p_create_update_flag => 'C',
8399: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'call to create credit_rating (-)');
8400: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'x_return_status = '||x_return_status);
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=>'call to create credit_rating (-)',
8405: p_msg_level=>fnd_log.level_procedure);
8406:
8407: END IF;
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=>'call to create credit_rating (-)',
8405: p_msg_level=>fnd_log.level_procedure);
8406:
8407: END IF;
8408: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8409: hz_utility_v2pub.debug(p_message=>'x_return_status = '||x_return_status,
8404: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'call to create credit_rating (-)',
8405: p_msg_level=>fnd_log.level_procedure);
8406:
8407: END IF;
8408: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8409: hz_utility_v2pub.debug(p_message=>'x_return_status = '||x_return_status,
8410: p_prefix =>l_debug_prefix,
8411: p_msg_level=>fnd_log.level_statement);
8412: END IF;
8407: END IF;
8408: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8409: hz_utility_v2pub.debug(p_message=>'x_return_status = '||x_return_status,
8410: p_prefix =>l_debug_prefix,
8411: p_msg_level=>fnd_log.level_statement);
8412: END IF;
8413: ELSE
8414: /*IF g_debug THEN
8415: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'call to update credit rating (+)');
8414: /*IF g_debug THEN
8415: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'call to update credit rating (+)');
8416: END IF;
8417: */
8418: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8419: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'call to update credit rating (+)',
8420: p_msg_level=>fnd_log.level_procedure);
8421: END IF;
8422:
8416: END IF;
8417: */
8418: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8419: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'call to update credit rating (+)',
8420: p_msg_level=>fnd_log.level_procedure);
8421: END IF;
8422:
8423: -- get the latest record for one party_id
8424:
8433: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'p_organization_rec.party_rec.party_id = ' ||
8434: p_organization_rec.party_rec.party_id);
8435: END IF;
8436: */
8437: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8438: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_rated_as_of_date = ' || l_rated_as_of_date,
8439: p_msg_level=>fnd_log.level_statement);
8440: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'p_organization_rec.party_rec.party_id = ' ||
8441: p_organization_rec.party_rec.party_id,
8435: END IF;
8436: */
8437: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8438: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_rated_as_of_date = ' || l_rated_as_of_date,
8439: p_msg_level=>fnd_log.level_statement);
8440: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'p_organization_rec.party_rec.party_id = ' ||
8441: p_organization_rec.party_rec.party_id,
8442: p_msg_level=>fnd_log.level_statement);
8443:
8438: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_rated_as_of_date = ' || l_rated_as_of_date,
8439: p_msg_level=>fnd_log.level_statement);
8440: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'p_organization_rec.party_rec.party_id = ' ||
8441: p_organization_rec.party_rec.party_id,
8442: p_msg_level=>fnd_log.level_statement);
8443:
8444: END IF;
8445:
8446:
8477: /*IF g_debug THEN
8478: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'l_credit_rating_id = ' || l_credit_rating_id);
8479: END IF;
8480: */
8481: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8482: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_credit_rating_id = ' || l_credit_rating_id,
8483: p_msg_level=>fnd_log.level_statement);
8484: END IF;
8485: /*
8479: END IF;
8480: */
8481: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8482: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_credit_rating_id = ' || l_credit_rating_id,
8483: p_msg_level=>fnd_log.level_statement);
8484: END IF;
8485: /*
8486: org_rec_to_cr_rec (
8487: p_create_update_flag => 'U',
8494: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'l_credit_rating_rec.credit_rating_id= ' ||
8495: l_credit_rating_rec.credit_rating_id);
8496: END IF;
8497: */
8498: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8499: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_credit_rating_rec.credit_rating_id= ' ||
8500: l_credit_rating_rec.credit_rating_id,
8501: p_msg_level=>fnd_log.level_statement);
8502: END IF;
8497: */
8498: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8499: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_credit_rating_rec.credit_rating_id= ' ||
8500: l_credit_rating_rec.credit_rating_id,
8501: p_msg_level=>fnd_log.level_statement);
8502: END IF;
8503: /*
8504: HZ_PARTY_INFO_PUB.update_credit_ratings(
8505: p_api_version => 1,
8522: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'call to update credit rating (-)');
8523: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'x_return_status = '||x_return_status);
8524: END IF;
8525: */
8526: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8527: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'call to update credit rating (-)',
8528: p_msg_level=>fnd_log.level_procedure);
8529: END IF;
8530: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8524: END IF;
8525: */
8526: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8527: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'call to update credit rating (-)',
8528: p_msg_level=>fnd_log.level_procedure);
8529: END IF;
8530: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8531: hz_utility_v2pub.debug(p_message=>'x_return_status = '||x_return_status,
8532: p_prefix =>l_debug_prefix,
8526: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8527: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'call to update credit rating (-)',
8528: p_msg_level=>fnd_log.level_procedure);
8529: END IF;
8530: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8531: hz_utility_v2pub.debug(p_message=>'x_return_status = '||x_return_status,
8532: p_prefix =>l_debug_prefix,
8533: p_msg_level=>fnd_log.level_statement);
8534: END IF;
8529: END IF;
8530: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8531: hz_utility_v2pub.debug(p_message=>'x_return_status = '||x_return_status,
8532: p_prefix =>l_debug_prefix,
8533: p_msg_level=>fnd_log.level_statement);
8534: END IF;
8535: END IF;
8536:
8537: IF x_return_status <> fnd_api.g_ret_sts_success THEN
8563: 'to CREDIT_RATINGS_REC_TYPE for create (+)');
8564: END IF;
8565: */
8566: /*
8567: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8568: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'copy record from ORGANIZATION_REC_TYPE '||
8569: 'to CREDIT_RATINGS_REC_TYPE for create (+)',
8570: p_msg_level=>fnd_log.level_procedure);
8571: END IF;
8566: /*
8567: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8568: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'copy record from ORGANIZATION_REC_TYPE '||
8569: 'to CREDIT_RATINGS_REC_TYPE for create (+)',
8570: p_msg_level=>fnd_log.level_procedure);
8571: END IF;
8572:
8573: x_credit_rating_rec.PARTY_ID := p_organization_rec.party_rec.PARTY_ID;
8574: x_credit_rating_rec.AVG_HIGH_CREDIT := p_organization_rec.AVG_HIGH_CREDIT;
8624: 'to CREDIT_RATINGS_REC_TYPE for create (-)');
8625: END IF;
8626: */
8627: /*
8628: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8629: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'copy record from ORGANIZATION_REC_TYPE '||
8630: 'to CREDIT_RATINGS_REC_TYPE for create (-)',
8631: p_msg_level=>fnd_log.level_procedure);
8632: END IF;
8627: /*
8628: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8629: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'copy record from ORGANIZATION_REC_TYPE '||
8630: 'to CREDIT_RATINGS_REC_TYPE for create (-)',
8631: p_msg_level=>fnd_log.level_procedure);
8632: END IF;
8633: ELSE
8634: /*IF g_debug THEN
8635: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'copy record from ORGANIZATION_REC_TYPE '||
8636: 'to CREDIT_RATINGS_REC_TYPE for update(+)');
8637: END IF;
8638: */
8639: /*
8640: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8641: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'copy record from ORGANIZATION_REC_TYPE '||
8642: 'to CREDIT_RATINGS_REC_TYPE for update(+)',
8643: p_msg_level=>fnd_log.level_procedure);
8644: END IF;
8639: /*
8640: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8641: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'copy record from ORGANIZATION_REC_TYPE '||
8642: 'to CREDIT_RATINGS_REC_TYPE for update(+)',
8643: p_msg_level=>fnd_log.level_procedure);
8644: END IF;
8645:
8646: IF p_organization_rec.AVG_HIGH_CREDIT = FND_API.G_MISS_NUM THEN
8647: x_credit_rating_rec.AVG_HIGH_CREDIT := NULL;
8920: 'to CREDIT_RATINGS_REC_TYPE for update(-)');
8921: END IF;
8922: */
8923: /*
8924: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8925: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'copy record from ORGANIZATION_REC_TYPE '||
8926: 'to CREDIT_RATINGS_REC_TYPE for update(-)',
8927: p_msg_level=>fnd_log.level_procedure);
8928: END IF;
8923: /*
8924: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8925: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'copy record from ORGANIZATION_REC_TYPE '||
8926: 'to CREDIT_RATINGS_REC_TYPE for update(-)',
8927: p_msg_level=>fnd_log.level_procedure);
8928: END IF;
8929: END IF;
8930:
8931: END org_rec_to_cr_rec;
9132: l_dummy VARCHAR2(1);
9133:
9134: BEGIN
9135:
9136: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
9137: hz_utility_v2pub.debug (
9138: p_message => 'validate_party_name (+)',
9139: p_prefix => '',
9140: p_msg_level => fnd_log.level_procedure
9136: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
9137: hz_utility_v2pub.debug (
9138: p_message => 'validate_party_name (+)',
9139: p_prefix => '',
9140: p_msg_level => fnd_log.level_procedure
9141: );
9142: END IF;
9143:
9144: -- check if the party is supplier
9157: x_return_status => x_return_status);
9158: END IF;
9159: CLOSE c_supplier;
9160:
9161: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
9162: hz_utility_v2pub.debug (
9163: p_message => 'validate_party_name (-)',
9164: p_prefix => '',
9165: p_msg_level => fnd_log.level_procedure
9161: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
9162: hz_utility_v2pub.debug (
9163: p_message => 'validate_party_name (-)',
9164: p_prefix => '',
9165: p_msg_level => fnd_log.level_procedure
9166: );
9167: END IF;
9168:
9169: END validate_party_name;