409:
410: BEGIN
411:
412: -- Debug info.
413: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
414: hz_utility_v2pub.debug(p_message=>'do_create_rel (+)',
415: p_prefix=>l_debug_prefix,
416: p_msg_level=>fnd_log.level_procedure);
417: END IF;
412: -- Debug info.
413: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
414: hz_utility_v2pub.debug(p_message=>'do_create_rel (+)',
415: p_prefix=>l_debug_prefix,
416: p_msg_level=>fnd_log.level_procedure);
417: END IF;
418:
419: -- Generate primary key from sequence if not passed in. If this values already exists in
420: -- the database, keep generating till a unique value is found.
464:
465: x_relationship_id := l_relationship_id;
466:
467: -- Debug info.
468: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
469: hz_utility_v2pub.debug(p_message=>'Obtained relationship_id : '||x_relationship_id,
470: p_prefix =>l_debug_prefix,
471: p_msg_level=>fnd_log.level_statement);
472: END IF;
467: -- Debug info.
468: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
469: hz_utility_v2pub.debug(p_message=>'Obtained relationship_id : '||x_relationship_id,
470: p_prefix =>l_debug_prefix,
471: p_msg_level=>fnd_log.level_statement);
472: END IF;
473:
474:
475: -- validate the relationship record
508: RAISE FND_API.G_EXC_ERROR;
509: END IF;
510:
511: -- Debug info.
512: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
513: hz_utility_v2pub.debug(p_message=>'relationship type record found',
514: p_prefix =>l_debug_prefix,
515: p_msg_level=>fnd_log.level_statement);
516: END IF;
511: -- Debug info.
512: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
513: hz_utility_v2pub.debug(p_message=>'relationship type record found',
514: p_prefix =>l_debug_prefix,
515: p_msg_level=>fnd_log.level_statement);
516: END IF;
517:
518:
519: -- decide who is parent and who is child in this relationship.
639: p_relationship_rec.object_table_name = 'HZ_PARTIES'
640: THEN
641:
642: -- Debug info.
643: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
644: hz_utility_v2pub.debug(p_message=>'creating relationship party',
645: p_prefix =>l_debug_prefix,
646: p_msg_level=>fnd_log.level_statement);
647: END IF;
642: -- Debug info.
643: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
644: hz_utility_v2pub.debug(p_message=>'creating relationship party',
645: p_prefix =>l_debug_prefix,
646: p_msg_level=>fnd_log.level_statement);
647: END IF;
648:
649:
650: x_created_party := 'Y';
693: p_relationship_rec.object_table_name = 'HZ_PARTIES'
694: THEN
695:
696: -- Debug info.
697: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
698: hz_utility_v2pub.debug(p_message=>'denormalizing to hz_parties',
699: p_prefix =>l_debug_prefix,
700: p_msg_level=>fnd_log.level_statement);
701: END IF;
696: -- Debug info.
697: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
698: hz_utility_v2pub.debug(p_message=>'denormalizing to hz_parties',
699: p_prefix =>l_debug_prefix,
700: p_msg_level=>fnd_log.level_statement);
701: END IF;
702:
703:
704: do_update_party_flags(
708:
709: p_relationship_rec.relationship_id := l_relationship_id;
710:
711: -- Debug info.
712: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
713: hz_utility_v2pub.debug(p_message=>'HZ_RELATIONSHIPS_PKG.Insert_Row-1 (+)',
714: p_prefix=>l_debug_prefix,
715: p_msg_level=>fnd_log.level_procedure);
716: END IF;
711: -- Debug info.
712: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
713: hz_utility_v2pub.debug(p_message=>'HZ_RELATIONSHIPS_PKG.Insert_Row-1 (+)',
714: p_prefix=>l_debug_prefix,
715: p_msg_level=>fnd_log.level_procedure);
716: END IF;
717:
718: -- Call table-handler to create the forward record.
719: HZ_RELATIONSHIPS_PKG.Insert_Row (
792: X_ACTUAL_CONTENT_SOURCE => p_relationship_rec.actual_content_source
793: );
794:
795: -- Debug info.
796: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
797: hz_utility_v2pub.debug(p_message=>'HZ_RELATIONSHIPS_PKG.Insert_Row-1 (-) ' ||
798: 'x_relationship_id = ' || p_relationship_rec.relationship_id,
799: p_prefix=>l_debug_prefix,
800: p_msg_level=>fnd_log.level_procedure);
796: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
797: hz_utility_v2pub.debug(p_message=>'HZ_RELATIONSHIPS_PKG.Insert_Row-1 (-) ' ||
798: 'x_relationship_id = ' || p_relationship_rec.relationship_id,
799: p_prefix=>l_debug_prefix,
800: p_msg_level=>fnd_log.level_procedure);
801: END IF;
802:
803: -- Debug info.
804: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
800: p_msg_level=>fnd_log.level_procedure);
801: END IF;
802:
803: -- Debug info.
804: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
805: hz_utility_v2pub.debug(p_message=>'HZ_RELATIONSHIPS_PKG.Insert_Row-2 (+) ',
806: p_prefix=>l_debug_prefix,
807: p_msg_level=>fnd_log.level_procedure);
808: END IF;
803: -- Debug info.
804: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
805: hz_utility_v2pub.debug(p_message=>'HZ_RELATIONSHIPS_PKG.Insert_Row-2 (+) ',
806: p_prefix=>l_debug_prefix,
807: p_msg_level=>fnd_log.level_procedure);
808: END IF;
809:
810: -- determine the direction_code for the backward record
811: IF r_rel_type.direction_code = 'P' THEN
895: X_ACTUAL_CONTENT_SOURCE => p_relationship_rec.actual_content_source
896: );
897:
898: -- Debug info.
899: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
900: hz_utility_v2pub.debug(p_message=>'HZ_RELATIONSHIPS_PKG.Insert_Row-2 (-) ' ||
901: 'x_relationship_id = ' || p_relationship_rec.relationship_id,
902: p_prefix=>l_debug_prefix,
903: p_msg_level=>fnd_log.level_procedure);
899: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
900: hz_utility_v2pub.debug(p_message=>'HZ_RELATIONSHIPS_PKG.Insert_Row-2 (-) ' ||
901: 'x_relationship_id = ' || p_relationship_rec.relationship_id,
902: p_prefix=>l_debug_prefix,
903: p_msg_level=>fnd_log.level_procedure);
904: END IF;
905:
906: -- maintain hierarchy of relationships
907: -- check if the relationship type is hierarchical
1176: END LOOP;
1177: END IF;
1178:
1179: -- Debug info.
1180: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1181: hz_utility_v2pub.debug(p_message=>'do_create_rel (-)',
1182: p_prefix=>l_debug_prefix,
1183: p_msg_level=>fnd_log.level_procedure);
1184: END IF;
1179: -- Debug info.
1180: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1181: hz_utility_v2pub.debug(p_message=>'do_create_rel (-)',
1182: p_prefix=>l_debug_prefix,
1183: p_msg_level=>fnd_log.level_procedure);
1184: END IF;
1185:
1186: END do_create_rel;
1187:
1291:
1292: BEGIN
1293:
1294: -- Debug info.
1295: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1296: hz_utility_v2pub.debug(p_message=>'do_update_rel (+)',
1297: p_prefix=>l_debug_prefix,
1298: p_msg_level=>fnd_log.level_procedure);
1299: END IF;
1294: -- Debug info.
1295: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1296: hz_utility_v2pub.debug(p_message=>'do_update_rel (+)',
1297: p_prefix=>l_debug_prefix,
1298: p_msg_level=>fnd_log.level_procedure);
1299: END IF;
1300:
1301: /* Bug 4873016 : Select the record from hz_relationships based on
1302: * the values passed by the user to this API. If there is no record
1448: END;
1449: END;
1450:
1451: -- Debug info.
1452: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1453: hz_utility_v2pub.debug(p_message=>'Done with locking',
1454: p_prefix =>l_debug_prefix,
1455: p_msg_level=>fnd_log.level_statement);
1456: END IF;
1451: -- Debug info.
1452: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1453: hz_utility_v2pub.debug(p_message=>'Done with locking',
1454: p_prefix =>l_debug_prefix,
1455: p_msg_level=>fnd_log.level_statement);
1456: END IF;
1457:
1458: -- get the relationship type for its attributes
1459: SELECT HIERARCHICAL_FLAG,
1661: l_object_table_name = 'HZ_PARTIES'
1662: THEN
1663:
1664: -- Debug info.
1665: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1666: hz_utility_v2pub.debug(p_message=>'denormalizing to hz_parties',
1667: p_prefix =>l_debug_prefix,
1668: p_msg_level=>fnd_log.level_statement);
1669: END IF;
1664: -- Debug info.
1665: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1666: hz_utility_v2pub.debug(p_message=>'denormalizing to hz_parties',
1667: p_prefix =>l_debug_prefix,
1668: p_msg_level=>fnd_log.level_statement);
1669: END IF;
1670:
1671: do_update_party_flags(l_rel_rec,
1672: l_rel_rec.subject_id);
1672: l_rel_rec.subject_id);
1673: END IF;
1674:
1675: -- Debug info.
1676: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1677: hz_utility_v2pub.debug(p_message=>'HZ_RELATIONSHIPS_PKG.Update_Row-1 (+) ',
1678: p_prefix=>l_debug_prefix,
1679: p_msg_level=>fnd_log.level_procedure);
1680: END IF;
1675: -- Debug info.
1676: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1677: hz_utility_v2pub.debug(p_message=>'HZ_RELATIONSHIPS_PKG.Update_Row-1 (+) ',
1678: p_prefix=>l_debug_prefix,
1679: p_msg_level=>fnd_log.level_procedure);
1680: END IF;
1681:
1682: -- Bug 4693719 : pass NULL if the secure data is not updated
1683: IF HZ_UTILITY_V2PUB.G_UPDATE_ACS = 'Y' THEN
1778: X_ACTUAL_CONTENT_SOURCE => l_acs
1779: );
1780:
1781: -- Debug info.
1782: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1783: hz_utility_v2pub.debug(p_message=>'HZ_RELATIONSHIPS_PKG.Update_Row-1 (-) ',
1784: p_prefix=>l_debug_prefix,
1785: p_msg_level=>fnd_log.level_procedure);
1786: END IF;
1781: -- Debug info.
1782: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1783: hz_utility_v2pub.debug(p_message=>'HZ_RELATIONSHIPS_PKG.Update_Row-1 (-) ',
1784: p_prefix=>l_debug_prefix,
1785: p_msg_level=>fnd_log.level_procedure);
1786: END IF;
1787:
1788: -- get the reciprocal record information
1789: SELECT ROWID
1796: */
1797: AND DIRECTIONAL_FLAG = decode(l_directional_flag, 'F', 'B','B', 'F');
1798:
1799: -- Debug info.
1800: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1801: hz_utility_v2pub.debug(p_message=>'HZ_RELATIONSHIPS_PKG.Update_Row-2 (+) ',
1802: p_prefix=>l_debug_prefix,
1803: p_msg_level=>fnd_log.level_procedure);
1804: END IF;
1799: -- Debug info.
1800: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1801: hz_utility_v2pub.debug(p_message=>'HZ_RELATIONSHIPS_PKG.Update_Row-2 (+) ',
1802: p_prefix=>l_debug_prefix,
1803: p_msg_level=>fnd_log.level_procedure);
1804: END IF;
1805:
1806: -- update the reciprocal record
1807: HZ_RELATIONSHIPS_PKG.Update_Row (
1881: X_ACTUAL_CONTENT_SOURCE => p_relationship_rec.actual_content_source
1882: );
1883:
1884: -- Debug info.
1885: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1886: hz_utility_v2pub.debug(p_message=>'HZ_RELATIONSHIPS_PKG.Update_Row-2 (-) ',
1887: p_prefix=>l_debug_prefix,
1888: p_msg_level=>fnd_log.level_procedure);
1889: END IF;
1884: -- Debug info.
1885: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1886: hz_utility_v2pub.debug(p_message=>'HZ_RELATIONSHIPS_PKG.Update_Row-2 (-) ',
1887: p_prefix=>l_debug_prefix,
1888: p_msg_level=>fnd_log.level_procedure);
1889: END IF;
1890:
1891: -- Check if party exists for party_relationship. If yes, update party.
1892: -- build the record for creation of relationship party record
1914: THEN
1915: IF l_party_id IS NOT NULL THEN
1916:
1917: -- Debug info.
1918: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1919: hz_utility_v2pub.debug(p_message=>'updating party record',
1920: p_prefix =>l_debug_prefix,
1921: p_msg_level=>fnd_log.level_statement);
1922: END IF;
1917: -- Debug info.
1918: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1919: hz_utility_v2pub.debug(p_message=>'updating party record',
1920: p_prefix =>l_debug_prefix,
1921: p_msg_level=>fnd_log.level_statement);
1922: END IF;
1923:
1924: IF p_party_object_version_number IS NULL THEN
1925: l_party_object_version_number := 1;
2079: END IF;
2080: END IF;
2081:
2082: -- Debug info.
2083: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2084: hz_utility_v2pub.debug(p_message=>'do_update_rel (-)',
2085: p_prefix=>l_debug_prefix,
2086: p_msg_level=>fnd_log.level_procedure);
2087: END IF;
2082: -- Debug info.
2083: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2084: hz_utility_v2pub.debug(p_message=>'do_update_rel (-)',
2085: p_prefix=>l_debug_prefix,
2086: p_msg_level=>fnd_log.level_procedure);
2087: END IF;
2088:
2089: END do_update_rel;
2090:
2263:
2264: BEGIN
2265:
2266: -- Debug info.
2267: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2268: hz_utility_v2pub.debug(p_message=>'do_create_party (+)',
2269: p_prefix=>l_debug_prefix,
2270: p_msg_level=>fnd_log.level_procedure);
2271: END IF;
2266: -- Debug info.
2267: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2268: hz_utility_v2pub.debug(p_message=>'do_create_party (+)',
2269: p_prefix=>l_debug_prefix,
2270: p_msg_level=>fnd_log.level_procedure);
2271: END IF;
2272:
2273: l_party_id := l_party_rec.party_id;
2274: l_party_number := l_party_rec.party_number;
2391: l_party_rec.party_id := NULL;
2392: END IF;
2393:
2394: -- Debug info.
2395: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2396: hz_utility_v2pub.debug(p_message=>'HZ_PARTIES_PKG.Insert_Row (+)',
2397: p_prefix=>l_debug_prefix,
2398: p_msg_level=>fnd_log.level_procedure);
2399: END IF;
2394: -- Debug info.
2395: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2396: hz_utility_v2pub.debug(p_message=>'HZ_PARTIES_PKG.Insert_Row (+)',
2397: p_prefix=>l_debug_prefix,
2398: p_msg_level=>fnd_log.level_procedure);
2399: END IF;
2400:
2401: HZ_PARTIES_PKG.Insert_Row (
2402: X_PARTY_ID => l_party_rec.party_id,
2488: x_party_id := l_party_rec.party_id;
2489: x_party_number := l_party_rec.party_number;
2490:
2491: -- Debug info.
2492: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2493: hz_utility_v2pub.debug(p_message=>'HZ_PARTIES_PKG.Insert_Row (-) ' ||
2494: 'x_party_id = ' || x_party_id,
2495: p_prefix=>l_debug_prefix,
2496: p_msg_level=>fnd_log.level_procedure);
2492: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2493: hz_utility_v2pub.debug(p_message=>'HZ_PARTIES_PKG.Insert_Row (-) ' ||
2494: 'x_party_id = ' || x_party_id,
2495: p_prefix=>l_debug_prefix,
2496: p_msg_level=>fnd_log.level_procedure);
2497: END IF;
2498:
2499: -- update the party_name
2500: l_party_name := SUBSTRB(l_subject_name || '-' ||
2503:
2504: UPDATE HZ_PARTIES SET PARTY_NAME = l_party_name WHERE PARTY_ID = x_party_id;
2505:
2506: -- Debug info.
2507: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2508: hz_utility_v2pub.debug(p_message=>'do_create_party (-)',
2509: p_prefix=>l_debug_prefix,
2510: p_msg_level=>fnd_log.level_procedure);
2511: END IF;
2506: -- Debug info.
2507: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2508: hz_utility_v2pub.debug(p_message=>'do_create_party (-)',
2509: p_prefix=>l_debug_prefix,
2510: p_msg_level=>fnd_log.level_procedure);
2511: END IF;
2512:
2513: END do_create_party;
2514:
2572:
2573: BEGIN
2574:
2575: -- Debug info.
2576: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2577: hz_utility_v2pub.debug(p_message=>'do_update_party (+)',
2578: p_prefix=>l_debug_prefix,
2579: p_msg_level=>fnd_log.level_procedure);
2580: END IF;
2575: -- Debug info.
2576: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2577: hz_utility_v2pub.debug(p_message=>'do_update_party (+)',
2578: p_prefix=>l_debug_prefix,
2579: p_msg_level=>fnd_log.level_procedure);
2580: END IF;
2581:
2582: -- check whether record has been updated by another user.
2583: BEGIN
2633: RAISE FND_API.G_EXC_ERROR;
2634: END IF;
2635:
2636: -- Debug info.
2637: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2638: hz_utility_v2pub.debug(p_message=>'HZ_PARTIES_PKG.Update_Row (+) ',
2639: p_prefix=>l_debug_prefix,
2640: p_msg_level=>fnd_log.level_procedure);
2641: END IF;
2636: -- Debug info.
2637: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2638: hz_utility_v2pub.debug(p_message=>'HZ_PARTIES_PKG.Update_Row (+) ',
2639: p_prefix=>l_debug_prefix,
2640: p_msg_level=>fnd_log.level_procedure);
2641: END IF;
2642:
2643: -- call table handler to update the record
2644: HZ_PARTIES_PKG.Update_Row (
2730: X_APPLICATION_ID => p_relationship_rec.application_id
2731: );
2732:
2733: -- Debug info.
2734: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2735: hz_utility_v2pub.debug(p_message=>'HZ_PARTIES_PKG.Update_Row (-) ',
2736: p_prefix=>l_debug_prefix,
2737: p_msg_level=>fnd_log.level_procedure);
2738: END IF;
2733: -- Debug info.
2734: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2735: hz_utility_v2pub.debug(p_message=>'HZ_PARTIES_PKG.Update_Row (-) ',
2736: p_prefix=>l_debug_prefix,
2737: p_msg_level=>fnd_log.level_procedure);
2738: END IF;
2739:
2740: -- Debug info.
2741: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2737: p_msg_level=>fnd_log.level_procedure);
2738: END IF;
2739:
2740: -- Debug info.
2741: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2742: hz_utility_v2pub.debug(p_message=>'do_update_party (-)',
2743: p_prefix=>l_debug_prefix,
2744: p_msg_level=>fnd_log.level_procedure);
2745: END IF;
2740: -- Debug info.
2741: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2742: hz_utility_v2pub.debug(p_message=>'do_update_party (-)',
2743: p_prefix=>l_debug_prefix,
2744: p_msg_level=>fnd_log.level_procedure);
2745: END IF;
2746:
2747: END do_update_party;
2748:
2956: -- Check if API is called in debug mode. If yes, enable debug.
2957: --enable_debug;
2958:
2959: -- Debug info.
2960: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2961: hz_utility_v2pub.debug(p_message=>'create_relationship (+)',
2962: p_prefix=>l_debug_prefix,
2963: p_msg_level=>fnd_log.level_procedure);
2964: END IF;
2959: -- Debug info.
2960: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2961: hz_utility_v2pub.debug(p_message=>'create_relationship (+)',
2962: p_prefix=>l_debug_prefix,
2963: p_msg_level=>fnd_log.level_procedure);
2964: END IF;
2965:
2966: -- Initialize message list if p_init_msg_list is set to TRUE.
2967: IF FND_API.to_Boolean(p_init_msg_list) THEN
3086: p_count => x_msg_count,
3087: p_data => x_msg_data);
3088:
3089: -- Debug info.
3090: IF fnd_log.level_exception>=fnd_log.g_current_runtime_level THEN
3091: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
3092: p_msg_data=>x_msg_data,
3093: p_msg_type=>'WARNING',
3094: p_msg_level=>fnd_log.level_exception);
3090: IF fnd_log.level_exception>=fnd_log.g_current_runtime_level THEN
3091: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
3092: p_msg_data=>x_msg_data,
3093: p_msg_type=>'WARNING',
3094: p_msg_level=>fnd_log.level_exception);
3095: END IF;
3096: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3097: hz_utility_v2pub.debug(p_message=>'create_relationship (-)',
3098: p_prefix=>l_debug_prefix,
3092: p_msg_data=>x_msg_data,
3093: p_msg_type=>'WARNING',
3094: p_msg_level=>fnd_log.level_exception);
3095: END IF;
3096: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3097: hz_utility_v2pub.debug(p_message=>'create_relationship (-)',
3098: p_prefix=>l_debug_prefix,
3099: p_msg_level=>fnd_log.level_procedure);
3100: END IF;
3095: END IF;
3096: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3097: hz_utility_v2pub.debug(p_message=>'create_relationship (-)',
3098: p_prefix=>l_debug_prefix,
3099: p_msg_level=>fnd_log.level_procedure);
3100: END IF;
3101:
3102: -- Check if API is called in debug mode. If yes, disable debug.
3103: --disable_debug;
3111: p_count => x_msg_count,
3112: p_data => x_msg_data);
3113:
3114: -- Debug info.
3115: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
3116: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
3117: p_msg_data=>x_msg_data,
3118: p_msg_type=>'ERROR',
3119: p_msg_level=>fnd_log.level_error);
3115: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
3116: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
3117: p_msg_data=>x_msg_data,
3118: p_msg_type=>'ERROR',
3119: p_msg_level=>fnd_log.level_error);
3120:
3121: END IF;
3122: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3123: hz_utility_v2pub.debug(p_message=>'create_relationship (-)',
3118: p_msg_type=>'ERROR',
3119: p_msg_level=>fnd_log.level_error);
3120:
3121: END IF;
3122: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3123: hz_utility_v2pub.debug(p_message=>'create_relationship (-)',
3124: p_prefix=>l_debug_prefix,
3125: p_msg_level=>fnd_log.level_procedure);
3126: END IF;
3121: END IF;
3122: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3123: hz_utility_v2pub.debug(p_message=>'create_relationship (-)',
3124: p_prefix=>l_debug_prefix,
3125: p_msg_level=>fnd_log.level_procedure);
3126: END IF;
3127:
3128: -- Check if API is called in debug mode. If yes, disable debug.
3129: --disable_debug;
3136: p_count => x_msg_count,
3137: p_data => x_msg_data);
3138:
3139: -- Debug info.
3140: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
3141: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
3142: p_msg_data=>x_msg_data,
3143: p_msg_type=>'UNEXPECTED ERROR',
3144: p_msg_level=>fnd_log.level_error);
3140: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
3141: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
3142: p_msg_data=>x_msg_data,
3143: p_msg_type=>'UNEXPECTED ERROR',
3144: p_msg_level=>fnd_log.level_error);
3145:
3146: END IF;
3147: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3148: hz_utility_v2pub.debug(p_message=>'create_relationship (-)',
3143: p_msg_type=>'UNEXPECTED ERROR',
3144: p_msg_level=>fnd_log.level_error);
3145:
3146: END IF;
3147: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3148: hz_utility_v2pub.debug(p_message=>'create_relationship (-)',
3149: p_prefix=>l_debug_prefix,
3150: p_msg_level=>fnd_log.level_procedure);
3151: END IF;
3146: END IF;
3147: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3148: hz_utility_v2pub.debug(p_message=>'create_relationship (-)',
3149: p_prefix=>l_debug_prefix,
3150: p_msg_level=>fnd_log.level_procedure);
3151: END IF;
3152:
3153: -- Check if API is called in debug mode. If yes, disable debug.
3154: --disable_debug;
3164: p_count => x_msg_count,
3165: p_data => x_msg_data);
3166:
3167: -- Debug info.
3168: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
3169: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
3170: p_msg_data=>x_msg_data,
3171: p_msg_type=>'SQL ERROR',
3172: p_msg_level=>fnd_log.level_error);
3168: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
3169: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
3170: p_msg_data=>x_msg_data,
3171: p_msg_type=>'SQL ERROR',
3172: p_msg_level=>fnd_log.level_error);
3173:
3174: END IF;
3175: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3176: hz_utility_v2pub.debug(p_message=>'create_relationship (-)',
3171: p_msg_type=>'SQL ERROR',
3172: p_msg_level=>fnd_log.level_error);
3173:
3174: END IF;
3175: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3176: hz_utility_v2pub.debug(p_message=>'create_relationship (-)',
3177: p_prefix=>l_debug_prefix,
3178: p_msg_level=>fnd_log.level_procedure);
3179: END IF;
3174: END IF;
3175: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3176: hz_utility_v2pub.debug(p_message=>'create_relationship (-)',
3177: p_prefix=>l_debug_prefix,
3178: p_msg_level=>fnd_log.level_procedure);
3179: END IF;
3180:
3181: -- Check if API is called in debug mode. If yes, disable debug.
3182: --disable_debug;
3243: -- Check if API is called in debug mode. If yes, enable debug.
3244: --enable_debug;
3245:
3246: -- Debug info.
3247: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3248: hz_utility_v2pub.debug(p_message=>'update_relationship (+)',
3249: p_prefix=>l_debug_prefix,
3250: p_msg_level=>fnd_log.level_procedure);
3251: END IF;
3246: -- Debug info.
3247: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3248: hz_utility_v2pub.debug(p_message=>'update_relationship (+)',
3249: p_prefix=>l_debug_prefix,
3250: p_msg_level=>fnd_log.level_procedure);
3251: END IF;
3252:
3253: -- Initialize message list if p_init_msg_list is set to TRUE.
3254: IF FND_API.to_Boolean(p_init_msg_list) THEN
3374: p_count => x_msg_count,
3375: p_data => x_msg_data);
3376:
3377: -- Debug info.
3378: IF fnd_log.level_exception>=fnd_log.g_current_runtime_level THEN
3379: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
3380: p_msg_data=>x_msg_data,
3381: p_msg_type=>'WARNING',
3382: p_msg_level=>fnd_log.level_exception);
3378: IF fnd_log.level_exception>=fnd_log.g_current_runtime_level THEN
3379: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
3380: p_msg_data=>x_msg_data,
3381: p_msg_type=>'WARNING',
3382: p_msg_level=>fnd_log.level_exception);
3383: END IF;
3384: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3385: hz_utility_v2pub.debug(p_message=>'update_relationship (-)',
3386: p_prefix=>l_debug_prefix,
3380: p_msg_data=>x_msg_data,
3381: p_msg_type=>'WARNING',
3382: p_msg_level=>fnd_log.level_exception);
3383: END IF;
3384: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3385: hz_utility_v2pub.debug(p_message=>'update_relationship (-)',
3386: p_prefix=>l_debug_prefix,
3387: p_msg_level=>fnd_log.level_procedure);
3388: END IF;
3383: END IF;
3384: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3385: hz_utility_v2pub.debug(p_message=>'update_relationship (-)',
3386: p_prefix=>l_debug_prefix,
3387: p_msg_level=>fnd_log.level_procedure);
3388: END IF;
3389:
3390: -- Check if API is called in debug mode. If yes, disable debug.
3391: --disable_debug;
3400: p_count => x_msg_count,
3401: p_data => x_msg_data);
3402:
3403: -- Debug info.
3404: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
3405: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
3406: p_msg_data=>x_msg_data,
3407: p_msg_type=>'ERROR',
3408: p_msg_level=>fnd_log.level_error);
3404: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
3405: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
3406: p_msg_data=>x_msg_data,
3407: p_msg_type=>'ERROR',
3408: p_msg_level=>fnd_log.level_error);
3409:
3410: END IF;
3411: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3412: hz_utility_v2pub.debug(p_message=>'update_relationship (-)',
3407: p_msg_type=>'ERROR',
3408: p_msg_level=>fnd_log.level_error);
3409:
3410: END IF;
3411: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3412: hz_utility_v2pub.debug(p_message=>'update_relationship (-)',
3413: p_prefix=>l_debug_prefix,
3414: p_msg_level=>fnd_log.level_procedure);
3415: END IF;
3410: END IF;
3411: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3412: hz_utility_v2pub.debug(p_message=>'update_relationship (-)',
3413: p_prefix=>l_debug_prefix,
3414: p_msg_level=>fnd_log.level_procedure);
3415: END IF;
3416:
3417: -- Check if API is called in debug mode. If yes, disable debug.
3418: --disable_debug;
3426: p_count => x_msg_count,
3427: p_data => x_msg_data);
3428:
3429: -- Debug info.
3430: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
3431: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
3432: p_msg_data=>x_msg_data,
3433: p_msg_type=>'UNEXPECTED ERROR',
3434: p_msg_level=>fnd_log.level_error);
3430: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
3431: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
3432: p_msg_data=>x_msg_data,
3433: p_msg_type=>'UNEXPECTED ERROR',
3434: p_msg_level=>fnd_log.level_error);
3435:
3436: END IF;
3437: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3438: hz_utility_v2pub.debug(p_message=>'update_relationship (-)',
3433: p_msg_type=>'UNEXPECTED ERROR',
3434: p_msg_level=>fnd_log.level_error);
3435:
3436: END IF;
3437: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3438: hz_utility_v2pub.debug(p_message=>'update_relationship (-)',
3439: p_prefix=>l_debug_prefix,
3440: p_msg_level=>fnd_log.level_procedure);
3441: END IF;
3436: END IF;
3437: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3438: hz_utility_v2pub.debug(p_message=>'update_relationship (-)',
3439: p_prefix=>l_debug_prefix,
3440: p_msg_level=>fnd_log.level_procedure);
3441: END IF;
3442:
3443: -- Check if API is called in debug mode. If yes, disable debug.
3444: --disable_debug;
3455: p_count => x_msg_count,
3456: p_data => x_msg_data);
3457:
3458: -- Debug info.
3459: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
3460: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
3461: p_msg_data=>x_msg_data,
3462: p_msg_type=>'SQL ERROR',
3463: p_msg_level=>fnd_log.level_error);
3459: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
3460: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
3461: p_msg_data=>x_msg_data,
3462: p_msg_type=>'SQL ERROR',
3463: p_msg_level=>fnd_log.level_error);
3464:
3465: END IF;
3466: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3467: hz_utility_v2pub.debug(p_message=>'update_relationship (-)',
3462: p_msg_type=>'SQL ERROR',
3463: p_msg_level=>fnd_log.level_error);
3464:
3465: END IF;
3466: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3467: hz_utility_v2pub.debug(p_message=>'update_relationship (-)',
3468: p_prefix=>l_debug_prefix,
3469: p_msg_level=>fnd_log.level_procedure);
3470: END IF;
3465: END IF;
3466: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3467: hz_utility_v2pub.debug(p_message=>'update_relationship (-)',
3468: p_prefix=>l_debug_prefix,
3469: p_msg_level=>fnd_log.level_procedure);
3470: END IF;
3471: -- Check if API is called in debug mode. If yes, disable debug.
3472: --disable_debug;
3473:
3521: -- Check if API is called in debug mode. If yes, enable debug.
3522: --enable_debug;
3523:
3524: -- Debug info.
3525: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3526: hz_utility_v2pub.debug(p_message=>'get_relationship_rec (+)',
3527: p_prefix=>l_debug_prefix,
3528: p_msg_level=>fnd_log.level_procedure);
3529: END IF;
3524: -- Debug info.
3525: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3526: hz_utility_v2pub.debug(p_message=>'get_relationship_rec (+)',
3527: p_prefix=>l_debug_prefix,
3528: p_msg_level=>fnd_log.level_procedure);
3529: END IF;
3530:
3531:
3532: --Initialize message list if p_init_msg_list is set to TRUE.
3556: l_directional_flag := NVL(p_directional_flag, 'F');
3557: END IF;
3558:
3559: -- Debug info.
3560: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3561: hz_utility_v2pub.debug(p_message=>'HZ_RELATIONSHIPS_PKG.Select_Row',
3562: p_prefix =>l_debug_prefix,
3563: p_msg_level=>fnd_log.level_statement);
3564: END IF;
3559: -- Debug info.
3560: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3561: hz_utility_v2pub.debug(p_message=>'HZ_RELATIONSHIPS_PKG.Select_Row',
3562: p_prefix =>l_debug_prefix,
3563: p_msg_level=>fnd_log.level_statement);
3564: END IF;
3565:
3566: HZ_RELATIONSHIPS_PKG.Select_Row (
3567: X_RELATIONSHIP_ID => x_rel_rec.relationship_id,
3638: X_ACTUAL_CONTENT_SOURCE => x_rel_rec.actual_content_source
3639: );
3640:
3641: -- Debug info.
3642: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3643: hz_utility_v2pub.debug(p_message=>'HZ_PARTY_V2PUB.get_party_rec',
3644: p_prefix =>l_debug_prefix,
3645: p_msg_level=>fnd_log.level_statement);
3646: END IF;
3641: -- Debug info.
3642: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3643: hz_utility_v2pub.debug(p_message=>'HZ_PARTY_V2PUB.get_party_rec',
3644: p_prefix =>l_debug_prefix,
3645: p_msg_level=>fnd_log.level_statement);
3646: END IF;
3647:
3648: IF l_party_id IS NOT NULL
3649: AND
3670: p_count => x_msg_count,
3671: p_data => x_msg_data );
3672:
3673: -- Debug info.
3674: IF fnd_log.level_exception>=fnd_log.g_current_runtime_level THEN
3675: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
3676: p_msg_data=>x_msg_data,
3677: p_msg_type=>'WARNING',
3678: p_msg_level=>fnd_log.level_exception);
3674: IF fnd_log.level_exception>=fnd_log.g_current_runtime_level THEN
3675: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
3676: p_msg_data=>x_msg_data,
3677: p_msg_type=>'WARNING',
3678: p_msg_level=>fnd_log.level_exception);
3679: END IF;
3680: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3681: hz_utility_v2pub.debug(p_message=>'get_relationhsip_rec (-)',
3682: p_prefix=>l_debug_prefix,
3676: p_msg_data=>x_msg_data,
3677: p_msg_type=>'WARNING',
3678: p_msg_level=>fnd_log.level_exception);
3679: END IF;
3680: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3681: hz_utility_v2pub.debug(p_message=>'get_relationhsip_rec (-)',
3682: p_prefix=>l_debug_prefix,
3683: p_msg_level=>fnd_log.level_procedure);
3684: END IF;
3679: END IF;
3680: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3681: hz_utility_v2pub.debug(p_message=>'get_relationhsip_rec (-)',
3682: p_prefix=>l_debug_prefix,
3683: p_msg_level=>fnd_log.level_procedure);
3684: END IF;
3685:
3686: -- Check if API is called in debug mode. If yes, disable debug.
3687: --disable_debug;
3695: p_count => x_msg_count,
3696: p_data => x_msg_data );
3697:
3698: -- Debug info.
3699: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
3700: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
3701: p_msg_data=>x_msg_data,
3702: p_msg_type=>'ERROR',
3703: p_msg_level=>fnd_log.level_error);
3699: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
3700: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
3701: p_msg_data=>x_msg_data,
3702: p_msg_type=>'ERROR',
3703: p_msg_level=>fnd_log.level_error);
3704:
3705: END IF;
3706: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3707: hz_utility_v2pub.debug(p_message=>'get_relationsip_rec (-)',
3702: p_msg_type=>'ERROR',
3703: p_msg_level=>fnd_log.level_error);
3704:
3705: END IF;
3706: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3707: hz_utility_v2pub.debug(p_message=>'get_relationsip_rec (-)',
3708: p_prefix=>l_debug_prefix,
3709: p_msg_level=>fnd_log.level_procedure);
3710: END IF;
3705: END IF;
3706: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3707: hz_utility_v2pub.debug(p_message=>'get_relationsip_rec (-)',
3708: p_prefix=>l_debug_prefix,
3709: p_msg_level=>fnd_log.level_procedure);
3710: END IF;
3711:
3712: -- Check if API is called in debug mode. If yes, disable debug.
3713: --disable_debug;
3720: p_count => x_msg_count,
3721: p_data => x_msg_data );
3722:
3723: -- Debug info.
3724: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
3725: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
3726: p_msg_data=>x_msg_data,
3727: p_msg_type=>'UNEXPECTED ERROR',
3728: p_msg_level=>fnd_log.level_error);
3724: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
3725: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
3726: p_msg_data=>x_msg_data,
3727: p_msg_type=>'UNEXPECTED ERROR',
3728: p_msg_level=>fnd_log.level_error);
3729:
3730: END IF;
3731: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3732: hz_utility_v2pub.debug(p_message=>'get_relationsip_rec (-)',
3727: p_msg_type=>'UNEXPECTED ERROR',
3728: p_msg_level=>fnd_log.level_error);
3729:
3730: END IF;
3731: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3732: hz_utility_v2pub.debug(p_message=>'get_relationsip_rec (-)',
3733: p_prefix=>l_debug_prefix,
3734: p_msg_level=>fnd_log.level_procedure);
3735: END IF;
3730: END IF;
3731: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3732: hz_utility_v2pub.debug(p_message=>'get_relationsip_rec (-)',
3733: p_prefix=>l_debug_prefix,
3734: p_msg_level=>fnd_log.level_procedure);
3735: END IF;
3736:
3737: -- Check if API is called in debug mode. If yes, disable debug.
3738: --disable_debug;
3749: p_count => x_msg_count,
3750: p_data => x_msg_data );
3751:
3752: -- Debug info.
3753: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
3754: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
3755: p_msg_data=>x_msg_data,
3756: p_msg_type=>'SQL ERROR',
3757: p_msg_level=>fnd_log.level_error);
3753: IF fnd_log.level_error>=fnd_log.g_current_runtime_level THEN
3754: hz_utility_v2pub.debug_return_messages(p_msg_count=>x_msg_count,
3755: p_msg_data=>x_msg_data,
3756: p_msg_type=>'SQL ERROR',
3757: p_msg_level=>fnd_log.level_error);
3758:
3759: END IF;
3760: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3761: hz_utility_v2pub.debug(p_message=>'get_relationsip_rec (-)' ,
3756: p_msg_type=>'SQL ERROR',
3757: p_msg_level=>fnd_log.level_error);
3758:
3759: END IF;
3760: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3761: hz_utility_v2pub.debug(p_message=>'get_relationsip_rec (-)' ,
3762: p_prefix=>l_debug_prefix,
3763: p_msg_level=>fnd_log.level_procedure);
3764: END IF;
3759: END IF;
3760: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3761: hz_utility_v2pub.debug(p_message=>'get_relationsip_rec (-)' ,
3762: p_prefix=>l_debug_prefix,
3763: p_msg_level=>fnd_log.level_procedure);
3764: END IF;
3765:
3766:
3767: -- Check if API is called in debug mode. If yes, disable debug.