[Home] [Help]
426: -- p_subject_id Subject Id.
427: -- p_subject_type Subject type.
428: -- OUT:
429: -- x_return_status Return status after the call. The status can
430: -- be fnd_api.g_ret_sts_success (success),
431: -- fnd_api.g_ret_sts_error (error),
432: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
433: -- x_msg_count Number of messages in message stack.
434: -- x_msg_data Message text if x_msg_count is 1.
427: -- p_subject_type Subject type.
428: -- OUT:
429: -- x_return_status Return status after the call. The status can
430: -- be fnd_api.g_ret_sts_success (success),
431: -- fnd_api.g_ret_sts_error (error),
432: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
433: -- x_msg_count Number of messages in message stack.
434: -- x_msg_data Message text if x_msg_count is 1.
435: --
428: -- OUT:
429: -- x_return_status Return status after the call. The status can
430: -- be fnd_api.g_ret_sts_success (success),
431: -- fnd_api.g_ret_sts_error (error),
432: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
433: -- x_msg_count Number of messages in message stack.
434: -- x_msg_data Message text if x_msg_count is 1.
435: --
436: -- NOTES
461: -- Standard start of API savepoint
462: SAVEPOINT create_relationships_pvt;
463:
464: -- initialize API return status to success.
465: x_return_status := FND_API.G_RET_STS_SUCCESS;
466:
467: -- Debug info.
468: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
469: hz_utility_v2pub.debug(p_message=>'create_relationships(+)',
493: x_return_status => x_return_status,
494: x_msg_count => x_msg_count,
495: x_msg_data => x_msg_data);
496:
497: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
498: RAISE FND_API.G_EXC_ERROR;
499: ELSE
500: assign_relationship_rec(
501: p_relationship_obj => p_rel_objs(i),
494: x_msg_count => x_msg_count,
495: x_msg_data => x_msg_data);
496:
497: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
498: RAISE FND_API.G_EXC_ERROR;
499: ELSE
500: assign_relationship_rec(
501: p_relationship_obj => p_rel_objs(i),
502: p_subject_id => p_subject_id,
515: x_msg_count => x_msg_count,
516: x_msg_data => x_msg_data
517: );
518:
519: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
520: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
521: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_party_bo_pvt.create_relationships, subject id: '||p_subject_id||' object id: '||p_rel_objs(i).related_object_id,
522: p_prefix=>l_debug_prefix,
523: p_msg_level=>fnd_log.level_procedure);
521: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_party_bo_pvt.create_relationships, subject id: '||p_subject_id||' object id: '||p_rel_objs(i).related_object_id,
522: p_prefix=>l_debug_prefix,
523: p_msg_level=>fnd_log.level_procedure);
524: END IF;
525: RAISE FND_API.G_EXC_ERROR;
526: END IF;
527:
528: -- assign relationship_id and party_id
529: p_rel_objs(i).relationship_id := l_rel_id;
542: p_prefix=>l_debug_prefix,
543: p_msg_level=>fnd_log.level_procedure);
544: END IF;
545: EXCEPTION
546: WHEN fnd_api.g_exc_error THEN
547: ROLLBACK TO create_relationships_pvt;
548: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
549: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_RELATIONSHIPS');
550: FND_MSG_PUB.ADD;
548: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
549: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_RELATIONSHIPS');
550: FND_MSG_PUB.ADD;
551:
552: x_return_status := fnd_api.g_ret_sts_error;
553:
554: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
555: p_count => x_msg_count,
556: p_data => x_msg_data);
550: FND_MSG_PUB.ADD;
551:
552: x_return_status := fnd_api.g_ret_sts_error;
553:
554: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
555: p_count => x_msg_count,
556: p_data => x_msg_data);
557:
558: -- Debug info.
566: hz_utility_v2pub.debug(p_message=>'create_relationships(-)',
567: p_prefix=>l_debug_prefix,
568: p_msg_level=>fnd_log.level_procedure);
569: END IF;
570: WHEN fnd_api.g_exc_unexpected_error THEN
571: ROLLBACK TO create_relationships_pvt;
572: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
573: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_RELATIONSHIPS');
574: FND_MSG_PUB.ADD;
572: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
573: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_RELATIONSHIPS');
574: FND_MSG_PUB.ADD;
575:
576: x_return_status := fnd_api.g_ret_sts_unexp_error;
577:
578: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
579: p_count => x_msg_count,
580: p_data => x_msg_data);
574: FND_MSG_PUB.ADD;
575:
576: x_return_status := fnd_api.g_ret_sts_unexp_error;
577:
578: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
579: p_count => x_msg_count,
580: p_data => x_msg_data);
581:
582: -- Debug info.
597: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
598: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_RELATIONSHIPS');
599: FND_MSG_PUB.ADD;
600:
601: x_return_status := fnd_api.g_ret_sts_unexp_error;
602:
603: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
604: fnd_message.set_token('ERROR' ,SQLERRM);
605: fnd_msg_pub.add;
603: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
604: fnd_message.set_token('ERROR' ,SQLERRM);
605: fnd_msg_pub.add;
606:
607: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
608: p_count => x_msg_count,
609: p_data => x_msg_data);
610:
611: -- Debug info.
635: -- p_subject_id Subject Id.
636: -- p_subject_type Subject type.
637: -- OUT:
638: -- x_return_status Return status after the call. The status can
639: -- be fnd_api.g_ret_sts_success (success),
640: -- fnd_api.g_ret_sts_error (error),
641: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
642: -- x_msg_count Number of messages in message stack.
643: -- x_msg_data Message text if x_msg_count is 1.
636: -- p_subject_type Subject type.
637: -- OUT:
638: -- x_return_status Return status after the call. The status can
639: -- be fnd_api.g_ret_sts_success (success),
640: -- fnd_api.g_ret_sts_error (error),
641: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
642: -- x_msg_count Number of messages in message stack.
643: -- x_msg_data Message text if x_msg_count is 1.
644: --
637: -- OUT:
638: -- x_return_status Return status after the call. The status can
639: -- be fnd_api.g_ret_sts_success (success),
640: -- fnd_api.g_ret_sts_error (error),
641: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
642: -- x_msg_count Number of messages in message stack.
643: -- x_msg_data Message text if x_msg_count is 1.
644: --
645: -- NOTES
685: -- Standard start of API savepoint
686: SAVEPOINT save_relationships_pvt;
687:
688: -- initialize API return status to success.
689: x_return_status := FND_API.G_RET_STS_SUCCESS;
690:
691: -- Debug info.
692: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
693: hz_utility_v2pub.debug(p_message=>'save_relationships(+)',
717: x_return_status => x_return_status,
718: x_msg_count => x_msg_count,
719: x_msg_data => x_msg_data);
720:
721: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
722: RAISE FND_API.G_EXC_ERROR;
723: ELSE
724: assign_relationship_rec(
725: p_relationship_obj => p_rel_objs(i),
718: x_msg_count => x_msg_count,
719: x_msg_data => x_msg_data);
720:
721: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
722: RAISE FND_API.G_EXC_ERROR;
723: ELSE
724: assign_relationship_rec(
725: p_relationship_obj => p_rel_objs(i),
726: p_subject_id => p_subject_id,
769: -- assign relationship_id and party_id
770: p_rel_objs(i).relationship_id := l_rel_rec.relationship_id;
771: END IF;
772:
773: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
774: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
775: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_party_bo_pvt.save_relationships, subject id: '||p_subject_id||' object id: '||p_rel_objs(i).related_object_id,
776: p_prefix=>l_debug_prefix,
777: p_msg_level=>fnd_log.level_procedure);
775: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_party_bo_pvt.save_relationships, subject id: '||p_subject_id||' object id: '||p_rel_objs(i).related_object_id,
776: p_prefix=>l_debug_prefix,
777: p_msg_level=>fnd_log.level_procedure);
778: END IF;
779: RAISE FND_API.G_EXC_ERROR;
780: END IF;
781: END IF;
782: END LOOP;
783:
793: p_prefix=>l_debug_prefix,
794: p_msg_level=>fnd_log.level_procedure);
795: END IF;
796: EXCEPTION
797: WHEN fnd_api.g_exc_error THEN
798: ROLLBACK TO save_relationships_pvt;
799: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
800: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_RELATIONSHIPS');
801: FND_MSG_PUB.ADD;
799: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
800: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_RELATIONSHIPS');
801: FND_MSG_PUB.ADD;
802:
803: x_return_status := fnd_api.g_ret_sts_error;
804:
805: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
806: p_count => x_msg_count,
807: p_data => x_msg_data);
801: FND_MSG_PUB.ADD;
802:
803: x_return_status := fnd_api.g_ret_sts_error;
804:
805: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
806: p_count => x_msg_count,
807: p_data => x_msg_data);
808:
809: -- Debug info.
817: hz_utility_v2pub.debug(p_message=>'save_relationships(-)',
818: p_prefix=>l_debug_prefix,
819: p_msg_level=>fnd_log.level_procedure);
820: END IF;
821: WHEN fnd_api.g_exc_unexpected_error THEN
822: ROLLBACK TO save_relationships_pvt;
823: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
824: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_RELATIONSHIPS');
825: FND_MSG_PUB.ADD;
823: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
824: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_RELATIONSHIPS');
825: FND_MSG_PUB.ADD;
826:
827: x_return_status := fnd_api.g_ret_sts_unexp_error;
828:
829: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
830: p_count => x_msg_count,
831: p_data => x_msg_data);
825: FND_MSG_PUB.ADD;
826:
827: x_return_status := fnd_api.g_ret_sts_unexp_error;
828:
829: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
830: p_count => x_msg_count,
831: p_data => x_msg_data);
832:
833: -- Debug info.
848: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
849: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_RELATIONSHIPS');
850: FND_MSG_PUB.ADD;
851:
852: x_return_status := fnd_api.g_ret_sts_unexp_error;
853:
854: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
855: fnd_message.set_token('ERROR' ,SQLERRM);
856: fnd_msg_pub.add;
854: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
855: fnd_message.set_token('ERROR' ,SQLERRM);
856: fnd_msg_pub.add;
857:
858: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
859: p_count => x_msg_count,
860: p_data => x_msg_data);
861:
862: -- Debug info.
873: END IF;
874: END save_relationships;
875:
876: PROCEDURE create_relationship_obj(
877: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
878: p_rel_obj IN OUT NOCOPY HZ_RELATIONSHIP_OBJ,
879: p_created_by_module IN VARCHAR2,
880: x_relationship_id OUT NOCOPY NUMBER,
881: x_return_status OUT NOCOPY VARCHAR2,
894: -- Standard start of API savepoint
895: SAVEPOINT create_relatobj_pvt;
896:
897: -- initialize API return status to success.
898: x_return_status := FND_API.G_RET_STS_SUCCESS;
899:
900: -- Initialize message list if p_init_msg_list is set to TRUE
901: IF FND_API.to_Boolean(p_init_msg_list) THEN
902: FND_MSG_PUB.initialize;
897: -- initialize API return status to success.
898: x_return_status := FND_API.G_RET_STS_SUCCESS;
899:
900: -- Initialize message list if p_init_msg_list is set to TRUE
901: IF FND_API.to_Boolean(p_init_msg_list) THEN
902: FND_MSG_PUB.initialize;
903: END IF;
904:
905: -- Debug info.
946: x_msg_count => x_msg_count,
947: x_msg_data => x_msg_data
948: );
949:
950: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
951: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
952: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_party_bo_pvt.create_relationship_obj, subject id: '||p_rel_obj.parent_object_id||' object id: '||p_rel_obj.related_object_id,
953: p_prefix=>l_debug_prefix,
954: p_msg_level=>fnd_log.level_procedure);
952: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_party_bo_pvt.create_relationship_obj, subject id: '||p_rel_obj.parent_object_id||' object id: '||p_rel_obj.related_object_id,
953: p_prefix=>l_debug_prefix,
954: p_msg_level=>fnd_log.level_procedure);
955: END IF;
956: RAISE FND_API.G_EXC_ERROR;
957: END IF;
958:
959: -- assign relationship_id and party_id
960: p_rel_obj.relationship_id := x_relationship_id;
971: p_prefix=>l_debug_prefix,
972: p_msg_level=>fnd_log.level_procedure);
973: END IF;
974: EXCEPTION
975: WHEN fnd_api.g_exc_error THEN
976: ROLLBACK TO create_relatobj_pvt;
977: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
978: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_RELATIONSHIPS');
979: FND_MSG_PUB.ADD;
977: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
978: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_RELATIONSHIPS');
979: FND_MSG_PUB.ADD;
980:
981: x_return_status := fnd_api.g_ret_sts_error;
982:
983: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
984: p_count => x_msg_count,
985: p_data => x_msg_data);
979: FND_MSG_PUB.ADD;
980:
981: x_return_status := fnd_api.g_ret_sts_error;
982:
983: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
984: p_count => x_msg_count,
985: p_data => x_msg_data);
986:
987: -- Debug info.
995: hz_utility_v2pub.debug(p_message=>'create_relatobj_pvt(-)',
996: p_prefix=>l_debug_prefix,
997: p_msg_level=>fnd_log.level_procedure);
998: END IF;
999: WHEN fnd_api.g_exc_unexpected_error THEN
1000: ROLLBACK TO create_relatobj_pvt;
1001: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
1002: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_RELATIONSHIPS');
1003: FND_MSG_PUB.ADD;
1001: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
1002: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_RELATIONSHIPS');
1003: FND_MSG_PUB.ADD;
1004:
1005: x_return_status := fnd_api.g_ret_sts_unexp_error;
1006:
1007: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1008: p_count => x_msg_count,
1009: p_data => x_msg_data);
1003: FND_MSG_PUB.ADD;
1004:
1005: x_return_status := fnd_api.g_ret_sts_unexp_error;
1006:
1007: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1008: p_count => x_msg_count,
1009: p_data => x_msg_data);
1010:
1011: -- Debug info.
1026: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
1027: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_RELATIONSHIPS');
1028: FND_MSG_PUB.ADD;
1029:
1030: x_return_status := fnd_api.g_ret_sts_unexp_error;
1031:
1032: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
1033: fnd_message.set_token('ERROR' ,SQLERRM);
1034: fnd_msg_pub.add;
1032: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
1033: fnd_message.set_token('ERROR' ,SQLERRM);
1034: fnd_msg_pub.add;
1035:
1036: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1037: p_count => x_msg_count,
1038: p_data => x_msg_data);
1039:
1040: -- Debug info.
1051: END IF;
1052: END create_relationship_obj;
1053:
1054: PROCEDURE update_relationship_obj(
1055: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
1056: p_rel_obj IN OUT NOCOPY HZ_RELATIONSHIP_OBJ,
1057: x_relationship_id OUT NOCOPY NUMBER,
1058: x_return_status OUT NOCOPY VARCHAR2,
1059: x_msg_count OUT NOCOPY NUMBER,
1082: -- Standard start of API savepoint
1083: SAVEPOINT update_relatobj_pvt;
1084:
1085: -- initialize API return status to success.
1086: x_return_status := FND_API.G_RET_STS_SUCCESS;
1087:
1088: -- Initialize message list if p_init_msg_list is set to TRUE
1089: IF FND_API.to_Boolean(p_init_msg_list) THEN
1090: FND_MSG_PUB.initialize;
1085: -- initialize API return status to success.
1086: x_return_status := FND_API.G_RET_STS_SUCCESS;
1087:
1088: -- Initialize message list if p_init_msg_list is set to TRUE
1089: IF FND_API.to_Boolean(p_init_msg_list) THEN
1090: FND_MSG_PUB.initialize;
1091: END IF;
1092:
1093: -- Debug info.
1133:
1134: -- assign relationship_id
1135: p_rel_obj.relationship_id := x_relationship_id;
1136:
1137: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1138: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1139: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_party_bo_pvt.update_relationship_obj, subject id: '||p_rel_obj.parent_object_id||' object id: '||p_rel_obj.related_object_id,
1140: p_prefix=>l_debug_prefix,
1141: p_msg_level=>fnd_log.level_procedure);
1139: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_party_bo_pvt.update_relationship_obj, subject id: '||p_rel_obj.parent_object_id||' object id: '||p_rel_obj.related_object_id,
1140: p_prefix=>l_debug_prefix,
1141: p_msg_level=>fnd_log.level_procedure);
1142: END IF;
1143: RAISE FND_API.G_EXC_ERROR;
1144: END IF;
1145:
1146: -- Debug info.
1147: IF fnd_log.level_exception>=fnd_log.g_current_runtime_level THEN
1155: p_prefix=>l_debug_prefix,
1156: p_msg_level=>fnd_log.level_procedure);
1157: END IF;
1158: EXCEPTION
1159: WHEN fnd_api.g_exc_error THEN
1160: ROLLBACK TO update_relatobj_pvt;
1161: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
1162: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_RELATIONSHIPS');
1163: FND_MSG_PUB.ADD;
1161: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
1162: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_RELATIONSHIPS');
1163: FND_MSG_PUB.ADD;
1164:
1165: x_return_status := fnd_api.g_ret_sts_error;
1166:
1167: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1168: p_count => x_msg_count,
1169: p_data => x_msg_data);
1163: FND_MSG_PUB.ADD;
1164:
1165: x_return_status := fnd_api.g_ret_sts_error;
1166:
1167: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1168: p_count => x_msg_count,
1169: p_data => x_msg_data);
1170:
1171: -- Debug info.
1179: hz_utility_v2pub.debug(p_message=>'update_relatobj_pvt(-)',
1180: p_prefix=>l_debug_prefix,
1181: p_msg_level=>fnd_log.level_procedure);
1182: END IF;
1183: WHEN fnd_api.g_exc_unexpected_error THEN
1184: ROLLBACK TO update_relatobj_pvt;
1185: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
1186: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_RELATIONSHIPS');
1187: FND_MSG_PUB.ADD;
1185: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
1186: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_RELATIONSHIPS');
1187: FND_MSG_PUB.ADD;
1188:
1189: x_return_status := fnd_api.g_ret_sts_unexp_error;
1190:
1191: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1192: p_count => x_msg_count,
1193: p_data => x_msg_data);
1187: FND_MSG_PUB.ADD;
1188:
1189: x_return_status := fnd_api.g_ret_sts_unexp_error;
1190:
1191: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1192: p_count => x_msg_count,
1193: p_data => x_msg_data);
1194:
1195: -- Debug info.
1210: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
1211: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_RELATIONSHIPS');
1212: FND_MSG_PUB.ADD;
1213:
1214: x_return_status := fnd_api.g_ret_sts_unexp_error;
1215:
1216: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
1217: fnd_message.set_token('ERROR' ,SQLERRM);
1218: fnd_msg_pub.add;
1216: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
1217: fnd_message.set_token('ERROR' ,SQLERRM);
1218: fnd_msg_pub.add;
1219:
1220: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1221: p_count => x_msg_count,
1222: p_data => x_msg_data);
1223:
1224: -- Debug info.
1235: END IF;
1236: END update_relationship_obj;
1237:
1238: PROCEDURE save_relationship_obj(
1239: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
1240: p_rel_obj IN OUT NOCOPY HZ_RELATIONSHIP_OBJ,
1241: p_created_by_module IN VARCHAR2,
1242: x_relationship_id OUT NOCOPY NUMBER,
1243: x_return_status OUT NOCOPY VARCHAR2,
1267: -- Standard start of API savepoint
1268: SAVEPOINT save_relatobj_pvt;
1269:
1270: -- initialize API return status to success.
1271: x_return_status := FND_API.G_RET_STS_SUCCESS;
1272:
1273: -- Initialize message list if p_init_msg_list is set to TRUE
1274: IF FND_API.to_Boolean(p_init_msg_list) THEN
1275: FND_MSG_PUB.initialize;
1270: -- initialize API return status to success.
1271: x_return_status := FND_API.G_RET_STS_SUCCESS;
1272:
1273: -- Initialize message list if p_init_msg_list is set to TRUE
1274: IF FND_API.to_Boolean(p_init_msg_list) THEN
1275: FND_MSG_PUB.initialize;
1276: END IF;
1277:
1278:
1343: -- assign relationship_id
1344: p_rel_obj.relationship_id := x_relationship_id;
1345: END IF;
1346:
1347: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1348: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1349: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_party_bo_pvt.save_relationship_obj, subject id: '||p_rel_obj.parent_object_id||' object id: '||p_rel_obj.related_object_id,
1350: p_prefix=>l_debug_prefix,
1351: p_msg_level=>fnd_log.level_procedure);
1349: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_party_bo_pvt.save_relationship_obj, subject id: '||p_rel_obj.parent_object_id||' object id: '||p_rel_obj.related_object_id,
1350: p_prefix=>l_debug_prefix,
1351: p_msg_level=>fnd_log.level_procedure);
1352: END IF;
1353: RAISE FND_API.G_EXC_ERROR;
1354: END IF;
1355:
1356: -- Debug info.
1357: IF fnd_log.level_exception>=fnd_log.g_current_runtime_level THEN
1365: p_prefix=>l_debug_prefix,
1366: p_msg_level=>fnd_log.level_procedure);
1367: END IF;
1368: EXCEPTION
1369: WHEN fnd_api.g_exc_error THEN
1370: ROLLBACK TO save_relatobj_pvt;
1371: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
1372: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_RELATIONSHIPS');
1373: FND_MSG_PUB.ADD;
1371: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
1372: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_RELATIONSHIPS');
1373: FND_MSG_PUB.ADD;
1374:
1375: x_return_status := fnd_api.g_ret_sts_error;
1376:
1377: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1378: p_count => x_msg_count,
1379: p_data => x_msg_data);
1373: FND_MSG_PUB.ADD;
1374:
1375: x_return_status := fnd_api.g_ret_sts_error;
1376:
1377: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1378: p_count => x_msg_count,
1379: p_data => x_msg_data);
1380:
1381: -- Debug info.
1389: hz_utility_v2pub.debug(p_message=>'save_relatobj_pvt(-)',
1390: p_prefix=>l_debug_prefix,
1391: p_msg_level=>fnd_log.level_procedure);
1392: END IF;
1393: WHEN fnd_api.g_exc_unexpected_error THEN
1394: ROLLBACK TO save_relatobj_pvt;
1395: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
1396: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_RELATIONSHIPS');
1397: FND_MSG_PUB.ADD;
1395: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
1396: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_RELATIONSHIPS');
1397: FND_MSG_PUB.ADD;
1398:
1399: x_return_status := fnd_api.g_ret_sts_unexp_error;
1400:
1401: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1402: p_count => x_msg_count,
1403: p_data => x_msg_data);
1397: FND_MSG_PUB.ADD;
1398:
1399: x_return_status := fnd_api.g_ret_sts_unexp_error;
1400:
1401: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1402: p_count => x_msg_count,
1403: p_data => x_msg_data);
1404:
1405: -- Debug info.
1420: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
1421: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_RELATIONSHIPS');
1422: FND_MSG_PUB.ADD;
1423:
1424: x_return_status := fnd_api.g_ret_sts_unexp_error;
1425:
1426: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
1427: fnd_message.set_token('ERROR' ,SQLERRM);
1428: fnd_msg_pub.add;
1426: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
1427: fnd_message.set_token('ERROR' ,SQLERRM);
1428: fnd_msg_pub.add;
1429:
1430: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1431: p_count => x_msg_count,
1432: p_data => x_msg_data);
1433:
1434: -- Debug info.
1453: -- EXTERNAL PROCEDURES/FUNCTIONS ACCESSED
1454: --
1455: -- ARGUMENTS
1456: -- IN:
1457: -- p_init_msg_list Initialize message stack if it is set to FND_API.G_TRUE. Default is FND_API.G_FALSE.
1458: -- p_relationship_id Relationship Id.
1459: -- OUT:
1460: -- x_relationship_obj Relationship object.
1461: -- x_return_status Return status after the call. The status can
1458: -- p_relationship_id Relationship Id.
1459: -- OUT:
1460: -- x_relationship_obj Relationship object.
1461: -- x_return_status Return status after the call. The status can
1462: -- be fnd_api.g_ret_sts_success (success),
1463: -- fnd_api.g_ret_sts_error (error),
1464: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
1465: -- x_msg_count Number of messages in message stack.
1466: -- x_msg_data Message text if x_msg_count is 1.
1459: -- OUT:
1460: -- x_relationship_obj Relationship object.
1461: -- x_return_status Return status after the call. The status can
1462: -- be fnd_api.g_ret_sts_success (success),
1463: -- fnd_api.g_ret_sts_error (error),
1464: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
1465: -- x_msg_count Number of messages in message stack.
1466: -- x_msg_data Message text if x_msg_count is 1.
1467: --
1460: -- x_relationship_obj Relationship object.
1461: -- x_return_status Return status after the call. The status can
1462: -- be fnd_api.g_ret_sts_success (success),
1463: -- fnd_api.g_ret_sts_error (error),
1464: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
1465: -- x_msg_count Number of messages in message stack.
1466: -- x_msg_data Message text if x_msg_count is 1.
1467: --
1468: -- NOTES
1472: -- 14-DEC-2004 Arnold Ng Created.
1473: --
1474:
1475: PROCEDURE get_relationship_obj(
1476: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1477: p_relationship_id IN NUMBER,
1478: x_relationship_obj OUT NOCOPY HZ_RELATIONSHIP_OBJ,
1479: x_return_status OUT NOCOPY VARCHAR2,
1480: x_msg_count OUT NOCOPY NUMBER,
1560: AND DIRECTIONAL_FLAG = 'F';
1561:
1562: BEGIN
1563: -- initialize API return status to success.
1564: x_return_status := FND_API.G_RET_STS_SUCCESS;
1565:
1566: -- Initialize message list if p_init_msg_list is set to TRUE
1567: IF FND_API.to_Boolean(p_init_msg_list) THEN
1568: FND_MSG_PUB.initialize;
1563: -- initialize API return status to success.
1564: x_return_status := FND_API.G_RET_STS_SUCCESS;
1565:
1566: -- Initialize message list if p_init_msg_list is set to TRUE
1567: IF FND_API.to_Boolean(p_init_msg_list) THEN
1568: FND_MSG_PUB.initialize;
1569: END IF;
1570:
1571: -- Debug info.
1593: p_prefix=>l_debug_prefix,
1594: p_msg_level=>fnd_log.level_procedure);
1595: END IF;
1596: EXCEPTION
1597: WHEN fnd_api.g_exc_error THEN
1598: x_return_status := fnd_api.g_ret_sts_error;
1599: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1600: p_count => x_msg_count,
1601: p_data => x_msg_data);
1594: p_msg_level=>fnd_log.level_procedure);
1595: END IF;
1596: EXCEPTION
1597: WHEN fnd_api.g_exc_error THEN
1598: x_return_status := fnd_api.g_ret_sts_error;
1599: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1600: p_count => x_msg_count,
1601: p_data => x_msg_data);
1602:
1595: END IF;
1596: EXCEPTION
1597: WHEN fnd_api.g_exc_error THEN
1598: x_return_status := fnd_api.g_ret_sts_error;
1599: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1600: p_count => x_msg_count,
1601: p_data => x_msg_data);
1602:
1603: -- Debug info.
1611: hz_utility_v2pub.debug(p_message=>'get_relationship_obj (-)',
1612: p_prefix=>l_debug_prefix,
1613: p_msg_level=>fnd_log.level_procedure);
1614: END IF;
1615: WHEN fnd_api.g_exc_unexpected_error THEN
1616: x_return_status := fnd_api.g_ret_sts_unexp_error;
1617: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1618: p_count => x_msg_count,
1619: p_data => x_msg_data);
1612: p_prefix=>l_debug_prefix,
1613: p_msg_level=>fnd_log.level_procedure);
1614: END IF;
1615: WHEN fnd_api.g_exc_unexpected_error THEN
1616: x_return_status := fnd_api.g_ret_sts_unexp_error;
1617: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1618: p_count => x_msg_count,
1619: p_data => x_msg_data);
1620:
1613: p_msg_level=>fnd_log.level_procedure);
1614: END IF;
1615: WHEN fnd_api.g_exc_unexpected_error THEN
1616: x_return_status := fnd_api.g_ret_sts_unexp_error;
1617: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1618: p_count => x_msg_count,
1619: p_data => x_msg_data);
1620:
1621: -- Debug info.
1631: p_msg_level=>fnd_log.level_procedure);
1632: END IF;
1633:
1634: WHEN OTHERS THEN
1635: x_return_status := fnd_api.g_ret_sts_unexp_error;
1636:
1637: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
1638: fnd_message.set_token('ERROR' ,SQLERRM);
1639: fnd_msg_pub.add;
1637: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
1638: fnd_message.set_token('ERROR' ,SQLERRM);
1639: fnd_msg_pub.add;
1640:
1641: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1642: p_count => x_msg_count,
1643: p_data => x_msg_data);
1644:
1645: -- Debug info.
1679: -- p_owner_table_name Owner table name.
1680: -- p_owner_table_id Owner table Id.
1681: -- OUT:
1682: -- x_return_status Return status after the call. The status can
1683: -- be fnd_api.g_ret_sts_success (success),
1684: -- fnd_api.g_ret_sts_error (error),
1685: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
1686: -- x_msg_count Number of messages in message stack.
1687: -- x_msg_data Message text if x_msg_count is 1.
1680: -- p_owner_table_id Owner table Id.
1681: -- OUT:
1682: -- x_return_status Return status after the call. The status can
1683: -- be fnd_api.g_ret_sts_success (success),
1684: -- fnd_api.g_ret_sts_error (error),
1685: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
1686: -- x_msg_count Number of messages in message stack.
1687: -- x_msg_data Message text if x_msg_count is 1.
1688: --
1681: -- OUT:
1682: -- x_return_status Return status after the call. The status can
1683: -- be fnd_api.g_ret_sts_success (success),
1684: -- fnd_api.g_ret_sts_error (error),
1685: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
1686: -- x_msg_count Number of messages in message stack.
1687: -- x_msg_data Message text if x_msg_count is 1.
1688: --
1689: -- NOTES
1708: -- Standard start of API savepoint
1709: SAVEPOINT create_classifications_pvt;
1710:
1711: -- initialize API return status to success.
1712: x_return_status := FND_API.G_RET_STS_SUCCESS;
1713:
1714: -- Debug info.
1715: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1716: hz_utility_v2pub.debug(p_message=>'create_classifications(+)',
1734: x_msg_count => x_msg_count,
1735: x_msg_data => x_msg_data
1736: );
1737:
1738: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1739: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1740: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_party_bo_pvt.create_classifications, owner table name: '||p_owner_table_name||' owner table id: '||p_owner_table_id,
1741: p_prefix=>l_debug_prefix,
1742: p_msg_level=>fnd_log.level_procedure);
1740: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_party_bo_pvt.create_classifications, owner table name: '||p_owner_table_name||' owner table id: '||p_owner_table_id,
1741: p_prefix=>l_debug_prefix,
1742: p_msg_level=>fnd_log.level_procedure);
1743: END IF;
1744: RAISE FND_API.G_EXC_ERROR;
1745: END IF;
1746:
1747: -- assign code_assignment_id
1748: p_code_assign_objs(i).code_assignment_id := l_code_assign_id;
1760: p_prefix=>l_debug_prefix,
1761: p_msg_level=>fnd_log.level_procedure);
1762: END IF;
1763: EXCEPTION
1764: WHEN fnd_api.g_exc_error THEN
1765: ROLLBACK TO create_classifications_pvt;
1766: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
1767: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_CODE_ASSIGNMENTS');
1768: FND_MSG_PUB.ADD;
1766: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
1767: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_CODE_ASSIGNMENTS');
1768: FND_MSG_PUB.ADD;
1769:
1770: x_return_status := fnd_api.g_ret_sts_error;
1771:
1772: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1773: p_count => x_msg_count,
1774: p_data => x_msg_data);
1768: FND_MSG_PUB.ADD;
1769:
1770: x_return_status := fnd_api.g_ret_sts_error;
1771:
1772: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1773: p_count => x_msg_count,
1774: p_data => x_msg_data);
1775:
1776: -- Debug info.
1784: hz_utility_v2pub.debug(p_message=>'create_classifications(-)',
1785: p_prefix=>l_debug_prefix,
1786: p_msg_level=>fnd_log.level_procedure);
1787: END IF;
1788: WHEN fnd_api.g_exc_unexpected_error THEN
1789: ROLLBACK TO create_classifications_pvt;
1790: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
1791: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_CODE_ASSIGNMENTS');
1792: FND_MSG_PUB.ADD;
1790: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
1791: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_CODE_ASSIGNMENTS');
1792: FND_MSG_PUB.ADD;
1793:
1794: x_return_status := fnd_api.g_ret_sts_unexp_error;
1795:
1796: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1797: p_count => x_msg_count,
1798: p_data => x_msg_data);
1792: FND_MSG_PUB.ADD;
1793:
1794: x_return_status := fnd_api.g_ret_sts_unexp_error;
1795:
1796: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1797: p_count => x_msg_count,
1798: p_data => x_msg_data);
1799:
1800: -- Debug info.
1815: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
1816: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_CODE_ASSIGNMENTS');
1817: FND_MSG_PUB.ADD;
1818:
1819: x_return_status := fnd_api.g_ret_sts_unexp_error;
1820:
1821: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
1822: fnd_message.set_token('ERROR' ,SQLERRM);
1823: fnd_msg_pub.add;
1821: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
1822: fnd_message.set_token('ERROR' ,SQLERRM);
1823: fnd_msg_pub.add;
1824:
1825: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1826: p_count => x_msg_count,
1827: p_data => x_msg_data);
1828:
1829: -- Debug info.
1853: -- p_owner_table_name Owner table name.
1854: -- p_owner_table_id Owner table Id.
1855: -- OUT:
1856: -- x_return_status Return status after the call. The status can
1857: -- be fnd_api.g_ret_sts_success (success),
1858: -- fnd_api.g_ret_sts_error (error),
1859: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
1860: -- x_msg_count Number of messages in message stack.
1861: -- x_msg_data Message text if x_msg_count is 1.
1854: -- p_owner_table_id Owner table Id.
1855: -- OUT:
1856: -- x_return_status Return status after the call. The status can
1857: -- be fnd_api.g_ret_sts_success (success),
1858: -- fnd_api.g_ret_sts_error (error),
1859: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
1860: -- x_msg_count Number of messages in message stack.
1861: -- x_msg_data Message text if x_msg_count is 1.
1862: --
1855: -- OUT:
1856: -- x_return_status Return status after the call. The status can
1857: -- be fnd_api.g_ret_sts_success (success),
1858: -- fnd_api.g_ret_sts_error (error),
1859: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
1860: -- x_msg_count Number of messages in message stack.
1861: -- x_msg_data Message text if x_msg_count is 1.
1862: --
1863: -- NOTES
1883: -- Standard start of API savepoint
1884: SAVEPOINT save_classifications_pvt;
1885:
1886: -- initialize API return status to success.
1887: x_return_status := FND_API.G_RET_STS_SUCCESS;
1888:
1889: -- Debug info.
1890: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1891: hz_utility_v2pub.debug(p_message=>'save_classifications(+)',
1922: FND_MSG_PUB.ADD;
1923: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
1924: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_CODE_ASSIGNMENTS');
1925: FND_MSG_PUB.ADD;
1926: RAISE FND_API.G_EXC_ERROR;
1927: END IF;
1928:
1929: IF(l_ovn IS NULL) THEN
1930: HZ_CLASSIFICATION_V2PUB.create_code_assignment(
1951: -- assign code_assignment_id
1952: p_code_assign_objs(i).code_assignment_id := l_code_assign_rec.code_assignment_id;
1953: END IF;
1954:
1955: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1956: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1957: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_party_bo_pvt.save_classifications, owner table name: '||p_owner_table_name||' owner table id: '||p_owner_table_id,
1958: p_prefix=>l_debug_prefix,
1959: p_msg_level=>fnd_log.level_procedure);
1957: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_party_bo_pvt.save_classifications, owner table name: '||p_owner_table_name||' owner table id: '||p_owner_table_id,
1958: p_prefix=>l_debug_prefix,
1959: p_msg_level=>fnd_log.level_procedure);
1960: END IF;
1961: RAISE FND_API.G_EXC_ERROR;
1962: END IF;
1963: END LOOP;
1964:
1965: -- Debug info.
1974: p_prefix=>l_debug_prefix,
1975: p_msg_level=>fnd_log.level_procedure);
1976: END IF;
1977: EXCEPTION
1978: WHEN fnd_api.g_exc_error THEN
1979: ROLLBACK TO save_classifications_pvt;
1980: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
1981: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_CODE_ASSIGNMENTS');
1982: FND_MSG_PUB.ADD;
1980: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
1981: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_CODE_ASSIGNMENTS');
1982: FND_MSG_PUB.ADD;
1983:
1984: x_return_status := fnd_api.g_ret_sts_error;
1985:
1986: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1987: p_count => x_msg_count,
1988: p_data => x_msg_data);
1982: FND_MSG_PUB.ADD;
1983:
1984: x_return_status := fnd_api.g_ret_sts_error;
1985:
1986: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1987: p_count => x_msg_count,
1988: p_data => x_msg_data);
1989:
1990: -- Debug info.
1998: hz_utility_v2pub.debug(p_message=>'save_classifications(-)',
1999: p_prefix=>l_debug_prefix,
2000: p_msg_level=>fnd_log.level_procedure);
2001: END IF;
2002: WHEN fnd_api.g_exc_unexpected_error THEN
2003: ROLLBACK TO save_classifications_pvt;
2004: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
2005: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_CODE_ASSIGNMENTS');
2006: FND_MSG_PUB.ADD;
2004: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
2005: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_CODE_ASSIGNMENTS');
2006: FND_MSG_PUB.ADD;
2007:
2008: x_return_status := fnd_api.g_ret_sts_unexp_error;
2009:
2010: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2011: p_count => x_msg_count,
2012: p_data => x_msg_data);
2006: FND_MSG_PUB.ADD;
2007:
2008: x_return_status := fnd_api.g_ret_sts_unexp_error;
2009:
2010: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2011: p_count => x_msg_count,
2012: p_data => x_msg_data);
2013:
2014: -- Debug info.
2028: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
2029: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_CODE_ASSIGNMENTS');
2030: FND_MSG_PUB.ADD;
2031:
2032: x_return_status := fnd_api.g_ret_sts_unexp_error;
2033:
2034: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
2035: fnd_message.set_token('ERROR' ,SQLERRM);
2036: fnd_msg_pub.add;
2034: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
2035: fnd_message.set_token('ERROR' ,SQLERRM);
2036: fnd_msg_pub.add;
2037:
2038: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2039: p_count => x_msg_count,
2040: p_data => x_msg_data);
2041:
2042: -- Debug info.
2065: -- p_cert_objs List of certification objects.
2066: -- p_party_id Party Id.
2067: -- OUT:
2068: -- x_return_status Return status after the call. The status can
2069: -- be fnd_api.g_ret_sts_success (success),
2070: -- fnd_api.g_ret_sts_error (error),
2071: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
2072: -- x_msg_count Number of messages in message stack.
2073: -- x_msg_data Message text if x_msg_count is 1.
2066: -- p_party_id Party Id.
2067: -- OUT:
2068: -- x_return_status Return status after the call. The status can
2069: -- be fnd_api.g_ret_sts_success (success),
2070: -- fnd_api.g_ret_sts_error (error),
2071: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
2072: -- x_msg_count Number of messages in message stack.
2073: -- x_msg_data Message text if x_msg_count is 1.
2074: --
2067: -- OUT:
2068: -- x_return_status Return status after the call. The status can
2069: -- be fnd_api.g_ret_sts_success (success),
2070: -- fnd_api.g_ret_sts_error (error),
2071: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
2072: -- x_msg_count Number of messages in message stack.
2073: -- x_msg_data Message text if x_msg_count is 1.
2074: --
2075: -- NOTES
2093: -- Standard start of API savepoint
2094: SAVEPOINT create_certifications_pvt;
2095:
2096: -- initialize API return status to success.
2097: x_return_status := FND_API.G_RET_STS_SUCCESS;
2098:
2099: -- Debug info.
2100: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2101: hz_utility_v2pub.debug(p_message=>'create_certifications(+)',
2119: x_msg_data => x_msg_data,
2120: x_certification_id => l_cert_id
2121: );
2122:
2123: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2124: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2125: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_party_bo_pvt.create_certifications, party id: '||p_party_id,
2126: p_prefix=>l_debug_prefix,
2127: p_msg_level=>fnd_log.level_procedure);
2125: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_party_bo_pvt.create_certifications, party id: '||p_party_id,
2126: p_prefix=>l_debug_prefix,
2127: p_msg_level=>fnd_log.level_procedure);
2128: END IF;
2129: RAISE FND_API.G_EXC_ERROR;
2130: END IF;
2131:
2132: -- assign certification_id
2133: p_cert_objs(i).certification_id := l_cert_id;
2145: p_prefix=>l_debug_prefix,
2146: p_msg_level=>fnd_log.level_procedure);
2147: END IF;
2148: EXCEPTION
2149: WHEN fnd_api.g_exc_error THEN
2150: ROLLBACK TO create_certifications_pvt;
2151: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
2152: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_CERTIFICATIONS');
2153: FND_MSG_PUB.ADD;
2151: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
2152: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_CERTIFICATIONS');
2153: FND_MSG_PUB.ADD;
2154:
2155: x_return_status := fnd_api.g_ret_sts_error;
2156:
2157: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2158: p_count => x_msg_count,
2159: p_data => x_msg_data);
2153: FND_MSG_PUB.ADD;
2154:
2155: x_return_status := fnd_api.g_ret_sts_error;
2156:
2157: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2158: p_count => x_msg_count,
2159: p_data => x_msg_data);
2160:
2161: -- Debug info.
2169: hz_utility_v2pub.debug(p_message=>'create_certifications(-)',
2170: p_prefix=>l_debug_prefix,
2171: p_msg_level=>fnd_log.level_procedure);
2172: END IF;
2173: WHEN fnd_api.g_exc_unexpected_error THEN
2174: ROLLBACK TO create_certifications_pvt;
2175: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
2176: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_CERTIFICATIONS');
2177: FND_MSG_PUB.ADD;
2175: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
2176: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_CERTIFICATIONS');
2177: FND_MSG_PUB.ADD;
2178:
2179: x_return_status := fnd_api.g_ret_sts_unexp_error;
2180:
2181: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2182: p_count => x_msg_count,
2183: p_data => x_msg_data);
2177: FND_MSG_PUB.ADD;
2178:
2179: x_return_status := fnd_api.g_ret_sts_unexp_error;
2180:
2181: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2182: p_count => x_msg_count,
2183: p_data => x_msg_data);
2184:
2185: -- Debug info.
2200: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
2201: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_CERTIFICATIONS');
2202: FND_MSG_PUB.ADD;
2203:
2204: x_return_status := fnd_api.g_ret_sts_unexp_error;
2205:
2206: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
2207: fnd_message.set_token('ERROR' ,SQLERRM);
2208: fnd_msg_pub.add;
2206: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
2207: fnd_message.set_token('ERROR' ,SQLERRM);
2208: fnd_msg_pub.add;
2209:
2210: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2211: p_count => x_msg_count,
2212: p_data => x_msg_data);
2213:
2214: -- Debug info.
2237: -- p_cert_objs List of certification objects.
2238: -- p_party_id Party Id.
2239: -- OUT:
2240: -- x_return_status Return status after the call. The status can
2241: -- be fnd_api.g_ret_sts_success (success),
2242: -- fnd_api.g_ret_sts_error (error),
2243: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
2244: -- x_msg_count Number of messages in message stack.
2245: -- x_msg_data Message text if x_msg_count is 1.
2238: -- p_party_id Party Id.
2239: -- OUT:
2240: -- x_return_status Return status after the call. The status can
2241: -- be fnd_api.g_ret_sts_success (success),
2242: -- fnd_api.g_ret_sts_error (error),
2243: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
2244: -- x_msg_count Number of messages in message stack.
2245: -- x_msg_data Message text if x_msg_count is 1.
2246: --
2239: -- OUT:
2240: -- x_return_status Return status after the call. The status can
2241: -- be fnd_api.g_ret_sts_success (success),
2242: -- fnd_api.g_ret_sts_error (error),
2243: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
2244: -- x_msg_count Number of messages in message stack.
2245: -- x_msg_data Message text if x_msg_count is 1.
2246: --
2247: -- NOTES
2266: -- Standard start of API savepoint
2267: SAVEPOINT save_certifications_pvt;
2268:
2269: -- initialize API return status to success.
2270: x_return_status := FND_API.G_RET_STS_SUCCESS;
2271:
2272: -- Debug info.
2273: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2274: hz_utility_v2pub.debug(p_message=>'save_certifications(+)',
2292: x_last_update_date => l_lud,
2293: x_return_status => x_return_status
2294: );
2295:
2296: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2297: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2298: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_party_bo_pvt.check_certification_op, party id: '||p_party_id,
2299: p_prefix=>l_debug_prefix,
2300: p_msg_level=>fnd_log.level_procedure);
2303: FND_MSG_PUB.ADD;
2304: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
2305: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_CERTIFICATIONS');
2306: FND_MSG_PUB.ADD;
2307: RAISE FND_API.G_EXC_ERROR;
2308: END IF;
2309:
2310: IF(l_lud IS NULL) THEN
2311: HZ_ORG_INFO_PUB.create_certifications(
2332: -- assign certification_id
2333: p_cert_objs(i).certification_id := l_cert_rec.certification_id;
2334: END IF;
2335:
2336: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2337: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2338: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_party_bo_pvt.save_certifications, party id: '||p_party_id,
2339: p_prefix=>l_debug_prefix,
2340: p_msg_level=>fnd_log.level_procedure);
2338: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_party_bo_pvt.save_certifications, party id: '||p_party_id,
2339: p_prefix=>l_debug_prefix,
2340: p_msg_level=>fnd_log.level_procedure);
2341: END IF;
2342: RAISE FND_API.G_EXC_ERROR;
2343: END IF;
2344: END LOOP;
2345:
2346: -- Debug info.
2355: p_prefix=>l_debug_prefix,
2356: p_msg_level=>fnd_log.level_procedure);
2357: END IF;
2358: EXCEPTION
2359: WHEN fnd_api.g_exc_error THEN
2360: ROLLBACK TO save_certifications_pvt;
2361: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
2362: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_CERTIFICATIONS');
2363: FND_MSG_PUB.ADD;
2361: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
2362: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_CERTIFICATIONS');
2363: FND_MSG_PUB.ADD;
2364:
2365: x_return_status := fnd_api.g_ret_sts_error;
2366:
2367: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2368: p_count => x_msg_count,
2369: p_data => x_msg_data);
2363: FND_MSG_PUB.ADD;
2364:
2365: x_return_status := fnd_api.g_ret_sts_error;
2366:
2367: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2368: p_count => x_msg_count,
2369: p_data => x_msg_data);
2370:
2371: -- Debug info.
2379: hz_utility_v2pub.debug(p_message=>'save_certifications(-)',
2380: p_prefix=>l_debug_prefix,
2381: p_msg_level=>fnd_log.level_procedure);
2382: END IF;
2383: WHEN fnd_api.g_exc_unexpected_error THEN
2384: ROLLBACK TO save_certifications_pvt;
2385: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
2386: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_CERTIFICATIONS');
2387: FND_MSG_PUB.ADD;
2385: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
2386: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_CERTIFICATIONS');
2387: FND_MSG_PUB.ADD;
2388:
2389: x_return_status := fnd_api.g_ret_sts_unexp_error;
2390:
2391: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2392: p_count => x_msg_count,
2393: p_data => x_msg_data);
2387: FND_MSG_PUB.ADD;
2388:
2389: x_return_status := fnd_api.g_ret_sts_unexp_error;
2390:
2391: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2392: p_count => x_msg_count,
2393: p_data => x_msg_data);
2394:
2395: -- Debug info.
2409: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
2410: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_CERTIFICATIONS');
2411: FND_MSG_PUB.ADD;
2412:
2413: x_return_status := fnd_api.g_ret_sts_unexp_error;
2414:
2415: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
2416: fnd_message.set_token('ERROR' ,SQLERRM);
2417: fnd_msg_pub.add;
2415: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
2416: fnd_message.set_token('ERROR' ,SQLERRM);
2417: fnd_msg_pub.add;
2418:
2419: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2420: p_count => x_msg_count,
2421: p_data => x_msg_data);
2422:
2423: -- Debug info.
2446: -- p_fin_prof_objs List of financial profile objects.
2447: -- p_party_id Party Id.
2448: -- OUT:
2449: -- x_return_status Return status after the call. The status can
2450: -- be fnd_api.g_ret_sts_success (success),
2451: -- fnd_api.g_ret_sts_error (error),
2452: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
2453: -- x_msg_count Number of messages in message stack.
2454: -- x_msg_data Message text if x_msg_count is 1.
2447: -- p_party_id Party Id.
2448: -- OUT:
2449: -- x_return_status Return status after the call. The status can
2450: -- be fnd_api.g_ret_sts_success (success),
2451: -- fnd_api.g_ret_sts_error (error),
2452: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
2453: -- x_msg_count Number of messages in message stack.
2454: -- x_msg_data Message text if x_msg_count is 1.
2455: --
2448: -- OUT:
2449: -- x_return_status Return status after the call. The status can
2450: -- be fnd_api.g_ret_sts_success (success),
2451: -- fnd_api.g_ret_sts_error (error),
2452: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
2453: -- x_msg_count Number of messages in message stack.
2454: -- x_msg_data Message text if x_msg_count is 1.
2455: --
2456: -- NOTES
2474: -- Standard start of API savepoint
2475: SAVEPOINT create_financial_profiles_pvt;
2476:
2477: -- initialize API return status to success.
2478: x_return_status := FND_API.G_RET_STS_SUCCESS;
2479:
2480: -- Debug info.
2481: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2482: hz_utility_v2pub.debug(p_message=>'create_financial_profiles(+)',
2500: x_msg_data => x_msg_data,
2501: x_financial_profile_id => l_fin_prof_id
2502: );
2503:
2504: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2505: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2506: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_party_bo_pvt.create_financial_profiles, party id: '||p_party_id,
2507: p_prefix=>l_debug_prefix,
2508: p_msg_level=>fnd_log.level_procedure);
2506: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_party_bo_pvt.create_financial_profiles, party id: '||p_party_id,
2507: p_prefix=>l_debug_prefix,
2508: p_msg_level=>fnd_log.level_procedure);
2509: END IF;
2510: RAISE FND_API.G_EXC_ERROR;
2511: END IF;
2512:
2513: -- assign financial profile id
2514: p_fin_prof_objs(i).financial_profile_id := l_fin_prof_id;
2526: p_prefix=>l_debug_prefix,
2527: p_msg_level=>fnd_log.level_procedure);
2528: END IF;
2529: EXCEPTION
2530: WHEN fnd_api.g_exc_error THEN
2531: ROLLBACK TO create_financial_profiles_pvt;
2532: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
2533: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_FINANCIAL_PROFILE');
2534: FND_MSG_PUB.ADD;
2532: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
2533: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_FINANCIAL_PROFILE');
2534: FND_MSG_PUB.ADD;
2535:
2536: x_return_status := fnd_api.g_ret_sts_error;
2537:
2538: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2539: p_count => x_msg_count,
2540: p_data => x_msg_data);
2534: FND_MSG_PUB.ADD;
2535:
2536: x_return_status := fnd_api.g_ret_sts_error;
2537:
2538: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2539: p_count => x_msg_count,
2540: p_data => x_msg_data);
2541:
2542: -- Debug info.
2550: hz_utility_v2pub.debug(p_message=>'create_financial_profiles(-)',
2551: p_prefix=>l_debug_prefix,
2552: p_msg_level=>fnd_log.level_procedure);
2553: END IF;
2554: WHEN fnd_api.g_exc_unexpected_error THEN
2555: ROLLBACK TO create_financial_profiles_pvt;
2556: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
2557: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_FINANCIAL_PROFILE');
2558: FND_MSG_PUB.ADD;
2556: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
2557: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_FINANCIAL_PROFILE');
2558: FND_MSG_PUB.ADD;
2559:
2560: x_return_status := fnd_api.g_ret_sts_unexp_error;
2561:
2562: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2563: p_count => x_msg_count,
2564: p_data => x_msg_data);
2558: FND_MSG_PUB.ADD;
2559:
2560: x_return_status := fnd_api.g_ret_sts_unexp_error;
2561:
2562: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2563: p_count => x_msg_count,
2564: p_data => x_msg_data);
2565:
2566: -- Debug info.
2581: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
2582: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_FINANCIAL_PROFILE');
2583: FND_MSG_PUB.ADD;
2584:
2585: x_return_status := fnd_api.g_ret_sts_unexp_error;
2586:
2587: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
2588: fnd_message.set_token('ERROR' ,SQLERRM);
2589: fnd_msg_pub.add;
2587: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
2588: fnd_message.set_token('ERROR' ,SQLERRM);
2589: fnd_msg_pub.add;
2590:
2591: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2592: p_count => x_msg_count,
2593: p_data => x_msg_data);
2594:
2595: -- Debug info.
2618: -- p_fin_prof_objs List of financial profile objects.
2619: -- p_party_id Party Id.
2620: -- OUT:
2621: -- x_return_status Return status after the call. The status can
2622: -- be fnd_api.g_ret_sts_success (success),
2623: -- fnd_api.g_ret_sts_error (error),
2624: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
2625: -- x_msg_count Number of messages in message stack.
2626: -- x_msg_data Message text if x_msg_count is 1.
2619: -- p_party_id Party Id.
2620: -- OUT:
2621: -- x_return_status Return status after the call. The status can
2622: -- be fnd_api.g_ret_sts_success (success),
2623: -- fnd_api.g_ret_sts_error (error),
2624: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
2625: -- x_msg_count Number of messages in message stack.
2626: -- x_msg_data Message text if x_msg_count is 1.
2627: --
2620: -- OUT:
2621: -- x_return_status Return status after the call. The status can
2622: -- be fnd_api.g_ret_sts_success (success),
2623: -- fnd_api.g_ret_sts_error (error),
2624: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
2625: -- x_msg_count Number of messages in message stack.
2626: -- x_msg_data Message text if x_msg_count is 1.
2627: --
2628: -- NOTES
2647: -- Standard start of API savepoint
2648: SAVEPOINT save_financial_profiles_pvt;
2649:
2650: -- initialize API return status to success.
2651: x_return_status := FND_API.G_RET_STS_SUCCESS;
2652:
2653: -- Debug info.
2654: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2655: hz_utility_v2pub.debug(p_message=>'save_financial_profiles(+)',
2672: x_last_update_date => l_lud,
2673: x_return_status => x_return_status
2674: );
2675:
2676: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2677: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2678: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_party_bo_pvt.check_financial_prof_op, financial profile id: '||l_fin_prof_rec.financial_profile_id||', party id: '||p_party_id,
2679: p_prefix=>l_debug_prefix,
2680: p_msg_level=>fnd_log.level_procedure);
2683: FND_MSG_PUB.ADD;
2684: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
2685: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_FINANCIAL_PROFILE');
2686: FND_MSG_PUB.ADD;
2687: RAISE FND_API.G_EXC_ERROR;
2688: END IF;
2689:
2690: IF(l_lud IS NULL) THEN
2691: HZ_PARTY_INFO_PUB.create_financial_profile(
2712: -- assign financial_profile_id
2713: p_fin_prof_objs(i).financial_profile_id := l_fin_prof_rec.financial_profile_id;
2714: END IF;
2715:
2716: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2717: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2718: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_party_bo_pvt.save_financial_profiles, party id: '||p_party_id,
2719: p_prefix=>l_debug_prefix,
2720: p_msg_level=>fnd_log.level_procedure);
2718: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_party_bo_pvt.save_financial_profiles, party id: '||p_party_id,
2719: p_prefix=>l_debug_prefix,
2720: p_msg_level=>fnd_log.level_procedure);
2721: END IF;
2722: RAISE FND_API.G_EXC_ERROR;
2723: END IF;
2724: END LOOP;
2725:
2726: -- Debug info.
2735: p_prefix=>l_debug_prefix,
2736: p_msg_level=>fnd_log.level_procedure);
2737: END IF;
2738: EXCEPTION
2739: WHEN fnd_api.g_exc_error THEN
2740: ROLLBACK TO save_financial_profiles_pvt;
2741: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
2742: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_FINANCIAL_PROFILE');
2743: FND_MSG_PUB.ADD;
2741: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
2742: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_FINANCIAL_PROFILE');
2743: FND_MSG_PUB.ADD;
2744:
2745: x_return_status := fnd_api.g_ret_sts_error;
2746:
2747: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2748: p_count => x_msg_count,
2749: p_data => x_msg_data);
2743: FND_MSG_PUB.ADD;
2744:
2745: x_return_status := fnd_api.g_ret_sts_error;
2746:
2747: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2748: p_count => x_msg_count,
2749: p_data => x_msg_data);
2750:
2751: -- Debug info.
2759: hz_utility_v2pub.debug(p_message=>'save_financial_profiles(-)',
2760: p_prefix=>l_debug_prefix,
2761: p_msg_level=>fnd_log.level_procedure);
2762: END IF;
2763: WHEN fnd_api.g_exc_unexpected_error THEN
2764: ROLLBACK TO save_financial_profiles_pvt;
2765: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
2766: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_FINANCIAL_PROFILE');
2767: FND_MSG_PUB.ADD;
2765: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
2766: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_FINANCIAL_PROFILE');
2767: FND_MSG_PUB.ADD;
2768:
2769: x_return_status := fnd_api.g_ret_sts_unexp_error;
2770:
2771: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2772: p_count => x_msg_count,
2773: p_data => x_msg_data);
2767: FND_MSG_PUB.ADD;
2768:
2769: x_return_status := fnd_api.g_ret_sts_unexp_error;
2770:
2771: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2772: p_count => x_msg_count,
2773: p_data => x_msg_data);
2774:
2775: -- Debug info.
2789: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
2790: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_FINANCIAL_PROFILE');
2791: FND_MSG_PUB.ADD;
2792:
2793: x_return_status := fnd_api.g_ret_sts_unexp_error;
2794:
2795: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
2796: fnd_message.set_token('ERROR' ,SQLERRM);
2797: fnd_msg_pub.add;
2795: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
2796: fnd_message.set_token('ERROR' ,SQLERRM);
2797: fnd_msg_pub.add;
2798:
2799: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2800: p_count => x_msg_count,
2801: p_data => x_msg_data);
2802:
2803: -- Debug info.
2826: -- p_party_pref_objs List of party preference objects.
2827: -- p_party_id Party Id.
2828: -- OUT:
2829: -- x_return_status Return status after the call. The status can
2830: -- be fnd_api.g_ret_sts_success (success),
2831: -- fnd_api.g_ret_sts_error (error),
2832: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
2833: -- x_msg_count Number of messages in message stack.
2834: -- x_msg_data Message text if x_msg_count is 1.
2827: -- p_party_id Party Id.
2828: -- OUT:
2829: -- x_return_status Return status after the call. The status can
2830: -- be fnd_api.g_ret_sts_success (success),
2831: -- fnd_api.g_ret_sts_error (error),
2832: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
2833: -- x_msg_count Number of messages in message stack.
2834: -- x_msg_data Message text if x_msg_count is 1.
2835: --
2828: -- OUT:
2829: -- x_return_status Return status after the call. The status can
2830: -- be fnd_api.g_ret_sts_success (success),
2831: -- fnd_api.g_ret_sts_error (error),
2832: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
2833: -- x_msg_count Number of messages in message stack.
2834: -- x_msg_data Message text if x_msg_count is 1.
2835: --
2836: -- NOTES
2853: -- Standard start of API savepoint
2854: SAVEPOINT save_party_preferences_pvt;
2855:
2856: -- initialize API return status to success.
2857: x_return_status := FND_API.G_RET_STS_SUCCESS;
2858:
2859: -- Debug info.
2860: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2861: hz_utility_v2pub.debug(p_message=>'save_party_preferences(+)',
2893: x_msg_count => x_msg_count,
2894: x_msg_data => x_msg_data
2895: );
2896:
2897: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2898: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2899: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_party_bo_pvt.save_party_preferences, party id: '||p_party_id,
2900: p_prefix=>l_debug_prefix,
2901: p_msg_level=>fnd_log.level_procedure);
2899: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_party_bo_pvt.save_party_preferences, party id: '||p_party_id,
2900: p_prefix=>l_debug_prefix,
2901: p_msg_level=>fnd_log.level_procedure);
2902: END IF;
2903: RAISE FND_API.G_EXC_ERROR;
2904: END IF;
2905: END LOOP;
2906:
2907: -- Debug info.
2916: p_prefix=>l_debug_prefix,
2917: p_msg_level=>fnd_log.level_procedure);
2918: END IF;
2919: EXCEPTION
2920: WHEN fnd_api.g_exc_error THEN
2921: ROLLBACK TO save_party_preferences_pvt;
2922: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
2923: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_PARTY_PREFERENCES');
2924: FND_MSG_PUB.ADD;
2922: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
2923: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_PARTY_PREFERENCES');
2924: FND_MSG_PUB.ADD;
2925:
2926: x_return_status := fnd_api.g_ret_sts_error;
2927:
2928: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2929: p_count => x_msg_count,
2930: p_data => x_msg_data);
2924: FND_MSG_PUB.ADD;
2925:
2926: x_return_status := fnd_api.g_ret_sts_error;
2927:
2928: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2929: p_count => x_msg_count,
2930: p_data => x_msg_data);
2931:
2932: -- Debug info.
2940: hz_utility_v2pub.debug(p_message=>'save_party_preferences(-)',
2941: p_prefix=>l_debug_prefix,
2942: p_msg_level=>fnd_log.level_procedure);
2943: END IF;
2944: WHEN fnd_api.g_exc_unexpected_error THEN
2945: ROLLBACK TO save_party_preferences_pvt;
2946: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
2947: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_PARTY_PREFERENCES');
2948: FND_MSG_PUB.ADD;
2946: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
2947: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_PARTY_PREFERENCES');
2948: FND_MSG_PUB.ADD;
2949:
2950: x_return_status := fnd_api.g_ret_sts_unexp_error;
2951:
2952: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2953: p_count => x_msg_count,
2954: p_data => x_msg_data);
2948: FND_MSG_PUB.ADD;
2949:
2950: x_return_status := fnd_api.g_ret_sts_unexp_error;
2951:
2952: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2953: p_count => x_msg_count,
2954: p_data => x_msg_data);
2955:
2956: -- Debug info.
2970: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
2971: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_PARTY_PREFERENCES');
2972: FND_MSG_PUB.ADD;
2973:
2974: x_return_status := fnd_api.g_ret_sts_unexp_error;
2975:
2976: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
2977: fnd_message.set_token('ERROR' ,SQLERRM);
2978: fnd_msg_pub.add;
2976: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
2977: fnd_message.set_token('ERROR' ,SQLERRM);
2978: fnd_msg_pub.add;
2979:
2980: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2981: p_count => x_msg_count,
2982: p_data => x_msg_data);
2983:
2984: -- Debug info.
3067: -- p_party_usg_objs List of Party Usage objects.
3068: -- p_party_id Party Id.
3069: -- OUT:
3070: -- x_return_status Return status after the call. The status can
3071: -- be fnd_api.g_ret_sts_success (success),
3072: -- fnd_api.g_ret_sts_error (error),
3073: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3074: -- x_msg_count Number of messages in message stack.
3075: -- x_msg_data Message text if x_msg_count is 1.
3068: -- p_party_id Party Id.
3069: -- OUT:
3070: -- x_return_status Return status after the call. The status can
3071: -- be fnd_api.g_ret_sts_success (success),
3072: -- fnd_api.g_ret_sts_error (error),
3073: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3074: -- x_msg_count Number of messages in message stack.
3075: -- x_msg_data Message text if x_msg_count is 1.
3076: --
3069: -- OUT:
3070: -- x_return_status Return status after the call. The status can
3071: -- be fnd_api.g_ret_sts_success (success),
3072: -- fnd_api.g_ret_sts_error (error),
3073: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3074: -- x_msg_count Number of messages in message stack.
3075: -- x_msg_data Message text if x_msg_count is 1.
3076: --
3077: -- NOTES
3094: -- Standard start of API savepoint
3095: SAVEPOINT create_party_usage_assgmnt_pvt;
3096:
3097: -- initialize API return status to success.
3098: x_return_status := FND_API.G_RET_STS_SUCCESS;
3099:
3100: -- Debug info.
3101: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3102: hz_utility_v2pub.debug(p_message=>'assign_party_usage(+)',
3110: p_party_id => p_party_id,
3111: px_party_usage_assignment_rec => l_party_usg_rec
3112: );
3113: HZ_PARTY_USG_ASSIGNMENT_PUB.assign_party_usage (
3114: p_init_msg_list => FND_API.G_FALSE,
3115: p_party_usg_assignment_rec => l_party_usg_rec,
3116: x_return_status => x_return_status,
3117: x_msg_count => x_msg_count,
3118: x_msg_data => x_msg_data
3117: x_msg_count => x_msg_count,
3118: x_msg_data => x_msg_data
3119: );
3120:
3121: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3122: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3123: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_party_bo_pvt.create_party_usage_assignment, party id: '||p_party_id,
3124: p_prefix=>l_debug_prefix,
3125: p_msg_level=>fnd_log.level_procedure);
3123: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_party_bo_pvt.create_party_usage_assignment, party id: '||p_party_id,
3124: p_prefix=>l_debug_prefix,
3125: p_msg_level=>fnd_log.level_procedure);
3126: END IF;
3127: RAISE FND_API.G_EXC_ERROR;
3128: END IF;
3129: END LOOP;
3130:
3131: -- Debug info.
3141: p_msg_level=>fnd_log.level_procedure);
3142: END IF;
3143:
3144: EXCEPTION
3145: WHEN fnd_api.g_exc_error THEN
3146: ROLLBACK TO create_party_usage_assgmnt_pvt;
3147: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
3148: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_PARTY_USAGE_ASSIGNMENTS');
3149: FND_MSG_PUB.ADD;
3147: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
3148: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_PARTY_USAGE_ASSIGNMENTS');
3149: FND_MSG_PUB.ADD;
3150:
3151: x_return_status := fnd_api.g_ret_sts_error;
3152:
3153: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3154: p_count => x_msg_count,
3155: p_data => x_msg_data);
3149: FND_MSG_PUB.ADD;
3150:
3151: x_return_status := fnd_api.g_ret_sts_error;
3152:
3153: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3154: p_count => x_msg_count,
3155: p_data => x_msg_data);
3156:
3157: -- Debug info.
3165: hz_utility_v2pub.debug(p_message=>'create_party_usage_assgmnt(-)',
3166: p_prefix=>l_debug_prefix,
3167: p_msg_level=>fnd_log.level_procedure);
3168: END IF;
3169: WHEN fnd_api.g_exc_unexpected_error THEN
3170: ROLLBACK TO create_party_usage_assgmnt_pvt;
3171: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
3172: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_PARTY_USAGE_ASSIGNMENTS');
3173: FND_MSG_PUB.ADD;
3171: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
3172: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_PARTY_USAGE_ASSIGNMENTS');
3173: FND_MSG_PUB.ADD;
3174:
3175: x_return_status := fnd_api.g_ret_sts_unexp_error;
3176:
3177: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3178: p_count => x_msg_count,
3179: p_data => x_msg_data);
3173: FND_MSG_PUB.ADD;
3174:
3175: x_return_status := fnd_api.g_ret_sts_unexp_error;
3176:
3177: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3178: p_count => x_msg_count,
3179: p_data => x_msg_data);
3180:
3181: -- Debug info.
3196: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
3197: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_PARTY_USAGE_ASSIGNMENTS');
3198: FND_MSG_PUB.ADD;
3199:
3200: x_return_status := fnd_api.g_ret_sts_unexp_error;
3201:
3202: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
3203: fnd_message.set_token('ERROR' ,SQLERRM);
3204: fnd_msg_pub.add;
3202: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
3203: fnd_message.set_token('ERROR' ,SQLERRM);
3204: fnd_msg_pub.add;
3205:
3206: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3207: p_count => x_msg_count,
3208: p_data => x_msg_data);
3209:
3210: -- Debug info.
3235: -- p_party_usg_objs List of Party Usage objects.
3236: -- p_party_id Party Id.
3237: -- OUT:
3238: -- x_return_status Return status after the call. The status can
3239: -- be fnd_api.g_ret_sts_success (success),
3240: -- fnd_api.g_ret_sts_error (error),
3241: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3242: -- x_msg_count Number of messages in message stack.
3243: -- x_msg_data Message text if x_msg_count is 1.
3236: -- p_party_id Party Id.
3237: -- OUT:
3238: -- x_return_status Return status after the call. The status can
3239: -- be fnd_api.g_ret_sts_success (success),
3240: -- fnd_api.g_ret_sts_error (error),
3241: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3242: -- x_msg_count Number of messages in message stack.
3243: -- x_msg_data Message text if x_msg_count is 1.
3244: --
3237: -- OUT:
3238: -- x_return_status Return status after the call. The status can
3239: -- be fnd_api.g_ret_sts_success (success),
3240: -- fnd_api.g_ret_sts_error (error),
3241: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3242: -- x_msg_count Number of messages in message stack.
3243: -- x_msg_data Message text if x_msg_count is 1.
3244: --
3245: -- NOTES
3264: -- Standard start of API savepoint
3265: SAVEPOINT save_party_usage_assgmnt_pvt;
3266:
3267: -- initialize API return status to success.
3268: x_return_status := FND_API.G_RET_STS_SUCCESS;
3269:
3270: -- Debug info.
3271: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3272: hz_utility_v2pub.debug(p_message=>'assign_party_usage(+)',
3288: p_party_usage_code => l_party_usg_rec.party_usage_code,
3289: x_last_update_date => l_lud,
3290: x_return_status => x_return_status
3291: );
3292: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3293: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3294: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_party_bo_pvt.check_party_usage_op, party_usage_code ' || l_party_usg_rec.party_usage_code||', party id: '||p_party_id,
3295: p_prefix=>l_debug_prefix,
3296: p_msg_level=>fnd_log.level_procedure);
3299: FND_MSG_PUB.ADD;
3300: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
3301: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_PARTY_USAGE_ASSIGNMENTS');
3302: FND_MSG_PUB.ADD;
3303: RAISE FND_API.G_EXC_ERROR;
3304: END IF;
3305:
3306: IF(l_lud IS NULL) THEN
3307: HZ_PARTY_USG_ASSIGNMENT_PUB.assign_party_usage (
3304: END IF;
3305:
3306: IF(l_lud IS NULL) THEN
3307: HZ_PARTY_USG_ASSIGNMENT_PUB.assign_party_usage (
3308: p_init_msg_list => FND_API.G_FALSE,
3309: p_party_usg_assignment_rec => l_party_usg_rec,
3310: x_return_status => x_return_status,
3311: x_msg_count => x_msg_count,
3312: x_msg_data => x_msg_data
3312: x_msg_data => x_msg_data
3313: );
3314: ELSE
3315: HZ_PARTY_USG_ASSIGNMENT_PUB.update_usg_assignment (
3316: p_init_msg_list => FND_API.G_FALSE,
3317: p_party_usg_assignment_rec => l_party_usg_rec,
3318: x_return_status => x_return_status,
3319: x_msg_count => x_msg_count,
3320: x_msg_data => x_msg_data
3320: x_msg_data => x_msg_data
3321: ) ;
3322: ENd IF;
3323:
3324: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3325: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3326: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_party_bo_pvt.save_party_usage_assgmnt,party_usage_code ' || l_party_usg_rec.party_usage_code||', party id: '||p_party_id,
3327: p_prefix=>l_debug_prefix,
3328: p_msg_level=>fnd_log.level_procedure);
3326: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_party_bo_pvt.save_party_usage_assgmnt,party_usage_code ' || l_party_usg_rec.party_usage_code||', party id: '||p_party_id,
3327: p_prefix=>l_debug_prefix,
3328: p_msg_level=>fnd_log.level_procedure);
3329: END IF;
3330: RAISE FND_API.G_EXC_ERROR;
3331: END IF;
3332: END LOOP;
3333:
3334: -- Debug info.
3343: p_prefix=>l_debug_prefix,
3344: p_msg_level=>fnd_log.level_procedure);
3345: END IF;
3346: EXCEPTION
3347: WHEN fnd_api.g_exc_error THEN
3348: ROLLBACK TO save_party_usage_assgmnt_pvt;
3349: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
3350: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_PARTY_USAGE_ASSIGNMENTS');
3351: FND_MSG_PUB.ADD;
3349: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
3350: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_PARTY_USAGE_ASSIGNMENTS');
3351: FND_MSG_PUB.ADD;
3352:
3353: x_return_status := fnd_api.g_ret_sts_error;
3354:
3355: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3356: p_count => x_msg_count,
3357: p_data => x_msg_data);
3351: FND_MSG_PUB.ADD;
3352:
3353: x_return_status := fnd_api.g_ret_sts_error;
3354:
3355: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3356: p_count => x_msg_count,
3357: p_data => x_msg_data);
3358:
3359: -- Debug info.
3367: hz_utility_v2pub.debug(p_message=>'save_party_usage_assgmnt(-)',
3368: p_prefix=>l_debug_prefix,
3369: p_msg_level=>fnd_log.level_procedure);
3370: END IF;
3371: WHEN fnd_api.g_exc_unexpected_error THEN
3372: ROLLBACK TO save_party_usage_assgmnt_pvt;
3373: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
3374: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_PARTY_USAGE_ASSIGNMENTS');
3375: FND_MSG_PUB.ADD;
3373: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
3374: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_PARTY_USAGE_ASSIGNMENTS');
3375: FND_MSG_PUB.ADD;
3376:
3377: x_return_status := fnd_api.g_ret_sts_unexp_error;
3378:
3379: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3380: p_count => x_msg_count,
3381: p_data => x_msg_data);
3375: FND_MSG_PUB.ADD;
3376:
3377: x_return_status := fnd_api.g_ret_sts_unexp_error;
3378:
3379: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3380: p_count => x_msg_count,
3381: p_data => x_msg_data);
3382:
3383: -- Debug info.
3397: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
3398: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_PARTY_USAGE_ASSIGNMENTS');
3399: FND_MSG_PUB.ADD;
3400:
3401: x_return_status := fnd_api.g_ret_sts_unexp_error;
3402:
3403: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
3404: fnd_message.set_token('ERROR' ,SQLERRM);
3405: fnd_msg_pub.add;
3403: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
3404: fnd_message.set_token('ERROR' ,SQLERRM);
3405: fnd_msg_pub.add;
3406:
3407: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3408: p_count => x_msg_count,
3409: p_data => x_msg_data);
3410:
3411: -- Debug info.
3505: WHEN p_bo_code = 'ORG_CUST' AND p_create_or_update = 'U' THEN
3506: l_event_name := 'oracle.apps.ar.hz.OrgCustBO.update';
3507: ELSE
3508: log('Unexpected event name');
3509: RAISE FND_API.G_EXC_ERROR;
3510: END CASE;
3511: l_key := l_event_name||p_event_id;
3512: l_paramlist := WF_PARAMETER_LIST_T();
3513:
3568: );
3569: END IF;
3570: log('Exit procedure');
3571: EXCEPTION
3572: WHEN FND_API.G_EXC_ERROR THEN
3573: log('Expected error');
3574: l_paramlist.DELETE;
3575: RAISE FND_API.G_EXC_ERROR;
3576: WHEN OTHERS THEN
3571: EXCEPTION
3572: WHEN FND_API.G_EXC_ERROR THEN
3573: log('Expected error');
3574: l_paramlist.DELETE;
3575: RAISE FND_API.G_EXC_ERROR;
3576: WHEN OTHERS THEN
3577: log(SQLERRM);
3578: l_paramlist.DELETE;
3579: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3575: RAISE FND_API.G_EXC_ERROR;
3576: WHEN OTHERS THEN
3577: log(SQLERRM);
3578: l_paramlist.DELETE;
3579: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3580: END call_bes;
3581:
3582: -- PROCEDURE set_hz_parties_bo_ver
3583: --
3837: ) RETURN HZ_MESSAGE_OBJ_TBL IS
3838: l_msg_data HZ_MESSAGE_OBJ_TBL;
3839: BEGIN
3840: l_msg_data := HZ_MESSAGE_OBJ_TBL();
3841: IF(x_msg_count > 1 AND x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3842: FOR I IN 1..FND_MSG_PUB.Count_Msg LOOP
3843: l_msg_data.EXTEND;
3844: l_msg_data(I) := HZ_MESSAGE_OBJ(FND_MSG_PUB.Get(I, p_encoded => FND_API.G_FALSE));
3845: END LOOP;
3840: l_msg_data := HZ_MESSAGE_OBJ_TBL();
3841: IF(x_msg_count > 1 AND x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3842: FOR I IN 1..FND_MSG_PUB.Count_Msg LOOP
3843: l_msg_data.EXTEND;
3844: l_msg_data(I) := HZ_MESSAGE_OBJ(FND_MSG_PUB.Get(I, p_encoded => FND_API.G_FALSE));
3845: END LOOP;
3846: ELSE
3847: l_msg_data.EXTEND;
3848: l_msg_data(1) := HZ_MESSAGE_OBJ(x_msg_data);