277: * DESCRIPTION
278: * Turn on debug mode.
279: *
280: * EXTERNAL PROCEDURES/FUNCTIONS ACCESSED
281: * hz_utility_v2pub.enable_debug
282: *
283: * MODIFICATION HISTORY
284: *
285: * 07-23-2001 Jianying Huang o Created.
294: IF g_debug_count = 1 THEN
295: IF fnd_profile.value('HZ_API_FILE_DEBUG_ON') = 'Y' OR
296: fnd_profile.value('HZ_API_DBMS_DEBUG_ON') = 'Y'
297: THEN
298: hz_utility_v2pub.enable_debug;
299: g_debug := TRUE;
300: END IF;
301: END IF;
302: END enable_debug;
307: * DESCRIPTION
308: * Turn off debug mode.
309: *
310: * EXTERNAL PROCEDURES/FUNCTIONS ACCESSED
311: * hz_utility_v2pub.disable_debug
312: *
313: * MODIFICATION HISTORY
314: *
315: * 07-23-2001 Jianying Huang o Created.
323: IF g_debug THEN
324: g_debug_count := g_debug_count - 1;
325:
326: IF g_debug_count = 0 THEN
327: hz_utility_v2pub.disable_debug;
328: g_debug := FALSE;
329: END IF;
330: END IF;
331:
371: BEGIN
372: -- Debug info.
373:
374: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
375: hz_utility_v2pub.debug(p_message=>'party exists (+)',
376: p_prefix=>l_debug_prefix,
377: p_msg_level=>fnd_log.level_procedure);
378: END IF;
379:
388: CLOSE c_party_exists;
389:
390: -- Debug info.
391: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
392: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
393: p_message=>'party exists (-)',
394: p_msg_level=>fnd_log.level_procedure);
395: END IF;
396:
446: BEGIN
447:
448: -- Debug info.
449: /*IF g_debug THEN
450: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_person_name (+)');
451: END IF;
452: */
453: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
454: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_person_name (+)',
450: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_person_name (+)');
451: END IF;
452: */
453: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
454: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_person_name (+)',
455: p_msg_level=>fnd_log.level_procedure);
456: END IF;
457:
458: --
566: END IF;
567:
568: -- Debug info.
569: /*IF g_debug THEN
570: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'l_person_name = '||l_person_name);
571: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_person_name (-)');
572: END IF;
573: */
574: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
567:
568: -- Debug info.
569: /*IF g_debug THEN
570: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'l_person_name = '||l_person_name);
571: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_person_name (-)');
572: END IF;
573: */
574: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
575: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_person_name (-)',
571: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_person_name (-)');
572: END IF;
573: */
574: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
575: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_person_name (-)',
576: p_msg_level=>fnd_log.level_procedure);
577: END IF;
578: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
579: hz_utility_v2pub.debug(p_message=>'l_person_name = '||l_person_name,
575: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_person_name (-)',
576: p_msg_level=>fnd_log.level_procedure);
577: END IF;
578: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
579: hz_utility_v2pub.debug(p_message=>'l_person_name = '||l_person_name,
580: p_prefix =>l_debug_prefix,
581: p_msg_level=>fnd_log.level_statement);
582: END IF;
583:
615: BEGIN
616:
617: -- Debug info.
618: /*IF g_debug THEN
619: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_party_name (+)');
620: END IF;
621: */
622: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
623: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_party_name (+)',
619: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_party_name (+)');
620: END IF;
621: */
622: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
623: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_party_name (+)',
624: p_msg_level=>fnd_log.level_procedure);
625: END IF;
626:
627: IF p_person_first_name IS NOT NULL AND
641: END IF;
642:
643: -- Debug info.
644: /*IF g_debug THEN
645: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'l_party_name = '||l_party_name);
646: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_party_name (-)');
647: END IF;*/
648: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
649: hz_utility_v2pub.debug(p_message=>'l_party_name = '||l_party_name,
642:
643: -- Debug info.
644: /*IF g_debug THEN
645: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'l_party_name = '||l_party_name);
646: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_party_name (-)');
647: END IF;*/
648: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
649: hz_utility_v2pub.debug(p_message=>'l_party_name = '||l_party_name,
650: p_prefix =>l_debug_prefix,
645: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'l_party_name = '||l_party_name);
646: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_party_name (-)');
647: END IF;*/
648: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
649: hz_utility_v2pub.debug(p_message=>'l_party_name = '||l_party_name,
650: p_prefix =>l_debug_prefix,
651: p_msg_level=>fnd_log.level_statement);
652: END IF;
653: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
650: p_prefix =>l_debug_prefix,
651: p_msg_level=>fnd_log.level_statement);
652: END IF;
653: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
654: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_party_name (-)',
655: p_msg_level=>fnd_log.level_procedure);
656: END IF;
657:
658:
721: BEGIN
722:
723: -- Debug info.
724: /*IF g_debug THEN
725: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_update_party_rel_name (+)');
726: END IF;
727: */
728: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
729: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_update_party_rel_name (+)',
725: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_update_party_rel_name (+)');
726: END IF;
727: */
728: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
729: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_update_party_rel_name (+)',
730: p_msg_level=>fnd_log.level_procedure);
731: END IF;
732:
733:
772:
773: -- Debug info.
774:
775: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
776: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_update_party_rel_name (-)',
777: p_msg_level=>fnd_log.level_procedure);
778: END IF;
779:
780: END do_update_party_rel_name;
826: BEGIN
827:
828: -- Debug info.
829: /*IF g_debug THEN
830: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'party profile exists (+)');
831: END IF;
832: */
833: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
834: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party profile exists (+)',
830: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'party profile exists (+)');
831: END IF;
832: */
833: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
834: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party profile exists (+)',
835: p_msg_level=>fnd_log.level_procedure);
836: END IF;
837:
838: IF p_party_type = 'PERSON' THEN
858: END IF;
859:
860: -- Debug info.
861: /*IF g_debug THEN
862: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'party profile exists (-)');
863: END IF;
864: */
865: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
866: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party profile exists (-)',
862: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'party profile exists (-)');
863: END IF;
864: */
865: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
866: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'party profile exists (-)',
867: p_msg_level=>fnd_log.level_procedure);
868: END IF;
869:
870: RETURN l_dummy;
900: BEGIN
901:
902: -- Debug info.
903: /*IF g_debug THEN
904: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'reset_sst_to_userentered (+)');
905: END IF;
906: */
907: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
908: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'reset_sst_to_userentered (+)',
904: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'reset_sst_to_userentered (+)');
905: END IF;
906: */
907: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
908: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'reset_sst_to_userentered (+)',
909: p_msg_level=>fnd_log.level_procedure);
910: END IF;
911:
912: IF p_party_type = 'PERSON' THEN
940: END IF;
941:
942: -- Debug info.
943: /*IF g_debug THEN
944: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'reset_sst_to_userentered (-)');
945: END IF;
946: */
947: /*
948: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
945: END IF;
946: */
947: /*
948: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
949: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'reset_sst_to_userentered (-)',
950: p_msg_level=>fnd_log.level_procedure);
951: END IF;
952: */
953: IF SQL%NOTFOUND THEN
1011: l_created_by_module varchar2(150);
1012: BEGIN
1013: -- Debug info.
1014: /*IF g_debug THEN
1015: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_process_classification (+)');
1016: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'party_id = '||p_organization_rec.party_rec.party_id);
1017: END IF;
1018: */
1019: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1012: BEGIN
1013: -- Debug info.
1014: /*IF g_debug THEN
1015: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_process_classification (+)');
1016: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'party_id = '||p_organization_rec.party_rec.party_id);
1017: END IF;
1018: */
1019: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1020: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_process_classification (+)',
1016: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'party_id = '||p_organization_rec.party_rec.party_id);
1017: END IF;
1018: */
1019: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1020: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_process_classification (+)',
1021: p_msg_level=>fnd_log.level_procedure);
1022: END IF;
1023: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1024: hz_utility_v2pub.debug(p_message=>'party_id = '||p_organization_rec.party_rec.party_id,
1020: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_process_classification (+)',
1021: p_msg_level=>fnd_log.level_procedure);
1022: END IF;
1023: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1024: hz_utility_v2pub.debug(p_message=>'party_id = '||p_organization_rec.party_rec.party_id,
1025: p_prefix =>l_debug_prefix,
1026: p_msg_level=>fnd_log.level_statement);
1027: END IF;
1028:
1235: END IF;
1236:
1237: -- Debug info.
1238: /*IF g_debug THEN
1239: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_process_classification (-)');
1240: END IF;
1241: */
1242: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1243: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_process_classification (-)',
1239: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_process_classification (-)');
1240: END IF;
1241: */
1242: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1243: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_process_classification (-)',
1244: p_msg_level=>fnd_log.level_procedure);
1245: END IF;
1246:
1247: END do_process_classification;
1288: BEGIN
1289:
1290: -- Debug info.
1291: /*IF g_debug THEN
1292: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_person_profile (+)');
1293: END IF;
1294: */
1295: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1296: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_person_profile (+)',
1292: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_person_profile (+)');
1293: END IF;
1294: */
1295: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1296: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_person_profile (+)',
1297: p_msg_level=>fnd_log.level_procedure);
1298: END IF;
1299:
1300: -- Debug info.
1298: END IF;
1299:
1300: -- Debug info.
1301: /*IF g_debug THEN
1302: hz_utility_v2pub.debug (
1303: 'hz_person_profiles_pkg.Insert_Row (+)', l_debug_prefix);
1304: END IF;
1305: */
1306:
1304: END IF;
1305: */
1306:
1307: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1308: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_person_profiles_pkg.Insert_Row (+)',
1309: p_msg_level=>fnd_log.level_procedure);
1310: END IF;
1311:
1312: -- call table-handler.
1387: x_rowid := l_rowid;
1388:
1389: -- Debug info.
1390: /*IF g_debug THEN
1391: hz_utility_v2pub.debug (
1392: 'hz_person_profiles_pkg.Insert_Row (-) ' ||
1393: 'x_profile_id = ' || x_profile_id, l_debug_prefix);
1394: END IF;
1395: */
1394: END IF;
1395: */
1396:
1397: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1398: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_person_profiles_pkg.Insert_Row (-) '||'x_profile_id = ' || x_profile_id,
1399: p_msg_level=>fnd_log.level_procedure);
1400: END IF;
1401:
1402: -- Debug info.
1400: END IF;
1401:
1402: -- Debug info.
1403: /*IF g_debug THEN
1404: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_person_profile (-)');
1405: END IF;*/
1406:
1407: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1408: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_person_profile (-)',
1404: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_person_profile (-)');
1405: END IF;*/
1406:
1407: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1408: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_person_profile (-)',
1409: p_msg_level=>fnd_log.level_procedure);
1410: END IF;
1411:
1412: END do_create_person_profile;
1466: BEGIN
1467:
1468: -- Debug info.
1469: /*IF g_debug THEN
1470: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_update_person_profile (+)');
1471: END IF;
1472: */
1473:
1474: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1471: END IF;
1472: */
1473:
1474: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1475: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_update_person_profile (+)',
1476: p_msg_level=>fnd_log.level_procedure);
1477: END IF;
1478:
1479: OPEN c_person;
1606: END IF;
1607:
1608: -- Debug info.
1609: /*IF g_debug THEN
1610: hz_utility_v2pub.debug ('profile_id = '||x_profile_id, l_debug_prefix);
1611: hz_utility_v2pub.debug (
1612: 'hz_person_profiles_pkg.Update_Row (+) ',l_debug_prefix);
1613: END IF;
1614: */
1607:
1608: -- Debug info.
1609: /*IF g_debug THEN
1610: hz_utility_v2pub.debug ('profile_id = '||x_profile_id, l_debug_prefix);
1611: hz_utility_v2pub.debug (
1612: 'hz_person_profiles_pkg.Update_Row (+) ',l_debug_prefix);
1613: END IF;
1614: */
1615: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1612: 'hz_person_profiles_pkg.Update_Row (+) ',l_debug_prefix);
1613: END IF;
1614: */
1615: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1616: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_person_profiles_pkg.Update_Row (+)',
1617: p_msg_level=>fnd_log.level_procedure);
1618: END IF;
1619: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1620: hz_utility_v2pub.debug(p_message=>'profile_id = '||x_profile_id,
1616: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_person_profiles_pkg.Update_Row (+)',
1617: p_msg_level=>fnd_log.level_procedure);
1618: END IF;
1619: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1620: hz_utility_v2pub.debug(p_message=>'profile_id = '||x_profile_id,
1621: p_prefix =>l_debug_prefix,
1622: p_msg_level=>fnd_log.level_statement);
1623: END IF;
1624:
1697: );
1698:
1699: -- Debug info.
1700: /*IF g_debug THEN
1701: hz_utility_v2pub.debug (
1702: 'hz_person_profiles_pkg.Update_Row (-) ',
1703: l_debug_prefix);
1704: END IF;
1705: */
1703: l_debug_prefix);
1704: END IF;
1705: */
1706: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1707: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_person_profiles_pkg.Update_Row (-)',
1708: p_msg_level=>fnd_log.level_procedure);
1709:
1710: END IF;
1711:
1710: END IF;
1711:
1712: -- Debug info.
1713: /*IF g_debug THEN
1714: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_update_person_profile (-)');
1715: END IF;
1716: */
1717: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1718: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_update_person_profile (-)',
1714: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_update_person_profile (-)');
1715: END IF;
1716: */
1717: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1718: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_update_person_profile (-)',
1719: p_msg_level=>fnd_log.level_procedure);
1720: END IF;
1721:
1722: EXCEPTION
1770: BEGIN
1771:
1772: -- Debug info.
1773: /*IF g_debug THEN
1774: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_org_profile (+)');
1775: END IF;
1776: */
1777: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1778: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_org_profile (+)',
1774: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_org_profile (+)');
1775: END IF;
1776: */
1777: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1778: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_org_profile (+)',
1779: p_msg_level=>fnd_log.level_procedure);
1780: END IF;
1781:
1782: -- Debug info.
1780: END IF;
1781:
1782: -- Debug info.
1783: /*IF g_debug THEN
1784: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'hz_organization_profiles_pkg.Insert_Row (+)',
1785: l_debug_prefix);
1786: END IF;
1787: */
1788: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1785: l_debug_prefix);
1786: END IF;
1787: */
1788: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1789: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_organization_profiles_pkg.Insert_Row (+)',
1790: p_msg_level=>fnd_log.level_procedure);
1791: END IF;
1792:
1793: -- call table-handler.
1948:
1949:
1950: -- Debug info.
1951: /*IF g_debug THEN
1952: hz_utility_v2pub.debug ('hz_organization_profiles_pkg.Insert_Row (-) ',
1953: l_debug_prefix);
1954: END IF;
1955: */
1956: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1953: l_debug_prefix);
1954: END IF;
1955: */
1956: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1957: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_organization_profiles_pkg.Insert_Row (-) ',
1958: p_msg_level=>fnd_log.level_procedure);
1959: END IF;
1960:
1961: -- Debug info.
1959: END IF;
1960:
1961: -- Debug info.
1962: /*IF g_debug THEN
1963: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_org_profile (-)');
1964: END IF;
1965: */
1966: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1967: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_org_profile (-)',
1963: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_org_profile (-)');
1964: END IF;
1965: */
1966: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1967: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_org_profile (-)',
1968: p_msg_level=>fnd_log.level_procedure);
1969: END IF;
1970:
1971: END do_create_org_profile;
2029: BEGIN
2030:
2031: -- Debug info.
2032: /*IF g_debug THEN
2033: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_update_org_profile (+)');
2034: END IF;
2035: */
2036: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2037: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_update_org_profile (+)',
2033: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_update_org_profile (+)');
2034: END IF;
2035: */
2036: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2037: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_update_org_profile (+)',
2038: p_msg_level=>fnd_log.level_procedure);
2039: END IF;
2040:
2041: OPEN c_org;
2150: END IF;
2151: */
2152: -- Debug info.
2153: /*IF g_debug THEN
2154: hz_utility_v2pub.debug ('profile_id = '||x_profile_id, l_debug_prefix);
2155: hz_utility_v2pub.debug ('hz_organization_profiles_pkg.Update_Row (+) ',
2156: l_debug_prefix);
2157: END IF;
2158: */
2151: */
2152: -- Debug info.
2153: /*IF g_debug THEN
2154: hz_utility_v2pub.debug ('profile_id = '||x_profile_id, l_debug_prefix);
2155: hz_utility_v2pub.debug ('hz_organization_profiles_pkg.Update_Row (+) ',
2156: l_debug_prefix);
2157: END IF;
2158: */
2159: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2156: l_debug_prefix);
2157: END IF;
2158: */
2159: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2160: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_organization_profiles_pkg.Update_Row (+) ',
2161: p_msg_level=>fnd_log.level_procedure);
2162: END IF;
2163: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2164: hz_utility_v2pub.debug(p_message=>'profile_id = '||x_profile_id,
2160: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_organization_profiles_pkg.Update_Row (+) ',
2161: p_msg_level=>fnd_log.level_procedure);
2162: END IF;
2163: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2164: hz_utility_v2pub.debug(p_message=>'profile_id = '||x_profile_id,
2165: p_prefix =>l_debug_prefix,
2166: p_msg_level=>fnd_log.level_statement);
2167: END IF;
2168:
2317: );
2318:
2319: -- Debug info.
2320: /*IF g_debug THEN
2321: hz_utility_v2pub.debug ('hz_organization_profiles_pkg.Update_Row (-) ',
2322: l_debug_prefix);
2323: END IF;
2324: */
2325: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2322: l_debug_prefix);
2323: END IF;
2324: */
2325: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2326: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_organization_profiles_pkg.Update_Row (-) ',
2327: p_msg_level=>fnd_log.level_procedure);
2328: END IF;
2329:
2330: -- Debug info.
2328: END IF;
2329:
2330: -- Debug info.
2331: /*IF g_debug THEN
2332: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_update_org_profile (-)');
2333: END IF;
2334: */
2335: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2336: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_update_org_profile (-)',
2332: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_update_org_profile (-)');
2333: END IF;
2334: */
2335: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2336: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_update_org_profile (-)',
2337: p_msg_level=>fnd_log.level_procedure);
2338: END IF;
2339:
2340: EXCEPTION
2408: BEGIN
2409:
2410: -- Debug info.
2411: /*IF g_debug THEN
2412: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_party_profile (+)');
2413: END IF;
2414: */
2415: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2416: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_party_profile (+)',
2412: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_party_profile (+)');
2413: END IF;
2414: */
2415: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2416: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_party_profile (+)',
2417: p_msg_level=>fnd_log.level_procedure);
2418: END IF;
2419:
2420: IF p_party_type = 'PERSON' THEN
2483: end if;
2484:
2485: -- Debug info.
2486: /*IF g_debug THEN
2487: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_party_profile (-)');
2488: END IF;
2489: */
2490: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2491: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_party_profile (-)',
2487: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_party_profile (-)');
2488: END IF;
2489: */
2490: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2491: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_party_profile (-)',
2492: p_msg_level=>fnd_log.level_procedure);
2493: END IF;
2494:
2495: END do_create_party_profile;
2532: BEGIN
2533:
2534: -- Debug info.
2535: /*IF g_debug THEN
2536: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_update_party_profile (+)');
2537: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'party_type = '||p_party_type);
2538: END IF;
2539: */
2540: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2533:
2534: -- Debug info.
2535: /*IF g_debug THEN
2536: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_update_party_profile (+)');
2537: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'party_type = '||p_party_type);
2538: END IF;
2539: */
2540: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2541: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_update_party_profile (+)',
2537: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'party_type = '||p_party_type);
2538: END IF;
2539: */
2540: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2541: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_update_party_profile (+)',
2542: p_msg_level=>fnd_log.level_procedure);
2543:
2544: END IF;
2545: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2542: p_msg_level=>fnd_log.level_procedure);
2543:
2544: END IF;
2545: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2546: hz_utility_v2pub.debug(p_message=>'party_type = '||p_party_type,
2547: p_prefix =>l_debug_prefix,
2548: p_msg_level=>fnd_log.level_statement);
2549: END IF;
2550:
2565: END IF;
2566:
2567: -- Debug info.
2568: /*IF g_debug THEN
2569: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_update_party_profile (-)');
2570: END IF;
2571: */
2572: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2573: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_update_party_profile (-)',
2569: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_update_party_profile (-)');
2570: END IF;
2571: */
2572: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2573: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_update_party_profile (-)',
2574: p_msg_level=>fnd_log.level_procedure);
2575: END IF;
2576:
2577: END do_update_party_profile;
2614: BEGIN
2615:
2616: -- Debug info.
2617: /*IF g_debug THEN
2618: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_get_party_profile (+)');
2619: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'party_type = '||p_party_type);
2620: END IF;
2621: */
2622: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2615:
2616: -- Debug info.
2617: /*IF g_debug THEN
2618: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_get_party_profile (+)');
2619: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'party_type = '||p_party_type);
2620: END IF;
2621: */
2622: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2623: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_get_party_profile (+)',
2619: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'party_type = '||p_party_type);
2620: END IF;
2621: */
2622: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2623: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_get_party_profile (+)',
2624: p_msg_level=>fnd_log.level_procedure);
2625: END IF;
2626: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2627: hz_utility_v2pub.debug(p_message=>'party_type = '||p_party_type,
2623: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_get_party_profile (+)',
2624: p_msg_level=>fnd_log.level_procedure);
2625: END IF;
2626: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2627: hz_utility_v2pub.debug(p_message=>'party_type = '||p_party_type,
2628: p_prefix =>l_debug_prefix,
2629: p_msg_level=>fnd_log.level_statement);
2630: END IF;
2631:
2654: END IF;
2655:
2656: -- Debug info.
2657: /*IF g_debug THEN
2658: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_get_party_profile (-)');
2659: END IF;
2660: */
2661: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2662: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_get_party_profile (-)',
2658: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_get_party_profile (-)');
2659: END IF;
2660: */
2661: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2662: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_get_party_profile (-)',
2663: p_msg_level=>fnd_log.level_procedure);
2664: END IF;
2665:
2666: END do_get_party_profile;
2756: BEGIN
2757:
2758: -- Debug info.
2759: /*IF g_debug THEN
2760: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_update_party_only (+)');
2761: END IF;
2762: */
2763: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2764: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_update_party_only (+)',
2760: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_update_party_only (+)');
2761: END IF;
2762: */
2763: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2764: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_update_party_only (+)',
2765: p_msg_level=>fnd_log.level_procedure);
2766: END IF;
2767:
2768: IF p_party_type = 'PERSON' THEN
3007: END IF;
3008:
3009: -- Debug info.
3010: /*IF g_debug THEN
3011: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'Generated person key : '||l_customer_key);
3012: END IF;*/
3013:
3014: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3015: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'Generated person key : '||l_customer_key,
3011: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'Generated person key : '||l_customer_key);
3012: END IF;*/
3013:
3014: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3015: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'Generated person key : '||l_customer_key,
3016: p_msg_level=>fnd_log.level_statement);
3017: END IF;
3018:
3019: ELSIF p_party_type = 'ORGANIZATION' THEN
3054: END IF;
3055:
3056: -- Debug info.
3057: /*IF g_debug THEN
3058: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'Generated organization key : '||l_customer_key);
3059: END IF;
3060: */
3061: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3062: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'Generated organization key : '||l_customer_key,
3058: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'Generated organization key : '||l_customer_key);
3059: END IF;
3060: */
3061: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3062: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'Generated organization key : '||l_customer_key,
3063: p_msg_level=>fnd_log.level_statement);
3064: END IF;
3065:
3066: ELSIF p_party_type = 'GROUP' THEN
3083: END IF;
3084:
3085: -- Debug info.
3086: /*IF g_debug THEN
3087: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'Generated group key : '||l_customer_key);
3088: END IF;
3089: */
3090: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3091: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'Generated group key : '||l_customer_key,
3087: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'Generated group key : '||l_customer_key);
3088: END IF;
3089: */
3090: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3091: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'Generated group key : '||l_customer_key,
3092: p_msg_level=>fnd_log.level_statement);
3093: END IF;
3094:
3095: END IF;
3108: IF p_create_update_flag = 'C' THEN
3109:
3110: -- Debug info.
3111: /*IF g_debug THEN
3112: hz_utility_v2pub.debug (
3113: 'hz_parties_pkg.Insert_Row (+)',l_debug_prefix);
3114: END IF;
3115: */
3116: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3113: 'hz_parties_pkg.Insert_Row (+)',l_debug_prefix);
3114: END IF;
3115: */
3116: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3117: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_parties_pkg.Insert_Row (+)',
3118: p_msg_level=>fnd_log.level_procedure);
3119: END IF;
3120:
3121: -- this is for handling orig_system_reference defaulting
3212:
3213:
3214: -- Debug info.
3215: /*IF g_debug THEN
3216: hz_utility_v2pub.debug (
3217: 'hz_parties_pkg.Insert_Row (-)', l_debug_prefix);
3218: END IF;
3219: */
3220: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3217: 'hz_parties_pkg.Insert_Row (-)', l_debug_prefix);
3218: END IF;
3219: */
3220: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3221: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_parties_pkg.Insert_Row (-)',
3222: p_msg_level=>fnd_log.level_procedure);
3223: END IF;
3224:
3225: if l_party_rec.orig_system is not null
3306: ELSE -- p_create_update_flag = 'U'
3307:
3308: -- Debug info.
3309: /*IF g_debug THEN
3310: hz_utility_v2pub.debug (
3311: 'hz_parties_pkg.Update_Row (+)',l_debug_prefix);
3312: END IF;
3313: */
3314: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3311: 'hz_parties_pkg.Update_Row (+)',l_debug_prefix);
3312: END IF;
3313: */
3314: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3315: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_parties_pkg.Update_Row (+)',
3316: p_msg_level=>fnd_log.level_procedure);
3317: END IF;
3318:
3319: if (l_party_rec.orig_system is not null
3425: END IF;
3426:
3427: -- Debug info.
3428: /*IF g_debug THEN
3429: hz_utility_v2pub.debug (
3430: 'hz_parties_pkg.Update_Row (-)',l_debug_prefix);
3431: END IF;
3432: */
3433: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3430: 'hz_parties_pkg.Update_Row (-)',l_debug_prefix);
3431: END IF;
3432: */
3433: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3434: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_parties_pkg.Update_Row (-)',
3435: p_msg_level=>fnd_log.level_procedure);
3436: END IF;
3437:
3438: -- Bug 4490715 : If party is PERSON / ORGANIZATION call eTax
3549:
3550:
3551: -- Debug info.
3552: /*IF g_debug THEN
3553: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_update_party_only (-)');
3554: END IF;
3555: */
3556: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3557: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_update_party_only (-)',
3553: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_update_party_only (-)');
3554: END IF;
3555: */
3556: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3557: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_update_party_only (-)',
3558: p_msg_level=>fnd_log.level_procedure);
3559: END IF;
3560:
3561:
3650: BEGIN
3651:
3652: -- Debug info.
3653: /*IF g_debug THEN
3654: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_party (+)');
3655: END IF;
3656: */
3657: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3658: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_party (+)',
3654: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_party (+)');
3655: END IF;
3656: */
3657: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3658: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_party (+)',
3659: p_msg_level=>fnd_log.level_procedure);
3660: END IF;
3661:
3662: -- assign party record and find the data source.
3791: IF p_party_type IN ('PERSON', 'ORGANIZATION') THEN
3792:
3793: -- Debug info.
3794: /*IF g_debug THEN
3795: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'l_mixnmatch_enabled = '||l_mixnmatch_enabled);
3796: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'l_selected_datasources = '||l_selected_datasources);
3797: END IF;
3798: */
3799: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3792:
3793: -- Debug info.
3794: /*IF g_debug THEN
3795: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'l_mixnmatch_enabled = '||l_mixnmatch_enabled);
3796: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'l_selected_datasources = '||l_selected_datasources);
3797: END IF;
3798: */
3799: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3800: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_mixnmatch_enabled = '||l_mixnmatch_enabled,
3796: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'l_selected_datasources = '||l_selected_datasources);
3797: END IF;
3798: */
3799: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3800: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_mixnmatch_enabled = '||l_mixnmatch_enabled,
3801: p_msg_level=>fnd_log.level_statement);
3802: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_selected_datasources = '||l_selected_datasources,
3803: p_msg_level=>fnd_log.level_statement);
3804: END IF;
3798: */
3799: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3800: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_mixnmatch_enabled = '||l_mixnmatch_enabled,
3801: p_msg_level=>fnd_log.level_statement);
3802: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_selected_datasources = '||l_selected_datasources,
3803: p_msg_level=>fnd_log.level_statement);
3804: END IF;
3805:
3806: -- If data source is SST or user-entered, we need to check if the party exist.
3869: END IF;
3870:
3871: -- Debug info.
3872: /*IF g_debug THEN
3873: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'l_datasource_selected = '||l_datasource_selected);
3874: END IF;
3875: */
3876: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3877: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_datasource_selected = '||l_datasource_selected,
3873: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'l_datasource_selected = '||l_datasource_selected);
3874: END IF;
3875: */
3876: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3877: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_datasource_selected = '||l_datasource_selected,
3878: p_msg_level=>fnd_log.level_statement);
3879: END IF;
3880:
3881: -- Error out NOCOPY if the profile with this data source already exists.
4137:
4138: -- BES
4139:
4140: IF l_party_create_update_flag = 'C' THEN
4141: IF(HZ_UTILITY_V2PUB.G_EXECUTE_API_CALLOUTS in ('Y', 'EVENTS_ENABLED')) THEN
4142: HZ_BUSINESS_EVENT_V2PVT.create_organization_event(p_organization_rec);
4143: END IF;
4144:
4145: IF(HZ_UTILITY_V2PUB.G_EXECUTE_API_CALLOUTS in ('EVENTS_ENABLED', 'BO_EVENTS_ENABLED')) THEN
4141: IF(HZ_UTILITY_V2PUB.G_EXECUTE_API_CALLOUTS in ('Y', 'EVENTS_ENABLED')) THEN
4142: HZ_BUSINESS_EVENT_V2PVT.create_organization_event(p_organization_rec);
4143: END IF;
4144:
4145: IF(HZ_UTILITY_V2PUB.G_EXECUTE_API_CALLOUTS in ('EVENTS_ENABLED', 'BO_EVENTS_ENABLED')) THEN
4146: -- populate function for integration service
4147: HZ_POPULATE_BOT_PKG.pop_hz_organization_profiles(
4148: p_operation => 'I',
4149: p_organization_profile_id => x_profile_id);
4150: END IF;
4151: ELSE
4152: l_new_sst_organization_rec.party_rec.orig_system := p_organization_rec.party_rec.orig_system;
4153: l_sst_organization_rec.party_rec.orig_system := p_organization_rec.party_rec.orig_system;
4154: IF(HZ_UTILITY_V2PUB.G_EXECUTE_API_CALLOUTS in ('Y', 'EVENTS_ENABLED')) THEN
4155: HZ_BUSINESS_EVENT_V2PVT.update_organization_event(
4156: l_new_sst_organization_rec, l_sst_organization_rec);
4157: END IF;
4158:
4155: HZ_BUSINESS_EVENT_V2PVT.update_organization_event(
4156: l_new_sst_organization_rec, l_sst_organization_rec);
4157: END IF;
4158:
4159: IF(HZ_UTILITY_V2PUB.G_EXECUTE_API_CALLOUTS in ('EVENTS_ENABLED', 'BO_EVENTS_ENABLED')) THEN
4160: -- populate function for integration service
4161: HZ_POPULATE_BOT_PKG.pop_hz_organization_profiles(
4162: p_operation => 'U',
4163: p_organization_profile_id => x_profile_id);
4175:
4176: -- BES
4177:
4178: IF l_party_create_update_flag = 'C' THEN
4179: IF(HZ_UTILITY_V2PUB.G_EXECUTE_API_CALLOUTS in ('Y', 'EVENTS_ENABLED')) THEN
4180: HZ_BUSINESS_EVENT_V2PVT.create_person_event(p_person_rec);
4181: END IF;
4182:
4183: IF(HZ_UTILITY_V2PUB.G_EXECUTE_API_CALLOUTS in ('EVENTS_ENABLED', 'BO_EVENTS_ENABLED')) THEN
4179: IF(HZ_UTILITY_V2PUB.G_EXECUTE_API_CALLOUTS in ('Y', 'EVENTS_ENABLED')) THEN
4180: HZ_BUSINESS_EVENT_V2PVT.create_person_event(p_person_rec);
4181: END IF;
4182:
4183: IF(HZ_UTILITY_V2PUB.G_EXECUTE_API_CALLOUTS in ('EVENTS_ENABLED', 'BO_EVENTS_ENABLED')) THEN
4184: -- populate function for integration service
4185: HZ_POPULATE_BOT_PKG.pop_hz_person_profiles(
4186: p_operation => 'I',
4187: p_person_profile_id => x_profile_id);
4188: END IF;
4189: ELSE
4190: l_new_sst_person_rec.party_rec.orig_system := p_person_rec.party_rec.orig_system;
4191: l_sst_person_rec.party_rec.orig_system := p_person_rec.party_rec.orig_system;
4192: IF(HZ_UTILITY_V2PUB.G_EXECUTE_API_CALLOUTS in ('Y', 'EVENTS_ENABLED')) THEN
4193: HZ_BUSINESS_EVENT_V2PVT.update_person_event(
4194: l_new_sst_person_rec, l_sst_person_rec);
4195: END IF;
4196:
4193: HZ_BUSINESS_EVENT_V2PVT.update_person_event(
4194: l_new_sst_person_rec, l_sst_person_rec);
4195: END IF;
4196:
4197: IF(HZ_UTILITY_V2PUB.G_EXECUTE_API_CALLOUTS in ('EVENTS_ENABLED', 'BO_EVENTS_ENABLED')) THEN
4198: -- populate function for integration service
4199: HZ_POPULATE_BOT_PKG.pop_hz_person_profiles(
4200: p_operation => 'U',
4201: p_person_profile_id => x_profile_id);
4272: END IF;
4273:
4274: -- Debug info.
4275: /*IF g_debug THEN
4276: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_party (-)');
4277: END IF;
4278: */
4279: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
4280: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_party (-)',
4276: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_create_party (-)');
4277: END IF;
4278: */
4279: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
4280: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_create_party (-)',
4281: p_msg_level=>fnd_log.level_procedure);
4282: END IF;
4283:
4284: END do_create_party;
4376: BEGIN
4377:
4378: -- Debug info.
4379: /*IF g_debug THEN
4380: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_update_party (+)');
4381: END IF;
4382: */
4383: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
4384: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_update_party (+)',
4380: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_update_party (+)');
4381: END IF;
4382: */
4383: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
4384: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_update_party (+)',
4385: p_msg_level=>fnd_log.level_procedure);
4386: END IF;
4387:
4388: -- assign party record and find the data source.
4521: IF p_party_type IN ('PERSON', 'ORGANIZATION') THEN
4522:
4523: -- Debug info.
4524: /*IF g_debug THEN
4525: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'l_mixnmatch_enabled = '||l_mixnmatch_enabled);
4526: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'l_data_source_type = '||l_data_source_type);
4527: END IF;
4528: */
4529: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4522:
4523: -- Debug info.
4524: /*IF g_debug THEN
4525: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'l_mixnmatch_enabled = '||l_mixnmatch_enabled);
4526: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'l_data_source_type = '||l_data_source_type);
4527: END IF;
4528: */
4529: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4530: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_mixnmatch_enabled = '||l_mixnmatch_enabled,
4526: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'l_data_source_type = '||l_data_source_type);
4527: END IF;
4528: */
4529: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4530: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_mixnmatch_enabled = '||l_mixnmatch_enabled,
4531: p_msg_level=>fnd_log.level_statement);
4532: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_data_source_type = '||l_data_source_type,
4533: p_msg_level=>fnd_log.level_statement);
4534:
4528: */
4529: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4530: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_mixnmatch_enabled = '||l_mixnmatch_enabled,
4531: p_msg_level=>fnd_log.level_statement);
4532: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_data_source_type = '||l_data_source_type,
4533: p_msg_level=>fnd_log.level_statement);
4534:
4535: END IF;
4536:
4591: l_data_source_type);
4592:
4593: -- Debug info.
4594: /*IF g_debug THEN
4595: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'l_datasource_selected = '||l_datasource_selected);
4596: END IF;
4597: */
4598: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4599: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_datasource_selected = '||l_datasource_selected,
4595: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'l_datasource_selected = '||l_datasource_selected);
4596: END IF;
4597: */
4598: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4599: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_datasource_selected = '||l_datasource_selected,
4600: p_msg_level=>fnd_log.level_statement);
4601: END IF;
4602:
4603: IF l_datasource_selected = 'Y' THEN
4682: IF l_update_party = 'Y' THEN
4683:
4684: -- Debug info.
4685: /*IF g_debug THEN
4686: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'l_party_id = '||l_party_id);
4687: END IF;
4688: */
4689: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4690: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_party_id = '||l_party_id,
4686: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'l_party_id = '||l_party_id);
4687: END IF;
4688: */
4689: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4690: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_party_id = '||l_party_id,
4691: p_msg_level=>fnd_log.level_statement);
4692: END IF;
4693: ---------------Bug 4586451
4694: IF p_party_type ='ORGANIZATION'AND
4760: l_new_sst_organization_rec.party_rec.orig_system := p_organization_rec.party_rec.orig_system;
4761: l_sst_organization_rec.party_rec.orig_system := p_organization_rec.party_rec.orig_system;
4762: -- BES
4763:
4764: IF(HZ_UTILITY_V2PUB.G_EXECUTE_API_CALLOUTS in ('EVENTS_ENABLED', 'Y')) THEN
4765: HZ_BUSINESS_EVENT_V2PVT.update_organization_event(
4766: l_new_sst_organization_rec, l_sst_organization_rec);
4767: END IF;
4768:
4765: HZ_BUSINESS_EVENT_V2PVT.update_organization_event(
4766: l_new_sst_organization_rec, l_sst_organization_rec);
4767: END IF;
4768:
4769: IF(HZ_UTILITY_V2PUB.G_EXECUTE_API_CALLOUTS in ('EVENTS_ENABLED', 'BO_EVENTS_ENABLED')) THEN
4770: -- populate function for integration service
4771: HZ_POPULATE_BOT_PKG.pop_hz_organization_profiles(
4772: p_operation => 'U',
4773: p_organization_profile_id => x_profile_id);
4780: l_new_sst_person_rec.party_rec.orig_system := p_person_rec.party_rec.orig_system;
4781: l_sst_person_rec.party_rec.orig_system := p_person_rec.party_rec.orig_system;
4782: -- BES
4783:
4784: IF(HZ_UTILITY_V2PUB.G_EXECUTE_API_CALLOUTS in ('EVENTS_ENABLED', 'Y')) THEN
4785: HZ_BUSINESS_EVENT_V2PVT.update_person_event(
4786: l_new_sst_person_rec, l_sst_person_rec);
4787: END IF;
4788:
4785: HZ_BUSINESS_EVENT_V2PVT.update_person_event(
4786: l_new_sst_person_rec, l_sst_person_rec);
4787: END IF;
4788:
4789: IF(HZ_UTILITY_V2PUB.G_EXECUTE_API_CALLOUTS in ('EVENTS_ENABLED', 'BO_EVENTS_ENABLED')) THEN
4790: -- populate function for integration service
4791: HZ_POPULATE_BOT_PKG.pop_hz_person_profiles(
4792: p_operation => 'U',
4793: p_person_profile_id => x_profile_id);
4800: END IF;
4801:
4802: -- Debug info.
4803: /*IF g_debug THEN
4804: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_update_party (-)');
4805: END IF;
4806: */
4807: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
4808: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_update_party (-)',
4804: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'do_update_party (-)');
4805: END IF;
4806: */
4807: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
4808: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'do_update_party (-)',
4809: p_msg_level=>fnd_log.level_procedure);
4810: END IF;
4811:
4812:
4882: --enable_debug;
4883:
4884: -- Debug info.
4885: /*IF g_debug THEN
4886: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_person (+)');
4887: END IF;
4888: */
4889: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
4890: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'create_person (+)',
4886: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_person (+)');
4887: END IF;
4888: */
4889: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
4890: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'create_person (+)',
4891: p_msg_level=>fnd_log.level_procedure);
4892: END IF;
4893:
4894:
4971: p_data => x_msg_data);
4972:
4973: -- Debug info.
4974: /*IF g_debug THEN
4975: hz_utility_v2pub.debug_return_messages (
4976: x_msg_count, x_msg_data, 'WARNING');
4977: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_person (-)');
4978: END IF;
4979: */
4973: -- Debug info.
4974: /*IF g_debug THEN
4975: hz_utility_v2pub.debug_return_messages (
4976: x_msg_count, x_msg_data, 'WARNING');
4977: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_person (-)');
4978: END IF;
4979: */
4980: IF fnd_log.level_exception>=fnd_log.g_current_runtime_level THEN
4981: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
4977: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_person (-)');
4978: END IF;
4979: */
4980: IF fnd_log.level_exception>=fnd_log.g_current_runtime_level THEN
4981: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
4982: p_msg_data=>x_msg_data,
4983: p_msg_type=>'WARNING',
4984: p_msg_level=>fnd_log.level_exception);
4985: END IF;
4983: p_msg_type=>'WARNING',
4984: p_msg_level=>fnd_log.level_exception);
4985: END IF;
4986: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
4987: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'create_person (-)',
4988: p_msg_level=>fnd_log.level_procedure);
4989: END IF;
4990:
4991: -- Check if API is called in debug mode. If yes, disable debug.
5007: p_data => x_msg_data);
5008:
5009: -- Debug info.
5010: /*IF g_debug THEN
5011: hz_utility_v2pub.debug_return_messages (
5012: x_msg_count, x_msg_data, 'ERROR');
5013: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_person (-)');
5014: END IF;*/
5015:
5009: -- Debug info.
5010: /*IF g_debug THEN
5011: hz_utility_v2pub.debug_return_messages (
5012: x_msg_count, x_msg_data, 'ERROR');
5013: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_person (-)');
5014: END IF;*/
5015:
5016: IF fnd_log.level_error >= fnd_log.g_current_runtime_level THEN
5017: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5013: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_person (-)');
5014: END IF;*/
5015:
5016: IF fnd_log.level_error >= fnd_log.g_current_runtime_level THEN
5017: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5018: p_msg_data=>x_msg_data,
5019: p_msg_type=>'ERROR',
5020: p_msg_level=>fnd_log.level_error);
5021: END IF;
5019: p_msg_type=>'ERROR',
5020: p_msg_level=>fnd_log.level_error);
5021: END IF;
5022: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
5023: hz_utility_v2pub.debug(p_message=>'create_person (-)',
5024: p_prefix=>l_debug_prefix,
5025: p_msg_level=>fnd_log.level_procedure);
5026: END IF;
5027:
5043: p_data => x_msg_data);
5044:
5045: -- Debug info.
5046: /*IF g_debug THEN
5047: hz_utility_v2pub.debug_return_messages (
5048: x_msg_count, x_msg_data, 'UNEXPECTED ERROR');
5049: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_person (-)');
5050: END IF;
5051: */
5045: -- Debug info.
5046: /*IF g_debug THEN
5047: hz_utility_v2pub.debug_return_messages (
5048: x_msg_count, x_msg_data, 'UNEXPECTED ERROR');
5049: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_person (-)');
5050: END IF;
5051: */
5052: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
5053: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5049: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_person (-)');
5050: END IF;
5051: */
5052: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
5053: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5054: p_msg_data=>x_msg_data,
5055: p_msg_type=>'UNEXPECTED ERROR',
5056: p_msg_level=>fnd_log.level_error);
5057: END IF;
5055: p_msg_type=>'UNEXPECTED ERROR',
5056: p_msg_level=>fnd_log.level_error);
5057: END IF;
5058: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5059: hz_utility_v2pub.debug(p_message=>'create_person (-)',
5060: p_prefix=>l_debug_prefix,
5061: p_msg_level=>fnd_log.level_procedure);
5062: END IF;
5063:
5083: p_data => x_msg_data);
5084:
5085: -- Debug info.
5086: /*IF g_debug THEN
5087: hz_utility_v2pub.debug_return_messages (
5088: x_msg_count, x_msg_data, 'SQL ERROR');
5089: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_person (-)');
5090: END IF;
5091: */
5085: -- Debug info.
5086: /*IF g_debug THEN
5087: hz_utility_v2pub.debug_return_messages (
5088: x_msg_count, x_msg_data, 'SQL ERROR');
5089: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_person (-)');
5090: END IF;
5091: */
5092: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
5093: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5089: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_person (-)');
5090: END IF;
5091: */
5092: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
5093: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5094: p_msg_data=>x_msg_data,
5095: p_msg_type=>'SQL ERROR',
5096: p_msg_level=>fnd_log.level_error);
5097: END IF;
5095: p_msg_type=>'SQL ERROR',
5096: p_msg_level=>fnd_log.level_error);
5097: END IF;
5098: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5099: hz_utility_v2pub.debug(p_message=>'create_person (-)',
5100: p_prefix=>l_debug_prefix,
5101: p_msg_level=>fnd_log.level_procedure);
5102: END IF;
5103:
5232: --enable_debug;
5233:
5234: -- Debug info.
5235: /*IF g_debug THEN
5236: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_person (+)');
5237: END IF;
5238: */
5239: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5240: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'update_person (+)',
5236: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_person (+)');
5237: END IF;
5238: */
5239: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5240: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'update_person (+)',
5241: p_msg_level=>fnd_log.level_procedure);
5242: END IF;
5243:
5244: -- initialize message list if p_init_msg_list is set to TRUE.
5376: p_data => x_msg_data);
5377:
5378: -- Debug info.
5379: /*IF g_debug THEN
5380: hz_utility_v2pub.debug_return_messages (
5381: x_msg_count, x_msg_data, 'WARNING');
5382: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_person (-)');
5383: END IF;
5384: */
5378: -- Debug info.
5379: /*IF g_debug THEN
5380: hz_utility_v2pub.debug_return_messages (
5381: x_msg_count, x_msg_data, 'WARNING');
5382: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_person (-)');
5383: END IF;
5384: */
5385: IF fnd_log.level_exception>=fnd_log.g_current_runtime_level THEN
5386: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5382: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_person (-)');
5383: END IF;
5384: */
5385: IF fnd_log.level_exception>=fnd_log.g_current_runtime_level THEN
5386: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5387: p_msg_data=>x_msg_data,
5388: p_msg_type=>'WARNING',
5389: p_msg_level=>fnd_log.level_exception);
5390: END IF;
5388: p_msg_type=>'WARNING',
5389: p_msg_level=>fnd_log.level_exception);
5390: END IF;
5391: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5392: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'update_person (-)',
5393: p_msg_level=>fnd_log.level_procedure);
5394: END IF;
5395:
5396:
5413: p_data => x_msg_data);
5414:
5415: -- Debug info.
5416: /*IF g_debug THEN
5417: hz_utility_v2pub.debug_return_messages (
5418: x_msg_count, x_msg_data, 'ERROR');
5419: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_person (-)');
5420: END IF;
5421: */
5415: -- Debug info.
5416: /*IF g_debug THEN
5417: hz_utility_v2pub.debug_return_messages (
5418: x_msg_count, x_msg_data, 'ERROR');
5419: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_person (-)');
5420: END IF;
5421: */
5422: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
5423: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5419: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_person (-)');
5420: END IF;
5421: */
5422: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
5423: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5424: p_msg_data=>x_msg_data,
5425: p_msg_type=>'ERROR',
5426: p_msg_level=>fnd_log.level_error);
5427: END IF;
5425: p_msg_type=>'ERROR',
5426: p_msg_level=>fnd_log.level_error);
5427: END IF;
5428: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5429: hz_utility_v2pub.debug(p_message=>'update_person (-)',
5430: p_prefix=>l_debug_prefix,
5431: p_msg_level=>fnd_log.level_procedure);
5432: END IF;
5433:
5450: p_data => x_msg_data);
5451:
5452: -- Debug info.
5453: /*IF g_debug THEN
5454: hz_utility_v2pub.debug_return_messages (
5455: x_msg_count, x_msg_data, 'UNEXPECTED ERROR');
5456: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_person (-)');
5457: END IF;
5458: */
5452: -- Debug info.
5453: /*IF g_debug THEN
5454: hz_utility_v2pub.debug_return_messages (
5455: x_msg_count, x_msg_data, 'UNEXPECTED ERROR');
5456: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_person (-)');
5457: END IF;
5458: */
5459: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
5460: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5456: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_person (-)');
5457: END IF;
5458: */
5459: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
5460: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5461: p_msg_data=>x_msg_data,
5462: p_msg_type=>'UNEXPECTED ERROR',
5463: p_msg_level=>fnd_log.level_error);
5464: END IF;
5462: p_msg_type=>'UNEXPECTED ERROR',
5463: p_msg_level=>fnd_log.level_error);
5464: END IF;
5465: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5466: hz_utility_v2pub.debug(p_message=>'update_person (-)',
5467: p_prefix=>l_debug_prefix,
5468: p_msg_level=>fnd_log.level_procedure);
5469: END IF;
5470: -- Check if API is called in debug mode. If yes, disable debug.
5489: p_data => x_msg_data);
5490:
5491: -- Debug info.
5492: /*IF g_debug THEN
5493: hz_utility_v2pub.debug_return_messages (
5494: x_msg_count, x_msg_data, 'SQL ERROR');
5495: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_person (-)');
5496: END IF;
5497: */
5491: -- Debug info.
5492: /*IF g_debug THEN
5493: hz_utility_v2pub.debug_return_messages (
5494: x_msg_count, x_msg_data, 'SQL ERROR');
5495: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_person (-)');
5496: END IF;
5497: */
5498: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
5499: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5495: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_person (-)');
5496: END IF;
5497: */
5498: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
5499: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5500: p_msg_data=>x_msg_data,
5501: p_msg_type=>'SQL ERROR',
5502: p_msg_level=>fnd_log.level_error);
5503: END IF;
5501: p_msg_type=>'SQL ERROR',
5502: p_msg_level=>fnd_log.level_error);
5503: END IF;
5504: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5505: hz_utility_v2pub.debug(p_message=>'update_person (-)',
5506: p_prefix=>l_debug_prefix,
5507: p_msg_level=>fnd_log.level_procedure);
5508: END IF;
5509:
5573: --enable_debug;
5574:
5575: -- Debug info.
5576: /*IF g_debug THEN
5577: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_group (+)');
5578: END IF;
5579: */
5580: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5581: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'create_group (+)',
5577: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_group (+)');
5578: END IF;
5579: */
5580: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5581: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'create_group (+)',
5582: p_msg_level=>fnd_log.level_procedure);
5583: END IF;
5584:
5585: -- initialize message list if p_init_msg_list is set to TRUE.
5639: end if;
5640: END IF;
5641:
5642: -- Invoke business event system.
5643: IF(HZ_UTILITY_V2PUB.G_EXECUTE_API_CALLOUTS in ('Y', 'EVENTS_ENABLED')) THEN
5644: HZ_BUSINESS_EVENT_V2PVT.create_group_event (l_group_rec);
5645: END IF;
5646:
5647: -- enable policy function if it was enabled before calling
5658: p_data => x_msg_data);
5659:
5660: -- Debug info.
5661: /*IF g_debug THEN
5662: hz_utility_v2pub.debug_return_messages (
5663: x_msg_count, x_msg_data, 'WARNING');
5664: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_group (-)');
5665: END IF;
5666: */
5660: -- Debug info.
5661: /*IF g_debug THEN
5662: hz_utility_v2pub.debug_return_messages (
5663: x_msg_count, x_msg_data, 'WARNING');
5664: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_group (-)');
5665: END IF;
5666: */
5667: IF fnd_log.level_exception>=fnd_log.g_current_runtime_level THEN
5668: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5664: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_group (-)');
5665: END IF;
5666: */
5667: IF fnd_log.level_exception>=fnd_log.g_current_runtime_level THEN
5668: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5669: p_msg_data=>x_msg_data,
5670: p_msg_type=>'WARNING',
5671: p_msg_level=>fnd_log.level_exception);
5672: END IF;
5670: p_msg_type=>'WARNING',
5671: p_msg_level=>fnd_log.level_exception);
5672: END IF;
5673: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5674: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'create_group (-)',
5675: p_msg_level=>fnd_log.level_procedure);
5676: END IF;
5677:
5678:
5695: p_data => x_msg_data);
5696:
5697: -- Debug info.
5698: /*IF g_debug THEN
5699: hz_utility_v2pub.debug_return_messages (
5700: x_msg_count, x_msg_data, 'ERROR');
5701: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_group (-)');
5702: END IF;
5703: */
5697: -- Debug info.
5698: /*IF g_debug THEN
5699: hz_utility_v2pub.debug_return_messages (
5700: x_msg_count, x_msg_data, 'ERROR');
5701: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_group (-)');
5702: END IF;
5703: */
5704: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
5705: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5701: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_group (-)');
5702: END IF;
5703: */
5704: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
5705: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5706: p_msg_data=>x_msg_data,
5707: p_msg_type=>'ERROR',
5708: p_msg_level=>fnd_log.level_error);
5709: END IF;
5707: p_msg_type=>'ERROR',
5708: p_msg_level=>fnd_log.level_error);
5709: END IF;
5710: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5711: hz_utility_v2pub.debug(p_message=>'create_group (-)',
5712: p_prefix=>l_debug_prefix,
5713: p_msg_level=>fnd_log.level_procedure);
5714: END IF;
5715:
5731: p_data => x_msg_data);
5732:
5733: -- Debug info.
5734: /*IF g_debug THEN
5735: hz_utility_v2pub.debug_return_messages (
5736: x_msg_count, x_msg_data, 'UNEXPECTED ERROR');
5737: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_group (-)');
5738: END IF;
5739: */
5733: -- Debug info.
5734: /*IF g_debug THEN
5735: hz_utility_v2pub.debug_return_messages (
5736: x_msg_count, x_msg_data, 'UNEXPECTED ERROR');
5737: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_group (-)');
5738: END IF;
5739: */
5740: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
5741: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5737: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_group (-)');
5738: END IF;
5739: */
5740: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
5741: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5742: p_msg_data=>x_msg_data,
5743: p_msg_type=>'UNEXPECTED ERROR',
5744: p_msg_level=>fnd_log.level_error);
5745: END IF;
5743: p_msg_type=>'UNEXPECTED ERROR',
5744: p_msg_level=>fnd_log.level_error);
5745: END IF;
5746: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5747: hz_utility_v2pub.debug(p_message=>'create_group (-)',
5748: p_prefix=>l_debug_prefix,
5749: p_msg_level=>fnd_log.level_procedure);
5750: END IF;
5751:
5771: p_data => x_msg_data);
5772:
5773: -- Debug info.
5774: /*IF g_debug THEN
5775: hz_utility_v2pub.debug_return_messages (
5776: x_msg_count, x_msg_data, 'SQL ERROR');
5777: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_group (-)');
5778: END IF;
5779: */
5773: -- Debug info.
5774: /*IF g_debug THEN
5775: hz_utility_v2pub.debug_return_messages (
5776: x_msg_count, x_msg_data, 'SQL ERROR');
5777: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_group (-)');
5778: END IF;
5779: */
5780: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
5781: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5777: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_group (-)');
5778: END IF;
5779: */
5780: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
5781: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5782: p_msg_data=>x_msg_data,
5783: p_msg_type=>'SQL ERROR',
5784: p_msg_level=>fnd_log.level_error);
5785: END IF;
5783: p_msg_type=>'SQL ERROR',
5784: p_msg_level=>fnd_log.level_error);
5785: END IF;
5786: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5787: hz_utility_v2pub.debug(p_message=>'create_group (-)',
5788: p_prefix=>l_debug_prefix,
5789: p_msg_level=>fnd_log.level_procedure);
5790: END IF;
5791:
5856: --enable_debug;
5857:
5858: -- Debug info.
5859: /*IF g_debug THEN
5860: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_group (+)');
5861: END IF;
5862: */
5863: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5864: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'update_group (+)',
5860: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_group (+)');
5861: END IF;
5862: */
5863: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5864: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'update_group (+)',
5865: p_msg_level=>fnd_log.level_procedure);
5866: END IF;
5867:
5868:
5974: p_organization_rec => G_MISS_ORGANIZATION_REC,
5975: p_person_rec => G_MISS_PERSON_REC );
5976:
5977: -- Invoke business event system.
5978: IF(HZ_UTILITY_V2PUB.G_EXECUTE_API_CALLOUTS in ('Y', 'EVENTS_ENABLED')) THEN
5979: HZ_BUSINESS_EVENT_V2PVT.update_group_event (l_group_rec , l_old_group_rec);
5980: END IF;
5981:
5982: -- enable policy function if it was enabled before calling
5993: p_data => x_msg_data);
5994:
5995: -- Debug info.
5996: /*IF g_debug THEN
5997: hz_utility_v2pub.debug_return_messages (
5998: x_msg_count, x_msg_data, 'WARNING');
5999: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_group (-)');
6000: END IF;
6001: */
5995: -- Debug info.
5996: /*IF g_debug THEN
5997: hz_utility_v2pub.debug_return_messages (
5998: x_msg_count, x_msg_data, 'WARNING');
5999: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_group (-)');
6000: END IF;
6001: */
6002: IF fnd_log.level_exception>=fnd_log.g_current_runtime_level THEN
6003: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
5999: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_group (-)');
6000: END IF;
6001: */
6002: IF fnd_log.level_exception>=fnd_log.g_current_runtime_level THEN
6003: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6004: p_msg_data=>x_msg_data,
6005: p_msg_type=>'WARNING',
6006: p_msg_level=>fnd_log.level_exception);
6007: END IF;
6005: p_msg_type=>'WARNING',
6006: p_msg_level=>fnd_log.level_exception);
6007: END IF;
6008: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6009: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'update_group (-)',
6010: p_msg_level=>fnd_log.level_procedure);
6011: END IF;
6012:
6013: -- Check if API is called in debug mode. If yes, disable debug.
6029: p_data => x_msg_data);
6030:
6031: -- Debug info.
6032: /*IF g_debug THEN
6033: hz_utility_v2pub.debug_return_messages (
6034: x_msg_count, x_msg_data, 'ERROR');
6035: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_group (-)');
6036: END IF;
6037: */
6031: -- Debug info.
6032: /*IF g_debug THEN
6033: hz_utility_v2pub.debug_return_messages (
6034: x_msg_count, x_msg_data, 'ERROR');
6035: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_group (-)');
6036: END IF;
6037: */
6038: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
6039: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6035: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_group (-)');
6036: END IF;
6037: */
6038: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
6039: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6040: p_msg_data=>x_msg_data,
6041: p_msg_type=>'ERROR',
6042: p_msg_level=>fnd_log.level_error);
6043: END IF;
6041: p_msg_type=>'ERROR',
6042: p_msg_level=>fnd_log.level_error);
6043: END IF;
6044: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6045: hz_utility_v2pub.debug(p_message=>'update_group (-)',
6046: p_prefix=>l_debug_prefix,
6047: p_msg_level=>fnd_log.level_procedure);
6048: END IF;
6049:
6065: p_data => x_msg_data);
6066:
6067: -- Debug info.
6068: /*IF g_debug THEN
6069: hz_utility_v2pub.debug_return_messages (
6070: x_msg_count, x_msg_data, 'UNEXPECTED ERROR');
6071: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_group (-)');
6072: END IF;
6073: */
6067: -- Debug info.
6068: /*IF g_debug THEN
6069: hz_utility_v2pub.debug_return_messages (
6070: x_msg_count, x_msg_data, 'UNEXPECTED ERROR');
6071: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_group (-)');
6072: END IF;
6073: */
6074: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
6075: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6071: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_group (-)');
6072: END IF;
6073: */
6074: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
6075: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6076: p_msg_data=>x_msg_data,
6077: p_msg_type=>'UNEXPECTED ERROR',
6078: p_msg_level=>fnd_log.level_error);
6079: END IF;
6077: p_msg_type=>'UNEXPECTED ERROR',
6078: p_msg_level=>fnd_log.level_error);
6079: END IF;
6080: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6081: hz_utility_v2pub.debug(p_message=>'update_group (-)',
6082: p_prefix=>l_debug_prefix,
6083: p_msg_level=>fnd_log.level_procedure);
6084: END IF;
6085:
6105: p_data => x_msg_data);
6106:
6107: -- Debug info.
6108: /*IF g_debug THEN
6109: hz_utility_v2pub.debug_return_messages (
6110: x_msg_count, x_msg_data, 'SQL ERROR');
6111: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_group (-)');
6112: END IF;
6113: */
6107: -- Debug info.
6108: /*IF g_debug THEN
6109: hz_utility_v2pub.debug_return_messages (
6110: x_msg_count, x_msg_data, 'SQL ERROR');
6111: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_group (-)');
6112: END IF;
6113: */
6114: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
6115: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6111: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_group (-)');
6112: END IF;
6113: */
6114: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
6115: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6116: p_msg_data=>x_msg_data,
6117: p_msg_type=>'SQL ERROR',
6118: p_msg_level=>fnd_log.level_error);
6119: END IF;
6117: p_msg_type=>'SQL ERROR',
6118: p_msg_level=>fnd_log.level_error);
6119: END IF;
6120: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6121: hz_utility_v2pub.debug(p_message=>'update_group (-)',
6122: p_prefix=>l_debug_prefix,
6123: p_msg_level=>fnd_log.level_procedure);
6124: END IF;
6125:
6198: --enable_debug;
6199:
6200: -- Debug info.
6201: /*IF g_debug THEN
6202: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_organization (+)');
6203: END IF;
6204: */
6205:
6206: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6203: END IF;
6204: */
6205:
6206: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6207: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'create_organization (+)',
6208: p_msg_level=>fnd_log.level_procedure);
6209: END IF;
6210:
6211:
6218: x_return_status := FND_API.G_RET_STS_SUCCESS;
6219:
6220: -- Debug info.
6221: /*IF g_debug THEN
6222: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'before LoadDataSources (+)');
6223: END IF;
6224: */
6225: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6226: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'before LoadDataSources (+)',
6222: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'before LoadDataSources (+)');
6223: END IF;
6224: */
6225: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6226: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'before LoadDataSources (+)',
6227: p_msg_level=>fnd_log.level_procedure);
6228: END IF;
6229:
6230: -- enable policy function if it is disabled.
6243: -- END IF;
6244:
6245: -- Debug info.
6246: /*IF g_debug THEN
6247: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'after LoadDataSources (+)');
6248: END IF;
6249: */
6250: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6251: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'after LoadDataSources (+)',
6247: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'after LoadDataSources (+)');
6248: END IF;
6249: */
6250: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6251: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'after LoadDataSources (+)',
6252: p_msg_level=>fnd_log.level_procedure);
6253: END IF;
6254:
6255: -- call to business logic.
6323: p_data => x_msg_data);
6324:
6325: -- Debug info.
6326: /*IF g_debug THEN
6327: hz_utility_v2pub.debug_return_messages(x_msg_count,
6328: x_msg_data, 'WARNING');
6329: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_organization (-)');
6330: END IF;
6331: */
6325: -- Debug info.
6326: /*IF g_debug THEN
6327: hz_utility_v2pub.debug_return_messages(x_msg_count,
6328: x_msg_data, 'WARNING');
6329: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_organization (-)');
6330: END IF;
6331: */
6332: IF fnd_log.level_exception>=fnd_log.g_current_runtime_level THEN
6333: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6329: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_organization (-)');
6330: END IF;
6331: */
6332: IF fnd_log.level_exception>=fnd_log.g_current_runtime_level THEN
6333: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6334: p_msg_data=>x_msg_data,
6335: p_msg_type=>'WARNING',
6336: p_msg_level=>fnd_log.level_exception);
6337: END IF;
6335: p_msg_type=>'WARNING',
6336: p_msg_level=>fnd_log.level_exception);
6337: END IF;
6338: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6339: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'create_organization (-)',
6340: p_msg_level=>fnd_log.level_procedure);
6341: END IF;
6342:
6343:
6360: p_data => x_msg_data);
6361:
6362: -- Debug info.
6363: /*IF g_debug THEN
6364: hz_utility_v2pub.debug_return_messages (
6365: x_msg_count, x_msg_data, 'ERROR');
6366: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_organization (-)');
6367: END IF;
6368: */
6362: -- Debug info.
6363: /*IF g_debug THEN
6364: hz_utility_v2pub.debug_return_messages (
6365: x_msg_count, x_msg_data, 'ERROR');
6366: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_organization (-)');
6367: END IF;
6368: */
6369: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
6370: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6366: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_organization (-)');
6367: END IF;
6368: */
6369: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
6370: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6371: p_msg_data=>x_msg_data,
6372: p_msg_type=>'ERROR',
6373: p_msg_level=>fnd_log.level_error);
6374: END IF;
6372: p_msg_type=>'ERROR',
6373: p_msg_level=>fnd_log.level_error);
6374: END IF;
6375: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6376: hz_utility_v2pub.debug(p_message=>'create_organization (-)',
6377: p_prefix=>l_debug_prefix,
6378: p_msg_level=>fnd_log.level_procedure);
6379: END IF;
6380:
6396: p_data => x_msg_data);
6397:
6398: -- Debug info.
6399: /*IF g_debug THEN
6400: hz_utility_v2pub.debug_return_messages (
6401: x_msg_count, x_msg_data, 'UNEXPECTED ERROR');
6402: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_organization (-)');
6403: END IF;
6404: */
6398: -- Debug info.
6399: /*IF g_debug THEN
6400: hz_utility_v2pub.debug_return_messages (
6401: x_msg_count, x_msg_data, 'UNEXPECTED ERROR');
6402: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_organization (-)');
6403: END IF;
6404: */
6405: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
6406: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6402: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_organization (-)');
6403: END IF;
6404: */
6405: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
6406: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6407: p_msg_data=>x_msg_data,
6408: p_msg_type=>'UNEXPECTED ERROR',
6409: p_msg_level=>fnd_log.level_error);
6410: END IF;
6408: p_msg_type=>'UNEXPECTED ERROR',
6409: p_msg_level=>fnd_log.level_error);
6410: END IF;
6411: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6412: hz_utility_v2pub.debug(p_message=>'create_organization (-)',
6413: p_prefix=>l_debug_prefix,
6414: p_msg_level=>fnd_log.level_procedure);
6415: END IF;
6416:
6436: p_data => x_msg_data);
6437:
6438: -- Debug info.
6439: /*IF g_debug THEN
6440: hz_utility_v2pub.debug_return_messages (
6441: x_msg_count, x_msg_data, 'SQL ERROR');
6442: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_organization (-)');
6443: END IF;
6444: */
6438: -- Debug info.
6439: /*IF g_debug THEN
6440: hz_utility_v2pub.debug_return_messages (
6441: x_msg_count, x_msg_data, 'SQL ERROR');
6442: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_organization (-)');
6443: END IF;
6444: */
6445: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
6446: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6442: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'create_organization (-)');
6443: END IF;
6444: */
6445: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
6446: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6447: p_msg_data=>x_msg_data,
6448: p_msg_type=>'SQL ERROR',
6449: p_msg_level=>fnd_log.level_error);
6450: END IF;
6448: p_msg_type=>'SQL ERROR',
6449: p_msg_level=>fnd_log.level_error);
6450: END IF;
6451: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6452: hz_utility_v2pub.debug(p_message=>'create_organization (-)',
6453: p_prefix=>l_debug_prefix,
6454: p_msg_level=>fnd_log.level_procedure);
6455: END IF;
6456:
6598: --enable_debug;
6599:
6600: -- Debug info.
6601: /*IF g_debug THEN
6602: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_organization (+)');
6603: END IF;
6604: */
6605:
6606: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6603: END IF;
6604: */
6605:
6606: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6607: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'update_organization (+)',
6608: p_msg_level=>fnd_log.level_procedure);
6609: END IF;
6610:
6611:
6730: p_group_rec => G_MISS_GROUP_REC );
6731:
6732:
6733: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6734: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'Before the Supplier Denorm Call',
6735: p_msg_level=>fnd_log.level_procedure);
6736: END IF;
6737:
6738: AP_TCA_SUPPLIER_SYNC_PKG.SYNC_Supplier(x_return_status => x_return_status,
6746: RAISE fnd_api.g_exc_unexpected_error;
6747: END IF;
6748:
6749: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6750: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'After the Supplier Denorm Call',
6751: p_msg_level=>fnd_log.level_procedure);
6752: END IF;
6753:
6754: IF l_old_organization_rec.actual_content_source IN
6793: p_data => x_msg_data);
6794:
6795: -- Debug info.
6796: /*IF g_debug THEN
6797: hz_utility_v2pub.debug_return_messages (
6798: x_msg_count, x_msg_data, 'WARNING');
6799: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_organization (-)');
6800: END IF;
6801: */
6795: -- Debug info.
6796: /*IF g_debug THEN
6797: hz_utility_v2pub.debug_return_messages (
6798: x_msg_count, x_msg_data, 'WARNING');
6799: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_organization (-)');
6800: END IF;
6801: */
6802: IF fnd_log.level_exception>=fnd_log.g_current_runtime_level THEN
6803: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6799: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_organization (-)');
6800: END IF;
6801: */
6802: IF fnd_log.level_exception>=fnd_log.g_current_runtime_level THEN
6803: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6804: p_msg_data=>x_msg_data,
6805: p_msg_type=>'WARNING',
6806: p_msg_level=>fnd_log.level_exception);
6807: END IF;
6805: p_msg_type=>'WARNING',
6806: p_msg_level=>fnd_log.level_exception);
6807: END IF;
6808: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6809: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'update_organization (-)',
6810: p_msg_level=>fnd_log.level_procedure);
6811: END IF;
6812:
6813: -- Check if API is called in debug mode. If yes, disable debug.
6829: p_data => x_msg_data);
6830:
6831: -- Debug info.
6832: /*IF g_debug THEN
6833: hz_utility_v2pub.debug_return_messages (
6834: x_msg_count, x_msg_data, 'ERROR');
6835: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_organization (-)');
6836: END IF;
6837: */
6831: -- Debug info.
6832: /*IF g_debug THEN
6833: hz_utility_v2pub.debug_return_messages (
6834: x_msg_count, x_msg_data, 'ERROR');
6835: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_organization (-)');
6836: END IF;
6837: */
6838: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
6839: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6835: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_organization (-)');
6836: END IF;
6837: */
6838: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
6839: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6840: p_msg_data=>x_msg_data,
6841: p_msg_type=>'ERROR',
6842: p_msg_level=>fnd_log.level_error);
6843: END IF;
6841: p_msg_type=>'ERROR',
6842: p_msg_level=>fnd_log.level_error);
6843: END IF;
6844: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6845: hz_utility_v2pub.debug(p_message=>'update_organization (-)',
6846: p_prefix=>l_debug_prefix,
6847: p_msg_level=>fnd_log.level_procedure);
6848: END IF;
6849:
6865: p_data => x_msg_data);
6866:
6867: -- Debug info.
6868: /*IF g_debug THEN
6869: hz_utility_v2pub.debug_return_messages (
6870: x_msg_count, x_msg_data, 'UNEXPECTED ERROR');
6871: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_organization (-)');
6872: END IF;
6873: */
6867: -- Debug info.
6868: /*IF g_debug THEN
6869: hz_utility_v2pub.debug_return_messages (
6870: x_msg_count, x_msg_data, 'UNEXPECTED ERROR');
6871: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_organization (-)');
6872: END IF;
6873: */
6874: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
6875: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6871: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_organization (-)');
6872: END IF;
6873: */
6874: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
6875: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6876: p_msg_data=>x_msg_data,
6877: p_msg_type=>'UNEXPECTED ERROR',
6878: p_msg_level=>fnd_log.level_error);
6879: END IF;
6877: p_msg_type=>'UNEXPECTED ERROR',
6878: p_msg_level=>fnd_log.level_error);
6879: END IF;
6880: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6881: hz_utility_v2pub.debug(p_message=>'update_organization (-)',
6882: p_prefix=>l_debug_prefix,
6883: p_msg_level=>fnd_log.level_procedure);
6884: END IF;
6885:
6906: p_data => x_msg_data);
6907:
6908: -- Debug info.
6909: /*IF g_debug THEN
6910: hz_utility_v2pub.debug_return_messages (
6911: x_msg_count, x_msg_data, 'SQL ERROR');
6912: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_organization (-)');
6913: END IF;
6914: */
6908: -- Debug info.
6909: /*IF g_debug THEN
6910: hz_utility_v2pub.debug_return_messages (
6911: x_msg_count, x_msg_data, 'SQL ERROR');
6912: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_organization (-)');
6913: END IF;
6914: */
6915: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
6916: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6912: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'update_organization (-)');
6913: END IF;
6914: */
6915: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
6916: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
6917: p_msg_data=>x_msg_data,
6918: p_msg_type=>'SQL ERROR',
6919: p_msg_level=>fnd_log.level_error);
6920: END IF;
6918: p_msg_type=>'SQL ERROR',
6919: p_msg_level=>fnd_log.level_error);
6920: END IF;
6921: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6922: hz_utility_v2pub.debug(p_message=>'update_organization (-)',
6923: p_prefix=>l_debug_prefix,
6924: p_msg_level=>fnd_log.level_procedure);
6925: END IF;
6926:
8179: p_organization_rec.GLOBAL_FAILURE_SCORE
8180: is not null) )
8181: THEN
8182: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8183: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'copy record from ORGANIZATION_REC_TYPE '||
8184: 'to CREDIT_RATINGS_REC_TYPE (+)',
8185: p_msg_level=>fnd_log.level_procedure);
8186: END IF;
8187:
8241: l_credit_rating_rec.rated_as_of_date := to_date(null);
8242: END IF;
8243:
8244: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8245: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'copy record from ORGANIZATION_REC_TYPE '||
8246: 'to CREDIT_RATINGS_REC_TYPE (-)',
8247: p_msg_level=>fnd_log.level_procedure);
8248: END IF;
8249:
8250:
8251:
8252: IF p_create_update_flag='C' THEN
8253: /*IF g_debug THEN
8254: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'call to create credit_rating (+)');
8255: END IF;
8256: */
8257: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8258: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'call to create credit_rating (+)',
8254: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'call to create credit_rating (+)');
8255: END IF;
8256: */
8257: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8258: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'call to create credit_rating (+)',
8259: p_msg_level=>fnd_log.level_procedure);
8260: END IF;
8261: /*
8262: org_rec_to_cr_rec(
8283: );
8284:
8285:
8286: /*IF g_debug THEN
8287: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'call to create credit_rating (-)');
8288: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'x_return_status = '||x_return_status);
8289: END IF;
8290: */
8291: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8284:
8285:
8286: /*IF g_debug THEN
8287: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'call to create credit_rating (-)');
8288: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'x_return_status = '||x_return_status);
8289: END IF;
8290: */
8291: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8292: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'call to create credit_rating (-)',
8288: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'x_return_status = '||x_return_status);
8289: END IF;
8290: */
8291: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8292: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'call to create credit_rating (-)',
8293: p_msg_level=>fnd_log.level_procedure);
8294:
8295: END IF;
8296: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8293: p_msg_level=>fnd_log.level_procedure);
8294:
8295: END IF;
8296: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8297: hz_utility_v2pub.debug(p_message=>'x_return_status = '||x_return_status,
8298: p_prefix =>l_debug_prefix,
8299: p_msg_level=>fnd_log.level_statement);
8300: END IF;
8301: ELSE
8299: p_msg_level=>fnd_log.level_statement);
8300: END IF;
8301: ELSE
8302: /*IF g_debug THEN
8303: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'call to update credit rating (+)');
8304: END IF;
8305: */
8306: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8307: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'call to update credit rating (+)',
8303: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'call to update credit rating (+)');
8304: END IF;
8305: */
8306: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8307: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'call to update credit rating (+)',
8308: p_msg_level=>fnd_log.level_procedure);
8309: END IF;
8310:
8311: -- get the latest record for one party_id
8316: WHERE party_id = p_organization_rec.party_rec.party_id
8317: AND actual_content_source = G_MISS_CONTENT_SOURCE_TYPE;
8318:
8319: /*IF g_debug THEN
8320: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'l_rated_as_of_date = ' || l_rated_as_of_date);
8321: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'p_organization_rec.party_rec.party_id = ' ||
8322: p_organization_rec.party_rec.party_id);
8323: END IF;
8324: */
8317: AND actual_content_source = G_MISS_CONTENT_SOURCE_TYPE;
8318:
8319: /*IF g_debug THEN
8320: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'l_rated_as_of_date = ' || l_rated_as_of_date);
8321: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'p_organization_rec.party_rec.party_id = ' ||
8322: p_organization_rec.party_rec.party_id);
8323: END IF;
8324: */
8325: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8322: p_organization_rec.party_rec.party_id);
8323: END IF;
8324: */
8325: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8326: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_rated_as_of_date = ' || l_rated_as_of_date,
8327: p_msg_level=>fnd_log.level_statement);
8328: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'p_organization_rec.party_rec.party_id = ' ||
8329: p_organization_rec.party_rec.party_id,
8330: p_msg_level=>fnd_log.level_statement);
8324: */
8325: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8326: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_rated_as_of_date = ' || l_rated_as_of_date,
8327: p_msg_level=>fnd_log.level_statement);
8328: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'p_organization_rec.party_rec.party_id = ' ||
8329: p_organization_rec.party_rec.party_id,
8330: p_msg_level=>fnd_log.level_statement);
8331:
8332: END IF;
8362: AND ROWNUM = 1;
8363: END;
8364:
8365: /*IF g_debug THEN
8366: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'l_credit_rating_id = ' || l_credit_rating_id);
8367: END IF;
8368: */
8369: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8370: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_credit_rating_id = ' || l_credit_rating_id,
8366: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'l_credit_rating_id = ' || l_credit_rating_id);
8367: END IF;
8368: */
8369: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8370: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_credit_rating_id = ' || l_credit_rating_id,
8371: p_msg_level=>fnd_log.level_statement);
8372: END IF;
8373: /*
8374: org_rec_to_cr_rec (
8378: */
8379: l_credit_rating_rec.credit_rating_id := l_credit_rating_id;
8380:
8381: /*IF g_debug THEN
8382: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'l_credit_rating_rec.credit_rating_id= ' ||
8383: l_credit_rating_rec.credit_rating_id);
8384: END IF;
8385: */
8386: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8383: l_credit_rating_rec.credit_rating_id);
8384: END IF;
8385: */
8386: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8387: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'l_credit_rating_rec.credit_rating_id= ' ||
8388: l_credit_rating_rec.credit_rating_id,
8389: p_msg_level=>fnd_log.level_statement);
8390: END IF;
8391: /*
8406: x_msg_data => l_msg_data
8407: );
8408:
8409: /*IF g_debug THEN
8410: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'call to update credit rating (-)');
8411: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'x_return_status = '||x_return_status);
8412: END IF;
8413: */
8414: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8407: );
8408:
8409: /*IF g_debug THEN
8410: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'call to update credit rating (-)');
8411: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'x_return_status = '||x_return_status);
8412: END IF;
8413: */
8414: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8415: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'call to update credit rating (-)',
8411: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'x_return_status = '||x_return_status);
8412: END IF;
8413: */
8414: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8415: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'call to update credit rating (-)',
8416: p_msg_level=>fnd_log.level_procedure);
8417: END IF;
8418: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8419: hz_utility_v2pub.debug(p_message=>'x_return_status = '||x_return_status,
8415: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'call to update credit rating (-)',
8416: p_msg_level=>fnd_log.level_procedure);
8417: END IF;
8418: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8419: hz_utility_v2pub.debug(p_message=>'x_return_status = '||x_return_status,
8420: p_prefix =>l_debug_prefix,
8421: p_msg_level=>fnd_log.level_statement);
8422: END IF;
8423: END IF;
8446:
8447: IF p_create_update_flag = 'C' THEN
8448:
8449: /*IF g_debug THEN
8450: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'copy record from ORGANIZATION_REC_TYPE '||
8451: 'to CREDIT_RATINGS_REC_TYPE for create (+)');
8452: END IF;
8453: */
8454: /*
8452: END IF;
8453: */
8454: /*
8455: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8456: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'copy record from ORGANIZATION_REC_TYPE '||
8457: 'to CREDIT_RATINGS_REC_TYPE for create (+)',
8458: p_msg_level=>fnd_log.level_procedure);
8459: END IF;
8460:
8507: x_credit_rating_rec.GLOBAL_FAILURE_SCORE := p_organization_rec.GLOBAL_FAILURE_SCORE;
8508:
8509:
8510: /*IF g_debug THEN
8511: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'copy record from ORGANIZATION_REC_TYPE '||
8512: 'to CREDIT_RATINGS_REC_TYPE for create (-)');
8513: END IF;
8514: */
8515: /*
8513: END IF;
8514: */
8515: /*
8516: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8517: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'copy record from ORGANIZATION_REC_TYPE '||
8518: 'to CREDIT_RATINGS_REC_TYPE for create (-)',
8519: p_msg_level=>fnd_log.level_procedure);
8520: END IF;
8521: ELSE
8519: p_msg_level=>fnd_log.level_procedure);
8520: END IF;
8521: ELSE
8522: /*IF g_debug THEN
8523: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'copy record from ORGANIZATION_REC_TYPE '||
8524: 'to CREDIT_RATINGS_REC_TYPE for update(+)');
8525: END IF;
8526: */
8527: /*
8525: END IF;
8526: */
8527: /*
8528: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8529: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'copy record from ORGANIZATION_REC_TYPE '||
8530: 'to CREDIT_RATINGS_REC_TYPE for update(+)',
8531: p_msg_level=>fnd_log.level_procedure);
8532: END IF;
8533:
8803:
8804: x_credit_rating_rec.rated_as_of_date := sysdate;
8805:
8806: /*IF g_debug THEN
8807: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,'copy record from ORGANIZATION_REC_TYPE '||
8808: 'to CREDIT_RATINGS_REC_TYPE for update(-)');
8809: END IF;
8810: */
8811: /*
8809: END IF;
8810: */
8811: /*
8812: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
8813: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'copy record from ORGANIZATION_REC_TYPE '||
8814: 'to CREDIT_RATINGS_REC_TYPE for update(-)',
8815: p_msg_level=>fnd_log.level_procedure);
8816: END IF;
8817: END IF;
9021:
9022: BEGIN
9023:
9024: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
9025: hz_utility_v2pub.debug (
9026: p_message => 'validate_party_name (+)',
9027: p_prefix => '',
9028: p_msg_level => fnd_log.level_procedure
9029: );
9046: END IF;
9047: CLOSE c_supplier;
9048:
9049: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
9050: hz_utility_v2pub.debug (
9051: p_message => 'validate_party_name (-)',
9052: p_prefix => '',
9053: p_msg_level => fnd_log.level_procedure
9054: );