639: -- p_credit_rating_objs List of credit rating objects.
640: -- p_organization_id Organization Id.
641: -- OUT:
642: -- x_return_status Return status after the call. The status can
643: -- be fnd_api.g_ret_sts_success (success),
644: -- fnd_api.g_ret_sts_error (error),
645: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
646: -- x_msg_count Number of messages in message stack.
647: -- x_msg_data Message text if x_msg_count is 1.
640: -- p_organization_id Organization Id.
641: -- OUT:
642: -- x_return_status Return status after the call. The status can
643: -- be fnd_api.g_ret_sts_success (success),
644: -- fnd_api.g_ret_sts_error (error),
645: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
646: -- x_msg_count Number of messages in message stack.
647: -- x_msg_data Message text if x_msg_count is 1.
648: --
641: -- OUT:
642: -- x_return_status Return status after the call. The status can
643: -- be fnd_api.g_ret_sts_success (success),
644: -- fnd_api.g_ret_sts_error (error),
645: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
646: -- x_msg_count Number of messages in message stack.
647: -- x_msg_data Message text if x_msg_count is 1.
648: --
649: -- NOTES
666: -- Standard start of API savepoint
667: SAVEPOINT create_credit_ratings_pub;
668:
669: -- initialize API return status to success.
670: x_return_status := FND_API.G_RET_STS_SUCCESS;
671:
672: -- Debug info.
673: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
674: hz_utility_v2pub.debug(p_message=>'create_credit_ratings(+)',
693: x_msg_count => x_msg_count,
694: x_msg_data => x_msg_data
695: );
696:
697: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
698: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
699: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_organization_bo_pub.create_credit_ratings, organization id: '||p_organization_id,
700: p_prefix=>l_debug_prefix,
701: p_msg_level=>fnd_log.level_procedure);
699: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_organization_bo_pub.create_credit_ratings, organization id: '||p_organization_id,
700: p_prefix=>l_debug_prefix,
701: p_msg_level=>fnd_log.level_procedure);
702: END IF;
703: RAISE FND_API.G_EXC_ERROR;
704: END IF;
705:
706: -- assign credit_rating_id
707: p_credit_rating_objs(i).credit_rating_id := l_dummy_id;
719: p_prefix=>l_debug_prefix,
720: p_msg_level=>fnd_log.level_procedure);
721: END IF;
722: EXCEPTION
723: WHEN fnd_api.g_exc_error THEN
724: ROLLBACK TO create_credit_ratings_pub;
725: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
726: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_CREDIT_RATINGS');
727: FND_MSG_PUB.ADD;
725: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
726: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_CREDIT_RATINGS');
727: FND_MSG_PUB.ADD;
728:
729: x_return_status := fnd_api.g_ret_sts_error;
730:
731: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
732: p_count => x_msg_count,
733: p_data => x_msg_data);
727: FND_MSG_PUB.ADD;
728:
729: x_return_status := fnd_api.g_ret_sts_error;
730:
731: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
732: p_count => x_msg_count,
733: p_data => x_msg_data);
734:
735: -- Debug info.
743: hz_utility_v2pub.debug(p_message=>'create_credit_ratings(-)',
744: p_prefix=>l_debug_prefix,
745: p_msg_level=>fnd_log.level_procedure);
746: END IF;
747: WHEN fnd_api.g_exc_unexpected_error THEN
748: ROLLBACK TO create_credit_ratings_pub;
749: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
750: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_CREDIT_RATINGS');
751: FND_MSG_PUB.ADD;
749: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
750: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_CREDIT_RATINGS');
751: FND_MSG_PUB.ADD;
752:
753: x_return_status := fnd_api.g_ret_sts_unexp_error;
754:
755: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
756: p_count => x_msg_count,
757: p_data => x_msg_data);
751: FND_MSG_PUB.ADD;
752:
753: x_return_status := fnd_api.g_ret_sts_unexp_error;
754:
755: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
756: p_count => x_msg_count,
757: p_data => x_msg_data);
758:
759: -- Debug info.
773: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
774: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_CREDIT_RATINGS');
775: FND_MSG_PUB.ADD;
776:
777: x_return_status := fnd_api.g_ret_sts_unexp_error;
778:
779: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
780: fnd_message.set_token('ERROR' ,SQLERRM);
781: fnd_msg_pub.add;
779: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
780: fnd_message.set_token('ERROR' ,SQLERRM);
781: fnd_msg_pub.add;
782:
783: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
784: p_count => x_msg_count,
785: p_data => x_msg_data);
786:
787: -- Debug info.
810: -- p_credit_rating_objs List of credit rating objects.
811: -- p_organization_id Organization Id.
812: -- OUT:
813: -- x_return_status Return status after the call. The status can
814: -- be fnd_api.g_ret_sts_success (success),
815: -- fnd_api.g_ret_sts_error (error),
816: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
817: -- x_msg_count Number of messages in message stack.
818: -- x_msg_data Message text if x_msg_count is 1.
811: -- p_organization_id Organization Id.
812: -- OUT:
813: -- x_return_status Return status after the call. The status can
814: -- be fnd_api.g_ret_sts_success (success),
815: -- fnd_api.g_ret_sts_error (error),
816: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
817: -- x_msg_count Number of messages in message stack.
818: -- x_msg_data Message text if x_msg_count is 1.
819: --
812: -- OUT:
813: -- x_return_status Return status after the call. The status can
814: -- be fnd_api.g_ret_sts_success (success),
815: -- fnd_api.g_ret_sts_error (error),
816: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
817: -- x_msg_count Number of messages in message stack.
818: -- x_msg_data Message text if x_msg_count is 1.
819: --
820: -- NOTES
838: -- Standard start of API savepoint
839: SAVEPOINT save_credit_ratings_pub;
840:
841: -- initialize API return status to success.
842: x_return_status := FND_API.G_RET_STS_SUCCESS;
843:
844: -- Debug info.
845: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
846: hz_utility_v2pub.debug(p_message=>'save_credit_ratings(+)',
872: p_msg_level=>fnd_log.level_procedure);
873: END IF;
874: FND_MESSAGE.SET_NAME('AR', 'HZ_API_INVALID_ID');
875: FND_MSG_PUB.ADD;
876: RAISE FND_API.G_EXC_ERROR;
877: END IF;
878:
879: IF(l_ovn IS NULL) THEN
880: HZ_PARTY_INFO_V2PUB.create_credit_rating(
901: -- assign credit_rating_id
902: p_credit_rating_objs(i).credit_rating_id := l_credit_rating_rec.credit_rating_id;
903: END IF;
904:
905: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
906: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
907: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_organization_bo_pub.create_credit_ratings, organization id: '||p_organization_id,
908: p_prefix=>l_debug_prefix,
909: p_msg_level=>fnd_log.level_procedure);
907: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_organization_bo_pub.create_credit_ratings, organization id: '||p_organization_id,
908: p_prefix=>l_debug_prefix,
909: p_msg_level=>fnd_log.level_procedure);
910: END IF;
911: RAISE FND_API.G_EXC_ERROR;
912: END IF;
913: END LOOP;
914:
915: -- Debug info.
924: p_prefix=>l_debug_prefix,
925: p_msg_level=>fnd_log.level_procedure);
926: END IF;
927: EXCEPTION
928: WHEN fnd_api.g_exc_error THEN
929: ROLLBACK TO save_credit_ratings_pub;
930: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
931: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_CREDIT_RATINGS');
932: FND_MSG_PUB.ADD;
930: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
931: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_CREDIT_RATINGS');
932: FND_MSG_PUB.ADD;
933:
934: x_return_status := fnd_api.g_ret_sts_error;
935:
936: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
937: p_count => x_msg_count,
938: p_data => x_msg_data);
932: FND_MSG_PUB.ADD;
933:
934: x_return_status := fnd_api.g_ret_sts_error;
935:
936: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
937: p_count => x_msg_count,
938: p_data => x_msg_data);
939:
940: -- Debug info.
948: hz_utility_v2pub.debug(p_message=>'save_credit_ratings(-)',
949: p_prefix=>l_debug_prefix,
950: p_msg_level=>fnd_log.level_procedure);
951: END IF;
952: WHEN fnd_api.g_exc_unexpected_error THEN
953: ROLLBACK TO save_credit_ratings_pub;
954: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
955: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_CREDIT_RATINGS');
956: FND_MSG_PUB.ADD;
954: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
955: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_CREDIT_RATINGS');
956: FND_MSG_PUB.ADD;
957:
958: x_return_status := fnd_api.g_ret_sts_unexp_error;
959:
960: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
961: p_count => x_msg_count,
962: p_data => x_msg_data);
956: FND_MSG_PUB.ADD;
957:
958: x_return_status := fnd_api.g_ret_sts_unexp_error;
959:
960: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
961: p_count => x_msg_count,
962: p_data => x_msg_data);
963:
964: -- Debug info.
978: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
979: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_CREDIT_RATINGS');
980: FND_MSG_PUB.ADD;
981:
982: x_return_status := fnd_api.g_ret_sts_unexp_error;
983:
984: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
985: fnd_message.set_token('ERROR' ,SQLERRM);
986: fnd_msg_pub.add;
984: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
985: fnd_message.set_token('ERROR' ,SQLERRM);
986: fnd_msg_pub.add;
987:
988: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
989: p_count => x_msg_count,
990: p_data => x_msg_data);
991:
992: -- Debug info.
1023: --SAVEPOINT create_credit_ratings_pub; --Bug 6619304
1024: SAVEPOINT create_financial_reports_pub; --Bug 6619304
1025:
1026: -- initialize API return status to success.
1027: x_return_status := FND_API.G_RET_STS_SUCCESS;
1028:
1029: -- Debug info.
1030: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1031: hz_utility_v2pub.debug(p_message=>'create_financial_reports(+)',
1050: x_msg_count => x_msg_count,
1051: x_msg_data => x_msg_data
1052: );
1053:
1054: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1055: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1056: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_organization_bo_pub.create_financial_reports, org id: '||p_organization_id,
1057: p_prefix=>l_debug_prefix,
1058: p_msg_level=>fnd_log.level_procedure);
1059: END IF;
1060: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_STRUCT_ERROR');
1061: FND_MESSAGE.SET_TOKEN('STRUCTURE', 'HZ_FINANCIAL_REPORTS');
1062: FND_MSG_PUB.ADD;
1063: RAISE FND_API.G_EXC_ERROR;
1064: ELSE
1065: -- assign financial_number_id
1066: p_fin_objs(i).financial_report_id := l_dummy_id;
1067:
1085: x_msg_count => x_msg_count,
1086: x_msg_data => x_msg_data
1087: );
1088:
1089: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1090: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1091: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_organization_bo_pub.create_financial_reports, fin_number_id: '||l_dummy_id,
1092: p_prefix=>l_debug_prefix,
1093: p_msg_level=>fnd_log.level_procedure);
1094: END IF;
1095: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
1096: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_FINANCIAL_NUMBERS');
1097: FND_MSG_PUB.ADD;
1098: RAISE FND_API.G_EXC_ERROR;
1099: END IF;
1100:
1101: -- assign financial_number_id
1102: p_fin_objs(i).financial_number_objs(j).financial_number_id := l_dummy_id;
1117: p_prefix=>l_debug_prefix,
1118: p_msg_level=>fnd_log.level_procedure);
1119: END IF;
1120: EXCEPTION
1121: WHEN fnd_api.g_exc_error THEN
1122: ROLLBACK TO create_financial_reports_pub;
1123: x_return_status := fnd_api.g_ret_sts_error;
1124:
1125: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1119: END IF;
1120: EXCEPTION
1121: WHEN fnd_api.g_exc_error THEN
1122: ROLLBACK TO create_financial_reports_pub;
1123: x_return_status := fnd_api.g_ret_sts_error;
1124:
1125: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1126: p_count => x_msg_count,
1127: p_data => x_msg_data);
1121: WHEN fnd_api.g_exc_error THEN
1122: ROLLBACK TO create_financial_reports_pub;
1123: x_return_status := fnd_api.g_ret_sts_error;
1124:
1125: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1126: p_count => x_msg_count,
1127: p_data => x_msg_data);
1128:
1129: -- Debug info.
1137: hz_utility_v2pub.debug(p_message=>'create_financial_reports(-)',
1138: p_prefix=>l_debug_prefix,
1139: p_msg_level=>fnd_log.level_procedure);
1140: END IF;
1141: WHEN fnd_api.g_exc_unexpected_error THEN
1142: ROLLBACK TO create_financial_reports_pub;
1143: x_return_status := fnd_api.g_ret_sts_unexp_error;
1144:
1145: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1139: p_msg_level=>fnd_log.level_procedure);
1140: END IF;
1141: WHEN fnd_api.g_exc_unexpected_error THEN
1142: ROLLBACK TO create_financial_reports_pub;
1143: x_return_status := fnd_api.g_ret_sts_unexp_error;
1144:
1145: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1146: p_count => x_msg_count,
1147: p_data => x_msg_data);
1141: WHEN fnd_api.g_exc_unexpected_error THEN
1142: ROLLBACK TO create_financial_reports_pub;
1143: x_return_status := fnd_api.g_ret_sts_unexp_error;
1144:
1145: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1146: p_count => x_msg_count,
1147: p_data => x_msg_data);
1148:
1149: -- Debug info.
1159: p_msg_level=>fnd_log.level_procedure);
1160: END IF;
1161: WHEN OTHERS THEN
1162: ROLLBACK TO create_financial_reports_pub;
1163: x_return_status := fnd_api.g_ret_sts_unexp_error;
1164:
1165: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
1166: fnd_message.set_token('ERROR' ,SQLERRM);
1167: fnd_msg_pub.add;
1165: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
1166: fnd_message.set_token('ERROR' ,SQLERRM);
1167: fnd_msg_pub.add;
1168:
1169: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1170: p_count => x_msg_count,
1171: p_data => x_msg_data);
1172:
1173: -- Debug info.
1205: --SAVEPOINT save_credit_ratings_pub; --Bug 6619304
1206: SAVEPOINT save_financial_reports_pub; --Bug 6619304
1207:
1208: -- initialize API return status to success.
1209: x_return_status := FND_API.G_RET_STS_SUCCESS;
1210:
1211: -- Debug info.
1212: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1213: hz_utility_v2pub.debug(p_message=>'save_financial_reports(+)',
1245: FND_MSG_PUB.ADD;
1246: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_STRUCT_ERROR');
1247: FND_MESSAGE.SET_TOKEN('STRUCTURE', 'HZ_FINANCIAL_REPORTS');
1248: FND_MSG_PUB.ADD;
1249: RAISE FND_API.G_EXC_ERROR;
1250: END IF;
1251:
1252: IF(l_ovn IS NULL) THEN
1253: HZ_ORGANIZATION_INFO_V2PUB.create_financial_report(
1275: -- assign financial_report_id
1276: p_fin_objs(i).financial_report_id := l_dummy_id;
1277: END IF;
1278:
1279: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1280: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1281: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_organization_bo_pub.save_financial_reports, org id: '||p_organization_id,
1282: p_prefix=>l_debug_prefix,
1283: p_msg_level=>fnd_log.level_procedure);
1284: END IF;
1285: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_STRUCT_ERROR');
1286: FND_MESSAGE.SET_TOKEN('STRUCTURE', 'HZ_FINANCIAL_REPORTS');
1287: FND_MSG_PUB.ADD;
1288: RAISE FND_API.G_EXC_ERROR;
1289: ELSE
1290: ---------------------------------
1291: -- Create/Update financial number
1292: ---------------------------------
1316: FND_MSG_PUB.ADD;
1317: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
1318: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_FINANCIAL_NUMBERS');
1319: FND_MSG_PUB.ADD;
1320: RAISE FND_API.G_EXC_ERROR;
1321: END IF;
1322:
1323: IF(l_ovn IS NULL) THEN
1324: HZ_ORGANIZATION_INFO_V2PUB.create_financial_number(
1344:
1345: -- assign financial_number_id
1346: p_fin_objs(i).financial_number_objs(j).financial_number_id := l_fin_number_rec.financial_number_id;
1347: END IF;
1348: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1349: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1350: hz_utility_v2pub.debug(p_message=>'Error occurred at hz_organization_bo_pub.save_financial_reports, fin_number_id: '||l_dummy_id,
1351: p_prefix=>l_debug_prefix,
1352: p_msg_level=>fnd_log.level_procedure);
1353: END IF;
1354: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_ENTITY_ERROR');
1355: FND_MESSAGE.SET_TOKEN('ENTITY', 'HZ_FINANCIAL_NUMBERS');
1356: FND_MSG_PUB.ADD;
1357: RAISE FND_API.G_EXC_ERROR;
1358: END IF;
1359: END LOOP;
1360: END IF; --Bug 6619304
1361: END IF;
1373: p_prefix=>l_debug_prefix,
1374: p_msg_level=>fnd_log.level_procedure);
1375: END IF;
1376: EXCEPTION
1377: WHEN fnd_api.g_exc_error THEN
1378: ROLLBACK TO save_financial_reports_pub;
1379: x_return_status := fnd_api.g_ret_sts_error;
1380:
1381: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1375: END IF;
1376: EXCEPTION
1377: WHEN fnd_api.g_exc_error THEN
1378: ROLLBACK TO save_financial_reports_pub;
1379: x_return_status := fnd_api.g_ret_sts_error;
1380:
1381: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1382: p_count => x_msg_count,
1383: p_data => x_msg_data);
1377: WHEN fnd_api.g_exc_error THEN
1378: ROLLBACK TO save_financial_reports_pub;
1379: x_return_status := fnd_api.g_ret_sts_error;
1380:
1381: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1382: p_count => x_msg_count,
1383: p_data => x_msg_data);
1384:
1385: -- Debug info.
1393: hz_utility_v2pub.debug(p_message=>'save_financial_reports(-)',
1394: p_prefix=>l_debug_prefix,
1395: p_msg_level=>fnd_log.level_procedure);
1396: END IF;
1397: WHEN fnd_api.g_exc_unexpected_error THEN
1398: ROLLBACK TO save_financial_reports_pub;
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,
1395: p_msg_level=>fnd_log.level_procedure);
1396: END IF;
1397: WHEN fnd_api.g_exc_unexpected_error THEN
1398: ROLLBACK TO save_financial_reports_pub;
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: WHEN fnd_api.g_exc_unexpected_error THEN
1398: ROLLBACK TO save_financial_reports_pub;
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.
1415: p_msg_level=>fnd_log.level_procedure);
1416: END IF;
1417: WHEN OTHERS THEN
1418: ROLLBACK TO save_financial_reports_pub;
1419: x_return_status := fnd_api.g_ret_sts_unexp_error;
1420:
1421: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
1422: fnd_message.set_token('ERROR' ,SQLERRM);
1423: fnd_msg_pub.add;
1421: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
1422: fnd_message.set_token('ERROR' ,SQLERRM);
1423: fnd_msg_pub.add;
1424:
1425: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1426: p_count => x_msg_count,
1427: p_data => x_msg_data);
1428:
1429: -- Debug info.
1444: --
1445: -- DESCRIPTION
1446: -- Create organization business object.
1447: PROCEDURE do_create_organization_bo(
1448: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
1449: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
1450: p_organization_obj IN OUT NOCOPY HZ_ORGANIZATION_BO,
1451: p_created_by_module IN VARCHAR2,
1452: p_obj_source IN VARCHAR2 := null,
1445: -- DESCRIPTION
1446: -- Create organization business object.
1447: PROCEDURE do_create_organization_bo(
1448: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
1449: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
1450: p_organization_obj IN OUT NOCOPY HZ_ORGANIZATION_BO,
1451: p_created_by_module IN VARCHAR2,
1452: p_obj_source IN VARCHAR2 := null,
1453: x_return_status OUT NOCOPY VARCHAR2,
1502: -- Standard start of API savepoint
1503: SAVEPOINT do_create_organization_bo_pub;
1504:
1505: -- initialize API return status to success.
1506: x_return_status := FND_API.G_RET_STS_SUCCESS;
1507:
1508: -- Initialize message list if p_init_msg_list is set to TRUE.
1509: IF FND_API.to_Boolean(p_init_msg_list) THEN
1510: FND_MSG_PUB.initialize;
1505: -- initialize API return status to success.
1506: x_return_status := FND_API.G_RET_STS_SUCCESS;
1507:
1508: -- Initialize message list if p_init_msg_list is set to TRUE.
1509: IF FND_API.to_Boolean(p_init_msg_list) THEN
1510: FND_MSG_PUB.initialize;
1511: END IF;
1512:
1513: -- initialize Global variable
1525: p_msg_level=>fnd_log.level_procedure);
1526: END IF;
1527:
1528: -- Base on p_validate_bo_flag to check completeness of business object
1529: IF(p_validate_bo_flag = FND_API.G_TRUE) THEN
1530: HZ_REGISTRY_VALIDATE_BO_PVT.get_bus_obj_struct(
1531: p_bus_object_code => 'ORG',
1532: x_bus_object => l_bus_object
1533: );
1535: p_organization_obj => p_organization_obj,
1536: p_bus_object => l_bus_object
1537: );
1538: IF NOT(l_valid_obj) THEN
1539: RAISE fnd_api.g_exc_error;
1540: END IF;
1541:
1542: -- find out if raise event at the end
1543: l_raise_event := HZ_PARTY_BO_PVT.is_raising_create_event(
1568: x_return_status => x_return_status,
1569: x_msg_count => x_msg_count,
1570: x_msg_data => x_msg_data);
1571:
1572: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1573: RAISE FND_API.G_EXC_ERROR;
1574: END IF;
1575:
1576: ---------------------------------------
1569: x_msg_count => x_msg_count,
1570: x_msg_data => x_msg_data);
1571:
1572: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1573: RAISE FND_API.G_EXC_ERROR;
1574: END IF;
1575:
1576: ---------------------------------------
1577: -- Assign organization and party record
1593: x_msg_count => x_msg_count,
1594: x_msg_data => x_msg_data
1595: );
1596:
1597: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1598: RAISE FND_API.G_EXC_ERROR;
1599: END IF;
1600:
1601: -- assign organization party_id
1594: x_msg_data => x_msg_data
1595: );
1596:
1597: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1598: RAISE FND_API.G_EXC_ERROR;
1599: END IF;
1600:
1601: -- assign organization party_id
1602: p_organization_obj.organization_id := x_organization_id;
1616: x_msg_count => x_msg_count,
1617: x_msg_data => x_msg_data
1618: );
1619:
1620: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1621: RAISE FND_API.G_EXC_ERROR;
1622: END IF;
1623: END IF;
1624:
1617: x_msg_data => x_msg_data
1618: );
1619:
1620: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1621: RAISE FND_API.G_EXC_ERROR;
1622: END IF;
1623: END IF;
1624:
1625: ----------------------------
1634: x_msg_count => x_msg_count,
1635: x_msg_data => x_msg_data
1636: );
1637:
1638: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1639: RAISE FND_API.G_EXC_ERROR;
1640: END IF;
1641: END IF;
1642:
1635: x_msg_data => x_msg_data
1636: );
1637:
1638: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1639: RAISE FND_API.G_EXC_ERROR;
1640: END IF;
1641: END IF;
1642:
1643: ----------------------------
1653: x_msg_count => x_msg_count,
1654: x_msg_data => x_msg_data
1655: );
1656:
1657: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1658: RAISE FND_API.G_EXC_ERROR;
1659: END IF;
1660: END IF;
1661:
1654: x_msg_data => x_msg_data
1655: );
1656:
1657: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1658: RAISE FND_API.G_EXC_ERROR;
1659: END IF;
1660: END IF;
1661:
1662: ----------------------------
1672: x_msg_count => x_msg_count,
1673: x_msg_data => x_msg_data
1674: );
1675:
1676: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1677: RAISE FND_API.G_EXC_ERROR;
1678: END IF;
1679: END IF;
1680:
1673: x_msg_data => x_msg_data
1674: );
1675:
1676: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1677: RAISE FND_API.G_EXC_ERROR;
1678: END IF;
1679: END IF;
1680:
1681: ----------------------------
1691: x_msg_count => x_msg_count,
1692: x_msg_data => x_msg_data
1693: );
1694:
1695: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1696: RAISE FND_API.G_EXC_ERROR;
1697: END IF;
1698: END IF;
1699:
1692: x_msg_data => x_msg_data
1693: );
1694:
1695: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1696: RAISE FND_API.G_EXC_ERROR;
1697: END IF;
1698: END IF;
1699:
1700: l_cbm := HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE;
1715: p_parent_org_os => x_organization_os,
1716: p_parent_org_osr => x_organization_osr
1717: );
1718:
1719: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1720: RAISE FND_API.G_EXC_ERROR;
1721: END IF;
1722: END IF;
1723:
1716: p_parent_org_osr => x_organization_osr
1717: );
1718:
1719: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1720: RAISE FND_API.G_EXC_ERROR;
1721: END IF;
1722: END IF;
1723:
1724: HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE := l_cbm;
1740: p_parent_osr => x_organization_osr,
1741: p_parent_obj_type => 'ORG'
1742: );
1743:
1744: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1745: RAISE FND_API.G_EXC_ERROR;
1746: END IF;
1747: END IF;
1748:
1741: p_parent_obj_type => 'ORG'
1742: );
1743:
1744: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1745: RAISE FND_API.G_EXC_ERROR;
1746: END IF;
1747: END IF;
1748:
1749: HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE := l_cbm;
1775: x_msg_count => x_msg_count,
1776: x_msg_data => x_msg_data
1777: );
1778:
1779: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1780: RAISE FND_API.G_EXC_ERROR;
1781: END IF;
1782: END IF;
1783:
1776: x_msg_data => x_msg_data
1777: );
1778:
1779: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1780: RAISE FND_API.G_EXC_ERROR;
1781: END IF;
1782: END IF;
1783:
1784: HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE := l_cbm;
1795: x_msg_count => x_msg_count,
1796: x_msg_data => x_msg_data
1797: );
1798:
1799: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1800: RAISE FND_API.G_EXC_ERROR;
1801: END IF;
1802: END IF;
1803:
1796: x_msg_data => x_msg_data
1797: );
1798:
1799: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1800: RAISE FND_API.G_EXC_ERROR;
1801: END IF;
1802: END IF;
1803:
1804: ----------------------------
1813: x_msg_count => x_msg_count,
1814: x_msg_data => x_msg_data
1815: );
1816:
1817: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1818: RAISE FND_API.G_EXC_ERROR;
1819: END IF;
1820: END IF;
1821:
1814: x_msg_data => x_msg_data
1815: );
1816:
1817: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1818: RAISE FND_API.G_EXC_ERROR;
1819: END IF;
1820: END IF;
1821:
1822: ----------------------------------
1830: x_return_status => x_return_status,
1831: x_msg_count => x_msg_count,
1832: x_msg_data => x_msg_data
1833: );
1834: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1835: RAISE FND_API.G_EXC_ERROR;
1836: END IF;
1837: END IF;
1838:
1831: x_msg_count => x_msg_count,
1832: x_msg_data => x_msg_data
1833: );
1834: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1835: RAISE FND_API.G_EXC_ERROR;
1836: END IF;
1837: END IF;
1838:
1839:
1849: x_msg_count => x_msg_count,
1850: x_msg_data => x_msg_data
1851: );
1852:
1853: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1854: RAISE FND_API.G_EXC_ERROR;
1855: END IF;
1856: END IF;
1857:
1850: x_msg_data => x_msg_data
1851: );
1852:
1853: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1854: RAISE FND_API.G_EXC_ERROR;
1855: END IF;
1856: END IF;
1857:
1858: ----------------------------
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: END IF;
1875:
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: END IF;
1875:
1876: -- raise event
2209: hz_utility_v2pub.debug(p_message=>'HZ_PARTY_SEARCH.find_parties Start time: '||TO_CHAR(SYSDATE, 'MM-DD-YY HH24:MI:SS'),p_prefix=>'DEBUG: ',p_msg_level=>fnd_log.level_statement, p_module=>'HZ_Module.enableDQ');
2210: END IF;
2211:
2212: HZ_PARTY_SEARCH.find_parties (
2213: p_init_msg_list => FND_API.G_FALSE,
2214: x_rule_id => l_match_rule_id,
2215: p_party_search_rec => l_party_search_rec,
2216: p_party_site_list => l_party_site_list,
2217: p_contact_list => l_contact_list,
2330: ,x_msg_count => x_msg_count
2331: ,x_msg_data => x_msg_data );
2332:
2333:
2334: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2335: RAISE FND_API.G_EXC_ERROR;
2336: END IF;
2337:
2338: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2331: ,x_msg_data => x_msg_data );
2332:
2333:
2334: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
2335: RAISE FND_API.G_EXC_ERROR;
2336: END IF;
2337:
2338: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2339: hz_utility_v2pub.debug(p_message=>'Created dup batch: dup_set_id: '||l_dup_set_id,p_prefix=>'DEBUG: ',p_msg_level=>fnd_log.level_statement, p_module=>'HZ_Module.enableDQ');
2415: p_msg_level=>fnd_log.level_procedure);
2416: END IF;
2417:
2418: EXCEPTION
2419: WHEN fnd_api.g_exc_error THEN
2420: ROLLBACK TO do_create_organization_bo_pub;
2421:
2422: -- reset Global variable
2423: HZ_UTILITY_V2PUB.G_CALLING_API := NULL;
2426: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_OBJECT_ERROR');
2427: FND_MESSAGE.SET_TOKEN('OBJECT', 'ORG');
2428: FND_MSG_PUB.ADD;
2429:
2430: x_return_status := fnd_api.g_ret_sts_error;
2431:
2432: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2433: p_count => x_msg_count,
2434: p_data => x_msg_data);
2428: FND_MSG_PUB.ADD;
2429:
2430: x_return_status := fnd_api.g_ret_sts_error;
2431:
2432: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2433: p_count => x_msg_count,
2434: p_data => x_msg_data);
2435:
2436: -- Debug info.
2445: p_prefix=>l_debug_prefix,
2446: p_msg_level=>fnd_log.level_procedure);
2447: END IF;
2448:
2449: WHEN fnd_api.g_exc_unexpected_error THEN
2450: ROLLBACK TO do_create_organization_bo_pub;
2451:
2452: -- reset Global variable
2453: HZ_UTILITY_V2PUB.G_CALLING_API := NULL;
2456: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_OBJECT_ERROR');
2457: FND_MESSAGE.SET_TOKEN('OBJECT', 'ORG');
2458: FND_MSG_PUB.ADD;
2459:
2460: x_return_status := fnd_api.g_ret_sts_unexp_error;
2461:
2462: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2463: p_count => x_msg_count,
2464: p_data => x_msg_data);
2458: FND_MSG_PUB.ADD;
2459:
2460: x_return_status := fnd_api.g_ret_sts_unexp_error;
2461:
2462: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2463: p_count => x_msg_count,
2464: p_data => x_msg_data);
2465:
2466: -- Debug info.
2486: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_OBJECT_ERROR');
2487: FND_MESSAGE.SET_TOKEN('OBJECT', 'ORG');
2488: FND_MSG_PUB.ADD;
2489:
2490: x_return_status := fnd_api.g_ret_sts_unexp_error;
2491:
2492: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
2493: fnd_message.set_token('ERROR' ,SQLERRM);
2494: fnd_msg_pub.add;
2492: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
2493: fnd_message.set_token('ERROR' ,SQLERRM);
2494: fnd_msg_pub.add;
2495:
2496: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2497: p_count => x_msg_count,
2498: p_data => x_msg_data);
2499:
2500: -- Debug info.
2511: END IF;
2512: END do_create_organization_bo;
2513:
2514: PROCEDURE create_organization_bo(
2515: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
2516: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
2517: p_organization_obj IN HZ_ORGANIZATION_BO,
2518: p_created_by_module IN VARCHAR2,
2519: x_return_status OUT NOCOPY VARCHAR2,
2512: END do_create_organization_bo;
2513:
2514: PROCEDURE create_organization_bo(
2515: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
2516: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
2517: p_organization_obj IN HZ_ORGANIZATION_BO,
2518: p_created_by_module IN VARCHAR2,
2519: x_return_status OUT NOCOPY VARCHAR2,
2520: x_msg_count OUT NOCOPY NUMBER,
2541: );
2542: END create_organization_bo;
2543:
2544: PROCEDURE create_organization_bo(
2545: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
2546: p_organization_obj IN HZ_ORGANIZATION_BO,
2547: p_created_by_module IN VARCHAR2,
2548: p_obj_source IN VARCHAR2 := null,
2549: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
2545: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
2546: p_organization_obj IN HZ_ORGANIZATION_BO,
2547: p_created_by_module IN VARCHAR2,
2548: p_obj_source IN VARCHAR2 := null,
2549: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
2550: x_return_status OUT NOCOPY VARCHAR2,
2551: x_messages OUT NOCOPY HZ_MESSAGE_OBJ_TBL,
2552: x_return_obj OUT NOCOPY HZ_ORGANIZATION_BO,
2553: x_organization_id OUT NOCOPY NUMBER,
2559: l_org_obj HZ_ORGANIZATION_BO;
2560: BEGIN
2561: l_org_obj := p_organization_obj;
2562: do_create_organization_bo(
2563: p_init_msg_list => fnd_api.g_true,
2564: p_validate_bo_flag => p_validate_bo_flag,
2565: p_organization_obj => l_org_obj,
2566: p_created_by_module => p_created_by_module,
2567: p_obj_source => p_obj_source,
2575: x_messages := HZ_PARTY_BO_PVT.return_all_messages(
2576: x_return_status => x_return_status,
2577: x_msg_count => l_msg_count,
2578: x_msg_data => l_msg_data);
2579: IF FND_API.to_Boolean(p_return_obj_flag) THEN
2580: x_return_obj := l_org_obj;
2581: END IF;
2582: END create_organization_bo;
2583:
2585: --
2586: -- DESCRIPTION
2587: -- Update organization business object.
2588: PROCEDURE do_update_organization_bo(
2589: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
2590: p_organization_obj IN OUT NOCOPY HZ_ORGANIZATION_BO,
2591: p_created_by_module IN VARCHAR2,
2592: p_obj_source IN VARCHAR2 := null,
2593: x_return_status OUT NOCOPY VARCHAR2,
2623: -- Standard start of API savepoint
2624: SAVEPOINT do_update_organization_bo_pub;
2625:
2626: -- initialize API return status to success.
2627: x_return_status := FND_API.G_RET_STS_SUCCESS;
2628:
2629: -- Initialize message list if p_init_msg_list is set to TRUE.
2630: IF FND_API.to_Boolean(p_init_msg_list) THEN
2631: FND_MSG_PUB.initialize;
2626: -- initialize API return status to success.
2627: x_return_status := FND_API.G_RET_STS_SUCCESS;
2628:
2629: -- Initialize message list if p_init_msg_list is set to TRUE.
2630: IF FND_API.to_Boolean(p_init_msg_list) THEN
2631: FND_MSG_PUB.initialize;
2632: END IF;
2633:
2634: -- initialize Global variable
2660: x_return_status => x_return_status,
2661: x_msg_count => x_msg_count,
2662: x_msg_data => x_msg_data);
2663:
2664: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2665: RAISE FND_API.G_EXC_ERROR;
2666: END IF;
2667:
2668: -- must check after calling validate_ssm_id because
2661: x_msg_count => x_msg_count,
2662: x_msg_data => x_msg_data);
2663:
2664: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2665: RAISE FND_API.G_EXC_ERROR;
2666: END IF;
2667:
2668: -- must check after calling validate_ssm_id because
2669: -- if user pass os+osr and no id, validate_ssm_id will
2726: x_msg_count => x_msg_count,
2727: x_msg_data => x_msg_data
2728: );
2729:
2730: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2731: RAISE FND_API.G_EXC_ERROR;
2732: END IF;
2733:
2734: -- assign organization party_id
2727: x_msg_data => x_msg_data
2728: );
2729:
2730: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2731: RAISE FND_API.G_EXC_ERROR;
2732: END IF;
2733:
2734: -- assign organization party_id
2735: p_organization_obj.organization_id := x_organization_id;
2749: x_msg_count => x_msg_count,
2750: x_msg_data => x_msg_data
2751: );
2752:
2753: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2754: RAISE FND_API.G_EXC_ERROR;
2755: END IF;
2756: END IF;
2757:
2750: x_msg_data => x_msg_data
2751: );
2752:
2753: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2754: RAISE FND_API.G_EXC_ERROR;
2755: END IF;
2756: END IF;
2757:
2758: ----------------------------
2767: x_msg_count => x_msg_count,
2768: x_msg_data => x_msg_data
2769: );
2770:
2771: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2772: RAISE FND_API.G_EXC_ERROR;
2773: END IF;
2774: END IF;
2775:
2768: x_msg_data => x_msg_data
2769: );
2770:
2771: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2772: RAISE FND_API.G_EXC_ERROR;
2773: END IF;
2774: END IF;
2775:
2776: ----------------------------
2786: x_msg_count => x_msg_count,
2787: x_msg_data => x_msg_data
2788: );
2789:
2790: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2791: RAISE FND_API.G_EXC_ERROR;
2792: END IF;
2793: END IF;
2794:
2787: x_msg_data => x_msg_data
2788: );
2789:
2790: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2791: RAISE FND_API.G_EXC_ERROR;
2792: END IF;
2793: END IF;
2794:
2795: ----------------------------
2805: x_msg_count => x_msg_count,
2806: x_msg_data => x_msg_data
2807: );
2808:
2809: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2810: RAISE FND_API.G_EXC_ERROR;
2811: END IF;
2812: END IF;
2813:
2806: x_msg_data => x_msg_data
2807: );
2808:
2809: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2810: RAISE FND_API.G_EXC_ERROR;
2811: END IF;
2812: END IF;
2813:
2814: ----------------------------
2824: x_msg_count => x_msg_count,
2825: x_msg_data => x_msg_data
2826: );
2827:
2828: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2829: RAISE FND_API.G_EXC_ERROR;
2830: END IF;
2831: END IF;
2832:
2825: x_msg_data => x_msg_data
2826: );
2827:
2828: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2829: RAISE FND_API.G_EXC_ERROR;
2830: END IF;
2831: END IF;
2832:
2833: l_cbm := HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE;
2847: p_parent_org_os => x_organization_os,
2848: p_parent_org_osr => x_organization_osr
2849: );
2850:
2851: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2852: RAISE FND_API.G_EXC_ERROR;
2853: END IF;
2854: END IF;
2855:
2848: p_parent_org_osr => x_organization_osr
2849: );
2850:
2851: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2852: RAISE FND_API.G_EXC_ERROR;
2853: END IF;
2854: END IF;
2855:
2856: HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE := l_cbm;
2872: p_parent_osr => x_organization_osr,
2873: p_parent_obj_type => 'ORG'
2874: );
2875:
2876: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2877: RAISE FND_API.G_EXC_ERROR;
2878: END IF;
2879: END IF;
2880:
2873: p_parent_obj_type => 'ORG'
2874: );
2875:
2876: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2877: RAISE FND_API.G_EXC_ERROR;
2878: END IF;
2879: END IF;
2880:
2881: HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE := l_cbm;
2907: x_msg_count => x_msg_count,
2908: x_msg_data => x_msg_data
2909: );
2910:
2911: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2912: RAISE FND_API.G_EXC_ERROR;
2913: END IF;
2914: END IF;
2915:
2908: x_msg_data => x_msg_data
2909: );
2910:
2911: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2912: RAISE FND_API.G_EXC_ERROR;
2913: END IF;
2914: END IF;
2915:
2916: HZ_UTILITY_V2PUB.G_CREATED_BY_MODULE := l_cbm;
2927: x_msg_count => x_msg_count,
2928: x_msg_data => x_msg_data
2929: );
2930:
2931: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2932: RAISE FND_API.G_EXC_ERROR;
2933: END IF;
2934: END IF;
2935:
2928: x_msg_data => x_msg_data
2929: );
2930:
2931: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2932: RAISE FND_API.G_EXC_ERROR;
2933: END IF;
2934: END IF;
2935:
2936: ---------------------
2945: x_msg_count => x_msg_count,
2946: x_msg_data => x_msg_data
2947: );
2948:
2949: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2950: RAISE FND_API.G_EXC_ERROR;
2951: END IF;
2952: END IF;
2953:
2946: x_msg_data => x_msg_data
2947: );
2948:
2949: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2950: RAISE FND_API.G_EXC_ERROR;
2951: END IF;
2952: END IF;
2953:
2954:
2963: x_return_status => x_return_status,
2964: x_msg_count => x_msg_count,
2965: x_msg_data => x_msg_data
2966: );
2967: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2968: RAISE FND_API.G_EXC_ERROR;
2969: END IF;
2970: END IF;
2971:
2964: x_msg_count => x_msg_count,
2965: x_msg_data => x_msg_data
2966: );
2967: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2968: RAISE FND_API.G_EXC_ERROR;
2969: END IF;
2970: END IF;
2971:
2972:
2982: x_msg_count => x_msg_count,
2983: x_msg_data => x_msg_data
2984: );
2985:
2986: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2987: RAISE FND_API.G_EXC_ERROR;
2988: END IF;
2989: END IF;
2990:
2983: x_msg_data => x_msg_data
2984: );
2985:
2986: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2987: RAISE FND_API.G_EXC_ERROR;
2988: END IF;
2989: END IF;
2990:
2991: ----------------------------
3000: x_msg_count => x_msg_count,
3001: x_msg_data => x_msg_data
3002: );
3003:
3004: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3005: RAISE FND_API.G_EXC_ERROR;
3006: END IF;
3007: END IF;
3008:
3001: x_msg_data => x_msg_data
3002: );
3003:
3004: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3005: RAISE FND_API.G_EXC_ERROR;
3006: END IF;
3007: END IF;
3008:
3009: -- raise update org event
3044: p_prefix=>l_debug_prefix,
3045: p_msg_level=>fnd_log.level_procedure);
3046: END IF;
3047: EXCEPTION
3048: WHEN fnd_api.g_exc_error THEN
3049: ROLLBACK TO do_update_organization_bo_pub;
3050:
3051: -- reset Global variable
3052: HZ_UTILITY_V2PUB.G_CALLING_API := NULL;
3055: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_OBJECT_ERROR');
3056: FND_MESSAGE.SET_TOKEN('OBJECT', 'ORG');
3057: FND_MSG_PUB.ADD;
3058:
3059: x_return_status := fnd_api.g_ret_sts_error;
3060:
3061: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3062: p_count => x_msg_count,
3063: p_data => x_msg_data);
3057: FND_MSG_PUB.ADD;
3058:
3059: x_return_status := fnd_api.g_ret_sts_error;
3060:
3061: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3062: p_count => x_msg_count,
3063: p_data => x_msg_data);
3064:
3065: -- Debug info.
3075: p_msg_level=>fnd_log.level_procedure);
3076: END IF;
3077:
3078:
3079: WHEN fnd_api.g_exc_unexpected_error THEN
3080: ROLLBACK TO do_update_organization_bo_pub;
3081:
3082: -- reset Global variable
3083: HZ_UTILITY_V2PUB.G_CALLING_API := NULL;
3086: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_OBJECT_ERROR');
3087: FND_MESSAGE.SET_TOKEN('OBJECT', 'ORG');
3088: FND_MSG_PUB.ADD;
3089:
3090: x_return_status := fnd_api.g_ret_sts_unexp_error;
3091:
3092: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3093: p_count => x_msg_count,
3094: p_data => x_msg_data);
3088: FND_MSG_PUB.ADD;
3089:
3090: x_return_status := fnd_api.g_ret_sts_unexp_error;
3091:
3092: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3093: p_count => x_msg_count,
3094: p_data => x_msg_data);
3095:
3096: -- Debug info.
3115: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_OBJECT_ERROR');
3116: FND_MESSAGE.SET_TOKEN('OBJECT', 'ORG');
3117: FND_MSG_PUB.ADD;
3118:
3119: x_return_status := fnd_api.g_ret_sts_unexp_error;
3120:
3121: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
3122: fnd_message.set_token('ERROR' ,SQLERRM);
3123: fnd_msg_pub.add;
3121: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
3122: fnd_message.set_token('ERROR' ,SQLERRM);
3123: fnd_msg_pub.add;
3124:
3125: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3126: p_count => x_msg_count,
3127: p_data => x_msg_data);
3128:
3129: -- Debug info.
3140: END IF;
3141: END do_update_organization_bo;
3142:
3143: PROCEDURE update_organization_bo(
3144: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
3145: p_organization_obj IN HZ_ORGANIZATION_BO,
3146: p_created_by_module IN VARCHAR2,
3147: x_return_status OUT NOCOPY VARCHAR2,
3148: x_msg_count OUT NOCOPY NUMBER,
3171: PROCEDURE update_organization_bo(
3172: p_organization_obj IN HZ_ORGANIZATION_BO,
3173: p_created_by_module IN VARCHAR2,
3174: p_obj_source IN VARCHAR2 := null,
3175: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
3176: x_return_status OUT NOCOPY VARCHAR2,
3177: x_messages OUT NOCOPY HZ_MESSAGE_OBJ_TBL,
3178: x_return_obj OUT NOCOPY HZ_ORGANIZATION_BO,
3179: x_organization_id OUT NOCOPY NUMBER,
3185: l_org_obj HZ_ORGANIZATION_BO;
3186: BEGIN
3187: l_org_obj := p_organization_obj;
3188: do_update_organization_bo(
3189: p_init_msg_list => fnd_api.g_true,
3190: p_organization_obj => l_org_obj,
3191: p_created_by_module => p_created_by_module,
3192: p_obj_source => p_obj_source,
3193: x_return_status => x_return_status,
3200: x_messages := HZ_PARTY_BO_PVT.return_all_messages(
3201: x_return_status => x_return_status,
3202: x_msg_count => l_msg_count,
3203: x_msg_data => l_msg_data);
3204: IF FND_API.to_Boolean(p_return_obj_flag) THEN
3205: x_return_obj := l_org_obj;
3206: END IF;
3207: END update_organization_bo;
3208:
3210: --
3211: -- DESCRIPTION
3212: -- Create or update organization business object.
3213: PROCEDURE do_save_organization_bo(
3214: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
3215: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
3216: p_organization_obj IN OUT NOCOPY HZ_ORGANIZATION_BO,
3217: p_created_by_module IN VARCHAR2,
3218: p_obj_source IN VARCHAR2 := null,
3211: -- DESCRIPTION
3212: -- Create or update organization business object.
3213: PROCEDURE do_save_organization_bo(
3214: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
3215: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
3216: p_organization_obj IN OUT NOCOPY HZ_ORGANIZATION_BO,
3217: p_created_by_module IN VARCHAR2,
3218: p_obj_source IN VARCHAR2 := null,
3219: x_return_status OUT NOCOPY VARCHAR2,
3229: l_create_update_flag VARCHAR2(1);
3230: l_debug_prefix VARCHAR2(30);
3231: BEGIN
3232: -- initialize API return status to success.
3233: x_return_status := FND_API.G_RET_STS_SUCCESS;
3234:
3235: -- Initialize message list if p_init_msg_list is set to TRUE.
3236: IF FND_API.to_Boolean(p_init_msg_list) THEN
3237: FND_MSG_PUB.initialize;
3232: -- initialize API return status to success.
3233: x_return_status := FND_API.G_RET_STS_SUCCESS;
3234:
3235: -- Initialize message list if p_init_msg_list is set to TRUE.
3236: IF FND_API.to_Boolean(p_init_msg_list) THEN
3237: FND_MSG_PUB.initialize;
3238: END IF;
3239:
3240: -- Debug info.
3263: FND_MSG_PUB.ADD;
3264: FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_OBJECT_ERROR');
3265: FND_MESSAGE.SET_TOKEN('OBJECT', 'ORG');
3266: FND_MSG_PUB.ADD;
3267: RAISE FND_API.G_EXC_ERROR;
3268: END IF;
3269:
3270: IF(l_create_update_flag = 'C') THEN
3271: do_create_organization_bo(
3268: END IF;
3269:
3270: IF(l_create_update_flag = 'C') THEN
3271: do_create_organization_bo(
3272: p_init_msg_list => fnd_api.g_false,
3273: p_validate_bo_flag => p_validate_bo_flag,
3274: p_organization_obj => p_organization_obj,
3275: p_created_by_module => p_created_by_module,
3276: p_obj_source => p_obj_source,
3282: x_organization_osr => x_organization_osr
3283: );
3284: ELSIF(l_create_update_flag = 'U') THEN
3285: do_update_organization_bo(
3286: p_init_msg_list => fnd_api.g_false,
3287: p_organization_obj => p_organization_obj,
3288: p_created_by_module => p_created_by_module,
3289: p_obj_source => p_obj_source,
3290: x_return_status => x_return_status,
3294: x_organization_os => x_organization_os,
3295: x_organization_osr => x_organization_osr
3296: );
3297: ELSE
3298: RAISE FND_API.G_EXC_ERROR;
3299: END IF;
3300:
3301: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3302: RAISE FND_API.G_EXC_ERROR;
3297: ELSE
3298: RAISE FND_API.G_EXC_ERROR;
3299: END IF;
3300:
3301: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3302: RAISE FND_API.G_EXC_ERROR;
3303: END IF;
3304:
3305: -- Debug info.
3298: RAISE FND_API.G_EXC_ERROR;
3299: END IF;
3300:
3301: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3302: RAISE FND_API.G_EXC_ERROR;
3303: END IF;
3304:
3305: -- Debug info.
3306: IF fnd_log.level_exception>=fnd_log.g_current_runtime_level THEN
3314: p_prefix=>l_debug_prefix,
3315: p_msg_level=>fnd_log.level_procedure);
3316: END IF;
3317: EXCEPTION
3318: WHEN fnd_api.g_exc_error THEN
3319: x_return_status := fnd_api.g_ret_sts_error;
3320:
3321: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3322: p_count => x_msg_count,
3315: p_msg_level=>fnd_log.level_procedure);
3316: END IF;
3317: EXCEPTION
3318: WHEN fnd_api.g_exc_error THEN
3319: x_return_status := fnd_api.g_ret_sts_error;
3320:
3321: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3322: p_count => x_msg_count,
3323: p_data => x_msg_data);
3317: EXCEPTION
3318: WHEN fnd_api.g_exc_error THEN
3319: x_return_status := fnd_api.g_ret_sts_error;
3320:
3321: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3322: p_count => x_msg_count,
3323: p_data => x_msg_data);
3324:
3325: -- Debug info.
3334: p_prefix=>l_debug_prefix,
3335: p_msg_level=>fnd_log.level_procedure);
3336: END IF;
3337:
3338: WHEN fnd_api.g_exc_unexpected_error THEN
3339: x_return_status := fnd_api.g_ret_sts_unexp_error;
3340:
3341: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3342: p_count => x_msg_count,
3335: p_msg_level=>fnd_log.level_procedure);
3336: END IF;
3337:
3338: WHEN fnd_api.g_exc_unexpected_error THEN
3339: x_return_status := fnd_api.g_ret_sts_unexp_error;
3340:
3341: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3342: p_count => x_msg_count,
3343: p_data => x_msg_data);
3337:
3338: WHEN fnd_api.g_exc_unexpected_error THEN
3339: x_return_status := fnd_api.g_ret_sts_unexp_error;
3340:
3341: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3342: p_count => x_msg_count,
3343: p_data => x_msg_data);
3344:
3345: -- Debug info.
3354: p_prefix=>l_debug_prefix,
3355: p_msg_level=>fnd_log.level_procedure);
3356: END IF;
3357: WHEN OTHERS THEN
3358: x_return_status := fnd_api.g_ret_sts_unexp_error;
3359:
3360: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
3361: fnd_message.set_token('ERROR' ,SQLERRM);
3362: fnd_msg_pub.add;
3360: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
3361: fnd_message.set_token('ERROR' ,SQLERRM);
3362: fnd_msg_pub.add;
3363:
3364: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3365: p_count => x_msg_count,
3366: p_data => x_msg_data);
3367:
3368: -- Debug info.
3379: END IF;
3380: END do_save_organization_bo;
3381:
3382: PROCEDURE save_organization_bo(
3383: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
3384: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
3385: p_organization_obj IN HZ_ORGANIZATION_BO,
3386: p_created_by_module IN VARCHAR2,
3387: x_return_status OUT NOCOPY VARCHAR2,
3380: END do_save_organization_bo;
3381:
3382: PROCEDURE save_organization_bo(
3383: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
3384: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
3385: p_organization_obj IN HZ_ORGANIZATION_BO,
3386: p_created_by_module IN VARCHAR2,
3387: x_return_status OUT NOCOPY VARCHAR2,
3388: x_msg_count OUT NOCOPY NUMBER,
3409: );
3410: END save_organization_bo;
3411:
3412: PROCEDURE save_organization_bo(
3413: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
3414: p_organization_obj IN HZ_ORGANIZATION_BO,
3415: p_created_by_module IN VARCHAR2,
3416: p_obj_source IN VARCHAR2 := null,
3417: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
3413: p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
3414: p_organization_obj IN HZ_ORGANIZATION_BO,
3415: p_created_by_module IN VARCHAR2,
3416: p_obj_source IN VARCHAR2 := null,
3417: p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
3418: x_return_status OUT NOCOPY VARCHAR2,
3419: x_messages OUT NOCOPY HZ_MESSAGE_OBJ_TBL,
3420: x_return_obj OUT NOCOPY HZ_ORGANIZATION_BO,
3421: x_organization_id OUT NOCOPY NUMBER,
3427: l_org_obj HZ_ORGANIZATION_BO;
3428: BEGIN
3429: l_org_obj := p_organization_obj;
3430: do_save_organization_bo(
3431: p_init_msg_list => fnd_api.g_true,
3432: p_validate_bo_flag => p_validate_bo_flag,
3433: p_organization_obj => l_org_obj,
3434: p_created_by_module => p_created_by_module,
3435: p_obj_source => p_obj_source,
3443: x_messages := HZ_PARTY_BO_PVT.return_all_messages(
3444: x_return_status => x_return_status,
3445: x_msg_count => l_msg_count,
3446: x_msg_data => l_msg_data);
3447: IF FND_API.to_Boolean(p_return_obj_flag) THEN
3448: x_return_obj := l_org_obj;
3449: END IF;
3450: END save_organization_bo;
3451:
3459: -- EXTERNAL PROCEDURES/FUNCTIONS ACCESSED
3460: --
3461: -- ARGUMENTS
3462: -- IN:
3463: -- p_init_msg_list Initialize message stack if it is set to FND_API.G_TRUE. Default is FND_API.G_FALSE.
3464: -- p_organization_id Organization ID.
3465: -- p_person_os Org orig system.
3466: -- p_person_osr Org orig system reference.
3467: -- OUT:
3466: -- p_person_osr Org orig system reference.
3467: -- OUT:
3468: -- x_organization_obj Logical organization record.
3469: -- x_return_status Return status after the call. The status can
3470: -- be fnd_api.g_ret_sts_success (success),
3471: -- fnd_api.g_ret_sts_error (error),
3472: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3473: -- x_msg_count Number of messages in message stack.
3474: -- x_msg_data Message text if x_msg_count is 1.
3467: -- OUT:
3468: -- x_organization_obj Logical organization record.
3469: -- x_return_status Return status after the call. The status can
3470: -- be fnd_api.g_ret_sts_success (success),
3471: -- fnd_api.g_ret_sts_error (error),
3472: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3473: -- x_msg_count Number of messages in message stack.
3474: -- x_msg_data Message text if x_msg_count is 1.
3475: --
3468: -- x_organization_obj Logical organization record.
3469: -- x_return_status Return status after the call. The status can
3470: -- be fnd_api.g_ret_sts_success (success),
3471: -- fnd_api.g_ret_sts_error (error),
3472: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3473: -- x_msg_count Number of messages in message stack.
3474: -- x_msg_data Message text if x_msg_count is 1.
3475: --
3476: -- NOTES
3520: */
3521:
3522:
3523: PROCEDURE get_organization_bo(
3524: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
3525: p_organization_id IN NUMBER,
3526: p_organization_os IN VARCHAR2,
3527: p_organization_osr IN VARCHAR2,
3528: x_organization_obj OUT NOCOPY HZ_ORGANIZATION_BO,
3537: l_organization_osr varchar2(255);
3538: BEGIN
3539:
3540: -- initialize API return status to success.
3541: x_return_status := FND_API.G_RET_STS_SUCCESS;
3542:
3543: -- Initialize message list if p_init_msg_list is set to TRUE
3544: IF FND_API.to_Boolean(p_init_msg_list) THEN
3545: FND_MSG_PUB.initialize;
3540: -- initialize API return status to success.
3541: x_return_status := FND_API.G_RET_STS_SUCCESS;
3542:
3543: -- Initialize message list if p_init_msg_list is set to TRUE
3544: IF FND_API.to_Boolean(p_init_msg_list) THEN
3545: FND_MSG_PUB.initialize;
3546: END IF;
3547:
3548:
3568: x_return_status => x_return_status,
3569: x_msg_count => x_msg_count,
3570: x_msg_data => x_msg_data);
3571:
3572: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3573: RAISE fnd_api.g_exc_error;
3574: END IF;
3575:
3576: HZ_EXTRACT_ORGANIZATION_BO_PVT.get_organization_bo(
3569: x_msg_count => x_msg_count,
3570: x_msg_data => x_msg_data);
3571:
3572: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3573: RAISE fnd_api.g_exc_error;
3574: END IF;
3575:
3576: HZ_EXTRACT_ORGANIZATION_BO_PVT.get_organization_bo(
3577: p_init_msg_list => fnd_api.g_false,
3573: RAISE fnd_api.g_exc_error;
3574: END IF;
3575:
3576: HZ_EXTRACT_ORGANIZATION_BO_PVT.get_organization_bo(
3577: p_init_msg_list => fnd_api.g_false,
3578: p_organization_id => l_organization_id,
3579: p_action_type => NULL,
3580: x_organization_obj => x_organization_obj,
3581: x_return_status => x_return_status,
3581: x_return_status => x_return_status,
3582: x_msg_count => x_msg_count,
3583: x_msg_data => x_msg_data);
3584:
3585: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3586: RAISE FND_API.G_EXC_ERROR;
3587: END IF;
3588:
3589:
3582: x_msg_count => x_msg_count,
3583: x_msg_data => x_msg_data);
3584:
3585: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3586: RAISE FND_API.G_EXC_ERROR;
3587: END IF;
3588:
3589:
3590: -- Debug info.
3604:
3605:
3606: EXCEPTION
3607:
3608: WHEN fnd_api.g_exc_error THEN
3609: x_return_status := fnd_api.g_ret_sts_error;
3610:
3611: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3612: p_count => x_msg_count,
3605:
3606: EXCEPTION
3607:
3608: WHEN fnd_api.g_exc_error THEN
3609: x_return_status := fnd_api.g_ret_sts_error;
3610:
3611: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3612: p_count => x_msg_count,
3613: p_data => x_msg_data);
3607:
3608: WHEN fnd_api.g_exc_error THEN
3609: x_return_status := fnd_api.g_ret_sts_error;
3610:
3611: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3612: p_count => x_msg_count,
3613: p_data => x_msg_data);
3614:
3615: -- Debug info.
3623: hz_utility_v2pub.debug(p_message=>'hz_organization_bo_pub.get_organization_bo (-)',
3624: p_prefix=>l_debug_prefix,
3625: p_msg_level=>fnd_log.level_procedure);
3626: END IF;
3627: WHEN fnd_api.g_exc_unexpected_error THEN
3628: x_return_status := fnd_api.g_ret_sts_unexp_error;
3629:
3630: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3631: p_count => x_msg_count,
3624: p_prefix=>l_debug_prefix,
3625: p_msg_level=>fnd_log.level_procedure);
3626: END IF;
3627: WHEN fnd_api.g_exc_unexpected_error THEN
3628: x_return_status := fnd_api.g_ret_sts_unexp_error;
3629:
3630: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3631: p_count => x_msg_count,
3632: p_data => x_msg_data);
3626: END IF;
3627: WHEN fnd_api.g_exc_unexpected_error THEN
3628: x_return_status := fnd_api.g_ret_sts_unexp_error;
3629:
3630: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3631: p_count => x_msg_count,
3632: p_data => x_msg_data);
3633:
3634: -- Debug info.
3643: p_prefix=>l_debug_prefix,
3644: p_msg_level=>fnd_log.level_procedure);
3645: END IF;
3646: WHEN OTHERS THEN
3647: x_return_status := fnd_api.g_ret_sts_unexp_error;
3648:
3649: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
3650: fnd_message.set_token('ERROR' ,SQLERRM);
3651: fnd_msg_pub.add;
3649: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
3650: fnd_message.set_token('ERROR' ,SQLERRM);
3651: fnd_msg_pub.add;
3652:
3653: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3654: p_count => x_msg_count,
3655: p_data => x_msg_data);
3656:
3657: -- Debug info.
3680: l_msg_data VARCHAR2(2000);
3681: l_msg_count NUMBER;
3682: BEGIN
3683: get_organization_bo(
3684: p_init_msg_list => fnd_api.g_true,
3685: p_organization_id => p_organization_id,
3686: p_organization_os => p_organization_os,
3687: p_organization_osr => p_organization_osr,
3688: x_organization_obj => x_organization_obj,
3711: -- ARGUMENTS
3712: -- IN:
3713: -- p_init_msg_list Initialize message stack if it is set to
3714: -- p_event_id BES Event identifier.
3715: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
3716: -- OUT:
3717: -- x_organization_objs One or more created logical organization.
3718: -- x_return_status Return status after the call. The status can
3719: -- be fnd_api.g_ret_sts_success (success),
3715: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
3716: -- OUT:
3717: -- x_organization_objs One or more created logical organization.
3718: -- x_return_status Return status after the call. The status can
3719: -- be fnd_api.g_ret_sts_success (success),
3720: -- fnd_api.g_ret_sts_error (error),
3721: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3722: -- x_msg_count Number of messages in message stack.
3723: -- x_msg_data Message text if x_msg_count is 1.
3716: -- OUT:
3717: -- x_organization_objs One or more created logical organization.
3718: -- x_return_status Return status after the call. The status can
3719: -- be fnd_api.g_ret_sts_success (success),
3720: -- fnd_api.g_ret_sts_error (error),
3721: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3722: -- x_msg_count Number of messages in message stack.
3723: -- x_msg_data Message text if x_msg_count is 1.
3724: --
3717: -- x_organization_objs One or more created logical organization.
3718: -- x_return_status Return status after the call. The status can
3719: -- be fnd_api.g_ret_sts_success (success),
3720: -- fnd_api.g_ret_sts_error (error),
3721: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3722: -- x_msg_count Number of messages in message stack.
3723: -- x_msg_data Message text if x_msg_count is 1.
3724: --
3725: -- NOTES
3745: */
3746:
3747:
3748: PROCEDURE get_organizations_created(
3749: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
3750: p_event_id IN NUMBER,
3751: x_organization_objs OUT NOCOPY HZ_ORGANIZATION_BO_TBL,
3752: x_return_status OUT NOCOPY VARCHAR2,
3753: x_msg_count OUT NOCOPY NUMBER,
3756: l_debug_prefix VARCHAR2(30) := '';
3757: begin
3758:
3759: -- initialize API return status to success.
3760: x_return_status := FND_API.G_RET_STS_SUCCESS;
3761:
3762: -- Initialize message list if p_init_msg_list is set to TRUE
3763: IF FND_API.to_Boolean(p_init_msg_list) THEN
3764: FND_MSG_PUB.initialize;
3759: -- initialize API return status to success.
3760: x_return_status := FND_API.G_RET_STS_SUCCESS;
3761:
3762: -- Initialize message list if p_init_msg_list is set to TRUE
3763: IF FND_API.to_Boolean(p_init_msg_list) THEN
3764: FND_MSG_PUB.initialize;
3765: END IF;
3766:
3767:
3777: p_event_type => 'C',
3778: p_bo_code => 'ORG',
3779: x_return_status => x_return_status);
3780:
3781: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3782: RAISE FND_API.G_EXC_ERROR;
3783: END IF;
3784:
3785: HZ_EXTRACT_ORGANIZATION_BO_PVT.get_organizations_created(
3778: p_bo_code => 'ORG',
3779: x_return_status => x_return_status);
3780:
3781: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3782: RAISE FND_API.G_EXC_ERROR;
3783: END IF;
3784:
3785: HZ_EXTRACT_ORGANIZATION_BO_PVT.get_organizations_created(
3786: p_init_msg_list => fnd_api.g_false,
3782: RAISE FND_API.G_EXC_ERROR;
3783: END IF;
3784:
3785: HZ_EXTRACT_ORGANIZATION_BO_PVT.get_organizations_created(
3786: p_init_msg_list => fnd_api.g_false,
3787: p_event_id => p_event_id,
3788: x_organization_objs => x_organization_objs,
3789: x_return_status => x_return_status,
3790: x_msg_count => x_msg_count,
3789: x_return_status => x_return_status,
3790: x_msg_count => x_msg_count,
3791: x_msg_data => x_msg_data);
3792:
3793: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3794: RAISE FND_API.G_EXC_ERROR;
3795: END IF;
3796:
3797:
3790: x_msg_count => x_msg_count,
3791: x_msg_data => x_msg_data);
3792:
3793: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3794: RAISE FND_API.G_EXC_ERROR;
3795: END IF;
3796:
3797:
3798:
3813:
3814:
3815: EXCEPTION
3816:
3817: WHEN fnd_api.g_exc_error THEN
3818: x_return_status := fnd_api.g_ret_sts_error;
3819:
3820: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3821: p_count => x_msg_count,
3814:
3815: EXCEPTION
3816:
3817: WHEN fnd_api.g_exc_error THEN
3818: x_return_status := fnd_api.g_ret_sts_error;
3819:
3820: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3821: p_count => x_msg_count,
3822: p_data => x_msg_data);
3816:
3817: WHEN fnd_api.g_exc_error THEN
3818: x_return_status := fnd_api.g_ret_sts_error;
3819:
3820: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3821: p_count => x_msg_count,
3822: p_data => x_msg_data);
3823:
3824: -- Debug info.
3832: hz_utility_v2pub.debug(p_message=>'hz_organization_bo_pub.get_organizations_created(-)',
3833: p_prefix=>l_debug_prefix,
3834: p_msg_level=>fnd_log.level_procedure);
3835: END IF;
3836: WHEN fnd_api.g_exc_unexpected_error THEN
3837: x_return_status := fnd_api.g_ret_sts_unexp_error;
3838:
3839: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3840: p_count => x_msg_count,
3833: p_prefix=>l_debug_prefix,
3834: p_msg_level=>fnd_log.level_procedure);
3835: END IF;
3836: WHEN fnd_api.g_exc_unexpected_error THEN
3837: x_return_status := fnd_api.g_ret_sts_unexp_error;
3838:
3839: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3840: p_count => x_msg_count,
3841: p_data => x_msg_data);
3835: END IF;
3836: WHEN fnd_api.g_exc_unexpected_error THEN
3837: x_return_status := fnd_api.g_ret_sts_unexp_error;
3838:
3839: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3840: p_count => x_msg_count,
3841: p_data => x_msg_data);
3842:
3843: -- Debug info.
3852: p_prefix=>l_debug_prefix,
3853: p_msg_level=>fnd_log.level_procedure);
3854: END IF;
3855: WHEN OTHERS THEN
3856: x_return_status := fnd_api.g_ret_sts_unexp_error;
3857:
3858: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
3859: fnd_message.set_token('ERROR' ,SQLERRM);
3860: fnd_msg_pub.add;
3858: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
3859: fnd_message.set_token('ERROR' ,SQLERRM);
3860: fnd_msg_pub.add;
3861:
3862: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
3863: p_count => x_msg_count,
3864: p_data => x_msg_data);
3865:
3866: -- Debug info.
3887: l_msg_data VARCHAR2(2000);
3888: l_msg_count NUMBER;
3889: BEGIN
3890: get_organizations_created(
3891: p_init_msg_list => fnd_api.g_true,
3892: p_event_id => p_event_id,
3893: x_organization_objs => x_organization_objs,
3894: x_return_status => x_return_status,
3895: x_msg_count => l_msg_count,
3917: -- ARGUMENTS
3918: -- IN:
3919: -- p_init_msg_list Initialize message stack if it is set to
3920: -- p_event_id BES Event identifier.
3921: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
3922: -- OUT:
3923: -- x_organization_objs One or more created logical organization.
3924: -- x_return_status Return status after the call. The status can
3925: -- be fnd_api.g_ret_sts_success (success),
3921: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
3922: -- OUT:
3923: -- x_organization_objs One or more created logical organization.
3924: -- x_return_status Return status after the call. The status can
3925: -- be fnd_api.g_ret_sts_success (success),
3926: -- fnd_api.g_ret_sts_error (error),
3927: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3928: -- x_msg_count Number of messages in message stack.
3929: -- x_msg_data Message text if x_msg_count is 1.
3922: -- OUT:
3923: -- x_organization_objs One or more created logical organization.
3924: -- x_return_status Return status after the call. The status can
3925: -- be fnd_api.g_ret_sts_success (success),
3926: -- fnd_api.g_ret_sts_error (error),
3927: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3928: -- x_msg_count Number of messages in message stack.
3929: -- x_msg_data Message text if x_msg_count is 1.
3930: --
3923: -- x_organization_objs One or more created logical organization.
3924: -- x_return_status Return status after the call. The status can
3925: -- be fnd_api.g_ret_sts_success (success),
3926: -- fnd_api.g_ret_sts_error (error),
3927: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
3928: -- x_msg_count Number of messages in message stack.
3929: -- x_msg_data Message text if x_msg_count is 1.
3930: --
3931: -- NOTES
3948: structure and returns them to the caller.
3949: */
3950:
3951: PROCEDURE get_organizations_updated(
3952: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
3953: p_event_id IN NUMBER,
3954: x_organization_objs OUT NOCOPY HZ_ORGANIZATION_BO_TBL,
3955: x_return_status OUT NOCOPY VARCHAR2,
3956: x_msg_count OUT NOCOPY NUMBER,
3960: l_debug_prefix VARCHAR2(30) := '';
3961: begin
3962:
3963: -- initialize API return status to success.
3964: x_return_status := FND_API.G_RET_STS_SUCCESS;
3965:
3966: -- Initialize message list if p_init_msg_list is set to TRUE
3967: IF FND_API.to_Boolean(p_init_msg_list) THEN
3968: FND_MSG_PUB.initialize;
3963: -- initialize API return status to success.
3964: x_return_status := FND_API.G_RET_STS_SUCCESS;
3965:
3966: -- Initialize message list if p_init_msg_list is set to TRUE
3967: IF FND_API.to_Boolean(p_init_msg_list) THEN
3968: FND_MSG_PUB.initialize;
3969: END IF;
3970:
3971:
3981: p_event_type => 'U',
3982: p_bo_code => 'ORG',
3983: x_return_status => x_return_status);
3984:
3985: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3986: RAISE FND_API.G_EXC_ERROR;
3987: END IF;
3988:
3989: HZ_EXTRACT_ORGANIZATION_BO_PVT.get_organizations_updated(
3982: p_bo_code => 'ORG',
3983: x_return_status => x_return_status);
3984:
3985: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3986: RAISE FND_API.G_EXC_ERROR;
3987: END IF;
3988:
3989: HZ_EXTRACT_ORGANIZATION_BO_PVT.get_organizations_updated(
3990: p_init_msg_list => fnd_api.g_false,
3986: RAISE FND_API.G_EXC_ERROR;
3987: END IF;
3988:
3989: HZ_EXTRACT_ORGANIZATION_BO_PVT.get_organizations_updated(
3990: p_init_msg_list => fnd_api.g_false,
3991: p_event_id => p_event_id,
3992: x_organization_objs => x_organization_objs,
3993: x_return_status => x_return_status,
3994: x_msg_count => x_msg_count,
3993: x_return_status => x_return_status,
3994: x_msg_count => x_msg_count,
3995: x_msg_data => x_msg_data);
3996:
3997: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3998: RAISE FND_API.G_EXC_ERROR;
3999: END IF;
4000:
4001:
3994: x_msg_count => x_msg_count,
3995: x_msg_data => x_msg_data);
3996:
3997: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3998: RAISE FND_API.G_EXC_ERROR;
3999: END IF;
4000:
4001:
4002:
4017:
4018:
4019: EXCEPTION
4020:
4021: WHEN fnd_api.g_exc_error THEN
4022: x_return_status := fnd_api.g_ret_sts_error;
4023:
4024: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4025: p_count => x_msg_count,
4018:
4019: EXCEPTION
4020:
4021: WHEN fnd_api.g_exc_error THEN
4022: x_return_status := fnd_api.g_ret_sts_error;
4023:
4024: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4025: p_count => x_msg_count,
4026: p_data => x_msg_data);
4020:
4021: WHEN fnd_api.g_exc_error THEN
4022: x_return_status := fnd_api.g_ret_sts_error;
4023:
4024: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4025: p_count => x_msg_count,
4026: p_data => x_msg_data);
4027:
4028: -- Debug info.
4036: hz_utility_v2pub.debug(p_message=>'hz_organization_bo_pub.get_organizations_updated(-)',
4037: p_prefix=>l_debug_prefix,
4038: p_msg_level=>fnd_log.level_procedure);
4039: END IF;
4040: WHEN fnd_api.g_exc_unexpected_error THEN
4041: x_return_status := fnd_api.g_ret_sts_unexp_error;
4042:
4043: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4044: p_count => x_msg_count,
4037: p_prefix=>l_debug_prefix,
4038: p_msg_level=>fnd_log.level_procedure);
4039: END IF;
4040: WHEN fnd_api.g_exc_unexpected_error THEN
4041: x_return_status := fnd_api.g_ret_sts_unexp_error;
4042:
4043: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4044: p_count => x_msg_count,
4045: p_data => x_msg_data);
4039: END IF;
4040: WHEN fnd_api.g_exc_unexpected_error THEN
4041: x_return_status := fnd_api.g_ret_sts_unexp_error;
4042:
4043: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4044: p_count => x_msg_count,
4045: p_data => x_msg_data);
4046:
4047: -- Debug info.
4056: p_prefix=>l_debug_prefix,
4057: p_msg_level=>fnd_log.level_procedure);
4058: END IF;
4059: WHEN OTHERS THEN
4060: x_return_status := fnd_api.g_ret_sts_unexp_error;
4061:
4062: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
4063: fnd_message.set_token('ERROR' ,SQLERRM);
4064: fnd_msg_pub.add;
4062: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
4063: fnd_message.set_token('ERROR' ,SQLERRM);
4064: fnd_msg_pub.add;
4065:
4066: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4067: p_count => x_msg_count,
4068: p_data => x_msg_data);
4069:
4070: -- Debug info.
4091: l_msg_data VARCHAR2(2000);
4092: l_msg_count NUMBER;
4093: BEGIN
4094: get_organizations_updated(
4095: p_init_msg_list => fnd_api.g_true,
4096: p_event_id => p_event_id,
4097: x_organization_objs => x_organization_objs,
4098: x_return_status => x_return_status,
4099: x_msg_count => l_msg_count,
4119: -- ARGUMENTS
4120: -- IN:
4121: -- p_init_msg_list Initialize message stack if it is set to
4122: -- p_event_id BES Event identifier.
4123: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
4124: -- OUT:
4125: -- x_organization_objs One or more created logical organization.
4126: -- x_return_status Return status after the call. The status can
4127: -- be fnd_api.g_ret_sts_success (success),
4123: -- FND_API.G_TRUE. Default is FND_API.G_FALSE.
4124: -- OUT:
4125: -- x_organization_objs One or more created logical organization.
4126: -- x_return_status Return status after the call. The status can
4127: -- be fnd_api.g_ret_sts_success (success),
4128: -- fnd_api.g_ret_sts_error (error),
4129: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4130: -- x_msg_count Number of messages in message stack.
4131: -- x_msg_data Message text if x_msg_count is 1.
4124: -- OUT:
4125: -- x_organization_objs One or more created logical organization.
4126: -- x_return_status Return status after the call. The status can
4127: -- be fnd_api.g_ret_sts_success (success),
4128: -- fnd_api.g_ret_sts_error (error),
4129: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4130: -- x_msg_count Number of messages in message stack.
4131: -- x_msg_data Message text if x_msg_count is 1.
4132: --
4125: -- x_organization_objs One or more created logical organization.
4126: -- x_return_status Return status after the call. The status can
4127: -- be fnd_api.g_ret_sts_success (success),
4128: -- fnd_api.g_ret_sts_error (error),
4129: -- FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
4130: -- x_msg_count Number of messages in message stack.
4131: -- x_msg_data Message text if x_msg_count is 1.
4132: --
4133: -- NOTES
4137: -- 06-JUN-2005 AWU Created.
4138: --
4139:
4140: PROCEDURE get_organization_updated(
4141: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
4142: p_event_id IN NUMBER,
4143: p_organization_id IN NUMBER,
4144: x_organization_obj OUT NOCOPY HZ_ORGANIZATION_BO,
4145: x_return_status OUT NOCOPY VARCHAR2,
4149: l_debug_prefix VARCHAR2(30) := '';
4150: begin
4151:
4152: -- initialize API return status to success.
4153: x_return_status := FND_API.G_RET_STS_SUCCESS;
4154:
4155: -- Initialize message list if p_init_msg_list is set to TRUE
4156: IF FND_API.to_Boolean(p_init_msg_list) THEN
4157: FND_MSG_PUB.initialize;
4152: -- initialize API return status to success.
4153: x_return_status := FND_API.G_RET_STS_SUCCESS;
4154:
4155: -- Initialize message list if p_init_msg_list is set to TRUE
4156: IF FND_API.to_Boolean(p_init_msg_list) THEN
4157: FND_MSG_PUB.initialize;
4158: END IF;
4159:
4160:
4170: p_event_type => 'U',
4171: p_bo_code => 'ORG',
4172: x_return_status => x_return_status);
4173:
4174: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4175: RAISE FND_API.G_EXC_ERROR;
4176: END IF;
4177:
4178: HZ_EXTRACT_ORGANIZATION_BO_PVT.get_organization_updated(
4171: p_bo_code => 'ORG',
4172: x_return_status => x_return_status);
4173:
4174: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4175: RAISE FND_API.G_EXC_ERROR;
4176: END IF;
4177:
4178: HZ_EXTRACT_ORGANIZATION_BO_PVT.get_organization_updated(
4179: p_init_msg_list => fnd_api.g_false,
4175: RAISE FND_API.G_EXC_ERROR;
4176: END IF;
4177:
4178: HZ_EXTRACT_ORGANIZATION_BO_PVT.get_organization_updated(
4179: p_init_msg_list => fnd_api.g_false,
4180: p_event_id => p_event_id,
4181: p_organization_id => p_organization_id,
4182: x_organization_obj => x_organization_obj,
4183: x_return_status => x_return_status,
4183: x_return_status => x_return_status,
4184: x_msg_count => x_msg_count,
4185: x_msg_data => x_msg_data);
4186:
4187: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4188: RAISE FND_API.G_EXC_ERROR;
4189: END IF;
4190:
4191:
4184: x_msg_count => x_msg_count,
4185: x_msg_data => x_msg_data);
4186:
4187: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4188: RAISE FND_API.G_EXC_ERROR;
4189: END IF;
4190:
4191:
4192:
4207:
4208:
4209: EXCEPTION
4210:
4211: WHEN fnd_api.g_exc_error THEN
4212: x_return_status := fnd_api.g_ret_sts_error;
4213:
4214: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4215: p_count => x_msg_count,
4208:
4209: EXCEPTION
4210:
4211: WHEN fnd_api.g_exc_error THEN
4212: x_return_status := fnd_api.g_ret_sts_error;
4213:
4214: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4215: p_count => x_msg_count,
4216: p_data => x_msg_data);
4210:
4211: WHEN fnd_api.g_exc_error THEN
4212: x_return_status := fnd_api.g_ret_sts_error;
4213:
4214: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4215: p_count => x_msg_count,
4216: p_data => x_msg_data);
4217:
4218: -- Debug info.
4226: hz_utility_v2pub.debug(p_message=>'hz_organization_bo_pub.get_organization_updated(-)',
4227: p_prefix=>l_debug_prefix,
4228: p_msg_level=>fnd_log.level_procedure);
4229: END IF;
4230: WHEN fnd_api.g_exc_unexpected_error THEN
4231: x_return_status := fnd_api.g_ret_sts_unexp_error;
4232:
4233: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4234: p_count => x_msg_count,
4227: p_prefix=>l_debug_prefix,
4228: p_msg_level=>fnd_log.level_procedure);
4229: END IF;
4230: WHEN fnd_api.g_exc_unexpected_error THEN
4231: x_return_status := fnd_api.g_ret_sts_unexp_error;
4232:
4233: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4234: p_count => x_msg_count,
4235: p_data => x_msg_data);
4229: END IF;
4230: WHEN fnd_api.g_exc_unexpected_error THEN
4231: x_return_status := fnd_api.g_ret_sts_unexp_error;
4232:
4233: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4234: p_count => x_msg_count,
4235: p_data => x_msg_data);
4236:
4237: -- Debug info.
4246: p_prefix=>l_debug_prefix,
4247: p_msg_level=>fnd_log.level_procedure);
4248: END IF;
4249: WHEN OTHERS THEN
4250: x_return_status := fnd_api.g_ret_sts_unexp_error;
4251:
4252: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
4253: fnd_message.set_token('ERROR' ,SQLERRM);
4254: fnd_msg_pub.add;
4252: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
4253: fnd_message.set_token('ERROR' ,SQLERRM);
4254: fnd_msg_pub.add;
4255:
4256: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4257: p_count => x_msg_count,
4258: p_data => x_msg_data);
4259:
4260: -- Debug info.
4282: l_msg_data VARCHAR2(2000);
4283: l_msg_count NUMBER;
4284: BEGIN
4285: get_organization_updated(
4286: p_init_msg_list => fnd_api.g_true,
4287: p_event_id => p_event_id,
4288: p_organization_id => p_organization_id,
4289: x_organization_obj => x_organization_obj,
4290: x_return_status => x_return_status,
4299:
4300:
4301: -- get TCA identifiers for create event
4302: PROCEDURE get_ids_organizations_created (
4303: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
4304: p_event_id IN NUMBER,
4305: x_organization_ids OUT NOCOPY HZ_EXTRACT_BO_UTIL_PVT.BO_ID_TBL,
4306: x_return_status OUT NOCOPY VARCHAR2,
4307: x_msg_count OUT NOCOPY NUMBER,
4311: l_debug_prefix VARCHAR2(30) := '';
4312:
4313: begin
4314: -- initialize API return status to success.
4315: x_return_status := FND_API.G_RET_STS_SUCCESS;
4316:
4317: -- Initialize message list if p_init_msg_list is set to TRUE
4318: IF FND_API.to_Boolean(p_init_msg_list) THEN
4319: FND_MSG_PUB.initialize;
4314: -- initialize API return status to success.
4315: x_return_status := FND_API.G_RET_STS_SUCCESS;
4316:
4317: -- Initialize message list if p_init_msg_list is set to TRUE
4318: IF FND_API.to_Boolean(p_init_msg_list) THEN
4319: FND_MSG_PUB.initialize;
4320: END IF;
4321:
4322:
4332: p_event_type => 'C',
4333: p_bo_code => 'ORG',
4334: x_return_status => x_return_status);
4335:
4336: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4337: RAISE FND_API.G_EXC_ERROR;
4338: END IF;
4339:
4340: HZ_EXTRACT_BO_UTIL_PVT.get_bo_root_ids(
4333: p_bo_code => 'ORG',
4334: x_return_status => x_return_status);
4335:
4336: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4337: RAISE FND_API.G_EXC_ERROR;
4338: END IF;
4339:
4340: HZ_EXTRACT_BO_UTIL_PVT.get_bo_root_ids(
4341: p_init_msg_list => fnd_api.g_false,
4337: RAISE FND_API.G_EXC_ERROR;
4338: END IF;
4339:
4340: HZ_EXTRACT_BO_UTIL_PVT.get_bo_root_ids(
4341: p_init_msg_list => fnd_api.g_false,
4342: p_event_id => p_event_id,
4343: x_obj_root_ids => x_organization_ids,
4344: x_return_status => x_return_status,
4345: x_msg_count => x_msg_count,
4344: x_return_status => x_return_status,
4345: x_msg_count => x_msg_count,
4346: x_msg_data => x_msg_data);
4347:
4348: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4349: RAISE FND_API.G_EXC_ERROR;
4350: END IF;
4351:
4352:
4345: x_msg_count => x_msg_count,
4346: x_msg_data => x_msg_data);
4347:
4348: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4349: RAISE FND_API.G_EXC_ERROR;
4350: END IF;
4351:
4352:
4353: -- Debug info.
4367:
4368:
4369: EXCEPTION
4370:
4371: WHEN fnd_api.g_exc_error THEN
4372: x_return_status := fnd_api.g_ret_sts_error;
4373:
4374: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4375: p_count => x_msg_count,
4368:
4369: EXCEPTION
4370:
4371: WHEN fnd_api.g_exc_error THEN
4372: x_return_status := fnd_api.g_ret_sts_error;
4373:
4374: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4375: p_count => x_msg_count,
4376: p_data => x_msg_data);
4370:
4371: WHEN fnd_api.g_exc_error THEN
4372: x_return_status := fnd_api.g_ret_sts_error;
4373:
4374: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4375: p_count => x_msg_count,
4376: p_data => x_msg_data);
4377:
4378: -- Debug info.
4386: hz_utility_v2pub.debug(p_message=>'get_ids_organizations_created(-)',
4387: p_prefix=>l_debug_prefix,
4388: p_msg_level=>fnd_log.level_procedure);
4389: END IF;
4390: WHEN fnd_api.g_exc_unexpected_error THEN
4391: x_return_status := fnd_api.g_ret_sts_unexp_error;
4392:
4393: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4394: p_count => x_msg_count,
4387: p_prefix=>l_debug_prefix,
4388: p_msg_level=>fnd_log.level_procedure);
4389: END IF;
4390: WHEN fnd_api.g_exc_unexpected_error THEN
4391: x_return_status := fnd_api.g_ret_sts_unexp_error;
4392:
4393: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4394: p_count => x_msg_count,
4395: p_data => x_msg_data);
4389: END IF;
4390: WHEN fnd_api.g_exc_unexpected_error THEN
4391: x_return_status := fnd_api.g_ret_sts_unexp_error;
4392:
4393: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4394: p_count => x_msg_count,
4395: p_data => x_msg_data);
4396:
4397: -- Debug info.
4406: p_prefix=>l_debug_prefix,
4407: p_msg_level=>fnd_log.level_procedure);
4408: END IF;
4409: WHEN OTHERS THEN
4410: x_return_status := fnd_api.g_ret_sts_unexp_error;
4411:
4412: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
4413: fnd_message.set_token('ERROR' ,SQLERRM);
4414: fnd_msg_pub.add;
4412: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
4413: fnd_message.set_token('ERROR' ,SQLERRM);
4414: fnd_msg_pub.add;
4415:
4416: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4417: p_count => x_msg_count,
4418: p_data => x_msg_data);
4419:
4420: -- Debug info.
4434:
4435:
4436: -- get TCA identifiers for update event
4437: PROCEDURE get_ids_organizations_updated (
4438: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
4439: p_event_id IN NUMBER,
4440: x_organization_ids OUT NOCOPY HZ_EXTRACT_BO_UTIL_PVT.BO_ID_TBL,
4441: x_return_status OUT NOCOPY VARCHAR2,
4442: x_msg_count OUT NOCOPY NUMBER,
4445: l_debug_prefix VARCHAR2(30) := '';
4446:
4447: begin
4448: -- initialize API return status to success.
4449: x_return_status := FND_API.G_RET_STS_SUCCESS;
4450:
4451: -- Initialize message list if p_init_msg_list is set to TRUE
4452: IF FND_API.to_Boolean(p_init_msg_list) THEN
4453: FND_MSG_PUB.initialize;
4448: -- initialize API return status to success.
4449: x_return_status := FND_API.G_RET_STS_SUCCESS;
4450:
4451: -- Initialize message list if p_init_msg_list is set to TRUE
4452: IF FND_API.to_Boolean(p_init_msg_list) THEN
4453: FND_MSG_PUB.initialize;
4454: END IF;
4455:
4456:
4466: p_event_type => 'U',
4467: p_bo_code => 'ORG',
4468: x_return_status => x_return_status);
4469:
4470: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4471: RAISE FND_API.G_EXC_ERROR;
4472: END IF;
4473:
4474: HZ_EXTRACT_BO_UTIL_PVT.get_bo_root_ids(
4467: p_bo_code => 'ORG',
4468: x_return_status => x_return_status);
4469:
4470: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4471: RAISE FND_API.G_EXC_ERROR;
4472: END IF;
4473:
4474: HZ_EXTRACT_BO_UTIL_PVT.get_bo_root_ids(
4475: p_init_msg_list => fnd_api.g_false,
4471: RAISE FND_API.G_EXC_ERROR;
4472: END IF;
4473:
4474: HZ_EXTRACT_BO_UTIL_PVT.get_bo_root_ids(
4475: p_init_msg_list => fnd_api.g_false,
4476: p_event_id => p_event_id,
4477: x_obj_root_ids => x_organization_ids,
4478: x_return_status => x_return_status,
4479: x_msg_count => x_msg_count,
4478: x_return_status => x_return_status,
4479: x_msg_count => x_msg_count,
4480: x_msg_data => x_msg_data);
4481:
4482: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4483: RAISE FND_API.G_EXC_ERROR;
4484: END IF;
4485:
4486:
4479: x_msg_count => x_msg_count,
4480: x_msg_data => x_msg_data);
4481:
4482: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4483: RAISE FND_API.G_EXC_ERROR;
4484: END IF;
4485:
4486:
4487: -- Debug info.
4501:
4502:
4503: EXCEPTION
4504:
4505: WHEN fnd_api.g_exc_error THEN
4506: x_return_status := fnd_api.g_ret_sts_error;
4507:
4508: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4509: p_count => x_msg_count,
4502:
4503: EXCEPTION
4504:
4505: WHEN fnd_api.g_exc_error THEN
4506: x_return_status := fnd_api.g_ret_sts_error;
4507:
4508: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4509: p_count => x_msg_count,
4510: p_data => x_msg_data);
4504:
4505: WHEN fnd_api.g_exc_error THEN
4506: x_return_status := fnd_api.g_ret_sts_error;
4507:
4508: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4509: p_count => x_msg_count,
4510: p_data => x_msg_data);
4511:
4512: -- Debug info.
4520: hz_utility_v2pub.debug(p_message=>'get_ids_organizations_updated(-)',
4521: p_prefix=>l_debug_prefix,
4522: p_msg_level=>fnd_log.level_procedure);
4523: END IF;
4524: WHEN fnd_api.g_exc_unexpected_error THEN
4525: x_return_status := fnd_api.g_ret_sts_unexp_error;
4526:
4527: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4528: p_count => x_msg_count,
4521: p_prefix=>l_debug_prefix,
4522: p_msg_level=>fnd_log.level_procedure);
4523: END IF;
4524: WHEN fnd_api.g_exc_unexpected_error THEN
4525: x_return_status := fnd_api.g_ret_sts_unexp_error;
4526:
4527: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4528: p_count => x_msg_count,
4529: p_data => x_msg_data);
4523: END IF;
4524: WHEN fnd_api.g_exc_unexpected_error THEN
4525: x_return_status := fnd_api.g_ret_sts_unexp_error;
4526:
4527: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4528: p_count => x_msg_count,
4529: p_data => x_msg_data);
4530:
4531: -- Debug info.
4540: p_prefix=>l_debug_prefix,
4541: p_msg_level=>fnd_log.level_procedure);
4542: END IF;
4543: WHEN OTHERS THEN
4544: x_return_status := fnd_api.g_ret_sts_unexp_error;
4545:
4546: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
4547: fnd_message.set_token('ERROR' ,SQLERRM);
4548: fnd_msg_pub.add;
4546: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
4547: fnd_message.set_token('ERROR' ,SQLERRM);
4548: fnd_msg_pub.add;
4549:
4550: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
4551: p_count => x_msg_count,
4552: p_data => x_msg_data);
4553:
4554: -- Debug info.