106:
107: l_debug_prefix := '';
108:
109: -- Debug info.
110: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
111: hz_utility_v2pub.debug (
112: p_message => c_api_name||' (+)',
113: p_prefix => l_debug_prefix,
114: p_msg_level => fnd_log.level_procedure);
110: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
111: hz_utility_v2pub.debug (
112: p_message => c_api_name||' (+)',
113: p_prefix => l_debug_prefix,
114: p_msg_level => fnd_log.level_procedure);
115: END IF;
116:
117: -- populate function for integration service
118: IF hz_utility_v2pub.G_EXECUTE_API_CALLOUTS IN ('EVENTS_ENABLED', 'BO_EVENTS_ENABLED')
122: P_party_usg_assignment_id => p_party_usg_assignment_id);
123: END IF;
124:
125: -- Debug info.
126: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
127: hz_utility_v2pub.debug (
128: p_message => c_api_name||' (-)',
129: p_prefix => l_debug_prefix,
130: p_msg_level => fnd_log.level_procedure);
126: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
127: hz_utility_v2pub.debug (
128: p_message => c_api_name||' (-)',
129: p_prefix => l_debug_prefix,
130: p_msg_level => fnd_log.level_procedure);
131: END IF;
132:
133: END populate_bot;
134:
335:
336: l_debug_prefix := '';
337:
338: -- Debug info.
339: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
340: hz_utility_v2pub.debug (
341: p_message => c_api_name||' (+)',
342: p_prefix => l_debug_prefix,
343: p_msg_level => fnd_log.level_procedure);
339: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
340: hz_utility_v2pub.debug (
341: p_message => c_api_name||' (+)',
342: p_prefix => l_debug_prefix,
343: p_msg_level => fnd_log.level_procedure);
344: END IF;
345:
346: -- Debug info.
347: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
343: p_msg_level => fnd_log.level_procedure);
344: END IF;
345:
346: -- Debug info.
347: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
348: hz_utility_v2pub.debug(
349: p_prefix => l_debug_prefix,
350: p_message => 'x_return_status = '||x_return_status,
351: p_msg_level => fnd_log.level_statement);
347: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
348: hz_utility_v2pub.debug(
349: p_prefix => l_debug_prefix,
350: p_message => 'x_return_status = '||x_return_status,
351: p_msg_level => fnd_log.level_statement);
352: END IF;
353:
354: --
355: -- HIGH VALIDATION
371: x_return_status => x_return_status
372: );
373:
374: -- Debug info.
375: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
376: hz_utility_v2pub.debug(
377: p_prefix => l_debug_prefix,
378: p_message => 'party_id is a mandatory column. '||
379: 'x_return_status = '||x_return_status,
376: hz_utility_v2pub.debug(
377: p_prefix => l_debug_prefix,
378: p_message => 'party_id is a mandatory column. '||
379: 'x_return_status = '||x_return_status,
380: p_msg_level => fnd_log.level_statement);
381: END IF;
382:
383: --
384: -- mandatory: party_usage_code
390: x_return_status => x_return_status
391: );
392:
393: -- Debug info.
394: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
395: hz_utility_v2pub.debug(
396: p_prefix => l_debug_prefix,
397: p_message => 'party_usage_code is a mandatory column. '||
398: 'x_return_status = '||x_return_status,
395: hz_utility_v2pub.debug(
396: p_prefix => l_debug_prefix,
397: p_message => 'party_usage_code is a mandatory column. '||
398: 'x_return_status = '||x_return_status,
399: p_msg_level => fnd_log.level_statement);
400: END IF;
401:
402: --
403: -- conditional mandatory: owner_table_name, owner_table_id
424: );
425: END IF;
426:
427: -- Debug info.
428: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
429: hz_utility_v2pub.debug(
430: p_prefix => l_debug_prefix,
431: p_message => 'conditional mandatory: owner_table_name, owner_table_id. '||
432: 'x_return_status = '||x_return_status,
429: hz_utility_v2pub.debug(
430: p_prefix => l_debug_prefix,
431: p_message => 'conditional mandatory: owner_table_name, owner_table_id. '||
432: 'x_return_status = '||x_return_status,
433: p_msg_level => fnd_log.level_statement);
434: END IF;
435:
436: --
437: -- foreign key: owner_table_name, owner_table_id.
449: x_return_status := fnd_api.G_RET_STS_ERROR;
450: END IF;
451:
452: -- Debug info.
453: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
454: hz_utility_v2pub.debug(
455: p_prefix => l_debug_prefix,
456: p_message => 'foreign key check when owner_table_name = HZ_RELATIONSHIPS. '||
457: 'x_return_status = '||x_return_status,
454: hz_utility_v2pub.debug(
455: p_prefix => l_debug_prefix,
456: p_message => 'foreign key check when owner_table_name = HZ_RELATIONSHIPS. '||
457: 'x_return_status = '||x_return_status,
458: p_msg_level => fnd_log.level_statement);
459: END IF;
460: END IF;
461: */
462:
471: x_return_status => x_return_status
472: );
473:
474: -- Debug info.
475: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
476: hz_utility_v2pub.debug(
477: p_prefix => l_debug_prefix,
478: p_message => 'party_id is a non-updateable column. '||
479: 'x_return_status = '||x_return_status,
476: hz_utility_v2pub.debug(
477: p_prefix => l_debug_prefix,
478: p_message => 'party_id is a non-updateable column. '||
479: 'x_return_status = '||x_return_status,
480: p_msg_level => fnd_log.level_statement);
481: END IF;
482:
483: --
484: -- non-updateable: party_usage_code
490: x_return_status => x_return_status
491: );
492:
493: -- Debug info.
494: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
495: hz_utility_v2pub.debug(
496: p_prefix => l_debug_prefix,
497: p_message => 'party_usage_code is a non-updateable column. '||
498: 'x_return_status = '||x_return_status,
495: hz_utility_v2pub.debug(
496: p_prefix => l_debug_prefix,
497: p_message => 'party_usage_code is a non-updateable column. '||
498: 'x_return_status = '||x_return_status,
499: p_msg_level => fnd_log.level_statement);
500: END IF;
501:
502: --
503: -- non-updateable: owner_table_name
509: x_return_status => x_return_status
510: );
511:
512: -- Debug info.
513: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
514: hz_utility_v2pub.debug(
515: p_prefix => l_debug_prefix,
516: p_message => 'owner_table_name is a non-updateable column. '||
517: 'x_return_status = '||x_return_status,
514: hz_utility_v2pub.debug(
515: p_prefix => l_debug_prefix,
516: p_message => 'owner_table_name is a non-updateable column. '||
517: 'x_return_status = '||x_return_status,
518: p_msg_level => fnd_log.level_statement);
519: END IF;
520:
521: --
522: -- non-updateable: owner_table_id
528: x_return_status => x_return_status
529: );
530:
531: -- Debug info.
532: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
533: hz_utility_v2pub.debug(
534: p_prefix => l_debug_prefix,
535: p_message => 'owner_table_id is a non-updateable column. '||
536: 'x_return_status = '||x_return_status,
533: hz_utility_v2pub.debug(
534: p_prefix => l_debug_prefix,
535: p_message => 'owner_table_id is a non-updateable column. '||
536: 'x_return_status = '||x_return_status,
537: p_msg_level => fnd_log.level_statement);
538: END IF;
539:
540: END IF; -- p_create_update_flag = 'U'
541:
553: x_return_status := fnd_api.G_RET_STS_ERROR;
554: END IF;
555:
556: -- Debug info.
557: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
558: hz_utility_v2pub.debug(
559: p_prefix => l_debug_prefix,
560: p_message => 'end date can not be earlier than start date. '||
561: 'x_return_status = '||x_return_status,
558: hz_utility_v2pub.debug(
559: p_prefix => l_debug_prefix,
560: p_message => 'end date can not be earlier than start date. '||
561: 'x_return_status = '||x_return_status,
562: p_msg_level => fnd_log.level_statement);
563: END IF;
564:
565: --
566: -- mandatory, non-updateable, lookup : created_by_module
603: db_restrict_manual_update := l_value_tbl(4);
604: db_party_usage_created_by := l_value_tbl(5);
605:
606: -- Debug info.
607: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
608: hz_utility_v2pub.debug(
609: p_prefix => l_debug_prefix,
610: p_message => 'foreign key validation for party_usage_code. '||
611: 'db_party_usage_status = '||db_party_usage_status||' '||
611: 'db_party_usage_status = '||db_party_usage_status||' '||
612: 'db_party_usage_type = '||db_party_usage_type||' '||
613: 'db_restrict_manual_assign = '||db_restrict_manual_assign||' '||
614: 'db_restrict_manual_update = '||db_restrict_manual_update,
615: p_msg_level => fnd_log.level_statement);
616: END IF;
617: ELSIF p_create_update_flag = 'C' THEN
618: --
619: -- invalid foreign key
624: x_return_status := fnd_api.G_RET_STS_ERROR;
625: END IF;
626:
627: -- Debug info.
628: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
629: hz_utility_v2pub.debug(
630: p_prefix => l_debug_prefix,
631: p_message => 'foreign key validation for party_usage_code. '||
632: 'x_return_status = '||x_return_status,
629: hz_utility_v2pub.debug(
630: p_prefix => l_debug_prefix,
631: p_message => 'foreign key validation for party_usage_code. '||
632: 'x_return_status = '||x_return_status,
633: p_msg_level => fnd_log.level_statement);
634: END IF;
635:
636: IF p_create_update_flag = 'C' THEN
637: --
644: x_return_status := fnd_api.G_RET_STS_ERROR;
645: END IF;
646:
647: -- Debug info.
648: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
649: hz_utility_v2pub.debug(
650: p_prefix => l_debug_prefix,
651: p_message => 'inactive party_usage_code. '||
652: 'x_return_status = '||x_return_status,
649: hz_utility_v2pub.debug(
650: p_prefix => l_debug_prefix,
651: p_message => 'inactive party_usage_code. '||
652: 'x_return_status = '||x_return_status,
653: p_msg_level => fnd_log.level_statement);
654: END IF;
655:
656: --
657: -- foreign key: party_id
668: END IF;
669: CLOSE c_party;
670:
671: -- Debug info.
672: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
673: hz_utility_v2pub.debug(
674: p_prefix => l_debug_prefix,
675: p_message => 'foreign key validation for party_id. '||
676: 'x_return_status = '||x_return_status||' '||
674: p_prefix => l_debug_prefix,
675: p_message => 'foreign key validation for party_id. '||
676: 'x_return_status = '||x_return_status||' '||
677: 'party_type = '||db_party_type,
678: p_msg_level => fnd_log.level_statement);
679: END IF;
680:
681: --
682: -- party type doesn't match
689: x_return_status := fnd_api.G_RET_STS_ERROR;
690: END IF;
691:
692: -- Debug info.
693: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
694: hz_utility_v2pub.debug(
695: p_prefix => l_debug_prefix,
696: p_message => 'party type doesn''t match. '||
697: 'x_return_status = '||x_return_status,
694: hz_utility_v2pub.debug(
695: p_prefix => l_debug_prefix,
696: p_message => 'party type doesn''t match. '||
697: 'x_return_status = '||x_return_status,
698: p_msg_level => fnd_log.level_statement);
699: END IF;
700:
701: --
702: -- disallow certain usages be used by public API
723: x_return_status := fnd_api.G_RET_STS_ERROR;
724: END IF;
725:
726: -- Debug info.
727: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
728: hz_utility_v2pub.debug(
729: p_prefix => l_debug_prefix,
730: p_message => 'created_by_module is created by . '||
731: 'l_created_by = '||l_created_by||' '||
729: p_prefix => l_debug_prefix,
730: p_message => 'created_by_module is created by . '||
731: 'l_created_by = '||l_created_by||' '||
732: 'x_return_status = '||x_return_status,
733: p_msg_level => fnd_log.level_statement);
734: END IF;
735: END IF;
736:
737: -- Bug 4586451
759: x_return_status := fnd_api.G_RET_STS_ERROR;
760: END IF;
761:
762: -- Debug info.
763: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
764: hz_utility_v2pub.debug(
765: p_prefix => l_debug_prefix,
766: p_message => 'manual update is Y. calling from public API. '||
767: 'x_return_status = '||x_return_status,
764: hz_utility_v2pub.debug(
765: p_prefix => l_debug_prefix,
766: p_message => 'manual update is Y. calling from public API. '||
767: 'x_return_status = '||x_return_status,
768: p_msg_level => fnd_log.level_statement);
769: END IF;
770: END IF;
771:
772: END IF; -- MEDIUM VALIDATION
795: WHILE (i <= l_party_usage_codes_tbl.count AND
796: l_continue = 'Y')
797: LOOP
798: -- Debug info.
799: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
800: hz_utility_v2pub.debug(
801: p_prefix => l_debug_prefix,
802: p_message => 'l_party_usage_codes_tbl('||i||') = '||
803: l_party_usage_codes_tbl(i),
800: hz_utility_v2pub.debug(
801: p_prefix => l_debug_prefix,
802: p_message => 'l_party_usage_codes_tbl('||i||') = '||
803: l_party_usage_codes_tbl(i),
804: p_msg_level => fnd_log.level_statement);
805: END IF;
806:
807: IF NOT l_temp_party_usage_codes.exists(l_party_usage_codes_tbl(i)) AND
808: l_party_usage_codes_tbl(i) <> l_party_usage_code
829: l_continue := 'N';
830: END IF;
831:
832: -- Debug info.
833: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
834: hz_utility_v2pub.debug(
835: p_prefix => l_debug_prefix,
836: p_message => 'check exclusive and co-exist rule. '||
837: 'x_return_status = '||x_return_status,
834: hz_utility_v2pub.debug(
835: p_prefix => l_debug_prefix,
836: p_message => 'check exclusive and co-exist rule. '||
837: 'x_return_status = '||x_return_status,
838: p_msg_level => fnd_log.level_statement);
839: END IF;
840:
841: END IF;
842:
846:
847: END IF; -- LOW VALIDATION
848:
849: -- Debug info.
850: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
851: hz_utility_v2pub.debug (
852: p_message => c_api_name||' (-)',
853: p_prefix => l_debug_prefix,
854: p_msg_level => fnd_log.level_procedure);
850: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
851: hz_utility_v2pub.debug (
852: p_message => c_api_name||' (-)',
853: p_prefix => l_debug_prefix,
854: p_msg_level => fnd_log.level_procedure);
855: END IF;
856:
857: END validate_party_usg_assignment;
858:
918:
919: l_debug_prefix := '';
920:
921: -- Debug info.
922: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
923: hz_utility_v2pub.debug (
924: p_message => c_api_name||' (+)',
925: p_prefix => l_debug_prefix,
926: p_msg_level => fnd_log.level_procedure);
922: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
923: hz_utility_v2pub.debug (
924: p_message => c_api_name||' (+)',
925: p_prefix => l_debug_prefix,
926: p_msg_level => fnd_log.level_procedure);
927: END IF;
928:
929: l_has_duplicates := 'N';
930:
937: p_party_usg_assignment_rec.owner_table_id IS NOT NULL AND
938: p_party_usg_assignment_rec.owner_table_id <> fnd_api.G_MISS_NUM
939: THEN
940: -- Debug info.
941: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
942: hz_utility_v2pub.debug(
943: p_prefix => l_debug_prefix,
944: p_message => 'owner_table_name, owner_table_id are passed in for this usage. '||
945: 'Check duplicate assignment.',
942: hz_utility_v2pub.debug(
943: p_prefix => l_debug_prefix,
944: p_message => 'owner_table_name, owner_table_id are passed in for this usage. '||
945: 'Check duplicate assignment.',
946: p_msg_level => fnd_log.level_statement);
947: END IF;
948:
949: OPEN c_duplicate_assignment0 (
950: p_party_usg_assignment_rec.party_id,
967: p_party_usg_assignment_rec.party_usage_code IS NOT NULL AND
968: p_party_usg_assignment_rec.party_usage_code <> fnd_api.G_MISS_CHAR
969: THEN
970: -- Debug info.
971: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
972: hz_utility_v2pub.debug(
973: p_prefix => l_debug_prefix,
974: p_message => 'No date tracking for this usage '||
975: p_party_usg_assignment_rec.party_usage_code||'. '||
973: p_prefix => l_debug_prefix,
974: p_message => 'No date tracking for this usage '||
975: p_party_usg_assignment_rec.party_usage_code||'. '||
976: 'Check duplicate assignment.',
977: p_msg_level => fnd_log.level_statement);
978: END IF;
979:
980: OPEN c_duplicate_assignment1 (
981: p_party_usg_assignment_rec.party_id,
992: CLOSE c_duplicate_assignment1;
993: END IF;
994:
995: -- Debug info.
996: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
997: hz_utility_v2pub.debug(
998: p_prefix => l_debug_prefix,
999: p_message => 'l_has_duplicates = '||l_has_duplicates,
1000: p_msg_level => fnd_log.level_statement);
996: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
997: hz_utility_v2pub.debug(
998: p_prefix => l_debug_prefix,
999: p_message => 'l_has_duplicates = '||l_has_duplicates,
1000: p_msg_level => fnd_log.level_statement);
1001: END IF;
1002:
1003: -- Debug info.
1004: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
1000: p_msg_level => fnd_log.level_statement);
1001: END IF;
1002:
1003: -- Debug info.
1004: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
1005: hz_utility_v2pub.debug (
1006: p_message => c_api_name||' (-)',
1007: p_prefix => l_debug_prefix,
1008: p_msg_level => fnd_log.level_procedure);
1004: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
1005: hz_utility_v2pub.debug (
1006: p_message => c_api_name||' (-)',
1007: p_prefix => l_debug_prefix,
1008: p_msg_level => fnd_log.level_procedure);
1009: END IF;
1010:
1011: return l_has_duplicates;
1012:
1064:
1065: l_debug_prefix := '';
1066:
1067: -- Debug info.
1068: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
1069: hz_utility_v2pub.debug (
1070: p_message => c_api_name||' (+)',
1071: p_prefix => l_debug_prefix,
1072: p_msg_level => fnd_log.level_procedure);
1068: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
1069: hz_utility_v2pub.debug (
1070: p_message => c_api_name||' (+)',
1071: p_prefix => l_debug_prefix,
1072: p_msg_level => fnd_log.level_procedure);
1073: END IF;
1074:
1075: -- load setup data
1076: IF G_SETUP_LOADED = 0 THEN
1096: trunc(p_party_usg_assignment_rec.effective_end_date);
1097: END IF;
1098:
1099: -- Debug info.
1100: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1101: hz_utility_v2pub.debug(
1102: p_prefix => l_debug_prefix,
1103: p_message => 'effective_start_date = '||
1104: TO_CHAR(p_party_usg_assignment_rec.effective_start_date, 'YYYY/MM/DD')||' '||
1103: p_message => 'effective_start_date = '||
1104: TO_CHAR(p_party_usg_assignment_rec.effective_start_date, 'YYYY/MM/DD')||' '||
1105: 'effective_end_date = '||
1106: TO_CHAR(p_party_usg_assignment_rec.effective_end_date, 'YYYY/MM/DD'),
1107: p_msg_level => fnd_log.level_statement);
1108: END IF;
1109:
1110: --
1111: -- Do validation
1202: );
1203: END IF;
1204:
1205: -- Debug info.
1206: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
1207: hz_utility_v2pub.debug (
1208: p_message => c_api_name||' (-)',
1209: p_prefix => l_debug_prefix,
1210: p_msg_level => fnd_log.level_procedure);
1206: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
1207: hz_utility_v2pub.debug (
1208: p_message => c_api_name||' (-)',
1209: p_prefix => l_debug_prefix,
1210: p_msg_level => fnd_log.level_procedure);
1211: END IF;
1212:
1213: END do_assign_party_usage;
1214:
1264:
1265: l_debug_prefix := '';
1266:
1267: -- Debug info.
1268: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
1269: hz_utility_v2pub.debug (
1270: p_message => c_api_name||' (+)',
1271: p_prefix => l_debug_prefix,
1272: p_msg_level => fnd_log.level_procedure);
1268: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
1269: hz_utility_v2pub.debug (
1270: p_message => c_api_name||' (+)',
1271: p_prefix => l_debug_prefix,
1272: p_msg_level => fnd_log.level_procedure);
1273: END IF;
1274:
1275: -- load setup data
1276: IF G_SETUP_LOADED = 0 THEN
1304: p_party_usg_assignment_rec.effective_end_date := D_FUTURE_DATE;
1305: END IF;
1306:
1307: -- Debug info.
1308: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1309: hz_utility_v2pub.debug(
1310: p_prefix => l_debug_prefix,
1311: p_message => 'effective_start_date = '||
1312: TO_CHAR(p_party_usg_assignment_rec.effective_start_date, 'YYYY/MM/DD')||' '||
1311: p_message => 'effective_start_date = '||
1312: TO_CHAR(p_party_usg_assignment_rec.effective_start_date, 'YYYY/MM/DD')||' '||
1313: 'effective_end_date = '||
1314: TO_CHAR(p_party_usg_assignment_rec.effective_end_date, 'YYYY/MM/DD'),
1315: p_msg_level => fnd_log.level_statement);
1316: END IF;
1317:
1318: --
1319: -- Do validation
1407: END IF;
1408: END LOOP;
1409:
1410: -- Debug info.
1411: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
1412: hz_utility_v2pub.debug (
1413: p_message => c_api_name||' (-)',
1414: p_prefix => l_debug_prefix,
1415: p_msg_level => fnd_log.level_procedure);
1411: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
1412: hz_utility_v2pub.debug (
1413: p_message => c_api_name||' (-)',
1414: p_prefix => l_debug_prefix,
1415: p_msg_level => fnd_log.level_procedure);
1416: END IF;
1417:
1418: END do_update_usg_assignment;
1419:
1494:
1495: l_debug_prefix := '';
1496:
1497: -- Debug info.
1498: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
1499: hz_utility_v2pub.debug (
1500: p_message => c_api_name||' (+)',
1501: p_prefix => l_debug_prefix,
1502: p_msg_level => fnd_log.level_procedure);
1498: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
1499: hz_utility_v2pub.debug (
1500: p_message => c_api_name||' (+)',
1501: p_prefix => l_debug_prefix,
1502: p_msg_level => fnd_log.level_procedure);
1503: END IF;
1504:
1505: G_PARTY_USAGE_CODES.delete;
1506: G_CREATED_BY_MODULES.delete;
1564:
1565: END IF;
1566:
1567: -- Debug info.
1568: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1569: hz_utility_v2pub.debug(
1570: p_prefix => l_debug_prefix,
1571: p_message => 'G_SETUP_LOADED = '||G_SETUP_LOADED,
1572: p_msg_level => fnd_log.level_statement);
1568: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1569: hz_utility_v2pub.debug(
1570: p_prefix => l_debug_prefix,
1571: p_message => 'G_SETUP_LOADED = '||G_SETUP_LOADED,
1572: p_msg_level => fnd_log.level_statement);
1573: END IF;
1574:
1575: -- Debug info.
1576: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
1572: p_msg_level => fnd_log.level_statement);
1573: END IF;
1574:
1575: -- Debug info.
1576: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
1577: hz_utility_v2pub.debug (
1578: p_message => c_api_name||' (-)',
1579: p_prefix => l_debug_prefix,
1580: p_msg_level => fnd_log.level_procedure);
1576: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
1577: hz_utility_v2pub.debug (
1578: p_message => c_api_name||' (-)',
1579: p_prefix => l_debug_prefix,
1580: p_msg_level => fnd_log.level_procedure);
1581: END IF;
1582:
1583: END initialize;
1584:
1611:
1612: l_debug_prefix := '';
1613:
1614: -- Debug info.
1615: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
1616: hz_utility_v2pub.debug (
1617: p_message => c_api_name||' (+)',
1618: p_prefix => l_debug_prefix,
1619: p_msg_level => fnd_log.level_procedure);
1615: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
1616: hz_utility_v2pub.debug (
1617: p_message => c_api_name||' (+)',
1618: p_prefix => l_debug_prefix,
1619: p_msg_level => fnd_log.level_procedure);
1620: END IF;
1621:
1622: HZ_PARTY_USG_ASSIGNMENTS_PKG.insert_row (
1623: x_party_id => p_party_usg_assignment_rec.party_id,
1660: p_create_update_flag => 'I',
1661: p_party_usg_assignment_id => l_party_usg_assignment_id);
1662:
1663: -- Debug info.
1664: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
1665: hz_utility_v2pub.debug (
1666: p_message => c_api_name||' (-)',
1667: p_prefix => l_debug_prefix,
1668: p_msg_level => fnd_log.level_procedure);
1664: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
1665: hz_utility_v2pub.debug (
1666: p_message => c_api_name||' (-)',
1667: p_prefix => l_debug_prefix,
1668: p_msg_level => fnd_log.level_procedure);
1669: END IF;
1670:
1671: END insert_row;
1672:
1712:
1713: l_debug_prefix := '';
1714:
1715: -- Debug info.
1716: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
1717: hz_utility_v2pub.debug (
1718: p_message => c_api_name||' (+)',
1719: p_prefix => l_debug_prefix,
1720: p_msg_level => fnd_log.level_procedure);
1716: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
1717: hz_utility_v2pub.debug (
1718: p_message => c_api_name||' (+)',
1719: p_prefix => l_debug_prefix,
1720: p_msg_level => fnd_log.level_procedure);
1721: END IF;
1722:
1723: OPEN c_assignment(p_party_usg_assignment_id);
1724: FETCH c_assignment INTO l_object_version_number;
1778: p_create_update_flag => 'U',
1779: p_party_usg_assignment_id => p_party_usg_assignment_id);
1780:
1781: -- Debug info.
1782: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
1783: hz_utility_v2pub.debug (
1784: p_message => c_api_name||' (-)',
1785: p_prefix => l_debug_prefix,
1786: p_msg_level => fnd_log.level_procedure);
1782: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
1783: hz_utility_v2pub.debug (
1784: p_message => c_api_name||' (-)',
1785: p_prefix => l_debug_prefix,
1786: p_msg_level => fnd_log.level_procedure);
1787: END IF;
1788:
1789: END update_row;
1790:
1899:
1900: l_debug_prefix := '';
1901:
1902: -- Debug info.
1903: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
1904: hz_utility_v2pub.debug (
1905: p_message => c_api_name||' (+)',
1906: p_prefix => l_debug_prefix,
1907: p_msg_level => fnd_log.level_procedure
1903: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
1904: hz_utility_v2pub.debug (
1905: p_message => c_api_name||' (+)',
1906: p_prefix => l_debug_prefix,
1907: p_msg_level => fnd_log.level_procedure
1908: );
1909: END IF;
1910:
1911: -- initialize message list if p_init_msg_list is set to TRUE.
1940: p_count => x_msg_count,
1941: p_data => x_msg_data);
1942:
1943: -- Debug info.
1944: IF fnd_log.level_exception >= fnd_log.g_current_runtime_level THEN
1945: hz_utility_v2pub.debug_return_messages (
1946: p_msg_count => x_msg_count,
1947: p_msg_data => x_msg_data,
1948: p_msg_type => 'WARNING',
1945: hz_utility_v2pub.debug_return_messages (
1946: p_msg_count => x_msg_count,
1947: p_msg_data => x_msg_data,
1948: p_msg_type => 'WARNING',
1949: p_msg_level => fnd_log.level_exception
1950: );
1951: END IF;
1952:
1953: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
1949: p_msg_level => fnd_log.level_exception
1950: );
1951: END IF;
1952:
1953: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
1954: hz_utility_v2pub.debug (
1955: p_message => c_api_name||' (-)',
1956: p_prefix => l_debug_prefix,
1957: p_msg_level => fnd_log.level_procedure
1953: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
1954: hz_utility_v2pub.debug (
1955: p_message => c_api_name||' (-)',
1956: p_prefix => l_debug_prefix,
1957: p_msg_level => fnd_log.level_procedure
1958: );
1959: END IF;
1960:
1961: EXCEPTION
1969: p_data => x_msg_data
1970: );
1971:
1972: -- Debug info.
1973: IF fnd_log.level_exception >= fnd_log.g_current_runtime_level THEN
1974: hz_utility_v2pub.debug_return_messages (
1975: p_msg_count => x_msg_count,
1976: p_msg_data => x_msg_data,
1977: p_msg_type => 'ERROR',
1974: hz_utility_v2pub.debug_return_messages (
1975: p_msg_count => x_msg_count,
1976: p_msg_data => x_msg_data,
1977: p_msg_type => 'ERROR',
1978: p_msg_level => fnd_log.level_error
1979: );
1980: END IF;
1981:
1982: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
1978: p_msg_level => fnd_log.level_error
1979: );
1980: END IF;
1981:
1982: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
1983: hz_utility_v2pub.debug (
1984: p_message => c_api_name||' (-)',
1985: p_prefix => l_debug_prefix,
1986: p_msg_level => fnd_log.level_procedure
1982: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
1983: hz_utility_v2pub.debug (
1984: p_message => c_api_name||' (-)',
1985: p_prefix => l_debug_prefix,
1986: p_msg_level => fnd_log.level_procedure
1987: );
1988: END IF;
1989:
1990: WHEN fnd_api.G_EXC_UNEXPECTED_ERROR THEN
1996: p_data => x_msg_data
1997: );
1998:
1999: -- Debug info.
2000: IF fnd_log.level_exception >= fnd_log.g_current_runtime_level THEN
2001: hz_utility_v2pub.debug_return_messages (
2002: p_msg_count => x_msg_count,
2003: p_msg_data => x_msg_data,
2004: p_msg_type => 'UNEXPECTED ERROR',
2001: hz_utility_v2pub.debug_return_messages (
2002: p_msg_count => x_msg_count,
2003: p_msg_data => x_msg_data,
2004: p_msg_type => 'UNEXPECTED ERROR',
2005: p_msg_level => fnd_log.level_error
2006: );
2007: END IF;
2008:
2009: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2005: p_msg_level => fnd_log.level_error
2006: );
2007: END IF;
2008:
2009: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2010: hz_utility_v2pub.debug (
2011: p_message => c_api_name||' (-)',
2012: p_prefix => l_debug_prefix,
2013: p_msg_level => fnd_log.level_procedure
2009: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2010: hz_utility_v2pub.debug (
2011: p_message => c_api_name||' (-)',
2012: p_prefix => l_debug_prefix,
2013: p_msg_level => fnd_log.level_procedure
2014: );
2015: END IF;
2016:
2017: WHEN OTHERS THEN
2028: p_data => x_msg_data
2029: );
2030:
2031: -- Debug info.
2032: IF fnd_log.level_exception >= fnd_log.g_current_runtime_level THEN
2033: hz_utility_v2pub.debug_return_messages (
2034: p_msg_count => x_msg_count,
2035: p_msg_data => x_msg_data,
2036: p_msg_type => 'SQL ERROR',
2033: hz_utility_v2pub.debug_return_messages (
2034: p_msg_count => x_msg_count,
2035: p_msg_data => x_msg_data,
2036: p_msg_type => 'SQL ERROR',
2037: p_msg_level => fnd_log.level_error
2038: );
2039: END IF;
2040:
2041: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2037: p_msg_level => fnd_log.level_error
2038: );
2039: END IF;
2040:
2041: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2042: hz_utility_v2pub.debug (
2043: p_message => c_api_name||' (-)',
2044: p_prefix => l_debug_prefix,
2045: p_msg_level => fnd_log.level_procedure
2041: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2042: hz_utility_v2pub.debug (
2043: p_message => c_api_name||' (-)',
2044: p_prefix => l_debug_prefix,
2045: p_msg_level => fnd_log.level_procedure
2046: );
2047: END IF;
2048:
2049: END assign_party_usage;
2106:
2107: l_debug_prefix := '';
2108:
2109: -- Debug info.
2110: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2111: hz_utility_v2pub.debug (
2112: p_message => c_api_name||' (+)',
2113: p_prefix => l_debug_prefix,
2114: p_msg_level => fnd_log.level_procedure
2110: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2111: hz_utility_v2pub.debug (
2112: p_message => c_api_name||' (+)',
2113: p_prefix => l_debug_prefix,
2114: p_msg_level => fnd_log.level_procedure
2115: );
2116: END IF;
2117:
2118: -- initialize message list if p_init_msg_list is set to TRUE.
2249: p_count => x_msg_count,
2250: p_data => x_msg_data);
2251:
2252: -- Debug info.
2253: IF fnd_log.level_exception >= fnd_log.g_current_runtime_level THEN
2254: hz_utility_v2pub.debug_return_messages (
2255: p_msg_count => x_msg_count,
2256: p_msg_data => x_msg_data,
2257: p_msg_type => 'WARNING',
2254: hz_utility_v2pub.debug_return_messages (
2255: p_msg_count => x_msg_count,
2256: p_msg_data => x_msg_data,
2257: p_msg_type => 'WARNING',
2258: p_msg_level => fnd_log.level_exception
2259: );
2260: END IF;
2261:
2262: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2258: p_msg_level => fnd_log.level_exception
2259: );
2260: END IF;
2261:
2262: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2263: hz_utility_v2pub.debug (
2264: p_message => c_api_name||' (-)',
2265: p_prefix => l_debug_prefix,
2266: p_msg_level => fnd_log.level_procedure
2262: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2263: hz_utility_v2pub.debug (
2264: p_message => c_api_name||' (-)',
2265: p_prefix => l_debug_prefix,
2266: p_msg_level => fnd_log.level_procedure
2267: );
2268: END IF;
2269:
2270: EXCEPTION
2277: p_data => x_msg_data
2278: );
2279:
2280: -- Debug info.
2281: IF fnd_log.level_exception >= fnd_log.g_current_runtime_level THEN
2282: hz_utility_v2pub.debug_return_messages (
2283: p_msg_count => x_msg_count,
2284: p_msg_data => x_msg_data,
2285: p_msg_type => 'ERROR',
2282: hz_utility_v2pub.debug_return_messages (
2283: p_msg_count => x_msg_count,
2284: p_msg_data => x_msg_data,
2285: p_msg_type => 'ERROR',
2286: p_msg_level => fnd_log.level_error
2287: );
2288: END IF;
2289:
2290: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2286: p_msg_level => fnd_log.level_error
2287: );
2288: END IF;
2289:
2290: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2291: hz_utility_v2pub.debug (
2292: p_message => c_api_name||' (-)',
2293: p_prefix => l_debug_prefix,
2294: p_msg_level => fnd_log.level_procedure
2290: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2291: hz_utility_v2pub.debug (
2292: p_message => c_api_name||' (-)',
2293: p_prefix => l_debug_prefix,
2294: p_msg_level => fnd_log.level_procedure
2295: );
2296: END IF;
2297:
2298: WHEN fnd_api.G_EXC_UNEXPECTED_ERROR THEN
2303: p_data => x_msg_data
2304: );
2305:
2306: -- Debug info.
2307: IF fnd_log.level_exception >= fnd_log.g_current_runtime_level THEN
2308: hz_utility_v2pub.debug_return_messages (
2309: p_msg_count => x_msg_count,
2310: p_msg_data => x_msg_data,
2311: p_msg_type => 'UNEXPECTED ERROR',
2308: hz_utility_v2pub.debug_return_messages (
2309: p_msg_count => x_msg_count,
2310: p_msg_data => x_msg_data,
2311: p_msg_type => 'UNEXPECTED ERROR',
2312: p_msg_level => fnd_log.level_error
2313: );
2314: END IF;
2315:
2316: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2312: p_msg_level => fnd_log.level_error
2313: );
2314: END IF;
2315:
2316: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2317: hz_utility_v2pub.debug (
2318: p_message => c_api_name||' (-)',
2319: p_prefix => l_debug_prefix,
2320: p_msg_level => fnd_log.level_procedure
2316: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2317: hz_utility_v2pub.debug (
2318: p_message => c_api_name||' (-)',
2319: p_prefix => l_debug_prefix,
2320: p_msg_level => fnd_log.level_procedure
2321: );
2322: END IF;
2323:
2324: WHEN OTHERS THEN
2334: p_data => x_msg_data
2335: );
2336:
2337: -- Debug info.
2338: IF fnd_log.level_exception >= fnd_log.g_current_runtime_level THEN
2339: hz_utility_v2pub.debug_return_messages (
2340: p_msg_count => x_msg_count,
2341: p_msg_data => x_msg_data,
2342: p_msg_type => 'SQL ERROR',
2339: hz_utility_v2pub.debug_return_messages (
2340: p_msg_count => x_msg_count,
2341: p_msg_data => x_msg_data,
2342: p_msg_type => 'SQL ERROR',
2343: p_msg_level => fnd_log.level_error
2344: );
2345: END IF;
2346:
2347: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2343: p_msg_level => fnd_log.level_error
2344: );
2345: END IF;
2346:
2347: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2348: hz_utility_v2pub.debug (
2349: p_message => c_api_name||' (-)',
2350: p_prefix => l_debug_prefix,
2351: p_msg_level => fnd_log.level_procedure
2347: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2348: hz_utility_v2pub.debug (
2349: p_message => c_api_name||' (-)',
2350: p_prefix => l_debug_prefix,
2351: p_msg_level => fnd_log.level_procedure
2352: );
2353: END IF;
2354:
2355: END get_usg_assignment;
2411:
2412: l_debug_prefix := '';
2413:
2414: -- Debug info.
2415: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2416: hz_utility_v2pub.debug (
2417: p_message => c_api_name||' (+)',
2418: p_prefix => l_debug_prefix,
2419: p_msg_level => fnd_log.level_procedure
2415: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2416: hz_utility_v2pub.debug (
2417: p_message => c_api_name||' (+)',
2418: p_prefix => l_debug_prefix,
2419: p_msg_level => fnd_log.level_procedure
2420: );
2421: END IF;
2422:
2423: -- initialize message list if p_init_msg_list is set to TRUE.
2469: p_count => x_msg_count,
2470: p_data => x_msg_data);
2471:
2472: -- Debug info.
2473: IF fnd_log.level_exception >= fnd_log.g_current_runtime_level THEN
2474: hz_utility_v2pub.debug_return_messages (
2475: p_msg_count => x_msg_count,
2476: p_msg_data => x_msg_data,
2477: p_msg_type => 'WARNING',
2474: hz_utility_v2pub.debug_return_messages (
2475: p_msg_count => x_msg_count,
2476: p_msg_data => x_msg_data,
2477: p_msg_type => 'WARNING',
2478: p_msg_level => fnd_log.level_exception
2479: );
2480: END IF;
2481:
2482: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2478: p_msg_level => fnd_log.level_exception
2479: );
2480: END IF;
2481:
2482: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2483: hz_utility_v2pub.debug (
2484: p_message => c_api_name||' (-)',
2485: p_prefix => l_debug_prefix,
2486: p_msg_level => fnd_log.level_procedure
2482: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2483: hz_utility_v2pub.debug (
2484: p_message => c_api_name||' (-)',
2485: p_prefix => l_debug_prefix,
2486: p_msg_level => fnd_log.level_procedure
2487: );
2488: END IF;
2489:
2490: EXCEPTION
2498: p_data => x_msg_data
2499: );
2500:
2501: -- Debug info.
2502: IF fnd_log.level_exception >= fnd_log.g_current_runtime_level THEN
2503: hz_utility_v2pub.debug_return_messages (
2504: p_msg_count => x_msg_count,
2505: p_msg_data => x_msg_data,
2506: p_msg_type => 'ERROR',
2503: hz_utility_v2pub.debug_return_messages (
2504: p_msg_count => x_msg_count,
2505: p_msg_data => x_msg_data,
2506: p_msg_type => 'ERROR',
2507: p_msg_level => fnd_log.level_error
2508: );
2509: END IF;
2510:
2511: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2507: p_msg_level => fnd_log.level_error
2508: );
2509: END IF;
2510:
2511: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2512: hz_utility_v2pub.debug (
2513: p_message => c_api_name||' (-)',
2514: p_prefix => l_debug_prefix,
2515: p_msg_level => fnd_log.level_procedure
2511: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2512: hz_utility_v2pub.debug (
2513: p_message => c_api_name||' (-)',
2514: p_prefix => l_debug_prefix,
2515: p_msg_level => fnd_log.level_procedure
2516: );
2517: END IF;
2518:
2519: WHEN fnd_api.G_EXC_UNEXPECTED_ERROR THEN
2525: p_data => x_msg_data
2526: );
2527:
2528: -- Debug info.
2529: IF fnd_log.level_exception >= fnd_log.g_current_runtime_level THEN
2530: hz_utility_v2pub.debug_return_messages (
2531: p_msg_count => x_msg_count,
2532: p_msg_data => x_msg_data,
2533: p_msg_type => 'UNEXPECTED ERROR',
2530: hz_utility_v2pub.debug_return_messages (
2531: p_msg_count => x_msg_count,
2532: p_msg_data => x_msg_data,
2533: p_msg_type => 'UNEXPECTED ERROR',
2534: p_msg_level => fnd_log.level_error
2535: );
2536: END IF;
2537:
2538: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2534: p_msg_level => fnd_log.level_error
2535: );
2536: END IF;
2537:
2538: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2539: hz_utility_v2pub.debug (
2540: p_message => c_api_name||' (-)',
2541: p_prefix => l_debug_prefix,
2542: p_msg_level => fnd_log.level_procedure
2538: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2539: hz_utility_v2pub.debug (
2540: p_message => c_api_name||' (-)',
2541: p_prefix => l_debug_prefix,
2542: p_msg_level => fnd_log.level_procedure
2543: );
2544: END IF;
2545:
2546: WHEN OTHERS THEN
2557: p_data => x_msg_data
2558: );
2559:
2560: -- Debug info.
2561: IF fnd_log.level_exception >= fnd_log.g_current_runtime_level THEN
2562: hz_utility_v2pub.debug_return_messages (
2563: p_msg_count => x_msg_count,
2564: p_msg_data => x_msg_data,
2565: p_msg_type => 'SQL ERROR',
2562: hz_utility_v2pub.debug_return_messages (
2563: p_msg_count => x_msg_count,
2564: p_msg_data => x_msg_data,
2565: p_msg_type => 'SQL ERROR',
2566: p_msg_level => fnd_log.level_error
2567: );
2568: END IF;
2569:
2570: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2566: p_msg_level => fnd_log.level_error
2567: );
2568: END IF;
2569:
2570: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2571: hz_utility_v2pub.debug (
2572: p_message => c_api_name||' (-)',
2573: p_prefix => l_debug_prefix,
2574: p_msg_level => fnd_log.level_procedure
2570: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2571: hz_utility_v2pub.debug (
2572: p_message => c_api_name||' (-)',
2573: p_prefix => l_debug_prefix,
2574: p_msg_level => fnd_log.level_procedure
2575: );
2576: END IF;
2577:
2578: END update_usg_assignment;
2630:
2631: l_debug_prefix := '';
2632:
2633: -- Debug info.
2634: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2635: hz_utility_v2pub.debug (
2636: p_message => c_api_name||' (+)',
2637: p_prefix => l_debug_prefix,
2638: p_msg_level => fnd_log.level_procedure
2634: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2635: hz_utility_v2pub.debug (
2636: p_message => c_api_name||' (+)',
2637: p_prefix => l_debug_prefix,
2638: p_msg_level => fnd_log.level_procedure
2639: );
2640: END IF;
2641:
2642: l_party_usg_assignment_rec.party_id := p_party_id;
2667: p_data => x_msg_data);
2668: END IF;
2669: END IF;
2670:
2671: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2672: hz_utility_v2pub.debug (
2673: p_message => c_api_name||' (-)',
2674: p_prefix => l_debug_prefix,
2675: p_msg_level => fnd_log.level_procedure
2671: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2672: hz_utility_v2pub.debug (
2673: p_message => c_api_name||' (-)',
2674: p_prefix => l_debug_prefix,
2675: p_msg_level => fnd_log.level_procedure
2676: );
2677: END IF;
2678:
2679: END inactivate_usg_assignment;
2780: l_debug_prefix := '';
2781: l_allow_party_merge := 'Y';
2782:
2783: -- Debug info.
2784: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2785: hz_utility_v2pub.debug (
2786: p_message => c_api_name||' (+)',
2787: p_prefix => l_debug_prefix,
2788: p_msg_level => fnd_log.level_procedure
2784: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2785: hz_utility_v2pub.debug (
2786: p_message => c_api_name||' (+)',
2787: p_prefix => l_debug_prefix,
2788: p_msg_level => fnd_log.level_procedure
2789: );
2790: END IF;
2791:
2792: -- initialize message list if p_init_msg_list is set to TRUE.
2825: WHILE (i <= l_from_party_usage_codes_tbl.count AND
2826: l_continue_i = 'Y')
2827: LOOP
2828: -- Debug info.
2829: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
2830: hz_utility_v2pub.debug(
2831: p_prefix => l_debug_prefix,
2832: p_message => 'l_from_party_usage_codes_tbl('||i||') = '||
2833: l_from_party_usage_codes_tbl(i),
2830: hz_utility_v2pub.debug(
2831: p_prefix => l_debug_prefix,
2832: p_message => 'l_from_party_usage_codes_tbl('||i||') = '||
2833: l_from_party_usage_codes_tbl(i),
2834: p_msg_level => fnd_log.level_statement);
2835: END IF;
2836:
2837: l_continue_j := 'Y'; j := 1;
2838: WHILE (j <= l_to_party_usage_codes_tbl.count AND
2838: WHILE (j <= l_to_party_usage_codes_tbl.count AND
2839: l_continue_j = 'Y')
2840: LOOP
2841: -- Debug info.
2842: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
2843: hz_utility_v2pub.debug(
2844: p_prefix => l_debug_prefix,
2845: p_message => 'l_to_party_usage_codes_tbl('||j||') = '||
2846: l_to_party_usage_codes_tbl(j),
2843: hz_utility_v2pub.debug(
2844: p_prefix => l_debug_prefix,
2845: p_message => 'l_to_party_usage_codes_tbl('||j||') = '||
2846: l_to_party_usage_codes_tbl(j),
2847: p_msg_level => fnd_log.level_statement);
2848: END IF;
2849:
2850: --
2851: -- check exclusive rule
2884: p_count => x_msg_count,
2885: p_data => x_msg_data);
2886:
2887: -- Debug info.
2888: IF fnd_log.level_exception >= fnd_log.g_current_runtime_level THEN
2889: hz_utility_v2pub.debug_return_messages (
2890: p_msg_count => x_msg_count,
2891: p_msg_data => x_msg_data,
2892: p_msg_type => 'ERROR',
2889: hz_utility_v2pub.debug_return_messages (
2890: p_msg_count => x_msg_count,
2891: p_msg_data => x_msg_data,
2892: p_msg_type => 'ERROR',
2893: p_msg_level => fnd_log.level_exception
2894: );
2895: END IF;
2896:
2897: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2893: p_msg_level => fnd_log.level_exception
2894: );
2895: END IF;
2896:
2897: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2898: hz_utility_v2pub.debug (
2899: p_message => c_api_name||' (-)',
2900: p_prefix => l_debug_prefix,
2901: p_msg_level => fnd_log.level_procedure
2897: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2898: hz_utility_v2pub.debug (
2899: p_message => c_api_name||' (-)',
2900: p_prefix => l_debug_prefix,
2901: p_msg_level => fnd_log.level_procedure
2902: );
2903: END IF;
2904:
2905: RETURN l_allow_party_merge;
2940: x_msg_data VARCHAR2(2000);
2941:
2942: BEGIN
2943: -- Debug info.
2944: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2945: hz_utility_v2pub.debug (
2946: p_message => c_api_name||' (+)',
2947: p_prefix => l_debug_prefix,
2948: p_msg_level => fnd_log.level_procedure
2944: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2945: hz_utility_v2pub.debug (
2946: p_message => c_api_name||' (+)',
2947: p_prefix => l_debug_prefix,
2948: p_msg_level => fnd_log.level_procedure
2949: );
2950: END IF;
2951:
2952: -- get old assignment.
2967: l_has_duplicates := duplicates_exist(l_party_usg_assignment_rec, x_to_assignment_id);
2968: END IF;
2969:
2970: -- Debug info.
2971: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2972: hz_utility_v2pub.debug (
2973: p_message => c_api_name||' (-)',
2974: p_prefix => l_debug_prefix,
2975: p_msg_level => fnd_log.level_procedure
2971: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
2972: hz_utility_v2pub.debug (
2973: p_message => c_api_name||' (-)',
2974: p_prefix => l_debug_prefix,
2975: p_msg_level => fnd_log.level_procedure
2976: );
2977: END IF;
2978:
2979: END find_duplicates;
3037: x_return_status := fnd_api.g_ret_sts_error;
3038: END IF;
3039: CLOSE c_party;
3040:
3041: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
3042: hz_utility_v2pub.debug(
3043: p_prefix => '',
3044: p_message => 'after validate supplier name uniqueness ... ' ||
3045: 'x_return_status = ' || x_return_status,
3042: hz_utility_v2pub.debug(
3043: p_prefix => '',
3044: p_message => 'after validate supplier name uniqueness ... ' ||
3045: 'x_return_status = ' || x_return_status,
3046: p_msg_level => fnd_log.level_statement);
3047: END IF;
3048:
3049: END validate_supplier_name;
3050: