90: IF((p_phone_objs IS NOT NULL) AND (p_phone_objs.COUNT > 0)) THEN
91: l_current_cp_type := 'PHONE';
92:
93: FOR i IN 1..p_phone_objs.COUNT LOOP
94: HZ_CONTACT_POINT_BO_PUB.do_create_contact_point(
95: p_init_msg_list => FND_API.G_FALSE,
96: p_validate_bo_flag => FND_API.G_FALSE,
97: p_cp_id => p_phone_objs(i).phone_id,
98: p_cp_os => p_phone_objs(i).orig_system,
139: IF((p_telex_objs IS NOT NULL) AND (p_telex_objs.COUNT > 0)) THEN
140: l_current_cp_type := 'TLX';
141:
142: FOR i IN 1..p_telex_objs.COUNT LOOP
143: HZ_CONTACT_POINT_BO_PUB.do_create_contact_point(
144: p_init_msg_list => FND_API.G_FALSE,
145: p_validate_bo_flag => FND_API.G_FALSE,
146: p_cp_id => p_telex_objs(i).telex_id,
147: p_cp_os => p_telex_objs(i).orig_system,
188: IF((p_email_objs IS NOT NULL) AND (p_email_objs.COUNT > 0)) THEN
189: l_current_cp_type := 'EMAIL';
190:
191: FOR i IN 1..p_email_objs.COUNT LOOP
192: HZ_CONTACT_POINT_BO_PUB.do_create_contact_point(
193: p_init_msg_list => FND_API.G_FALSE,
194: p_validate_bo_flag => FND_API.G_FALSE,
195: p_cp_id => p_email_objs(i).email_id,
196: p_cp_os => p_email_objs(i).orig_system,
237: IF((p_web_objs IS NOT NULL) AND (p_web_objs.COUNT > 0)) THEN
238: l_current_cp_type := 'WEB';
239:
240: FOR i IN 1..p_web_objs.COUNT LOOP
241: HZ_CONTACT_POINT_BO_PUB.do_create_contact_point(
242: p_init_msg_list => FND_API.G_FALSE,
243: p_validate_bo_flag => FND_API.G_FALSE,
244: p_cp_id => p_web_objs(i).web_id,
245: p_cp_os => p_web_objs(i).orig_system,
286: IF((p_edi_objs IS NOT NULL) AND (p_edi_objs.COUNT > 0)) THEN
287: l_current_cp_type := 'EDI';
288:
289: FOR i IN 1..p_edi_objs.COUNT LOOP
290: HZ_CONTACT_POINT_BO_PUB.do_create_contact_point(
291: p_init_msg_list => FND_API.G_FALSE,
292: p_validate_bo_flag => FND_API.G_FALSE,
293: p_cp_id => p_edi_objs(i).edi_id,
294: p_cp_os => p_edi_objs(i).orig_system,
335: IF((p_eft_objs IS NOT NULL) AND (p_eft_objs.COUNT > 0)) THEN
336: l_current_cp_type := 'EFT';
337:
338: FOR i IN 1..p_eft_objs.COUNT LOOP
339: HZ_CONTACT_POINT_BO_PUB.do_create_contact_point(
340: p_init_msg_list => FND_API.G_FALSE,
341: p_validate_bo_flag => FND_API.G_FALSE,
342: p_cp_id => p_eft_objs(i).eft_id,
343: p_cp_os => p_eft_objs(i).orig_system,
384: IF((p_sms_objs IS NOT NULL) AND (p_sms_objs.COUNT > 0)) THEN
385: l_current_cp_type := 'SMS';
386:
387: FOR i IN 1..p_sms_objs.COUNT LOOP
388: HZ_CONTACT_POINT_BO_PUB.do_create_contact_point(
389: p_init_msg_list => FND_API.G_FALSE,
390: p_validate_bo_flag => FND_API.G_FALSE,
391: p_cp_id => p_sms_objs(i).sms_id,
392: p_cp_os => p_sms_objs(i).orig_system,
433: IF((p_phone_objs IS NOT NULL) AND (p_phone_objs.COUNT > 0)) THEN
434: l_current_cp_type := 'PHONE';
435:
436: FOR i IN 1..p_phone_objs.COUNT LOOP
437: HZ_CONTACT_POINT_BO_PUB.do_save_contact_point(
438: p_init_msg_list => FND_API.G_FALSE,
439: p_validate_bo_flag => FND_API.G_FALSE,
440: p_cp_id => p_phone_objs(i).phone_id,
441: p_cp_os => p_phone_objs(i).orig_system,
482: IF((p_telex_objs IS NOT NULL) AND (p_telex_objs.COUNT > 0)) THEN
483: l_current_cp_type := 'TLX';
484:
485: FOR i IN 1..p_telex_objs.COUNT LOOP
486: HZ_CONTACT_POINT_BO_PUB.do_save_contact_point(
487: p_init_msg_list => FND_API.G_FALSE,
488: p_validate_bo_flag => FND_API.G_FALSE,
489: p_cp_id => p_telex_objs(i).telex_id,
490: p_cp_os => p_telex_objs(i).orig_system,
531: IF((p_email_objs IS NOT NULL) AND (p_email_objs.COUNT > 0)) THEN
532: l_current_cp_type := 'EMAIL';
533:
534: FOR i IN 1..p_email_objs.COUNT LOOP
535: HZ_CONTACT_POINT_BO_PUB.do_save_contact_point(
536: p_init_msg_list => FND_API.G_FALSE,
537: p_validate_bo_flag => FND_API.G_FALSE,
538: p_cp_id => p_email_objs(i).email_id,
539: p_cp_os => p_email_objs(i).orig_system,
580: IF((p_web_objs IS NOT NULL) AND (p_web_objs.COUNT > 0)) THEN
581: l_current_cp_type := 'WEB';
582:
583: FOR i IN 1..p_web_objs.COUNT LOOP
584: HZ_CONTACT_POINT_BO_PUB.do_save_contact_point(
585: p_init_msg_list => FND_API.G_FALSE,
586: p_validate_bo_flag => FND_API.G_FALSE,
587: p_cp_id => p_web_objs(i).web_id,
588: p_cp_os => p_web_objs(i).orig_system,
629: IF((p_edi_objs IS NOT NULL) AND (p_edi_objs.COUNT > 0)) THEN
630: l_current_cp_type := 'EDI';
631:
632: FOR i IN 1..p_edi_objs.COUNT LOOP
633: HZ_CONTACT_POINT_BO_PUB.do_save_contact_point(
634: p_init_msg_list => FND_API.G_FALSE,
635: p_validate_bo_flag => FND_API.G_FALSE,
636: p_cp_id => p_edi_objs(i).edi_id,
637: p_cp_os => p_edi_objs(i).orig_system,
678: IF((p_eft_objs IS NOT NULL) AND (p_eft_objs.COUNT > 0)) THEN
679: l_current_cp_type := 'EFT';
680:
681: FOR i IN 1..p_eft_objs.COUNT LOOP
682: HZ_CONTACT_POINT_BO_PUB.do_save_contact_point(
683: p_init_msg_list => FND_API.G_FALSE,
684: p_validate_bo_flag => FND_API.G_FALSE,
685: p_cp_id => p_eft_objs(i).eft_id,
686: p_cp_os => p_eft_objs(i).orig_system,
727: IF((p_sms_objs IS NOT NULL) AND (p_sms_objs.COUNT > 0)) THEN
728: l_current_cp_type := 'SMS';
729:
730: FOR i IN 1..p_sms_objs.COUNT LOOP
731: HZ_CONTACT_POINT_BO_PUB.do_save_contact_point(
732: p_init_msg_list => FND_API.G_FALSE,
733: p_validate_bo_flag => FND_API.G_FALSE,
734: p_cp_id => p_sms_objs(i).sms_id,
735: p_cp_os => p_sms_objs(i).orig_system,