[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
252: -- p_phone_rec Phone record.
253: -- p_telex_rec Telex record.
254: -- p_web_rec Web record.
255: -- x_return_status Return status after the call. The status can
256: -- be FND_API.G_RET_STS_SUCCESS (success),
257: -- FND_API.G_RET_STS_ERROR (error),
258: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
259: -- OUT:
260: -- x_contact_point_id Contact point ID.
253: -- p_telex_rec Telex record.
254: -- p_web_rec Web record.
255: -- x_return_status Return status after the call. The status can
256: -- be FND_API.G_RET_STS_SUCCESS (success),
257: -- FND_API.G_RET_STS_ERROR (error),
258: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
259: -- OUT:
260: -- x_contact_point_id Contact point ID.
261: --
254: -- p_web_rec Web record.
255: -- x_return_status Return status after the call. The status can
256: -- be FND_API.G_RET_STS_SUCCESS (success),
257: -- FND_API.G_RET_STS_ERROR (error),
258: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
259: -- OUT:
260: -- x_contact_point_id Contact point ID.
261: --
262: -- NOTES
433: p_web_rec => l_web_rec,
434: p_rowid => NULL,
435: x_return_status => x_return_status);
436:
437: IF x_return_status <> fnd_api.g_ret_sts_success THEN
438: RAISE fnd_api.g_exc_error;
439: END IF;
440:
441: hz_registry_validate_v2pub.validate_eft_contact_point (
434: p_rowid => NULL,
435: x_return_status => x_return_status);
436:
437: IF x_return_status <> fnd_api.g_ret_sts_success THEN
438: RAISE fnd_api.g_exc_error;
439: END IF;
440:
441: hz_registry_validate_v2pub.validate_eft_contact_point (
442: p_create_update_flag => 'C',
446: x_return_status => x_return_status);
447: END IF;
448:
449: -- Raise an error if any of the validations failed.
450: IF x_return_status <> fnd_api.g_ret_sts_success THEN
451: RAISE fnd_api.g_exc_error;
452: END IF;
453:
454: -- If raw_phone_number is passed in, call procedure phone_format.
447: END IF;
448:
449: -- Raise an error if any of the validations failed.
450: IF x_return_status <> fnd_api.g_ret_sts_success THEN
451: RAISE fnd_api.g_exc_error;
452: END IF;
453:
454: -- If raw_phone_number is passed in, call procedure phone_format.
455: -- either raw_phone_number or phone_number should be passed in
467: --was passed in else get it from hz_locations for owner_table_name HZ_PARTY_SITES
468:
469: IF p_contact_point_rec.contact_point_type = 'PHONE' THEN
470: IF l_phone_rec.raw_phone_number IS NOT NULL AND
471: l_phone_rec.raw_phone_number <> fnd_api.g_miss_char
472: THEN
473: IF l_phone_rec.phone_country_code is not null AND
474: l_phone_rec.phone_country_code <> fnd_api.g_miss_char
475: THEN
470: IF l_phone_rec.raw_phone_number IS NOT NULL AND
471: l_phone_rec.raw_phone_number <> fnd_api.g_miss_char
472: THEN
473: IF l_phone_rec.phone_country_code is not null AND
474: l_phone_rec.phone_country_code <> fnd_api.g_miss_char
475: THEN
476: BEGIN
477: select territory_code into l_country_code
478: from hz_phone_country_codes
483: NULL;
484: END;
485: ELSIF p_contact_point_rec.owner_table_name = 'HZ_PARTY_SITES' AND
486: (l_phone_rec.phone_country_code IS NULL OR
487: l_phone_rec.phone_country_code = fnd_api.g_miss_char)
488: THEN
489: -- Bug 2117973: modified to conform to Applications PL/SQL standards.
490: OPEN c_country(p_contact_point_rec.owner_table_id);
491: FETCH c_country INTO l_country_code;
521:
522: -- Bug 2197181 : content_source_type is obsolete and replaced by
523: -- actual_content_source
524:
525: IF x_return_status <> fnd_api.g_ret_sts_success THEN
526: IF p_contact_point_rec.actual_content_source = g_miss_content_source_type
527: THEN
528: IF x_return_status = fnd_api.g_ret_sts_error THEN
529: RAISE fnd_api.g_exc_error;
524:
525: IF x_return_status <> fnd_api.g_ret_sts_success THEN
526: IF p_contact_point_rec.actual_content_source = g_miss_content_source_type
527: THEN
528: IF x_return_status = fnd_api.g_ret_sts_error THEN
529: RAISE fnd_api.g_exc_error;
530: ELSE
531: RAISE fnd_api.g_exc_unexpected_error;
532: END IF;
525: IF x_return_status <> fnd_api.g_ret_sts_success THEN
526: IF p_contact_point_rec.actual_content_source = g_miss_content_source_type
527: THEN
528: IF x_return_status = fnd_api.g_ret_sts_error THEN
529: RAISE fnd_api.g_exc_error;
530: ELSE
531: RAISE fnd_api.g_exc_unexpected_error;
532: END IF;
533: ELSE
527: THEN
528: IF x_return_status = fnd_api.g_ret_sts_error THEN
529: RAISE fnd_api.g_exc_error;
530: ELSE
531: RAISE fnd_api.g_exc_unexpected_error;
532: END IF;
533: ELSE
534: FOR i IN 1..(l_msg_count - l_message_count) LOOP
535: fnd_msg_pub.delete_msg(l_msg_count - l_message_count + 1 - i);
533: ELSE
534: FOR i IN 1..(l_msg_count - l_message_count) LOOP
535: fnd_msg_pub.delete_msg(l_msg_count - l_message_count + 1 - i);
536: END LOOP;
537: x_return_status := fnd_api.g_ret_sts_success;
538: END IF;
539: END IF;
540:
541: -- END IF; Bug 3520843
541: -- END IF; Bug 3520843
542: ELSE
543: -- raw_phone_number must always have value.
544: IF l_phone_rec.phone_area_code IS NULL OR
545: l_phone_rec.phone_area_code = fnd_api.g_miss_char
546: THEN
547: l_phone_rec.raw_phone_number := l_phone_rec.phone_number;
548: ELSE
549: l_phone_rec.raw_phone_number := l_phone_rec.phone_area_code || '-' ||
560: END IF;
561:
562: -- Populate transposed_phone_number
563: IF l_phone_rec.phone_country_code IS NOT NULL AND
564: l_phone_rec.phone_country_code <> fnd_api.g_miss_char
565: THEN
566: l_transposed_phone_number := l_phone_rec.phone_country_code;
567: END IF;
568:
566: l_transposed_phone_number := l_phone_rec.phone_country_code;
567: END IF;
568:
569: IF l_phone_rec.phone_area_code IS NOT NULL AND
570: l_phone_rec.phone_area_code <> fnd_api.g_miss_char
571: THEN
572: l_transposed_phone_number := l_transposed_phone_number ||
573: l_phone_rec.phone_area_code;
574: END IF;
601: -- For non-profile entities, the concept of select/de-select data sources is obsoleted.
602: -- There is no need to check if the data-source is selected.
603:
604: IF p_contact_point_rec.status IS NULL OR
605: p_contact_point_rec.status = fnd_api.g_miss_char OR
606: p_contact_point_rec.status = 'A'
607: THEN
608: IF p_contact_point_rec.primary_flag = 'Y' THEN
609: -- Bug 2197181: added for mix-n-match project
659: -- For non-profile entities, the concept of select/de-select data sources is obsoleted.
660: -- There is no need to check if the data-source is selected.
661:
662: IF p_contact_point_rec.contact_point_purpose IS NOT NULL AND
663: p_contact_point_rec.contact_point_purpose <> fnd_api.g_miss_char
664: THEN
665: IF p_contact_point_rec.primary_by_purpose = 'Y' THEN
666: -- Bug 2197181: added for mix-n-match project
667: -- IF g_cpt_is_datasource_selected = 'Y' THEN
678: p_contact_point_rec.primary_by_purpose := 'N';
679: END IF;
680:
681: if l_phone_rec.timezone_id is null or
682: l_phone_rec.timezone_id = fnd_api.g_miss_num
683: then
684:
685: if l_phone_rec.phone_country_code IS NOT NULL AND
686: l_phone_rec.phone_country_code <> fnd_api.g_miss_char
682: l_phone_rec.timezone_id = fnd_api.g_miss_num
683: then
684:
685: if l_phone_rec.phone_country_code IS NOT NULL AND
686: l_phone_rec.phone_country_code <> fnd_api.g_miss_char
687: then
688: l_message_count := fnd_msg_pub.count_msg();
689: hz_timezone_pub.get_phone_timezone_id(
690: p_api_version => 1.0,
687: then
688: l_message_count := fnd_msg_pub.count_msg();
689: hz_timezone_pub.get_phone_timezone_id(
690: p_api_version => 1.0,
691: p_init_msg_list => FND_API.G_FALSE,
692: p_phone_country_code => l_phone_rec.phone_country_code,
693: p_area_code => l_phone_rec.phone_area_code,
694: p_phone_prefix => null,
695: p_country_code => null,-- don't need to pass in this
696: x_timezone_id => l_phone_rec.timezone_id,
697: x_return_status => l_return_status ,
698: x_msg_count =>l_msg_count ,
699: x_msg_data => l_msg_data);
700: if l_return_status <> fnd_api.g_ret_sts_success
701: then -- we don't raise error
702: l_phone_rec.timezone_id := null;
703: FOR i IN 1..(l_msg_count - l_message_count) LOOP
704: fnd_msg_pub.delete_msg(l_msg_count - l_message_count + 1 - i);
702: l_phone_rec.timezone_id := null;
703: FOR i IN 1..(l_msg_count - l_message_count) LOOP
704: fnd_msg_pub.delete_msg(l_msg_count - l_message_count + 1 - i);
705: END LOOP;
706: l_return_status := FND_API.G_RET_STS_SUCCESS;
707: end if;
708: end if;
709: end if;
710:
802: -- Bug 2197181: commented out NOCOPY the data source checking. We will denormalize
803: -- to hz_parties as long as it's a primary contact point regardless of data
804: -- source.
805: IF p_contact_point_rec.status IS NULL OR
806: p_contact_point_rec.status = fnd_api.g_miss_char OR
807: p_contact_point_rec.status = 'A'
808: THEN
809: IF p_contact_point_rec.primary_flag = 'Y' AND
810: p_contact_point_rec.owner_table_name = 'HZ_PARTIES' AND
810: p_contact_point_rec.owner_table_name = 'HZ_PARTIES' AND
811: (p_contact_point_rec.contact_point_type IN ('WEB','EMAIL','PHONE'))
812: /* AND
813: (p_contact_point_rec.content_source_type IS NULL OR
814: p_contact_point_rec.content_source_type = fnd_api.g_miss_char OR
815: p_contact_point_rec.content_source_type =
816: hz_party_v2pub.g_miss_content_source_type)
817: */
818: THEN
815: p_contact_point_rec.content_source_type =
816: hz_party_v2pub.g_miss_content_source_type)
817: */
818: THEN
819: IF l_phone_rec.phone_line_type = fnd_api.g_miss_char then
820: l_phone_line_type := NULL;
821: ELSE
822: l_phone_line_type := l_phone_rec.phone_line_type;
823: END IF;
820: l_phone_line_type := NULL;
821: ELSE
822: l_phone_line_type := l_phone_rec.phone_line_type;
823: END IF;
824: IF l_phone_rec.phone_country_code = fnd_api.g_miss_char then
825: l_phone_country_code := NULL;
826: ELSE
827: l_phone_country_code := l_phone_rec.phone_country_code;
828: END IF;
825: l_phone_country_code := NULL;
826: ELSE
827: l_phone_country_code := l_phone_rec.phone_country_code;
828: END IF;
829: IF l_phone_rec.phone_area_code = fnd_api.g_miss_char then
830: l_phone_area_code := NULL;
831: ELSE
832: l_phone_area_code := l_phone_rec.phone_area_code;
833: END IF;
830: l_phone_area_code := NULL;
831: ELSE
832: l_phone_area_code := l_phone_rec.phone_area_code;
833: END IF;
834: IF l_phone_rec.phone_number = fnd_api.g_miss_char then
835: l_phone_number := NULL;
836: ELSE
837: l_phone_number := l_phone_rec.phone_number;
838: END IF;
835: l_phone_number := NULL;
836: ELSE
837: l_phone_number := l_phone_rec.phone_number;
838: END IF;
839: IF l_phone_rec.phone_extension = fnd_api.g_miss_char then
840: l_phone_extension := NULL;
841: ELSE
842: l_phone_extension := l_phone_rec.phone_extension;
843: END IF;
840: l_phone_extension := NULL;
841: ELSE
842: l_phone_extension := l_phone_rec.phone_extension;
843: END IF;
844: IF p_contact_point_rec.contact_point_purpose = fnd_api.g_miss_char then
845: l_contact_point_purpose := NULL;
846: ELSE
847: l_contact_point_purpose := p_contact_point_rec.contact_point_purpose;
848: END IF;
872: p_msg_level=>fnd_log.level_procedure);
873: END IF;
874:
875: if p_contact_point_rec.orig_system is not null
876: and p_contact_point_rec.orig_system <>fnd_api.g_miss_char
877: then
878: l_orig_sys_reference_rec.orig_system := p_contact_point_rec.orig_system;
879: l_orig_sys_reference_rec.orig_system_reference := p_contact_point_rec.orig_system_reference;
880: l_orig_sys_reference_rec.owner_table_name := 'HZ_CONTACT_POINTS';
881: l_orig_sys_reference_rec.owner_table_id := p_contact_point_rec.contact_point_id;
882: l_orig_sys_reference_rec.created_by_module := p_contact_point_rec.created_by_module;
883:
884: hz_orig_system_ref_pub.create_orig_system_reference(
885: FND_API.G_FALSE,
886: l_orig_sys_reference_rec,
887: x_return_status,
888: l_msg_count,
889: l_msg_data);
886: l_orig_sys_reference_rec,
887: x_return_status,
888: l_msg_count,
889: l_msg_data);
890: IF x_return_status <> fnd_api.g_ret_sts_success THEN
891: RAISE FND_API.G_EXC_ERROR;
892: END IF;
893: end if;
894:
887: x_return_status,
888: l_msg_count,
889: l_msg_data);
890: IF x_return_status <> fnd_api.g_ret_sts_success THEN
891: RAISE FND_API.G_EXC_ERROR;
892: END IF;
893: end if;
894:
895:
929: -- p_telex_rec Telex record.
930: -- p_web_rec Web record.
931: -- p_object_version_number Used for locking the being updated record.
932: -- x_return_status Return status after the call. The status can
933: -- be fnd_api.g_ret_sts_success (success),
934: -- fnd_api.g_ret_sts_error (error),
935: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
936: --
937: -- NOTES
930: -- p_web_rec Web record.
931: -- p_object_version_number Used for locking the being updated record.
932: -- x_return_status Return status after the call. The status can
933: -- be fnd_api.g_ret_sts_success (success),
934: -- fnd_api.g_ret_sts_error (error),
935: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
936: --
937: -- NOTES
938: --
931: -- p_object_version_number Used for locking the being updated record.
932: -- x_return_status Return status after the call. The status can
933: -- be fnd_api.g_ret_sts_success (success),
934: -- fnd_api.g_ret_sts_error (error),
935: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
936: --
937: -- NOTES
938: --
939: -- MODIFICATION HISTORY
945: -- validation procedures.
946: -- 06-JUL-2004 Rajib Ranjan Borah Bug 3711740. If phone_format returns
947: -- NULL for phone_area_code,phone_country_code
948: -- and/or phone_number, then set these to
949: -- FND_API.G_MISS_CHAR as otherwise, the old
950: -- value will be retained.
951: -- 01-03-2005 Rajib Ranjan Borah o SSM SST Integration and Extension.
952: -- For non-profile entities, the concept of
953: -- select/de-select data-sources is obsoleted.
1108: THEN
1109: fnd_message.set_name('AR', 'HZ_API_RECORD_CHANGED');
1110: fnd_message.set_token('TABLE', 'hz_contact_points');
1111: fnd_msg_pub.add;
1112: RAISE fnd_api.g_exc_error;
1113: END IF;
1114:
1115: p_object_version_number := NVL(l_object_version_number, 1) + 1;
1116:
1120: fnd_message.set_token('RECORD', 'contact point');
1121: fnd_message.set_token('VALUE',
1122: NVL(TO_CHAR(p_contact_point_rec.contact_point_id), 'null'));
1123: fnd_msg_pub.add;
1124: RAISE fnd_api.g_exc_error;
1125: END;
1126:
1127: -- Debug info.
1128: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1213: p_web_rec => l_web_rec,
1214: p_rowid => l_rowid,
1215: x_return_status => x_return_status);
1216:
1217: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1218: RAISE fnd_api.g_exc_error;
1219: END IF;
1220:
1221: hz_registry_validate_v2pub.validate_eft_contact_point (
1214: p_rowid => l_rowid,
1215: x_return_status => x_return_status);
1216:
1217: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1218: RAISE fnd_api.g_exc_error;
1219: END IF;
1220:
1221: hz_registry_validate_v2pub.validate_eft_contact_point (
1222: p_create_update_flag => 'U',
1225: p_rowid => l_rowid,
1226: x_return_status => x_return_status);
1227: END IF;
1228:
1229: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1230: RAISE fnd_api.g_exc_error;
1231: END IF;
1232:
1233: -- If raw_phone_number is passed in, call procedure phone_format.
1226: x_return_status => x_return_status);
1227: END IF;
1228:
1229: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1230: RAISE fnd_api.g_exc_error;
1231: END IF;
1232:
1233: -- If raw_phone_number is passed in, call procedure phone_format.
1234: -- either raw_phone_number or phone_number should be passed in
1242: -- actual_content_source are non-updateable columns.
1243:
1244: IF l_contact_point_type = 'PHONE' THEN
1245: IF l_phone_rec.phone_country_code IS NOT NULL THEN
1246: IF l_phone_rec.phone_country_code = fnd_api.g_miss_char THEN
1247: l_phone_country_code := NULL;
1248: ELSE
1249: l_phone_country_code := l_phone_rec.phone_country_code;
1250: END IF;
1250: END IF;
1251: END IF;
1252:
1253: IF l_phone_rec.phone_area_code IS NOT NULL THEN
1254: IF l_phone_rec.phone_area_code = fnd_api.g_miss_char THEN
1255: l_phone_area_code := NULL;
1256: ELSE
1257: l_phone_area_code := l_phone_rec.phone_area_code;
1258: END IF;
1258: END IF;
1259: END IF;
1260:
1261: IF l_phone_rec.phone_number IS NOT NULL THEN
1262: IF l_phone_rec.phone_number = fnd_api.g_miss_char THEN
1263: l_phone_number := NULL;
1264: ELSE
1265: l_phone_number := l_phone_rec.phone_number;
1266: END IF;
1266: END IF;
1267: END IF;
1268:
1269: IF l_phone_rec.raw_phone_number IS NOT NULL AND
1270: l_phone_rec.raw_phone_number <> fnd_api.g_miss_char THEN
1271:
1272: IF l_phone_rec.phone_country_code is not null AND
1273: l_phone_rec.phone_country_code <> fnd_api.g_miss_char
1274: THEN
1269: IF l_phone_rec.raw_phone_number IS NOT NULL AND
1270: l_phone_rec.raw_phone_number <> fnd_api.g_miss_char THEN
1271:
1272: IF l_phone_rec.phone_country_code is not null AND
1273: l_phone_rec.phone_country_code <> fnd_api.g_miss_char
1274: THEN
1275: BEGIN
1276: select territory_code into l_country_code
1277: from hz_phone_country_codes
1318: -- Raw Phone Number.
1319:
1320: /* Bug 3711740 */
1321: IF l_phone_rec.phone_area_code IS NULL THEN
1322: l_phone_rec.phone_area_code := fnd_api.g_miss_char;
1323: END IF;
1324:
1325: IF l_phone_rec.phone_number IS NULL THEN
1326: l_phone_rec.phone_number := fnd_api.g_miss_char;
1322: l_phone_rec.phone_area_code := fnd_api.g_miss_char;
1323: END IF;
1324:
1325: IF l_phone_rec.phone_number IS NULL THEN
1326: l_phone_rec.phone_number := fnd_api.g_miss_char;
1327: END IF;
1328:
1329: -- Bug 2197181 : content_source_type is obsolete and replaced by
1330: -- actual_content_source
1328:
1329: -- Bug 2197181 : content_source_type is obsolete and replaced by
1330: -- actual_content_source
1331:
1332: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1333: IF db_actual_content_source = g_miss_content_source_type
1334: THEN
1335: IF x_return_status = fnd_api.g_ret_sts_error THEN
1336: RAISE fnd_api.g_exc_error;
1331:
1332: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1333: IF db_actual_content_source = g_miss_content_source_type
1334: THEN
1335: IF x_return_status = fnd_api.g_ret_sts_error THEN
1336: RAISE fnd_api.g_exc_error;
1337: ELSE
1338: RAISE fnd_api.g_exc_unexpected_error;
1339: END IF;
1332: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1333: IF db_actual_content_source = g_miss_content_source_type
1334: THEN
1335: IF x_return_status = fnd_api.g_ret_sts_error THEN
1336: RAISE fnd_api.g_exc_error;
1337: ELSE
1338: RAISE fnd_api.g_exc_unexpected_error;
1339: END IF;
1340: ELSE
1334: THEN
1335: IF x_return_status = fnd_api.g_ret_sts_error THEN
1336: RAISE fnd_api.g_exc_error;
1337: ELSE
1338: RAISE fnd_api.g_exc_unexpected_error;
1339: END IF;
1340: ELSE
1341: FOR i IN 1..(l_msg_count - l_message_count) LOOP
1342: fnd_msg_pub.delete_msg(l_msg_count - l_message_count + 1 - i);
1340: ELSE
1341: FOR i IN 1..(l_msg_count - l_message_count) LOOP
1342: fnd_msg_pub.delete_msg(l_msg_count - l_message_count + 1 - i);
1343: END LOOP;
1344: x_return_status := fnd_api.g_ret_sts_success;
1345: END IF;
1346: ELSE
1347: l_phone_number := l_phone_rec.phone_number;
1348: l_phone_area_code := l_phone_rec.phone_area_code;
1349:
1350: IF l_phone_country_code IS NOT NULL THEN
1351: l_phone_rec.phone_country_code := l_phone_country_code;
1352: ELSE
1353: l_phone_rec.phone_country_code := FND_API.G_MISS_CHAR; /*Bug 3711740*/
1354: END IF;
1355: END IF;
1356: ELSE
1357: -- raw_phone_number must always have value.
1405: -- Cannot set an inactive contact point as primary. This validation
1406: -- has been checked in validate_contact_point procedure.
1407:
1408: -- Ignore the value of primary contact flag if the flag has been set
1409: -- to 'N' or fnd_api.g_miss_char by setting primary flag to NULL.
1410: -- User can not unset primary flag by passing value. To unset a
1411: -- primary contact, he/she needs to select another contact as priamry
1412: -- or set the current one to Inactive.
1413:
1411: -- primary contact, he/she needs to select another contact as priamry
1412: -- or set the current one to Inactive.
1413:
1414: IF p_contact_point_rec.primary_flag = 'N' OR
1415: p_contact_point_rec.primary_flag = fnd_api.g_miss_char
1416: THEN
1417: p_contact_point_rec.primary_flag := NULL;
1418: END IF;
1419:
1496: --BugNo:1695595.Initialized the local variables with the passed values after validations--
1497:
1498: l_contact_point_id:=p_contact_point_rec.contact_point_id;
1499:
1500: IF p_contact_point_rec.contact_point_purpose=FND_API.G_MISS_CHAR THEN
1501: l_contact_point_purpose := NULL;
1502: ELSIF p_contact_point_rec.contact_point_purpose IS NOT NULL THEN
1503: l_contact_point_purpose := p_contact_point_rec.contact_point_purpose;
1504: END IF;
1502: ELSIF p_contact_point_rec.contact_point_purpose IS NOT NULL THEN
1503: l_contact_point_purpose := p_contact_point_rec.contact_point_purpose;
1504: END IF;
1505:
1506: IF l_phone_rec.phone_line_type=FND_API.G_MISS_CHAR THEN
1507: l_phone_line_type :=NULL;
1508: ELSIF l_phone_rec.phone_line_type IS NOT NULL THEN
1509: l_phone_line_type := l_phone_rec.phone_line_type;
1510: END IF;
1508: ELSIF l_phone_rec.phone_line_type IS NOT NULL THEN
1509: l_phone_line_type := l_phone_rec.phone_line_type;
1510: END IF;
1511:
1512: IF l_phone_rec.phone_country_code=FND_API.G_MISS_CHAR THEN
1513: l_phone_country_code :=NULL;
1514: ELSIF l_phone_rec.phone_country_code IS NOT NULL THEN
1515: l_phone_country_code := l_phone_rec.phone_country_code;
1516: END IF;
1514: ELSIF l_phone_rec.phone_country_code IS NOT NULL THEN
1515: l_phone_country_code := l_phone_rec.phone_country_code;
1516: END IF;
1517:
1518: IF l_phone_rec.phone_area_code=FND_API.G_MISS_CHAR THEN
1519: l_phone_area_code :=NULL;
1520: ELSIF l_phone_rec.phone_area_code IS NOT NULL THEN
1521: l_phone_area_code := l_phone_rec.phone_area_code;
1522: END IF;
1520: ELSIF l_phone_rec.phone_area_code IS NOT NULL THEN
1521: l_phone_area_code := l_phone_rec.phone_area_code;
1522: END IF;
1523:
1524: IF l_phone_rec.phone_number=FND_API.G_MISS_CHAR THEN
1525: l_phone_number := NULL;
1526: ELSIF l_phone_rec.phone_number IS NOT NULL THEN
1527: l_phone_number := l_phone_rec.phone_number;
1528: END IF;
1526: ELSIF l_phone_rec.phone_number IS NOT NULL THEN
1527: l_phone_number := l_phone_rec.phone_number;
1528: END IF;
1529:
1530: IF l_phone_rec.phone_extension=FND_API.G_MISS_CHAR THEN
1531: l_phone_extension :=NULL;
1532: ELSIF l_phone_rec.phone_extension IS NOT NULL THEN
1533: l_phone_extension := l_phone_rec.phone_extension;
1534: END IF;
1650: -- For non-profile entities, the concept of select/de-select data-sources is obsoleted.
1651: -- There is no need to check if the data-source is selected.
1652:
1653: IF (p_contact_point_rec.contact_point_purpose IS NOT NULL AND
1654: p_contact_point_rec.contact_point_purpose <> fnd_api.g_miss_char) OR
1655: (p_contact_point_rec.contact_point_purpose IS NULL AND
1656: l_contact_point_purpose IS NOT NULL)
1657: THEN
1658: IF p_contact_point_rec.contact_point_purpose IS NOT NULL AND
1655: (p_contact_point_rec.contact_point_purpose IS NULL AND
1656: l_contact_point_purpose IS NOT NULL)
1657: THEN
1658: IF p_contact_point_rec.contact_point_purpose IS NOT NULL AND
1659: p_contact_point_rec.contact_point_purpose <> fnd_api.g_miss_char
1660: THEN
1661: l_contact_point_purpose := p_contact_point_rec.contact_point_purpose;
1662: END IF;
1663:
1685: p_contact_point_rec.primary_by_purpose := 'N';
1686: END IF;
1687:
1688: if (p_contact_point_rec.orig_system is not null
1689: and p_contact_point_rec.orig_system <>fnd_api.g_miss_char)
1690: and (p_contact_point_rec.orig_system_reference is not null
1691: and p_contact_point_rec.orig_system_reference <>fnd_api.g_miss_char)
1692: then
1693: p_contact_point_rec.orig_system_reference := null;
1687:
1688: if (p_contact_point_rec.orig_system is not null
1689: and p_contact_point_rec.orig_system <>fnd_api.g_miss_char)
1690: and (p_contact_point_rec.orig_system_reference is not null
1691: and p_contact_point_rec.orig_system_reference <>fnd_api.g_miss_char)
1692: then
1693: p_contact_point_rec.orig_system_reference := null;
1694: -- In mosr, we have bypassed osr nonupdateable validation
1695: -- but we should not update existing osr, set it to null
1855: END;
1856:
1857: -- Check during insert.
1858: IF p_contact_point_id IS NULL THEN
1859: l_contact_point_id := fnd_api.g_miss_num;
1860: ELSE
1861: l_contact_point_id := p_contact_point_id;
1862: END IF;
1863:
2062: END IF;
2063:
2064: -- Check during insert.
2065: IF p_contact_point_id IS NULL THEN
2066: l_contact_point_id := FND_API.G_MISS_NUM;
2067: ELSE
2068: l_contact_point_id := p_contact_point_id;
2069: END IF;
2070:
2177: --
2178: --
2179:
2180: PROCEDURE get_phone_format (
2181: p_raw_phone_number IN VARCHAR2 := fnd_api.g_miss_char,
2182: p_territory_code IN VARCHAR2 := fnd_api.g_miss_char,
2183: p_area_code IN VARCHAR2,
2184: x_phone_country_code OUT NOCOPY VARCHAR2,
2185: x_phone_format_style OUT NOCOPY VARCHAR2,
2178: --
2179:
2180: PROCEDURE get_phone_format (
2181: p_raw_phone_number IN VARCHAR2 := fnd_api.g_miss_char,
2182: p_territory_code IN VARCHAR2 := fnd_api.g_miss_char,
2183: p_area_code IN VARCHAR2,
2184: x_phone_country_code OUT NOCOPY VARCHAR2,
2185: x_phone_format_style OUT NOCOPY VARCHAR2,
2186: x_area_code_size OUT NOCOPY VARCHAR2,
2215: p_msg_level=>fnd_log.level_procedure);
2216: END IF;
2217:
2218: -- Initialize return variables
2219: x_phone_format_style := fnd_api.g_miss_char;
2220: x_phone_country_code := fnd_api.g_miss_char;
2221: x_include_country_code := FALSE;
2222:
2223: -- No territory code passed
2216: END IF;
2217:
2218: -- Initialize return variables
2219: x_phone_format_style := fnd_api.g_miss_char;
2220: x_phone_country_code := fnd_api.g_miss_char;
2221: x_include_country_code := FALSE;
2222:
2223: -- No territory code passed
2224: IF p_territory_code = fnd_api.g_miss_char THEN
2220: x_phone_country_code := fnd_api.g_miss_char;
2221: x_include_country_code := FALSE;
2222:
2223: -- No territory code passed
2224: IF p_territory_code = fnd_api.g_miss_char THEN
2225: x_msg := 'HZ_COUNTRY_CODE_NOT_DEFINED';
2226: RETURN;
2227: END IF;
2228:
2273: END LOOP;
2274: CLOSE c_formats;
2275:
2276: -- No appropriate format mask found
2277: IF x_phone_format_style = fnd_api.g_miss_char THEN
2278: x_msg := 'HZ_PHONE_FORMAT_NOT_DEFINED';
2279: END IF;
2280:
2281: -- Debug info.
2286: END IF;
2287:
2288: EXCEPTION
2289: WHEN OTHERS THEN
2290: RAISE fnd_api.g_exc_unexpected_error;
2291:
2292: END get_phone_format;
2293:
2294: --
2317: --
2318: --
2319:
2320: PROCEDURE translate_raw_phone_number (
2321: p_raw_phone_number IN VARCHAR2 := fnd_api.g_miss_char,
2322: p_phone_format_style IN VARCHAR2 := fnd_api.g_miss_char,
2323: p_area_code_size IN NUMBER := 0,
2324: x_formatted_phone_number OUT NOCOPY VARCHAR2,
2325: x_phone_area_code OUT NOCOPY VARCHAR2,
2318: --
2319:
2320: PROCEDURE translate_raw_phone_number (
2321: p_raw_phone_number IN VARCHAR2 := fnd_api.g_miss_char,
2322: p_phone_format_style IN VARCHAR2 := fnd_api.g_miss_char,
2323: p_area_code_size IN NUMBER := 0,
2324: x_formatted_phone_number OUT NOCOPY VARCHAR2,
2325: x_phone_area_code OUT NOCOPY VARCHAR2,
2326: x_phone_number OUT NOCOPY VARCHAR2
2384: --
2385: -- ARGUMENTS
2386: -- IN:
2387: -- p_init_msg_list Initialize message stack if it is set to
2388: -- FND_API.G_TRUE. Default is fnd_api.g_false.
2389: -- p_contact_point_id Contact point ID.
2390: -- IN/OUT:
2391: -- OUT:
2392: -- x_contact_point_rec Returned contact point record.
2396: -- x_phone_rec Returned phone record.
2397: -- x_telex_rec Returned telex record.
2398: -- x_web_rec Returned web record.
2399: -- x_return_status Return status after the call. The status can
2400: -- be fnd_api.g_ret_sts_success (success),
2401: -- fnd_api.g_ret_sts_error (error),
2402: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
2403: -- x_msg_count Number of messages in message stack.
2404: -- x_msg_data Message text if x_msg_count is 1.
2397: -- x_telex_rec Returned telex record.
2398: -- x_web_rec Returned web record.
2399: -- x_return_status Return status after the call. The status can
2400: -- be fnd_api.g_ret_sts_success (success),
2401: -- fnd_api.g_ret_sts_error (error),
2402: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
2403: -- x_msg_count Number of messages in message stack.
2404: -- x_msg_data Message text if x_msg_count is 1.
2405: --
2398: -- x_web_rec Returned web record.
2399: -- x_return_status Return status after the call. The status can
2400: -- be fnd_api.g_ret_sts_success (success),
2401: -- fnd_api.g_ret_sts_error (error),
2402: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
2403: -- x_msg_count Number of messages in message stack.
2404: -- x_msg_data Message text if x_msg_count is 1.
2405: --
2406: -- NOTES
2414: -- enhanced backward compatibility.
2415: --
2416:
2417: PROCEDURE get_contact_point_main (
2418: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
2419: p_contact_point_id IN NUMBER,
2420: x_contact_point_rec OUT NOCOPY contact_point_rec_type,
2421: x_edi_rec OUT NOCOPY edi_rec_type,
2422: x_eft_rec OUT NOCOPY eft_rec_type,
2441: p_msg_level=>fnd_log.level_procedure);
2442: END IF;
2443:
2444: -- Initialize message list if p_init_msg_list is set to TRUE.
2445: IF fnd_api.to_boolean(p_init_msg_list) THEN
2446: fnd_msg_pub.initialize;
2447: END IF;
2448:
2449: -- Initialize API return status to success.
2446: fnd_msg_pub.initialize;
2447: END IF;
2448:
2449: -- Initialize API return status to success.
2450: x_return_status := fnd_api.g_ret_sts_success;
2451:
2452: -- Check whether primary key has been passed in.
2453: IF p_contact_point_id IS NULL OR
2454: p_contact_point_id = fnd_api.g_miss_num THEN
2450: x_return_status := fnd_api.g_ret_sts_success;
2451:
2452: -- Check whether primary key has been passed in.
2453: IF p_contact_point_id IS NULL OR
2454: p_contact_point_id = fnd_api.g_miss_num THEN
2455: fnd_message.set_name('AR', 'HZ_API_MISSING_COLUMN');
2456: fnd_message.set_token('COLUMN', 'contact_point_id');
2457: fnd_msg_pub.add;
2458: RAISE fnd_api.g_exc_error;
2454: p_contact_point_id = fnd_api.g_miss_num THEN
2455: fnd_message.set_name('AR', 'HZ_API_MISSING_COLUMN');
2456: fnd_message.set_token('COLUMN', 'contact_point_id');
2457: fnd_msg_pub.add;
2458: RAISE fnd_api.g_exc_error;
2459: END IF;
2460:
2461: x_contact_point_rec.contact_point_id := p_contact_point_id;
2462:
2540: END IF;
2541:
2542: -- Standard call to get message count and if count is 1, get message info.
2543: fnd_msg_pub.count_and_get(
2544: p_encoded => fnd_api.g_false,
2545: p_count => x_msg_count,
2546: p_data => x_msg_data);
2547:
2548: -- Debug info.
2565: --
2566: -- ARGUMENTS
2567: -- IN:
2568: -- p_init_msg_list Initialize message stack if it is set to
2569: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
2570: -- p_contact_point_rec Contact point record.
2571: -- p_edi_rec EDI record.
2572: -- p_eft_rec EFT record.
2573: -- p_email_rec Email record.
2577: -- IN/OUT:
2578: -- OUT:
2579: -- x_contact_point_id Contact point ID.
2580: -- x_return_status Return status after the call. The status can
2581: -- be fnd_api.g_ret_sts_success (success),
2582: -- fnd_api.g_ret_sts_error (error),
2583: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
2584: -- x_msg_count Number of messages in message stack.
2585: -- x_msg_data Message text if x_msg_count is 1.
2578: -- OUT:
2579: -- x_contact_point_id Contact point ID.
2580: -- x_return_status Return status after the call. The status can
2581: -- be fnd_api.g_ret_sts_success (success),
2582: -- fnd_api.g_ret_sts_error (error),
2583: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
2584: -- x_msg_count Number of messages in message stack.
2585: -- x_msg_data Message text if x_msg_count is 1.
2586: --
2579: -- x_contact_point_id Contact point ID.
2580: -- x_return_status Return status after the call. The status can
2581: -- be fnd_api.g_ret_sts_success (success),
2582: -- fnd_api.g_ret_sts_error (error),
2583: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
2584: -- x_msg_count Number of messages in message stack.
2585: -- x_msg_data Message text if x_msg_count is 1.
2586: --
2587: -- NOTES
2597: -- For non-profile entities, the concept of
2598: -- select/de-select data-sources is obsoleted.
2599:
2600: PROCEDURE create_contact_point_main (
2601: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
2602: p_contact_point_rec IN contact_point_rec_type,
2603: p_edi_rec IN edi_rec_type := g_miss_edi_rec,
2604: p_eft_rec IN eft_rec_type := g_miss_eft_rec,
2605: p_email_rec IN email_rec_type := g_miss_email_rec,
2619: l_telex_rec telex_rec_type := p_telex_rec;
2620: l_web_rec web_rec_type := p_web_rec;
2621: l_eft_rec eft_rec_type := p_eft_rec;
2622:
2623: dss_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
2624: dss_msg_count NUMBER := 0;
2625: dss_msg_data VARCHAR2(2000):= null;
2626: l_test_security VARCHAR2(1):= 'F';
2627: l_debug_prefix VARCHAR2(30) := '';
2634: p_msg_level=>fnd_log.level_procedure);
2635: END IF;
2636:
2637: -- Initialize message list if p_init_msg_list is set to TRUE.
2638: IF fnd_api.to_boolean(p_init_msg_list) THEN
2639: fnd_msg_pub.initialize;
2640: END IF;
2641:
2642: -- Initialize API return status to success.
2639: fnd_msg_pub.initialize;
2640: END IF;
2641:
2642: -- Initialize API return status to success.
2643: x_return_status := fnd_api.g_ret_sts_success;
2644:
2645: -- Bug 2197181: added for mix-n-match project. first load data
2646: -- sources for this entity. Then assign the actual_content_source
2647: -- to the real data source. The value of content_source_type is
2672: p_actual_content_source => l_contact_point_rec.actual_content_source,
2673: x_is_datasource_selected => g_cpt_is_datasource_selected,
2674: x_return_status => x_return_status );
2675:
2676: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2677: RAISE FND_API.G_EXC_ERROR;
2678: END IF;
2679:
2680: -- Call to business logic.
2673: x_is_datasource_selected => g_cpt_is_datasource_selected,
2674: x_return_status => x_return_status );
2675:
2676: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2677: RAISE FND_API.G_EXC_ERROR;
2678: END IF;
2679:
2680: -- Call to business logic.
2681: do_create_contact_point(l_contact_point_rec,
2704: x_return_status => dss_return_status,
2705: x_msg_count => dss_msg_count,
2706: x_msg_data => dss_msg_data);
2707:
2708: if dss_return_status <> fnd_api.g_ret_sts_success THEN
2709: RAISE FND_API.G_EXC_ERROR;
2710: end if;
2711:
2712: if (l_test_security <> 'T' OR l_test_security <> FND_API.G_TRUE) then
2705: x_msg_count => dss_msg_count,
2706: x_msg_data => dss_msg_data);
2707:
2708: if dss_return_status <> fnd_api.g_ret_sts_success THEN
2709: RAISE FND_API.G_EXC_ERROR;
2710: end if;
2711:
2712: if (l_test_security <> 'T' OR l_test_security <> FND_API.G_TRUE) then
2713: --
2708: if dss_return_status <> fnd_api.g_ret_sts_success THEN
2709: RAISE FND_API.G_EXC_ERROR;
2710: end if;
2711:
2712: if (l_test_security <> 'T' OR l_test_security <> FND_API.G_TRUE) then
2713: --
2714: -- Bug 3835601: replaced the dss message with a more user friendly message
2715: --
2716: FND_MESSAGE.SET_NAME('AR', 'HZ_DSS_NO_INSERT_PRIVILEGE');
2721: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',
2722: hz_dss_util_pub.get_display_name(null, 'PARTY_SITE_CONTACT_POINTS'));
2723: END IF;
2724: FND_MSG_PUB.ADD;
2725: RAISE FND_API.G_EXC_ERROR;
2726: end if;
2727: END IF;
2728:
2729: -- Invoke business event system.
2731: -- SSM SST Integration and Extension
2732: -- For non-profile entities, the concept of select/de-select data sources is obsoleted.
2733: -- There is no need to check if the data-source is selected.
2734:
2735: IF x_return_status = fnd_api.g_ret_sts_success /*AND
2736: -- Bug 2197181: Added below condition for Mix-n-Match
2737: g_cpt_is_datasource_selected = 'Y'*/
2738: THEN
2739: IF(HZ_UTILITY_V2PUB.G_EXECUTE_API_CALLOUTS in ('Y', 'EVENTS_ENABLED')) THEN
2754: END IF;
2755: -- Call to indicate contact point creation to DQM
2756: --Bug 4866187
2757: --Bug 5370799
2758: IF (p_contact_point_rec.orig_system IS NULL OR p_contact_point_rec.orig_system=FND_API.G_MISS_CHAR)
2759: THEN
2760: hz_dqm_sync.sync_contact_point(l_contact_point_rec.contact_point_id, 'C');
2761: END IF;
2762: END IF;
2762: END IF;
2763:
2764: -- Standard call to get message count and if count is 1, get message info.
2765: fnd_msg_pub.count_and_get(
2766: p_encoded => fnd_api.g_false,
2767: p_count => x_msg_count,
2768: p_data => x_msg_data);
2769:
2770: -- Debug info.
2786: --
2787: -- ARGUMENTS
2788: -- IN:
2789: -- p_init_msg_list Initialize message stack if it is set to
2790: -- FND_API.G_TRUE. Default is fnd_api.g_false.
2791: -- p_contact_point_rec Contact point record.
2792: -- p_edi_rec EDI record.
2793: -- p_email_rec Email record.
2794: -- p_phone_rec Phone record.
2798: -- IN/OUT:
2799: -- p_object_version_number Used for locking the being updated record.
2800: -- OUT:
2801: -- x_return_status Return status after the call. The status can
2802: -- be fnd_api.g_ret_sts_success (success),
2803: -- fnd_api.g_ret_sts_error (error),
2804: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
2805: -- x_msg_count Number of messages in message stack.
2806: -- x_msg_data Message text if x_msg_count is 1.
2799: -- p_object_version_number Used for locking the being updated record.
2800: -- OUT:
2801: -- x_return_status Return status after the call. The status can
2802: -- be fnd_api.g_ret_sts_success (success),
2803: -- fnd_api.g_ret_sts_error (error),
2804: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
2805: -- x_msg_count Number of messages in message stack.
2806: -- x_msg_data Message text if x_msg_count is 1.
2807: --
2800: -- OUT:
2801: -- x_return_status Return status after the call. The status can
2802: -- be fnd_api.g_ret_sts_success (success),
2803: -- fnd_api.g_ret_sts_error (error),
2804: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
2805: -- x_msg_count Number of messages in message stack.
2806: -- x_msg_data Message text if x_msg_count is 1.
2807: --
2808: -- NOTES
2819: -- not assign the old value before calling
2820: -- hz_timezone_pub.get_phone_timezone_id.
2821:
2822: PROCEDURE update_contact_point_main (
2823: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
2824: p_contact_point_rec IN contact_point_rec_type,
2825: p_edi_rec IN edi_rec_type := g_miss_edi_rec,
2826: p_eft_rec IN eft_rec_type := g_miss_eft_rec,
2827: p_email_rec IN email_rec_type := g_miss_email_rec,
2853: l_phone_area_code HZ_CONTACT_POINTS.phone_area_code%type;
2854:
2855: l_data_source_from VARCHAR2(30);
2856:
2857: dss_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
2858: dss_msg_count NUMBER := 0;
2859: dss_msg_data VARCHAR2(2000):= null;
2860: l_test_security VARCHAR2(1):= 'F';
2861:
2874: p_msg_level=>fnd_log.level_procedure);
2875: END IF;
2876:
2877: -- Initialize message list if p_init_msg_list is set to TRUE.
2878: IF fnd_api.to_boolean(p_init_msg_list) THEN
2879: fnd_msg_pub.initialize;
2880: END IF;
2881:
2882: -- Initialize API return status to success.
2879: fnd_msg_pub.initialize;
2880: END IF;
2881:
2882: -- Initialize API return status to success.
2883: x_return_status := fnd_api.g_ret_sts_success;
2884:
2885: -- if contact_point_id is not passed in, but orig system parameters are passed in
2886: -- get contact_point_id
2887:
2885: -- if contact_point_id is not passed in, but orig system parameters are passed in
2886: -- get contact_point_id
2887:
2888: IF (p_contact_point_rec.orig_system is not null
2889: and p_contact_point_rec.orig_system <>fnd_api.g_miss_char)
2890: and (p_contact_point_rec.orig_system_reference is not null
2891: and p_contact_point_rec.orig_system_reference <>fnd_api.g_miss_char)
2892: and (p_contact_point_rec.contact_point_id = FND_API.G_MISS_NUM or p_contact_point_rec.contact_point_id is null) THEN
2893: hz_orig_system_ref_pub.get_owner_table_id
2887:
2888: IF (p_contact_point_rec.orig_system is not null
2889: and p_contact_point_rec.orig_system <>fnd_api.g_miss_char)
2890: and (p_contact_point_rec.orig_system_reference is not null
2891: and p_contact_point_rec.orig_system_reference <>fnd_api.g_miss_char)
2892: and (p_contact_point_rec.contact_point_id = FND_API.G_MISS_NUM or p_contact_point_rec.contact_point_id is null) THEN
2893: hz_orig_system_ref_pub.get_owner_table_id
2894: (p_orig_system => p_contact_point_rec.orig_system,
2895: p_orig_system_reference => p_contact_point_rec.orig_system_reference,
2888: IF (p_contact_point_rec.orig_system is not null
2889: and p_contact_point_rec.orig_system <>fnd_api.g_miss_char)
2890: and (p_contact_point_rec.orig_system_reference is not null
2891: and p_contact_point_rec.orig_system_reference <>fnd_api.g_miss_char)
2892: and (p_contact_point_rec.contact_point_id = FND_API.G_MISS_NUM or p_contact_point_rec.contact_point_id is null) THEN
2893: hz_orig_system_ref_pub.get_owner_table_id
2894: (p_orig_system => p_contact_point_rec.orig_system,
2895: p_orig_system_reference => p_contact_point_rec.orig_system_reference,
2896: p_owner_table_name => 'HZ_CONTACT_POINTS',
2895: p_orig_system_reference => p_contact_point_rec.orig_system_reference,
2896: p_owner_table_name => 'HZ_CONTACT_POINTS',
2897: x_owner_table_id => l_contact_point_rec.contact_point_id,
2898: x_return_status => x_return_status);
2899: IF x_return_status <> fnd_api.g_ret_sts_success THEN
2900: RAISE FND_API.G_EXC_ERROR;
2901: END IF;
2902: END IF;
2903:
2896: p_owner_table_name => 'HZ_CONTACT_POINTS',
2897: x_owner_table_id => l_contact_point_rec.contact_point_id,
2898: x_return_status => x_return_status);
2899: IF x_return_status <> fnd_api.g_ret_sts_success THEN
2900: RAISE FND_API.G_EXC_ERROR;
2901: END IF;
2902: END IF;
2903:
2904:
2915: x_return_status => x_return_status,
2916: x_msg_count => x_msg_count,
2917: x_msg_data => x_msg_data);
2918:
2919: IF x_return_status = fnd_api.g_ret_sts_error THEN
2920: RAISE fnd_api.g_exc_error;
2921: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
2922: RAISE fnd_api.g_exc_unexpected_error;
2923: END IF;
2916: x_msg_count => x_msg_count,
2917: x_msg_data => x_msg_data);
2918:
2919: IF x_return_status = fnd_api.g_ret_sts_error THEN
2920: RAISE fnd_api.g_exc_error;
2921: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
2922: RAISE fnd_api.g_exc_unexpected_error;
2923: END IF;
2924:
2917: x_msg_data => x_msg_data);
2918:
2919: IF x_return_status = fnd_api.g_ret_sts_error THEN
2920: RAISE fnd_api.g_exc_error;
2921: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
2922: RAISE fnd_api.g_exc_unexpected_error;
2923: END IF;
2924:
2925: -- Bug 2486394 -Check if the DSS security is granted to the user
2918:
2919: IF x_return_status = fnd_api.g_ret_sts_error THEN
2920: RAISE fnd_api.g_exc_error;
2921: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
2922: RAISE fnd_api.g_exc_unexpected_error;
2923: END IF;
2924:
2925: -- Bug 2486394 -Check if the DSS security is granted to the user
2926: -- Bug 3818648: check dss profile before call test_instance
2938: x_return_status => dss_return_status,
2939: x_msg_count => dss_msg_count,
2940: x_msg_data => dss_msg_data);
2941:
2942: if dss_return_status <> fnd_api.g_ret_sts_success THEN
2943: RAISE FND_API.G_EXC_ERROR;
2944: end if;
2945:
2946: if (l_test_security <> 'T' OR l_test_security <> FND_API.G_TRUE) then
2939: x_msg_count => dss_msg_count,
2940: x_msg_data => dss_msg_data);
2941:
2942: if dss_return_status <> fnd_api.g_ret_sts_success THEN
2943: RAISE FND_API.G_EXC_ERROR;
2944: end if;
2945:
2946: if (l_test_security <> 'T' OR l_test_security <> FND_API.G_TRUE) then
2947: --
2942: if dss_return_status <> fnd_api.g_ret_sts_success THEN
2943: RAISE FND_API.G_EXC_ERROR;
2944: end if;
2945:
2946: if (l_test_security <> 'T' OR l_test_security <> FND_API.G_TRUE) then
2947: --
2948: -- Bug 3835601: replaced the dss message with a more user friendly message
2949: --
2950: FND_MESSAGE.SET_NAME('AR', 'HZ_DSS_NO_UPDATE_PRIVILEGE');
2955: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',
2956: hz_dss_util_pub.get_display_name(null, 'PARTY_SITE_CONTACT_POINTS'));
2957: END IF;
2958: FND_MSG_PUB.ADD;
2959: RAISE FND_API.G_EXC_ERROR;
2960: end if;
2961: END IF;
2962:
2963: -- Bug 2197181: added for mix-n-match project. first load data
2989: p_selected_datasources => g_cpt_selected_datasources,
2990: p_actual_content_source => l_old_contact_point_rec.actual_content_source );
2991: */
2992: if (l_phone_rec.phone_country_code IS NOT NULL
2993: and l_phone_rec.phone_country_code <> nvl(l_old_phone_rec.phone_country_code,fnd_api.g_miss_char))
2994: 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))
2995: then
2996: l_changed_flag := 'Y';
2997: end if;
2990: p_actual_content_source => l_old_contact_point_rec.actual_content_source );
2991: */
2992: if (l_phone_rec.phone_country_code IS NOT NULL
2993: and l_phone_rec.phone_country_code <> nvl(l_old_phone_rec.phone_country_code,fnd_api.g_miss_char))
2994: 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))
2995: then
2996: l_changed_flag := 'Y';
2997: end if;
2998:
2995: then
2996: l_changed_flag := 'Y';
2997: end if;
2998:
2999: if l_changed_flag = 'Y' and ( l_phone_rec.timezone_id is null or l_phone_rec.timezone_id = fnd_api.g_miss_num)
3000: then
3001: if l_phone_rec.phone_country_code IS NULL
3002: then
3003: l_phone_country_code := l_old_phone_rec.phone_country_code;
3013: end if;
3014: l_message_count := fnd_msg_pub.count_msg();
3015: hz_timezone_pub.get_phone_timezone_id(
3016: p_api_version => 1.0,
3017: p_init_msg_list => FND_API.G_FALSE,
3018: p_phone_country_code => l_phone_country_code,
3019: p_area_code => l_phone_area_code,
3020: p_phone_prefix => null,
3021: p_country_code => null,-- don't need to pass in this
3022: x_timezone_id => l_phone_rec.timezone_id,
3023: x_return_status => l_return_status ,
3024: x_msg_count =>l_msg_count ,
3025: x_msg_data => l_msg_data);
3026: if l_return_status <> fnd_api.g_ret_sts_success
3027: then -- we don't raise error
3028: l_phone_rec.timezone_id := fnd_api.g_miss_num;
3029: FOR i IN 1..(l_msg_count - l_message_count) LOOP
3030: fnd_msg_pub.delete_msg(l_msg_count - l_message_count + 1 - i);
3024: x_msg_count =>l_msg_count ,
3025: x_msg_data => l_msg_data);
3026: if l_return_status <> fnd_api.g_ret_sts_success
3027: then -- we don't raise error
3028: l_phone_rec.timezone_id := fnd_api.g_miss_num;
3029: FOR i IN 1..(l_msg_count - l_message_count) LOOP
3030: fnd_msg_pub.delete_msg(l_msg_count - l_message_count + 1 - i);
3031: END LOOP;
3032: l_return_status := FND_API.G_RET_STS_SUCCESS;
3028: l_phone_rec.timezone_id := fnd_api.g_miss_num;
3029: FOR i IN 1..(l_msg_count - l_message_count) LOOP
3030: fnd_msg_pub.delete_msg(l_msg_count - l_message_count + 1 - i);
3031: END LOOP;
3032: l_return_status := FND_API.G_RET_STS_SUCCESS;
3033: end if;
3034: end if;
3035:
3036: -- Call to business logic.
3044: l_web_rec,
3045: p_object_version_number,
3046: x_return_status);
3047:
3048: IF x_return_status = fnd_api.g_ret_sts_success THEN
3049: update_contact_point_search(l_old_contact_point_rec,
3050: l_old_phone_rec,
3051: l_phone_rec,
3052: l_old_email_rec,
3058: -- For non-profile entities, the concept of select/de-select data-sources is obsoleted.
3059: -- There is no need to check if the data-source is selected.
3060:
3061: -- Invoke business event system.
3062: IF x_return_status = fnd_api.g_ret_sts_success /*AND
3063: -- Bug 2197181: Added below condition for Mix-n-Match
3064: g_cpt_is_datasource_selected = 'Y'*/
3065: THEN
3066: l_old_contact_point_rec.orig_system := p_contact_point_rec.orig_system;
3093: END IF;
3094:
3095: -- Standard call to get message count and if count is 1, get message info.
3096: fnd_msg_pub.count_and_get(
3097: p_encoded => fnd_api.g_false,
3098: p_count => x_msg_count,
3099: p_data => x_msg_data);
3100:
3101: -- Debug info.
3120: --
3121: -- ARGUMENTS
3122: -- IN:
3123: -- p_init_msg_list Initialize message stack if it is set to
3124: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
3125: -- p_contact_point_rec Contact point record.
3126: -- p_edi_rec EDI record.
3127: -- p_email_rec Email record.
3128: -- p_phone_rec Phone record.
3131: -- IN/OUT:
3132: -- OUT:
3133: -- x_contact_point_id Contact point ID.
3134: -- x_return_status Return status after the call. The status can
3135: -- be fnd_api.g_ret_sts_success (success),
3136: -- fnd_api.g_ret_sts_error (error),
3137: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3138: -- x_msg_count Number of messages in message stack.
3139: -- x_msg_data Message text if x_msg_count is 1.
3132: -- OUT:
3133: -- x_contact_point_id Contact point ID.
3134: -- x_return_status Return status after the call. The status can
3135: -- be fnd_api.g_ret_sts_success (success),
3136: -- fnd_api.g_ret_sts_error (error),
3137: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3138: -- x_msg_count Number of messages in message stack.
3139: -- x_msg_data Message text if x_msg_count is 1.
3140: --
3133: -- x_contact_point_id Contact point ID.
3134: -- x_return_status Return status after the call. The status can
3135: -- be fnd_api.g_ret_sts_success (success),
3136: -- fnd_api.g_ret_sts_error (error),
3137: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3138: -- x_msg_count Number of messages in message stack.
3139: -- x_msg_data Message text if x_msg_count is 1.
3140: --
3141: -- NOTES
3151: -- contact point APIs.
3152: --
3153:
3154: PROCEDURE create_contact_point (
3155: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
3156: p_contact_point_rec IN contact_point_rec_type,
3157: p_edi_rec IN edi_rec_type := g_miss_edi_rec,
3158: p_email_rec IN email_rec_type := g_miss_email_rec,
3159: p_phone_rec IN phone_rec_type := g_miss_phone_rec,
3211: -- Check if API is called in debug mode. If yes, disable debug.
3212: --disable_debug;
3213:
3214: EXCEPTION
3215: WHEN fnd_api.g_exc_error THEN
3216: ROLLBACK TO create_contact_point;
3217: x_return_status := fnd_api.g_ret_sts_error;
3218:
3219: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3213:
3214: EXCEPTION
3215: WHEN fnd_api.g_exc_error THEN
3216: ROLLBACK TO create_contact_point;
3217: x_return_status := fnd_api.g_ret_sts_error;
3218:
3219: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3220: p_count => x_msg_count,
3221: p_data => x_msg_data);
3215: WHEN fnd_api.g_exc_error THEN
3216: ROLLBACK TO create_contact_point;
3217: x_return_status := fnd_api.g_ret_sts_error;
3218:
3219: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3220: p_count => x_msg_count,
3221: p_data => x_msg_data);
3222:
3223: -- Debug info.
3236:
3237: -- Check if API is called in debug mode. If yes, disable debug.
3238: --disable_debug;
3239:
3240: WHEN fnd_api.g_exc_unexpected_error THEN
3241: ROLLBACK TO create_contact_point;
3242: x_return_status := fnd_api.g_ret_sts_unexp_error;
3243:
3244: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3238: --disable_debug;
3239:
3240: WHEN fnd_api.g_exc_unexpected_error THEN
3241: ROLLBACK TO create_contact_point;
3242: x_return_status := fnd_api.g_ret_sts_unexp_error;
3243:
3244: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3245: p_count => x_msg_count,
3246: p_data => x_msg_data);
3240: WHEN fnd_api.g_exc_unexpected_error THEN
3241: ROLLBACK TO create_contact_point;
3242: x_return_status := fnd_api.g_ret_sts_unexp_error;
3243:
3244: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3245: p_count => x_msg_count,
3246: p_data => x_msg_data);
3247:
3248: -- Debug info.
3262: --disable_debug;
3263:
3264: WHEN OTHERS THEN
3265: ROLLBACK TO create_contact_point;
3266: x_return_status := fnd_api.g_ret_sts_unexp_error;
3267:
3268: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
3269: fnd_message.set_token('ERROR' ,SQLERRM);
3270: fnd_msg_pub.add;
3268: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
3269: fnd_message.set_token('ERROR' ,SQLERRM);
3270: fnd_msg_pub.add;
3271:
3272: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3273: p_count => x_msg_count,
3274: p_data => x_msg_data);
3275:
3276: -- Debug info.
3300: --
3301: -- ARGUMENTS
3302: -- IN:
3303: -- p_init_msg_list Initialize message stack if it is set to
3304: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
3305: -- p_contact_point_rec Contact point record.
3306: -- p_edi_rec EDI record.
3307: -- IN/OUT:
3308: -- OUT:
3307: -- IN/OUT:
3308: -- OUT:
3309: -- x_contact_point_id Contact point ID.
3310: -- x_return_status Return status after the call. The status can
3311: -- be fnd_api.g_ret_sts_success (success),
3312: -- fnd_api.g_ret_sts_error (error),
3313: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3314: -- x_msg_count Number of messages in message stack.
3315: -- x_msg_data Message text if x_msg_count is 1.
3308: -- OUT:
3309: -- x_contact_point_id Contact point ID.
3310: -- x_return_status Return status after the call. The status can
3311: -- be fnd_api.g_ret_sts_success (success),
3312: -- fnd_api.g_ret_sts_error (error),
3313: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3314: -- x_msg_count Number of messages in message stack.
3315: -- x_msg_data Message text if x_msg_count is 1.
3316: --
3309: -- x_contact_point_id Contact point ID.
3310: -- x_return_status Return status after the call. The status can
3311: -- be fnd_api.g_ret_sts_success (success),
3312: -- fnd_api.g_ret_sts_error (error),
3313: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3314: -- x_msg_count Number of messages in message stack.
3315: -- x_msg_data Message text if x_msg_count is 1.
3316: --
3317: -- NOTES
3326: -- contact point APIs.
3327: --
3328:
3329: PROCEDURE create_edi_contact_point (
3330: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
3331: p_contact_point_rec IN contact_point_rec_type,
3332: p_edi_rec IN edi_rec_type := g_miss_edi_rec,
3333: x_contact_point_id OUT NOCOPY NUMBER,
3334: x_return_status OUT NOCOPY VARCHAR2,
3378: -- Check if API is called in debug mode. If yes, disable debug.
3379: --disable_debug;
3380:
3381: EXCEPTION
3382: WHEN fnd_api.g_exc_error THEN
3383: ROLLBACK TO create_edi_contact_point;
3384: x_return_status := fnd_api.g_ret_sts_error;
3385:
3386: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3380:
3381: EXCEPTION
3382: WHEN fnd_api.g_exc_error THEN
3383: ROLLBACK TO create_edi_contact_point;
3384: x_return_status := fnd_api.g_ret_sts_error;
3385:
3386: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3387: p_count => x_msg_count,
3388: p_data => x_msg_data);
3382: WHEN fnd_api.g_exc_error THEN
3383: ROLLBACK TO create_edi_contact_point;
3384: x_return_status := fnd_api.g_ret_sts_error;
3385:
3386: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3387: p_count => x_msg_count,
3388: p_data => x_msg_data);
3389:
3390: -- Debug info.
3402:
3403: -- Check if API is called in debug mode. If yes, disable debug.
3404: --disable_debug;
3405:
3406: WHEN fnd_api.g_exc_unexpected_error THEN
3407: ROLLBACK TO create_edi_contact_point;
3408: x_return_status := fnd_api.g_ret_sts_unexp_error;
3409:
3410: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3404: --disable_debug;
3405:
3406: WHEN fnd_api.g_exc_unexpected_error THEN
3407: ROLLBACK TO create_edi_contact_point;
3408: x_return_status := fnd_api.g_ret_sts_unexp_error;
3409:
3410: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3411: p_count => x_msg_count,
3412: p_data => x_msg_data);
3406: WHEN fnd_api.g_exc_unexpected_error THEN
3407: ROLLBACK TO create_edi_contact_point;
3408: x_return_status := fnd_api.g_ret_sts_unexp_error;
3409:
3410: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3411: p_count => x_msg_count,
3412: p_data => x_msg_data);
3413:
3414: -- Debug info.
3428: --disable_debug;
3429:
3430: WHEN OTHERS THEN
3431: ROLLBACK TO create_edi_contact_point;
3432: x_return_status := fnd_api.g_ret_sts_unexp_error;
3433:
3434: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
3435: fnd_message.set_token('ERROR' ,SQLERRM);
3436: fnd_msg_pub.add;
3434: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
3435: fnd_message.set_token('ERROR' ,SQLERRM);
3436: fnd_msg_pub.add;
3437:
3438: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3439: p_count => x_msg_count,
3440: p_data => x_msg_data);
3441:
3442: -- Debug info.
3466: --
3467: -- ARGUMENTS
3468: -- IN:
3469: -- p_init_msg_list Initialize message stack if it is set to
3470: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
3471: -- p_contact_point_rec Contact point record.
3472: -- p_web_rec Web record.
3473: -- IN/OUT:
3474: -- OUT:
3473: -- IN/OUT:
3474: -- OUT:
3475: -- x_contact_point_id Contact point ID.
3476: -- x_return_status Return status after the call. The status can
3477: -- be fnd_api.g_ret_sts_success (success),
3478: -- fnd_api.g_ret_sts_error (error),
3479: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3480: -- x_msg_count Number of messages in message stack.
3481: -- x_msg_data Message text if x_msg_count is 1.
3474: -- OUT:
3475: -- x_contact_point_id Contact point ID.
3476: -- x_return_status Return status after the call. The status can
3477: -- be fnd_api.g_ret_sts_success (success),
3478: -- fnd_api.g_ret_sts_error (error),
3479: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3480: -- x_msg_count Number of messages in message stack.
3481: -- x_msg_data Message text if x_msg_count is 1.
3482: --
3475: -- x_contact_point_id Contact point ID.
3476: -- x_return_status Return status after the call. The status can
3477: -- be fnd_api.g_ret_sts_success (success),
3478: -- fnd_api.g_ret_sts_error (error),
3479: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3480: -- x_msg_count Number of messages in message stack.
3481: -- x_msg_data Message text if x_msg_count is 1.
3482: --
3483: -- NOTES
3492: -- contact point APIs.
3493: --
3494:
3495: PROCEDURE create_web_contact_point (
3496: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
3497: p_contact_point_rec IN contact_point_rec_type,
3498: p_web_rec IN web_rec_type := g_miss_web_rec,
3499: x_contact_point_id OUT NOCOPY NUMBER,
3500: x_return_status OUT NOCOPY VARCHAR2,
3544: -- Check if API is called in debug mode. If yes, disable debug.
3545: --disable_debug;
3546:
3547: EXCEPTION
3548: WHEN fnd_api.g_exc_error THEN
3549: ROLLBACK TO create_web_contact_point;
3550: x_return_status := fnd_api.g_ret_sts_error;
3551:
3552: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3546:
3547: EXCEPTION
3548: WHEN fnd_api.g_exc_error THEN
3549: ROLLBACK TO create_web_contact_point;
3550: x_return_status := fnd_api.g_ret_sts_error;
3551:
3552: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3553: p_count => x_msg_count,
3554: p_data => x_msg_data);
3548: WHEN fnd_api.g_exc_error THEN
3549: ROLLBACK TO create_web_contact_point;
3550: x_return_status := fnd_api.g_ret_sts_error;
3551:
3552: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3553: p_count => x_msg_count,
3554: p_data => x_msg_data);
3555:
3556: -- Debug info.
3568:
3569: -- Check if API is called in debug mode. If yes, disable debug.
3570: --disable_debug;
3571:
3572: WHEN fnd_api.g_exc_unexpected_error THEN
3573: ROLLBACK TO create_web_contact_point;
3574: x_return_status := fnd_api.g_ret_sts_unexp_error;
3575:
3576: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3570: --disable_debug;
3571:
3572: WHEN fnd_api.g_exc_unexpected_error THEN
3573: ROLLBACK TO create_web_contact_point;
3574: x_return_status := fnd_api.g_ret_sts_unexp_error;
3575:
3576: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3577: p_count => x_msg_count,
3578: p_data => x_msg_data);
3572: WHEN fnd_api.g_exc_unexpected_error THEN
3573: ROLLBACK TO create_web_contact_point;
3574: x_return_status := fnd_api.g_ret_sts_unexp_error;
3575:
3576: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3577: p_count => x_msg_count,
3578: p_data => x_msg_data);
3579:
3580: -- Debug info.
3594: --disable_debug;
3595:
3596: WHEN OTHERS THEN
3597: ROLLBACK TO create_web_contact_point;
3598: x_return_status := fnd_api.g_ret_sts_unexp_error;
3599:
3600: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
3601: fnd_message.set_token('ERROR' ,SQLERRM);
3602: fnd_msg_pub.add;
3600: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
3601: fnd_message.set_token('ERROR' ,SQLERRM);
3602: fnd_msg_pub.add;
3603:
3604: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3605: p_count => x_msg_count,
3606: p_data => x_msg_data);
3607:
3608: -- Debug info.
3632: --
3633: -- ARGUMENTS
3634: -- IN:
3635: -- p_init_msg_list Initialize message stack if it is set to
3636: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
3637: -- p_contact_point_rec Contact point record.
3638: -- p_eft_rec EFT record.
3639: -- IN/OUT:
3640: -- OUT:
3639: -- IN/OUT:
3640: -- OUT:
3641: -- x_contact_point_id Contact point ID.
3642: -- x_return_status Return status after the call. The status can
3643: -- be fnd_api.g_ret_sts_success (success),
3644: -- fnd_api.g_ret_sts_error (error),
3645: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3646: -- x_msg_count Number of messages in message stack.
3647: -- x_msg_data Message text if x_msg_count is 1.
3640: -- OUT:
3641: -- x_contact_point_id Contact point ID.
3642: -- x_return_status Return status after the call. The status can
3643: -- be fnd_api.g_ret_sts_success (success),
3644: -- fnd_api.g_ret_sts_error (error),
3645: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3646: -- x_msg_count Number of messages in message stack.
3647: -- x_msg_data Message text if x_msg_count is 1.
3648: --
3641: -- x_contact_point_id Contact point ID.
3642: -- x_return_status Return status after the call. The status can
3643: -- be fnd_api.g_ret_sts_success (success),
3644: -- fnd_api.g_ret_sts_error (error),
3645: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3646: -- x_msg_count Number of messages in message stack.
3647: -- x_msg_data Message text if x_msg_count is 1.
3648: --
3649: -- NOTES
3660: -- contact point APIs.
3661: --
3662:
3663: PROCEDURE create_eft_contact_point (
3664: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
3665: p_contact_point_rec IN contact_point_rec_type,
3666: p_eft_rec IN eft_rec_type := g_miss_eft_rec,
3667: x_contact_point_id OUT NOCOPY NUMBER,
3668: x_return_status OUT NOCOPY VARCHAR2,
3713: -- Check if API is called in debug mode. If yes, disable debug.
3714: --disable_debug;
3715:
3716: EXCEPTION
3717: WHEN fnd_api.g_exc_error THEN
3718: ROLLBACK TO create_eft_contact_point;
3719: x_return_status := fnd_api.g_ret_sts_error;
3720:
3721: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3715:
3716: EXCEPTION
3717: WHEN fnd_api.g_exc_error THEN
3718: ROLLBACK TO create_eft_contact_point;
3719: x_return_status := fnd_api.g_ret_sts_error;
3720:
3721: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3722: p_count => x_msg_count,
3723: p_data => x_msg_data);
3717: WHEN fnd_api.g_exc_error THEN
3718: ROLLBACK TO create_eft_contact_point;
3719: x_return_status := fnd_api.g_ret_sts_error;
3720:
3721: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3722: p_count => x_msg_count,
3723: p_data => x_msg_data);
3724:
3725: -- Debug info.
3737:
3738: -- Check if API is called in debug mode. If yes, disable debug.
3739: --disable_debug;
3740:
3741: WHEN fnd_api.g_exc_unexpected_error THEN
3742: ROLLBACK TO create_eft_contact_point;
3743: x_return_status := fnd_api.g_ret_sts_unexp_error;
3744:
3745: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3739: --disable_debug;
3740:
3741: WHEN fnd_api.g_exc_unexpected_error THEN
3742: ROLLBACK TO create_eft_contact_point;
3743: x_return_status := fnd_api.g_ret_sts_unexp_error;
3744:
3745: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3746: p_count => x_msg_count,
3747: p_data => x_msg_data);
3741: WHEN fnd_api.g_exc_unexpected_error THEN
3742: ROLLBACK TO create_eft_contact_point;
3743: x_return_status := fnd_api.g_ret_sts_unexp_error;
3744:
3745: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3746: p_count => x_msg_count,
3747: p_data => x_msg_data);
3748:
3749: -- Debug info.
3763: --disable_debug;
3764:
3765: WHEN OTHERS THEN
3766: ROLLBACK TO create_eft_contact_point;
3767: x_return_status := fnd_api.g_ret_sts_unexp_error;
3768:
3769: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
3770: fnd_message.set_token('ERROR' ,SQLERRM);
3771: fnd_msg_pub.add;
3769: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
3770: fnd_message.set_token('ERROR' ,SQLERRM);
3771: fnd_msg_pub.add;
3772:
3773: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3774: p_count => x_msg_count,
3775: p_data => x_msg_data);
3776:
3777: -- Debug info.
3801: --
3802: -- ARGUMENTS
3803: -- IN:
3804: -- p_init_msg_list Initialize message stack if it is set to
3805: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
3806: -- p_contact_point_rec Contact point record.
3807: -- p_phone_rec Phone record.
3808: -- IN/OUT:
3809: -- OUT:
3808: -- IN/OUT:
3809: -- OUT:
3810: -- x_contact_point_id Contact point ID.
3811: -- x_return_status Return status after the call. The status can
3812: -- be fnd_api.g_ret_sts_success (success),
3813: -- fnd_api.g_ret_sts_error (error),
3814: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3815: -- x_msg_count Number of messages in message stack.
3816: -- x_msg_data Message text if x_msg_count is 1.
3809: -- OUT:
3810: -- x_contact_point_id Contact point ID.
3811: -- x_return_status Return status after the call. The status can
3812: -- be fnd_api.g_ret_sts_success (success),
3813: -- fnd_api.g_ret_sts_error (error),
3814: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3815: -- x_msg_count Number of messages in message stack.
3816: -- x_msg_data Message text if x_msg_count is 1.
3817: --
3810: -- x_contact_point_id Contact point ID.
3811: -- x_return_status Return status after the call. The status can
3812: -- be fnd_api.g_ret_sts_success (success),
3813: -- fnd_api.g_ret_sts_error (error),
3814: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3815: -- x_msg_count Number of messages in message stack.
3816: -- x_msg_data Message text if x_msg_count is 1.
3817: --
3818: -- NOTES
3827: -- contact point APIs.
3828: --
3829:
3830: PROCEDURE create_phone_contact_point (
3831: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
3832: p_contact_point_rec IN contact_point_rec_type,
3833: p_phone_rec IN phone_rec_type := g_miss_phone_rec,
3834: x_contact_point_id OUT NOCOPY NUMBER,
3835: x_return_status OUT NOCOPY VARCHAR2,
3880: -- Check if API is called in debug mode. If yes, disable debug.
3881: --disable_debug;
3882:
3883: EXCEPTION
3884: WHEN fnd_api.g_exc_error THEN
3885: ROLLBACK TO create_phone_contact_point;
3886: x_return_status := fnd_api.g_ret_sts_error;
3887:
3888: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3882:
3883: EXCEPTION
3884: WHEN fnd_api.g_exc_error THEN
3885: ROLLBACK TO create_phone_contact_point;
3886: x_return_status := fnd_api.g_ret_sts_error;
3887:
3888: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3889: p_count => x_msg_count,
3890: p_data => x_msg_data);
3884: WHEN fnd_api.g_exc_error THEN
3885: ROLLBACK TO create_phone_contact_point;
3886: x_return_status := fnd_api.g_ret_sts_error;
3887:
3888: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3889: p_count => x_msg_count,
3890: p_data => x_msg_data);
3891:
3892: -- Debug info.
3904:
3905: -- Check if API is called in debug mode. If yes, disable debug.
3906: --disable_debug;
3907:
3908: WHEN fnd_api.g_exc_unexpected_error THEN
3909: ROLLBACK TO create_phone_contact_point;
3910: x_return_status := fnd_api.g_ret_sts_unexp_error;
3911:
3912: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3906: --disable_debug;
3907:
3908: WHEN fnd_api.g_exc_unexpected_error THEN
3909: ROLLBACK TO create_phone_contact_point;
3910: x_return_status := fnd_api.g_ret_sts_unexp_error;
3911:
3912: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3913: p_count => x_msg_count,
3914: p_data => x_msg_data);
3908: WHEN fnd_api.g_exc_unexpected_error THEN
3909: ROLLBACK TO create_phone_contact_point;
3910: x_return_status := fnd_api.g_ret_sts_unexp_error;
3911:
3912: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3913: p_count => x_msg_count,
3914: p_data => x_msg_data);
3915:
3916: -- Debug info.
3930: --disable_debug;
3931:
3932: WHEN OTHERS THEN
3933: ROLLBACK TO create_phone_contact_point;
3934: x_return_status := fnd_api.g_ret_sts_unexp_error;
3935:
3936: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
3937: fnd_message.set_token('ERROR' ,SQLERRM);
3938: fnd_msg_pub.add;
3936: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
3937: fnd_message.set_token('ERROR' ,SQLERRM);
3938: fnd_msg_pub.add;
3939:
3940: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3941: p_count => x_msg_count,
3942: p_data => x_msg_data);
3943:
3944: -- Debug info.
3968: --
3969: -- ARGUMENTS
3970: -- IN:
3971: -- p_init_msg_list Initialize message stack if it is set to
3972: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
3973: -- p_contact_point_rec Contact point record.
3974: -- p_telex_rec Telex record.
3975: -- IN/OUT:
3976: -- OUT:
3975: -- IN/OUT:
3976: -- OUT:
3977: -- x_contact_point_id Contact point ID.
3978: -- x_return_status Return status after the call. The status can
3979: -- be fnd_api.g_ret_sts_success (success),
3980: -- fnd_api.g_ret_sts_error (error),
3981: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3982: -- x_msg_count Number of messages in message stack.
3983: -- x_msg_data Message text if x_msg_count is 1.
3976: -- OUT:
3977: -- x_contact_point_id Contact point ID.
3978: -- x_return_status Return status after the call. The status can
3979: -- be fnd_api.g_ret_sts_success (success),
3980: -- fnd_api.g_ret_sts_error (error),
3981: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3982: -- x_msg_count Number of messages in message stack.
3983: -- x_msg_data Message text if x_msg_count is 1.
3984: --
3977: -- x_contact_point_id Contact point ID.
3978: -- x_return_status Return status after the call. The status can
3979: -- be fnd_api.g_ret_sts_success (success),
3980: -- fnd_api.g_ret_sts_error (error),
3981: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3982: -- x_msg_count Number of messages in message stack.
3983: -- x_msg_data Message text if x_msg_count is 1.
3984: --
3985: -- NOTES
3994: -- contact point APIs.
3995: --
3996:
3997: PROCEDURE create_telex_contact_point (
3998: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
3999: p_contact_point_rec IN contact_point_rec_type,
4000: p_telex_rec IN telex_rec_type := g_miss_telex_rec,
4001: x_contact_point_id OUT NOCOPY NUMBER,
4002: x_return_status OUT NOCOPY VARCHAR2,
4047: -- Check if API is called in debug mode. If yes, disable debug.
4048: --disable_debug;
4049:
4050: EXCEPTION
4051: WHEN fnd_api.g_exc_error THEN
4052: ROLLBACK TO create_telex_contact_point;
4053: x_return_status := fnd_api.g_ret_sts_error;
4054:
4055: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4049:
4050: EXCEPTION
4051: WHEN fnd_api.g_exc_error THEN
4052: ROLLBACK TO create_telex_contact_point;
4053: x_return_status := fnd_api.g_ret_sts_error;
4054:
4055: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4056: p_count => x_msg_count,
4057: p_data => x_msg_data);
4051: WHEN fnd_api.g_exc_error THEN
4052: ROLLBACK TO create_telex_contact_point;
4053: x_return_status := fnd_api.g_ret_sts_error;
4054:
4055: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4056: p_count => x_msg_count,
4057: p_data => x_msg_data);
4058:
4059: -- Debug info.
4071:
4072: -- Check if API is called in debug mode. If yes, disable debug.
4073: --disable_debug;
4074:
4075: WHEN fnd_api.g_exc_unexpected_error THEN
4076: ROLLBACK TO create_telex_contact_point;
4077: x_return_status := fnd_api.g_ret_sts_unexp_error;
4078:
4079: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4073: --disable_debug;
4074:
4075: WHEN fnd_api.g_exc_unexpected_error THEN
4076: ROLLBACK TO create_telex_contact_point;
4077: x_return_status := fnd_api.g_ret_sts_unexp_error;
4078:
4079: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4080: p_count => x_msg_count,
4081: p_data => x_msg_data);
4075: WHEN fnd_api.g_exc_unexpected_error THEN
4076: ROLLBACK TO create_telex_contact_point;
4077: x_return_status := fnd_api.g_ret_sts_unexp_error;
4078:
4079: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4080: p_count => x_msg_count,
4081: p_data => x_msg_data);
4082:
4083: -- Debug info.
4097: --disable_debug;
4098:
4099: WHEN OTHERS THEN
4100: ROLLBACK TO create_telex_contact_point;
4101: x_return_status := fnd_api.g_ret_sts_unexp_error;
4102:
4103: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
4104: fnd_message.set_token('ERROR' ,SQLERRM);
4105: fnd_msg_pub.add;
4103: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
4104: fnd_message.set_token('ERROR' ,SQLERRM);
4105: fnd_msg_pub.add;
4106:
4107: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4108: p_count => x_msg_count,
4109: p_data => x_msg_data);
4110:
4111: -- Debug info.
4135: --
4136: -- ARGUMENTS
4137: -- IN:
4138: -- p_init_msg_list Initialize message stack if it is set to
4139: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
4140: -- p_contact_point_rec Contact point record.
4141: -- p_email_rec Email record.
4142: -- IN/OUT:
4143: -- OUT:
4142: -- IN/OUT:
4143: -- OUT:
4144: -- x_contact_point_id Contact point ID.
4145: -- x_return_status Return status after the call. The status can
4146: -- be fnd_api.g_ret_sts_success (success),
4147: -- fnd_api.g_ret_sts_error (error),
4148: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4149: -- x_msg_count Number of messages in message stack.
4150: -- x_msg_data Message text if x_msg_count is 1.
4143: -- OUT:
4144: -- x_contact_point_id Contact point ID.
4145: -- x_return_status Return status after the call. The status can
4146: -- be fnd_api.g_ret_sts_success (success),
4147: -- fnd_api.g_ret_sts_error (error),
4148: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4149: -- x_msg_count Number of messages in message stack.
4150: -- x_msg_data Message text if x_msg_count is 1.
4151: --
4144: -- x_contact_point_id Contact point ID.
4145: -- x_return_status Return status after the call. The status can
4146: -- be fnd_api.g_ret_sts_success (success),
4147: -- fnd_api.g_ret_sts_error (error),
4148: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4149: -- x_msg_count Number of messages in message stack.
4150: -- x_msg_data Message text if x_msg_count is 1.
4151: --
4152: -- NOTES
4161: -- contact point APIs.
4162: --
4163:
4164: PROCEDURE create_email_contact_point (
4165: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
4166: p_contact_point_rec IN contact_point_rec_type,
4167: p_email_rec IN email_rec_type := g_miss_email_rec,
4168: x_contact_point_id OUT NOCOPY NUMBER,
4169: x_return_status OUT NOCOPY VARCHAR2,
4214: -- Check if API is called in debug mode. If yes, disable debug.
4215: --disable_debug;
4216:
4217: EXCEPTION
4218: WHEN fnd_api.g_exc_error THEN
4219: ROLLBACK TO create_email_contact_point;
4220: x_return_status := fnd_api.g_ret_sts_error;
4221:
4222: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4216:
4217: EXCEPTION
4218: WHEN fnd_api.g_exc_error THEN
4219: ROLLBACK TO create_email_contact_point;
4220: x_return_status := fnd_api.g_ret_sts_error;
4221:
4222: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4223: p_count => x_msg_count,
4224: p_data => x_msg_data);
4218: WHEN fnd_api.g_exc_error THEN
4219: ROLLBACK TO create_email_contact_point;
4220: x_return_status := fnd_api.g_ret_sts_error;
4221:
4222: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4223: p_count => x_msg_count,
4224: p_data => x_msg_data);
4225:
4226: -- Debug info.
4238:
4239: -- Check if API is called in debug mode. If yes, disable debug.
4240: --disable_debug;
4241:
4242: WHEN fnd_api.g_exc_unexpected_error THEN
4243: ROLLBACK TO create_email_contact_point;
4244: x_return_status := fnd_api.g_ret_sts_unexp_error;
4245:
4246: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4240: --disable_debug;
4241:
4242: WHEN fnd_api.g_exc_unexpected_error THEN
4243: ROLLBACK TO create_email_contact_point;
4244: x_return_status := fnd_api.g_ret_sts_unexp_error;
4245:
4246: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4247: p_count => x_msg_count,
4248: p_data => x_msg_data);
4242: WHEN fnd_api.g_exc_unexpected_error THEN
4243: ROLLBACK TO create_email_contact_point;
4244: x_return_status := fnd_api.g_ret_sts_unexp_error;
4245:
4246: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4247: p_count => x_msg_count,
4248: p_data => x_msg_data);
4249:
4250: -- Debug info.
4264: --disable_debug;
4265:
4266: WHEN OTHERS THEN
4267: ROLLBACK TO create_email_contact_point;
4268: x_return_status := fnd_api.g_ret_sts_unexp_error;
4269:
4270: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
4271: fnd_message.set_token('ERROR' ,SQLERRM);
4272: fnd_msg_pub.add;
4270: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
4271: fnd_message.set_token('ERROR' ,SQLERRM);
4272: fnd_msg_pub.add;
4273:
4274: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4275: p_count => x_msg_count,
4276: p_data => x_msg_data);
4277:
4278: -- Debug info.
4302: --
4303: -- ARGUMENTS
4304: -- IN:
4305: -- p_init_msg_list Initialize message stack if it is set to
4306: -- FND_API.G_TRUE. Default is fnd_api.g_false.
4307: -- p_contact_point_rec Contact point record.
4308: -- p_edi_rec EDI record.
4309: -- p_email_rec Email record.
4310: -- p_phone_rec Phone record.
4313: -- IN/OUT:
4314: -- p_object_version_number Used for locking the being updated record.
4315: -- OUT:
4316: -- x_return_status Return status after the call. The status can
4317: -- be fnd_api.g_ret_sts_success (success),
4318: -- fnd_api.g_ret_sts_error (error),
4319: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4320: -- x_msg_count Number of messages in message stack.
4321: -- x_msg_data Message text if x_msg_count is 1.
4314: -- p_object_version_number Used for locking the being updated record.
4315: -- OUT:
4316: -- x_return_status Return status after the call. The status can
4317: -- be fnd_api.g_ret_sts_success (success),
4318: -- fnd_api.g_ret_sts_error (error),
4319: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4320: -- x_msg_count Number of messages in message stack.
4321: -- x_msg_data Message text if x_msg_count is 1.
4322: --
4315: -- OUT:
4316: -- x_return_status Return status after the call. The status can
4317: -- be fnd_api.g_ret_sts_success (success),
4318: -- fnd_api.g_ret_sts_error (error),
4319: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4320: -- x_msg_count Number of messages in message stack.
4321: -- x_msg_data Message text if x_msg_count is 1.
4322: --
4323: -- NOTES
4333: -- contact point APIs.
4334: --
4335:
4336: PROCEDURE update_contact_point (
4337: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
4338: p_contact_point_rec IN contact_point_rec_type,
4339: p_edi_rec IN edi_rec_type := g_miss_edi_rec,
4340: p_email_rec IN email_rec_type := g_miss_email_rec,
4341: p_phone_rec IN phone_rec_type := g_miss_phone_rec,
4395: -- Check if API is called in debug mode. If yes, disable debug.
4396: --disable_debug;
4397:
4398: EXCEPTION
4399: WHEN fnd_api.g_exc_error THEN
4400: ROLLBACK TO update_contact_point;
4401: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
4402: x_return_status := fnd_api.g_ret_sts_error;
4403:
4398: EXCEPTION
4399: WHEN fnd_api.g_exc_error THEN
4400: ROLLBACK TO update_contact_point;
4401: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
4402: x_return_status := fnd_api.g_ret_sts_error;
4403:
4404: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4405: p_count => x_msg_count,
4406: p_data => x_msg_data);
4400: ROLLBACK TO update_contact_point;
4401: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
4402: x_return_status := fnd_api.g_ret_sts_error;
4403:
4404: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4405: p_count => x_msg_count,
4406: p_data => x_msg_data);
4407:
4408: -- Debug info.
4420:
4421: -- Check if API is called in debug mode. If yes, disable debug.
4422: --disable_debug;
4423:
4424: WHEN fnd_api.g_exc_unexpected_error THEN
4425: ROLLBACK TO update_contact_point;
4426: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
4427: x_return_status := fnd_api.g_ret_sts_unexp_error;
4428:
4423:
4424: WHEN fnd_api.g_exc_unexpected_error THEN
4425: ROLLBACK TO update_contact_point;
4426: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
4427: x_return_status := fnd_api.g_ret_sts_unexp_error;
4428:
4429: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4430: p_count => x_msg_count,
4431: p_data => x_msg_data);
4425: ROLLBACK TO update_contact_point;
4426: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
4427: x_return_status := fnd_api.g_ret_sts_unexp_error;
4428:
4429: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4430: p_count => x_msg_count,
4431: p_data => x_msg_data);
4432:
4433: -- Debug info.
4448:
4449: WHEN OTHERS THEN
4450: ROLLBACK TO update_contact_point;
4451: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
4452: x_return_status := fnd_api.g_ret_sts_unexp_error;
4453:
4454: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
4455: fnd_message.set_token('ERROR' ,SQLERRM);
4456: fnd_msg_pub.add;
4454: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
4455: fnd_message.set_token('ERROR' ,SQLERRM);
4456: fnd_msg_pub.add;
4457:
4458: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4459: p_count => x_msg_count,
4460: p_data => x_msg_data);
4461:
4462: -- Debug info.
4486: --
4487: -- ARGUMENTS
4488: -- IN:
4489: -- p_init_msg_list Initialize message stack if it is set to
4490: -- FND_API.G_TRUE. Default is fnd_api.g_false.
4491: -- p_contact_point_rec Contact point record.
4492: -- p_edi_rec EDI record.
4493: -- IN/OUT:
4494: -- p_object_version_number Used for locking the being updated record.
4493: -- IN/OUT:
4494: -- p_object_version_number Used for locking the being updated record.
4495: -- OUT:
4496: -- x_return_status Return status after the call. The status can
4497: -- be fnd_api.g_ret_sts_success (success),
4498: -- fnd_api.g_ret_sts_error (error),
4499: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4500: -- x_msg_count Number of messages in message stack.
4501: -- x_msg_data Message text if x_msg_count is 1.
4494: -- p_object_version_number Used for locking the being updated record.
4495: -- OUT:
4496: -- x_return_status Return status after the call. The status can
4497: -- be fnd_api.g_ret_sts_success (success),
4498: -- fnd_api.g_ret_sts_error (error),
4499: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4500: -- x_msg_count Number of messages in message stack.
4501: -- x_msg_data Message text if x_msg_count is 1.
4502: --
4495: -- OUT:
4496: -- x_return_status Return status after the call. The status can
4497: -- be fnd_api.g_ret_sts_success (success),
4498: -- fnd_api.g_ret_sts_error (error),
4499: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4500: -- x_msg_count Number of messages in message stack.
4501: -- x_msg_data Message text if x_msg_count is 1.
4502: --
4503: -- NOTES
4512: -- contact point APIs.
4513: --
4514:
4515: PROCEDURE update_edi_contact_point (
4516: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
4517: p_contact_point_rec IN contact_point_rec_type,
4518: p_edi_rec IN edi_rec_type := g_miss_edi_rec,
4519: p_object_version_number IN OUT NOCOPY NUMBER,
4520: x_return_status OUT NOCOPY VARCHAR2,
4563: -- Check if API is called in debug mode. If yes, disable debug.
4564: --disable_debug;
4565:
4566: EXCEPTION
4567: WHEN fnd_api.g_exc_error THEN
4568: ROLLBACK TO update_edi_contact_point;
4569: x_return_status := fnd_api.g_ret_sts_error;
4570:
4571: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4565:
4566: EXCEPTION
4567: WHEN fnd_api.g_exc_error THEN
4568: ROLLBACK TO update_edi_contact_point;
4569: x_return_status := fnd_api.g_ret_sts_error;
4570:
4571: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4572: p_count => x_msg_count,
4573: p_data => x_msg_data);
4567: WHEN fnd_api.g_exc_error THEN
4568: ROLLBACK TO update_edi_contact_point;
4569: x_return_status := fnd_api.g_ret_sts_error;
4570:
4571: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4572: p_count => x_msg_count,
4573: p_data => x_msg_data);
4574:
4575: -- Debug info.
4587:
4588: -- Check if API is called in debug mode. If yes, disable debug.
4589: --disable_debug;
4590:
4591: WHEN fnd_api.g_exc_unexpected_error THEN
4592: ROLLBACK TO update_edi_contact_point;
4593: x_return_status := fnd_api.g_ret_sts_unexp_error;
4594:
4595: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4589: --disable_debug;
4590:
4591: WHEN fnd_api.g_exc_unexpected_error THEN
4592: ROLLBACK TO update_edi_contact_point;
4593: x_return_status := fnd_api.g_ret_sts_unexp_error;
4594:
4595: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4596: p_count => x_msg_count,
4597: p_data => x_msg_data);
4591: WHEN fnd_api.g_exc_unexpected_error THEN
4592: ROLLBACK TO update_edi_contact_point;
4593: x_return_status := fnd_api.g_ret_sts_unexp_error;
4594:
4595: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4596: p_count => x_msg_count,
4597: p_data => x_msg_data);
4598:
4599: -- Debug info.
4613: --disable_debug;
4614:
4615: WHEN OTHERS THEN
4616: ROLLBACK TO update_edi_contact_point;
4617: x_return_status := fnd_api.g_ret_sts_unexp_error;
4618:
4619: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
4620: fnd_message.set_token('ERROR' ,SQLERRM);
4621: fnd_msg_pub.add;
4619: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
4620: fnd_message.set_token('ERROR' ,SQLERRM);
4621: fnd_msg_pub.add;
4622:
4623: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4624: p_count => x_msg_count,
4625: p_data => x_msg_data);
4626:
4627: -- Debug info.
4651: --
4652: -- ARGUMENTS
4653: -- IN:
4654: -- p_init_msg_list Initialize message stack if it is set to
4655: -- FND_API.G_TRUE. Default is fnd_api.g_false.
4656: -- p_contact_point_rec Contact point record.
4657: -- p_web_rec WEB record.
4658: -- IN/OUT:
4659: -- p_object_version_number Used for locking the being updated record.
4658: -- IN/OUT:
4659: -- p_object_version_number Used for locking the being updated record.
4660: -- OUT:
4661: -- x_return_status Return status after the call. The status can
4662: -- be fnd_api.g_ret_sts_success (success),
4663: -- fnd_api.g_ret_sts_error (error),
4664: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4665: -- x_msg_count Number of messages in message stack.
4666: -- x_msg_data Message text if x_msg_count is 1.
4659: -- p_object_version_number Used for locking the being updated record.
4660: -- OUT:
4661: -- x_return_status Return status after the call. The status can
4662: -- be fnd_api.g_ret_sts_success (success),
4663: -- fnd_api.g_ret_sts_error (error),
4664: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4665: -- x_msg_count Number of messages in message stack.
4666: -- x_msg_data Message text if x_msg_count is 1.
4667: --
4660: -- OUT:
4661: -- x_return_status Return status after the call. The status can
4662: -- be fnd_api.g_ret_sts_success (success),
4663: -- fnd_api.g_ret_sts_error (error),
4664: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4665: -- x_msg_count Number of messages in message stack.
4666: -- x_msg_data Message text if x_msg_count is 1.
4667: --
4668: -- NOTES
4677: -- contact point APIs.
4678: --
4679:
4680: PROCEDURE update_web_contact_point (
4681: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
4682: p_contact_point_rec IN contact_point_rec_type,
4683: p_web_rec IN web_rec_type := g_miss_web_rec,
4684: p_object_version_number IN OUT NOCOPY NUMBER,
4685: x_return_status OUT NOCOPY VARCHAR2,
4729: -- Check if API is called in debug mode. If yes, disable debug.
4730: --disable_debug;
4731:
4732: EXCEPTION
4733: WHEN fnd_api.g_exc_error THEN
4734: ROLLBACK TO update_web_contact_point;
4735: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
4736: x_return_status := fnd_api.g_ret_sts_error;
4737:
4732: EXCEPTION
4733: WHEN fnd_api.g_exc_error THEN
4734: ROLLBACK TO update_web_contact_point;
4735: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
4736: x_return_status := fnd_api.g_ret_sts_error;
4737:
4738: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4739: p_count => x_msg_count,
4740: p_data => x_msg_data);
4734: ROLLBACK TO update_web_contact_point;
4735: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
4736: x_return_status := fnd_api.g_ret_sts_error;
4737:
4738: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4739: p_count => x_msg_count,
4740: p_data => x_msg_data);
4741:
4742: -- Debug info.
4754:
4755: -- Check if API is called in debug mode. If yes, disable debug.
4756: --disable_debug;
4757:
4758: WHEN fnd_api.g_exc_unexpected_error THEN
4759: ROLLBACK TO update_web_contact_point;
4760: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
4761: x_return_status := fnd_api.g_ret_sts_unexp_error;
4762:
4757:
4758: WHEN fnd_api.g_exc_unexpected_error THEN
4759: ROLLBACK TO update_web_contact_point;
4760: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
4761: x_return_status := fnd_api.g_ret_sts_unexp_error;
4762:
4763: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4764: p_count => x_msg_count,
4765: p_data => x_msg_data);
4759: ROLLBACK TO update_web_contact_point;
4760: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
4761: x_return_status := fnd_api.g_ret_sts_unexp_error;
4762:
4763: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4764: p_count => x_msg_count,
4765: p_data => x_msg_data);
4766:
4767: -- Debug info.
4783:
4784: WHEN OTHERS THEN
4785: ROLLBACK TO update_web_contact_point;
4786: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
4787: x_return_status := fnd_api.g_ret_sts_unexp_error;
4788:
4789: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
4790: fnd_message.set_token('ERROR' ,SQLERRM);
4791: fnd_msg_pub.add;
4789: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
4790: fnd_message.set_token('ERROR' ,SQLERRM);
4791: fnd_msg_pub.add;
4792:
4793: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4794: p_count => x_msg_count,
4795: p_data => x_msg_data);
4796:
4797: -- Debug info.
4821: --
4822: -- ARGUMENTS
4823: -- IN:
4824: -- p_init_msg_list Initialize message stack if it is set to
4825: -- FND_API.G_TRUE. Default is fnd_api.g_false.
4826: -- p_contact_point_rec Contact point record.
4827: -- p_eft_rec EFT record.
4828: -- IN/OUT:
4829: -- p_object_version_number Used for locking the being updated record.
4828: -- IN/OUT:
4829: -- p_object_version_number Used for locking the being updated record.
4830: -- OUT:
4831: -- x_return_status Return status after the call. The status can
4832: -- be fnd_api.g_ret_sts_success (success),
4833: -- fnd_api.g_ret_sts_error (error),
4834: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4835: -- x_msg_count Number of messages in message stack.
4836: -- x_msg_data Message text if x_msg_count is 1.
4829: -- p_object_version_number Used for locking the being updated record.
4830: -- OUT:
4831: -- x_return_status Return status after the call. The status can
4832: -- be fnd_api.g_ret_sts_success (success),
4833: -- fnd_api.g_ret_sts_error (error),
4834: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4835: -- x_msg_count Number of messages in message stack.
4836: -- x_msg_data Message text if x_msg_count is 1.
4837: --
4830: -- OUT:
4831: -- x_return_status Return status after the call. The status can
4832: -- be fnd_api.g_ret_sts_success (success),
4833: -- fnd_api.g_ret_sts_error (error),
4834: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4835: -- x_msg_count Number of messages in message stack.
4836: -- x_msg_data Message text if x_msg_count is 1.
4837: --
4838: -- NOTES
4849: -- contact point APIs.
4850: --
4851:
4852: PROCEDURE update_eft_contact_point (
4853: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
4854: p_contact_point_rec IN contact_point_rec_type,
4855: p_eft_rec IN eft_rec_type := g_miss_eft_rec,
4856: p_object_version_number IN OUT NOCOPY NUMBER,
4857: x_return_status OUT NOCOPY VARCHAR2,
4901: -- Check if API is called in debug mode. If yes, disable debug.
4902: --disable_debug;
4903:
4904: EXCEPTION
4905: WHEN fnd_api.g_exc_error THEN
4906: ROLLBACK TO update_eft_contact_point;
4907: x_return_status := fnd_api.g_ret_sts_error;
4908:
4909: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4903:
4904: EXCEPTION
4905: WHEN fnd_api.g_exc_error THEN
4906: ROLLBACK TO update_eft_contact_point;
4907: x_return_status := fnd_api.g_ret_sts_error;
4908:
4909: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4910: p_count => x_msg_count,
4911: p_data => x_msg_data);
4905: WHEN fnd_api.g_exc_error THEN
4906: ROLLBACK TO update_eft_contact_point;
4907: x_return_status := fnd_api.g_ret_sts_error;
4908:
4909: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4910: p_count => x_msg_count,
4911: p_data => x_msg_data);
4912:
4913: -- Debug info.
4925:
4926: -- Check if API is called in debug mode. If yes, disable debug.
4927: --disable_debug;
4928:
4929: WHEN fnd_api.g_exc_unexpected_error THEN
4930: ROLLBACK TO update_eft_contact_point;
4931: x_return_status := fnd_api.g_ret_sts_unexp_error;
4932:
4933: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4927: --disable_debug;
4928:
4929: WHEN fnd_api.g_exc_unexpected_error THEN
4930: ROLLBACK TO update_eft_contact_point;
4931: x_return_status := fnd_api.g_ret_sts_unexp_error;
4932:
4933: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4934: p_count => x_msg_count,
4935: p_data => x_msg_data);
4929: WHEN fnd_api.g_exc_unexpected_error THEN
4930: ROLLBACK TO update_eft_contact_point;
4931: x_return_status := fnd_api.g_ret_sts_unexp_error;
4932:
4933: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4934: p_count => x_msg_count,
4935: p_data => x_msg_data);
4936:
4937: -- Debug info.
4951: --disable_debug;
4952:
4953: WHEN OTHERS THEN
4954: ROLLBACK TO update_eft_contact_point;
4955: x_return_status := fnd_api.g_ret_sts_unexp_error;
4956:
4957: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
4958: fnd_message.set_token('ERROR' ,SQLERRM);
4959: fnd_msg_pub.add;
4957: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
4958: fnd_message.set_token('ERROR' ,SQLERRM);
4959: fnd_msg_pub.add;
4960:
4961: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4962: p_count => x_msg_count,
4963: p_data => x_msg_data);
4964:
4965: -- Debug info.
4990: --
4991: -- ARGUMENTS
4992: -- IN:
4993: -- p_init_msg_list Initialize message stack if it is set to
4994: -- FND_API.G_TRUE. Default is fnd_api.g_false.
4995: -- p_contact_point_rec Contact point record.
4996: -- p_phone_rec Phone record.
4997: -- IN/OUT:
4998: -- p_object_version_number Used for locking the being updated record.
4997: -- IN/OUT:
4998: -- p_object_version_number Used for locking the being updated record.
4999: -- OUT:
5000: -- x_return_status Return status after the call. The status can
5001: -- be fnd_api.g_ret_sts_success (success),
5002: -- fnd_api.g_ret_sts_error (error),
5003: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
5004: -- x_msg_count Number of messages in message stack.
5005: -- x_msg_data Message text if x_msg_count is 1.
4998: -- p_object_version_number Used for locking the being updated record.
4999: -- OUT:
5000: -- x_return_status Return status after the call. The status can
5001: -- be fnd_api.g_ret_sts_success (success),
5002: -- fnd_api.g_ret_sts_error (error),
5003: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
5004: -- x_msg_count Number of messages in message stack.
5005: -- x_msg_data Message text if x_msg_count is 1.
5006: --
4999: -- OUT:
5000: -- x_return_status Return status after the call. The status can
5001: -- be fnd_api.g_ret_sts_success (success),
5002: -- fnd_api.g_ret_sts_error (error),
5003: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
5004: -- x_msg_count Number of messages in message stack.
5005: -- x_msg_data Message text if x_msg_count is 1.
5006: --
5007: -- NOTES
5016: -- contact point APIs.
5017: --
5018:
5019: PROCEDURE update_phone_contact_point (
5020: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
5021: p_contact_point_rec IN contact_point_rec_type,
5022: p_phone_rec IN phone_rec_type := g_miss_phone_rec,
5023: p_object_version_number IN OUT NOCOPY NUMBER,
5024: x_return_status OUT NOCOPY VARCHAR2,
5068: -- Check if API is called in debug mode. If yes, disable debug.
5069: --disable_debug;
5070:
5071: EXCEPTION
5072: WHEN fnd_api.g_exc_error THEN
5073: ROLLBACK TO update_phone_contact_point;
5074: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5075: x_return_status := fnd_api.g_ret_sts_error;
5076:
5071: EXCEPTION
5072: WHEN fnd_api.g_exc_error THEN
5073: ROLLBACK TO update_phone_contact_point;
5074: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5075: x_return_status := fnd_api.g_ret_sts_error;
5076:
5077: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5078: p_count => x_msg_count,
5079: p_data => x_msg_data);
5073: ROLLBACK TO update_phone_contact_point;
5074: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5075: x_return_status := fnd_api.g_ret_sts_error;
5076:
5077: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5078: p_count => x_msg_count,
5079: p_data => x_msg_data);
5080:
5081: -- Debug info.
5093:
5094: -- Check if API is called in debug mode. If yes, disable debug.
5095: --disable_debug;
5096:
5097: WHEN fnd_api.g_exc_unexpected_error THEN
5098: ROLLBACK TO update_phone_contact_point;
5099: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5100: x_return_status := fnd_api.g_ret_sts_unexp_error;
5101:
5096:
5097: WHEN fnd_api.g_exc_unexpected_error THEN
5098: ROLLBACK TO update_phone_contact_point;
5099: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5100: x_return_status := fnd_api.g_ret_sts_unexp_error;
5101:
5102: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5103: p_count => x_msg_count,
5104: p_data => x_msg_data);
5098: ROLLBACK TO update_phone_contact_point;
5099: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5100: x_return_status := fnd_api.g_ret_sts_unexp_error;
5101:
5102: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5103: p_count => x_msg_count,
5104: p_data => x_msg_data);
5105:
5106: -- Debug info.
5121:
5122: WHEN OTHERS THEN
5123: ROLLBACK TO update_phone_contact_point;
5124: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5125: x_return_status := fnd_api.g_ret_sts_unexp_error;
5126:
5127: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
5128: fnd_message.set_token('ERROR' ,SQLERRM);
5129: fnd_msg_pub.add;
5127: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
5128: fnd_message.set_token('ERROR' ,SQLERRM);
5129: fnd_msg_pub.add;
5130:
5131: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5132: p_count => x_msg_count,
5133: p_data => x_msg_data);
5134:
5135: -- Debug info.
5159: --
5160: -- ARGUMENTS
5161: -- IN:
5162: -- p_init_msg_list Initialize message stack if it is set to
5163: -- FND_API.G_TRUE. Default is fnd_api.g_false.
5164: -- p_contact_point_rec Contact point record.
5165: -- p_telex_rec Telex record.
5166: -- IN/OUT:
5167: -- p_object_version_number Used for locking the being updated record.
5166: -- IN/OUT:
5167: -- p_object_version_number Used for locking the being updated record.
5168: -- OUT:
5169: -- x_return_status Return status after the call. The status can
5170: -- be fnd_api.g_ret_sts_success (success),
5171: -- fnd_api.g_ret_sts_error (error),
5172: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
5173: -- x_msg_count Number of messages in message stack.
5174: -- x_msg_data Message text if x_msg_count is 1.
5167: -- p_object_version_number Used for locking the being updated record.
5168: -- OUT:
5169: -- x_return_status Return status after the call. The status can
5170: -- be fnd_api.g_ret_sts_success (success),
5171: -- fnd_api.g_ret_sts_error (error),
5172: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
5173: -- x_msg_count Number of messages in message stack.
5174: -- x_msg_data Message text if x_msg_count is 1.
5175: --
5168: -- OUT:
5169: -- x_return_status Return status after the call. The status can
5170: -- be fnd_api.g_ret_sts_success (success),
5171: -- fnd_api.g_ret_sts_error (error),
5172: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
5173: -- x_msg_count Number of messages in message stack.
5174: -- x_msg_data Message text if x_msg_count is 1.
5175: --
5176: -- NOTES
5185: -- contact point APIs.
5186: --
5187:
5188: PROCEDURE update_telex_contact_point (
5189: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
5190: p_contact_point_rec IN contact_point_rec_type,
5191: p_telex_rec IN telex_rec_type := g_miss_telex_rec,
5192: p_object_version_number IN OUT NOCOPY NUMBER,
5193: x_return_status OUT NOCOPY VARCHAR2,
5238: -- Check if API is called in debug mode. If yes, disable debug.
5239: --disable_debug;
5240:
5241: EXCEPTION
5242: WHEN fnd_api.g_exc_error THEN
5243: ROLLBACK TO update_telex_contact_point;
5244: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5245: x_return_status := fnd_api.g_ret_sts_error;
5246:
5241: EXCEPTION
5242: WHEN fnd_api.g_exc_error THEN
5243: ROLLBACK TO update_telex_contact_point;
5244: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5245: x_return_status := fnd_api.g_ret_sts_error;
5246:
5247: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5248: p_count => x_msg_count,
5249: p_data => x_msg_data);
5243: ROLLBACK TO update_telex_contact_point;
5244: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5245: x_return_status := fnd_api.g_ret_sts_error;
5246:
5247: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5248: p_count => x_msg_count,
5249: p_data => x_msg_data);
5250:
5251: -- Debug info.
5265:
5266: -- Check if API is called in debug mode. If yes, disable debug.
5267: --disable_debug;
5268:
5269: WHEN fnd_api.g_exc_unexpected_error THEN
5270: ROLLBACK TO update_telex_contact_point;
5271: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5272: x_return_status := fnd_api.g_ret_sts_unexp_error;
5273:
5268:
5269: WHEN fnd_api.g_exc_unexpected_error THEN
5270: ROLLBACK TO update_telex_contact_point;
5271: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5272: x_return_status := fnd_api.g_ret_sts_unexp_error;
5273:
5274: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5275: p_count => x_msg_count,
5276: p_data => x_msg_data);
5270: ROLLBACK TO update_telex_contact_point;
5271: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5272: x_return_status := fnd_api.g_ret_sts_unexp_error;
5273:
5274: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5275: p_count => x_msg_count,
5276: p_data => x_msg_data);
5277:
5278: -- Debug info.
5293:
5294: WHEN OTHERS THEN
5295: ROLLBACK TO update_telex_contact_point;
5296: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5297: x_return_status := fnd_api.g_ret_sts_unexp_error;
5298:
5299: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
5300: fnd_message.set_token('ERROR' ,SQLERRM);
5301: fnd_msg_pub.add;
5299: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
5300: fnd_message.set_token('ERROR' ,SQLERRM);
5301: fnd_msg_pub.add;
5302:
5303: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5304: p_count => x_msg_count,
5305: p_data => x_msg_data);
5306:
5307: -- Debug info.
5331: --
5332: -- ARGUMENTS
5333: -- IN:
5334: -- p_init_msg_list Initialize message stack if it is set to
5335: -- FND_API.G_TRUE. Default is fnd_api.g_false.
5336: -- p_contact_point_rec Contact point record.
5337: -- p_email_rec Email record.
5338: -- IN/OUT:
5339: -- p_object_version_number Used for locking the being updated record.
5338: -- IN/OUT:
5339: -- p_object_version_number Used for locking the being updated record.
5340: -- OUT:
5341: -- x_return_status Return status after the call. The status can
5342: -- be fnd_api.g_ret_sts_success (success),
5343: -- fnd_api.g_ret_sts_error (error),
5344: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
5345: -- x_msg_count Number of messages in message stack.
5346: -- x_msg_data Message text if x_msg_count is 1.
5339: -- p_object_version_number Used for locking the being updated record.
5340: -- OUT:
5341: -- x_return_status Return status after the call. The status can
5342: -- be fnd_api.g_ret_sts_success (success),
5343: -- fnd_api.g_ret_sts_error (error),
5344: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
5345: -- x_msg_count Number of messages in message stack.
5346: -- x_msg_data Message text if x_msg_count is 1.
5347: --
5340: -- OUT:
5341: -- x_return_status Return status after the call. The status can
5342: -- be fnd_api.g_ret_sts_success (success),
5343: -- fnd_api.g_ret_sts_error (error),
5344: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
5345: -- x_msg_count Number of messages in message stack.
5346: -- x_msg_data Message text if x_msg_count is 1.
5347: --
5348: -- NOTES
5357: -- contact point APIs.
5358: --
5359:
5360: PROCEDURE update_email_contact_point (
5361: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
5362: p_contact_point_rec IN contact_point_rec_type,
5363: p_email_rec IN email_rec_type := g_miss_email_rec,
5364: p_object_version_number IN OUT NOCOPY NUMBER,
5365: x_return_status OUT NOCOPY VARCHAR2,
5409: -- Check if API is called in debug mode. If yes, disable debug.
5410: --disable_debug;
5411:
5412: EXCEPTION
5413: WHEN fnd_api.g_exc_error THEN
5414: ROLLBACK TO update_email_contact_point;
5415: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5416: x_return_status := fnd_api.g_ret_sts_error;
5417:
5412: EXCEPTION
5413: WHEN fnd_api.g_exc_error THEN
5414: ROLLBACK TO update_email_contact_point;
5415: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5416: x_return_status := fnd_api.g_ret_sts_error;
5417:
5418: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5419: p_count => x_msg_count,
5420: p_data => x_msg_data);
5414: ROLLBACK TO update_email_contact_point;
5415: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5416: x_return_status := fnd_api.g_ret_sts_error;
5417:
5418: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5419: p_count => x_msg_count,
5420: p_data => x_msg_data);
5421:
5422: -- Debug info.
5434:
5435: -- Check if API is called in debug mode. If yes, disable debug.
5436: --disable_debug;
5437:
5438: WHEN fnd_api.g_exc_unexpected_error THEN
5439: ROLLBACK TO update_email_contact_point;
5440: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5441: x_return_status := fnd_api.g_ret_sts_unexp_error;
5442:
5437:
5438: WHEN fnd_api.g_exc_unexpected_error THEN
5439: ROLLBACK TO update_email_contact_point;
5440: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5441: x_return_status := fnd_api.g_ret_sts_unexp_error;
5442:
5443: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5444: p_count => x_msg_count,
5445: p_data => x_msg_data);
5439: ROLLBACK TO update_email_contact_point;
5440: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5441: x_return_status := fnd_api.g_ret_sts_unexp_error;
5442:
5443: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5444: p_count => x_msg_count,
5445: p_data => x_msg_data);
5446:
5447: -- Debug info.
5462:
5463: WHEN OTHERS THEN
5464: ROLLBACK TO update_email_contact_point;
5465: HZ_UTILITY_V2PUB.G_UPDATE_ACS := NULL;
5466: x_return_status := fnd_api.g_ret_sts_unexp_error;
5467:
5468: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
5469: fnd_message.set_token('ERROR' ,SQLERRM);
5470: fnd_msg_pub.add;
5468: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
5469: fnd_message.set_token('ERROR' ,SQLERRM);
5470: fnd_msg_pub.add;
5471:
5472: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5473: p_count => x_msg_count,
5474: p_data => x_msg_data);
5475:
5476: -- Debug info.
5500: --
5501: -- ARGUMENTS
5502: -- IN:
5503: -- p_init_msg_list Initialize message stack if it is set to
5504: -- FND_API.G_TRUE. Default is fnd_api.g_false.
5505: -- p_raw_phone_number Raw phone number.
5506: -- p_territory_code Territory code.
5507: -- IN/OUT:
5508: -- x_phone_country_code Phone country code.
5510: -- x_phone_number Phone number.
5511: -- OUT:
5512: -- x_formatted_phone_number Formatted phone number.
5513: -- x_return_status Return status after the call. The status can
5514: -- be fnd_api.g_ret_sts_success (success),
5515: -- fnd_api.g_ret_sts_error (error),
5516: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
5517: -- x_msg_count Number of messages in message stack.
5518: -- x_msg_data Message text if x_msg_count is 1.
5511: -- OUT:
5512: -- x_formatted_phone_number Formatted phone number.
5513: -- x_return_status Return status after the call. The status can
5514: -- be fnd_api.g_ret_sts_success (success),
5515: -- fnd_api.g_ret_sts_error (error),
5516: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
5517: -- x_msg_count Number of messages in message stack.
5518: -- x_msg_data Message text if x_msg_count is 1.
5519: --
5512: -- x_formatted_phone_number Formatted phone number.
5513: -- x_return_status Return status after the call. The status can
5514: -- be fnd_api.g_ret_sts_success (success),
5515: -- fnd_api.g_ret_sts_error (error),
5516: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
5517: -- x_msg_count Number of messages in message stack.
5518: -- x_msg_data Message text if x_msg_count is 1.
5519: --
5520: -- NOTES
5528: --
5529: --
5530:
5531: PROCEDURE phone_format (
5532: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
5533: p_raw_phone_number IN VARCHAR2 := fnd_api.g_miss_char,
5534: p_territory_code IN VARCHAR2 := fnd_api.g_miss_char,
5535: x_formatted_phone_number OUT NOCOPY VARCHAR2,
5536: x_phone_country_code IN OUT NOCOPY VARCHAR2,
5529: --
5530:
5531: PROCEDURE phone_format (
5532: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
5533: p_raw_phone_number IN VARCHAR2 := fnd_api.g_miss_char,
5534: p_territory_code IN VARCHAR2 := fnd_api.g_miss_char,
5535: x_formatted_phone_number OUT NOCOPY VARCHAR2,
5536: x_phone_country_code IN OUT NOCOPY VARCHAR2,
5537: x_phone_area_code IN OUT NOCOPY VARCHAR2,
5530:
5531: PROCEDURE phone_format (
5532: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
5533: p_raw_phone_number IN VARCHAR2 := fnd_api.g_miss_char,
5534: p_territory_code IN VARCHAR2 := fnd_api.g_miss_char,
5535: x_formatted_phone_number OUT NOCOPY VARCHAR2,
5536: x_phone_country_code IN OUT NOCOPY VARCHAR2,
5537: x_phone_area_code IN OUT NOCOPY VARCHAR2,
5538: x_phone_number IN OUT NOCOPY VARCHAR2,
5572: p_msg_level=>fnd_log.level_procedure);
5573: END IF;
5574:
5575: -- Initialize message list if p_init_msg_list is set to TRUE.
5576: IF fnd_api.to_boolean(p_init_msg_list) THEN
5577: fnd_msg_pub.initialize;
5578: END IF;
5579:
5580: -- Initialize API return status to success.
5577: fnd_msg_pub.initialize;
5578: END IF;
5579:
5580: -- Initialize API return status to success.
5581: x_return_status := fnd_api.g_ret_sts_success;
5582:
5583: -- Check if raw phone number is to be formatted
5584: IF p_raw_phone_number IS NOT NULL AND
5585: p_raw_phone_number <> fnd_api.g_miss_char THEN
5581: x_return_status := fnd_api.g_ret_sts_success;
5582:
5583: -- Check if raw phone number is to be formatted
5584: IF p_raw_phone_number IS NOT NULL AND
5585: p_raw_phone_number <> fnd_api.g_miss_char THEN
5586: l_format_raw_phone := TRUE;
5587: END IF;
5588:
5589: -- Or Check if the area_code/phone number combination is to be formatted
5587: END IF;
5588:
5589: -- Or Check if the area_code/phone number combination is to be formatted
5590: IF ((x_phone_number IS NOT NULL AND
5591: x_phone_number <> fnd_api.g_miss_char) OR
5592: (x_phone_area_code IS NOT NULL AND
5593: x_phone_area_code <> fnd_api.g_miss_char))
5594: THEN
5595: l_format_area_phone := TRUE;
5589: -- Or Check if the area_code/phone number combination is to be formatted
5590: IF ((x_phone_number IS NOT NULL AND
5591: x_phone_number <> fnd_api.g_miss_char) OR
5592: (x_phone_area_code IS NOT NULL AND
5593: x_phone_area_code <> fnd_api.g_miss_char))
5594: THEN
5595: l_format_area_phone := TRUE;
5596: END IF;
5597:
5601: (NOT l_format_raw_phone AND NOT l_format_area_phone)
5602: THEN
5603: fnd_message.set_name('AR', 'HZ_INVALID_PHONE_PARAMETER');
5604: fnd_msg_pub.add;
5605: RAISE fnd_api.g_exc_error;
5606: END IF;
5607:
5608: -- If not format a raw phone number, then create a raw phone
5609: -- number by appending the area code and phone number. This will
5612: IF l_format_raw_phone THEN
5613: l_raw_phone_number := p_raw_phone_number;
5614: ELSIF l_format_area_phone THEN
5615: IF x_phone_area_code IS NULL OR
5616: x_phone_area_code = fnd_api.g_miss_char THEN
5617: l_raw_phone_number := filter_phone_number(x_phone_number);
5618: ELSE
5619: l_raw_phone_number := filter_phone_number(x_phone_area_code ||
5620: x_phone_number);
5624: -- If Country code has been passed query the territory code for the
5625: -- country. If country code has not been passed, use territory_code.
5626:
5627: IF x_phone_country_code IS NOT NULL AND
5628: x_phone_country_code <> fnd_api.g_miss_char
5629: THEN
5630: OPEN c_territory(x_phone_country_code);
5631: FETCH c_territory INTO l_territory_code;
5632: IF c_territory%NOTFOUND THEN
5633: l_territory_code := NULL;
5634: END IF;
5635: CLOSE c_territory;
5636: ELSIF p_territory_code IS NOT NULL AND
5637: p_territory_code <> fnd_api.g_miss_char THEN
5638: l_territory_code := p_territory_code;
5639: ELSE
5640: l_territory_code := NULL;
5641: END IF;
5645: -- version 115.9 for Phone normalization and parsing project
5646:
5647: --Call to phone_parse to get parsed components
5648: HZ_FORMAT_PHONE_V2PUB.phone_parse (
5649: fnd_api.g_true ,
5650: l_raw_phone_number ,
5651: p_territory_code ,
5652: x_phone_country_code ,
5653: x_phone_area_code ,
5658: x_msg_data);
5659:
5660: --Parsed components are i/p to phone_display to get formateed number
5661: HZ_FORMAT_PHONE_V2PUB.phone_display(
5662: fnd_api.g_true ,
5663: p_territory_code,
5664: x_phone_country_code ,
5665: x_phone_area_code ,
5666: x_phone_number ,
5672: /* -- Cannot get territory code, error out NOCOPY
5673: | IF l_territory_code IS NULL THEN
5674: | fnd_message.set_name('AR', 'HZ_COUNTRY_CODE_NOT_DEFINED');
5675: | fnd_msg_pub.add;
5676: | RAISE fnd_api.g_exc_error;
5677: | END IF;
5678: |
5679: | -- Call subroutine to get the format style to be applied for the given
5680: | -- raw phone number and territory
5691: | -- Check for errors in identifying format style
5692: | IF l_msg_name IS NOT NULL THEN
5693: | fnd_message.set_name('AR', l_msg_name);
5694: | fnd_msg_pub.add;
5695: | RAISE fnd_api.g_exc_error;
5696: | END IF;
5697: |
5698: | -- Apply the format style and get translated number
5699: | translate_raw_phone_number (
5720: |
5721: | x_phone_country_code := l_phone_country_code; */
5722:
5723: -- Standard call to get message count and if count is 1, get message info.
5724: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5725: p_count => x_msg_count,
5726: p_data => x_msg_data);
5727:
5728: -- Debug info.
5741: -- Check if API is called in debug mode. If yes, disable debug.
5742: --disable_debug;
5743:
5744: EXCEPTION
5745: WHEN fnd_api.g_exc_error THEN
5746: x_return_status := fnd_api.g_ret_sts_error;
5747:
5748: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5749: p_count => x_msg_count,
5742: --disable_debug;
5743:
5744: EXCEPTION
5745: WHEN fnd_api.g_exc_error THEN
5746: x_return_status := fnd_api.g_ret_sts_error;
5747:
5748: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5749: p_count => x_msg_count,
5750: p_data => x_msg_data);
5744: EXCEPTION
5745: WHEN fnd_api.g_exc_error THEN
5746: x_return_status := fnd_api.g_ret_sts_error;
5747:
5748: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5749: p_count => x_msg_count,
5750: p_data => x_msg_data);
5751:
5752: -- Debug info.
5764:
5765: -- Check if API is called in debug mode. If yes, disable debug.
5766: --disable_debug;
5767:
5768: WHEN fnd_api.g_exc_unexpected_error THEN
5769: x_return_status := fnd_api.g_ret_sts_unexp_error;
5770:
5771: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5772: p_count => x_msg_count,
5765: -- Check if API is called in debug mode. If yes, disable debug.
5766: --disable_debug;
5767:
5768: WHEN fnd_api.g_exc_unexpected_error THEN
5769: x_return_status := fnd_api.g_ret_sts_unexp_error;
5770:
5771: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5772: p_count => x_msg_count,
5773: p_data => x_msg_data);
5767:
5768: WHEN fnd_api.g_exc_unexpected_error THEN
5769: x_return_status := fnd_api.g_ret_sts_unexp_error;
5770:
5771: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5772: p_count => x_msg_count,
5773: p_data => x_msg_data);
5774:
5775: -- Debug info.
5788: -- Check if API is called in debug mode. If yes, disable debug.
5789: --disable_debug;
5790:
5791: WHEN OTHERS THEN
5792: x_return_status := fnd_api.g_ret_sts_unexp_error;
5793:
5794: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
5795: fnd_message.set_token('ERROR' ,SQLERRM);
5796: fnd_msg_pub.add;
5794: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
5795: fnd_message.set_token('ERROR' ,SQLERRM);
5796: fnd_msg_pub.add;
5797:
5798: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5799: p_count => x_msg_count,
5800: p_data => x_msg_data);
5801:
5802: -- Debug info.
5827: --
5828: -- ARGUMENTS
5829: -- IN:
5830: -- p_init_msg_list Initialize message stack if it is set to
5831: -- FND_API.G_TRUE. Default is fnd_api.g_false.
5832: -- p_contact_point_id Contact point ID.
5833: -- IN/OUT:
5834: -- OUT:
5835: -- x_contact_point_rec Returned contact point record.
5838: -- x_phone_rec Returned phone record.
5839: -- x_telex_rec Returned telex record.
5840: -- x_web_rec Returned web record.
5841: -- x_return_status Return status after the call. The status can
5842: -- be fnd_api.g_ret_sts_success (success),
5843: -- fnd_api.g_ret_sts_error (error),
5844: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
5845: -- x_msg_count Number of messages in message stack.
5846: -- x_msg_data Message text if x_msg_count is 1.
5839: -- x_telex_rec Returned telex record.
5840: -- x_web_rec Returned web record.
5841: -- x_return_status Return status after the call. The status can
5842: -- be fnd_api.g_ret_sts_success (success),
5843: -- fnd_api.g_ret_sts_error (error),
5844: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
5845: -- x_msg_count Number of messages in message stack.
5846: -- x_msg_data Message text if x_msg_count is 1.
5847: --
5840: -- x_web_rec Returned web record.
5841: -- x_return_status Return status after the call. The status can
5842: -- be fnd_api.g_ret_sts_success (success),
5843: -- fnd_api.g_ret_sts_error (error),
5844: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
5845: -- x_msg_count Number of messages in message stack.
5846: -- x_msg_data Message text if x_msg_count is 1.
5847: --
5848: -- NOTES
5854: -- Bank Consolidation.
5855: --
5856:
5857: PROCEDURE get_contact_point_rec (
5858: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
5859: p_contact_point_id IN NUMBER,
5860: x_contact_point_rec OUT NOCOPY contact_point_rec_type,
5861: x_edi_rec OUT NOCOPY edi_rec_type,
5862: x_email_rec OUT NOCOPY email_rec_type,
5913: -- Check if API is called in debug mode. If yes, disable debug.
5914: --disable_debug;
5915:
5916: EXCEPTION
5917: WHEN fnd_api.g_exc_error THEN
5918: x_return_status := fnd_api.g_ret_sts_error;
5919:
5920: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5921: p_count => x_msg_count,
5914: --disable_debug;
5915:
5916: EXCEPTION
5917: WHEN fnd_api.g_exc_error THEN
5918: x_return_status := fnd_api.g_ret_sts_error;
5919:
5920: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5921: p_count => x_msg_count,
5922: p_data => x_msg_data);
5916: EXCEPTION
5917: WHEN fnd_api.g_exc_error THEN
5918: x_return_status := fnd_api.g_ret_sts_error;
5919:
5920: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5921: p_count => x_msg_count,
5922: p_data => x_msg_data);
5923:
5924: -- Debug info.
5936:
5937: -- Check if API is called in debug mode. If yes, disable debug.
5938: --disable_debug;
5939:
5940: WHEN fnd_api.g_exc_unexpected_error THEN
5941: x_return_status := fnd_api.g_ret_sts_unexp_error;
5942:
5943: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5944: p_count => x_msg_count,
5937: -- Check if API is called in debug mode. If yes, disable debug.
5938: --disable_debug;
5939:
5940: WHEN fnd_api.g_exc_unexpected_error THEN
5941: x_return_status := fnd_api.g_ret_sts_unexp_error;
5942:
5943: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5944: p_count => x_msg_count,
5945: p_data => x_msg_data);
5939:
5940: WHEN fnd_api.g_exc_unexpected_error THEN
5941: x_return_status := fnd_api.g_ret_sts_unexp_error;
5942:
5943: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5944: p_count => x_msg_count,
5945: p_data => x_msg_data);
5946:
5947: -- Debug info.
5960: -- Check if API is called in debug mode. If yes, disable debug.
5961: --disable_debug;
5962:
5963: WHEN OTHERS THEN
5964: x_return_status := fnd_api.g_ret_sts_unexp_error;
5965:
5966: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
5967: fnd_message.set_token('ERROR' ,SQLERRM);
5968: fnd_msg_pub.add;
5966: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
5967: fnd_message.set_token('ERROR' ,SQLERRM);
5968: fnd_msg_pub.add;
5969:
5970: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5971: p_count => x_msg_count,
5972: p_data => x_msg_data);
5973:
5974: -- Debug info.
5998: --
5999: -- ARGUMENTS
6000: -- IN:
6001: -- p_init_msg_list Initialize message stack if it is set to
6002: -- FND_API.G_TRUE. Default is fnd_api.g_false.
6003: -- p_contact_point_id Contact point ID.
6004: -- IN/OUT:
6005: -- OUT:
6006: -- x_contact_point_rec Returned contact point record.
6005: -- OUT:
6006: -- x_contact_point_rec Returned contact point record.
6007: -- x_edi_rec Returned EDI record.
6008: -- x_return_status Return status after the call. The status can
6009: -- be fnd_api.g_ret_sts_success (success),
6010: -- fnd_api.g_ret_sts_error (error),
6011: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
6012: -- x_msg_count Number of messages in message stack.
6013: -- x_msg_data Message text if x_msg_count is 1.
6006: -- x_contact_point_rec Returned contact point record.
6007: -- x_edi_rec Returned EDI record.
6008: -- x_return_status Return status after the call. The status can
6009: -- be fnd_api.g_ret_sts_success (success),
6010: -- fnd_api.g_ret_sts_error (error),
6011: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
6012: -- x_msg_count Number of messages in message stack.
6013: -- x_msg_data Message text if x_msg_count is 1.
6014: --
6007: -- x_edi_rec Returned EDI record.
6008: -- x_return_status Return status after the call. The status can
6009: -- be fnd_api.g_ret_sts_success (success),
6010: -- fnd_api.g_ret_sts_error (error),
6011: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
6012: -- x_msg_count Number of messages in message stack.
6013: -- x_msg_data Message text if x_msg_count is 1.
6014: --
6015: -- NOTES
6021: -- enhanced backward compatibility.
6022: --
6023:
6024: PROCEDURE get_edi_contact_point (
6025: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
6026: p_contact_point_id IN NUMBER,
6027: x_contact_point_rec OUT NOCOPY contact_point_rec_type,
6028: x_edi_rec OUT NOCOPY edi_rec_type,
6029: x_return_status OUT NOCOPY VARCHAR2,
6079: -- Check if API is called in debug mode. If yes, disable debug.
6080: --disable_debug;
6081:
6082: EXCEPTION
6083: WHEN fnd_api.g_exc_error THEN
6084: x_return_status := fnd_api.g_ret_sts_error;
6085:
6086: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6087: p_count => x_msg_count,
6080: --disable_debug;
6081:
6082: EXCEPTION
6083: WHEN fnd_api.g_exc_error THEN
6084: x_return_status := fnd_api.g_ret_sts_error;
6085:
6086: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6087: p_count => x_msg_count,
6088: p_data => x_msg_data);
6082: EXCEPTION
6083: WHEN fnd_api.g_exc_error THEN
6084: x_return_status := fnd_api.g_ret_sts_error;
6085:
6086: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6087: p_count => x_msg_count,
6088: p_data => x_msg_data);
6089:
6090: -- Debug info.
6102:
6103: -- Check if API is called in debug mode. If yes, disable debug.
6104: --disable_debug;
6105:
6106: WHEN fnd_api.g_exc_unexpected_error THEN
6107: x_return_status := fnd_api.g_ret_sts_unexp_error;
6108:
6109: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6110: p_count => x_msg_count,
6103: -- Check if API is called in debug mode. If yes, disable debug.
6104: --disable_debug;
6105:
6106: WHEN fnd_api.g_exc_unexpected_error THEN
6107: x_return_status := fnd_api.g_ret_sts_unexp_error;
6108:
6109: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6110: p_count => x_msg_count,
6111: p_data => x_msg_data);
6105:
6106: WHEN fnd_api.g_exc_unexpected_error THEN
6107: x_return_status := fnd_api.g_ret_sts_unexp_error;
6108:
6109: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6110: p_count => x_msg_count,
6111: p_data => x_msg_data);
6112:
6113: -- Debug info.
6126: -- Check if API is called in debug mode. If yes, disable debug.
6127: --disable_debug;
6128:
6129: WHEN OTHERS THEN
6130: x_return_status := fnd_api.g_ret_sts_unexp_error;
6131:
6132: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
6133: fnd_message.set_token('ERROR' ,SQLERRM);
6134: fnd_msg_pub.add;
6132: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
6133: fnd_message.set_token('ERROR' ,SQLERRM);
6134: fnd_msg_pub.add;
6135:
6136: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6137: p_count => x_msg_count,
6138: p_data => x_msg_data);
6139:
6140: -- Debug info.
6164: --
6165: -- ARGUMENTS
6166: -- IN:
6167: -- p_init_msg_list Initialize message stack if it is set to
6168: -- FND_API.G_TRUE. Default is fnd_api.g_false.
6169: -- p_contact_point_id Contact point ID.
6170: -- IN/OUT:
6171: -- OUT:
6172: -- x_contact_point_rec Returned contact point record.
6171: -- OUT:
6172: -- x_contact_point_rec Returned contact point record.
6173: -- x_eft_rec Returned EFT record.
6174: -- x_return_status Return status after the call. The status can
6175: -- be fnd_api.g_ret_sts_success (success),
6176: -- fnd_api.g_ret_sts_error (error),
6177: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
6178: -- x_msg_count Number of messages in message stack.
6179: -- x_msg_data Message text if x_msg_count is 1.
6172: -- x_contact_point_rec Returned contact point record.
6173: -- x_eft_rec Returned EFT record.
6174: -- x_return_status Return status after the call. The status can
6175: -- be fnd_api.g_ret_sts_success (success),
6176: -- fnd_api.g_ret_sts_error (error),
6177: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
6178: -- x_msg_count Number of messages in message stack.
6179: -- x_msg_data Message text if x_msg_count is 1.
6180: --
6173: -- x_eft_rec Returned EFT record.
6174: -- x_return_status Return status after the call. The status can
6175: -- be fnd_api.g_ret_sts_success (success),
6176: -- fnd_api.g_ret_sts_error (error),
6177: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
6178: -- x_msg_count Number of messages in message stack.
6179: -- x_msg_data Message text if x_msg_count is 1.
6180: --
6181: -- NOTES
6187: -- enhanced backward compatibility.
6188: --
6189:
6190: PROCEDURE get_eft_contact_point (
6191: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
6192: p_contact_point_id IN NUMBER,
6193: x_contact_point_rec OUT NOCOPY contact_point_rec_type,
6194: x_eft_rec OUT NOCOPY eft_rec_type,
6195: x_return_status OUT NOCOPY VARCHAR2,
6246: -- Check if API is called in debug mode. If yes, disable debug.
6247: --disable_debug;
6248:
6249: EXCEPTION
6250: WHEN fnd_api.g_exc_error THEN
6251: x_return_status := fnd_api.g_ret_sts_error;
6252:
6253: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6254: p_count => x_msg_count,
6247: --disable_debug;
6248:
6249: EXCEPTION
6250: WHEN fnd_api.g_exc_error THEN
6251: x_return_status := fnd_api.g_ret_sts_error;
6252:
6253: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6254: p_count => x_msg_count,
6255: p_data => x_msg_data);
6249: EXCEPTION
6250: WHEN fnd_api.g_exc_error THEN
6251: x_return_status := fnd_api.g_ret_sts_error;
6252:
6253: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6254: p_count => x_msg_count,
6255: p_data => x_msg_data);
6256:
6257: -- Debug info.
6269:
6270: -- Check if API is called in debug mode. If yes, disable debug.
6271: --disable_debug;
6272:
6273: WHEN fnd_api.g_exc_unexpected_error THEN
6274: x_return_status := fnd_api.g_ret_sts_unexp_error;
6275:
6276: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6277: p_count => x_msg_count,
6270: -- Check if API is called in debug mode. If yes, disable debug.
6271: --disable_debug;
6272:
6273: WHEN fnd_api.g_exc_unexpected_error THEN
6274: x_return_status := fnd_api.g_ret_sts_unexp_error;
6275:
6276: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6277: p_count => x_msg_count,
6278: p_data => x_msg_data);
6272:
6273: WHEN fnd_api.g_exc_unexpected_error THEN
6274: x_return_status := fnd_api.g_ret_sts_unexp_error;
6275:
6276: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6277: p_count => x_msg_count,
6278: p_data => x_msg_data);
6279:
6280: -- Debug info.
6293: -- Check if API is called in debug mode. If yes, disable debug.
6294: --disable_debug;
6295:
6296: WHEN OTHERS THEN
6297: x_return_status := fnd_api.g_ret_sts_unexp_error;
6298:
6299: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
6300: fnd_message.set_token('ERROR' ,SQLERRM);
6301: fnd_msg_pub.add;
6299: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
6300: fnd_message.set_token('ERROR' ,SQLERRM);
6301: fnd_msg_pub.add;
6302:
6303: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6304: p_count => x_msg_count,
6305: p_data => x_msg_data);
6306:
6307: -- Debug info.
6331: --
6332: -- ARGUMENTS
6333: -- IN:
6334: -- p_init_msg_list Initialize message stack if it is set to
6335: -- FND_API.G_TRUE. Default is fnd_api.g_false.
6336: -- p_contact_point_id Contact point ID.
6337: -- IN/OUT:
6338: -- OUT:
6339: -- x_contact_point_rec Returned contact point record.
6338: -- OUT:
6339: -- x_contact_point_rec Returned contact point record.
6340: -- x_web_rec Returned Web record.
6341: -- x_return_status Return status after the call. The status can
6342: -- be fnd_api.g_ret_sts_success (success),
6343: -- fnd_api.g_ret_sts_error (error),
6344: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
6345: -- x_msg_count Number of messages in message stack.
6346: -- x_msg_data Message text if x_msg_count is 1.
6339: -- x_contact_point_rec Returned contact point record.
6340: -- x_web_rec Returned Web record.
6341: -- x_return_status Return status after the call. The status can
6342: -- be fnd_api.g_ret_sts_success (success),
6343: -- fnd_api.g_ret_sts_error (error),
6344: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
6345: -- x_msg_count Number of messages in message stack.
6346: -- x_msg_data Message text if x_msg_count is 1.
6347: --
6340: -- x_web_rec Returned Web record.
6341: -- x_return_status Return status after the call. The status can
6342: -- be fnd_api.g_ret_sts_success (success),
6343: -- fnd_api.g_ret_sts_error (error),
6344: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
6345: -- x_msg_count Number of messages in message stack.
6346: -- x_msg_data Message text if x_msg_count is 1.
6347: --
6348: -- NOTES
6354: -- enhanced backward compatibility.
6355: --
6356:
6357: PROCEDURE get_web_contact_point (
6358: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
6359: p_contact_point_id IN NUMBER,
6360: x_contact_point_rec OUT NOCOPY contact_point_rec_type,
6361: x_web_rec OUT NOCOPY web_rec_type,
6362: x_return_status OUT NOCOPY VARCHAR2,
6413: -- Check if API is called in debug mode. If yes, disable debug.
6414: --disable_debug;
6415:
6416: EXCEPTION
6417: WHEN fnd_api.g_exc_error THEN
6418: x_return_status := fnd_api.g_ret_sts_error;
6419:
6420: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6421: p_count => x_msg_count,
6414: --disable_debug;
6415:
6416: EXCEPTION
6417: WHEN fnd_api.g_exc_error THEN
6418: x_return_status := fnd_api.g_ret_sts_error;
6419:
6420: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6421: p_count => x_msg_count,
6422: p_data => x_msg_data);
6416: EXCEPTION
6417: WHEN fnd_api.g_exc_error THEN
6418: x_return_status := fnd_api.g_ret_sts_error;
6419:
6420: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6421: p_count => x_msg_count,
6422: p_data => x_msg_data);
6423:
6424: -- Debug info.
6436:
6437: -- Check if API is called in debug mode. If yes, disable debug.
6438: --disable_debug;
6439:
6440: WHEN fnd_api.g_exc_unexpected_error THEN
6441: x_return_status := fnd_api.g_ret_sts_unexp_error;
6442:
6443: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6444: p_count => x_msg_count,
6437: -- Check if API is called in debug mode. If yes, disable debug.
6438: --disable_debug;
6439:
6440: WHEN fnd_api.g_exc_unexpected_error THEN
6441: x_return_status := fnd_api.g_ret_sts_unexp_error;
6442:
6443: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6444: p_count => x_msg_count,
6445: p_data => x_msg_data);
6439:
6440: WHEN fnd_api.g_exc_unexpected_error THEN
6441: x_return_status := fnd_api.g_ret_sts_unexp_error;
6442:
6443: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6444: p_count => x_msg_count,
6445: p_data => x_msg_data);
6446:
6447: -- Debug info.
6461: -- Check if API is called in debug mode. If yes, disable debug.
6462: --disable_debug;
6463:
6464: WHEN OTHERS THEN
6465: x_return_status := fnd_api.g_ret_sts_unexp_error;
6466:
6467: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
6468: fnd_message.set_token('ERROR' ,SQLERRM);
6469: fnd_msg_pub.add;
6467: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
6468: fnd_message.set_token('ERROR' ,SQLERRM);
6469: fnd_msg_pub.add;
6470:
6471: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6472: p_count => x_msg_count,
6473: p_data => x_msg_data);
6474:
6475: -- Debug info.
6499: --
6500: -- ARGUMENTS
6501: -- IN:
6502: -- p_init_msg_list Initialize message stack if it is set to
6503: -- FND_API.G_TRUE. Default is fnd_api.g_false.
6504: -- p_contact_point_id Contact point ID.
6505: -- IN/OUT:
6506: -- OUT:
6507: -- x_contact_point_rec Returned contact point record.
6506: -- OUT:
6507: -- x_contact_point_rec Returned contact point record.
6508: -- x_phone_rec Returned phone record.
6509: -- x_return_status Return status after the call. The status can
6510: -- be fnd_api.g_ret_sts_success (success),
6511: -- fnd_api.g_ret_sts_error (error),
6512: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
6513: -- x_msg_count Number of messages in message stack.
6514: -- x_msg_data Message text if x_msg_count is 1.
6507: -- x_contact_point_rec Returned contact point record.
6508: -- x_phone_rec Returned phone record.
6509: -- x_return_status Return status after the call. The status can
6510: -- be fnd_api.g_ret_sts_success (success),
6511: -- fnd_api.g_ret_sts_error (error),
6512: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
6513: -- x_msg_count Number of messages in message stack.
6514: -- x_msg_data Message text if x_msg_count is 1.
6515: --
6508: -- x_phone_rec Returned phone record.
6509: -- x_return_status Return status after the call. The status can
6510: -- be fnd_api.g_ret_sts_success (success),
6511: -- fnd_api.g_ret_sts_error (error),
6512: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
6513: -- x_msg_count Number of messages in message stack.
6514: -- x_msg_data Message text if x_msg_count is 1.
6515: --
6516: -- NOTES
6522: -- enhanced backward compatibility.
6523: --
6524:
6525: PROCEDURE get_phone_contact_point (
6526: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
6527: p_contact_point_id IN NUMBER,
6528: x_contact_point_rec OUT NOCOPY contact_point_rec_type,
6529: x_phone_rec OUT NOCOPY phone_rec_type,
6530: x_return_status OUT NOCOPY VARCHAR2,
6580: -- Check if API is called in debug mode. If yes, disable debug.
6581: --disable_debug;
6582:
6583: EXCEPTION
6584: WHEN fnd_api.g_exc_error THEN
6585: x_return_status := fnd_api.g_ret_sts_error;
6586:
6587: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6588: p_count => x_msg_count,
6581: --disable_debug;
6582:
6583: EXCEPTION
6584: WHEN fnd_api.g_exc_error THEN
6585: x_return_status := fnd_api.g_ret_sts_error;
6586:
6587: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6588: p_count => x_msg_count,
6589: p_data => x_msg_data);
6583: EXCEPTION
6584: WHEN fnd_api.g_exc_error THEN
6585: x_return_status := fnd_api.g_ret_sts_error;
6586:
6587: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6588: p_count => x_msg_count,
6589: p_data => x_msg_data);
6590:
6591: -- Debug info.
6603:
6604: -- Check if API is called in debug mode. If yes, disable debug.
6605: --disable_debug;
6606:
6607: WHEN fnd_api.g_exc_unexpected_error THEN
6608: x_return_status := fnd_api.g_ret_sts_unexp_error;
6609:
6610: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6611: p_count => x_msg_count,
6604: -- Check if API is called in debug mode. If yes, disable debug.
6605: --disable_debug;
6606:
6607: WHEN fnd_api.g_exc_unexpected_error THEN
6608: x_return_status := fnd_api.g_ret_sts_unexp_error;
6609:
6610: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6611: p_count => x_msg_count,
6612: p_data => x_msg_data);
6606:
6607: WHEN fnd_api.g_exc_unexpected_error THEN
6608: x_return_status := fnd_api.g_ret_sts_unexp_error;
6609:
6610: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6611: p_count => x_msg_count,
6612: p_data => x_msg_data);
6613:
6614: -- Debug info.
6627: -- Check if API is called in debug mode. If yes, disable debug.
6628: --disable_debug;
6629:
6630: WHEN OTHERS THEN
6631: x_return_status := fnd_api.g_ret_sts_unexp_error;
6632:
6633: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
6634: fnd_message.set_token('ERROR' ,SQLERRM);
6635: fnd_msg_pub.add;
6633: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
6634: fnd_message.set_token('ERROR' ,SQLERRM);
6635: fnd_msg_pub.add;
6636:
6637: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6638: p_count => x_msg_count,
6639: p_data => x_msg_data);
6640:
6641: -- Debug info.
6665: --
6666: -- ARGUMENTS
6667: -- IN:
6668: -- p_init_msg_list Initialize message stack if it is set to
6669: -- FND_API.G_TRUE. Default is fnd_api.g_false.
6670: -- p_contact_point_id Contact point ID.
6671: -- IN/OUT:
6672: -- OUT:
6673: -- x_contact_point_rec Returned contact point record.
6672: -- OUT:
6673: -- x_contact_point_rec Returned contact point record.
6674: -- x_telex_rec Returned telex record.
6675: -- x_return_status Return status after the call. The status can
6676: -- be fnd_api.g_ret_sts_success (success),
6677: -- fnd_api.g_ret_sts_error (error),
6678: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
6679: -- x_msg_count Number of messages in message stack.
6680: -- x_msg_data Message text if x_msg_count is 1.
6673: -- x_contact_point_rec Returned contact point record.
6674: -- x_telex_rec Returned telex record.
6675: -- x_return_status Return status after the call. The status can
6676: -- be fnd_api.g_ret_sts_success (success),
6677: -- fnd_api.g_ret_sts_error (error),
6678: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
6679: -- x_msg_count Number of messages in message stack.
6680: -- x_msg_data Message text if x_msg_count is 1.
6681: --
6674: -- x_telex_rec Returned telex record.
6675: -- x_return_status Return status after the call. The status can
6676: -- be fnd_api.g_ret_sts_success (success),
6677: -- fnd_api.g_ret_sts_error (error),
6678: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
6679: -- x_msg_count Number of messages in message stack.
6680: -- x_msg_data Message text if x_msg_count is 1.
6681: --
6682: -- NOTES
6688: -- enhanced backward compatibility.
6689: --
6690:
6691: PROCEDURE get_telex_contact_point (
6692: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
6693: p_contact_point_id IN NUMBER,
6694: x_contact_point_rec OUT NOCOPY contact_point_rec_type,
6695: x_telex_rec OUT NOCOPY telex_rec_type,
6696: x_return_status OUT NOCOPY VARCHAR2,
6746: -- Check if API is called in debug mode. If yes, disable debug.
6747: --disable_debug;
6748:
6749: EXCEPTION
6750: WHEN fnd_api.g_exc_error THEN
6751: x_return_status := fnd_api.g_ret_sts_error;
6752:
6753: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6754: p_count => x_msg_count,
6747: --disable_debug;
6748:
6749: EXCEPTION
6750: WHEN fnd_api.g_exc_error THEN
6751: x_return_status := fnd_api.g_ret_sts_error;
6752:
6753: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6754: p_count => x_msg_count,
6755: p_data => x_msg_data);
6749: EXCEPTION
6750: WHEN fnd_api.g_exc_error THEN
6751: x_return_status := fnd_api.g_ret_sts_error;
6752:
6753: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6754: p_count => x_msg_count,
6755: p_data => x_msg_data);
6756:
6757: -- Debug info.
6769:
6770: -- Check if API is called in debug mode. If yes, disable debug.
6771: --disable_debug;
6772:
6773: WHEN fnd_api.g_exc_unexpected_error THEN
6774: x_return_status := fnd_api.g_ret_sts_unexp_error;
6775:
6776: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6777: p_count => x_msg_count,
6770: -- Check if API is called in debug mode. If yes, disable debug.
6771: --disable_debug;
6772:
6773: WHEN fnd_api.g_exc_unexpected_error THEN
6774: x_return_status := fnd_api.g_ret_sts_unexp_error;
6775:
6776: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6777: p_count => x_msg_count,
6778: p_data => x_msg_data);
6772:
6773: WHEN fnd_api.g_exc_unexpected_error THEN
6774: x_return_status := fnd_api.g_ret_sts_unexp_error;
6775:
6776: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6777: p_count => x_msg_count,
6778: p_data => x_msg_data);
6779:
6780: -- Debug info.
6793: -- Check if API is called in debug mode. If yes, disable debug.
6794: --disable_debug;
6795:
6796: WHEN OTHERS THEN
6797: x_return_status := fnd_api.g_ret_sts_unexp_error;
6798:
6799: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
6800: fnd_message.set_token('ERROR' ,SQLERRM);
6801: fnd_msg_pub.add;
6799: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
6800: fnd_message.set_token('ERROR' ,SQLERRM);
6801: fnd_msg_pub.add;
6802:
6803: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6804: p_count => x_msg_count,
6805: p_data => x_msg_data);
6806:
6807: -- Debug info.
6831: --
6832: -- ARGUMENTS
6833: -- IN:
6834: -- p_init_msg_list Initialize message stack if it is set to
6835: -- FND_API.G_TRUE. Default is fnd_api.g_false.
6836: -- p_contact_point_id Contact point ID.
6837: -- IN/OUT:
6838: -- OUT:
6839: -- x_contact_point_rec Returned contact point record.
6838: -- OUT:
6839: -- x_contact_point_rec Returned contact point record.
6840: -- x_email_rec Returned email record.
6841: -- x_return_status Return status after the call. The status can
6842: -- be fnd_api.g_ret_sts_success (success),
6843: -- fnd_api.g_ret_sts_error (error),
6844: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
6845: -- x_msg_count Number of messages in message stack.
6846: -- x_msg_data Message text if x_msg_count is 1.
6839: -- x_contact_point_rec Returned contact point record.
6840: -- x_email_rec Returned email record.
6841: -- x_return_status Return status after the call. The status can
6842: -- be fnd_api.g_ret_sts_success (success),
6843: -- fnd_api.g_ret_sts_error (error),
6844: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
6845: -- x_msg_count Number of messages in message stack.
6846: -- x_msg_data Message text if x_msg_count is 1.
6847: --
6840: -- x_email_rec Returned email record.
6841: -- x_return_status Return status after the call. The status can
6842: -- be fnd_api.g_ret_sts_success (success),
6843: -- fnd_api.g_ret_sts_error (error),
6844: -- fnd_api.g_ret_sts_unexp_error (unexpected error).
6845: -- x_msg_count Number of messages in message stack.
6846: -- x_msg_data Message text if x_msg_count is 1.
6847: --
6848: -- NOTES
6854: -- enhanced backward compatibility.
6855: --
6856:
6857: PROCEDURE get_email_contact_point (
6858: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
6859: p_contact_point_id IN NUMBER,
6860: x_contact_point_rec OUT NOCOPY contact_point_rec_type,
6861: x_email_rec OUT NOCOPY email_rec_type,
6862: x_return_status OUT NOCOPY VARCHAR2,
6913: -- Check if API is called in debug mode. If yes, disable debug.
6914: --disable_debug;
6915:
6916: EXCEPTION
6917: WHEN fnd_api.g_exc_error THEN
6918: x_return_status := fnd_api.g_ret_sts_error;
6919:
6920: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6921: p_count => x_msg_count,
6914: --disable_debug;
6915:
6916: EXCEPTION
6917: WHEN fnd_api.g_exc_error THEN
6918: x_return_status := fnd_api.g_ret_sts_error;
6919:
6920: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6921: p_count => x_msg_count,
6922: p_data => x_msg_data);
6916: EXCEPTION
6917: WHEN fnd_api.g_exc_error THEN
6918: x_return_status := fnd_api.g_ret_sts_error;
6919:
6920: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6921: p_count => x_msg_count,
6922: p_data => x_msg_data);
6923:
6924: -- Debug info.
6936:
6937: -- Check if API is called in debug mode. If yes, disable debug.
6938: --disable_debug;
6939:
6940: WHEN fnd_api.g_exc_unexpected_error THEN
6941: x_return_status := fnd_api.g_ret_sts_unexp_error;
6942:
6943: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6944: p_count => x_msg_count,
6937: -- Check if API is called in debug mode. If yes, disable debug.
6938: --disable_debug;
6939:
6940: WHEN fnd_api.g_exc_unexpected_error THEN
6941: x_return_status := fnd_api.g_ret_sts_unexp_error;
6942:
6943: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6944: p_count => x_msg_count,
6945: p_data => x_msg_data);
6939:
6940: WHEN fnd_api.g_exc_unexpected_error THEN
6941: x_return_status := fnd_api.g_ret_sts_unexp_error;
6942:
6943: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6944: p_count => x_msg_count,
6945: p_data => x_msg_data);
6946:
6947: -- Debug info.
6960: -- Check if API is called in debug mode. If yes, disable debug.
6961: --disable_debug;
6962:
6963: WHEN OTHERS THEN
6964: x_return_status := fnd_api.g_ret_sts_unexp_error;
6965:
6966: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
6967: fnd_message.set_token('ERROR' ,SQLERRM);
6968: fnd_msg_pub.add;
6966: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
6967: fnd_message.set_token('ERROR' ,SQLERRM);
6968: fnd_msg_pub.add;
6969:
6970: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6971: p_count => x_msg_count,
6972: p_data => x_msg_data);
6973:
6974: -- Debug info.
7138: END;
7139: FUNCTION isModified(p_old_value IN VARCHAR2,p_new_value IN VARCHAR2) RETURN BOOLEAN
7140: IS
7141: BEGIN
7142: IF p_new_value IS NOT NULL AND p_new_value <> FND_API.G_MISS_CHAR THEN
7143: RETURN NVL(NOT (p_old_value=p_new_value),TRUE);
7144: ELSIF (p_old_value IS NOT NULL AND p_old_value <> FND_API.G_MISS_CHAR)
7145: AND p_new_value = FND_API.G_MISS_CHAR THEN
7146: RETURN TRUE;
7140: IS
7141: BEGIN
7142: IF p_new_value IS NOT NULL AND p_new_value <> FND_API.G_MISS_CHAR THEN
7143: RETURN NVL(NOT (p_old_value=p_new_value),TRUE);
7144: ELSIF (p_old_value IS NOT NULL AND p_old_value <> FND_API.G_MISS_CHAR)
7145: AND p_new_value = FND_API.G_MISS_CHAR THEN
7146: RETURN TRUE;
7147: ELSE
7148: RETURN FALSE;
7141: BEGIN
7142: IF p_new_value IS NOT NULL AND p_new_value <> FND_API.G_MISS_CHAR THEN
7143: RETURN NVL(NOT (p_old_value=p_new_value),TRUE);
7144: ELSIF (p_old_value IS NOT NULL AND p_old_value <> FND_API.G_MISS_CHAR)
7145: AND p_new_value = FND_API.G_MISS_CHAR THEN
7146: RETURN TRUE;
7147: ELSE
7148: RETURN FALSE;
7149: END IF;