271: --
272: -- DESCRIPTION
273: -- Create a logical phone contact point.
274: PROCEDURE create_phone_bo(
275: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
276: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
277: p_phone_obj IN HZ_PHONE_CP_BO,
278: p_created_by_module IN VARCHAR2,
279: x_return_status OUT NOCOPY VARCHAR2,
272: -- DESCRIPTION
273: -- Create a logical phone contact point.
274: PROCEDURE create_phone_bo(
275: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
276: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
277: p_phone_obj IN HZ_PHONE_CP_BO,
278: p_created_by_module IN VARCHAR2,
279: x_return_status OUT NOCOPY VARCHAR2,
280: x_msg_count OUT NOCOPY NUMBER,
320: );
321: END create_phone_bo;
322:
323: PROCEDURE create_phone_bo(
324: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
325: p_phone_obj IN HZ_PHONE_CP_BO,
326: p_created_by_module IN VARCHAR2,
327: p_obj_source IN VARCHAR2 := null,
328: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
324: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
325: p_phone_obj IN HZ_PHONE_CP_BO,
326: p_created_by_module IN VARCHAR2,
327: p_obj_source IN VARCHAR2 := null,
328: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
329: x_return_status OUT NOCOPY VARCHAR2,
330: x_messages OUT NOCOPY HZ_MESSAGE_OBJ_TBL,
331: x_return_obj OUT NOCOPY HZ_PHONE_CP_BO,
332: x_phone_id OUT NOCOPY NUMBER,
342: l_phone_obj HZ_PHONE_CP_BO;
343: BEGIN
344: l_phone_obj := p_phone_obj;
345: do_create_contact_point (
346: p_init_msg_list => fnd_api.g_true,
347: p_validate_bo_flag => p_validate_bo_flag,
348: p_cp_id => l_phone_obj.phone_id,
349: p_cp_os => l_phone_obj.orig_system,
350: p_cp_osr => l_phone_obj.orig_system_reference,
374: x_messages := HZ_PARTY_BO_PVT.return_all_messages(
375: x_return_status => x_return_status,
376: x_msg_count => l_msg_count,
377: x_msg_data => l_msg_data);
378: IF FND_API.to_Boolean(p_return_obj_flag) THEN
379: x_return_obj := l_phone_obj;
380: END IF;
381: END create_phone_bo;
382:
384: --
385: -- DESCRIPTION
386: -- Create a logical telex contact point.
387: PROCEDURE create_telex_bo(
388: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
389: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
390: p_telex_obj IN HZ_TELEX_CP_BO,
391: p_created_by_module IN VARCHAR2,
392: x_return_status OUT NOCOPY VARCHAR2,
385: -- DESCRIPTION
386: -- Create a logical telex contact point.
387: PROCEDURE create_telex_bo(
388: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
389: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
390: p_telex_obj IN HZ_TELEX_CP_BO,
391: p_created_by_module IN VARCHAR2,
392: x_return_status OUT NOCOPY VARCHAR2,
393: x_msg_count OUT NOCOPY NUMBER,
433: );
434: END create_telex_bo;
435:
436: PROCEDURE create_telex_bo(
437: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
438: p_telex_obj IN HZ_TELEX_CP_BO,
439: p_created_by_module IN VARCHAR2,
440: p_obj_source IN VARCHAR2 := null,
441: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
437: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
438: p_telex_obj IN HZ_TELEX_CP_BO,
439: p_created_by_module IN VARCHAR2,
440: p_obj_source IN VARCHAR2 := null,
441: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
442: x_return_status OUT NOCOPY VARCHAR2,
443: x_messages OUT NOCOPY HZ_MESSAGE_OBJ_TBL,
444: x_return_obj OUT NOCOPY HZ_TELEX_CP_BO,
445: x_telex_id OUT NOCOPY NUMBER,
455: l_telex_obj HZ_TELEX_CP_BO;
456: BEGIN
457: l_telex_obj := p_telex_obj;
458: do_create_contact_point (
459: p_init_msg_list => fnd_api.g_true,
460: p_validate_bo_flag => p_validate_bo_flag,
461: p_cp_id => l_telex_obj.telex_id,
462: p_cp_os => l_telex_obj.orig_system,
463: p_cp_osr => l_telex_obj.orig_system_reference,
487: x_messages := HZ_PARTY_BO_PVT.return_all_messages(
488: x_return_status => x_return_status,
489: x_msg_count => l_msg_count,
490: x_msg_data => l_msg_data);
491: IF FND_API.to_Boolean(p_return_obj_flag) THEN
492: x_return_obj := l_telex_obj;
493: END IF;
494: END create_telex_bo;
495:
497: --
498: -- DESCRIPTION
499: -- Create a logical email contact point.
500: PROCEDURE create_email_bo(
501: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
502: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
503: p_email_obj IN HZ_EMAIL_CP_BO,
504: p_created_by_module IN VARCHAR2,
505: x_return_status OUT NOCOPY VARCHAR2,
498: -- DESCRIPTION
499: -- Create a logical email contact point.
500: PROCEDURE create_email_bo(
501: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
502: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
503: p_email_obj IN HZ_EMAIL_CP_BO,
504: p_created_by_module IN VARCHAR2,
505: x_return_status OUT NOCOPY VARCHAR2,
506: x_msg_count OUT NOCOPY NUMBER,
545: px_parent_obj_type => px_parent_obj_type);
546: END create_email_bo;
547:
548: PROCEDURE create_email_bo(
549: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
550: p_email_obj IN HZ_EMAIL_CP_BO,
551: p_created_by_module IN VARCHAR2,
552: p_obj_source IN VARCHAR2 := null,
553: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
549: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
550: p_email_obj IN HZ_EMAIL_CP_BO,
551: p_created_by_module IN VARCHAR2,
552: p_obj_source IN VARCHAR2 := null,
553: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
554: x_return_status OUT NOCOPY VARCHAR2,
555: x_messages OUT NOCOPY HZ_MESSAGE_OBJ_TBL,
556: x_return_obj OUT NOCOPY HZ_EMAIL_CP_BO,
557: x_email_id OUT NOCOPY NUMBER,
567: l_email_obj HZ_EMAIL_CP_BO;
568: BEGIN
569: l_email_obj := p_email_obj;
570: do_create_contact_point (
571: p_init_msg_list => fnd_api.g_true,
572: p_validate_bo_flag => p_validate_bo_flag,
573: p_cp_id => l_email_obj.email_id,
574: p_cp_os => l_email_obj.orig_system,
575: p_cp_osr => l_email_obj.orig_system_reference,
598: x_messages := HZ_PARTY_BO_PVT.return_all_messages(
599: x_return_status => x_return_status,
600: x_msg_count => l_msg_count,
601: x_msg_data => l_msg_data);
602: IF FND_API.to_Boolean(p_return_obj_flag) THEN
603: x_return_obj := l_email_obj;
604: END IF;
605: END create_email_bo;
606:
608: --
609: -- DESCRIPTION
610: -- Create a logical web contact point.
611: PROCEDURE create_web_bo(
612: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
613: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
614: p_web_obj IN HZ_WEB_CP_BO,
615: p_created_by_module IN VARCHAR2,
616: x_return_status OUT NOCOPY VARCHAR2,
609: -- DESCRIPTION
610: -- Create a logical web contact point.
611: PROCEDURE create_web_bo(
612: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
613: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
614: p_web_obj IN HZ_WEB_CP_BO,
615: p_created_by_module IN VARCHAR2,
616: x_return_status OUT NOCOPY VARCHAR2,
617: x_msg_count OUT NOCOPY NUMBER,
656: px_parent_obj_type => px_parent_obj_type);
657: END create_web_bo;
658:
659: PROCEDURE create_web_bo(
660: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
661: p_web_obj IN HZ_WEB_CP_BO,
662: p_created_by_module IN VARCHAR2,
663: p_obj_source IN VARCHAR2 := null,
664: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
660: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
661: p_web_obj IN HZ_WEB_CP_BO,
662: p_created_by_module IN VARCHAR2,
663: p_obj_source IN VARCHAR2 := null,
664: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
665: x_return_status OUT NOCOPY VARCHAR2,
666: x_messages OUT NOCOPY HZ_MESSAGE_OBJ_TBL,
667: x_return_obj OUT NOCOPY HZ_WEB_CP_BO,
668: x_web_id OUT NOCOPY NUMBER,
678: l_web_obj HZ_WEB_CP_BO;
679: BEGIN
680: l_web_obj := p_web_obj;
681: do_create_contact_point (
682: p_init_msg_list => fnd_api.g_true,
683: p_validate_bo_flag => p_validate_bo_flag,
684: p_cp_id => l_web_obj.web_id,
685: p_cp_os => l_web_obj.orig_system,
686: p_cp_osr => l_web_obj.orig_system_reference,
709: x_messages := HZ_PARTY_BO_PVT.return_all_messages(
710: x_return_status => x_return_status,
711: x_msg_count => l_msg_count,
712: x_msg_data => l_msg_data);
713: IF FND_API.to_Boolean(p_return_obj_flag) THEN
714: x_return_obj := l_web_obj;
715: END IF;
716: END create_web_bo;
717:
719: --
720: -- DESCRIPTION
721: -- Create a logical edi contact point.
722: PROCEDURE create_edi_bo(
723: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
724: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
725: p_edi_obj IN HZ_EDI_CP_BO,
726: p_created_by_module IN VARCHAR2,
727: x_return_status OUT NOCOPY VARCHAR2,
720: -- DESCRIPTION
721: -- Create a logical edi contact point.
722: PROCEDURE create_edi_bo(
723: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
724: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
725: p_edi_obj IN HZ_EDI_CP_BO,
726: p_created_by_module IN VARCHAR2,
727: x_return_status OUT NOCOPY VARCHAR2,
728: x_msg_count OUT NOCOPY NUMBER,
767: px_parent_obj_type => px_parent_obj_type);
768: END create_edi_bo;
769:
770: PROCEDURE create_edi_bo(
771: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
772: p_edi_obj IN HZ_EDI_CP_BO,
773: p_created_by_module IN VARCHAR2,
774: p_obj_source IN VARCHAR2 := null,
775: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
771: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
772: p_edi_obj IN HZ_EDI_CP_BO,
773: p_created_by_module IN VARCHAR2,
774: p_obj_source IN VARCHAR2 := null,
775: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
776: x_return_status OUT NOCOPY VARCHAR2,
777: x_messages OUT NOCOPY HZ_MESSAGE_OBJ_TBL,
778: x_return_obj OUT NOCOPY HZ_EDI_CP_BO,
779: x_edi_id OUT NOCOPY NUMBER,
789: l_edi_obj HZ_EDI_CP_BO;
790: BEGIN
791: l_edi_obj := p_edi_obj;
792: do_create_contact_point (
793: p_init_msg_list => fnd_api.g_true,
794: p_validate_bo_flag => p_validate_bo_flag,
795: p_cp_id => l_edi_obj.edi_id,
796: p_cp_os => l_edi_obj.orig_system,
797: p_cp_osr => l_edi_obj.orig_system_reference,
820: x_messages := HZ_PARTY_BO_PVT.return_all_messages(
821: x_return_status => x_return_status,
822: x_msg_count => l_msg_count,
823: x_msg_data => l_msg_data);
824: IF FND_API.to_Boolean(p_return_obj_flag) THEN
825: x_return_obj := l_edi_obj;
826: END IF;
827: END create_edi_bo;
828:
830: --
831: -- DESCRIPTION
832: -- Create a logical eft contact point.
833: PROCEDURE create_eft_bo(
834: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
835: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
836: p_eft_obj IN HZ_EFT_CP_BO,
837: p_created_by_module IN VARCHAR2,
838: x_return_status OUT NOCOPY VARCHAR2,
831: -- DESCRIPTION
832: -- Create a logical eft contact point.
833: PROCEDURE create_eft_bo(
834: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
835: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
836: p_eft_obj IN HZ_EFT_CP_BO,
837: p_created_by_module IN VARCHAR2,
838: x_return_status OUT NOCOPY VARCHAR2,
839: x_msg_count OUT NOCOPY NUMBER,
878: px_parent_obj_type => px_parent_obj_type);
879: END create_eft_bo;
880:
881: PROCEDURE create_eft_bo(
882: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
883: p_eft_obj IN HZ_EFT_CP_BO,
884: p_created_by_module IN VARCHAR2,
885: p_obj_source IN VARCHAR2 := null,
886: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
882: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
883: p_eft_obj IN HZ_EFT_CP_BO,
884: p_created_by_module IN VARCHAR2,
885: p_obj_source IN VARCHAR2 := null,
886: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
887: x_return_status OUT NOCOPY VARCHAR2,
888: x_messages OUT NOCOPY HZ_MESSAGE_OBJ_TBL,
889: x_return_obj OUT NOCOPY HZ_EFT_CP_BO,
890: x_eft_id OUT NOCOPY NUMBER,
900: l_eft_obj HZ_EFT_CP_BO;
901: BEGIN
902: l_eft_obj := p_eft_obj;
903: do_create_contact_point (
904: p_init_msg_list => fnd_api.g_true,
905: p_validate_bo_flag => p_validate_bo_flag,
906: p_cp_id => l_eft_obj.eft_id,
907: p_cp_os => l_eft_obj.orig_system,
908: p_cp_osr => l_eft_obj.orig_system_reference,
931: x_messages := HZ_PARTY_BO_PVT.return_all_messages(
932: x_return_status => x_return_status,
933: x_msg_count => l_msg_count,
934: x_msg_data => l_msg_data);
935: IF FND_API.to_Boolean(p_return_obj_flag) THEN
936: x_return_obj := l_eft_obj;
937: END IF;
938: END create_eft_bo;
939:
941: --
942: -- DESCRIPTION
943: -- Create a logical sms contact point.
944: PROCEDURE create_sms_bo(
945: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
946: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
947: p_sms_obj IN HZ_SMS_CP_BO,
948: p_created_by_module IN VARCHAR2,
949: x_return_status OUT NOCOPY VARCHAR2,
942: -- DESCRIPTION
943: -- Create a logical sms contact point.
944: PROCEDURE create_sms_bo(
945: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
946: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
947: p_sms_obj IN HZ_SMS_CP_BO,
948: p_created_by_module IN VARCHAR2,
949: x_return_status OUT NOCOPY VARCHAR2,
950: x_msg_count OUT NOCOPY NUMBER,
989: px_parent_obj_type => px_parent_obj_type);
990: END create_sms_bo;
991:
992: PROCEDURE create_sms_bo(
993: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
994: p_sms_obj IN HZ_SMS_CP_BO,
995: p_created_by_module IN VARCHAR2,
996: p_obj_source IN VARCHAR2 := null,
997: p_return_obj_flag IN VARCHAr2 := fnd_api.g_true,
993: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
994: p_sms_obj IN HZ_SMS_CP_BO,
995: p_created_by_module IN VARCHAR2,
996: p_obj_source IN VARCHAR2 := null,
997: p_return_obj_flag IN VARCHAr2 := fnd_api.g_true,
998: x_return_status OUT NOCOPY VARCHAR2,
999: x_messages OUT NOCOPY HZ_MESSAGE_OBJ_TBL,
1000: x_return_obj OUT NOCOPY HZ_SMS_CP_BO,
1001: x_sms_id OUT NOCOPY NUMBER,
1011: l_sms_obj HZ_SMS_CP_BO;
1012: BEGIN
1013: l_sms_obj := p_sms_obj;
1014: do_create_contact_point (
1015: p_init_msg_list => fnd_api.g_true,
1016: p_validate_bo_flag => p_validate_bo_flag,
1017: p_cp_id => l_sms_obj.sms_id,
1018: p_cp_os => l_sms_obj.orig_system,
1019: p_cp_osr => l_sms_obj.orig_system_reference,
1042: x_messages := HZ_PARTY_BO_PVT.return_all_messages(
1043: x_return_status => x_return_status,
1044: x_msg_count => l_msg_count,
1045: x_msg_data => l_msg_data);
1046: IF FND_API.to_Boolean(p_return_obj_flag) THEN
1047: x_return_obj := l_sms_obj;
1048: END IF;
1049: END create_sms_bo;
1050:
1668: --
1669: -- DESCRIPTION
1670: -- Create contact point.
1671: PROCEDURE do_create_contact_point(
1672: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1673: p_validate_bo_flag IN VARCHAR2 := FND_API.G_TRUE,
1674: p_cp_id IN NUMBER,
1675: p_cp_os IN VARCHAR2,
1676: p_cp_osr IN VARCHAR2,
1669: -- DESCRIPTION
1670: -- Create contact point.
1671: PROCEDURE do_create_contact_point(
1672: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1673: p_validate_bo_flag IN VARCHAR2 := FND_API.G_TRUE,
1674: p_cp_id IN NUMBER,
1675: p_cp_os IN VARCHAR2,
1676: p_cp_osr IN VARCHAR2,
1677: p_phone_obj IN HZ_PHONE_CP_BO,
1714: -- Standard start of API savepoint
1715: SAVEPOINT do_create_contact_point_pub;
1716:
1717: -- initialize API return status to success.
1718: x_return_status := FND_API.G_RET_STS_SUCCESS;
1719:
1720: -- Initialize message list if p_init_msg_list is set to TRUE
1721: IF FND_API.to_Boolean(p_init_msg_list) THEN
1722: FND_MSG_PUB.initialize;
1717: -- initialize API return status to success.
1718: x_return_status := FND_API.G_RET_STS_SUCCESS;
1719:
1720: -- Initialize message list if p_init_msg_list is set to TRUE
1721: IF FND_API.to_Boolean(p_init_msg_list) THEN
1722: FND_MSG_PUB.initialize;
1723: END IF;
1724:
1725: -- initialize Global variable to indicate the caller of V2API is from BO API
1737: p_msg_level=>fnd_log.level_procedure);
1738: END IF;
1739:
1740: -- Base on p_validate_bo_flag, check completeness of business object
1741: IF(p_validate_bo_flag = FND_API.G_TRUE) THEN
1742: HZ_REGISTRY_VALIDATE_BO_PVT.get_bus_obj_struct(
1743: p_bus_object_code => p_cp_type,
1744: x_bus_object => l_bus_object
1745: );
1755: p_bus_object => l_bus_object
1756: );
1757:
1758: IF NOT(l_valid_obj) THEN
1759: RAISE fnd_api.g_exc_error;
1760: END IF;
1761: END IF;
1762:
1763: -- check pass in parent_id and parent_os/parent_osr
1769: x_return_status => x_return_status,
1770: x_msg_count => x_msg_count,
1771: x_msg_data => x_msg_data);
1772:
1773: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1774: RAISE fnd_api.g_exc_error;
1775: END IF;
1776:
1777: -- get owner table name of contact point, contact point id and os+osr
1770: x_msg_count => x_msg_count,
1771: x_msg_data => x_msg_data);
1772:
1773: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1774: RAISE fnd_api.g_exc_error;
1775: END IF;
1776:
1777: -- get owner table name of contact point, contact point id and os+osr
1778: l_owner_table_name := HZ_REGISTRY_VALIDATE_BO_PVT.get_owner_table_name(p_obj_type => px_parent_obj_type);
1790: x_return_status => x_return_status,
1791: x_msg_count => x_msg_count,
1792: x_msg_data => x_msg_data);
1793:
1794: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1795: RAISE fnd_api.g_exc_error;
1796: END IF;
1797:
1798: -- Base on contact point type, assign record and then call v2pub api
1791: x_msg_count => x_msg_count,
1792: x_msg_data => x_msg_data);
1793:
1794: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1795: RAISE fnd_api.g_exc_error;
1796: END IF;
1797:
1798: -- Base on contact point type, assign record and then call v2pub api
1799: IF(p_cp_type = 'PHONE') THEN
1817: x_msg_count => x_msg_count,
1818: x_msg_data => x_msg_data
1819: );
1820:
1821: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1822: RAISE fnd_api.g_exc_error;
1823: END IF;
1824: ELSIF(p_cp_type = 'EMAIL') THEN
1825: assign_email_rec(
1818: x_msg_data => x_msg_data
1819: );
1820:
1821: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1822: RAISE fnd_api.g_exc_error;
1823: END IF;
1824: ELSIF(p_cp_type = 'EMAIL') THEN
1825: assign_email_rec(
1826: p_email_obj => p_email_obj,
1842: x_msg_count => x_msg_count,
1843: x_msg_data => x_msg_data
1844: );
1845:
1846: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1847: RAISE fnd_api.g_exc_error;
1848: END IF;
1849: ELSIF(p_cp_type = 'TLX') THEN
1850: assign_telex_rec(
1843: x_msg_data => x_msg_data
1844: );
1845:
1846: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1847: RAISE fnd_api.g_exc_error;
1848: END IF;
1849: ELSIF(p_cp_type = 'TLX') THEN
1850: assign_telex_rec(
1851: p_telex_obj => p_telex_obj,
1867: x_msg_count => x_msg_count,
1868: x_msg_data => x_msg_data
1869: );
1870:
1871: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1872: RAISE fnd_api.g_exc_error;
1873: END IF;
1874: ELSIF(p_cp_type = 'WEB') THEN
1875: assign_web_rec(
1868: x_msg_data => x_msg_data
1869: );
1870:
1871: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1872: RAISE fnd_api.g_exc_error;
1873: END IF;
1874: ELSIF(p_cp_type = 'WEB') THEN
1875: assign_web_rec(
1876: p_web_obj => p_web_obj,
1892: x_msg_count => x_msg_count,
1893: x_msg_data => x_msg_data
1894: );
1895:
1896: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1897: RAISE fnd_api.g_exc_error;
1898: END IF;
1899: ELSIF(p_cp_type = 'EDI') THEN
1900: assign_edi_rec(
1893: x_msg_data => x_msg_data
1894: );
1895:
1896: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1897: RAISE fnd_api.g_exc_error;
1898: END IF;
1899: ELSIF(p_cp_type = 'EDI') THEN
1900: assign_edi_rec(
1901: p_edi_obj => p_edi_obj,
1917: x_msg_count => x_msg_count,
1918: x_msg_data => x_msg_data
1919: );
1920:
1921: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1922: RAISE fnd_api.g_exc_error;
1923: END IF;
1924: ELSIF(p_cp_type = 'EFT') THEN
1925: assign_eft_rec(
1918: x_msg_data => x_msg_data
1919: );
1920:
1921: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1922: RAISE fnd_api.g_exc_error;
1923: END IF;
1924: ELSIF(p_cp_type = 'EFT') THEN
1925: assign_eft_rec(
1926: p_eft_obj => p_eft_obj,
1942: x_msg_count => x_msg_count,
1943: x_msg_data => x_msg_data
1944: );
1945:
1946: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1947: RAISE fnd_api.g_exc_error;
1948: END IF;
1949: ELSIF(p_cp_type = 'SMS') THEN
1950: assign_sms_rec(
1943: x_msg_data => x_msg_data
1944: );
1945:
1946: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1947: RAISE fnd_api.g_exc_error;
1948: END IF;
1949: ELSIF(p_cp_type = 'SMS') THEN
1950: assign_sms_rec(
1951: p_sms_obj => p_sms_obj,
1967: x_msg_count => x_msg_count,
1968: x_msg_data => x_msg_data
1969: );
1970:
1971: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1972: RAISE fnd_api.g_exc_error;
1973: END IF;
1974: END IF;
1975:
1968: x_msg_data => x_msg_data
1969: );
1970:
1971: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1972: RAISE fnd_api.g_exc_error;
1973: END IF;
1974: END IF;
1975:
1976: IF((p_cp_pref_objs IS NOT NULL) AND (p_cp_pref_objs.COUNT > 0)) THEN
1984: x_msg_data => x_msg_data
1985: );
1986: END IF;
1987:
1988: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1989: RAISE fnd_api.g_exc_error;
1990: END IF;
1991:
1992: -- reset Global variable
1985: );
1986: END IF;
1987:
1988: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1989: RAISE fnd_api.g_exc_error;
1990: END IF;
1991:
1992: -- reset Global variable
1993: HZ_UTILITY_V2PUB.G_CALLING_API := NULL;
2006: p_msg_level=>fnd_log.level_procedure);
2007: END IF;
2008:
2009: EXCEPTION
2010: WHEN fnd_api.g_exc_error THEN
2011: ROLLBACK TO do_create_contact_point_pub;
2012:
2013: -- reset Global variable
2014: HZ_UTILITY_V2PUB.G_CALLING_API := NULL;
2017: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_OBJECT_ERROR');
2018: FND_MESSAGE.SET_TOKEN('OBJECT', p_cp_type);
2019: FND_MSG_PUB.ADD;
2020:
2021: x_return_status := fnd_api.g_ret_sts_error;
2022:
2023: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2024: p_count => x_msg_count,
2025: p_data => x_msg_data);
2019: FND_MSG_PUB.ADD;
2020:
2021: x_return_status := fnd_api.g_ret_sts_error;
2022:
2023: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2024: p_count => x_msg_count,
2025: p_data => x_msg_data);
2026:
2027: -- Debug info.
2036: p_prefix=>l_debug_prefix,
2037: p_msg_level=>fnd_log.level_procedure);
2038: END IF;
2039:
2040: WHEN fnd_api.g_exc_unexpected_error THEN
2041: ROLLBACK TO do_create_contact_point_pub;
2042:
2043: -- reset Global variable
2044: HZ_UTILITY_V2PUB.G_CALLING_API := NULL;
2047: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_OBJECT_ERROR');
2048: FND_MESSAGE.SET_TOKEN('OBJECT', p_cp_type);
2049: FND_MSG_PUB.ADD;
2050:
2051: x_return_status := fnd_api.g_ret_sts_unexp_error;
2052:
2053: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2054: p_count => x_msg_count,
2055: p_data => x_msg_data);
2049: FND_MSG_PUB.ADD;
2050:
2051: x_return_status := fnd_api.g_ret_sts_unexp_error;
2052:
2053: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2054: p_count => x_msg_count,
2055: p_data => x_msg_data);
2056:
2057: -- Debug info.
2077: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_OBJECT_ERROR');
2078: FND_MESSAGE.SET_TOKEN('OBJECT', p_cp_type);
2079: FND_MSG_PUB.ADD;
2080:
2081: x_return_status := fnd_api.g_ret_sts_unexp_error;
2082:
2083: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
2084: fnd_message.set_token('ERROR' ,SQLERRM);
2085: fnd_msg_pub.add;
2083: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
2084: fnd_message.set_token('ERROR' ,SQLERRM);
2085: fnd_msg_pub.add;
2086:
2087: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2088: p_count => x_msg_count,
2089: p_data => x_msg_data);
2090:
2091: -- Debug info.
2106: --
2107: -- DESCRIPTION
2108: -- Update a logical phone contact point.
2109: PROCEDURE update_phone_bo(
2110: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
2111: p_phone_obj IN HZ_PHONE_CP_BO,
2112: p_created_by_module IN VARCHAR2,
2113: x_return_status OUT NOCOPY VARCHAR2,
2114: x_msg_count OUT NOCOPY NUMBER,
2148: PROCEDURE update_phone_bo(
2149: p_phone_obj IN HZ_PHONE_CP_BO,
2150: p_created_by_module IN VARCHAR2,
2151: p_obj_source IN VARCHAR2 := null,
2152: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
2153: x_return_status OUT NOCOPY VARCHAR2,
2154: x_messages OUT NOCOPY HZ_MESSAGE_OBJ_TBL,
2155: x_return_obj OUT NOCOPY HZ_PHONE_CP_BO,
2156: x_phone_id OUT NOCOPY NUMBER,
2162: l_phone_obj HZ_PHONE_CP_BO;
2163: BEGIN
2164: l_phone_obj := p_phone_obj;
2165: do_update_contact_point (
2166: p_init_msg_list => fnd_api.g_true,
2167: p_cp_id => l_phone_obj.phone_id,
2168: p_cp_os => l_phone_obj.orig_system,
2169: p_cp_osr => l_phone_obj.orig_system_reference,
2170: p_phone_obj => l_phone_obj,
2187: x_messages := HZ_PARTY_BO_PVT.return_all_messages(
2188: x_return_status => x_return_status,
2189: x_msg_count => l_msg_count,
2190: x_msg_data => l_msg_data);
2191: IF FND_API.to_Boolean(p_return_obj_flag) THEN
2192: x_return_obj := l_phone_obj;
2193: END IF;
2194: END update_phone_bo;
2195:
2197: --
2198: -- DESCRIPTION
2199: -- Update a logical telex contact point.
2200: PROCEDURE update_telex_bo(
2201: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
2202: p_telex_obj IN HZ_TELEX_CP_BO,
2203: p_created_by_module IN VARCHAR2,
2204: x_return_status OUT NOCOPY VARCHAR2,
2205: x_msg_count OUT NOCOPY NUMBER,
2239: PROCEDURE update_telex_bo(
2240: p_telex_obj IN HZ_TELEX_CP_BO,
2241: p_created_by_module IN VARCHAR2,
2242: p_obj_source IN VARCHAR2 := null,
2243: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
2244: x_return_status OUT NOCOPY VARCHAR2,
2245: x_messages OUT NOCOPY HZ_MESSAGE_OBJ_TBL,
2246: x_return_obj OUT NOCOPY HZ_TELEX_CP_BO,
2247: x_telex_id OUT NOCOPY NUMBER,
2253: l_telex_obj HZ_TELEX_CP_BO;
2254: BEGIN
2255: l_telex_obj := p_telex_obj;
2256: do_update_contact_point (
2257: p_init_msg_list => fnd_api.g_true,
2258: p_cp_id => l_telex_obj.telex_id,
2259: p_cp_os => l_telex_obj.orig_system,
2260: p_cp_osr => l_telex_obj.orig_system_reference,
2261: p_phone_obj => NULL,
2278: x_messages := HZ_PARTY_BO_PVT.return_all_messages(
2279: x_return_status => x_return_status,
2280: x_msg_count => l_msg_count,
2281: x_msg_data => l_msg_data);
2282: IF FND_API.to_Boolean(p_return_obj_flag) THEN
2283: x_return_obj := l_telex_obj;
2284: END IF;
2285: END update_telex_bo;
2286:
2288: --
2289: -- DESCRIPTION
2290: -- Update a logical email contact point.
2291: PROCEDURE update_email_bo(
2292: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
2293: p_email_obj IN HZ_EMAIL_CP_BO,
2294: p_created_by_module IN VARCHAR2,
2295: x_return_status OUT NOCOPY VARCHAR2,
2296: x_msg_count OUT NOCOPY NUMBER,
2330: PROCEDURE update_email_bo(
2331: p_email_obj IN HZ_EMAIL_CP_BO,
2332: p_created_by_module IN VARCHAR2,
2333: p_obj_source IN VARCHAR2 := null,
2334: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
2335: x_return_status OUT NOCOPY VARCHAR2,
2336: x_messages OUT NOCOPY HZ_MESSAGE_OBJ_TBL,
2337: x_return_obj OUT NOCOPY HZ_EMAIL_CP_BO,
2338: x_email_id OUT NOCOPY NUMBER,
2344: l_email_obj HZ_EMAIL_CP_BO;
2345: BEGIN
2346: l_email_obj := p_email_obj;
2347: do_update_contact_point (
2348: p_init_msg_list => fnd_api.g_true,
2349: p_cp_id => l_email_obj.email_id,
2350: p_cp_os => l_email_obj.orig_system,
2351: p_cp_osr => l_email_obj.orig_system_reference,
2352: p_phone_obj => NULL,
2369: x_messages := HZ_PARTY_BO_PVT.return_all_messages(
2370: x_return_status => x_return_status,
2371: x_msg_count => l_msg_count,
2372: x_msg_data => l_msg_data);
2373: IF FND_API.to_Boolean(p_return_obj_flag) THEN
2374: x_return_obj := l_email_obj;
2375: END IF;
2376: END update_email_bo;
2377:
2379: --
2380: -- DESCRIPTION
2381: -- Update a logical web contact point.
2382: PROCEDURE update_web_bo(
2383: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
2384: p_web_obj IN HZ_WEB_CP_BO,
2385: p_created_by_module IN VARCHAR2,
2386: x_return_status OUT NOCOPY VARCHAR2,
2387: x_msg_count OUT NOCOPY NUMBER,
2421: PROCEDURE update_web_bo(
2422: p_web_obj IN HZ_WEB_CP_BO,
2423: p_created_by_module IN VARCHAR2,
2424: p_obj_source IN VARCHAR2 := null,
2425: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
2426: x_return_status OUT NOCOPY VARCHAR2,
2427: x_messages OUT NOCOPY HZ_MESSAGE_OBJ_TBL,
2428: x_return_obj OUT NOCOPY HZ_WEB_CP_BO,
2429: x_web_id OUT NOCOPY NUMBER,
2435: l_web_obj HZ_WEB_CP_BO;
2436: BEGIN
2437: l_web_obj := p_web_obj;
2438: do_update_contact_point (
2439: p_init_msg_list => fnd_api.g_true,
2440: p_cp_id => l_web_obj.web_id,
2441: p_cp_os => l_web_obj.orig_system,
2442: p_cp_osr => l_web_obj.orig_system_reference,
2443: p_phone_obj => NULL,
2460: x_messages := HZ_PARTY_BO_PVT.return_all_messages(
2461: x_return_status => x_return_status,
2462: x_msg_count => l_msg_count,
2463: x_msg_data => l_msg_data);
2464: IF FND_API.to_Boolean(p_return_obj_flag) THEN
2465: x_return_obj := l_web_obj;
2466: END IF;
2467: END update_web_bo;
2468:
2470: --
2471: -- DESCRIPTION
2472: -- Update a logical edi contact point.
2473: PROCEDURE update_edi_bo(
2474: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
2475: p_edi_obj IN HZ_EDI_CP_BO,
2476: p_created_by_module IN VARCHAR2,
2477: x_return_status OUT NOCOPY VARCHAR2,
2478: x_msg_count OUT NOCOPY NUMBER,
2512: PROCEDURE update_edi_bo(
2513: p_edi_obj IN HZ_EDI_CP_BO,
2514: p_created_by_module IN VARCHAR2,
2515: p_obj_source IN VARCHAR2 := null,
2516: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
2517: x_return_status OUT NOCOPY VARCHAR2,
2518: x_messages OUT NOCOPY HZ_MESSAGE_OBJ_TBL,
2519: x_return_obj OUT NOCOPY HZ_EDI_CP_BO,
2520: x_edi_id OUT NOCOPY NUMBER,
2526: l_edi_obj HZ_EDI_CP_BO;
2527: BEGIN
2528: l_edi_obj := p_edi_obj;
2529: do_update_contact_point (
2530: p_init_msg_list => fnd_api.g_true,
2531: p_cp_id => l_edi_obj.edi_id,
2532: p_cp_os => l_edi_obj.orig_system,
2533: p_cp_osr => l_edi_obj.orig_system_reference,
2534: p_phone_obj => NULL,
2551: x_messages := HZ_PARTY_BO_PVT.return_all_messages(
2552: x_return_status => x_return_status,
2553: x_msg_count => l_msg_count,
2554: x_msg_data => l_msg_data);
2555: IF FND_API.to_Boolean(p_return_obj_flag) THEN
2556: x_return_obj := l_edi_obj;
2557: END IF;
2558: END update_edi_bo;
2559:
2561: --
2562: -- DESCRIPTION
2563: -- Update a logical eft contact point.
2564: PROCEDURE update_eft_bo(
2565: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
2566: p_eft_obj IN HZ_EFT_CP_BO,
2567: p_created_by_module IN VARCHAR2,
2568: x_return_status OUT NOCOPY VARCHAR2,
2569: x_msg_count OUT NOCOPY NUMBER,
2603: PROCEDURE update_eft_bo(
2604: p_eft_obj IN HZ_EFT_CP_BO,
2605: p_created_by_module IN VARCHAR2,
2606: p_obj_source IN VARCHAR2 := null,
2607: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
2608: x_return_status OUT NOCOPY VARCHAR2,
2609: x_messages OUT NOCOPY HZ_MESSAGE_OBJ_TBL,
2610: x_return_obj OUT NOCOPY HZ_EFT_CP_BO,
2611: x_eft_id OUT NOCOPY NUMBER,
2617: l_eft_obj HZ_EFT_CP_BO;
2618: BEGIN
2619: l_eft_obj := p_eft_obj;
2620: do_update_contact_point (
2621: p_init_msg_list => fnd_api.g_true,
2622: p_cp_id => l_eft_obj.eft_id,
2623: p_cp_os => l_eft_obj.orig_system,
2624: p_cp_osr => l_eft_obj.orig_system_reference,
2625: p_phone_obj => NULL,
2642: x_messages := HZ_PARTY_BO_PVT.return_all_messages(
2643: x_return_status => x_return_status,
2644: x_msg_count => l_msg_count,
2645: x_msg_data => l_msg_data);
2646: IF FND_API.to_Boolean(p_return_obj_flag) THEN
2647: x_return_obj := l_eft_obj;
2648: END IF;
2649: END update_eft_bo;
2650:
2652: --
2653: -- DESCRIPTION
2654: -- Update a logical sms contact point.
2655: PROCEDURE update_sms_bo(
2656: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
2657: p_sms_obj IN HZ_SMS_CP_BO,
2658: p_created_by_module IN VARCHAR2,
2659: x_return_status OUT NOCOPY VARCHAR2,
2660: x_msg_count OUT NOCOPY NUMBER,
2694: PROCEDURE update_sms_bo(
2695: p_sms_obj IN HZ_SMS_CP_BO,
2696: p_created_by_module IN VARCHAR2,
2697: p_obj_source IN VARCHAR2 := null,
2698: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
2699: x_return_status OUT NOCOPY VARCHAR2,
2700: x_messages OUT NOCOPY HZ_MESSAGE_OBJ_TBL,
2701: x_return_obj OUT NOCOPY HZ_SMS_CP_BO,
2702: x_sms_id OUT NOCOPY NUMBER,
2708: l_sms_obj HZ_SMS_CP_BO;
2709: BEGIN
2710: l_sms_obj := p_sms_obj;
2711: do_update_contact_point (
2712: p_init_msg_list => fnd_api.g_true,
2713: p_cp_id => l_sms_obj.sms_id,
2714: p_cp_os => l_sms_obj.orig_system,
2715: p_cp_osr => l_sms_obj.orig_system_reference,
2716: p_phone_obj => NULL,
2733: x_messages := HZ_PARTY_BO_PVT.return_all_messages(
2734: x_return_status => x_return_status,
2735: x_msg_count => l_msg_count,
2736: x_msg_data => l_msg_data);
2737: IF FND_API.to_Boolean(p_return_obj_flag) THEN
2738: x_return_obj := l_sms_obj;
2739: END IF;
2740: END update_sms_bo;
2741:
2743: --
2744: -- DESCRIPTION
2745: -- Update contact point.
2746: PROCEDURE do_update_contact_point (
2747: p_init_msg_list IN VARCHAR2:= FND_API.G_FALSE,
2748: p_cp_id IN NUMBER,
2749: p_cp_os IN VARCHAR2,
2750: p_cp_osr IN VARCHAR2,
2751: p_phone_obj IN HZ_PHONE_CP_BO,
2795: -- Standard start of API savepoint
2796: SAVEPOINT do_update_contact_point_pub;
2797:
2798: -- initialize API return status to success.
2799: x_return_status := FND_API.G_RET_STS_SUCCESS;
2800:
2801: -- Initialize message list if p_init_msg_list is set to TRUE
2802: IF FND_API.to_Boolean(p_init_msg_list) THEN
2803: FND_MSG_PUB.initialize;
2798: -- initialize API return status to success.
2799: x_return_status := FND_API.G_RET_STS_SUCCESS;
2800:
2801: -- Initialize message list if p_init_msg_list is set to TRUE
2802: IF FND_API.to_Boolean(p_init_msg_list) THEN
2803: FND_MSG_PUB.initialize;
2804: END IF;
2805:
2806: -- initialize Global variable
2833: x_return_status => x_return_status,
2834: x_msg_count => x_msg_count,
2835: x_msg_data => x_msg_data);
2836:
2837: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2838: RAISE FND_API.G_EXC_ERROR;
2839: END IF;
2840:
2841: OPEN get_ovn(x_cp_id);
2834: x_msg_count => x_msg_count,
2835: x_msg_data => x_msg_data);
2836:
2837: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2838: RAISE FND_API.G_EXC_ERROR;
2839: END IF;
2840:
2841: OPEN get_ovn(x_cp_id);
2842: FETCH get_ovn INTO l_ovn, l_owner_table_id, l_owner_table_name;
2866: x_msg_count => x_msg_count,
2867: x_msg_data => x_msg_data
2868: );
2869:
2870: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2871: RAISE FND_API.G_EXC_ERROR;
2872: END IF;
2873: ELSIF(p_cp_type = 'EMAIL') THEN
2874: assign_email_rec(
2867: x_msg_data => x_msg_data
2868: );
2869:
2870: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2871: RAISE FND_API.G_EXC_ERROR;
2872: END IF;
2873: ELSIF(p_cp_type = 'EMAIL') THEN
2874: assign_email_rec(
2875: p_email_obj => p_email_obj,
2892: x_msg_count => x_msg_count,
2893: x_msg_data => x_msg_data
2894: );
2895:
2896: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2897: RAISE FND_API.G_EXC_ERROR;
2898: END IF;
2899: ELSIF(p_cp_type = 'TLX') THEN
2900: assign_telex_rec(
2893: x_msg_data => x_msg_data
2894: );
2895:
2896: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2897: RAISE FND_API.G_EXC_ERROR;
2898: END IF;
2899: ELSIF(p_cp_type = 'TLX') THEN
2900: assign_telex_rec(
2901: p_telex_obj => p_telex_obj,
2918: x_msg_count => x_msg_count,
2919: x_msg_data => x_msg_data
2920: );
2921:
2922: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2923: RAISE FND_API.G_EXC_ERROR;
2924: END IF;
2925: ELSIF(p_cp_type = 'WEB') THEN
2926: assign_web_rec(
2919: x_msg_data => x_msg_data
2920: );
2921:
2922: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2923: RAISE FND_API.G_EXC_ERROR;
2924: END IF;
2925: ELSIF(p_cp_type = 'WEB') THEN
2926: assign_web_rec(
2927: p_web_obj => p_web_obj,
2944: x_msg_count => x_msg_count,
2945: x_msg_data => x_msg_data
2946: );
2947:
2948: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2949: RAISE FND_API.G_EXC_ERROR;
2950: END IF;
2951: ELSIF(p_cp_type = 'EDI') THEN
2952: assign_edi_rec(
2945: x_msg_data => x_msg_data
2946: );
2947:
2948: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2949: RAISE FND_API.G_EXC_ERROR;
2950: END IF;
2951: ELSIF(p_cp_type = 'EDI') THEN
2952: assign_edi_rec(
2953: p_edi_obj => p_edi_obj,
2970: x_msg_count => x_msg_count,
2971: x_msg_data => x_msg_data
2972: );
2973:
2974: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2975: RAISE FND_API.G_EXC_ERROR;
2976: END IF;
2977: ELSIF(p_cp_type = 'EFT') THEN
2978: assign_eft_rec(
2971: x_msg_data => x_msg_data
2972: );
2973:
2974: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2975: RAISE FND_API.G_EXC_ERROR;
2976: END IF;
2977: ELSIF(p_cp_type = 'EFT') THEN
2978: assign_eft_rec(
2979: p_eft_obj => p_eft_obj,
2996: x_msg_count => x_msg_count,
2997: x_msg_data => x_msg_data
2998: );
2999:
3000: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3001: RAISE FND_API.G_EXC_ERROR;
3002: END IF;
3003: ELSIF(p_cp_type = 'SMS') THEN
3004: assign_sms_rec(
2997: x_msg_data => x_msg_data
2998: );
2999:
3000: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3001: RAISE FND_API.G_EXC_ERROR;
3002: END IF;
3003: ELSIF(p_cp_type = 'SMS') THEN
3004: assign_sms_rec(
3005: p_sms_obj => p_sms_obj,
3022: x_msg_count => x_msg_count,
3023: x_msg_data => x_msg_data
3024: );
3025:
3026: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3027: RAISE FND_API.G_EXC_ERROR;
3028: END IF;
3029: END IF;
3030:
3023: x_msg_data => x_msg_data
3024: );
3025:
3026: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3027: RAISE FND_API.G_EXC_ERROR;
3028: END IF;
3029: END IF;
3030:
3031: IF((p_cp_pref_objs IS NOT NULL) AND (p_cp_pref_objs.COUNT > 0)) THEN
3039: x_msg_data => x_msg_data
3040: );
3041: END IF;
3042:
3043: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3044: RAISE FND_API.G_EXC_ERROR;
3045: END IF;
3046:
3047: -- reset Global variable
3040: );
3041: END IF;
3042:
3043: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3044: RAISE FND_API.G_EXC_ERROR;
3045: END IF;
3046:
3047: -- reset Global variable
3048: HZ_UTILITY_V2PUB.G_CALLING_API := NULL;
3061: p_msg_level=>fnd_log.level_procedure);
3062: END IF;
3063:
3064: EXCEPTION
3065: WHEN fnd_api.g_exc_error THEN
3066: ROLLBACK TO do_update_contact_point_pub;
3067:
3068: -- reset Global variable
3069: HZ_UTILITY_V2PUB.G_CALLING_API := NULL;
3072: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_OBJECT_ERROR');
3073: FND_MESSAGE.SET_TOKEN('OBJECT', p_cp_type);
3074: FND_MSG_PUB.ADD;
3075:
3076: x_return_status := fnd_api.g_ret_sts_error;
3077:
3078: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3079: p_count => x_msg_count,
3080: p_data => x_msg_data);
3074: FND_MSG_PUB.ADD;
3075:
3076: x_return_status := fnd_api.g_ret_sts_error;
3077:
3078: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3079: p_count => x_msg_count,
3080: p_data => x_msg_data);
3081:
3082: -- Debug info.
3091: p_prefix=>l_debug_prefix,
3092: p_msg_level=>fnd_log.level_procedure);
3093: END IF;
3094:
3095: WHEN fnd_api.g_exc_unexpected_error THEN
3096: ROLLBACK TO do_update_contact_point_pub;
3097:
3098: -- reset Global variable
3099: HZ_UTILITY_V2PUB.G_CALLING_API := NULL;
3102: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_OBJECT_ERROR');
3103: FND_MESSAGE.SET_TOKEN('OBJECT', p_cp_type);
3104: FND_MSG_PUB.ADD;
3105:
3106: x_return_status := fnd_api.g_ret_sts_unexp_error;
3107:
3108: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3109: p_count => x_msg_count,
3110: p_data => x_msg_data);
3104: FND_MSG_PUB.ADD;
3105:
3106: x_return_status := fnd_api.g_ret_sts_unexp_error;
3107:
3108: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3109: p_count => x_msg_count,
3110: p_data => x_msg_data);
3111:
3112: -- Debug info.
3132: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_OBJECT_ERROR');
3133: FND_MESSAGE.SET_TOKEN('OBJECT', p_cp_type);
3134: FND_MSG_PUB.ADD;
3135:
3136: x_return_status := fnd_api.g_ret_sts_unexp_error;
3137:
3138: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
3139: fnd_message.set_token('ERROR' ,SQLERRM);
3140: fnd_msg_pub.add;
3138: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
3139: fnd_message.set_token('ERROR' ,SQLERRM);
3140: fnd_msg_pub.add;
3141:
3142: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3143: p_count => x_msg_count,
3144: p_data => x_msg_data);
3145:
3146: -- Debug info.
3161: --
3162: -- DESCRIPTION
3163: -- Create or update a logical phone contact point.
3164: PROCEDURE save_phone_bo(
3165: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
3166: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
3167: p_phone_obj IN HZ_PHONE_CP_BO,
3168: p_created_by_module IN VARCHAR2,
3169: x_return_status OUT NOCOPY VARCHAR2,
3162: -- DESCRIPTION
3163: -- Create or update a logical phone contact point.
3164: PROCEDURE save_phone_bo(
3165: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
3166: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
3167: p_phone_obj IN HZ_PHONE_CP_BO,
3168: p_created_by_module IN VARCHAR2,
3169: x_return_status OUT NOCOPY VARCHAR2,
3170: x_msg_count OUT NOCOPY NUMBER,
3210: );
3211: END save_phone_bo;
3212:
3213: PROCEDURE save_phone_bo(
3214: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
3215: p_phone_obj IN HZ_PHONE_CP_BO,
3216: p_created_by_module IN VARCHAR2,
3217: p_obj_source IN VARCHAR2 := null,
3218: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
3214: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
3215: p_phone_obj IN HZ_PHONE_CP_BO,
3216: p_created_by_module IN VARCHAR2,
3217: p_obj_source IN VARCHAR2 := null,
3218: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
3219: x_return_status OUT NOCOPY VARCHAR2,
3220: x_messages OUT NOCOPY HZ_MESSAGE_OBJ_TBL,
3221: x_return_obj OUT NOCOPY HZ_PHONE_CP_BO,
3222: x_phone_id OUT NOCOPY NUMBER,
3232: l_phone_obj HZ_PHONE_CP_BO;
3233: BEGIN
3234: l_phone_obj := p_phone_obj;
3235: do_save_contact_point (
3236: p_init_msg_list => fnd_api.g_true,
3237: p_validate_bo_flag => p_validate_bo_flag,
3238: p_cp_id => l_phone_obj.phone_id,
3239: p_cp_os => l_phone_obj.orig_system,
3240: p_cp_osr => l_phone_obj.orig_system_reference,
3264: x_messages := HZ_PARTY_BO_PVT.return_all_messages(
3265: x_return_status => x_return_status,
3266: x_msg_count => l_msg_count,
3267: x_msg_data => l_msg_data);
3268: IF FND_API.to_Boolean(p_return_obj_flag) THEN
3269: x_return_obj := l_phone_obj;
3270: END IF;
3271: END save_phone_bo;
3272:
3274: --
3275: -- DESCRIPTION
3276: -- Create or update a logical email contact point.
3277: PROCEDURE save_email_bo(
3278: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
3279: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
3280: p_email_obj IN HZ_EMAIL_CP_BO,
3281: p_created_by_module IN VARCHAR2,
3282: x_return_status OUT NOCOPY VARCHAR2,
3275: -- DESCRIPTION
3276: -- Create or update a logical email contact point.
3277: PROCEDURE save_email_bo(
3278: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
3279: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
3280: p_email_obj IN HZ_EMAIL_CP_BO,
3281: p_created_by_module IN VARCHAR2,
3282: x_return_status OUT NOCOPY VARCHAR2,
3283: x_msg_count OUT NOCOPY NUMBER,
3323: );
3324: END save_email_bo;
3325:
3326: PROCEDURE save_email_bo(
3327: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
3328: p_email_obj IN HZ_EMAIL_CP_BO,
3329: p_created_by_module IN VARCHAR2,
3330: p_obj_source IN VARCHAR2 := null,
3331: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
3327: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
3328: p_email_obj IN HZ_EMAIL_CP_BO,
3329: p_created_by_module IN VARCHAR2,
3330: p_obj_source IN VARCHAR2 := null,
3331: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
3332: x_return_status OUT NOCOPY VARCHAR2,
3333: x_messages OUT NOCOPY HZ_MESSAGE_OBJ_TBL,
3334: x_return_obj OUT NOCOPY HZ_EMAIL_CP_BO,
3335: x_email_id OUT NOCOPY NUMBER,
3345: l_email_obj HZ_EMAIL_CP_BO;
3346: BEGIN
3347: l_email_obj := p_email_obj;
3348: do_save_contact_point (
3349: p_init_msg_list => fnd_api.g_true,
3350: p_validate_bo_flag => p_validate_bo_flag,
3351: p_cp_id => l_email_obj.email_id,
3352: p_cp_os => l_email_obj.orig_system,
3353: p_cp_osr => l_email_obj.orig_system_reference,
3377: x_messages := HZ_PARTY_BO_PVT.return_all_messages(
3378: x_return_status => x_return_status,
3379: x_msg_count => l_msg_count,
3380: x_msg_data => l_msg_data);
3381: IF FND_API.to_Boolean(p_return_obj_flag) THEN
3382: x_return_obj := l_email_obj;
3383: END IF;
3384: END save_email_bo;
3385:
3387: --
3388: -- DESCRIPTION
3389: -- Create or update a logical telex contact point.
3390: PROCEDURE save_telex_bo(
3391: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
3392: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
3393: p_telex_obj IN HZ_TELEX_CP_BO,
3394: p_created_by_module IN VARCHAR2,
3395: x_return_status OUT NOCOPY VARCHAR2,
3388: -- DESCRIPTION
3389: -- Create or update a logical telex contact point.
3390: PROCEDURE save_telex_bo(
3391: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
3392: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
3393: p_telex_obj IN HZ_TELEX_CP_BO,
3394: p_created_by_module IN VARCHAR2,
3395: x_return_status OUT NOCOPY VARCHAR2,
3396: x_msg_count OUT NOCOPY NUMBER,
3436: );
3437: END save_telex_bo;
3438:
3439: PROCEDURE save_telex_bo(
3440: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
3441: p_telex_obj IN HZ_TELEX_CP_BO,
3442: p_created_by_module IN VARCHAR2,
3443: p_obj_source IN VARCHAR2 := null,
3444: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
3440: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
3441: p_telex_obj IN HZ_TELEX_CP_BO,
3442: p_created_by_module IN VARCHAR2,
3443: p_obj_source IN VARCHAR2 := null,
3444: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
3445: x_return_status OUT NOCOPY VARCHAR2,
3446: x_messages OUT NOCOPY HZ_MESSAGE_OBJ_TBL,
3447: x_return_obj OUT NOCOPY HZ_TELEX_CP_BO,
3448: x_telex_id OUT NOCOPY NUMBER,
3458: l_telex_obj HZ_TELEX_CP_BO;
3459: BEGIN
3460: l_telex_obj := p_telex_obj;
3461: do_save_contact_point (
3462: p_init_msg_list => fnd_api.g_true,
3463: p_validate_bo_flag => p_validate_bo_flag,
3464: p_cp_id => l_telex_obj.telex_id,
3465: p_cp_os => l_telex_obj.orig_system,
3466: p_cp_osr => l_telex_obj.orig_system_reference,
3490: x_messages := HZ_PARTY_BO_PVT.return_all_messages(
3491: x_return_status => x_return_status,
3492: x_msg_count => l_msg_count,
3493: x_msg_data => l_msg_data);
3494: IF FND_API.to_Boolean(p_return_obj_flag) THEN
3495: x_return_obj := l_telex_obj;
3496: END IF;
3497: END save_telex_bo;
3498:
3500: --
3501: -- DESCRIPTION
3502: -- Create or update a logical web contact point.
3503: PROCEDURE save_web_bo(
3504: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
3505: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
3506: p_web_obj IN HZ_WEB_CP_BO,
3507: p_created_by_module IN VARCHAR2,
3508: x_return_status OUT NOCOPY VARCHAR2,
3501: -- DESCRIPTION
3502: -- Create or update a logical web contact point.
3503: PROCEDURE save_web_bo(
3504: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
3505: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
3506: p_web_obj IN HZ_WEB_CP_BO,
3507: p_created_by_module IN VARCHAR2,
3508: x_return_status OUT NOCOPY VARCHAR2,
3509: x_msg_count OUT NOCOPY NUMBER,
3549: );
3550: END save_web_bo;
3551:
3552: PROCEDURE save_web_bo(
3553: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
3554: p_web_obj IN HZ_WEB_CP_BO,
3555: p_created_by_module IN VARCHAR2,
3556: p_obj_source IN VARCHAR2 := null,
3557: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
3553: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
3554: p_web_obj IN HZ_WEB_CP_BO,
3555: p_created_by_module IN VARCHAR2,
3556: p_obj_source IN VARCHAR2 := null,
3557: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
3558: x_return_status OUT NOCOPY VARCHAR2,
3559: x_messages OUT NOCOPY HZ_MESSAGE_OBJ_TBL,
3560: x_return_obj OUT NOCOPY HZ_WEB_CP_BO,
3561: x_web_id OUT NOCOPY NUMBER,
3571: l_web_obj HZ_WEB_CP_BO;
3572: BEGIN
3573: l_web_obj := p_web_obj;
3574: do_save_contact_point (
3575: p_init_msg_list => fnd_api.g_true,
3576: p_validate_bo_flag => p_validate_bo_flag,
3577: p_cp_id => l_web_obj.web_id,
3578: p_cp_os => l_web_obj.orig_system,
3579: p_cp_osr => l_web_obj.orig_system_reference,
3603: x_messages := HZ_PARTY_BO_PVT.return_all_messages(
3604: x_return_status => x_return_status,
3605: x_msg_count => l_msg_count,
3606: x_msg_data => l_msg_data);
3607: IF FND_API.to_Boolean(p_return_obj_flag) THEN
3608: x_return_obj := l_web_obj;
3609: END IF;
3610: END save_web_bo;
3611:
3613: --
3614: -- DESCRIPTION
3615: -- Create or update a logical edi contact point.
3616: PROCEDURE save_edi_bo(
3617: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
3618: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
3619: p_edi_obj IN HZ_EDI_CP_BO,
3620: p_created_by_module IN VARCHAR2,
3621: x_return_status OUT NOCOPY VARCHAR2,
3614: -- DESCRIPTION
3615: -- Create or update a logical edi contact point.
3616: PROCEDURE save_edi_bo(
3617: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
3618: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
3619: p_edi_obj IN HZ_EDI_CP_BO,
3620: p_created_by_module IN VARCHAR2,
3621: x_return_status OUT NOCOPY VARCHAR2,
3622: x_msg_count OUT NOCOPY NUMBER,
3662: );
3663: END save_edi_bo;
3664:
3665: PROCEDURE save_edi_bo(
3666: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
3667: p_edi_obj IN HZ_EDI_CP_BO,
3668: p_created_by_module IN VARCHAR2,
3669: p_obj_source IN VARCHAR2 := null,
3670: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
3666: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
3667: p_edi_obj IN HZ_EDI_CP_BO,
3668: p_created_by_module IN VARCHAR2,
3669: p_obj_source IN VARCHAR2 := null,
3670: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
3671: x_return_status OUT NOCOPY VARCHAR2,
3672: x_messages OUT NOCOPY HZ_MESSAGE_OBJ_TBL,
3673: x_return_obj OUT NOCOPY HZ_EDI_CP_BO,
3674: x_edi_id OUT NOCOPY NUMBER,
3684: l_edi_obj HZ_EDI_CP_BO;
3685: BEGIN
3686: l_edi_obj := p_edi_obj;
3687: do_save_contact_point (
3688: p_init_msg_list => fnd_api.g_true,
3689: p_validate_bo_flag => p_validate_bo_flag,
3690: p_cp_id => l_edi_obj.edi_id,
3691: p_cp_os => l_edi_obj.orig_system,
3692: p_cp_osr => l_edi_obj.orig_system_reference,
3716: x_messages := HZ_PARTY_BO_PVT.return_all_messages(
3717: x_return_status => x_return_status,
3718: x_msg_count => l_msg_count,
3719: x_msg_data => l_msg_data);
3720: IF FND_API.to_Boolean(p_return_obj_flag) THEN
3721: x_return_obj := l_edi_obj;
3722: END IF;
3723: END save_edi_bo;
3724:
3726: --
3727: -- DESCRIPTION
3728: -- Create or update a logical eft contact point.
3729: PROCEDURE save_eft_bo(
3730: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
3731: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
3732: p_eft_obj IN HZ_EFT_CP_BO,
3733: p_created_by_module IN VARCHAR2,
3734: x_return_status OUT NOCOPY VARCHAR2,
3727: -- DESCRIPTION
3728: -- Create or update a logical eft contact point.
3729: PROCEDURE save_eft_bo(
3730: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
3731: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
3732: p_eft_obj IN HZ_EFT_CP_BO,
3733: p_created_by_module IN VARCHAR2,
3734: x_return_status OUT NOCOPY VARCHAR2,
3735: x_msg_count OUT NOCOPY NUMBER,
3775: );
3776: END save_eft_bo;
3777:
3778: PROCEDURE save_eft_bo(
3779: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
3780: p_eft_obj IN HZ_EFT_CP_BO,
3781: p_created_by_module IN VARCHAR2,
3782: p_obj_source IN VARCHAR2 := null,
3783: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
3779: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
3780: p_eft_obj IN HZ_EFT_CP_BO,
3781: p_created_by_module IN VARCHAR2,
3782: p_obj_source IN VARCHAR2 := null,
3783: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
3784: x_return_status OUT NOCOPY VARCHAR2,
3785: x_messages OUT NOCOPY HZ_MESSAGE_OBJ_TBL,
3786: x_return_obj OUT NOCOPY HZ_EFT_CP_BO,
3787: x_eft_id OUT NOCOPY NUMBER,
3797: l_eft_obj HZ_EFT_CP_BO;
3798: BEGIN
3799: l_eft_obj := p_eft_obj;
3800: do_save_contact_point (
3801: p_init_msg_list => fnd_api.g_true,
3802: p_validate_bo_flag => p_validate_bo_flag,
3803: p_cp_id => l_eft_obj.eft_id,
3804: p_cp_os => l_eft_obj.orig_system,
3805: p_cp_osr => l_eft_obj.orig_system_reference,
3829: x_messages := HZ_PARTY_BO_PVT.return_all_messages(
3830: x_return_status => x_return_status,
3831: x_msg_count => l_msg_count,
3832: x_msg_data => l_msg_data);
3833: IF FND_API.to_Boolean(p_return_obj_flag) THEN
3834: x_return_obj := l_eft_obj;
3835: END IF;
3836: END save_eft_bo;
3837:
3839: --
3840: -- DESCRIPTION
3841: -- Create or update a logical sms contact point.
3842: PROCEDURE save_sms_bo(
3843: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
3844: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
3845: p_sms_obj IN HZ_SMS_CP_BO,
3846: p_created_by_module IN VARCHAR2,
3847: x_return_status OUT NOCOPY VARCHAR2,
3840: -- DESCRIPTION
3841: -- Create or update a logical sms contact point.
3842: PROCEDURE save_sms_bo(
3843: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
3844: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
3845: p_sms_obj IN HZ_SMS_CP_BO,
3846: p_created_by_module IN VARCHAR2,
3847: x_return_status OUT NOCOPY VARCHAR2,
3848: x_msg_count OUT NOCOPY NUMBER,
3888: );
3889: END save_sms_bo;
3890:
3891: PROCEDURE save_sms_bo(
3892: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
3893: p_sms_obj IN HZ_SMS_CP_BO,
3894: p_created_by_module IN VARCHAR2,
3895: p_obj_source IN VARCHAR2 := null,
3896: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
3892: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
3893: p_sms_obj IN HZ_SMS_CP_BO,
3894: p_created_by_module IN VARCHAR2,
3895: p_obj_source IN VARCHAR2 := null,
3896: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
3897: x_return_status OUT NOCOPY VARCHAR2,
3898: x_messages OUT NOCOPY HZ_MESSAGE_OBJ_TBL,
3899: x_return_obj OUT NOCOPY HZ_SMS_CP_BO,
3900: x_sms_id OUT NOCOPY NUMBER,
3910: l_sms_obj HZ_SMS_CP_BO;
3911: BEGIN
3912: l_sms_obj := p_sms_obj;
3913: do_save_contact_point (
3914: p_init_msg_list => fnd_api.g_true,
3915: p_validate_bo_flag => p_validate_bo_flag,
3916: p_cp_id => l_sms_obj.sms_id,
3917: p_cp_os => l_sms_obj.orig_system,
3918: p_cp_osr => l_sms_obj.orig_system_reference,
3942: x_messages := HZ_PARTY_BO_PVT.return_all_messages(
3943: x_return_status => x_return_status,
3944: x_msg_count => l_msg_count,
3945: x_msg_data => l_msg_data);
3946: IF FND_API.to_Boolean(p_return_obj_flag) THEN
3947: x_return_obj := l_sms_obj;
3948: END IF;
3949: END save_sms_bo;
3950:
3952: --
3953: -- DESCRIPTION
3954: -- Save contact point.
3955: PROCEDURE do_save_contact_point (
3956: p_init_msg_list IN VARCHAR2:= FND_API.G_FALSE,
3957: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
3958: p_cp_id IN NUMBER,
3959: p_cp_os IN VARCHAR2,
3960: p_cp_osr IN VARCHAR2,
3953: -- DESCRIPTION
3954: -- Save contact point.
3955: PROCEDURE do_save_contact_point (
3956: p_init_msg_list IN VARCHAR2:= FND_API.G_FALSE,
3957: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
3958: p_cp_id IN NUMBER,
3959: p_cp_os IN VARCHAR2,
3960: p_cp_osr IN VARCHAR2,
3961: p_phone_obj IN HZ_PHONE_CP_BO,
3987: l_debug_prefix VARCHAR2(30);
3988: l_parent_table VARCHAR2(30);
3989: BEGIN
3990: -- initialize API return status to success.
3991: x_return_status := FND_API.G_RET_STS_SUCCESS;
3992:
3993: -- Initialize message list if p_init_msg_list is set to TRUE
3994: IF FND_API.to_Boolean(p_init_msg_list) THEN
3995: FND_MSG_PUB.initialize;
3990: -- initialize API return status to success.
3991: x_return_status := FND_API.G_RET_STS_SUCCESS;
3992:
3993: -- Initialize message list if p_init_msg_list is set to TRUE
3994: IF FND_API.to_Boolean(p_init_msg_list) THEN
3995: FND_MSG_PUB.initialize;
3996: END IF;
3997:
3998: -- Debug info.
4029: IF(l_create_update_flag = 'E') THEN
4030: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_OBJECT_ERROR');
4031: FND_MESSAGE.SET_TOKEN('OBJECT', p_cp_type);
4032: FND_MSG_PUB.ADD;
4033: RAISE FND_API.G_EXC_ERROR;
4034: END IF;
4035:
4036: -- base on different contact point type to pass in different object
4037: -- and call create or update
4088: x_cp_os => x_cp_os,
4089: x_cp_osr => x_cp_osr,
4090: p_parent_os => px_parent_os);
4091: ELSE
4092: RAISE FND_API.G_EXC_ERROR;
4093: END IF;
4094: WHEN p_cp_type = 'EMAIL' THEN
4095: IF(l_create_update_flag = 'C') THEN
4096: do_create_contact_point (
4143: x_cp_os => x_cp_os,
4144: x_cp_osr => x_cp_osr,
4145: p_parent_os => px_parent_os);
4146: ELSE
4147: RAISE FND_API.G_EXC_ERROR;
4148: END IF;
4149: WHEN p_cp_type = 'TLX' THEN
4150: IF(l_create_update_flag = 'C') THEN
4151: do_create_contact_point (
4198: x_cp_os => x_cp_os,
4199: x_cp_osr => x_cp_osr,
4200: p_parent_os => px_parent_os);
4201: ELSE
4202: RAISE FND_API.G_EXC_ERROR;
4203: END IF;
4204: WHEN p_cp_type = 'WEB' THEN
4205: IF(l_create_update_flag = 'C') THEN
4206: do_create_contact_point (
4253: x_cp_os => x_cp_os,
4254: x_cp_osr => x_cp_osr,
4255: p_parent_os => px_parent_os);
4256: ELSE
4257: RAISE FND_API.G_EXC_ERROR;
4258: END IF;
4259: WHEN p_cp_type = 'EDI' THEN
4260: IF(l_create_update_flag = 'C') THEN
4261: do_create_contact_point (
4308: x_cp_os => x_cp_os,
4309: x_cp_osr => x_cp_osr,
4310: p_parent_os => px_parent_os);
4311: ELSE
4312: RAISE FND_API.G_EXC_ERROR;
4313: END IF;
4314: WHEN p_cp_type = 'EFT' THEN
4315: IF(l_create_update_flag = 'C') THEN
4316: do_create_contact_point (
4363: x_cp_os => x_cp_os,
4364: x_cp_osr => x_cp_osr,
4365: p_parent_os => px_parent_os);
4366: ELSE
4367: RAISE FND_API.G_EXC_ERROR;
4368: END IF;
4369: WHEN p_cp_type = 'SMS' THEN
4370: IF(l_create_update_flag = 'C') THEN
4371: do_create_contact_point (
4418: x_cp_os => x_cp_os,
4419: x_cp_osr => x_cp_osr,
4420: p_parent_os => px_parent_os);
4421: ELSE
4422: RAISE FND_API.G_EXC_ERROR;
4423: END IF;
4424: END CASE;
4425:
4426: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
4422: RAISE FND_API.G_EXC_ERROR;
4423: END IF;
4424: END CASE;
4425:
4426: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
4427: RAISE FND_API.G_EXC_ERROR;
4428: END IF;
4429:
4430: -- reset Global variable
4423: END IF;
4424: END CASE;
4425:
4426: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
4427: RAISE FND_API.G_EXC_ERROR;
4428: END IF;
4429:
4430: -- reset Global variable
4431: HZ_UTILITY_V2PUB.G_CALLING_API := NULL;
4444: p_msg_level=>fnd_log.level_procedure);
4445: END IF;
4446:
4447: EXCEPTION
4448: WHEN fnd_api.g_exc_error THEN
4449: -- reset Global variable
4450: HZ_UTILITY_V2PUB.G_CALLING_API := NULL;
4451: HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE := NULL;
4452:
4449: -- reset Global variable
4450: HZ_UTILITY_V2PUB.G_CALLING_API := NULL;
4451: HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE := NULL;
4452:
4453: x_return_status := fnd_api.g_ret_sts_error;
4454:
4455: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4456: p_count => x_msg_count,
4457: p_data => x_msg_data);
4451: HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE := NULL;
4452:
4453: x_return_status := fnd_api.g_ret_sts_error;
4454:
4455: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4456: p_count => x_msg_count,
4457: p_data => x_msg_data);
4458:
4459: -- Debug info.
4468: p_prefix=>l_debug_prefix,
4469: p_msg_level=>fnd_log.level_procedure);
4470: END IF;
4471:
4472: WHEN fnd_api.g_exc_unexpected_error THEN
4473: -- reset Global variable
4474: HZ_UTILITY_V2PUB.G_CALLING_API := NULL;
4475: HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE := NULL;
4476:
4473: -- reset Global variable
4474: HZ_UTILITY_V2PUB.G_CALLING_API := NULL;
4475: HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE := NULL;
4476:
4477: x_return_status := fnd_api.g_ret_sts_unexp_error;
4478:
4479: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4480: p_count => x_msg_count,
4481: p_data => x_msg_data);
4475: HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE := NULL;
4476:
4477: x_return_status := fnd_api.g_ret_sts_unexp_error;
4478:
4479: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4480: p_count => x_msg_count,
4481: p_data => x_msg_data);
4482:
4483: -- Debug info.
4496: -- reset Global variable
4497: HZ_UTILITY_V2PUB.G_CALLING_API := NULL;
4498: HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE := NULL;
4499:
4500: x_return_status := fnd_api.g_ret_sts_unexp_error;
4501:
4502: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
4503: fnd_message.set_token('ERROR' ,SQLERRM);
4504: fnd_msg_pub.add;
4502: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
4503: fnd_message.set_token('ERROR' ,SQLERRM);
4504: fnd_msg_pub.add;
4505:
4506: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4507: p_count => x_msg_count,
4508: p_data => x_msg_data);
4509:
4510: -- Debug info.
4550: l_msg_data VARCHAR2(2000);
4551: l_msg_count NUMBER;
4552: BEGIN
4553: get_phone_bo (
4554: p_init_msg_list => FND_API.G_TRUE,
4555: p_phone_id => p_phone_id,
4556: p_phone_os => p_phone_os,
4557: p_phone_osr => p_phone_osr,
4558: x_phone_obj => x_phone_obj,
4580: -- p_init_msg_list Initialize message stack if it is set to
4581: -- p_phone_id phone ID.If this id passed in, return only one phone obj.
4582: -- p_phone_os phone orig system.
4583: -- p_phone_osr phone orig system reference.
4584: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
4585: -- OUT:
4586: -- x_phone_obj Logical phone record.
4587: -- x_return_status Return status after the call. The status can
4588: -- be fnd_api.g_ret_sts_success (success),
4584: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
4585: -- OUT:
4586: -- x_phone_obj Logical phone record.
4587: -- x_return_status Return status after the call. The status can
4588: -- be fnd_api.g_ret_sts_success (success),
4589: -- fnd_api.g_ret_sts_error (error),
4590: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4591: -- x_msg_count Number of messages in message stack.
4592: -- x_msg_data Message text if x_msg_count is 1.
4585: -- OUT:
4586: -- x_phone_obj Logical phone record.
4587: -- x_return_status Return status after the call. The status can
4588: -- be fnd_api.g_ret_sts_success (success),
4589: -- fnd_api.g_ret_sts_error (error),
4590: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4591: -- x_msg_count Number of messages in message stack.
4592: -- x_msg_data Message text if x_msg_count is 1.
4593: --
4586: -- x_phone_obj Logical phone record.
4587: -- x_return_status Return status after the call. The status can
4588: -- be fnd_api.g_ret_sts_success (success),
4589: -- fnd_api.g_ret_sts_error (error),
4590: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4591: -- x_msg_count Number of messages in message stack.
4592: -- x_msg_data Message text if x_msg_count is 1.
4593: --
4594: -- NOTES
4600: --
4601:
4602:
4603: PROCEDURE get_phone_bo (
4604: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
4605: p_phone_id IN NUMBER,
4606: p_phone_os IN VARCHAR2,
4607: p_phone_osr IN VARCHAR2,
4608: x_phone_obj OUT NOCOPY HZ_PHONE_CP_BO,
4618: l_phone_objs HZ_PHONE_CP_BO_TBL;
4619: BEGIN
4620:
4621: -- initialize API return status to success.
4622: x_return_status := FND_API.G_RET_STS_SUCCESS;
4623:
4624: -- Initialize message list if p_init_msg_list is set to TRUE
4625: IF FND_API.to_Boolean(p_init_msg_list) THEN
4626: FND_MSG_PUB.initialize;
4621: -- initialize API return status to success.
4622: x_return_status := FND_API.G_RET_STS_SUCCESS;
4623:
4624: -- Initialize message list if p_init_msg_list is set to TRUE
4625: IF FND_API.to_Boolean(p_init_msg_list) THEN
4626: FND_MSG_PUB.initialize;
4627: END IF;
4628:
4629:
4649: x_return_status => x_return_status,
4650: x_msg_count => x_msg_count,
4651: x_msg_data => x_msg_data);
4652:
4653: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4654: RAISE fnd_api.g_exc_error;
4655: END IF;
4656:
4657: HZ_EXTRACT_CONT_POINT_BO_PVT.get_phone_bos
4650: x_msg_count => x_msg_count,
4651: x_msg_data => x_msg_data);
4652:
4653: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4654: RAISE fnd_api.g_exc_error;
4655: END IF;
4656:
4657: HZ_EXTRACT_CONT_POINT_BO_PVT.get_phone_bos
4658: (p_init_msg_list => fnd_api.g_false,
4654: RAISE fnd_api.g_exc_error;
4655: END IF;
4656:
4657: HZ_EXTRACT_CONT_POINT_BO_PVT.get_phone_bos
4658: (p_init_msg_list => fnd_api.g_false,
4659: p_phone_id => l_phone_id,
4660: p_parent_id => NULL,
4661: p_parent_table_name => NULL,
4662: p_action_type => NULL,
4665: x_msg_count => x_msg_count,
4666: x_msg_data => x_msg_data);
4667:
4668: x_phone_obj := l_phone_objs(1);
4669: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4670: RAISE FND_API.G_EXC_ERROR;
4671: END IF;
4672:
4673:
4666: x_msg_data => x_msg_data);
4667:
4668: x_phone_obj := l_phone_objs(1);
4669: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4670: RAISE FND_API.G_EXC_ERROR;
4671: END IF;
4672:
4673:
4674: -- Debug info.
4688:
4689:
4690: EXCEPTION
4691:
4692: WHEN fnd_api.g_exc_error THEN
4693: x_return_status := fnd_api.g_ret_sts_error;
4694:
4695: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4696: p_count => x_msg_count,
4689:
4690: EXCEPTION
4691:
4692: WHEN fnd_api.g_exc_error THEN
4693: x_return_status := fnd_api.g_ret_sts_error;
4694:
4695: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4696: p_count => x_msg_count,
4697: p_data => x_msg_data);
4691:
4692: WHEN fnd_api.g_exc_error THEN
4693: x_return_status := fnd_api.g_ret_sts_error;
4694:
4695: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4696: p_count => x_msg_count,
4697: p_data => x_msg_data);
4698:
4699: -- Debug info.
4707: hz_utility_v2pub.debug(p_message=>'hz_phone_bo_pub.get_phone_bo (-)',
4708: p_prefix=>l_debug_prefix,
4709: p_msg_level=>fnd_log.level_procedure);
4710: END IF;
4711: WHEN fnd_api.g_exc_unexpected_error THEN
4712: x_return_status := fnd_api.g_ret_sts_unexp_error;
4713:
4714: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4715: p_count => x_msg_count,
4708: p_prefix=>l_debug_prefix,
4709: p_msg_level=>fnd_log.level_procedure);
4710: END IF;
4711: WHEN fnd_api.g_exc_unexpected_error THEN
4712: x_return_status := fnd_api.g_ret_sts_unexp_error;
4713:
4714: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4715: p_count => x_msg_count,
4716: p_data => x_msg_data);
4710: END IF;
4711: WHEN fnd_api.g_exc_unexpected_error THEN
4712: x_return_status := fnd_api.g_ret_sts_unexp_error;
4713:
4714: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4715: p_count => x_msg_count,
4716: p_data => x_msg_data);
4717:
4718: -- Debug info.
4727: p_prefix=>l_debug_prefix,
4728: p_msg_level=>fnd_log.level_procedure);
4729: END IF;
4730: WHEN OTHERS THEN
4731: x_return_status := fnd_api.g_ret_sts_unexp_error;
4732:
4733: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
4734: fnd_message.set_token('ERROR' ,SQLERRM);
4735: fnd_msg_pub.add;
4733: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
4734: fnd_message.set_token('ERROR' ,SQLERRM);
4735: fnd_msg_pub.add;
4736:
4737: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4738: p_count => x_msg_count,
4739: p_data => x_msg_data);
4740:
4741: -- Debug info.
4764: l_msg_data VARCHAR2(2000);
4765: l_msg_count NUMBER;
4766: BEGIN
4767: get_telex_bo (
4768: p_init_msg_list => FND_API.G_TRUE,
4769: p_telex_id => p_telex_id,
4770: p_telex_os => p_telex_os,
4771: p_telex_osr => p_telex_osr,
4772: x_telex_obj => x_telex_obj,
4793: -- p_init_msg_list Initialize message stack if it is set to
4794: -- p_telex_id telex ID.If this id passed in, return only one telex obj.
4795: -- p_telex_os telex orig system.
4796: -- p_telex_osr telex orig system reference.
4797: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
4798: -- OUT:
4799: -- x_telex_obj Logical telex record.
4800: -- x_return_status Return status after the call. The status can
4801: -- be fnd_api.g_ret_sts_success (success),
4797: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
4798: -- OUT:
4799: -- x_telex_obj Logical telex record.
4800: -- x_return_status Return status after the call. The status can
4801: -- be fnd_api.g_ret_sts_success (success),
4802: -- fnd_api.g_ret_sts_error (error),
4803: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4804: -- x_msg_count Number of messages in message stack.
4805: -- x_msg_data Message text if x_msg_count is 1.
4798: -- OUT:
4799: -- x_telex_obj Logical telex record.
4800: -- x_return_status Return status after the call. The status can
4801: -- be fnd_api.g_ret_sts_success (success),
4802: -- fnd_api.g_ret_sts_error (error),
4803: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4804: -- x_msg_count Number of messages in message stack.
4805: -- x_msg_data Message text if x_msg_count is 1.
4806: --
4799: -- x_telex_obj Logical telex record.
4800: -- x_return_status Return status after the call. The status can
4801: -- be fnd_api.g_ret_sts_success (success),
4802: -- fnd_api.g_ret_sts_error (error),
4803: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4804: -- x_msg_count Number of messages in message stack.
4805: -- x_msg_data Message text if x_msg_count is 1.
4806: --
4807: -- NOTES
4813: --
4814:
4815:
4816: PROCEDURE get_telex_bo (
4817: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
4818: p_telex_id IN NUMBER,
4819: p_telex_os IN VARCHAR2,
4820: p_telex_osr IN VARCHAR2,
4821: x_telex_obj OUT NOCOPY HZ_TELEX_CP_BO,
4831: l_telex_objs HZ_TELEX_CP_BO_TBL;
4832: BEGIN
4833:
4834: -- initialize API return status to success.
4835: x_return_status := FND_API.G_RET_STS_SUCCESS;
4836:
4837: -- Initialize message list if p_init_msg_list is set to TRUE
4838: IF FND_API.to_Boolean(p_init_msg_list) THEN
4839: FND_MSG_PUB.initialize;
4834: -- initialize API return status to success.
4835: x_return_status := FND_API.G_RET_STS_SUCCESS;
4836:
4837: -- Initialize message list if p_init_msg_list is set to TRUE
4838: IF FND_API.to_Boolean(p_init_msg_list) THEN
4839: FND_MSG_PUB.initialize;
4840: END IF;
4841:
4842:
4862: x_return_status => x_return_status,
4863: x_msg_count => x_msg_count,
4864: x_msg_data => x_msg_data);
4865:
4866: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4867: RAISE fnd_api.g_exc_error;
4868: END IF;
4869:
4870: HZ_EXTRACT_CONT_POINT_BO_PVT.get_telex_bos
4863: x_msg_count => x_msg_count,
4864: x_msg_data => x_msg_data);
4865:
4866: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4867: RAISE fnd_api.g_exc_error;
4868: END IF;
4869:
4870: HZ_EXTRACT_CONT_POINT_BO_PVT.get_telex_bos
4871: (p_init_msg_list => fnd_api.g_false,
4867: RAISE fnd_api.g_exc_error;
4868: END IF;
4869:
4870: HZ_EXTRACT_CONT_POINT_BO_PVT.get_telex_bos
4871: (p_init_msg_list => fnd_api.g_false,
4872: p_telex_id => l_telex_id,
4873: p_parent_id => NULL,
4874: p_parent_table_name => NULL,
4875: p_action_type => NULL,
4878: x_msg_count => x_msg_count,
4879: x_msg_data => x_msg_data);
4880:
4881: x_telex_obj := l_telex_objs(1);
4882: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4883: RAISE FND_API.G_EXC_ERROR;
4884: END IF;
4885:
4886:
4879: x_msg_data => x_msg_data);
4880:
4881: x_telex_obj := l_telex_objs(1);
4882: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4883: RAISE FND_API.G_EXC_ERROR;
4884: END IF;
4885:
4886:
4887: -- Debug info.
4901:
4902:
4903: EXCEPTION
4904:
4905: WHEN fnd_api.g_exc_error THEN
4906: x_return_status := fnd_api.g_ret_sts_error;
4907:
4908: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4909: p_count => x_msg_count,
4902:
4903: EXCEPTION
4904:
4905: WHEN fnd_api.g_exc_error THEN
4906: x_return_status := fnd_api.g_ret_sts_error;
4907:
4908: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4909: p_count => x_msg_count,
4910: p_data => x_msg_data);
4904:
4905: WHEN fnd_api.g_exc_error THEN
4906: x_return_status := fnd_api.g_ret_sts_error;
4907:
4908: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4909: p_count => x_msg_count,
4910: p_data => x_msg_data);
4911:
4912: -- Debug info.
4920: hz_utility_v2pub.debug(p_message=>'hz_telex_bo_pub.get_telex_bo (-)',
4921: p_prefix=>l_debug_prefix,
4922: p_msg_level=>fnd_log.level_procedure);
4923: END IF;
4924: WHEN fnd_api.g_exc_unexpected_error THEN
4925: x_return_status := fnd_api.g_ret_sts_unexp_error;
4926:
4927: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4928: p_count => x_msg_count,
4921: p_prefix=>l_debug_prefix,
4922: p_msg_level=>fnd_log.level_procedure);
4923: END IF;
4924: WHEN fnd_api.g_exc_unexpected_error THEN
4925: x_return_status := fnd_api.g_ret_sts_unexp_error;
4926:
4927: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4928: p_count => x_msg_count,
4929: p_data => x_msg_data);
4923: END IF;
4924: WHEN fnd_api.g_exc_unexpected_error THEN
4925: x_return_status := fnd_api.g_ret_sts_unexp_error;
4926:
4927: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4928: p_count => x_msg_count,
4929: p_data => x_msg_data);
4930:
4931: -- Debug info.
4940: p_prefix=>l_debug_prefix,
4941: p_msg_level=>fnd_log.level_procedure);
4942: END IF;
4943: WHEN OTHERS THEN
4944: x_return_status := fnd_api.g_ret_sts_unexp_error;
4945:
4946: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
4947: fnd_message.set_token('ERROR' ,SQLERRM);
4948: fnd_msg_pub.add;
4946: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
4947: fnd_message.set_token('ERROR' ,SQLERRM);
4948: fnd_msg_pub.add;
4949:
4950: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4951: p_count => x_msg_count,
4952: p_data => x_msg_data);
4953:
4954: -- Debug info.
4977: l_msg_data VARCHAR2(2000);
4978: l_msg_count NUMBER;
4979: BEGIN
4980: get_email_bo (
4981: p_init_msg_list => FND_API.G_TRUE,
4982: p_email_id => p_email_id,
4983: p_email_os => p_email_os,
4984: p_email_osr => p_email_osr,
4985: x_email_obj => x_email_obj,
5006: -- p_init_msg_list Initialize message stack if it is set to
5007: -- p_email_id email ID.If this id passed in, return only one email obj.
5008: -- p_email_os email orig system.
5009: -- p_email_osr email orig system reference.
5010: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
5011: -- OUT:
5012: -- x_email_obj Logical email record.
5013: -- x_return_status Return status after the call. The status can
5014: -- be fnd_api.g_ret_sts_success (success),
5010: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
5011: -- OUT:
5012: -- x_email_obj Logical email record.
5013: -- x_return_status Return status after the call. The status can
5014: -- be fnd_api.g_ret_sts_success (success),
5015: -- fnd_api.g_ret_sts_error (error),
5016: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
5017: -- x_msg_count Number of messages in message stack.
5018: -- x_msg_data Message text if x_msg_count is 1.
5011: -- OUT:
5012: -- x_email_obj Logical email record.
5013: -- x_return_status Return status after the call. The status can
5014: -- be fnd_api.g_ret_sts_success (success),
5015: -- fnd_api.g_ret_sts_error (error),
5016: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
5017: -- x_msg_count Number of messages in message stack.
5018: -- x_msg_data Message text if x_msg_count is 1.
5019: --
5012: -- x_email_obj Logical email record.
5013: -- x_return_status Return status after the call. The status can
5014: -- be fnd_api.g_ret_sts_success (success),
5015: -- fnd_api.g_ret_sts_error (error),
5016: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
5017: -- x_msg_count Number of messages in message stack.
5018: -- x_msg_data Message text if x_msg_count is 1.
5019: --
5020: -- NOTES
5026: --
5027:
5028:
5029: PROCEDURE get_email_bo (
5030: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
5031: p_email_id IN NUMBER,
5032: p_email_os IN VARCHAR2,
5033: p_email_osr IN VARCHAR2,
5034: x_email_obj OUT NOCOPY HZ_EMAIL_CP_BO,
5044: l_email_objs HZ_EMAIL_CP_BO_TBL;
5045: BEGIN
5046:
5047: -- initialize API return status to success.
5048: x_return_status := FND_API.G_RET_STS_SUCCESS;
5049:
5050: -- Initialize message list if p_init_msg_list is set to TRUE
5051: IF FND_API.to_Boolean(p_init_msg_list) THEN
5052: FND_MSG_PUB.initialize;
5047: -- initialize API return status to success.
5048: x_return_status := FND_API.G_RET_STS_SUCCESS;
5049:
5050: -- Initialize message list if p_init_msg_list is set to TRUE
5051: IF FND_API.to_Boolean(p_init_msg_list) THEN
5052: FND_MSG_PUB.initialize;
5053: END IF;
5054:
5055:
5075: x_return_status => x_return_status,
5076: x_msg_count => x_msg_count,
5077: x_msg_data => x_msg_data);
5078:
5079: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5080: RAISE fnd_api.g_exc_error;
5081: END IF;
5082:
5083: HZ_EXTRACT_CONT_POINT_BO_PVT.get_email_bos
5076: x_msg_count => x_msg_count,
5077: x_msg_data => x_msg_data);
5078:
5079: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5080: RAISE fnd_api.g_exc_error;
5081: END IF;
5082:
5083: HZ_EXTRACT_CONT_POINT_BO_PVT.get_email_bos
5084: (p_init_msg_list => fnd_api.g_false,
5080: RAISE fnd_api.g_exc_error;
5081: END IF;
5082:
5083: HZ_EXTRACT_CONT_POINT_BO_PVT.get_email_bos
5084: (p_init_msg_list => fnd_api.g_false,
5085: p_email_id => l_email_id,
5086: p_parent_id => NULL,
5087: p_parent_table_name => NULL,
5088: p_action_type => NULL,
5091: x_msg_count => x_msg_count,
5092: x_msg_data => x_msg_data);
5093:
5094: x_email_obj := l_email_objs(1);
5095: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5096: RAISE FND_API.G_EXC_ERROR;
5097: END IF;
5098:
5099:
5092: x_msg_data => x_msg_data);
5093:
5094: x_email_obj := l_email_objs(1);
5095: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5096: RAISE FND_API.G_EXC_ERROR;
5097: END IF;
5098:
5099:
5100: -- Debug info.
5114:
5115:
5116: EXCEPTION
5117:
5118: WHEN fnd_api.g_exc_error THEN
5119: x_return_status := fnd_api.g_ret_sts_error;
5120:
5121: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5122: p_count => x_msg_count,
5115:
5116: EXCEPTION
5117:
5118: WHEN fnd_api.g_exc_error THEN
5119: x_return_status := fnd_api.g_ret_sts_error;
5120:
5121: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5122: p_count => x_msg_count,
5123: p_data => x_msg_data);
5117:
5118: WHEN fnd_api.g_exc_error THEN
5119: x_return_status := fnd_api.g_ret_sts_error;
5120:
5121: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5122: p_count => x_msg_count,
5123: p_data => x_msg_data);
5124:
5125: -- Debug info.
5133: hz_utility_v2pub.debug(p_message=>'hz_email_bo_pub.get_email_bo (-)',
5134: p_prefix=>l_debug_prefix,
5135: p_msg_level=>fnd_log.level_procedure);
5136: END IF;
5137: WHEN fnd_api.g_exc_unexpected_error THEN
5138: x_return_status := fnd_api.g_ret_sts_unexp_error;
5139:
5140: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5141: p_count => x_msg_count,
5134: p_prefix=>l_debug_prefix,
5135: p_msg_level=>fnd_log.level_procedure);
5136: END IF;
5137: WHEN fnd_api.g_exc_unexpected_error THEN
5138: x_return_status := fnd_api.g_ret_sts_unexp_error;
5139:
5140: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5141: p_count => x_msg_count,
5142: p_data => x_msg_data);
5136: END IF;
5137: WHEN fnd_api.g_exc_unexpected_error THEN
5138: x_return_status := fnd_api.g_ret_sts_unexp_error;
5139:
5140: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5141: p_count => x_msg_count,
5142: p_data => x_msg_data);
5143:
5144: -- Debug info.
5153: p_prefix=>l_debug_prefix,
5154: p_msg_level=>fnd_log.level_procedure);
5155: END IF;
5156: WHEN OTHERS THEN
5157: x_return_status := fnd_api.g_ret_sts_unexp_error;
5158:
5159: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
5160: fnd_message.set_token('ERROR' ,SQLERRM);
5161: fnd_msg_pub.add;
5159: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
5160: fnd_message.set_token('ERROR' ,SQLERRM);
5161: fnd_msg_pub.add;
5162:
5163: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5164: p_count => x_msg_count,
5165: p_data => x_msg_data);
5166:
5167: -- Debug info.
5190: l_msg_data VARCHAR2(2000);
5191: l_msg_count NUMBER;
5192: BEGIN
5193: get_web_bo (
5194: p_init_msg_list => FND_API.G_TRUE,
5195: p_web_id => p_web_id,
5196: p_web_os => p_web_os,
5197: p_web_osr => p_web_osr,
5198: x_web_obj => x_web_obj,
5219: -- p_init_msg_list Initialize message stack if it is set to
5220: -- p_web_id web ID.If this id passed in, return only one web obj.
5221: -- p_web_os web orig system.
5222: -- p_web_osr web orig system reference.
5223: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
5224: -- OUT:
5225: -- x_web_obj Logical web record.
5226: -- x_return_status Return status after the call. The status can
5227: -- be fnd_api.g_ret_sts_success (success),
5223: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
5224: -- OUT:
5225: -- x_web_obj Logical web record.
5226: -- x_return_status Return status after the call. The status can
5227: -- be fnd_api.g_ret_sts_success (success),
5228: -- fnd_api.g_ret_sts_error (error),
5229: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
5230: -- x_msg_count Number of messages in message stack.
5231: -- x_msg_data Message text if x_msg_count is 1.
5224: -- OUT:
5225: -- x_web_obj Logical web record.
5226: -- x_return_status Return status after the call. The status can
5227: -- be fnd_api.g_ret_sts_success (success),
5228: -- fnd_api.g_ret_sts_error (error),
5229: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
5230: -- x_msg_count Number of messages in message stack.
5231: -- x_msg_data Message text if x_msg_count is 1.
5232: --
5225: -- x_web_obj Logical web record.
5226: -- x_return_status Return status after the call. The status can
5227: -- be fnd_api.g_ret_sts_success (success),
5228: -- fnd_api.g_ret_sts_error (error),
5229: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
5230: -- x_msg_count Number of messages in message stack.
5231: -- x_msg_data Message text if x_msg_count is 1.
5232: --
5233: -- NOTES
5239: --
5240:
5241:
5242: PROCEDURE get_web_bo (
5243: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
5244: p_web_id IN NUMBER,
5245: p_web_os IN VARCHAR2,
5246: p_web_osr IN VARCHAR2,
5247: x_web_obj OUT NOCOPY HZ_WEB_CP_BO,
5257: l_web_objs HZ_WEB_CP_BO_TBL;
5258: BEGIN
5259:
5260: -- initialize API return status to success.
5261: x_return_status := FND_API.G_RET_STS_SUCCESS;
5262:
5263: -- Initialize message list if p_init_msg_list is set to TRUE
5264: IF FND_API.to_Boolean(p_init_msg_list) THEN
5265: FND_MSG_PUB.initialize;
5260: -- initialize API return status to success.
5261: x_return_status := FND_API.G_RET_STS_SUCCESS;
5262:
5263: -- Initialize message list if p_init_msg_list is set to TRUE
5264: IF FND_API.to_Boolean(p_init_msg_list) THEN
5265: FND_MSG_PUB.initialize;
5266: END IF;
5267:
5268:
5288: x_return_status => x_return_status,
5289: x_msg_count => x_msg_count,
5290: x_msg_data => x_msg_data);
5291:
5292: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5293: RAISE fnd_api.g_exc_error;
5294: END IF;
5295:
5296: HZ_EXTRACT_CONT_POINT_BO_PVT.get_web_bos
5289: x_msg_count => x_msg_count,
5290: x_msg_data => x_msg_data);
5291:
5292: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5293: RAISE fnd_api.g_exc_error;
5294: END IF;
5295:
5296: HZ_EXTRACT_CONT_POINT_BO_PVT.get_web_bos
5297: (p_init_msg_list => fnd_api.g_false,
5293: RAISE fnd_api.g_exc_error;
5294: END IF;
5295:
5296: HZ_EXTRACT_CONT_POINT_BO_PVT.get_web_bos
5297: (p_init_msg_list => fnd_api.g_false,
5298: p_web_id => l_web_id,
5299: p_parent_id => NULL,
5300: p_parent_table_name => NULL,
5301: p_action_type => NULL,
5304: x_msg_count => x_msg_count,
5305: x_msg_data => x_msg_data);
5306:
5307: x_web_obj := l_web_objs(1);
5308: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5309: RAISE FND_API.G_EXC_ERROR;
5310: END IF;
5311:
5312:
5305: x_msg_data => x_msg_data);
5306:
5307: x_web_obj := l_web_objs(1);
5308: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5309: RAISE FND_API.G_EXC_ERROR;
5310: END IF;
5311:
5312:
5313: -- Debug info.
5327:
5328:
5329: EXCEPTION
5330:
5331: WHEN fnd_api.g_exc_error THEN
5332: x_return_status := fnd_api.g_ret_sts_error;
5333:
5334: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5335: p_count => x_msg_count,
5328:
5329: EXCEPTION
5330:
5331: WHEN fnd_api.g_exc_error THEN
5332: x_return_status := fnd_api.g_ret_sts_error;
5333:
5334: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5335: p_count => x_msg_count,
5336: p_data => x_msg_data);
5330:
5331: WHEN fnd_api.g_exc_error THEN
5332: x_return_status := fnd_api.g_ret_sts_error;
5333:
5334: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5335: p_count => x_msg_count,
5336: p_data => x_msg_data);
5337:
5338: -- Debug info.
5346: hz_utility_v2pub.debug(p_message=>'hz_web_bo_pub.get_web_bo (-)',
5347: p_prefix=>l_debug_prefix,
5348: p_msg_level=>fnd_log.level_procedure);
5349: END IF;
5350: WHEN fnd_api.g_exc_unexpected_error THEN
5351: x_return_status := fnd_api.g_ret_sts_unexp_error;
5352:
5353: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5354: p_count => x_msg_count,
5347: p_prefix=>l_debug_prefix,
5348: p_msg_level=>fnd_log.level_procedure);
5349: END IF;
5350: WHEN fnd_api.g_exc_unexpected_error THEN
5351: x_return_status := fnd_api.g_ret_sts_unexp_error;
5352:
5353: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5354: p_count => x_msg_count,
5355: p_data => x_msg_data);
5349: END IF;
5350: WHEN fnd_api.g_exc_unexpected_error THEN
5351: x_return_status := fnd_api.g_ret_sts_unexp_error;
5352:
5353: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5354: p_count => x_msg_count,
5355: p_data => x_msg_data);
5356:
5357: -- Debug info.
5366: p_prefix=>l_debug_prefix,
5367: p_msg_level=>fnd_log.level_procedure);
5368: END IF;
5369: WHEN OTHERS THEN
5370: x_return_status := fnd_api.g_ret_sts_unexp_error;
5371:
5372: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
5373: fnd_message.set_token('ERROR' ,SQLERRM);
5374: fnd_msg_pub.add;
5372: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
5373: fnd_message.set_token('ERROR' ,SQLERRM);
5374: fnd_msg_pub.add;
5375:
5376: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5377: p_count => x_msg_count,
5378: p_data => x_msg_data);
5379:
5380: -- Debug info.
5403: l_msg_data VARCHAR2(2000);
5404: l_msg_count NUMBER;
5405: BEGIN
5406: get_edi_bo (
5407: p_init_msg_list => FND_API.G_TRUE,
5408: p_edi_id => p_edi_id,
5409: p_edi_os => p_edi_os,
5410: p_edi_osr => p_edi_osr,
5411: x_edi_obj => x_edi_obj,
5431: -- p_init_msg_list Initialize message stack if it is set to
5432: -- p_edi_id edi ID.If this id passed in, return only one edi obj.
5433: -- p_edi_os edi orig system.
5434: -- p_edi_osr edi orig system reference.
5435: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
5436: -- OUT:
5437: -- x_edi_obj Logical edi record.
5438: -- x_return_status Return status after the call. The status can
5439: -- be fnd_api.g_ret_sts_success (success),
5435: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
5436: -- OUT:
5437: -- x_edi_obj Logical edi record.
5438: -- x_return_status Return status after the call. The status can
5439: -- be fnd_api.g_ret_sts_success (success),
5440: -- fnd_api.g_ret_sts_error (error),
5441: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
5442: -- x_msg_count Number of messages in message stack.
5443: -- x_msg_data Message text if x_msg_count is 1.
5436: -- OUT:
5437: -- x_edi_obj Logical edi record.
5438: -- x_return_status Return status after the call. The status can
5439: -- be fnd_api.g_ret_sts_success (success),
5440: -- fnd_api.g_ret_sts_error (error),
5441: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
5442: -- x_msg_count Number of messages in message stack.
5443: -- x_msg_data Message text if x_msg_count is 1.
5444: --
5437: -- x_edi_obj Logical edi record.
5438: -- x_return_status Return status after the call. The status can
5439: -- be fnd_api.g_ret_sts_success (success),
5440: -- fnd_api.g_ret_sts_error (error),
5441: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
5442: -- x_msg_count Number of messages in message stack.
5443: -- x_msg_data Message text if x_msg_count is 1.
5444: --
5445: -- NOTES
5451: --
5452:
5453:
5454: PROCEDURE get_edi_bo (
5455: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
5456: p_edi_id IN NUMBER,
5457: p_edi_os IN VARCHAR2,
5458: p_edi_osr IN VARCHAR2,
5459: x_edi_obj OUT NOCOPY HZ_EDI_CP_BO,
5469: l_edi_objs HZ_EDI_CP_BO_TBL;
5470: BEGIN
5471:
5472: -- initialize API return status to success.
5473: x_return_status := FND_API.G_RET_STS_SUCCESS;
5474:
5475: -- Initialize message list if p_init_msg_list is set to TRUE
5476: IF FND_API.to_Boolean(p_init_msg_list) THEN
5477: FND_MSG_PUB.initialize;
5472: -- initialize API return status to success.
5473: x_return_status := FND_API.G_RET_STS_SUCCESS;
5474:
5475: -- Initialize message list if p_init_msg_list is set to TRUE
5476: IF FND_API.to_Boolean(p_init_msg_list) THEN
5477: FND_MSG_PUB.initialize;
5478: END IF;
5479:
5480:
5500: x_return_status => x_return_status,
5501: x_msg_count => x_msg_count,
5502: x_msg_data => x_msg_data);
5503:
5504: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5505: RAISE fnd_api.g_exc_error;
5506: END IF;
5507:
5508: HZ_EXTRACT_CONT_POINT_BO_PVT.get_edi_bos
5501: x_msg_count => x_msg_count,
5502: x_msg_data => x_msg_data);
5503:
5504: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5505: RAISE fnd_api.g_exc_error;
5506: END IF;
5507:
5508: HZ_EXTRACT_CONT_POINT_BO_PVT.get_edi_bos
5509: (p_init_msg_list => fnd_api.g_false,
5505: RAISE fnd_api.g_exc_error;
5506: END IF;
5507:
5508: HZ_EXTRACT_CONT_POINT_BO_PVT.get_edi_bos
5509: (p_init_msg_list => fnd_api.g_false,
5510: p_edi_id => l_edi_id,
5511: p_parent_id => NULL,
5512: p_parent_table_name => NULL,
5513: p_action_type => NULL,
5516: x_msg_count => x_msg_count,
5517: x_msg_data => x_msg_data);
5518:
5519: x_edi_obj := l_edi_objs(1);
5520: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5521: RAISE FND_API.G_EXC_ERROR;
5522: END IF;
5523:
5524:
5517: x_msg_data => x_msg_data);
5518:
5519: x_edi_obj := l_edi_objs(1);
5520: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5521: RAISE FND_API.G_EXC_ERROR;
5522: END IF;
5523:
5524:
5525: -- Debug info.
5539:
5540:
5541: EXCEPTION
5542:
5543: WHEN fnd_api.g_exc_error THEN
5544: x_return_status := fnd_api.g_ret_sts_error;
5545:
5546: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5547: p_count => x_msg_count,
5540:
5541: EXCEPTION
5542:
5543: WHEN fnd_api.g_exc_error THEN
5544: x_return_status := fnd_api.g_ret_sts_error;
5545:
5546: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5547: p_count => x_msg_count,
5548: p_data => x_msg_data);
5542:
5543: WHEN fnd_api.g_exc_error THEN
5544: x_return_status := fnd_api.g_ret_sts_error;
5545:
5546: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5547: p_count => x_msg_count,
5548: p_data => x_msg_data);
5549:
5550: -- Debug info.
5558: hz_utility_v2pub.debug(p_message=>'hz_edi_bo_pub.get_edi_bo (-)',
5559: p_prefix=>l_debug_prefix,
5560: p_msg_level=>fnd_log.level_procedure);
5561: END IF;
5562: WHEN fnd_api.g_exc_unexpected_error THEN
5563: x_return_status := fnd_api.g_ret_sts_unexp_error;
5564:
5565: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5566: p_count => x_msg_count,
5559: p_prefix=>l_debug_prefix,
5560: p_msg_level=>fnd_log.level_procedure);
5561: END IF;
5562: WHEN fnd_api.g_exc_unexpected_error THEN
5563: x_return_status := fnd_api.g_ret_sts_unexp_error;
5564:
5565: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5566: p_count => x_msg_count,
5567: p_data => x_msg_data);
5561: END IF;
5562: WHEN fnd_api.g_exc_unexpected_error THEN
5563: x_return_status := fnd_api.g_ret_sts_unexp_error;
5564:
5565: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5566: p_count => x_msg_count,
5567: p_data => x_msg_data);
5568:
5569: -- Debug info.
5578: p_prefix=>l_debug_prefix,
5579: p_msg_level=>fnd_log.level_procedure);
5580: END IF;
5581: WHEN OTHERS THEN
5582: x_return_status := fnd_api.g_ret_sts_unexp_error;
5583:
5584: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
5585: fnd_message.set_token('ERROR' ,SQLERRM);
5586: fnd_msg_pub.add;
5584: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
5585: fnd_message.set_token('ERROR' ,SQLERRM);
5586: fnd_msg_pub.add;
5587:
5588: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5589: p_count => x_msg_count,
5590: p_data => x_msg_data);
5591:
5592: -- Debug info.
5615: l_msg_data VARCHAR2(2000);
5616: l_msg_count NUMBER;
5617: BEGIN
5618: get_eft_bo (
5619: p_init_msg_list => FND_API.G_TRUE,
5620: p_eft_id => p_eft_id,
5621: p_eft_os => p_eft_os,
5622: p_eft_osr => p_eft_osr,
5623: x_eft_obj => x_eft_obj,
5644: -- p_init_msg_list Initialize message stack if it is set to
5645: -- p_eft_id eft ID.If this id passed in, return only one eft obj.
5646: -- p_eft_os eft orig system.
5647: -- p_eft_osr eft orig system reference.
5648: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
5649: -- OUT:
5650: -- x_eft_obj Logical eft record.
5651: -- x_return_status Return status after the call. The status can
5652: -- be fnd_api.g_ret_sts_success (success),
5648: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
5649: -- OUT:
5650: -- x_eft_obj Logical eft record.
5651: -- x_return_status Return status after the call. The status can
5652: -- be fnd_api.g_ret_sts_success (success),
5653: -- fnd_api.g_ret_sts_error (error),
5654: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
5655: -- x_msg_count Number of messages in message stack.
5656: -- x_msg_data Message text if x_msg_count is 1.
5649: -- OUT:
5650: -- x_eft_obj Logical eft record.
5651: -- x_return_status Return status after the call. The status can
5652: -- be fnd_api.g_ret_sts_success (success),
5653: -- fnd_api.g_ret_sts_error (error),
5654: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
5655: -- x_msg_count Number of messages in message stack.
5656: -- x_msg_data Message text if x_msg_count is 1.
5657: --
5650: -- x_eft_obj Logical eft record.
5651: -- x_return_status Return status after the call. The status can
5652: -- be fnd_api.g_ret_sts_success (success),
5653: -- fnd_api.g_ret_sts_error (error),
5654: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
5655: -- x_msg_count Number of messages in message stack.
5656: -- x_msg_data Message text if x_msg_count is 1.
5657: --
5658: -- NOTES
5664: --
5665:
5666:
5667: PROCEDURE get_eft_bo (
5668: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
5669: p_eft_id IN NUMBER,
5670: p_eft_os IN VARCHAR2,
5671: p_eft_osr IN VARCHAR2,
5672: x_eft_obj OUT NOCOPY HZ_EFT_CP_BO,
5682: l_eft_objs HZ_EFT_CP_BO_TBL;
5683: BEGIN
5684:
5685: -- initialize API return status to success.
5686: x_return_status := FND_API.G_RET_STS_SUCCESS;
5687:
5688: -- Initialize message list if p_init_msg_list is set to TRUE
5689: IF FND_API.to_Boolean(p_init_msg_list) THEN
5690: FND_MSG_PUB.initialize;
5685: -- initialize API return status to success.
5686: x_return_status := FND_API.G_RET_STS_SUCCESS;
5687:
5688: -- Initialize message list if p_init_msg_list is set to TRUE
5689: IF FND_API.to_Boolean(p_init_msg_list) THEN
5690: FND_MSG_PUB.initialize;
5691: END IF;
5692:
5693:
5713: x_return_status => x_return_status,
5714: x_msg_count => x_msg_count,
5715: x_msg_data => x_msg_data);
5716:
5717: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5718: RAISE fnd_api.g_exc_error;
5719: END IF;
5720:
5721: HZ_EXTRACT_CONT_POINT_BO_PVT.get_eft_bos
5714: x_msg_count => x_msg_count,
5715: x_msg_data => x_msg_data);
5716:
5717: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5718: RAISE fnd_api.g_exc_error;
5719: END IF;
5720:
5721: HZ_EXTRACT_CONT_POINT_BO_PVT.get_eft_bos
5722: (p_init_msg_list => fnd_api.g_false,
5718: RAISE fnd_api.g_exc_error;
5719: END IF;
5720:
5721: HZ_EXTRACT_CONT_POINT_BO_PVT.get_eft_bos
5722: (p_init_msg_list => fnd_api.g_false,
5723: p_eft_id => l_eft_id,
5724: p_parent_id => NULL,
5725: p_parent_table_name => NULL,
5726: p_action_type => NULL,
5729: x_msg_count => x_msg_count,
5730: x_msg_data => x_msg_data);
5731:
5732: x_eft_obj := l_eft_objs(1);
5733: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5734: RAISE FND_API.G_EXC_ERROR;
5735: END IF;
5736:
5737:
5730: x_msg_data => x_msg_data);
5731:
5732: x_eft_obj := l_eft_objs(1);
5733: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5734: RAISE FND_API.G_EXC_ERROR;
5735: END IF;
5736:
5737:
5738: -- Debug info.
5752:
5753:
5754: EXCEPTION
5755:
5756: WHEN fnd_api.g_exc_error THEN
5757: x_return_status := fnd_api.g_ret_sts_error;
5758:
5759: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5760: p_count => x_msg_count,
5753:
5754: EXCEPTION
5755:
5756: WHEN fnd_api.g_exc_error THEN
5757: x_return_status := fnd_api.g_ret_sts_error;
5758:
5759: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5760: p_count => x_msg_count,
5761: p_data => x_msg_data);
5755:
5756: WHEN fnd_api.g_exc_error THEN
5757: x_return_status := fnd_api.g_ret_sts_error;
5758:
5759: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5760: p_count => x_msg_count,
5761: p_data => x_msg_data);
5762:
5763: -- Debug info.
5771: hz_utility_v2pub.debug(p_message=>'hz_eft_bo_pub.get_eft_bo (-)',
5772: p_prefix=>l_debug_prefix,
5773: p_msg_level=>fnd_log.level_procedure);
5774: END IF;
5775: WHEN fnd_api.g_exc_unexpected_error THEN
5776: x_return_status := fnd_api.g_ret_sts_unexp_error;
5777:
5778: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5779: p_count => x_msg_count,
5772: p_prefix=>l_debug_prefix,
5773: p_msg_level=>fnd_log.level_procedure);
5774: END IF;
5775: WHEN fnd_api.g_exc_unexpected_error THEN
5776: x_return_status := fnd_api.g_ret_sts_unexp_error;
5777:
5778: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5779: p_count => x_msg_count,
5780: p_data => x_msg_data);
5774: END IF;
5775: WHEN fnd_api.g_exc_unexpected_error THEN
5776: x_return_status := fnd_api.g_ret_sts_unexp_error;
5777:
5778: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5779: p_count => x_msg_count,
5780: p_data => x_msg_data);
5781:
5782: -- Debug info.
5791: p_prefix=>l_debug_prefix,
5792: p_msg_level=>fnd_log.level_procedure);
5793: END IF;
5794: WHEN OTHERS THEN
5795: x_return_status := fnd_api.g_ret_sts_unexp_error;
5796:
5797: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
5798: fnd_message.set_token('ERROR' ,SQLERRM);
5799: fnd_msg_pub.add;
5797: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
5798: fnd_message.set_token('ERROR' ,SQLERRM);
5799: fnd_msg_pub.add;
5800:
5801: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5802: p_count => x_msg_count,
5803: p_data => x_msg_data);
5804:
5805: -- Debug info.
5828: l_msg_data VARCHAR2(2000);
5829: l_msg_count NUMBER;
5830: BEGIN
5831: get_sms_bo (
5832: p_init_msg_list => FND_API.G_TRUE,
5833: p_sms_id => p_sms_id,
5834: p_sms_os => p_sms_os,
5835: p_sms_osr => p_sms_osr,
5836: x_sms_obj => x_sms_obj,
5857: -- p_init_msg_list Initialize message stack if it is set to
5858: -- p_sms_id sms ID.If this id passed in, return only one sms obj.
5859: -- p_sms_os sms orig system.
5860: -- p_sms_osr sms orig system reference.
5861: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
5862: -- OUT:
5863: -- x_sms_obj Logical sms record.
5864: -- x_return_status Return status after the call. The status can
5865: -- be fnd_api.g_ret_sts_success (success),
5861: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
5862: -- OUT:
5863: -- x_sms_obj Logical sms record.
5864: -- x_return_status Return status after the call. The status can
5865: -- be fnd_api.g_ret_sts_success (success),
5866: -- fnd_api.g_ret_sts_error (error),
5867: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
5868: -- x_msg_count Number of messages in message stack.
5869: -- x_msg_data Message text if x_msg_count is 1.
5862: -- OUT:
5863: -- x_sms_obj Logical sms record.
5864: -- x_return_status Return status after the call. The status can
5865: -- be fnd_api.g_ret_sts_success (success),
5866: -- fnd_api.g_ret_sts_error (error),
5867: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
5868: -- x_msg_count Number of messages in message stack.
5869: -- x_msg_data Message text if x_msg_count is 1.
5870: --
5863: -- x_sms_obj Logical sms record.
5864: -- x_return_status Return status after the call. The status can
5865: -- be fnd_api.g_ret_sts_success (success),
5866: -- fnd_api.g_ret_sts_error (error),
5867: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
5868: -- x_msg_count Number of messages in message stack.
5869: -- x_msg_data Message text if x_msg_count is 1.
5870: --
5871: -- NOTES
5877: --
5878:
5879:
5880: PROCEDURE get_sms_bo (
5881: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
5882: p_sms_id IN NUMBER,
5883: p_sms_os IN VARCHAR2,
5884: p_sms_osr IN VARCHAR2,
5885: x_sms_obj OUT NOCOPY HZ_SMS_CP_BO,
5895: l_sms_objs HZ_SMS_CP_BO_TBL;
5896: BEGIN
5897:
5898: -- initialize API return status to success.
5899: x_return_status := FND_API.G_RET_STS_SUCCESS;
5900:
5901: -- Initialize message list if p_init_msg_list is set to TRUE
5902: IF FND_API.to_Boolean(p_init_msg_list) THEN
5903: FND_MSG_PUB.initialize;
5898: -- initialize API return status to success.
5899: x_return_status := FND_API.G_RET_STS_SUCCESS;
5900:
5901: -- Initialize message list if p_init_msg_list is set to TRUE
5902: IF FND_API.to_Boolean(p_init_msg_list) THEN
5903: FND_MSG_PUB.initialize;
5904: END IF;
5905:
5906:
5926: x_return_status => x_return_status,
5927: x_msg_count => x_msg_count,
5928: x_msg_data => x_msg_data);
5929:
5930: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5931: RAISE fnd_api.g_exc_error;
5932: END IF;
5933:
5934: HZ_EXTRACT_CONT_POINT_BO_PVT.get_sms_bos
5927: x_msg_count => x_msg_count,
5928: x_msg_data => x_msg_data);
5929:
5930: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5931: RAISE fnd_api.g_exc_error;
5932: END IF;
5933:
5934: HZ_EXTRACT_CONT_POINT_BO_PVT.get_sms_bos
5935: (p_init_msg_list => fnd_api.g_false,
5931: RAISE fnd_api.g_exc_error;
5932: END IF;
5933:
5934: HZ_EXTRACT_CONT_POINT_BO_PVT.get_sms_bos
5935: (p_init_msg_list => fnd_api.g_false,
5936: p_sms_id => l_sms_id,
5937: p_parent_id => NULL,
5938: p_parent_table_name => NULL,
5939: p_action_type => NULL,
5942: x_msg_count => x_msg_count,
5943: x_msg_data => x_msg_data);
5944:
5945: x_sms_obj := l_sms_objs(1);
5946: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5947: RAISE FND_API.G_EXC_ERROR;
5948: END IF;
5949:
5950:
5943: x_msg_data => x_msg_data);
5944:
5945: x_sms_obj := l_sms_objs(1);
5946: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5947: RAISE FND_API.G_EXC_ERROR;
5948: END IF;
5949:
5950:
5951: -- Debug info.
5965:
5966:
5967: EXCEPTION
5968:
5969: WHEN fnd_api.g_exc_error THEN
5970: x_return_status := fnd_api.g_ret_sts_error;
5971:
5972: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5973: p_count => x_msg_count,
5966:
5967: EXCEPTION
5968:
5969: WHEN fnd_api.g_exc_error THEN
5970: x_return_status := fnd_api.g_ret_sts_error;
5971:
5972: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5973: p_count => x_msg_count,
5974: p_data => x_msg_data);
5968:
5969: WHEN fnd_api.g_exc_error THEN
5970: x_return_status := fnd_api.g_ret_sts_error;
5971:
5972: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5973: p_count => x_msg_count,
5974: p_data => x_msg_data);
5975:
5976: -- Debug info.
5984: hz_utility_v2pub.debug(p_message=>'hz_sms_bo_pub.get_sms_bo (-)',
5985: p_prefix=>l_debug_prefix,
5986: p_msg_level=>fnd_log.level_procedure);
5987: END IF;
5988: WHEN fnd_api.g_exc_unexpected_error THEN
5989: x_return_status := fnd_api.g_ret_sts_unexp_error;
5990:
5991: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5992: p_count => x_msg_count,
5985: p_prefix=>l_debug_prefix,
5986: p_msg_level=>fnd_log.level_procedure);
5987: END IF;
5988: WHEN fnd_api.g_exc_unexpected_error THEN
5989: x_return_status := fnd_api.g_ret_sts_unexp_error;
5990:
5991: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5992: p_count => x_msg_count,
5993: p_data => x_msg_data);
5987: END IF;
5988: WHEN fnd_api.g_exc_unexpected_error THEN
5989: x_return_status := fnd_api.g_ret_sts_unexp_error;
5990:
5991: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
5992: p_count => x_msg_count,
5993: p_data => x_msg_data);
5994:
5995: -- Debug info.
6004: p_prefix=>l_debug_prefix,
6005: p_msg_level=>fnd_log.level_procedure);
6006: END IF;
6007: WHEN OTHERS THEN
6008: x_return_status := fnd_api.g_ret_sts_unexp_error;
6009:
6010: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
6011: fnd_message.set_token('ERROR' ,SQLERRM);
6012: fnd_msg_pub.add;
6010: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
6011: fnd_message.set_token('ERROR' ,SQLERRM);
6012: fnd_msg_pub.add;
6013:
6014: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
6015: p_count => x_msg_count,
6016: p_data => x_msg_data);
6017:
6018: -- Debug info.