[Home] [Help]
85: p_isformat IN NUMBER := 0
86: ) RETURN VARCHAR2;
87:
88: PROCEDURE get_phone_format (
89: p_raw_phone_number IN VARCHAR2 := fnd_api.g_miss_char,
90: p_territory_code IN VARCHAR2 := fnd_api.g_miss_char,
91: p_area_code IN VARCHAR2,
92: x_phone_country_code OUT NOCOPY VARCHAR2,
93: x_phone_format_style OUT NOCOPY VARCHAR2,
86: ) RETURN VARCHAR2;
87:
88: PROCEDURE get_phone_format (
89: p_raw_phone_number IN VARCHAR2 := fnd_api.g_miss_char,
90: p_territory_code IN VARCHAR2 := fnd_api.g_miss_char,
91: p_area_code IN VARCHAR2,
92: x_phone_country_code OUT NOCOPY VARCHAR2,
93: x_phone_format_style OUT NOCOPY VARCHAR2,
94: x_area_code_size OUT NOCOPY VARCHAR2,
96: x_msg OUT NOCOPY VARCHAR2
97: );
98:
99: PROCEDURE translate_raw_phone_number (
100: p_raw_phone_number IN VARCHAR2 := fnd_api.g_miss_char,
101: p_phone_format_style IN VARCHAR2 := fnd_api.g_miss_char,
102: p_area_code_size IN NUMBER := 0,
103: x_formatted_phone_number OUT NOCOPY VARCHAR2,
104: x_phone_area_code OUT NOCOPY VARCHAR2,
97: );
98:
99: PROCEDURE translate_raw_phone_number (
100: p_raw_phone_number IN VARCHAR2 := fnd_api.g_miss_char,
101: p_phone_format_style IN VARCHAR2 := fnd_api.g_miss_char,
102: p_area_code_size IN NUMBER := 0,
103: x_formatted_phone_number OUT NOCOPY VARCHAR2,
104: x_phone_area_code OUT NOCOPY VARCHAR2,
105: x_phone_number OUT NOCOPY VARCHAR2
262: -- p_phone_rec Phone record.
263: -- p_telex_rec Telex record.
264: -- p_web_rec Web record.
265: -- x_return_status Return status after the call. The status can
266: -- be FND_API.G_RET_STS_SUCCESS (success),
267: -- FND_API.G_RET_STS_ERROR (error),
268: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
269: -- OUT:
270: -- x_contact_point_id Contact point ID.
263: -- p_telex_rec Telex record.
264: -- p_web_rec Web record.
265: -- x_return_status Return status after the call. The status can
266: -- be FND_API.G_RET_STS_SUCCESS (success),
267: -- FND_API.G_RET_STS_ERROR (error),
268: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
269: -- OUT:
270: -- x_contact_point_id Contact point ID.
271: --
264: -- p_web_rec Web record.
265: -- x_return_status Return status after the call. The status can
266: -- be FND_API.G_RET_STS_SUCCESS (success),
267: -- FND_API.G_RET_STS_ERROR (error),
268: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
269: -- OUT:
270: -- x_contact_point_id Contact point ID.
271: --
272: -- NOTES
443: p_web_rec => l_web_rec,
444: p_rowid => NULL,
445: x_return_status => x_return_status);
446:
447: IF x_return_status <> fnd_api.g_ret_sts_success THEN
448: RAISE fnd_api.g_exc_error;
449: END IF;
450:
451: hz_registry_validate_v2pub.validate_eft_contact_point (
444: p_rowid => NULL,
445: x_return_status => x_return_status);
446:
447: IF x_return_status <> fnd_api.g_ret_sts_success THEN
448: RAISE fnd_api.g_exc_error;
449: END IF;
450:
451: hz_registry_validate_v2pub.validate_eft_contact_point (
452: p_create_update_flag => 'C',
456: x_return_status => x_return_status);
457: END IF;
458:
459: -- Raise an error if any of the validations failed.
460: IF x_return_status <> fnd_api.g_ret_sts_success THEN
461: RAISE fnd_api.g_exc_error;
462: END IF;
463:
464: -- If raw_phone_number is passed in, call procedure phone_format.
457: END IF;
458:
459: -- Raise an error if any of the validations failed.
460: IF x_return_status <> fnd_api.g_ret_sts_success THEN
461: RAISE fnd_api.g_exc_error;
462: END IF;
463:
464: -- If raw_phone_number is passed in, call procedure phone_format.
465: -- either raw_phone_number or phone_number should be passed in
477: --was passed in else get it from hz_locations for owner_table_name HZ_PARTY_SITES
478:
479: IF p_contact_point_rec.contact_point_type = 'PHONE' THEN
480: IF l_phone_rec.raw_phone_number IS NOT NULL AND
481: l_phone_rec.raw_phone_number <> fnd_api.g_miss_char
482: THEN
483: IF l_phone_rec.phone_country_code is not null AND
484: l_phone_rec.phone_country_code <> fnd_api.g_miss_char
485: THEN
480: IF l_phone_rec.raw_phone_number IS NOT NULL AND
481: l_phone_rec.raw_phone_number <> fnd_api.g_miss_char
482: THEN
483: IF l_phone_rec.phone_country_code is not null AND
484: l_phone_rec.phone_country_code <> fnd_api.g_miss_char
485: THEN
486: BEGIN
487: select territory_code into l_country_code
488: from hz_phone_country_codes
493: NULL;
494: END;
495: ELSIF p_contact_point_rec.owner_table_name = 'HZ_PARTY_SITES' AND
496: (l_phone_rec.phone_country_code IS NULL OR
497: l_phone_rec.phone_country_code = fnd_api.g_miss_char)
498: THEN
499: -- Bug 2117973: modified to conform to Applications PL/SQL standards.
500: OPEN c_country(p_contact_point_rec.owner_table_id);
501: FETCH c_country INTO l_country_code;
531:
532: -- Bug 2197181 : content_source_type is obsolete and replaced by
533: -- actual_content_source
534:
535: IF x_return_status <> fnd_api.g_ret_sts_success THEN
536: IF p_contact_point_rec.actual_content_source = g_miss_content_source_type
537: THEN
538: IF x_return_status = fnd_api.g_ret_sts_error THEN
539: RAISE fnd_api.g_exc_error;
534:
535: IF x_return_status <> fnd_api.g_ret_sts_success THEN
536: IF p_contact_point_rec.actual_content_source = g_miss_content_source_type
537: THEN
538: IF x_return_status = fnd_api.g_ret_sts_error THEN
539: RAISE fnd_api.g_exc_error;
540: ELSE
541: RAISE fnd_api.g_exc_unexpected_error;
542: END IF;
535: IF x_return_status <> fnd_api.g_ret_sts_success THEN
536: IF p_contact_point_rec.actual_content_source = g_miss_content_source_type
537: THEN
538: IF x_return_status = fnd_api.g_ret_sts_error THEN
539: RAISE fnd_api.g_exc_error;
540: ELSE
541: RAISE fnd_api.g_exc_unexpected_error;
542: END IF;
543: ELSE
537: THEN
538: IF x_return_status = fnd_api.g_ret_sts_error THEN
539: RAISE fnd_api.g_exc_error;
540: ELSE
541: RAISE fnd_api.g_exc_unexpected_error;
542: END IF;
543: ELSE
544: FOR i IN 1..(l_msg_count - l_message_count) LOOP
545: fnd_msg_pub.delete_msg(l_msg_count - l_message_count + 1 - i);
543: ELSE
544: FOR i IN 1..(l_msg_count - l_message_count) LOOP
545: fnd_msg_pub.delete_msg(l_msg_count - l_message_count + 1 - i);
546: END LOOP;
547: x_return_status := fnd_api.g_ret_sts_success;
548: END IF;
549: END IF;
550:
551: -- END IF; Bug 3520843
551: -- END IF; Bug 3520843
552: ELSE
553: -- raw_phone_number must always have value.
554: IF l_phone_rec.phone_area_code IS NULL OR
555: l_phone_rec.phone_area_code = fnd_api.g_miss_char
556: THEN
557: l_phone_rec.raw_phone_number := l_phone_rec.phone_number;
558: ELSE
559: l_phone_rec.raw_phone_number := l_phone_rec.phone_area_code || '-' ||
570: END IF;
571:
572: -- Populate transposed_phone_number
573: IF l_phone_rec.phone_country_code IS NOT NULL AND
574: l_phone_rec.phone_country_code <> fnd_api.g_miss_char
575: THEN
576: l_transposed_phone_number := l_phone_rec.phone_country_code;
577: END IF;
578:
576: l_transposed_phone_number := l_phone_rec.phone_country_code;
577: END IF;
578:
579: IF l_phone_rec.phone_area_code IS NOT NULL AND
580: l_phone_rec.phone_area_code <> fnd_api.g_miss_char
581: THEN
582: l_transposed_phone_number := l_transposed_phone_number ||
583: l_phone_rec.phone_area_code;
584: END IF;
611: -- For non-profile entities, the concept of select/de-select data sources is obsoleted.
612: -- There is no need to check if the data-source is selected.
613:
614: IF p_contact_point_rec.status IS NULL OR
615: p_contact_point_rec.status = fnd_api.g_miss_char OR
616: p_contact_point_rec.status = 'A'
617: THEN
618: IF p_contact_point_rec.primary_flag = 'Y' THEN
619: -- Bug 2197181: added for mix-n-match project
669: -- For non-profile entities, the concept of select/de-select data sources is obsoleted.
670: -- There is no need to check if the data-source is selected.
671:
672: IF p_contact_point_rec.contact_point_purpose IS NOT NULL AND
673: p_contact_point_rec.contact_point_purpose <> fnd_api.g_miss_char
674: THEN
675: IF p_contact_point_rec.primary_by_purpose = 'Y' THEN
676: -- Bug 2197181: added for mix-n-match project
677: -- IF g_cpt_is_datasource_selected = 'Y' THEN
688: p_contact_point_rec.primary_by_purpose := 'N';
689: END IF;
690:
691: if l_phone_rec.timezone_id is null or
692: l_phone_rec.timezone_id = fnd_api.g_miss_num
693: then
694:
695: if l_phone_rec.phone_country_code IS NOT NULL AND
696: l_phone_rec.phone_country_code <> fnd_api.g_miss_char
692: l_phone_rec.timezone_id = fnd_api.g_miss_num
693: then
694:
695: if l_phone_rec.phone_country_code IS NOT NULL AND
696: l_phone_rec.phone_country_code <> fnd_api.g_miss_char
697: then
698: l_message_count := fnd_msg_pub.count_msg();
699: hz_timezone_pub.get_phone_timezone_id(
700: p_api_version => 1.0,
697: then
698: l_message_count := fnd_msg_pub.count_msg();
699: hz_timezone_pub.get_phone_timezone_id(
700: p_api_version => 1.0,
701: p_init_msg_list => FND_API.G_FALSE,
702: p_phone_country_code => l_phone_rec.phone_country_code,
703: p_area_code => l_phone_rec.phone_area_code,
704: p_phone_prefix => null,
705: p_country_code => null,-- don't need to pass in this
706: x_timezone_id => l_phone_rec.timezone_id,
707: x_return_status => l_return_status ,
708: x_msg_count =>l_msg_count ,
709: x_msg_data => l_msg_data);
710: if l_return_status <> fnd_api.g_ret_sts_success
711: then -- we don't raise error
712: l_phone_rec.timezone_id := null;
713: FOR i IN 1..(l_msg_count - l_message_count) LOOP
714: fnd_msg_pub.delete_msg(l_msg_count - l_message_count + 1 - i);
712: l_phone_rec.timezone_id := null;
713: FOR i IN 1..(l_msg_count - l_message_count) LOOP
714: fnd_msg_pub.delete_msg(l_msg_count - l_message_count + 1 - i);
715: END LOOP;
716: l_return_status := FND_API.G_RET_STS_SUCCESS;
717: end if;
718: end if;
719: end if;
720:
812: -- Bug 2197181: commented out NOCOPY the data source checking. We will denormalize
813: -- to hz_parties as long as it's a primary contact point regardless of data
814: -- source.
815: IF p_contact_point_rec.status IS NULL OR
816: p_contact_point_rec.status = fnd_api.g_miss_char OR
817: p_contact_point_rec.status = 'A'
818: THEN
819: IF p_contact_point_rec.primary_flag = 'Y' AND
820: p_contact_point_rec.owner_table_name = 'HZ_PARTIES' AND
820: p_contact_point_rec.owner_table_name = 'HZ_PARTIES' AND
821: (p_contact_point_rec.contact_point_type IN ('WEB','EMAIL','PHONE'))
822: /* AND
823: (p_contact_point_rec.content_source_type IS NULL OR
824: p_contact_point_rec.content_source_type = fnd_api.g_miss_char OR
825: p_contact_point_rec.content_source_type =
826: hz_party_v2pub.g_miss_content_source_type)
827: */
828: THEN
825: p_contact_point_rec.content_source_type =
826: hz_party_v2pub.g_miss_content_source_type)
827: */
828: THEN
829: IF l_phone_rec.phone_line_type = fnd_api.g_miss_char then
830: l_phone_line_type := NULL;
831: ELSE
832: l_phone_line_type := l_phone_rec.phone_line_type;
833: END IF;
830: l_phone_line_type := NULL;
831: ELSE
832: l_phone_line_type := l_phone_rec.phone_line_type;
833: END IF;
834: IF l_phone_rec.phone_country_code = fnd_api.g_miss_char then
835: l_phone_country_code := NULL;
836: ELSE
837: l_phone_country_code := l_phone_rec.phone_country_code;
838: END IF;
835: l_phone_country_code := NULL;
836: ELSE
837: l_phone_country_code := l_phone_rec.phone_country_code;
838: END IF;
839: IF l_phone_rec.phone_area_code = fnd_api.g_miss_char then
840: l_phone_area_code := NULL;
841: ELSE
842: l_phone_area_code := l_phone_rec.phone_area_code;
843: END IF;
840: l_phone_area_code := NULL;
841: ELSE
842: l_phone_area_code := l_phone_rec.phone_area_code;
843: END IF;
844: IF l_phone_rec.phone_number = fnd_api.g_miss_char then
845: l_phone_number := NULL;
846: ELSE
847: l_phone_number := l_phone_rec.phone_number;
848: END IF;
845: l_phone_number := NULL;
846: ELSE
847: l_phone_number := l_phone_rec.phone_number;
848: END IF;
849: IF l_phone_rec.phone_extension = fnd_api.g_miss_char then
850: l_phone_extension := NULL;
851: ELSE
852: l_phone_extension := l_phone_rec.phone_extension;
853: END IF;
850: l_phone_extension := NULL;
851: ELSE
852: l_phone_extension := l_phone_rec.phone_extension;
853: END IF;
854: IF p_contact_point_rec.contact_point_purpose = fnd_api.g_miss_char then
855: l_contact_point_purpose := NULL;
856: ELSE
857: l_contact_point_purpose := p_contact_point_rec.contact_point_purpose;
858: END IF;
885: --Added DQM Sync call
886: hz_dqm_sync.sync_contact_point(x_contact_point_id, 'C');
887:
888: if p_contact_point_rec.orig_system is not null
889: and p_contact_point_rec.orig_system <>fnd_api.g_miss_char
890: then
891: l_orig_sys_reference_rec.orig_system := p_contact_point_rec.orig_system;
892: l_orig_sys_reference_rec.orig_system_reference := p_contact_point_rec.orig_system_reference;
893: l_orig_sys_reference_rec.owner_table_name := 'HZ_CONTACT_POINTS';
894: l_orig_sys_reference_rec.owner_table_id := p_contact_point_rec.contact_point_id;
895: l_orig_sys_reference_rec.created_by_module := p_contact_point_rec.created_by_module;
896:
897: hz_orig_system_ref_pub.create_orig_system_reference(
898: FND_API.G_FALSE,
899: l_orig_sys_reference_rec,
900: x_return_status,
901: l_msg_count,
902: l_msg_data);
899: l_orig_sys_reference_rec,
900: x_return_status,
901: l_msg_count,
902: l_msg_data);
903: IF x_return_status <> fnd_api.g_ret_sts_success THEN
904: RAISE FND_API.G_EXC_ERROR;
905: END IF;
906: end if;
907:
900: x_return_status,
901: l_msg_count,
902: l_msg_data);
903: IF x_return_status <> fnd_api.g_ret_sts_success THEN
904: RAISE FND_API.G_EXC_ERROR;
905: END IF;
906: end if;
907:
908:
942: -- p_telex_rec Telex record.
943: -- p_web_rec Web record.
944: -- p_object_version_number Used for locking the being updated record.
945: -- x_return_status Return status after the call. The status can
946: -- be fnd_api.g_ret_sts_success (success),
947: -- fnd_api.g_ret_sts_error (error),
948: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
949: --
950: -- NOTES
943: -- p_web_rec Web record.
944: -- p_object_version_number Used for locking the being updated record.
945: -- x_return_status Return status after the call. The status can
946: -- be fnd_api.g_ret_sts_success (success),
947: -- fnd_api.g_ret_sts_error (error),
948: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
949: --
950: -- NOTES
951: --
944: -- p_object_version_number Used for locking the being updated record.
945: -- x_return_status Return status after the call. The status can
946: -- be fnd_api.g_ret_sts_success (success),
947: -- fnd_api.g_ret_sts_error (error),
948: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
949: --
950: -- NOTES
951: --
952: -- MODIFICATION HISTORY
958: -- validation procedures.
959: -- 06-JUL-2004 Rajib Ranjan Borah Bug 3711740. If phone_format returns
960: -- NULL for phone_area_code,phone_country_code
961: -- and/or phone_number, then set these to
962: -- FND_API.G_MISS_CHAR as otherwise, the old
963: -- value will be retained.
964: -- 01-03-2005 Rajib Ranjan Borah o SSM SST Integration and Extension.
965: -- For non-profile entities, the concept of
966: -- select/de-select data-sources is obsoleted.
1121: THEN
1122: fnd_message.set_name('AR', 'HZ_API_RECORD_CHANGED');
1123: fnd_message.set_token('TABLE', 'hz_contact_points');
1124: fnd_msg_pub.add;
1125: RAISE fnd_api.g_exc_error;
1126: END IF;
1127:
1128: p_object_version_number := NVL(l_object_version_number, 1) + 1;
1129:
1133: fnd_message.set_token('RECORD', 'contact point');
1134: fnd_message.set_token('VALUE',
1135: NVL(TO_CHAR(p_contact_point_rec.contact_point_id), 'null'));
1136: fnd_msg_pub.add;
1137: RAISE fnd_api.g_exc_error;
1138: END;
1139:
1140: -- Debug info.
1141: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1226: p_web_rec => l_web_rec,
1227: p_rowid => l_rowid,
1228: x_return_status => x_return_status);
1229:
1230: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1231: RAISE fnd_api.g_exc_error;
1232: END IF;
1233:
1234: hz_registry_validate_v2pub.validate_eft_contact_point (
1227: p_rowid => l_rowid,
1228: x_return_status => x_return_status);
1229:
1230: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1231: RAISE fnd_api.g_exc_error;
1232: END IF;
1233:
1234: hz_registry_validate_v2pub.validate_eft_contact_point (
1235: p_create_update_flag => 'U',
1238: p_rowid => l_rowid,
1239: x_return_status => x_return_status);
1240: END IF;
1241:
1242: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1243: RAISE fnd_api.g_exc_error;
1244: END IF;
1245:
1246: -- If raw_phone_number is passed in, call procedure phone_format.
1239: x_return_status => x_return_status);
1240: END IF;
1241:
1242: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1243: RAISE fnd_api.g_exc_error;
1244: END IF;
1245:
1246: -- If raw_phone_number is passed in, call procedure phone_format.
1247: -- either raw_phone_number or phone_number should be passed in
1255: -- actual_content_source are non-updateable columns.
1256:
1257: IF l_contact_point_type = 'PHONE' THEN
1258: IF l_phone_rec.phone_country_code IS NOT NULL THEN
1259: IF l_phone_rec.phone_country_code = fnd_api.g_miss_char THEN
1260: l_phone_country_code := NULL;
1261: ELSE
1262: l_phone_country_code := l_phone_rec.phone_country_code;
1263: END IF;
1263: END IF;
1264: END IF;
1265:
1266: IF l_phone_rec.phone_area_code IS NOT NULL THEN
1267: IF l_phone_rec.phone_area_code = fnd_api.g_miss_char THEN
1268: l_phone_area_code := NULL;
1269: ELSE
1270: l_phone_area_code := l_phone_rec.phone_area_code;
1271: END IF;
1271: END IF;
1272: END IF;
1273:
1274: IF l_phone_rec.phone_number IS NOT NULL THEN
1275: IF l_phone_rec.phone_number = fnd_api.g_miss_char THEN
1276: l_phone_number := NULL;
1277: ELSE
1278: l_phone_number := l_phone_rec.phone_number;
1279: END IF;
1279: END IF;
1280: END IF;
1281:
1282: IF l_phone_rec.raw_phone_number IS NOT NULL AND
1283: l_phone_rec.raw_phone_number <> fnd_api.g_miss_char THEN
1284:
1285: IF l_phone_rec.phone_country_code is not null AND
1286: l_phone_rec.phone_country_code <> fnd_api.g_miss_char
1287: THEN
1282: IF l_phone_rec.raw_phone_number IS NOT NULL AND
1283: l_phone_rec.raw_phone_number <> fnd_api.g_miss_char THEN
1284:
1285: IF l_phone_rec.phone_country_code is not null AND
1286: l_phone_rec.phone_country_code <> fnd_api.g_miss_char
1287: THEN
1288: BEGIN
1289: select territory_code into l_country_code
1290: from hz_phone_country_codes
1331: -- Raw Phone Number.
1332:
1333: /* Bug 3711740 */
1334: IF l_phone_rec.phone_area_code IS NULL THEN
1335: l_phone_rec.phone_area_code := fnd_api.g_miss_char;
1336: END IF;
1337:
1338: IF l_phone_rec.phone_number IS NULL THEN
1339: l_phone_rec.phone_number := fnd_api.g_miss_char;
1335: l_phone_rec.phone_area_code := fnd_api.g_miss_char;
1336: END IF;
1337:
1338: IF l_phone_rec.phone_number IS NULL THEN
1339: l_phone_rec.phone_number := fnd_api.g_miss_char;
1340: END IF;
1341:
1342: -- Bug 2197181 : content_source_type is obsolete and replaced by
1343: -- actual_content_source
1341:
1342: -- Bug 2197181 : content_source_type is obsolete and replaced by
1343: -- actual_content_source
1344:
1345: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1346: IF db_actual_content_source = g_miss_content_source_type
1347: THEN
1348: IF x_return_status = fnd_api.g_ret_sts_error THEN
1349: RAISE fnd_api.g_exc_error;
1344:
1345: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1346: IF db_actual_content_source = g_miss_content_source_type
1347: THEN
1348: IF x_return_status = fnd_api.g_ret_sts_error THEN
1349: RAISE fnd_api.g_exc_error;
1350: ELSE
1351: RAISE fnd_api.g_exc_unexpected_error;
1352: END IF;
1345: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1346: IF db_actual_content_source = g_miss_content_source_type
1347: THEN
1348: IF x_return_status = fnd_api.g_ret_sts_error THEN
1349: RAISE fnd_api.g_exc_error;
1350: ELSE
1351: RAISE fnd_api.g_exc_unexpected_error;
1352: END IF;
1353: ELSE
1347: THEN
1348: IF x_return_status = fnd_api.g_ret_sts_error THEN
1349: RAISE fnd_api.g_exc_error;
1350: ELSE
1351: RAISE fnd_api.g_exc_unexpected_error;
1352: END IF;
1353: ELSE
1354: FOR i IN 1..(l_msg_count - l_message_count) LOOP
1355: fnd_msg_pub.delete_msg(l_msg_count - l_message_count + 1 - i);
1353: ELSE
1354: FOR i IN 1..(l_msg_count - l_message_count) LOOP
1355: fnd_msg_pub.delete_msg(l_msg_count - l_message_count + 1 - i);
1356: END LOOP;
1357: x_return_status := fnd_api.g_ret_sts_success;
1358: END IF;
1359: ELSE
1360: l_phone_number := l_phone_rec.phone_number;
1361: l_phone_area_code := l_phone_rec.phone_area_code;
1362:
1363: IF l_phone_country_code IS NOT NULL THEN
1364: l_phone_rec.phone_country_code := l_phone_country_code;
1365: ELSE
1366: l_phone_rec.phone_country_code := FND_API.G_MISS_CHAR; /*Bug 3711740*/
1367: END IF;
1368: END IF;
1369: ELSE
1370: -- raw_phone_number must always have value.
1418: -- Cannot set an inactive contact point as primary. This validation
1419: -- has been checked in validate_contact_point procedure.
1420:
1421: -- Ignore the value of primary contact flag if the flag has been set
1422: -- to 'N' or fnd_api.g_miss_char by setting primary flag to NULL.
1423: -- User can not unset primary flag by passing value. To unset a
1424: -- primary contact, he/she needs to select another contact as priamry
1425: -- or set the current one to Inactive.
1426:
1424: -- primary contact, he/she needs to select another contact as priamry
1425: -- or set the current one to Inactive.
1426:
1427: IF p_contact_point_rec.primary_flag = 'N' OR
1428: p_contact_point_rec.primary_flag = fnd_api.g_miss_char
1429: THEN
1430: p_contact_point_rec.primary_flag := NULL;
1431: END IF;
1432:
1509: --BugNo:1695595.Initialized the local variables with the passed values after validations--
1510:
1511: l_contact_point_id:=p_contact_point_rec.contact_point_id;
1512:
1513: IF p_contact_point_rec.contact_point_purpose=FND_API.G_MISS_CHAR THEN
1514: l_contact_point_purpose := NULL;
1515: ELSIF p_contact_point_rec.contact_point_purpose IS NOT NULL THEN
1516: l_contact_point_purpose := p_contact_point_rec.contact_point_purpose;
1517: END IF;
1515: ELSIF p_contact_point_rec.contact_point_purpose IS NOT NULL THEN
1516: l_contact_point_purpose := p_contact_point_rec.contact_point_purpose;
1517: END IF;
1518:
1519: IF l_phone_rec.phone_line_type=FND_API.G_MISS_CHAR THEN
1520: l_phone_line_type :=NULL;
1521: ELSIF l_phone_rec.phone_line_type IS NOT NULL THEN
1522: l_phone_line_type := l_phone_rec.phone_line_type;
1523: END IF;
1521: ELSIF l_phone_rec.phone_line_type IS NOT NULL THEN
1522: l_phone_line_type := l_phone_rec.phone_line_type;
1523: END IF;
1524:
1525: IF l_phone_rec.phone_country_code=FND_API.G_MISS_CHAR THEN
1526: l_phone_country_code :=NULL;
1527: ELSIF l_phone_rec.phone_country_code IS NOT NULL THEN
1528: l_phone_country_code := l_phone_rec.phone_country_code;
1529: END IF;
1527: ELSIF l_phone_rec.phone_country_code IS NOT NULL THEN
1528: l_phone_country_code := l_phone_rec.phone_country_code;
1529: END IF;
1530:
1531: IF l_phone_rec.phone_area_code=FND_API.G_MISS_CHAR THEN
1532: l_phone_area_code :=NULL;
1533: ELSIF l_phone_rec.phone_area_code IS NOT NULL THEN
1534: l_phone_area_code := l_phone_rec.phone_area_code;
1535: END IF;
1533: ELSIF l_phone_rec.phone_area_code IS NOT NULL THEN
1534: l_phone_area_code := l_phone_rec.phone_area_code;
1535: END IF;
1536:
1537: IF l_phone_rec.phone_number=FND_API.G_MISS_CHAR THEN
1538: l_phone_number := NULL;
1539: ELSIF l_phone_rec.phone_number IS NOT NULL THEN
1540: l_phone_number := l_phone_rec.phone_number;
1541: END IF;
1539: ELSIF l_phone_rec.phone_number IS NOT NULL THEN
1540: l_phone_number := l_phone_rec.phone_number;
1541: END IF;
1542:
1543: IF l_phone_rec.phone_extension=FND_API.G_MISS_CHAR THEN
1544: l_phone_extension :=NULL;
1545: ELSIF l_phone_rec.phone_extension IS NOT NULL THEN
1546: l_phone_extension := l_phone_rec.phone_extension;
1547: END IF;
1663: -- For non-profile entities, the concept of select/de-select data-sources is obsoleted.
1664: -- There is no need to check if the data-source is selected.
1665:
1666: IF (p_contact_point_rec.contact_point_purpose IS NOT NULL AND
1667: p_contact_point_rec.contact_point_purpose <> fnd_api.g_miss_char) OR
1668: (p_contact_point_rec.contact_point_purpose IS NULL AND
1669: l_contact_point_purpose IS NOT NULL)
1670: THEN
1671: IF p_contact_point_rec.contact_point_purpose IS NOT NULL AND
1668: (p_contact_point_rec.contact_point_purpose IS NULL AND
1669: l_contact_point_purpose IS NOT NULL)
1670: THEN
1671: IF p_contact_point_rec.contact_point_purpose IS NOT NULL AND
1672: p_contact_point_rec.contact_point_purpose <> fnd_api.g_miss_char
1673: THEN
1674: l_contact_point_purpose := p_contact_point_rec.contact_point_purpose;
1675: END IF;
1676:
1703: p_contact_point_rec.primary_by_purpose := 'N';
1704: END IF;
1705:
1706: if (p_contact_point_rec.orig_system is not null
1707: and p_contact_point_rec.orig_system <>fnd_api.g_miss_char)
1708: and (p_contact_point_rec.orig_system_reference is not null
1709: and p_contact_point_rec.orig_system_reference <>fnd_api.g_miss_char)
1710: then
1711: p_contact_point_rec.orig_system_reference := null;
1705:
1706: if (p_contact_point_rec.orig_system is not null
1707: and p_contact_point_rec.orig_system <>fnd_api.g_miss_char)
1708: and (p_contact_point_rec.orig_system_reference is not null
1709: and p_contact_point_rec.orig_system_reference <>fnd_api.g_miss_char)
1710: then
1711: p_contact_point_rec.orig_system_reference := null;
1712: -- In mosr, we have bypassed osr nonupdateable validation
1713: -- but we should not update existing osr, set it to null
1896: END;
1897: */
1898: -- Check during insert.
1899: IF p_contact_point_id IS NULL THEN
1900: l_contact_point_id := fnd_api.g_miss_num;
1901: ELSE
1902: l_contact_point_id := p_contact_point_id;
1903: END IF;
1904:
2171: END IF;
2172:
2173: -- Check during insert.
2174: IF p_contact_point_id IS NULL THEN
2175: l_contact_point_id := FND_API.G_MISS_NUM;
2176: ELSE
2177: l_contact_point_id := p_contact_point_id;
2178: END IF;
2179:
2330: --
2331: --
2332:
2333: PROCEDURE get_phone_format (
2334: p_raw_phone_number IN VARCHAR2 := fnd_api.g_miss_char,
2335: p_territory_code IN VARCHAR2 := fnd_api.g_miss_char,
2336: p_area_code IN VARCHAR2,
2337: x_phone_country_code OUT NOCOPY VARCHAR2,
2338: x_phone_format_style OUT NOCOPY VARCHAR2,
2331: --
2332:
2333: PROCEDURE get_phone_format (
2334: p_raw_phone_number IN VARCHAR2 := fnd_api.g_miss_char,
2335: p_territory_code IN VARCHAR2 := fnd_api.g_miss_char,
2336: p_area_code IN VARCHAR2,
2337: x_phone_country_code OUT NOCOPY VARCHAR2,
2338: x_phone_format_style OUT NOCOPY VARCHAR2,
2339: x_area_code_size OUT NOCOPY VARCHAR2,
2368: p_msg_level=>fnd_log.level_procedure);
2369: END IF;
2370:
2371: -- Initialize return variables
2372: x_phone_format_style := fnd_api.g_miss_char;
2373: x_phone_country_code := fnd_api.g_miss_char;
2374: x_include_country_code := FALSE;
2375:
2376: -- No territory code passed
2369: END IF;
2370:
2371: -- Initialize return variables
2372: x_phone_format_style := fnd_api.g_miss_char;
2373: x_phone_country_code := fnd_api.g_miss_char;
2374: x_include_country_code := FALSE;
2375:
2376: -- No territory code passed
2377: IF p_territory_code = fnd_api.g_miss_char THEN
2373: x_phone_country_code := fnd_api.g_miss_char;
2374: x_include_country_code := FALSE;
2375:
2376: -- No territory code passed
2377: IF p_territory_code = fnd_api.g_miss_char THEN
2378: x_msg := 'HZ_COUNTRY_CODE_NOT_DEFINED';
2379: RETURN;
2380: END IF;
2381:
2426: END LOOP;
2427: CLOSE c_formats;
2428:
2429: -- No appropriate format mask found
2430: IF x_phone_format_style = fnd_api.g_miss_char THEN
2431: x_msg := 'HZ_PHONE_FORMAT_NOT_DEFINED';
2432: END IF;
2433:
2434: -- Debug info.
2439: END IF;
2440:
2441: EXCEPTION
2442: WHEN OTHERS THEN
2443: RAISE fnd_api.g_exc_unexpected_error;
2444:
2445: END get_phone_format;
2446:
2447: --
2470: --
2471: --
2472:
2473: PROCEDURE translate_raw_phone_number (
2474: p_raw_phone_number IN VARCHAR2 := fnd_api.g_miss_char,
2475: p_phone_format_style IN VARCHAR2 := fnd_api.g_miss_char,
2476: p_area_code_size IN NUMBER := 0,
2477: x_formatted_phone_number OUT NOCOPY VARCHAR2,
2478: x_phone_area_code OUT NOCOPY VARCHAR2,
2471: --
2472:
2473: PROCEDURE translate_raw_phone_number (
2474: p_raw_phone_number IN VARCHAR2 := fnd_api.g_miss_char,
2475: p_phone_format_style IN VARCHAR2 := fnd_api.g_miss_char,
2476: p_area_code_size IN NUMBER := 0,
2477: x_formatted_phone_number OUT NOCOPY VARCHAR2,
2478: x_phone_area_code OUT NOCOPY VARCHAR2,
2479: x_phone_number OUT NOCOPY VARCHAR2
2537: --
2538: -- ARGUMENTS
2539: -- IN:
2540: -- p_init_msg_list Initialize message stack if it is set to
2541: -- FND_API.G_TRUE. Default is fnd_api.g_false.
2542: -- p_contact_point_id Contact point ID.
2543: -- IN/OUT:
2544: -- OUT:
2545: -- x_contact_point_rec Returned contact point record.
2549: -- x_phone_rec Returned phone record.
2550: -- x_telex_rec Returned telex record.
2551: -- x_web_rec Returned web record.
2552: -- x_return_status Return status after the call. The status can
2553: -- be fnd_api.g_ret_sts_success (success),
2554: -- fnd_api.g_ret_sts_error (error),
2555: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
2556: -- x_msg_count Number of messages in message stack.
2557: -- x_msg_data Message text if x_msg_count is 1.
2550: -- x_telex_rec Returned telex record.
2551: -- x_web_rec Returned web record.
2552: -- x_return_status Return status after the call. The status can
2553: -- be fnd_api.g_ret_sts_success (success),
2554: -- fnd_api.g_ret_sts_error (error),
2555: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
2556: -- x_msg_count Number of messages in message stack.
2557: -- x_msg_data Message text if x_msg_count is 1.
2558: --
2551: -- x_web_rec Returned web record.
2552: -- x_return_status Return status after the call. The status can
2553: -- be fnd_api.g_ret_sts_success (success),
2554: -- fnd_api.g_ret_sts_error (error),
2555: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
2556: -- x_msg_count Number of messages in message stack.
2557: -- x_msg_data Message text if x_msg_count is 1.
2558: --
2559: -- NOTES
2567: -- enhanced backward compatibility.
2568: --
2569:
2570: PROCEDURE get_contact_point_main (
2571: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
2572: p_contact_point_id IN NUMBER,
2573: x_contact_point_rec OUT NOCOPY contact_point_rec_type,
2574: x_edi_rec OUT NOCOPY edi_rec_type,
2575: x_eft_rec OUT NOCOPY eft_rec_type,
2594: p_msg_level=>fnd_log.level_procedure);
2595: END IF;
2596:
2597: -- Initialize message list if p_init_msg_list is set to TRUE.
2598: IF fnd_api.to_boolean(p_init_msg_list) THEN
2599: fnd_msg_pub.initialize;
2600: END IF;
2601:
2602: -- Initialize API return status to success.
2599: fnd_msg_pub.initialize;
2600: END IF;
2601:
2602: -- Initialize API return status to success.
2603: x_return_status := fnd_api.g_ret_sts_success;
2604:
2605: -- Check whether primary key has been passed in.
2606: IF p_contact_point_id IS NULL OR
2607: p_contact_point_id = fnd_api.g_miss_num THEN
2603: x_return_status := fnd_api.g_ret_sts_success;
2604:
2605: -- Check whether primary key has been passed in.
2606: IF p_contact_point_id IS NULL OR
2607: p_contact_point_id = fnd_api.g_miss_num THEN
2608: fnd_message.set_name('AR', 'HZ_API_MISSING_COLUMN');
2609: fnd_message.set_token('COLUMN', 'contact_point_id');
2610: fnd_msg_pub.add;
2611: RAISE fnd_api.g_exc_error;
2607: p_contact_point_id = fnd_api.g_miss_num THEN
2608: fnd_message.set_name('AR', 'HZ_API_MISSING_COLUMN');
2609: fnd_message.set_token('COLUMN', 'contact_point_id');
2610: fnd_msg_pub.add;
2611: RAISE fnd_api.g_exc_error;
2612: END IF;
2613:
2614: x_contact_point_rec.contact_point_id := p_contact_point_id;
2615:
2693: END IF;
2694:
2695: -- Standard call to get message count and if count is 1, get message info.
2696: fnd_msg_pub.count_and_get(
2697: p_encoded => fnd_api.g_false,
2698: p_count => x_msg_count,
2699: p_data => x_msg_data);
2700:
2701: -- Debug info.
2718: --
2719: -- ARGUMENTS
2720: -- IN:
2721: -- p_init_msg_list Initialize message stack if it is set to
2722: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
2723: -- p_contact_point_rec Contact point record.
2724: -- p_edi_rec EDI record.
2725: -- p_eft_rec EFT record.
2726: -- p_email_rec Email record.
2730: -- IN/OUT:
2731: -- OUT:
2732: -- x_contact_point_id Contact point ID.
2733: -- x_return_status Return status after the call. The status can
2734: -- be fnd_api.g_ret_sts_success (success),
2735: -- fnd_api.g_ret_sts_error (error),
2736: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
2737: -- x_msg_count Number of messages in message stack.
2738: -- x_msg_data Message text if x_msg_count is 1.
2731: -- OUT:
2732: -- x_contact_point_id Contact point ID.
2733: -- x_return_status Return status after the call. The status can
2734: -- be fnd_api.g_ret_sts_success (success),
2735: -- fnd_api.g_ret_sts_error (error),
2736: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
2737: -- x_msg_count Number of messages in message stack.
2738: -- x_msg_data Message text if x_msg_count is 1.
2739: --
2732: -- x_contact_point_id Contact point ID.
2733: -- x_return_status Return status after the call. The status can
2734: -- be fnd_api.g_ret_sts_success (success),
2735: -- fnd_api.g_ret_sts_error (error),
2736: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
2737: -- x_msg_count Number of messages in message stack.
2738: -- x_msg_data Message text if x_msg_count is 1.
2739: --
2740: -- NOTES
2750: -- For non-profile entities, the concept of
2751: -- select/de-select data-sources is obsoleted.
2752:
2753: PROCEDURE create_contact_point_main (
2754: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
2755: p_contact_point_rec IN contact_point_rec_type,
2756: p_edi_rec IN edi_rec_type := g_miss_edi_rec,
2757: p_eft_rec IN eft_rec_type := g_miss_eft_rec,
2758: p_email_rec IN email_rec_type := g_miss_email_rec,
2772: l_telex_rec telex_rec_type := p_telex_rec;
2773: l_web_rec web_rec_type := p_web_rec;
2774: l_eft_rec eft_rec_type := p_eft_rec;
2775:
2776: dss_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
2777: dss_msg_count NUMBER := 0;
2778: dss_msg_data VARCHAR2(2000):= null;
2779: l_test_security VARCHAR2(1):= 'F';
2780: l_debug_prefix VARCHAR2(30) := '';
2787: p_msg_level=>fnd_log.level_procedure);
2788: END IF;
2789:
2790: -- Initialize message list if p_init_msg_list is set to TRUE.
2791: IF fnd_api.to_boolean(p_init_msg_list) THEN
2792: fnd_msg_pub.initialize;
2793: END IF;
2794:
2795: -- Initialize API return status to success.
2792: fnd_msg_pub.initialize;
2793: END IF;
2794:
2795: -- Initialize API return status to success.
2796: x_return_status := fnd_api.g_ret_sts_success;
2797:
2798: -- Bug 2197181: added for mix-n-match project. first load data
2799: -- sources for this entity. Then assign the actual_content_source
2800: -- to the real data source. The value of content_source_type is
2825: p_actual_content_source => l_contact_point_rec.actual_content_source,
2826: x_is_datasource_selected => g_cpt_is_datasource_selected,
2827: x_return_status => x_return_status );
2828:
2829: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2830: RAISE FND_API.G_EXC_ERROR;
2831: END IF;
2832:
2833: -- Call to business logic.
2826: x_is_datasource_selected => g_cpt_is_datasource_selected,
2827: x_return_status => x_return_status );
2828:
2829: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2830: RAISE FND_API.G_EXC_ERROR;
2831: END IF;
2832:
2833: -- Call to business logic.
2834: do_create_contact_point(l_contact_point_rec,
2857: x_return_status => dss_return_status,
2858: x_msg_count => dss_msg_count,
2859: x_msg_data => dss_msg_data);
2860:
2861: if dss_return_status <> fnd_api.g_ret_sts_success THEN
2862: RAISE FND_API.G_EXC_ERROR;
2863: end if;
2864:
2865: if (l_test_security <> 'T' OR l_test_security <> FND_API.G_TRUE) then
2858: x_msg_count => dss_msg_count,
2859: x_msg_data => dss_msg_data);
2860:
2861: if dss_return_status <> fnd_api.g_ret_sts_success THEN
2862: RAISE FND_API.G_EXC_ERROR;
2863: end if;
2864:
2865: if (l_test_security <> 'T' OR l_test_security <> FND_API.G_TRUE) then
2866: --
2861: if dss_return_status <> fnd_api.g_ret_sts_success THEN
2862: RAISE FND_API.G_EXC_ERROR;
2863: end if;
2864:
2865: if (l_test_security <> 'T' OR l_test_security <> FND_API.G_TRUE) then
2866: --
2867: -- Bug 3835601: replaced the dss message with a more user friendly message
2868: --
2869: FND_MESSAGE.SET_NAME('AR', 'HZ_DSS_NO_INSERT_PRIVILEGE');
2874: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',
2875: hz_dss_util_pub.get_display_name(null, 'PARTY_SITE_CONTACT_POINTS'));
2876: END IF;
2877: FND_MSG_PUB.ADD;
2878: RAISE FND_API.G_EXC_ERROR;
2879: end if;
2880: END IF;
2881:
2882: -- Invoke business event system.
2884: -- SSM SST Integration and Extension
2885: -- For non-profile entities, the concept of select/de-select data sources is obsoleted.
2886: -- There is no need to check if the data-source is selected.
2887:
2888: IF x_return_status = fnd_api.g_ret_sts_success /*AND
2889: -- Bug 2197181: Added below condition for Mix-n-Match
2890: g_cpt_is_datasource_selected = 'Y'*/
2891: THEN
2892: IF(HZ_UTILITY_V2PUB.G_EXECUTE_API_CALLOUTS in ('Y', 'EVENTS_ENABLED')) THEN
2909: --Bug 4866187
2910: --Bug 5370799
2911: --Bug 13117445
2912: --Commented sync_contact_point call as it will be called in do_create_contact_point just after contact_point insertion
2913: /* IF (p_contact_point_rec.orig_system IS NULL OR p_contact_point_rec.orig_system=FND_API.G_MISS_CHAR)
2914: THEN
2915: hz_dqm_sync.sync_contact_point(l_contact_point_rec.contact_point_id, 'C');
2916: END IF;
2917: */
2918: END IF;
2919:
2920: -- Standard call to get message count and if count is 1, get message info.
2921: fnd_msg_pub.count_and_get(
2922: p_encoded => fnd_api.g_false,
2923: p_count => x_msg_count,
2924: p_data => x_msg_data);
2925:
2926: -- Debug info.
2942: --
2943: -- ARGUMENTS
2944: -- IN:
2945: -- p_init_msg_list Initialize message stack if it is set to
2946: -- FND_API.G_TRUE. Default is fnd_api.g_false.
2947: -- p_contact_point_rec Contact point record.
2948: -- p_edi_rec EDI record.
2949: -- p_email_rec Email record.
2950: -- p_phone_rec Phone record.
2954: -- IN/OUT:
2955: -- p_object_version_number Used for locking the being updated record.
2956: -- OUT:
2957: -- x_return_status Return status after the call. The status can
2958: -- be fnd_api.g_ret_sts_success (success),
2959: -- fnd_api.g_ret_sts_error (error),
2960: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
2961: -- x_msg_count Number of messages in message stack.
2962: -- x_msg_data Message text if x_msg_count is 1.
2955: -- p_object_version_number Used for locking the being updated record.
2956: -- OUT:
2957: -- x_return_status Return status after the call. The status can
2958: -- be fnd_api.g_ret_sts_success (success),
2959: -- fnd_api.g_ret_sts_error (error),
2960: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
2961: -- x_msg_count Number of messages in message stack.
2962: -- x_msg_data Message text if x_msg_count is 1.
2963: --
2956: -- OUT:
2957: -- x_return_status Return status after the call. The status can
2958: -- be fnd_api.g_ret_sts_success (success),
2959: -- fnd_api.g_ret_sts_error (error),
2960: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
2961: -- x_msg_count Number of messages in message stack.
2962: -- x_msg_data Message text if x_msg_count is 1.
2963: --
2964: -- NOTES
2975: -- not assign the old value before calling
2976: -- hz_timezone_pub.get_phone_timezone_id.
2977:
2978: PROCEDURE update_contact_point_main (
2979: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
2980: p_contact_point_rec IN contact_point_rec_type,
2981: p_edi_rec IN edi_rec_type := g_miss_edi_rec,
2982: p_eft_rec IN eft_rec_type := g_miss_eft_rec,
2983: p_email_rec IN email_rec_type := g_miss_email_rec,
3009: l_phone_area_code HZ_CONTACT_POINTS.phone_area_code%type;
3010:
3011: l_data_source_from VARCHAR2(30);
3012:
3013: dss_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
3014: dss_msg_count NUMBER := 0;
3015: dss_msg_data VARCHAR2(2000):= null;
3016: l_test_security VARCHAR2(1):= 'F';
3017:
3030: p_msg_level=>fnd_log.level_procedure);
3031: END IF;
3032:
3033: -- Initialize message list if p_init_msg_list is set to TRUE.
3034: IF fnd_api.to_boolean(p_init_msg_list) THEN
3035: fnd_msg_pub.initialize;
3036: END IF;
3037:
3038: -- Initialize API return status to success.
3035: fnd_msg_pub.initialize;
3036: END IF;
3037:
3038: -- Initialize API return status to success.
3039: x_return_status := fnd_api.g_ret_sts_success;
3040:
3041: -- if contact_point_id is not passed in, but orig system parameters are passed in
3042: -- get contact_point_id
3043:
3041: -- if contact_point_id is not passed in, but orig system parameters are passed in
3042: -- get contact_point_id
3043:
3044: IF (p_contact_point_rec.orig_system is not null
3045: and p_contact_point_rec.orig_system <>fnd_api.g_miss_char)
3046: and (p_contact_point_rec.orig_system_reference is not null
3047: and p_contact_point_rec.orig_system_reference <>fnd_api.g_miss_char)
3048: and (p_contact_point_rec.contact_point_id = FND_API.G_MISS_NUM or p_contact_point_rec.contact_point_id is null) THEN
3049: hz_orig_system_ref_pub.get_owner_table_id
3043:
3044: IF (p_contact_point_rec.orig_system is not null
3045: and p_contact_point_rec.orig_system <>fnd_api.g_miss_char)
3046: and (p_contact_point_rec.orig_system_reference is not null
3047: and p_contact_point_rec.orig_system_reference <>fnd_api.g_miss_char)
3048: and (p_contact_point_rec.contact_point_id = FND_API.G_MISS_NUM or p_contact_point_rec.contact_point_id is null) THEN
3049: hz_orig_system_ref_pub.get_owner_table_id
3050: (p_orig_system => p_contact_point_rec.orig_system,
3051: p_orig_system_reference => p_contact_point_rec.orig_system_reference,
3044: IF (p_contact_point_rec.orig_system is not null
3045: and p_contact_point_rec.orig_system <>fnd_api.g_miss_char)
3046: and (p_contact_point_rec.orig_system_reference is not null
3047: and p_contact_point_rec.orig_system_reference <>fnd_api.g_miss_char)
3048: and (p_contact_point_rec.contact_point_id = FND_API.G_MISS_NUM or p_contact_point_rec.contact_point_id is null) THEN
3049: hz_orig_system_ref_pub.get_owner_table_id
3050: (p_orig_system => p_contact_point_rec.orig_system,
3051: p_orig_system_reference => p_contact_point_rec.orig_system_reference,
3052: p_owner_table_name => 'HZ_CONTACT_POINTS',
3051: p_orig_system_reference => p_contact_point_rec.orig_system_reference,
3052: p_owner_table_name => 'HZ_CONTACT_POINTS',
3053: x_owner_table_id => l_contact_point_rec.contact_point_id,
3054: x_return_status => x_return_status);
3055: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3056: RAISE FND_API.G_EXC_ERROR;
3057: END IF;
3058: END IF;
3059:
3052: p_owner_table_name => 'HZ_CONTACT_POINTS',
3053: x_owner_table_id => l_contact_point_rec.contact_point_id,
3054: x_return_status => x_return_status);
3055: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3056: RAISE FND_API.G_EXC_ERROR;
3057: END IF;
3058: END IF;
3059:
3060:
3071: x_return_status => x_return_status,
3072: x_msg_count => x_msg_count,
3073: x_msg_data => x_msg_data);
3074:
3075: IF x_return_status = fnd_api.g_ret_sts_error THEN
3076: RAISE fnd_api.g_exc_error;
3077: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
3078: RAISE fnd_api.g_exc_unexpected_error;
3079: END IF;
3072: x_msg_count => x_msg_count,
3073: x_msg_data => x_msg_data);
3074:
3075: IF x_return_status = fnd_api.g_ret_sts_error THEN
3076: RAISE fnd_api.g_exc_error;
3077: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
3078: RAISE fnd_api.g_exc_unexpected_error;
3079: END IF;
3080:
3073: x_msg_data => x_msg_data);
3074:
3075: IF x_return_status = fnd_api.g_ret_sts_error THEN
3076: RAISE fnd_api.g_exc_error;
3077: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
3078: RAISE fnd_api.g_exc_unexpected_error;
3079: END IF;
3080:
3081: -- Bug 2486394 -Check if the DSS security is granted to the user
3074:
3075: IF x_return_status = fnd_api.g_ret_sts_error THEN
3076: RAISE fnd_api.g_exc_error;
3077: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
3078: RAISE fnd_api.g_exc_unexpected_error;
3079: END IF;
3080:
3081: -- Bug 2486394 -Check if the DSS security is granted to the user
3082: -- Bug 3818648: check dss profile before call test_instance
3094: x_return_status => dss_return_status,
3095: x_msg_count => dss_msg_count,
3096: x_msg_data => dss_msg_data);
3097:
3098: if dss_return_status <> fnd_api.g_ret_sts_success THEN
3099: RAISE FND_API.G_EXC_ERROR;
3100: end if;
3101:
3102: if (l_test_security <> 'T' OR l_test_security <> FND_API.G_TRUE) then
3095: x_msg_count => dss_msg_count,
3096: x_msg_data => dss_msg_data);
3097:
3098: if dss_return_status <> fnd_api.g_ret_sts_success THEN
3099: RAISE FND_API.G_EXC_ERROR;
3100: end if;
3101:
3102: if (l_test_security <> 'T' OR l_test_security <> FND_API.G_TRUE) then
3103: --
3098: if dss_return_status <> fnd_api.g_ret_sts_success THEN
3099: RAISE FND_API.G_EXC_ERROR;
3100: end if;
3101:
3102: if (l_test_security <> 'T' OR l_test_security <> FND_API.G_TRUE) then
3103: --
3104: -- Bug 3835601: replaced the dss message with a more user friendly message
3105: --
3106: FND_MESSAGE.SET_NAME('AR', 'HZ_DSS_NO_UPDATE_PRIVILEGE');
3111: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',
3112: hz_dss_util_pub.get_display_name(null, 'PARTY_SITE_CONTACT_POINTS'));
3113: END IF;
3114: FND_MSG_PUB.ADD;
3115: RAISE FND_API.G_EXC_ERROR;
3116: end if;
3117: END IF;
3118:
3119: -- Bug 2197181: added for mix-n-match project. first load data
3145: p_selected_datasources => g_cpt_selected_datasources,
3146: p_actual_content_source => l_old_contact_point_rec.actual_content_source );
3147: */
3148: if (l_phone_rec.phone_country_code IS NOT NULL
3149: and l_phone_rec.phone_country_code <> nvl(l_old_phone_rec.phone_country_code,fnd_api.g_miss_char))
3150: or (l_phone_rec.phone_area_code is NOT NULL and l_phone_rec.phone_area_code <> nvl(l_old_phone_rec.phone_area_code,fnd_api.g_miss_char))
3151: then
3152: l_changed_flag := 'Y';
3153: end if;
3146: p_actual_content_source => l_old_contact_point_rec.actual_content_source );
3147: */
3148: if (l_phone_rec.phone_country_code IS NOT NULL
3149: and l_phone_rec.phone_country_code <> nvl(l_old_phone_rec.phone_country_code,fnd_api.g_miss_char))
3150: or (l_phone_rec.phone_area_code is NOT NULL and l_phone_rec.phone_area_code <> nvl(l_old_phone_rec.phone_area_code,fnd_api.g_miss_char))
3151: then
3152: l_changed_flag := 'Y';
3153: end if;
3154:
3151: then
3152: l_changed_flag := 'Y';
3153: end if;
3154:
3155: if l_changed_flag = 'Y' and ( l_phone_rec.timezone_id is null or l_phone_rec.timezone_id = fnd_api.g_miss_num)
3156: then
3157: if l_phone_rec.phone_country_code IS NULL
3158: then
3159: l_phone_country_code := l_old_phone_rec.phone_country_code;
3169: end if;
3170: l_message_count := fnd_msg_pub.count_msg();
3171: hz_timezone_pub.get_phone_timezone_id(
3172: p_api_version => 1.0,
3173: p_init_msg_list => FND_API.G_FALSE,
3174: p_phone_country_code => l_phone_country_code,
3175: p_area_code => l_phone_area_code,
3176: p_phone_prefix => null,
3177: p_country_code => null,-- don't need to pass in this
3178: x_timezone_id => l_phone_rec.timezone_id,
3179: x_return_status => l_return_status ,
3180: x_msg_count =>l_msg_count ,
3181: x_msg_data => l_msg_data);
3182: if l_return_status <> fnd_api.g_ret_sts_success
3183: then -- we don't raise error
3184: l_phone_rec.timezone_id := fnd_api.g_miss_num;
3185: FOR i IN 1..(l_msg_count - l_message_count) LOOP
3186: fnd_msg_pub.delete_msg(l_msg_count - l_message_count + 1 - i);
3180: x_msg_count =>l_msg_count ,
3181: x_msg_data => l_msg_data);
3182: if l_return_status <> fnd_api.g_ret_sts_success
3183: then -- we don't raise error
3184: l_phone_rec.timezone_id := fnd_api.g_miss_num;
3185: FOR i IN 1..(l_msg_count - l_message_count) LOOP
3186: fnd_msg_pub.delete_msg(l_msg_count - l_message_count + 1 - i);
3187: END LOOP;
3188: l_return_status := FND_API.G_RET_STS_SUCCESS;
3184: l_phone_rec.timezone_id := fnd_api.g_miss_num;
3185: FOR i IN 1..(l_msg_count - l_message_count) LOOP
3186: fnd_msg_pub.delete_msg(l_msg_count - l_message_count + 1 - i);
3187: END LOOP;
3188: l_return_status := FND_API.G_RET_STS_SUCCESS;
3189: end if;
3190: end if;
3191:
3192: -- Call to business logic.
3200: l_web_rec,
3201: p_object_version_number,
3202: x_return_status);
3203:
3204: IF x_return_status = fnd_api.g_ret_sts_success THEN
3205: update_contact_point_search(l_old_contact_point_rec,
3206: l_old_phone_rec,
3207: l_phone_rec,
3208: l_old_email_rec,
3214: -- For non-profile entities, the concept of select/de-select data-sources is obsoleted.
3215: -- There is no need to check if the data-source is selected.
3216:
3217: -- Invoke business event system.
3218: IF x_return_status = fnd_api.g_ret_sts_success /*AND
3219: -- Bug 2197181: Added below condition for Mix-n-Match
3220: g_cpt_is_datasource_selected = 'Y'*/
3221: THEN
3222: l_old_contact_point_rec.orig_system := p_contact_point_rec.orig_system;
3249: END IF;
3250:
3251: -- Standard call to get message count and if count is 1, get message info.
3252: fnd_msg_pub.count_and_get(
3253: p_encoded => fnd_api.g_false,
3254: p_count => x_msg_count,
3255: p_data => x_msg_data);
3256:
3257: -- Debug info.
3276: --
3277: -- ARGUMENTS
3278: -- IN:
3279: -- p_init_msg_list Initialize message stack if it is set to
3280: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
3281: -- p_contact_point_rec Contact point record.
3282: -- p_edi_rec EDI record.
3283: -- p_email_rec Email record.
3284: -- p_phone_rec Phone record.
3287: -- IN/OUT:
3288: -- OUT:
3289: -- x_contact_point_id Contact point ID.
3290: -- x_return_status Return status after the call. The status can
3291: -- be fnd_api.g_ret_sts_success (success),
3292: -- fnd_api.g_ret_sts_error (error),
3293: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3294: -- x_msg_count Number of messages in message stack.
3295: -- x_msg_data Message text if x_msg_count is 1.
3288: -- OUT:
3289: -- x_contact_point_id Contact point ID.
3290: -- x_return_status Return status after the call. The status can
3291: -- be fnd_api.g_ret_sts_success (success),
3292: -- fnd_api.g_ret_sts_error (error),
3293: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3294: -- x_msg_count Number of messages in message stack.
3295: -- x_msg_data Message text if x_msg_count is 1.
3296: --
3289: -- x_contact_point_id Contact point ID.
3290: -- x_return_status Return status after the call. The status can
3291: -- be fnd_api.g_ret_sts_success (success),
3292: -- fnd_api.g_ret_sts_error (error),
3293: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3294: -- x_msg_count Number of messages in message stack.
3295: -- x_msg_data Message text if x_msg_count is 1.
3296: --
3297: -- NOTES
3307: -- contact point APIs.
3308: --
3309:
3310: PROCEDURE create_contact_point (
3311: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
3312: p_contact_point_rec IN contact_point_rec_type,
3313: p_edi_rec IN edi_rec_type := g_miss_edi_rec,
3314: p_email_rec IN email_rec_type := g_miss_email_rec,
3315: p_phone_rec IN phone_rec_type := g_miss_phone_rec,
3367: -- Check if API is called in debug mode. If yes, disable debug.
3368: --disable_debug;
3369:
3370: EXCEPTION
3371: WHEN fnd_api.g_exc_error THEN
3372: ROLLBACK TO create_contact_point;
3373: x_return_status := fnd_api.g_ret_sts_error;
3374:
3375: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3369:
3370: EXCEPTION
3371: WHEN fnd_api.g_exc_error THEN
3372: ROLLBACK TO create_contact_point;
3373: x_return_status := fnd_api.g_ret_sts_error;
3374:
3375: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3376: p_count => x_msg_count,
3377: p_data => x_msg_data);
3371: WHEN fnd_api.g_exc_error THEN
3372: ROLLBACK TO create_contact_point;
3373: x_return_status := fnd_api.g_ret_sts_error;
3374:
3375: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3376: p_count => x_msg_count,
3377: p_data => x_msg_data);
3378:
3379: -- Debug info.
3392:
3393: -- Check if API is called in debug mode. If yes, disable debug.
3394: --disable_debug;
3395:
3396: WHEN fnd_api.g_exc_unexpected_error THEN
3397: ROLLBACK TO create_contact_point;
3398: x_return_status := fnd_api.g_ret_sts_unexp_error;
3399:
3400: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3394: --disable_debug;
3395:
3396: WHEN fnd_api.g_exc_unexpected_error THEN
3397: ROLLBACK TO create_contact_point;
3398: x_return_status := fnd_api.g_ret_sts_unexp_error;
3399:
3400: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3401: p_count => x_msg_count,
3402: p_data => x_msg_data);
3396: WHEN fnd_api.g_exc_unexpected_error THEN
3397: ROLLBACK TO create_contact_point;
3398: x_return_status := fnd_api.g_ret_sts_unexp_error;
3399:
3400: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3401: p_count => x_msg_count,
3402: p_data => x_msg_data);
3403:
3404: -- Debug info.
3418: --disable_debug;
3419:
3420: WHEN OTHERS THEN
3421: ROLLBACK TO create_contact_point;
3422: x_return_status := fnd_api.g_ret_sts_unexp_error;
3423:
3424: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
3425: fnd_message.set_token('ERROR' ,SQLERRM);
3426: fnd_msg_pub.add;
3424: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
3425: fnd_message.set_token('ERROR' ,SQLERRM);
3426: fnd_msg_pub.add;
3427:
3428: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3429: p_count => x_msg_count,
3430: p_data => x_msg_data);
3431:
3432: -- Debug info.
3456: --
3457: -- ARGUMENTS
3458: -- IN:
3459: -- p_init_msg_list Initialize message stack if it is set to
3460: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
3461: -- p_contact_point_rec Contact point record.
3462: -- p_edi_rec EDI record.
3463: -- IN/OUT:
3464: -- OUT:
3463: -- IN/OUT:
3464: -- OUT:
3465: -- x_contact_point_id Contact point ID.
3466: -- x_return_status Return status after the call. The status can
3467: -- be fnd_api.g_ret_sts_success (success),
3468: -- fnd_api.g_ret_sts_error (error),
3469: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3470: -- x_msg_count Number of messages in message stack.
3471: -- x_msg_data Message text if x_msg_count is 1.
3464: -- OUT:
3465: -- x_contact_point_id Contact point ID.
3466: -- x_return_status Return status after the call. The status can
3467: -- be fnd_api.g_ret_sts_success (success),
3468: -- fnd_api.g_ret_sts_error (error),
3469: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3470: -- x_msg_count Number of messages in message stack.
3471: -- x_msg_data Message text if x_msg_count is 1.
3472: --
3465: -- x_contact_point_id Contact point ID.
3466: -- x_return_status Return status after the call. The status can
3467: -- be fnd_api.g_ret_sts_success (success),
3468: -- fnd_api.g_ret_sts_error (error),
3469: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3470: -- x_msg_count Number of messages in message stack.
3471: -- x_msg_data Message text if x_msg_count is 1.
3472: --
3473: -- NOTES
3482: -- contact point APIs.
3483: --
3484:
3485: PROCEDURE create_edi_contact_point (
3486: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
3487: p_contact_point_rec IN contact_point_rec_type,
3488: p_edi_rec IN edi_rec_type := g_miss_edi_rec,
3489: x_contact_point_id OUT NOCOPY NUMBER,
3490: x_return_status OUT NOCOPY VARCHAR2,
3534: -- Check if API is called in debug mode. If yes, disable debug.
3535: --disable_debug;
3536:
3537: EXCEPTION
3538: WHEN fnd_api.g_exc_error THEN
3539: ROLLBACK TO create_edi_contact_point;
3540: x_return_status := fnd_api.g_ret_sts_error;
3541:
3542: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3536:
3537: EXCEPTION
3538: WHEN fnd_api.g_exc_error THEN
3539: ROLLBACK TO create_edi_contact_point;
3540: x_return_status := fnd_api.g_ret_sts_error;
3541:
3542: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3543: p_count => x_msg_count,
3544: p_data => x_msg_data);
3538: WHEN fnd_api.g_exc_error THEN
3539: ROLLBACK TO create_edi_contact_point;
3540: x_return_status := fnd_api.g_ret_sts_error;
3541:
3542: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3543: p_count => x_msg_count,
3544: p_data => x_msg_data);
3545:
3546: -- Debug info.
3558:
3559: -- Check if API is called in debug mode. If yes, disable debug.
3560: --disable_debug;
3561:
3562: WHEN fnd_api.g_exc_unexpected_error THEN
3563: ROLLBACK TO create_edi_contact_point;
3564: x_return_status := fnd_api.g_ret_sts_unexp_error;
3565:
3566: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3560: --disable_debug;
3561:
3562: WHEN fnd_api.g_exc_unexpected_error THEN
3563: ROLLBACK TO create_edi_contact_point;
3564: x_return_status := fnd_api.g_ret_sts_unexp_error;
3565:
3566: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3567: p_count => x_msg_count,
3568: p_data => x_msg_data);
3562: WHEN fnd_api.g_exc_unexpected_error THEN
3563: ROLLBACK TO create_edi_contact_point;
3564: x_return_status := fnd_api.g_ret_sts_unexp_error;
3565:
3566: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3567: p_count => x_msg_count,
3568: p_data => x_msg_data);
3569:
3570: -- Debug info.
3584: --disable_debug;
3585:
3586: WHEN OTHERS THEN
3587: ROLLBACK TO create_edi_contact_point;
3588: x_return_status := fnd_api.g_ret_sts_unexp_error;
3589:
3590: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
3591: fnd_message.set_token('ERROR' ,SQLERRM);
3592: fnd_msg_pub.add;
3590: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
3591: fnd_message.set_token('ERROR' ,SQLERRM);
3592: fnd_msg_pub.add;
3593:
3594: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3595: p_count => x_msg_count,
3596: p_data => x_msg_data);
3597:
3598: -- Debug info.
3622: --
3623: -- ARGUMENTS
3624: -- IN:
3625: -- p_init_msg_list Initialize message stack if it is set to
3626: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
3627: -- p_contact_point_rec Contact point record.
3628: -- p_web_rec Web record.
3629: -- IN/OUT:
3630: -- OUT:
3629: -- IN/OUT:
3630: -- OUT:
3631: -- x_contact_point_id Contact point ID.
3632: -- x_return_status Return status after the call. The status can
3633: -- be fnd_api.g_ret_sts_success (success),
3634: -- fnd_api.g_ret_sts_error (error),
3635: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3636: -- x_msg_count Number of messages in message stack.
3637: -- x_msg_data Message text if x_msg_count is 1.
3630: -- OUT:
3631: -- x_contact_point_id Contact point ID.
3632: -- x_return_status Return status after the call. The status can
3633: -- be fnd_api.g_ret_sts_success (success),
3634: -- fnd_api.g_ret_sts_error (error),
3635: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3636: -- x_msg_count Number of messages in message stack.
3637: -- x_msg_data Message text if x_msg_count is 1.
3638: --
3631: -- x_contact_point_id Contact point ID.
3632: -- x_return_status Return status after the call. The status can
3633: -- be fnd_api.g_ret_sts_success (success),
3634: -- fnd_api.g_ret_sts_error (error),
3635: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3636: -- x_msg_count Number of messages in message stack.
3637: -- x_msg_data Message text if x_msg_count is 1.
3638: --
3639: -- NOTES
3648: -- contact point APIs.
3649: --
3650:
3651: PROCEDURE create_web_contact_point (
3652: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
3653: p_contact_point_rec IN contact_point_rec_type,
3654: p_web_rec IN web_rec_type := g_miss_web_rec,
3655: x_contact_point_id OUT NOCOPY NUMBER,
3656: x_return_status OUT NOCOPY VARCHAR2,
3700: -- Check if API is called in debug mode. If yes, disable debug.
3701: --disable_debug;
3702:
3703: EXCEPTION
3704: WHEN fnd_api.g_exc_error THEN
3705: ROLLBACK TO create_web_contact_point;
3706: x_return_status := fnd_api.g_ret_sts_error;
3707:
3708: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3702:
3703: EXCEPTION
3704: WHEN fnd_api.g_exc_error THEN
3705: ROLLBACK TO create_web_contact_point;
3706: x_return_status := fnd_api.g_ret_sts_error;
3707:
3708: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3709: p_count => x_msg_count,
3710: p_data => x_msg_data);
3704: WHEN fnd_api.g_exc_error THEN
3705: ROLLBACK TO create_web_contact_point;
3706: x_return_status := fnd_api.g_ret_sts_error;
3707:
3708: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3709: p_count => x_msg_count,
3710: p_data => x_msg_data);
3711:
3712: -- Debug info.
3724:
3725: -- Check if API is called in debug mode. If yes, disable debug.
3726: --disable_debug;
3727:
3728: WHEN fnd_api.g_exc_unexpected_error THEN
3729: ROLLBACK TO create_web_contact_point;
3730: x_return_status := fnd_api.g_ret_sts_unexp_error;
3731:
3732: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3726: --disable_debug;
3727:
3728: WHEN fnd_api.g_exc_unexpected_error THEN
3729: ROLLBACK TO create_web_contact_point;
3730: x_return_status := fnd_api.g_ret_sts_unexp_error;
3731:
3732: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3733: p_count => x_msg_count,
3734: p_data => x_msg_data);
3728: WHEN fnd_api.g_exc_unexpected_error THEN
3729: ROLLBACK TO create_web_contact_point;
3730: x_return_status := fnd_api.g_ret_sts_unexp_error;
3731:
3732: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3733: p_count => x_msg_count,
3734: p_data => x_msg_data);
3735:
3736: -- Debug info.
3750: --disable_debug;
3751:
3752: WHEN OTHERS THEN
3753: ROLLBACK TO create_web_contact_point;
3754: x_return_status := fnd_api.g_ret_sts_unexp_error;
3755:
3756: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
3757: fnd_message.set_token('ERROR' ,SQLERRM);
3758: fnd_msg_pub.add;
3756: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
3757: fnd_message.set_token('ERROR' ,SQLERRM);
3758: fnd_msg_pub.add;
3759:
3760: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3761: p_count => x_msg_count,
3762: p_data => x_msg_data);
3763:
3764: -- Debug info.
3788: --
3789: -- ARGUMENTS
3790: -- IN:
3791: -- p_init_msg_list Initialize message stack if it is set to
3792: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
3793: -- p_contact_point_rec Contact point record.
3794: -- p_eft_rec EFT record.
3795: -- IN/OUT:
3796: -- OUT:
3795: -- IN/OUT:
3796: -- OUT:
3797: -- x_contact_point_id Contact point ID.
3798: -- x_return_status Return status after the call. The status can
3799: -- be fnd_api.g_ret_sts_success (success),
3800: -- fnd_api.g_ret_sts_error (error),
3801: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3802: -- x_msg_count Number of messages in message stack.
3803: -- x_msg_data Message text if x_msg_count is 1.
3796: -- OUT:
3797: -- x_contact_point_id Contact point ID.
3798: -- x_return_status Return status after the call. The status can
3799: -- be fnd_api.g_ret_sts_success (success),
3800: -- fnd_api.g_ret_sts_error (error),
3801: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3802: -- x_msg_count Number of messages in message stack.
3803: -- x_msg_data Message text if x_msg_count is 1.
3804: --
3797: -- x_contact_point_id Contact point ID.
3798: -- x_return_status Return status after the call. The status can
3799: -- be fnd_api.g_ret_sts_success (success),
3800: -- fnd_api.g_ret_sts_error (error),
3801: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3802: -- x_msg_count Number of messages in message stack.
3803: -- x_msg_data Message text if x_msg_count is 1.
3804: --
3805: -- NOTES
3816: -- contact point APIs.
3817: --
3818:
3819: PROCEDURE create_eft_contact_point (
3820: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
3821: p_contact_point_rec IN contact_point_rec_type,
3822: p_eft_rec IN eft_rec_type := g_miss_eft_rec,
3823: x_contact_point_id OUT NOCOPY NUMBER,
3824: x_return_status OUT NOCOPY VARCHAR2,
3869: -- Check if API is called in debug mode. If yes, disable debug.
3870: --disable_debug;
3871:
3872: EXCEPTION
3873: WHEN fnd_api.g_exc_error THEN
3874: ROLLBACK TO create_eft_contact_point;
3875: x_return_status := fnd_api.g_ret_sts_error;
3876:
3877: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3871:
3872: EXCEPTION
3873: WHEN fnd_api.g_exc_error THEN
3874: ROLLBACK TO create_eft_contact_point;
3875: x_return_status := fnd_api.g_ret_sts_error;
3876:
3877: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3878: p_count => x_msg_count,
3879: p_data => x_msg_data);
3873: WHEN fnd_api.g_exc_error THEN
3874: ROLLBACK TO create_eft_contact_point;
3875: x_return_status := fnd_api.g_ret_sts_error;
3876:
3877: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3878: p_count => x_msg_count,
3879: p_data => x_msg_data);
3880:
3881: -- Debug info.
3893:
3894: -- Check if API is called in debug mode. If yes, disable debug.
3895: --disable_debug;
3896:
3897: WHEN fnd_api.g_exc_unexpected_error THEN
3898: ROLLBACK TO create_eft_contact_point;
3899: x_return_status := fnd_api.g_ret_sts_unexp_error;
3900:
3901: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3895: --disable_debug;
3896:
3897: WHEN fnd_api.g_exc_unexpected_error THEN
3898: ROLLBACK TO create_eft_contact_point;
3899: x_return_status := fnd_api.g_ret_sts_unexp_error;
3900:
3901: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3902: p_count => x_msg_count,
3903: p_data => x_msg_data);
3897: WHEN fnd_api.g_exc_unexpected_error THEN
3898: ROLLBACK TO create_eft_contact_point;
3899: x_return_status := fnd_api.g_ret_sts_unexp_error;
3900:
3901: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3902: p_count => x_msg_count,
3903: p_data => x_msg_data);
3904:
3905: -- Debug info.
3919: --disable_debug;
3920:
3921: WHEN OTHERS THEN
3922: ROLLBACK TO create_eft_contact_point;
3923: x_return_status := fnd_api.g_ret_sts_unexp_error;
3924:
3925: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
3926: fnd_message.set_token('ERROR' ,SQLERRM);
3927: fnd_msg_pub.add;
3925: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
3926: fnd_message.set_token('ERROR' ,SQLERRM);
3927: fnd_msg_pub.add;
3928:
3929: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3930: p_count => x_msg_count,
3931: p_data => x_msg_data);
3932:
3933: -- Debug info.
3957: --
3958: -- ARGUMENTS
3959: -- IN:
3960: -- p_init_msg_list Initialize message stack if it is set to
3961: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
3962: -- p_contact_point_rec Contact point record.
3963: -- p_phone_rec Phone record.
3964: -- IN/OUT:
3965: -- OUT:
3964: -- IN/OUT:
3965: -- OUT:
3966: -- x_contact_point_id Contact point ID.
3967: -- x_return_status Return status after the call. The status can
3968: -- be fnd_api.g_ret_sts_success (success),
3969: -- fnd_api.g_ret_sts_error (error),
3970: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3971: -- x_msg_count Number of messages in message stack.
3972: -- x_msg_data Message text if x_msg_count is 1.
3965: -- OUT:
3966: -- x_contact_point_id Contact point ID.
3967: -- x_return_status Return status after the call. The status can
3968: -- be fnd_api.g_ret_sts_success (success),
3969: -- fnd_api.g_ret_sts_error (error),
3970: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3971: -- x_msg_count Number of messages in message stack.
3972: -- x_msg_data Message text if x_msg_count is 1.
3973: --
3966: -- x_contact_point_id Contact point ID.
3967: -- x_return_status Return status after the call. The status can
3968: -- be fnd_api.g_ret_sts_success (success),
3969: -- fnd_api.g_ret_sts_error (error),
3970: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3971: -- x_msg_count Number of messages in message stack.
3972: -- x_msg_data Message text if x_msg_count is 1.
3973: --
3974: -- NOTES
3983: -- contact point APIs.
3984: --
3985:
3986: PROCEDURE create_phone_contact_point (
3987: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
3988: p_contact_point_rec IN contact_point_rec_type,
3989: p_phone_rec IN phone_rec_type := g_miss_phone_rec,
3990: x_contact_point_id OUT NOCOPY NUMBER,
3991: x_return_status OUT NOCOPY VARCHAR2,
4036: -- Check if API is called in debug mode. If yes, disable debug.
4037: --disable_debug;
4038:
4039: EXCEPTION
4040: WHEN fnd_api.g_exc_error THEN
4041: ROLLBACK TO create_phone_contact_point;
4042: x_return_status := fnd_api.g_ret_sts_error;
4043:
4044: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4038:
4039: EXCEPTION
4040: WHEN fnd_api.g_exc_error THEN
4041: ROLLBACK TO create_phone_contact_point;
4042: x_return_status := fnd_api.g_ret_sts_error;
4043:
4044: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4045: p_count => x_msg_count,
4046: p_data => x_msg_data);
4040: WHEN fnd_api.g_exc_error THEN
4041: ROLLBACK TO create_phone_contact_point;
4042: x_return_status := fnd_api.g_ret_sts_error;
4043:
4044: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4045: p_count => x_msg_count,
4046: p_data => x_msg_data);
4047:
4048: -- Debug info.
4060:
4061: -- Check if API is called in debug mode. If yes, disable debug.
4062: --disable_debug;
4063:
4064: WHEN fnd_api.g_exc_unexpected_error THEN
4065: ROLLBACK TO create_phone_contact_point;
4066: x_return_status := fnd_api.g_ret_sts_unexp_error;
4067:
4068: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4062: --disable_debug;
4063:
4064: WHEN fnd_api.g_exc_unexpected_error THEN
4065: ROLLBACK TO create_phone_contact_point;
4066: x_return_status := fnd_api.g_ret_sts_unexp_error;
4067:
4068: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4069: p_count => x_msg_count,
4070: p_data => x_msg_data);
4064: WHEN fnd_api.g_exc_unexpected_error THEN
4065: ROLLBACK TO create_phone_contact_point;
4066: x_return_status := fnd_api.g_ret_sts_unexp_error;
4067:
4068: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4069: p_count => x_msg_count,
4070: p_data => x_msg_data);
4071:
4072: -- Debug info.
4086: --disable_debug;
4087:
4088: WHEN OTHERS THEN
4089: ROLLBACK TO create_phone_contact_point;
4090: x_return_status := fnd_api.g_ret_sts_unexp_error;
4091:
4092: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
4093: fnd_message.set_token('ERROR' ,SQLERRM);
4094: fnd_msg_pub.add;
4092: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
4093: fnd_message.set_token('ERROR' ,SQLERRM);
4094: fnd_msg_pub.add;
4095:
4096: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4097: p_count => x_msg_count,
4098: p_data => x_msg_data);
4099:
4100: -- Debug info.
4124: --
4125: -- ARGUMENTS
4126: -- IN:
4127: -- p_init_msg_list Initialize message stack if it is set to
4128: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
4129: -- p_contact_point_rec Contact point record.
4130: -- p_telex_rec Telex record.
4131: -- IN/OUT:
4132: -- OUT:
4131: -- IN/OUT:
4132: -- OUT:
4133: -- x_contact_point_id Contact point ID.
4134: -- x_return_status Return status after the call. The status can
4135: -- be fnd_api.g_ret_sts_success (success),
4136: -- fnd_api.g_ret_sts_error (error),
4137: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4138: -- x_msg_count Number of messages in message stack.
4139: -- x_msg_data Message text if x_msg_count is 1.
4132: -- OUT:
4133: -- x_contact_point_id Contact point ID.
4134: -- x_return_status Return status after the call. The status can
4135: -- be fnd_api.g_ret_sts_success (success),
4136: -- fnd_api.g_ret_sts_error (error),
4137: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4138: -- x_msg_count Number of messages in message stack.
4139: -- x_msg_data Message text if x_msg_count is 1.
4140: --
4133: -- x_contact_point_id Contact point ID.
4134: -- x_return_status Return status after the call. The status can
4135: -- be fnd_api.g_ret_sts_success (success),
4136: -- fnd_api.g_ret_sts_error (error),
4137: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4138: -- x_msg_count Number of messages in message stack.
4139: -- x_msg_data Message text if x_msg_count is 1.
4140: --
4141: -- NOTES
4150: -- contact point APIs.
4151: --
4152:
4153: PROCEDURE create_telex_contact_point (
4154: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
4155: p_contact_point_rec IN contact_point_rec_type,
4156: p_telex_rec IN telex_rec_type := g_miss_telex_rec,
4157: x_contact_point_id OUT NOCOPY NUMBER,
4158: x_return_status OUT NOCOPY VARCHAR2,
4203: -- Check if API is called in debug mode. If yes, disable debug.
4204: --disable_debug;
4205:
4206: EXCEPTION
4207: WHEN fnd_api.g_exc_error THEN
4208: ROLLBACK TO create_telex_contact_point;
4209: x_return_status := fnd_api.g_ret_sts_error;
4210:
4211: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4205:
4206: EXCEPTION
4207: WHEN fnd_api.g_exc_error THEN
4208: ROLLBACK TO create_telex_contact_point;
4209: x_return_status := fnd_api.g_ret_sts_error;
4210:
4211: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4212: p_count => x_msg_count,
4213: p_data => x_msg_data);
4207: WHEN fnd_api.g_exc_error THEN
4208: ROLLBACK TO create_telex_contact_point;
4209: x_return_status := fnd_api.g_ret_sts_error;
4210:
4211: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4212: p_count => x_msg_count,
4213: p_data => x_msg_data);
4214:
4215: -- Debug info.
4227:
4228: -- Check if API is called in debug mode. If yes, disable debug.
4229: --disable_debug;
4230:
4231: WHEN fnd_api.g_exc_unexpected_error THEN
4232: ROLLBACK TO create_telex_contact_point;
4233: x_return_status := fnd_api.g_ret_sts_unexp_error;
4234:
4235: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4229: --disable_debug;
4230:
4231: WHEN fnd_api.g_exc_unexpected_error THEN
4232: ROLLBACK TO create_telex_contact_point;
4233: x_return_status := fnd_api.g_ret_sts_unexp_error;
4234:
4235: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4236: p_count => x_msg_count,
4237: p_data => x_msg_data);
4231: WHEN fnd_api.g_exc_unexpected_error THEN
4232: ROLLBACK TO create_telex_contact_point;
4233: x_return_status := fnd_api.g_ret_sts_unexp_error;
4234:
4235: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4236: p_count => x_msg_count,
4237: p_data => x_msg_data);
4238:
4239: -- Debug info.
4253: --disable_debug;
4254:
4255: WHEN OTHERS THEN
4256: ROLLBACK TO create_telex_contact_point;
4257: x_return_status := fnd_api.g_ret_sts_unexp_error;
4258:
4259: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
4260: fnd_message.set_token('ERROR' ,SQLERRM);
4261: fnd_msg_pub.add;
4259: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
4260: fnd_message.set_token('ERROR' ,SQLERRM);
4261: fnd_msg_pub.add;
4262:
4263: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4264: p_count => x_msg_count,
4265: p_data => x_msg_data);
4266:
4267: -- Debug info.
4291: --
4292: -- ARGUMENTS
4293: -- IN:
4294: -- p_init_msg_list Initialize message stack if it is set to
4295: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
4296: -- p_contact_point_rec Contact point record.
4297: -- p_email_rec Email record.
4298: -- IN/OUT:
4299: -- OUT:
4298: -- IN/OUT:
4299: -- OUT:
4300: -- x_contact_point_id Contact point ID.
4301: -- x_return_status Return status after the call. The status can
4302: -- be fnd_api.g_ret_sts_success (success),
4303: -- fnd_api.g_ret_sts_error (error),
4304: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4305: -- x_msg_count Number of messages in message stack.
4306: -- x_msg_data Message text if x_msg_count is 1.
4299: -- OUT:
4300: -- x_contact_point_id Contact point ID.
4301: -- x_return_status Return status after the call. The status can
4302: -- be fnd_api.g_ret_sts_success (success),
4303: -- fnd_api.g_ret_sts_error (error),
4304: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4305: -- x_msg_count Number of messages in message stack.
4306: -- x_msg_data Message text if x_msg_count is 1.
4307: --
4300: -- x_contact_point_id Contact point ID.
4301: -- x_return_status Return status after the call. The status can
4302: -- be fnd_api.g_ret_sts_success (success),
4303: -- fnd_api.g_ret_sts_error (error),
4304: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4305: -- x_msg_count Number of messages in message stack.
4306: -- x_msg_data Message text if x_msg_count is 1.
4307: --
4308: -- NOTES
4317: -- contact point APIs.
4318: --
4319:
4320: PROCEDURE create_email_contact_point (
4321: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
4322: p_contact_point_rec IN contact_point_rec_type,
4323: p_email_rec IN email_rec_type := g_miss_email_rec,
4324: x_contact_point_id OUT NOCOPY NUMBER,
4325: x_return_status OUT NOCOPY VARCHAR2,
4370: -- Check if API is called in debug mode. If yes, disable debug.
4371: --disable_debug;
4372:
4373: EXCEPTION
4374: WHEN fnd_api.g_exc_error THEN
4375: ROLLBACK TO create_email_contact_point;
4376: x_return_status := fnd_api.g_ret_sts_error;
4377:
4378: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4372:
4373: EXCEPTION
4374: WHEN fnd_api.g_exc_error THEN
4375: ROLLBACK TO create_email_contact_point;
4376: x_return_status := fnd_api.g_ret_sts_error;
4377:
4378: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4379: p_count => x_msg_count,
4380: p_data => x_msg_data);
4374: WHEN fnd_api.g_exc_error THEN
4375: ROLLBACK TO create_email_contact_point;
4376: x_return_status := fnd_api.g_ret_sts_error;
4377:
4378: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4379: p_count => x_msg_count,
4380: p_data => x_msg_data);
4381:
4382: -- Debug info.
4394:
4395: -- Check if API is called in debug mode. If yes, disable debug.
4396: --disable_debug;
4397:
4398: WHEN fnd_api.g_exc_unexpected_error THEN
4399: ROLLBACK TO create_email_contact_point;
4400: x_return_status := fnd_api.g_ret_sts_unexp_error;
4401:
4402: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4396: --disable_debug;
4397:
4398: WHEN fnd_api.g_exc_unexpected_error THEN
4399: ROLLBACK TO create_email_contact_point;
4400: x_return_status := fnd_api.g_ret_sts_unexp_error;
4401:
4402: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4403: p_count => x_msg_count,
4404: p_data => x_msg_data);
4398: WHEN fnd_api.g_exc_unexpected_error THEN
4399: ROLLBACK TO create_email_contact_point;
4400: x_return_status := fnd_api.g_ret_sts_unexp_error;
4401:
4402: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4403: p_count => x_msg_count,
4404: p_data => x_msg_data);
4405:
4406: -- Debug info.
4420: --disable_debug;
4421:
4422: WHEN OTHERS THEN
4423: ROLLBACK TO create_email_contact_point;
4424: x_return_status := fnd_api.g_ret_sts_unexp_error;
4425:
4426: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
4427: fnd_message.set_token('ERROR' ,SQLERRM);
4428: fnd_msg_pub.add;
4426: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
4427: fnd_message.set_token('ERROR' ,SQLERRM);
4428: fnd_msg_pub.add;
4429:
4430: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4431: p_count => x_msg_count,
4432: p_data => x_msg_data);
4433:
4434: -- Debug info.
4458: --
4459: -- ARGUMENTS
4460: -- IN:
4461: -- p_init_msg_list Initialize message stack if it is set to
4462: -- FND_API.G_TRUE. Default is fnd_api.g_false.
4463: -- p_contact_point_rec Contact point record.
4464: -- p_edi_rec EDI record.
4465: -- p_email_rec Email record.
4466: -- p_phone_rec Phone record.
4469: -- IN/OUT:
4470: -- p_object_version_number Used for locking the being updated record.
4471: -- OUT:
4472: -- x_return_status Return status after the call. The status can
4473: -- be fnd_api.g_ret_sts_success (success),
4474: -- fnd_api.g_ret_sts_error (error),
4475: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4476: -- x_msg_count Number of messages in message stack.
4477: -- x_msg_data Message text if x_msg_count is 1.
4470: -- p_object_version_number Used for locking the being updated record.
4471: -- OUT:
4472: -- x_return_status Return status after the call. The status can
4473: -- be fnd_api.g_ret_sts_success (success),
4474: -- fnd_api.g_ret_sts_error (error),
4475: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4476: -- x_msg_count Number of messages in message stack.
4477: -- x_msg_data Message text if x_msg_count is 1.
4478: --
4471: -- OUT:
4472: -- x_return_status Return status after the call. The status can
4473: -- be fnd_api.g_ret_sts_success (success),
4474: -- fnd_api.g_ret_sts_error (error),
4475: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4476: -- x_msg_count Number of messages in message stack.
4477: -- x_msg_data Message text if x_msg_count is 1.
4478: --
4479: -- NOTES
4489: -- contact point APIs.
4490: --
4491:
4492: PROCEDURE update_contact_point (
4493: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
4494: p_contact_point_rec IN contact_point_rec_type,
4495: p_edi_rec IN edi_rec_type := g_miss_edi_rec,
4496: p_email_rec IN email_rec_type := g_miss_email_rec,
4497: p_phone_rec IN phone_rec_type := g_miss_phone_rec,
4551: -- Check if API is called in debug mode. If yes, disable debug.
4552: --disable_debug;
4553:
4554: EXCEPTION
4555: WHEN fnd_api.g_exc_error THEN
4556: ROLLBACK TO update_contact_point;
4557: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
4558: x_return_status := fnd_api.g_ret_sts_error;
4559:
4554: EXCEPTION
4555: WHEN fnd_api.g_exc_error THEN
4556: ROLLBACK TO update_contact_point;
4557: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
4558: x_return_status := fnd_api.g_ret_sts_error;
4559:
4560: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4561: p_count => x_msg_count,
4562: p_data => x_msg_data);
4556: ROLLBACK TO update_contact_point;
4557: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
4558: x_return_status := fnd_api.g_ret_sts_error;
4559:
4560: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4561: p_count => x_msg_count,
4562: p_data => x_msg_data);
4563:
4564: -- Debug info.
4576:
4577: -- Check if API is called in debug mode. If yes, disable debug.
4578: --disable_debug;
4579:
4580: WHEN fnd_api.g_exc_unexpected_error THEN
4581: ROLLBACK TO update_contact_point;
4582: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
4583: x_return_status := fnd_api.g_ret_sts_unexp_error;
4584:
4579:
4580: WHEN fnd_api.g_exc_unexpected_error THEN
4581: ROLLBACK TO update_contact_point;
4582: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
4583: x_return_status := fnd_api.g_ret_sts_unexp_error;
4584:
4585: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4586: p_count => x_msg_count,
4587: p_data => x_msg_data);
4581: ROLLBACK TO update_contact_point;
4582: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
4583: x_return_status := fnd_api.g_ret_sts_unexp_error;
4584:
4585: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4586: p_count => x_msg_count,
4587: p_data => x_msg_data);
4588:
4589: -- Debug info.
4604:
4605: WHEN OTHERS THEN
4606: ROLLBACK TO update_contact_point;
4607: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
4608: x_return_status := fnd_api.g_ret_sts_unexp_error;
4609:
4610: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
4611: fnd_message.set_token('ERROR' ,SQLERRM);
4612: fnd_msg_pub.add;
4610: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
4611: fnd_message.set_token('ERROR' ,SQLERRM);
4612: fnd_msg_pub.add;
4613:
4614: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4615: p_count => x_msg_count,
4616: p_data => x_msg_data);
4617:
4618: -- Debug info.
4642: --
4643: -- ARGUMENTS
4644: -- IN:
4645: -- p_init_msg_list Initialize message stack if it is set to
4646: -- FND_API.G_TRUE. Default is fnd_api.g_false.
4647: -- p_contact_point_rec Contact point record.
4648: -- p_edi_rec EDI record.
4649: -- IN/OUT:
4650: -- p_object_version_number Used for locking the being updated record.
4649: -- IN/OUT:
4650: -- p_object_version_number Used for locking the being updated record.
4651: -- OUT:
4652: -- x_return_status Return status after the call. The status can
4653: -- be fnd_api.g_ret_sts_success (success),
4654: -- fnd_api.g_ret_sts_error (error),
4655: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4656: -- x_msg_count Number of messages in message stack.
4657: -- x_msg_data Message text if x_msg_count is 1.
4650: -- p_object_version_number Used for locking the being updated record.
4651: -- OUT:
4652: -- x_return_status Return status after the call. The status can
4653: -- be fnd_api.g_ret_sts_success (success),
4654: -- fnd_api.g_ret_sts_error (error),
4655: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4656: -- x_msg_count Number of messages in message stack.
4657: -- x_msg_data Message text if x_msg_count is 1.
4658: --
4651: -- OUT:
4652: -- x_return_status Return status after the call. The status can
4653: -- be fnd_api.g_ret_sts_success (success),
4654: -- fnd_api.g_ret_sts_error (error),
4655: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4656: -- x_msg_count Number of messages in message stack.
4657: -- x_msg_data Message text if x_msg_count is 1.
4658: --
4659: -- NOTES
4668: -- contact point APIs.
4669: --
4670:
4671: PROCEDURE update_edi_contact_point (
4672: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
4673: p_contact_point_rec IN contact_point_rec_type,
4674: p_edi_rec IN edi_rec_type := g_miss_edi_rec,
4675: p_object_version_number IN OUT NOCOPY NUMBER,
4676: x_return_status OUT NOCOPY VARCHAR2,
4719: -- Check if API is called in debug mode. If yes, disable debug.
4720: --disable_debug;
4721:
4722: EXCEPTION
4723: WHEN fnd_api.g_exc_error THEN
4724: ROLLBACK TO update_edi_contact_point;
4725: x_return_status := fnd_api.g_ret_sts_error;
4726:
4727: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4721:
4722: EXCEPTION
4723: WHEN fnd_api.g_exc_error THEN
4724: ROLLBACK TO update_edi_contact_point;
4725: x_return_status := fnd_api.g_ret_sts_error;
4726:
4727: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4728: p_count => x_msg_count,
4729: p_data => x_msg_data);
4723: WHEN fnd_api.g_exc_error THEN
4724: ROLLBACK TO update_edi_contact_point;
4725: x_return_status := fnd_api.g_ret_sts_error;
4726:
4727: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4728: p_count => x_msg_count,
4729: p_data => x_msg_data);
4730:
4731: -- Debug info.
4743:
4744: -- Check if API is called in debug mode. If yes, disable debug.
4745: --disable_debug;
4746:
4747: WHEN fnd_api.g_exc_unexpected_error THEN
4748: ROLLBACK TO update_edi_contact_point;
4749: x_return_status := fnd_api.g_ret_sts_unexp_error;
4750:
4751: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4745: --disable_debug;
4746:
4747: WHEN fnd_api.g_exc_unexpected_error THEN
4748: ROLLBACK TO update_edi_contact_point;
4749: x_return_status := fnd_api.g_ret_sts_unexp_error;
4750:
4751: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4752: p_count => x_msg_count,
4753: p_data => x_msg_data);
4747: WHEN fnd_api.g_exc_unexpected_error THEN
4748: ROLLBACK TO update_edi_contact_point;
4749: x_return_status := fnd_api.g_ret_sts_unexp_error;
4750:
4751: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4752: p_count => x_msg_count,
4753: p_data => x_msg_data);
4754:
4755: -- Debug info.
4769: --disable_debug;
4770:
4771: WHEN OTHERS THEN
4772: ROLLBACK TO update_edi_contact_point;
4773: x_return_status := fnd_api.g_ret_sts_unexp_error;
4774:
4775: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
4776: fnd_message.set_token('ERROR' ,SQLERRM);
4777: fnd_msg_pub.add;
4775: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
4776: fnd_message.set_token('ERROR' ,SQLERRM);
4777: fnd_msg_pub.add;
4778:
4779: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4780: p_count => x_msg_count,
4781: p_data => x_msg_data);
4782:
4783: -- Debug info.
4807: --
4808: -- ARGUMENTS
4809: -- IN:
4810: -- p_init_msg_list Initialize message stack if it is set to
4811: -- FND_API.G_TRUE. Default is fnd_api.g_false.
4812: -- p_contact_point_rec Contact point record.
4813: -- p_web_rec WEB record.
4814: -- IN/OUT:
4815: -- p_object_version_number Used for locking the being updated record.
4814: -- IN/OUT:
4815: -- p_object_version_number Used for locking the being updated record.
4816: -- OUT:
4817: -- x_return_status Return status after the call. The status can
4818: -- be fnd_api.g_ret_sts_success (success),
4819: -- fnd_api.g_ret_sts_error (error),
4820: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4821: -- x_msg_count Number of messages in message stack.
4822: -- x_msg_data Message text if x_msg_count is 1.
4815: -- p_object_version_number Used for locking the being updated record.
4816: -- OUT:
4817: -- x_return_status Return status after the call. The status can
4818: -- be fnd_api.g_ret_sts_success (success),
4819: -- fnd_api.g_ret_sts_error (error),
4820: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4821: -- x_msg_count Number of messages in message stack.
4822: -- x_msg_data Message text if x_msg_count is 1.
4823: --
4816: -- OUT:
4817: -- x_return_status Return status after the call. The status can
4818: -- be fnd_api.g_ret_sts_success (success),
4819: -- fnd_api.g_ret_sts_error (error),
4820: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4821: -- x_msg_count Number of messages in message stack.
4822: -- x_msg_data Message text if x_msg_count is 1.
4823: --
4824: -- NOTES
4833: -- contact point APIs.
4834: --
4835:
4836: PROCEDURE update_web_contact_point (
4837: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
4838: p_contact_point_rec IN contact_point_rec_type,
4839: p_web_rec IN web_rec_type := g_miss_web_rec,
4840: p_object_version_number IN OUT NOCOPY NUMBER,
4841: x_return_status OUT NOCOPY VARCHAR2,
4885: -- Check if API is called in debug mode. If yes, disable debug.
4886: --disable_debug;
4887:
4888: EXCEPTION
4889: WHEN fnd_api.g_exc_error THEN
4890: ROLLBACK TO update_web_contact_point;
4891: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
4892: x_return_status := fnd_api.g_ret_sts_error;
4893:
4888: EXCEPTION
4889: WHEN fnd_api.g_exc_error THEN
4890: ROLLBACK TO update_web_contact_point;
4891: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
4892: x_return_status := fnd_api.g_ret_sts_error;
4893:
4894: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4895: p_count => x_msg_count,
4896: p_data => x_msg_data);
4890: ROLLBACK TO update_web_contact_point;
4891: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
4892: x_return_status := fnd_api.g_ret_sts_error;
4893:
4894: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4895: p_count => x_msg_count,
4896: p_data => x_msg_data);
4897:
4898: -- Debug info.
4910:
4911: -- Check if API is called in debug mode. If yes, disable debug.
4912: --disable_debug;
4913:
4914: WHEN fnd_api.g_exc_unexpected_error THEN
4915: ROLLBACK TO update_web_contact_point;
4916: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
4917: x_return_status := fnd_api.g_ret_sts_unexp_error;
4918:
4913:
4914: WHEN fnd_api.g_exc_unexpected_error THEN
4915: ROLLBACK TO update_web_contact_point;
4916: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
4917: x_return_status := fnd_api.g_ret_sts_unexp_error;
4918:
4919: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4920: p_count => x_msg_count,
4921: p_data => x_msg_data);
4915: ROLLBACK TO update_web_contact_point;
4916: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
4917: x_return_status := fnd_api.g_ret_sts_unexp_error;
4918:
4919: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4920: p_count => x_msg_count,
4921: p_data => x_msg_data);
4922:
4923: -- Debug info.
4939:
4940: WHEN OTHERS THEN
4941: ROLLBACK TO update_web_contact_point;
4942: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
4943: x_return_status := fnd_api.g_ret_sts_unexp_error;
4944:
4945: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
4946: fnd_message.set_token('ERROR' ,SQLERRM);
4947: fnd_msg_pub.add;
4945: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
4946: fnd_message.set_token('ERROR' ,SQLERRM);
4947: fnd_msg_pub.add;
4948:
4949: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4950: p_count => x_msg_count,
4951: p_data => x_msg_data);
4952:
4953: -- Debug info.
4977: --
4978: -- ARGUMENTS
4979: -- IN:
4980: -- p_init_msg_list Initialize message stack if it is set to
4981: -- FND_API.G_TRUE. Default is fnd_api.g_false.
4982: -- p_contact_point_rec Contact point record.
4983: -- p_eft_rec EFT record.
4984: -- IN/OUT:
4985: -- p_object_version_number Used for locking the being updated record.
4984: -- IN/OUT:
4985: -- p_object_version_number Used for locking the being updated record.
4986: -- OUT:
4987: -- x_return_status Return status after the call. The status can
4988: -- be fnd_api.g_ret_sts_success (success),
4989: -- fnd_api.g_ret_sts_error (error),
4990: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4991: -- x_msg_count Number of messages in message stack.
4992: -- x_msg_data Message text if x_msg_count is 1.
4985: -- p_object_version_number Used for locking the being updated record.
4986: -- OUT:
4987: -- x_return_status Return status after the call. The status can
4988: -- be fnd_api.g_ret_sts_success (success),
4989: -- fnd_api.g_ret_sts_error (error),
4990: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4991: -- x_msg_count Number of messages in message stack.
4992: -- x_msg_data Message text if x_msg_count is 1.
4993: --
4986: -- OUT:
4987: -- x_return_status Return status after the call. The status can
4988: -- be fnd_api.g_ret_sts_success (success),
4989: -- fnd_api.g_ret_sts_error (error),
4990: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4991: -- x_msg_count Number of messages in message stack.
4992: -- x_msg_data Message text if x_msg_count is 1.
4993: --
4994: -- NOTES
5005: -- contact point APIs.
5006: --
5007:
5008: PROCEDURE update_eft_contact_point (
5009: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
5010: p_contact_point_rec IN contact_point_rec_type,
5011: p_eft_rec IN eft_rec_type := g_miss_eft_rec,
5012: p_object_version_number IN OUT NOCOPY NUMBER,
5013: x_return_status OUT NOCOPY VARCHAR2,
5057: -- Check if API is called in debug mode. If yes, disable debug.
5058: --disable_debug;
5059:
5060: EXCEPTION
5061: WHEN fnd_api.g_exc_error THEN
5062: ROLLBACK TO update_eft_contact_point;
5063: x_return_status := fnd_api.g_ret_sts_error;
5064:
5065: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5059:
5060: EXCEPTION
5061: WHEN fnd_api.g_exc_error THEN
5062: ROLLBACK TO update_eft_contact_point;
5063: x_return_status := fnd_api.g_ret_sts_error;
5064:
5065: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5066: p_count => x_msg_count,
5067: p_data => x_msg_data);
5061: WHEN fnd_api.g_exc_error THEN
5062: ROLLBACK TO update_eft_contact_point;
5063: x_return_status := fnd_api.g_ret_sts_error;
5064:
5065: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5066: p_count => x_msg_count,
5067: p_data => x_msg_data);
5068:
5069: -- Debug info.
5081:
5082: -- Check if API is called in debug mode. If yes, disable debug.
5083: --disable_debug;
5084:
5085: WHEN fnd_api.g_exc_unexpected_error THEN
5086: ROLLBACK TO update_eft_contact_point;
5087: x_return_status := fnd_api.g_ret_sts_unexp_error;
5088:
5089: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5083: --disable_debug;
5084:
5085: WHEN fnd_api.g_exc_unexpected_error THEN
5086: ROLLBACK TO update_eft_contact_point;
5087: x_return_status := fnd_api.g_ret_sts_unexp_error;
5088:
5089: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5090: p_count => x_msg_count,
5091: p_data => x_msg_data);
5085: WHEN fnd_api.g_exc_unexpected_error THEN
5086: ROLLBACK TO update_eft_contact_point;
5087: x_return_status := fnd_api.g_ret_sts_unexp_error;
5088:
5089: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5090: p_count => x_msg_count,
5091: p_data => x_msg_data);
5092:
5093: -- Debug info.
5107: --disable_debug;
5108:
5109: WHEN OTHERS THEN
5110: ROLLBACK TO update_eft_contact_point;
5111: x_return_status := fnd_api.g_ret_sts_unexp_error;
5112:
5113: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
5114: fnd_message.set_token('ERROR' ,SQLERRM);
5115: fnd_msg_pub.add;
5113: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
5114: fnd_message.set_token('ERROR' ,SQLERRM);
5115: fnd_msg_pub.add;
5116:
5117: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5118: p_count => x_msg_count,
5119: p_data => x_msg_data);
5120:
5121: -- Debug info.
5146: --
5147: -- ARGUMENTS
5148: -- IN:
5149: -- p_init_msg_list Initialize message stack if it is set to
5150: -- FND_API.G_TRUE. Default is fnd_api.g_false.
5151: -- p_contact_point_rec Contact point record.
5152: -- p_phone_rec Phone record.
5153: -- IN/OUT:
5154: -- p_object_version_number Used for locking the being updated record.
5153: -- IN/OUT:
5154: -- p_object_version_number Used for locking the being updated record.
5155: -- OUT:
5156: -- x_return_status Return status after the call. The status can
5157: -- be fnd_api.g_ret_sts_success (success),
5158: -- fnd_api.g_ret_sts_error (error),
5159: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
5160: -- x_msg_count Number of messages in message stack.
5161: -- x_msg_data Message text if x_msg_count is 1.
5154: -- p_object_version_number Used for locking the being updated record.
5155: -- OUT:
5156: -- x_return_status Return status after the call. The status can
5157: -- be fnd_api.g_ret_sts_success (success),
5158: -- fnd_api.g_ret_sts_error (error),
5159: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
5160: -- x_msg_count Number of messages in message stack.
5161: -- x_msg_data Message text if x_msg_count is 1.
5162: --
5155: -- OUT:
5156: -- x_return_status Return status after the call. The status can
5157: -- be fnd_api.g_ret_sts_success (success),
5158: -- fnd_api.g_ret_sts_error (error),
5159: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
5160: -- x_msg_count Number of messages in message stack.
5161: -- x_msg_data Message text if x_msg_count is 1.
5162: --
5163: -- NOTES
5172: -- contact point APIs.
5173: --
5174:
5175: PROCEDURE update_phone_contact_point (
5176: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
5177: p_contact_point_rec IN contact_point_rec_type,
5178: p_phone_rec IN phone_rec_type := g_miss_phone_rec,
5179: p_object_version_number IN OUT NOCOPY NUMBER,
5180: x_return_status OUT NOCOPY VARCHAR2,
5224: -- Check if API is called in debug mode. If yes, disable debug.
5225: --disable_debug;
5226:
5227: EXCEPTION
5228: WHEN fnd_api.g_exc_error THEN
5229: ROLLBACK TO update_phone_contact_point;
5230: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5231: x_return_status := fnd_api.g_ret_sts_error;
5232:
5227: EXCEPTION
5228: WHEN fnd_api.g_exc_error THEN
5229: ROLLBACK TO update_phone_contact_point;
5230: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5231: x_return_status := fnd_api.g_ret_sts_error;
5232:
5233: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5234: p_count => x_msg_count,
5235: p_data => x_msg_data);
5229: ROLLBACK TO update_phone_contact_point;
5230: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5231: x_return_status := fnd_api.g_ret_sts_error;
5232:
5233: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5234: p_count => x_msg_count,
5235: p_data => x_msg_data);
5236:
5237: -- Debug info.
5249:
5250: -- Check if API is called in debug mode. If yes, disable debug.
5251: --disable_debug;
5252:
5253: WHEN fnd_api.g_exc_unexpected_error THEN
5254: ROLLBACK TO update_phone_contact_point;
5255: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5256: x_return_status := fnd_api.g_ret_sts_unexp_error;
5257:
5252:
5253: WHEN fnd_api.g_exc_unexpected_error THEN
5254: ROLLBACK TO update_phone_contact_point;
5255: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5256: x_return_status := fnd_api.g_ret_sts_unexp_error;
5257:
5258: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5259: p_count => x_msg_count,
5260: p_data => x_msg_data);
5254: ROLLBACK TO update_phone_contact_point;
5255: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5256: x_return_status := fnd_api.g_ret_sts_unexp_error;
5257:
5258: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5259: p_count => x_msg_count,
5260: p_data => x_msg_data);
5261:
5262: -- Debug info.
5277:
5278: WHEN OTHERS THEN
5279: ROLLBACK TO update_phone_contact_point;
5280: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5281: x_return_status := fnd_api.g_ret_sts_unexp_error;
5282:
5283: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
5284: fnd_message.set_token('ERROR' ,SQLERRM);
5285: fnd_msg_pub.add;
5283: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
5284: fnd_message.set_token('ERROR' ,SQLERRM);
5285: fnd_msg_pub.add;
5286:
5287: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5288: p_count => x_msg_count,
5289: p_data => x_msg_data);
5290:
5291: -- Debug info.
5315: --
5316: -- ARGUMENTS
5317: -- IN:
5318: -- p_init_msg_list Initialize message stack if it is set to
5319: -- FND_API.G_TRUE. Default is fnd_api.g_false.
5320: -- p_contact_point_rec Contact point record.
5321: -- p_telex_rec Telex record.
5322: -- IN/OUT:
5323: -- p_object_version_number Used for locking the being updated record.
5322: -- IN/OUT:
5323: -- p_object_version_number Used for locking the being updated record.
5324: -- OUT:
5325: -- x_return_status Return status after the call. The status can
5326: -- be fnd_api.g_ret_sts_success (success),
5327: -- fnd_api.g_ret_sts_error (error),
5328: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
5329: -- x_msg_count Number of messages in message stack.
5330: -- x_msg_data Message text if x_msg_count is 1.
5323: -- p_object_version_number Used for locking the being updated record.
5324: -- OUT:
5325: -- x_return_status Return status after the call. The status can
5326: -- be fnd_api.g_ret_sts_success (success),
5327: -- fnd_api.g_ret_sts_error (error),
5328: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
5329: -- x_msg_count Number of messages in message stack.
5330: -- x_msg_data Message text if x_msg_count is 1.
5331: --
5324: -- OUT:
5325: -- x_return_status Return status after the call. The status can
5326: -- be fnd_api.g_ret_sts_success (success),
5327: -- fnd_api.g_ret_sts_error (error),
5328: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
5329: -- x_msg_count Number of messages in message stack.
5330: -- x_msg_data Message text if x_msg_count is 1.
5331: --
5332: -- NOTES
5341: -- contact point APIs.
5342: --
5343:
5344: PROCEDURE update_telex_contact_point (
5345: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
5346: p_contact_point_rec IN contact_point_rec_type,
5347: p_telex_rec IN telex_rec_type := g_miss_telex_rec,
5348: p_object_version_number IN OUT NOCOPY NUMBER,
5349: x_return_status OUT NOCOPY VARCHAR2,
5394: -- Check if API is called in debug mode. If yes, disable debug.
5395: --disable_debug;
5396:
5397: EXCEPTION
5398: WHEN fnd_api.g_exc_error THEN
5399: ROLLBACK TO update_telex_contact_point;
5400: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5401: x_return_status := fnd_api.g_ret_sts_error;
5402:
5397: EXCEPTION
5398: WHEN fnd_api.g_exc_error THEN
5399: ROLLBACK TO update_telex_contact_point;
5400: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5401: x_return_status := fnd_api.g_ret_sts_error;
5402:
5403: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5404: p_count => x_msg_count,
5405: p_data => x_msg_data);
5399: ROLLBACK TO update_telex_contact_point;
5400: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5401: x_return_status := fnd_api.g_ret_sts_error;
5402:
5403: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5404: p_count => x_msg_count,
5405: p_data => x_msg_data);
5406:
5407: -- Debug info.
5421:
5422: -- Check if API is called in debug mode. If yes, disable debug.
5423: --disable_debug;
5424:
5425: WHEN fnd_api.g_exc_unexpected_error THEN
5426: ROLLBACK TO update_telex_contact_point;
5427: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5428: x_return_status := fnd_api.g_ret_sts_unexp_error;
5429:
5424:
5425: WHEN fnd_api.g_exc_unexpected_error THEN
5426: ROLLBACK TO update_telex_contact_point;
5427: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5428: x_return_status := fnd_api.g_ret_sts_unexp_error;
5429:
5430: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5431: p_count => x_msg_count,
5432: p_data => x_msg_data);
5426: ROLLBACK TO update_telex_contact_point;
5427: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5428: x_return_status := fnd_api.g_ret_sts_unexp_error;
5429:
5430: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5431: p_count => x_msg_count,
5432: p_data => x_msg_data);
5433:
5434: -- Debug info.
5449:
5450: WHEN OTHERS THEN
5451: ROLLBACK TO update_telex_contact_point;
5452: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5453: x_return_status := fnd_api.g_ret_sts_unexp_error;
5454:
5455: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
5456: fnd_message.set_token('ERROR' ,SQLERRM);
5457: fnd_msg_pub.add;
5455: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
5456: fnd_message.set_token('ERROR' ,SQLERRM);
5457: fnd_msg_pub.add;
5458:
5459: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5460: p_count => x_msg_count,
5461: p_data => x_msg_data);
5462:
5463: -- Debug info.
5487: --
5488: -- ARGUMENTS
5489: -- IN:
5490: -- p_init_msg_list Initialize message stack if it is set to
5491: -- FND_API.G_TRUE. Default is fnd_api.g_false.
5492: -- p_contact_point_rec Contact point record.
5493: -- p_email_rec Email record.
5494: -- IN/OUT:
5495: -- p_object_version_number Used for locking the being updated record.
5494: -- IN/OUT:
5495: -- p_object_version_number Used for locking the being updated record.
5496: -- OUT:
5497: -- x_return_status Return status after the call. The status can
5498: -- be fnd_api.g_ret_sts_success (success),
5499: -- fnd_api.g_ret_sts_error (error),
5500: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
5501: -- x_msg_count Number of messages in message stack.
5502: -- x_msg_data Message text if x_msg_count is 1.
5495: -- p_object_version_number Used for locking the being updated record.
5496: -- OUT:
5497: -- x_return_status Return status after the call. The status can
5498: -- be fnd_api.g_ret_sts_success (success),
5499: -- fnd_api.g_ret_sts_error (error),
5500: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
5501: -- x_msg_count Number of messages in message stack.
5502: -- x_msg_data Message text if x_msg_count is 1.
5503: --
5496: -- OUT:
5497: -- x_return_status Return status after the call. The status can
5498: -- be fnd_api.g_ret_sts_success (success),
5499: -- fnd_api.g_ret_sts_error (error),
5500: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
5501: -- x_msg_count Number of messages in message stack.
5502: -- x_msg_data Message text if x_msg_count is 1.
5503: --
5504: -- NOTES
5513: -- contact point APIs.
5514: --
5515:
5516: PROCEDURE update_email_contact_point (
5517: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
5518: p_contact_point_rec IN contact_point_rec_type,
5519: p_email_rec IN email_rec_type := g_miss_email_rec,
5520: p_object_version_number IN OUT NOCOPY NUMBER,
5521: x_return_status OUT NOCOPY VARCHAR2,
5565: -- Check if API is called in debug mode. If yes, disable debug.
5566: --disable_debug;
5567:
5568: EXCEPTION
5569: WHEN fnd_api.g_exc_error THEN
5570: ROLLBACK TO update_email_contact_point;
5571: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5572: x_return_status := fnd_api.g_ret_sts_error;
5573:
5568: EXCEPTION
5569: WHEN fnd_api.g_exc_error THEN
5570: ROLLBACK TO update_email_contact_point;
5571: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5572: x_return_status := fnd_api.g_ret_sts_error;
5573:
5574: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5575: p_count => x_msg_count,
5576: p_data => x_msg_data);
5570: ROLLBACK TO update_email_contact_point;
5571: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5572: x_return_status := fnd_api.g_ret_sts_error;
5573:
5574: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5575: p_count => x_msg_count,
5576: p_data => x_msg_data);
5577:
5578: -- Debug info.
5590:
5591: -- Check if API is called in debug mode. If yes, disable debug.
5592: --disable_debug;
5593:
5594: WHEN fnd_api.g_exc_unexpected_error THEN
5595: ROLLBACK TO update_email_contact_point;
5596: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5597: x_return_status := fnd_api.g_ret_sts_unexp_error;
5598:
5593:
5594: WHEN fnd_api.g_exc_unexpected_error THEN
5595: ROLLBACK TO update_email_contact_point;
5596: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5597: x_return_status := fnd_api.g_ret_sts_unexp_error;
5598:
5599: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5600: p_count => x_msg_count,
5601: p_data => x_msg_data);
5595: ROLLBACK TO update_email_contact_point;
5596: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5597: x_return_status := fnd_api.g_ret_sts_unexp_error;
5598:
5599: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5600: p_count => x_msg_count,
5601: p_data => x_msg_data);
5602:
5603: -- Debug info.
5618:
5619: WHEN OTHERS THEN
5620: ROLLBACK TO update_email_contact_point;
5621: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5622: x_return_status := fnd_api.g_ret_sts_unexp_error;
5623:
5624: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
5625: fnd_message.set_token('ERROR' ,SQLERRM);
5626: fnd_msg_pub.add;
5624: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
5625: fnd_message.set_token('ERROR' ,SQLERRM);
5626: fnd_msg_pub.add;
5627:
5628: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5629: p_count => x_msg_count,
5630: p_data => x_msg_data);
5631:
5632: -- Debug info.
5656: --
5657: -- ARGUMENTS
5658: -- IN:
5659: -- p_init_msg_list Initialize message stack if it is set to
5660: -- FND_API.G_TRUE. Default is fnd_api.g_false.
5661: -- p_raw_phone_number Raw phone number.
5662: -- p_territory_code Territory code.
5663: -- IN/OUT:
5664: -- x_phone_country_code Phone country code.
5666: -- x_phone_number Phone number.
5667: -- OUT:
5668: -- x_formatted_phone_number Formatted phone number.
5669: -- x_return_status Return status after the call. The status can
5670: -- be fnd_api.g_ret_sts_success (success),
5671: -- fnd_api.g_ret_sts_error (error),
5672: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
5673: -- x_msg_count Number of messages in message stack.
5674: -- x_msg_data Message text if x_msg_count is 1.
5667: -- OUT:
5668: -- x_formatted_phone_number Formatted phone number.
5669: -- x_return_status Return status after the call. The status can
5670: -- be fnd_api.g_ret_sts_success (success),
5671: -- fnd_api.g_ret_sts_error (error),
5672: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
5673: -- x_msg_count Number of messages in message stack.
5674: -- x_msg_data Message text if x_msg_count is 1.
5675: --
5668: -- x_formatted_phone_number Formatted phone number.
5669: -- x_return_status Return status after the call. The status can
5670: -- be fnd_api.g_ret_sts_success (success),
5671: -- fnd_api.g_ret_sts_error (error),
5672: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
5673: -- x_msg_count Number of messages in message stack.
5674: -- x_msg_data Message text if x_msg_count is 1.
5675: --
5676: -- NOTES
5684: --
5685: --
5686:
5687: PROCEDURE phone_format (
5688: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
5689: p_raw_phone_number IN VARCHAR2 := fnd_api.g_miss_char,
5690: p_territory_code IN VARCHAR2 := fnd_api.g_miss_char,
5691: x_formatted_phone_number OUT NOCOPY VARCHAR2,
5692: x_phone_country_code IN OUT NOCOPY VARCHAR2,
5685: --
5686:
5687: PROCEDURE phone_format (
5688: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
5689: p_raw_phone_number IN VARCHAR2 := fnd_api.g_miss_char,
5690: p_territory_code IN VARCHAR2 := fnd_api.g_miss_char,
5691: x_formatted_phone_number OUT NOCOPY VARCHAR2,
5692: x_phone_country_code IN OUT NOCOPY VARCHAR2,
5693: x_phone_area_code IN OUT NOCOPY VARCHAR2,
5686:
5687: PROCEDURE phone_format (
5688: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
5689: p_raw_phone_number IN VARCHAR2 := fnd_api.g_miss_char,
5690: p_territory_code IN VARCHAR2 := fnd_api.g_miss_char,
5691: x_formatted_phone_number OUT NOCOPY VARCHAR2,
5692: x_phone_country_code IN OUT NOCOPY VARCHAR2,
5693: x_phone_area_code IN OUT NOCOPY VARCHAR2,
5694: x_phone_number IN OUT NOCOPY VARCHAR2,
5728: p_msg_level=>fnd_log.level_procedure);
5729: END IF;
5730:
5731: -- Initialize message list if p_init_msg_list is set to TRUE.
5732: IF fnd_api.to_boolean(p_init_msg_list) THEN
5733: fnd_msg_pub.initialize;
5734: END IF;
5735:
5736: -- Initialize API return status to success.
5733: fnd_msg_pub.initialize;
5734: END IF;
5735:
5736: -- Initialize API return status to success.
5737: x_return_status := fnd_api.g_ret_sts_success;
5738:
5739: -- Check if raw phone number is to be formatted
5740: IF p_raw_phone_number IS NOT NULL AND
5741: p_raw_phone_number <> fnd_api.g_miss_char THEN
5737: x_return_status := fnd_api.g_ret_sts_success;
5738:
5739: -- Check if raw phone number is to be formatted
5740: IF p_raw_phone_number IS NOT NULL AND
5741: p_raw_phone_number <> fnd_api.g_miss_char THEN
5742: l_format_raw_phone := TRUE;
5743: END IF;
5744:
5745: -- Or Check if the area_code/phone number combination is to be formatted
5743: END IF;
5744:
5745: -- Or Check if the area_code/phone number combination is to be formatted
5746: IF ((x_phone_number IS NOT NULL AND
5747: x_phone_number <> fnd_api.g_miss_char) OR
5748: (x_phone_area_code IS NOT NULL AND
5749: x_phone_area_code <> fnd_api.g_miss_char))
5750: THEN
5751: l_format_area_phone := TRUE;
5745: -- Or Check if the area_code/phone number combination is to be formatted
5746: IF ((x_phone_number IS NOT NULL AND
5747: x_phone_number <> fnd_api.g_miss_char) OR
5748: (x_phone_area_code IS NOT NULL AND
5749: x_phone_area_code <> fnd_api.g_miss_char))
5750: THEN
5751: l_format_area_phone := TRUE;
5752: END IF;
5753:
5757: (NOT l_format_raw_phone AND NOT l_format_area_phone)
5758: THEN
5759: fnd_message.set_name('AR', 'HZ_INVALID_PHONE_PARAMETER');
5760: fnd_msg_pub.add;
5761: RAISE fnd_api.g_exc_error;
5762: END IF;
5763:
5764: -- If not format a raw phone number, then create a raw phone
5765: -- number by appending the area code and phone number. This will
5768: IF l_format_raw_phone THEN
5769: l_raw_phone_number := p_raw_phone_number;
5770: ELSIF l_format_area_phone THEN
5771: IF x_phone_area_code IS NULL OR
5772: x_phone_area_code = fnd_api.g_miss_char THEN
5773: l_raw_phone_number := filter_phone_number(x_phone_number);
5774: ELSE
5775: l_raw_phone_number := filter_phone_number(x_phone_area_code ||
5776: x_phone_number);
5780: -- If Country code has been passed query the territory code for the
5781: -- country. If country code has not been passed, use territory_code.
5782:
5783: IF x_phone_country_code IS NOT NULL AND
5784: x_phone_country_code <> fnd_api.g_miss_char
5785: THEN
5786: OPEN c_territory(x_phone_country_code);
5787: FETCH c_territory INTO l_territory_code;
5788: IF c_territory%NOTFOUND THEN
5789: l_territory_code := NULL;
5790: END IF;
5791: CLOSE c_territory;
5792: ELSIF p_territory_code IS NOT NULL AND
5793: p_territory_code <> fnd_api.g_miss_char THEN
5794: l_territory_code := p_territory_code;
5795: ELSE
5796: l_territory_code := NULL;
5797: END IF;
5801: -- version 115.9 for Phone normalization and parsing project
5802:
5803: --Call to phone_parse to get parsed components
5804: HZ_FORMAT_PHONE_V2PUB.phone_parse (
5805: fnd_api.g_true ,
5806: l_raw_phone_number ,
5807: p_territory_code ,
5808: x_phone_country_code ,
5809: x_phone_area_code ,
5814: x_msg_data);
5815:
5816: --Parsed components are i/p to phone_display to get formateed number
5817: HZ_FORMAT_PHONE_V2PUB.phone_display(
5818: fnd_api.g_true ,
5819: p_territory_code,
5820: x_phone_country_code ,
5821: x_phone_area_code ,
5822: x_phone_number ,
5828: /* -- Cannot get territory code, error out NOCOPY
5829: | IF l_territory_code IS NULL THEN
5830: | fnd_message.set_name('AR', 'HZ_COUNTRY_CODE_NOT_DEFINED');
5831: | fnd_msg_pub.add;
5832: | RAISE fnd_api.g_exc_error;
5833: | END IF;
5834: |
5835: | -- Call subroutine to get the format style to be applied for the given
5836: | -- raw phone number and territory
5847: | -- Check for errors in identifying format style
5848: | IF l_msg_name IS NOT NULL THEN
5849: | fnd_message.set_name('AR', l_msg_name);
5850: | fnd_msg_pub.add;
5851: | RAISE fnd_api.g_exc_error;
5852: | END IF;
5853: |
5854: | -- Apply the format style and get translated number
5855: | translate_raw_phone_number (
5876: |
5877: | x_phone_country_code := l_phone_country_code; */
5878:
5879: -- Standard call to get message count and if count is 1, get message info.
5880: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5881: p_count => x_msg_count,
5882: p_data => x_msg_data);
5883:
5884: -- Debug info.
5897: -- Check if API is called in debug mode. If yes, disable debug.
5898: --disable_debug;
5899:
5900: EXCEPTION
5901: WHEN fnd_api.g_exc_error THEN
5902: x_return_status := fnd_api.g_ret_sts_error;
5903:
5904: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5905: p_count => x_msg_count,
5898: --disable_debug;
5899:
5900: EXCEPTION
5901: WHEN fnd_api.g_exc_error THEN
5902: x_return_status := fnd_api.g_ret_sts_error;
5903:
5904: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5905: p_count => x_msg_count,
5906: p_data => x_msg_data);
5900: EXCEPTION
5901: WHEN fnd_api.g_exc_error THEN
5902: x_return_status := fnd_api.g_ret_sts_error;
5903:
5904: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5905: p_count => x_msg_count,
5906: p_data => x_msg_data);
5907:
5908: -- Debug info.
5920:
5921: -- Check if API is called in debug mode. If yes, disable debug.
5922: --disable_debug;
5923:
5924: WHEN fnd_api.g_exc_unexpected_error THEN
5925: x_return_status := fnd_api.g_ret_sts_unexp_error;
5926:
5927: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5928: p_count => x_msg_count,
5921: -- Check if API is called in debug mode. If yes, disable debug.
5922: --disable_debug;
5923:
5924: WHEN fnd_api.g_exc_unexpected_error THEN
5925: x_return_status := fnd_api.g_ret_sts_unexp_error;
5926:
5927: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5928: p_count => x_msg_count,
5929: p_data => x_msg_data);
5923:
5924: WHEN fnd_api.g_exc_unexpected_error THEN
5925: x_return_status := fnd_api.g_ret_sts_unexp_error;
5926:
5927: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5928: p_count => x_msg_count,
5929: p_data => x_msg_data);
5930:
5931: -- Debug info.
5944: -- Check if API is called in debug mode. If yes, disable debug.
5945: --disable_debug;
5946:
5947: WHEN OTHERS THEN
5948: x_return_status := fnd_api.g_ret_sts_unexp_error;
5949:
5950: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
5951: fnd_message.set_token('ERROR' ,SQLERRM);
5952: fnd_msg_pub.add;
5950: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
5951: fnd_message.set_token('ERROR' ,SQLERRM);
5952: fnd_msg_pub.add;
5953:
5954: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5955: p_count => x_msg_count,
5956: p_data => x_msg_data);
5957:
5958: -- Debug info.
5983: --
5984: -- ARGUMENTS
5985: -- IN:
5986: -- p_init_msg_list Initialize message stack if it is set to
5987: -- FND_API.G_TRUE. Default is fnd_api.g_false.
5988: -- p_contact_point_id Contact point ID.
5989: -- IN/OUT:
5990: -- OUT:
5991: -- x_contact_point_rec Returned contact point record.
5994: -- x_phone_rec Returned phone record.
5995: -- x_telex_rec Returned telex record.
5996: -- x_web_rec Returned web record.
5997: -- x_return_status Return status after the call. The status can
5998: -- be fnd_api.g_ret_sts_success (success),
5999: -- fnd_api.g_ret_sts_error (error),
6000: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
6001: -- x_msg_count Number of messages in message stack.
6002: -- x_msg_data Message text if x_msg_count is 1.
5995: -- x_telex_rec Returned telex record.
5996: -- x_web_rec Returned web record.
5997: -- x_return_status Return status after the call. The status can
5998: -- be fnd_api.g_ret_sts_success (success),
5999: -- fnd_api.g_ret_sts_error (error),
6000: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
6001: -- x_msg_count Number of messages in message stack.
6002: -- x_msg_data Message text if x_msg_count is 1.
6003: --
5996: -- x_web_rec Returned web record.
5997: -- x_return_status Return status after the call. The status can
5998: -- be fnd_api.g_ret_sts_success (success),
5999: -- fnd_api.g_ret_sts_error (error),
6000: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
6001: -- x_msg_count Number of messages in message stack.
6002: -- x_msg_data Message text if x_msg_count is 1.
6003: --
6004: -- NOTES
6010: -- Bank Consolidation.
6011: --
6012:
6013: PROCEDURE get_contact_point_rec (
6014: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
6015: p_contact_point_id IN NUMBER,
6016: x_contact_point_rec OUT NOCOPY contact_point_rec_type,
6017: x_edi_rec OUT NOCOPY edi_rec_type,
6018: x_email_rec OUT NOCOPY email_rec_type,
6069: -- Check if API is called in debug mode. If yes, disable debug.
6070: --disable_debug;
6071:
6072: EXCEPTION
6073: WHEN fnd_api.g_exc_error THEN
6074: x_return_status := fnd_api.g_ret_sts_error;
6075:
6076: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6077: p_count => x_msg_count,
6070: --disable_debug;
6071:
6072: EXCEPTION
6073: WHEN fnd_api.g_exc_error THEN
6074: x_return_status := fnd_api.g_ret_sts_error;
6075:
6076: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6077: p_count => x_msg_count,
6078: p_data => x_msg_data);
6072: EXCEPTION
6073: WHEN fnd_api.g_exc_error THEN
6074: x_return_status := fnd_api.g_ret_sts_error;
6075:
6076: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6077: p_count => x_msg_count,
6078: p_data => x_msg_data);
6079:
6080: -- Debug info.
6092:
6093: -- Check if API is called in debug mode. If yes, disable debug.
6094: --disable_debug;
6095:
6096: WHEN fnd_api.g_exc_unexpected_error THEN
6097: x_return_status := fnd_api.g_ret_sts_unexp_error;
6098:
6099: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6100: p_count => x_msg_count,
6093: -- Check if API is called in debug mode. If yes, disable debug.
6094: --disable_debug;
6095:
6096: WHEN fnd_api.g_exc_unexpected_error THEN
6097: x_return_status := fnd_api.g_ret_sts_unexp_error;
6098:
6099: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6100: p_count => x_msg_count,
6101: p_data => x_msg_data);
6095:
6096: WHEN fnd_api.g_exc_unexpected_error THEN
6097: x_return_status := fnd_api.g_ret_sts_unexp_error;
6098:
6099: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6100: p_count => x_msg_count,
6101: p_data => x_msg_data);
6102:
6103: -- Debug info.
6116: -- Check if API is called in debug mode. If yes, disable debug.
6117: --disable_debug;
6118:
6119: WHEN OTHERS THEN
6120: x_return_status := fnd_api.g_ret_sts_unexp_error;
6121:
6122: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
6123: fnd_message.set_token('ERROR' ,SQLERRM);
6124: fnd_msg_pub.add;
6122: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
6123: fnd_message.set_token('ERROR' ,SQLERRM);
6124: fnd_msg_pub.add;
6125:
6126: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6127: p_count => x_msg_count,
6128: p_data => x_msg_data);
6129:
6130: -- Debug info.
6154: --
6155: -- ARGUMENTS
6156: -- IN:
6157: -- p_init_msg_list Initialize message stack if it is set to
6158: -- FND_API.G_TRUE. Default is fnd_api.g_false.
6159: -- p_contact_point_id Contact point ID.
6160: -- IN/OUT:
6161: -- OUT:
6162: -- x_contact_point_rec Returned contact point record.
6161: -- OUT:
6162: -- x_contact_point_rec Returned contact point record.
6163: -- x_edi_rec Returned EDI record.
6164: -- x_return_status Return status after the call. The status can
6165: -- be fnd_api.g_ret_sts_success (success),
6166: -- fnd_api.g_ret_sts_error (error),
6167: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
6168: -- x_msg_count Number of messages in message stack.
6169: -- x_msg_data Message text if x_msg_count is 1.
6162: -- x_contact_point_rec Returned contact point record.
6163: -- x_edi_rec Returned EDI record.
6164: -- x_return_status Return status after the call. The status can
6165: -- be fnd_api.g_ret_sts_success (success),
6166: -- fnd_api.g_ret_sts_error (error),
6167: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
6168: -- x_msg_count Number of messages in message stack.
6169: -- x_msg_data Message text if x_msg_count is 1.
6170: --
6163: -- x_edi_rec Returned EDI record.
6164: -- x_return_status Return status after the call. The status can
6165: -- be fnd_api.g_ret_sts_success (success),
6166: -- fnd_api.g_ret_sts_error (error),
6167: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
6168: -- x_msg_count Number of messages in message stack.
6169: -- x_msg_data Message text if x_msg_count is 1.
6170: --
6171: -- NOTES
6177: -- enhanced backward compatibility.
6178: --
6179:
6180: PROCEDURE get_edi_contact_point (
6181: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
6182: p_contact_point_id IN NUMBER,
6183: x_contact_point_rec OUT NOCOPY contact_point_rec_type,
6184: x_edi_rec OUT NOCOPY edi_rec_type,
6185: x_return_status OUT NOCOPY VARCHAR2,
6235: -- Check if API is called in debug mode. If yes, disable debug.
6236: --disable_debug;
6237:
6238: EXCEPTION
6239: WHEN fnd_api.g_exc_error THEN
6240: x_return_status := fnd_api.g_ret_sts_error;
6241:
6242: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6243: p_count => x_msg_count,
6236: --disable_debug;
6237:
6238: EXCEPTION
6239: WHEN fnd_api.g_exc_error THEN
6240: x_return_status := fnd_api.g_ret_sts_error;
6241:
6242: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6243: p_count => x_msg_count,
6244: p_data => x_msg_data);
6238: EXCEPTION
6239: WHEN fnd_api.g_exc_error THEN
6240: x_return_status := fnd_api.g_ret_sts_error;
6241:
6242: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6243: p_count => x_msg_count,
6244: p_data => x_msg_data);
6245:
6246: -- Debug info.
6258:
6259: -- Check if API is called in debug mode. If yes, disable debug.
6260: --disable_debug;
6261:
6262: WHEN fnd_api.g_exc_unexpected_error THEN
6263: x_return_status := fnd_api.g_ret_sts_unexp_error;
6264:
6265: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6266: p_count => x_msg_count,
6259: -- Check if API is called in debug mode. If yes, disable debug.
6260: --disable_debug;
6261:
6262: WHEN fnd_api.g_exc_unexpected_error THEN
6263: x_return_status := fnd_api.g_ret_sts_unexp_error;
6264:
6265: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6266: p_count => x_msg_count,
6267: p_data => x_msg_data);
6261:
6262: WHEN fnd_api.g_exc_unexpected_error THEN
6263: x_return_status := fnd_api.g_ret_sts_unexp_error;
6264:
6265: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6266: p_count => x_msg_count,
6267: p_data => x_msg_data);
6268:
6269: -- Debug info.
6282: -- Check if API is called in debug mode. If yes, disable debug.
6283: --disable_debug;
6284:
6285: WHEN OTHERS THEN
6286: x_return_status := fnd_api.g_ret_sts_unexp_error;
6287:
6288: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
6289: fnd_message.set_token('ERROR' ,SQLERRM);
6290: fnd_msg_pub.add;
6288: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
6289: fnd_message.set_token('ERROR' ,SQLERRM);
6290: fnd_msg_pub.add;
6291:
6292: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6293: p_count => x_msg_count,
6294: p_data => x_msg_data);
6295:
6296: -- Debug info.
6320: --
6321: -- ARGUMENTS
6322: -- IN:
6323: -- p_init_msg_list Initialize message stack if it is set to
6324: -- FND_API.G_TRUE. Default is fnd_api.g_false.
6325: -- p_contact_point_id Contact point ID.
6326: -- IN/OUT:
6327: -- OUT:
6328: -- x_contact_point_rec Returned contact point record.
6327: -- OUT:
6328: -- x_contact_point_rec Returned contact point record.
6329: -- x_eft_rec Returned EFT record.
6330: -- x_return_status Return status after the call. The status can
6331: -- be fnd_api.g_ret_sts_success (success),
6332: -- fnd_api.g_ret_sts_error (error),
6333: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
6334: -- x_msg_count Number of messages in message stack.
6335: -- x_msg_data Message text if x_msg_count is 1.
6328: -- x_contact_point_rec Returned contact point record.
6329: -- x_eft_rec Returned EFT record.
6330: -- x_return_status Return status after the call. The status can
6331: -- be fnd_api.g_ret_sts_success (success),
6332: -- fnd_api.g_ret_sts_error (error),
6333: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
6334: -- x_msg_count Number of messages in message stack.
6335: -- x_msg_data Message text if x_msg_count is 1.
6336: --
6329: -- x_eft_rec Returned EFT record.
6330: -- x_return_status Return status after the call. The status can
6331: -- be fnd_api.g_ret_sts_success (success),
6332: -- fnd_api.g_ret_sts_error (error),
6333: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
6334: -- x_msg_count Number of messages in message stack.
6335: -- x_msg_data Message text if x_msg_count is 1.
6336: --
6337: -- NOTES
6343: -- enhanced backward compatibility.
6344: --
6345:
6346: PROCEDURE get_eft_contact_point (
6347: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
6348: p_contact_point_id IN NUMBER,
6349: x_contact_point_rec OUT NOCOPY contact_point_rec_type,
6350: x_eft_rec OUT NOCOPY eft_rec_type,
6351: x_return_status OUT NOCOPY VARCHAR2,
6402: -- Check if API is called in debug mode. If yes, disable debug.
6403: --disable_debug;
6404:
6405: EXCEPTION
6406: WHEN fnd_api.g_exc_error THEN
6407: x_return_status := fnd_api.g_ret_sts_error;
6408:
6409: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6410: p_count => x_msg_count,
6403: --disable_debug;
6404:
6405: EXCEPTION
6406: WHEN fnd_api.g_exc_error THEN
6407: x_return_status := fnd_api.g_ret_sts_error;
6408:
6409: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6410: p_count => x_msg_count,
6411: p_data => x_msg_data);
6405: EXCEPTION
6406: WHEN fnd_api.g_exc_error THEN
6407: x_return_status := fnd_api.g_ret_sts_error;
6408:
6409: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6410: p_count => x_msg_count,
6411: p_data => x_msg_data);
6412:
6413: -- Debug info.
6425:
6426: -- Check if API is called in debug mode. If yes, disable debug.
6427: --disable_debug;
6428:
6429: WHEN fnd_api.g_exc_unexpected_error THEN
6430: x_return_status := fnd_api.g_ret_sts_unexp_error;
6431:
6432: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6433: p_count => x_msg_count,
6426: -- Check if API is called in debug mode. If yes, disable debug.
6427: --disable_debug;
6428:
6429: WHEN fnd_api.g_exc_unexpected_error THEN
6430: x_return_status := fnd_api.g_ret_sts_unexp_error;
6431:
6432: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6433: p_count => x_msg_count,
6434: p_data => x_msg_data);
6428:
6429: WHEN fnd_api.g_exc_unexpected_error THEN
6430: x_return_status := fnd_api.g_ret_sts_unexp_error;
6431:
6432: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6433: p_count => x_msg_count,
6434: p_data => x_msg_data);
6435:
6436: -- Debug info.
6449: -- Check if API is called in debug mode. If yes, disable debug.
6450: --disable_debug;
6451:
6452: WHEN OTHERS THEN
6453: x_return_status := fnd_api.g_ret_sts_unexp_error;
6454:
6455: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
6456: fnd_message.set_token('ERROR' ,SQLERRM);
6457: fnd_msg_pub.add;
6455: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
6456: fnd_message.set_token('ERROR' ,SQLERRM);
6457: fnd_msg_pub.add;
6458:
6459: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6460: p_count => x_msg_count,
6461: p_data => x_msg_data);
6462:
6463: -- Debug info.
6487: --
6488: -- ARGUMENTS
6489: -- IN:
6490: -- p_init_msg_list Initialize message stack if it is set to
6491: -- FND_API.G_TRUE. Default is fnd_api.g_false.
6492: -- p_contact_point_id Contact point ID.
6493: -- IN/OUT:
6494: -- OUT:
6495: -- x_contact_point_rec Returned contact point record.
6494: -- OUT:
6495: -- x_contact_point_rec Returned contact point record.
6496: -- x_web_rec Returned Web record.
6497: -- x_return_status Return status after the call. The status can
6498: -- be fnd_api.g_ret_sts_success (success),
6499: -- fnd_api.g_ret_sts_error (error),
6500: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
6501: -- x_msg_count Number of messages in message stack.
6502: -- x_msg_data Message text if x_msg_count is 1.
6495: -- x_contact_point_rec Returned contact point record.
6496: -- x_web_rec Returned Web record.
6497: -- x_return_status Return status after the call. The status can
6498: -- be fnd_api.g_ret_sts_success (success),
6499: -- fnd_api.g_ret_sts_error (error),
6500: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
6501: -- x_msg_count Number of messages in message stack.
6502: -- x_msg_data Message text if x_msg_count is 1.
6503: --
6496: -- x_web_rec Returned Web record.
6497: -- x_return_status Return status after the call. The status can
6498: -- be fnd_api.g_ret_sts_success (success),
6499: -- fnd_api.g_ret_sts_error (error),
6500: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
6501: -- x_msg_count Number of messages in message stack.
6502: -- x_msg_data Message text if x_msg_count is 1.
6503: --
6504: -- NOTES
6510: -- enhanced backward compatibility.
6511: --
6512:
6513: PROCEDURE get_web_contact_point (
6514: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
6515: p_contact_point_id IN NUMBER,
6516: x_contact_point_rec OUT NOCOPY contact_point_rec_type,
6517: x_web_rec OUT NOCOPY web_rec_type,
6518: x_return_status OUT NOCOPY VARCHAR2,
6569: -- Check if API is called in debug mode. If yes, disable debug.
6570: --disable_debug;
6571:
6572: EXCEPTION
6573: WHEN fnd_api.g_exc_error THEN
6574: x_return_status := fnd_api.g_ret_sts_error;
6575:
6576: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6577: p_count => x_msg_count,
6570: --disable_debug;
6571:
6572: EXCEPTION
6573: WHEN fnd_api.g_exc_error THEN
6574: x_return_status := fnd_api.g_ret_sts_error;
6575:
6576: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6577: p_count => x_msg_count,
6578: p_data => x_msg_data);
6572: EXCEPTION
6573: WHEN fnd_api.g_exc_error THEN
6574: x_return_status := fnd_api.g_ret_sts_error;
6575:
6576: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6577: p_count => x_msg_count,
6578: p_data => x_msg_data);
6579:
6580: -- Debug info.
6592:
6593: -- Check if API is called in debug mode. If yes, disable debug.
6594: --disable_debug;
6595:
6596: WHEN fnd_api.g_exc_unexpected_error THEN
6597: x_return_status := fnd_api.g_ret_sts_unexp_error;
6598:
6599: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6600: p_count => x_msg_count,
6593: -- Check if API is called in debug mode. If yes, disable debug.
6594: --disable_debug;
6595:
6596: WHEN fnd_api.g_exc_unexpected_error THEN
6597: x_return_status := fnd_api.g_ret_sts_unexp_error;
6598:
6599: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6600: p_count => x_msg_count,
6601: p_data => x_msg_data);
6595:
6596: WHEN fnd_api.g_exc_unexpected_error THEN
6597: x_return_status := fnd_api.g_ret_sts_unexp_error;
6598:
6599: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6600: p_count => x_msg_count,
6601: p_data => x_msg_data);
6602:
6603: -- Debug info.
6617: -- Check if API is called in debug mode. If yes, disable debug.
6618: --disable_debug;
6619:
6620: WHEN OTHERS THEN
6621: x_return_status := fnd_api.g_ret_sts_unexp_error;
6622:
6623: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
6624: fnd_message.set_token('ERROR' ,SQLERRM);
6625: fnd_msg_pub.add;
6623: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
6624: fnd_message.set_token('ERROR' ,SQLERRM);
6625: fnd_msg_pub.add;
6626:
6627: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6628: p_count => x_msg_count,
6629: p_data => x_msg_data);
6630:
6631: -- Debug info.
6655: --
6656: -- ARGUMENTS
6657: -- IN:
6658: -- p_init_msg_list Initialize message stack if it is set to
6659: -- FND_API.G_TRUE. Default is fnd_api.g_false.
6660: -- p_contact_point_id Contact point ID.
6661: -- IN/OUT:
6662: -- OUT:
6663: -- x_contact_point_rec Returned contact point record.
6662: -- OUT:
6663: -- x_contact_point_rec Returned contact point record.
6664: -- x_phone_rec Returned phone record.
6665: -- x_return_status Return status after the call. The status can
6666: -- be fnd_api.g_ret_sts_success (success),
6667: -- fnd_api.g_ret_sts_error (error),
6668: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
6669: -- x_msg_count Number of messages in message stack.
6670: -- x_msg_data Message text if x_msg_count is 1.
6663: -- x_contact_point_rec Returned contact point record.
6664: -- x_phone_rec Returned phone record.
6665: -- x_return_status Return status after the call. The status can
6666: -- be fnd_api.g_ret_sts_success (success),
6667: -- fnd_api.g_ret_sts_error (error),
6668: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
6669: -- x_msg_count Number of messages in message stack.
6670: -- x_msg_data Message text if x_msg_count is 1.
6671: --
6664: -- x_phone_rec Returned phone record.
6665: -- x_return_status Return status after the call. The status can
6666: -- be fnd_api.g_ret_sts_success (success),
6667: -- fnd_api.g_ret_sts_error (error),
6668: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
6669: -- x_msg_count Number of messages in message stack.
6670: -- x_msg_data Message text if x_msg_count is 1.
6671: --
6672: -- NOTES
6678: -- enhanced backward compatibility.
6679: --
6680:
6681: PROCEDURE get_phone_contact_point (
6682: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
6683: p_contact_point_id IN NUMBER,
6684: x_contact_point_rec OUT NOCOPY contact_point_rec_type,
6685: x_phone_rec OUT NOCOPY phone_rec_type,
6686: x_return_status OUT NOCOPY VARCHAR2,
6736: -- Check if API is called in debug mode. If yes, disable debug.
6737: --disable_debug;
6738:
6739: EXCEPTION
6740: WHEN fnd_api.g_exc_error THEN
6741: x_return_status := fnd_api.g_ret_sts_error;
6742:
6743: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6744: p_count => x_msg_count,
6737: --disable_debug;
6738:
6739: EXCEPTION
6740: WHEN fnd_api.g_exc_error THEN
6741: x_return_status := fnd_api.g_ret_sts_error;
6742:
6743: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6744: p_count => x_msg_count,
6745: p_data => x_msg_data);
6739: EXCEPTION
6740: WHEN fnd_api.g_exc_error THEN
6741: x_return_status := fnd_api.g_ret_sts_error;
6742:
6743: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6744: p_count => x_msg_count,
6745: p_data => x_msg_data);
6746:
6747: -- Debug info.
6759:
6760: -- Check if API is called in debug mode. If yes, disable debug.
6761: --disable_debug;
6762:
6763: WHEN fnd_api.g_exc_unexpected_error THEN
6764: x_return_status := fnd_api.g_ret_sts_unexp_error;
6765:
6766: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6767: p_count => x_msg_count,
6760: -- Check if API is called in debug mode. If yes, disable debug.
6761: --disable_debug;
6762:
6763: WHEN fnd_api.g_exc_unexpected_error THEN
6764: x_return_status := fnd_api.g_ret_sts_unexp_error;
6765:
6766: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6767: p_count => x_msg_count,
6768: p_data => x_msg_data);
6762:
6763: WHEN fnd_api.g_exc_unexpected_error THEN
6764: x_return_status := fnd_api.g_ret_sts_unexp_error;
6765:
6766: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6767: p_count => x_msg_count,
6768: p_data => x_msg_data);
6769:
6770: -- Debug info.
6783: -- Check if API is called in debug mode. If yes, disable debug.
6784: --disable_debug;
6785:
6786: WHEN OTHERS THEN
6787: x_return_status := fnd_api.g_ret_sts_unexp_error;
6788:
6789: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
6790: fnd_message.set_token('ERROR' ,SQLERRM);
6791: fnd_msg_pub.add;
6789: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
6790: fnd_message.set_token('ERROR' ,SQLERRM);
6791: fnd_msg_pub.add;
6792:
6793: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6794: p_count => x_msg_count,
6795: p_data => x_msg_data);
6796:
6797: -- Debug info.
6821: --
6822: -- ARGUMENTS
6823: -- IN:
6824: -- p_init_msg_list Initialize message stack if it is set to
6825: -- FND_API.G_TRUE. Default is fnd_api.g_false.
6826: -- p_contact_point_id Contact point ID.
6827: -- IN/OUT:
6828: -- OUT:
6829: -- x_contact_point_rec Returned contact point record.
6828: -- OUT:
6829: -- x_contact_point_rec Returned contact point record.
6830: -- x_telex_rec Returned telex record.
6831: -- x_return_status Return status after the call. The status can
6832: -- be fnd_api.g_ret_sts_success (success),
6833: -- fnd_api.g_ret_sts_error (error),
6834: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
6835: -- x_msg_count Number of messages in message stack.
6836: -- x_msg_data Message text if x_msg_count is 1.
6829: -- x_contact_point_rec Returned contact point record.
6830: -- x_telex_rec Returned telex record.
6831: -- x_return_status Return status after the call. The status can
6832: -- be fnd_api.g_ret_sts_success (success),
6833: -- fnd_api.g_ret_sts_error (error),
6834: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
6835: -- x_msg_count Number of messages in message stack.
6836: -- x_msg_data Message text if x_msg_count is 1.
6837: --
6830: -- x_telex_rec Returned telex record.
6831: -- x_return_status Return status after the call. The status can
6832: -- be fnd_api.g_ret_sts_success (success),
6833: -- fnd_api.g_ret_sts_error (error),
6834: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
6835: -- x_msg_count Number of messages in message stack.
6836: -- x_msg_data Message text if x_msg_count is 1.
6837: --
6838: -- NOTES
6844: -- enhanced backward compatibility.
6845: --
6846:
6847: PROCEDURE get_telex_contact_point (
6848: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
6849: p_contact_point_id IN NUMBER,
6850: x_contact_point_rec OUT NOCOPY contact_point_rec_type,
6851: x_telex_rec OUT NOCOPY telex_rec_type,
6852: x_return_status OUT NOCOPY VARCHAR2,
6902: -- Check if API is called in debug mode. If yes, disable debug.
6903: --disable_debug;
6904:
6905: EXCEPTION
6906: WHEN fnd_api.g_exc_error THEN
6907: x_return_status := fnd_api.g_ret_sts_error;
6908:
6909: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6910: p_count => x_msg_count,
6903: --disable_debug;
6904:
6905: EXCEPTION
6906: WHEN fnd_api.g_exc_error THEN
6907: x_return_status := fnd_api.g_ret_sts_error;
6908:
6909: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6910: p_count => x_msg_count,
6911: p_data => x_msg_data);
6905: EXCEPTION
6906: WHEN fnd_api.g_exc_error THEN
6907: x_return_status := fnd_api.g_ret_sts_error;
6908:
6909: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6910: p_count => x_msg_count,
6911: p_data => x_msg_data);
6912:
6913: -- Debug info.
6925:
6926: -- Check if API is called in debug mode. If yes, disable debug.
6927: --disable_debug;
6928:
6929: WHEN fnd_api.g_exc_unexpected_error THEN
6930: x_return_status := fnd_api.g_ret_sts_unexp_error;
6931:
6932: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6933: p_count => x_msg_count,
6926: -- Check if API is called in debug mode. If yes, disable debug.
6927: --disable_debug;
6928:
6929: WHEN fnd_api.g_exc_unexpected_error THEN
6930: x_return_status := fnd_api.g_ret_sts_unexp_error;
6931:
6932: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6933: p_count => x_msg_count,
6934: p_data => x_msg_data);
6928:
6929: WHEN fnd_api.g_exc_unexpected_error THEN
6930: x_return_status := fnd_api.g_ret_sts_unexp_error;
6931:
6932: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6933: p_count => x_msg_count,
6934: p_data => x_msg_data);
6935:
6936: -- Debug info.
6949: -- Check if API is called in debug mode. If yes, disable debug.
6950: --disable_debug;
6951:
6952: WHEN OTHERS THEN
6953: x_return_status := fnd_api.g_ret_sts_unexp_error;
6954:
6955: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
6956: fnd_message.set_token('ERROR' ,SQLERRM);
6957: fnd_msg_pub.add;
6955: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
6956: fnd_message.set_token('ERROR' ,SQLERRM);
6957: fnd_msg_pub.add;
6958:
6959: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6960: p_count => x_msg_count,
6961: p_data => x_msg_data);
6962:
6963: -- Debug info.
6987: --
6988: -- ARGUMENTS
6989: -- IN:
6990: -- p_init_msg_list Initialize message stack if it is set to
6991: -- FND_API.G_TRUE. Default is fnd_api.g_false.
6992: -- p_contact_point_id Contact point ID.
6993: -- IN/OUT:
6994: -- OUT:
6995: -- x_contact_point_rec Returned contact point record.
6994: -- OUT:
6995: -- x_contact_point_rec Returned contact point record.
6996: -- x_email_rec Returned email record.
6997: -- x_return_status Return status after the call. The status can
6998: -- be fnd_api.g_ret_sts_success (success),
6999: -- fnd_api.g_ret_sts_error (error),
7000: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
7001: -- x_msg_count Number of messages in message stack.
7002: -- x_msg_data Message text if x_msg_count is 1.
6995: -- x_contact_point_rec Returned contact point record.
6996: -- x_email_rec Returned email record.
6997: -- x_return_status Return status after the call. The status can
6998: -- be fnd_api.g_ret_sts_success (success),
6999: -- fnd_api.g_ret_sts_error (error),
7000: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
7001: -- x_msg_count Number of messages in message stack.
7002: -- x_msg_data Message text if x_msg_count is 1.
7003: --
6996: -- x_email_rec Returned email record.
6997: -- x_return_status Return status after the call. The status can
6998: -- be fnd_api.g_ret_sts_success (success),
6999: -- fnd_api.g_ret_sts_error (error),
7000: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
7001: -- x_msg_count Number of messages in message stack.
7002: -- x_msg_data Message text if x_msg_count is 1.
7003: --
7004: -- NOTES
7010: -- enhanced backward compatibility.
7011: --
7012:
7013: PROCEDURE get_email_contact_point (
7014: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
7015: p_contact_point_id IN NUMBER,
7016: x_contact_point_rec OUT NOCOPY contact_point_rec_type,
7017: x_email_rec OUT NOCOPY email_rec_type,
7018: x_return_status OUT NOCOPY VARCHAR2,
7069: -- Check if API is called in debug mode. If yes, disable debug.
7070: --disable_debug;
7071:
7072: EXCEPTION
7073: WHEN fnd_api.g_exc_error THEN
7074: x_return_status := fnd_api.g_ret_sts_error;
7075:
7076: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
7077: p_count => x_msg_count,
7070: --disable_debug;
7071:
7072: EXCEPTION
7073: WHEN fnd_api.g_exc_error THEN
7074: x_return_status := fnd_api.g_ret_sts_error;
7075:
7076: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
7077: p_count => x_msg_count,
7078: p_data => x_msg_data);
7072: EXCEPTION
7073: WHEN fnd_api.g_exc_error THEN
7074: x_return_status := fnd_api.g_ret_sts_error;
7075:
7076: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
7077: p_count => x_msg_count,
7078: p_data => x_msg_data);
7079:
7080: -- Debug info.
7092:
7093: -- Check if API is called in debug mode. If yes, disable debug.
7094: --disable_debug;
7095:
7096: WHEN fnd_api.g_exc_unexpected_error THEN
7097: x_return_status := fnd_api.g_ret_sts_unexp_error;
7098:
7099: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
7100: p_count => x_msg_count,
7093: -- Check if API is called in debug mode. If yes, disable debug.
7094: --disable_debug;
7095:
7096: WHEN fnd_api.g_exc_unexpected_error THEN
7097: x_return_status := fnd_api.g_ret_sts_unexp_error;
7098:
7099: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
7100: p_count => x_msg_count,
7101: p_data => x_msg_data);
7095:
7096: WHEN fnd_api.g_exc_unexpected_error THEN
7097: x_return_status := fnd_api.g_ret_sts_unexp_error;
7098:
7099: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
7100: p_count => x_msg_count,
7101: p_data => x_msg_data);
7102:
7103: -- Debug info.
7116: -- Check if API is called in debug mode. If yes, disable debug.
7117: --disable_debug;
7118:
7119: WHEN OTHERS THEN
7120: x_return_status := fnd_api.g_ret_sts_unexp_error;
7121:
7122: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
7123: fnd_message.set_token('ERROR' ,SQLERRM);
7124: fnd_msg_pub.add;
7122: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
7123: fnd_message.set_token('ERROR' ,SQLERRM);
7124: fnd_msg_pub.add;
7125:
7126: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
7127: p_count => x_msg_count,
7128: p_data => x_msg_data);
7129:
7130: -- Debug info.
7294: END;
7295: FUNCTION isModified(p_old_value IN VARCHAR2,p_new_value IN VARCHAR2) RETURN BOOLEAN
7296: IS
7297: BEGIN
7298: IF p_new_value IS NOT NULL AND p_new_value <> FND_API.G_MISS_CHAR THEN
7299: RETURN NVL(NOT (p_old_value=p_new_value),TRUE);
7300: ELSIF (p_old_value IS NOT NULL AND p_old_value <> FND_API.G_MISS_CHAR)
7301: AND p_new_value = FND_API.G_MISS_CHAR THEN
7302: RETURN TRUE;
7296: IS
7297: BEGIN
7298: IF p_new_value IS NOT NULL AND p_new_value <> FND_API.G_MISS_CHAR THEN
7299: RETURN NVL(NOT (p_old_value=p_new_value),TRUE);
7300: ELSIF (p_old_value IS NOT NULL AND p_old_value <> FND_API.G_MISS_CHAR)
7301: AND p_new_value = FND_API.G_MISS_CHAR THEN
7302: RETURN TRUE;
7303: ELSE
7304: RETURN FALSE;
7297: BEGIN
7298: IF p_new_value IS NOT NULL AND p_new_value <> FND_API.G_MISS_CHAR THEN
7299: RETURN NVL(NOT (p_old_value=p_new_value),TRUE);
7300: ELSIF (p_old_value IS NOT NULL AND p_old_value <> FND_API.G_MISS_CHAR)
7301: AND p_new_value = FND_API.G_MISS_CHAR THEN
7302: RETURN TRUE;
7303: ELSE
7304: RETURN FALSE;
7305: END IF;