[Home] [Help]
1329: WHEN GL_CURRENCY_API.NO_RATE THEN
1330: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1331: -- No rate exist for for given conversion date and type between
1332: -- transaction currency and functional currency
1333: FND_MESSAGE.Set_Name('AMS', 'AMS_METR_NO_RATE');
1334: FND_MSG_PUB.Add;
1335: END IF;
1336: x_return_status := FND_API.G_RET_STS_ERROR;
1337:
1339: RETURN;
1340: WHEN GL_CURRENCY_API.INVALID_CURRENCY THEN
1341: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1342: -- Atleast One of the two Currencies specified is invalid
1343: FND_MESSAGE.Set_Name('AMS', 'AMS_METR_INVALID_CURR');
1344: FND_MSG_PUB.Add;
1345: END IF;
1346: x_return_status := FND_API.G_RET_STS_ERROR;
1347:
1713:
1714: IF (l_freeze_status = Fnd_Api.G_TRUE) THEN
1715: -- frozen to create the record
1716: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
1717: Fnd_Message.Set_Name('AMS', 'AMS_METR_FROZEN');
1718: Fnd_Msg_Pub.ADD;
1719: END IF;
1720: l_return_status := Fnd_Api.G_RET_STS_ERROR;
1721: END IF;
2380: x_msg_data => x_msg_data);
2381: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2382: -- BUG2486379: Display budget utilization errors.
2383: -- Fnd_Msg_Pub.Initialize;
2384: Fnd_Message.set_name('AMS', 'AMS_MET_NO_POST');
2385: Fnd_Msg_Pub.ADD;
2386: --IF (AMS_DEBUG_HIGH_ON) THEN
2387: -- Ams_Utility_Pvt.debug_message('You can not post this cost!');
2388: --END IF;
2480: --
2481: -- Add error message to API message list.
2482: --
2483: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
2484: Fnd_Message.set_name('AMS', 'AMS_API_RECORD_NOT_FOUND');
2485: Fnd_Msg_Pub.ADD;
2486: END IF;
2487: RAISE Fnd_Api.g_exc_error;
2488: END IF;
2499: --
2500: -- Add error message to API message list.
2501: --
2502: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
2503: Fnd_Message.set_name('AMS', 'AMS_API_VARREC_NOT_FOUND');
2504: Fnd_Msg_Pub.ADD;
2505: END IF;
2506: RAISE Fnd_Api.g_exc_error;
2507: END IF;
2763: -- DMVINCEN: There is no reason for this restriction.
2764: -- IF IsSeeded (p_activity_metric_id) THEN
2765: -- IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error)
2766: -- THEN
2767: -- Fnd_Message.set_name('AMS', 'AMS_METR_SEEDED_METR');
2768: -- Fnd_Msg_Pub.ADD;
2769: -- END IF;
2770: --
2771: -- RAISE Fnd_Api.G_EXC_ERROR;
2799: CLOSE c_check_child_exists;
2800:
2801: IF l_child_type = 'SUMMARY' THEN
2802: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
2803: Fnd_Message.set_name('AMS', 'AMS_METR_CANT_DELETE_PARENT');
2804: Fnd_Msg_Pub.ADD;
2805: END IF;
2806: RAISE Fnd_Api.g_exc_error;
2807: END IF;
2812: OPEN c_actmet_details(p_activity_metric_id);
2813: FETCH c_actmet_details INTO l_act_metric_rec;
2814: IF (c_actmet_details%NOTFOUND) THEN
2815: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
2816: Fnd_Message.set_name('AMS', 'AMS_API_RECORD_NOT_FOUND');
2817: Fnd_Msg_Pub.ADD;
2818: END IF;
2819: RAISE Fnd_Api.g_exc_error;
2820: END IF;
2833: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
2834: -- sunkumar 04/30/2003 added message for delete status of objects depending on status (ACTIVE, CANCELLED, COMPLETED)
2835: l_object_name := ams_utility_pvt.get_lookup_meaning(
2836: 'AMS_SYS_ARC_QUALIFIER',l_act_metric_rec.arc_act_metric_used_by);
2837: Fnd_Message.Set_Name('AMS', 'AMS_METR_DELETE');
2838: Fnd_Message.set_token('OBJECT', l_object_name);
2839: Fnd_Msg_Pub.ADD;
2840: END IF;
2841: l_return_status := Fnd_Api.G_RET_STS_ERROR;
2834: -- sunkumar 04/30/2003 added message for delete status of objects depending on status (ACTIVE, CANCELLED, COMPLETED)
2835: l_object_name := ams_utility_pvt.get_lookup_meaning(
2836: 'AMS_SYS_ARC_QUALIFIER',l_act_metric_rec.arc_act_metric_used_by);
2837: Fnd_Message.Set_Name('AMS', 'AMS_METR_DELETE');
2838: Fnd_Message.set_token('OBJECT', l_object_name);
2839: Fnd_Msg_Pub.ADD;
2840: END IF;
2841: l_return_status := Fnd_Api.G_RET_STS_ERROR;
2842: END IF;
2852:
2853: IF (l_freeze_status = Fnd_Api.G_TRUE) THEN
2854: -- frozen to create the record
2855: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
2856: Fnd_Message.Set_Name('AMS', 'AMS_METR_FROZEN');
2857: Fnd_Msg_Pub.ADD;
2858: END IF;
2859: l_return_status := Fnd_Api.G_RET_STS_ERROR;
2860: END IF;
2868:
2869: -- If the actual value has been posted to the budget do not delete.
2870: IF l_act_metric_rec.published_flag = 'Y' THEN
2871: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
2872: Fnd_Message.SET_NAME('AMS', 'AMS_METR_PUBLISHED');
2873: Fnd_Msg_Pub.ADD;
2874: END IF;
2875: RAISE Fnd_Api.g_exc_error;
2876: END IF;
2896: AND object_version_number = p_object_version_number;
2897:
2898: IF SQL%NOTFOUND THEN
2899: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
2900: Fnd_Message.set_name('AMS', 'AMS_API_RECORD_NOT_FOUND');
2901: Fnd_Msg_Pub.ADD;
2902: END IF;
2903: RAISE Fnd_Api.g_exc_error;
2904: END IF;
3335: OPEN c_metric_info(p_activity_metric_id);
3336: FETCH c_metric_info INTO l_metrics_name;
3337: CLOSE c_metric_info;
3338: IF l_metrics_name is not null THEN
3339: Fnd_Message.set_name('AMS', 'AMS_METR_RECORD_NOT_FOUND');
3340: Fnd_Message.set_token('METRIC', l_metrics_name);
3341: Fnd_Msg_Pub.ADD;
3342: ELSE
3343: Fnd_Message.set_name('AMS', 'AMS_API_RECORD_NOT_FOUND');
3336: FETCH c_metric_info INTO l_metrics_name;
3337: CLOSE c_metric_info;
3338: IF l_metrics_name is not null THEN
3339: Fnd_Message.set_name('AMS', 'AMS_METR_RECORD_NOT_FOUND');
3340: Fnd_Message.set_token('METRIC', l_metrics_name);
3341: Fnd_Msg_Pub.ADD;
3342: ELSE
3343: Fnd_Message.set_name('AMS', 'AMS_API_RECORD_NOT_FOUND');
3344: Fnd_Msg_Pub.ADD;
3339: Fnd_Message.set_name('AMS', 'AMS_METR_RECORD_NOT_FOUND');
3340: Fnd_Message.set_token('METRIC', l_metrics_name);
3341: Fnd_Msg_Pub.ADD;
3342: ELSE
3343: Fnd_Message.set_name('AMS', 'AMS_API_RECORD_NOT_FOUND');
3344: Fnd_Msg_Pub.ADD;
3345: END IF;
3346: END IF;
3347: RAISE Fnd_Api.g_exc_error;
3385: WHEN Ams_Utility_Pvt.RESOURCE_LOCKED THEN
3386: x_return_status := Fnd_Api.G_RET_STS_ERROR ;
3387:
3388: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
3389: Fnd_Message.set_name('AMS', 'AMS_API_RESOURCE_LOCKED');
3390: Fnd_Msg_Pub.ADD;
3391: END IF;
3392:
3393: Fnd_Msg_Pub.Count_And_Get (
3593: THEN
3594: -- missing required fields
3595: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR)
3596: THEN -- MMSG
3597: Fnd_Message.Set_Name('AMS', 'AMS_METR_MISSING_APP_ID');
3598: Fnd_Msg_Pub.ADD;
3599: END IF;
3600:
3601: x_return_status := Fnd_Api.G_RET_STS_ERROR;
3610: THEN
3611: -- missing required fields
3612: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR)
3613: THEN -- MMSG
3614: Fnd_Message.Set_Name('AMS', 'AMS_METR_MISSING_ARC_USED_FOR');
3615: Fnd_Msg_Pub.ADD;
3616: END IF;
3617:
3618: x_return_status := Fnd_Api.G_RET_STS_ERROR;
3628: THEN
3629: -- missing required fields
3630: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR)
3631: THEN -- MMSG
3632: Fnd_Message.Set_Name('AMS', 'AMS_METR_MISSING_ARC_USED_FOR');
3633: Fnd_Msg_Pub.ADD;
3634: END IF;
3635:
3636: x_return_status := Fnd_Api.G_RET_STS_ERROR;
3645: THEN
3646: -- missing required fields
3647: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR)
3648: THEN -- MMSG
3649: Fnd_Message.Set_Name('AMS', 'AMS_METR_MISSING_METRIC_ID');
3650: Fnd_Msg_Pub.ADD;
3651: END IF;
3652:
3653: x_return_status := Fnd_Api.G_RET_STS_ERROR;
3664: THEN
3665: -- missing required fields
3666: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
3667: THEN -- MMSG
3668: FND_MESSAGE.Set_Name('AMS', 'AMS_METR_MISSING_UOM');
3669: FND_MSG_PUB.Add;
3670: END IF;
3671:
3672: x_return_status := FND_API.G_RET_STS_ERROR;
3684: THEN
3685: -- missing required fields
3686: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR)
3687: THEN -- MMSG
3688: Fnd_Message.Set_Name('AMS', 'AMS_METR_MISSING_SENSITIVE');
3689: Fnd_Msg_Pub.ADD;
3690: END IF;
3691:
3692: x_return_status := Fnd_Api.G_RET_STS_ERROR;
3764: ) = Fnd_Api.g_false
3765: THEN
3766: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error)
3767: THEN
3768: Fnd_Message.set_name('AMS', 'AMS_METR_ACT_DUP_ID');
3769: Fnd_Msg_Pub.ADD;
3770: END IF;
3771: x_return_status := Fnd_Api.g_ret_sts_error;
3772: RETURN;
3787: CLOSE c_check_function;
3788:
3789: IF l_test IS NULL THEN
3790: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
3791: Fnd_Message.set_name('AMS', 'AMS_ACT_MET_DUP_FUNCTION');
3792: Fnd_Msg_Pub.ADD;
3793: END IF;
3794: x_return_status := Fnd_Api.g_ret_sts_error;
3795: END IF;
3873: IF c_check_metric_id%NOTFOUND
3874: THEN
3875: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
3876: THEN
3877: FND_MESSAGE.Set_Name('AMS', 'AMS_METR_INVALID_MET');
3878: FND_MSG_PUB.ADD;
3879: END IF;
3880:
3881: x_return_status := FND_API.G_RET_STS_ERROR;
3892: IF c_check_currency%NOTFOUND
3893: THEN
3894: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
3895: THEN
3896: FND_MESSAGE.Set_Name('AMS', 'AMS_METR_INVALID_TRANS_CUR');
3897: FND_MSG_PUB.ADD;
3898: END IF;
3899:
3900: x_return_status := FND_API.G_RET_STS_ERROR;
3914: IF c_check_currency%NOTFOUND
3915: THEN
3916: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
3917: THEN
3918: FND_MESSAGE.Set_Name('AMS', 'AMS_METR_INVALID_FUNC_CUR');
3919: FND_MSG_PUB.ADD;
3920: END IF;
3921:
3922: x_return_status := FND_API.G_RET_STS_ERROR;
3942: ) = Fnd_Api.G_FALSE
3943: THEN
3944: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR)
3945: THEN
3946: Fnd_Message.Set_Name('AMS', 'AMS_METR_INVALID_TRANS_CUR');
3947: Fnd_Msg_Pub.ADD;
3948: END IF;
3949:
3950: x_return_status := Fnd_Api.G_RET_STS_ERROR;
3968: ) = Fnd_Api.G_FALSE
3969: THEN
3970: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR)
3971: THEN
3972: Fnd_Message.Set_Name('AMS', 'AMS_METR_INVALID_FUNC_CUR');
3973: Fnd_Msg_Pub.ADD;
3974: END IF;
3975:
3976: x_return_status := Fnd_Api.G_RET_STS_ERROR;
3993: = Fnd_Api.G_FALSE
3994: THEN
3995: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR)
3996: THEN
3997: Fnd_Message.Set_Name('AMS', 'AMS_METR_INVALID_SENS_FLAG');
3998: Fnd_Msg_Pub.ADD;
3999: END IF;
4000:
4001: x_return_status := Fnd_Api.G_RET_STS_ERROR;
4019: FETCH c_arc_metric_usage INTO l_dummy;
4020: CLOSE c_arc_metric_usage;
4021: IF l_dummy IS NULL THEN
4022: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
4023: Fnd_Message.Set_Name ('AMS', 'AMS_METR_INVALID_USED_BY');
4024: FND_MSG_PUB.add;
4025: END IF;
4026: x_return_status := FND_API.g_ret_sts_error;
4027: END IF;
4036: FETCH c_arc_metric_usage INTO l_dummy;
4037: CLOSE c_arc_metric_usage;
4038: IF l_dummy IS NULL THEN
4039: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
4040: Fnd_Message.Set_Name ('AMS', 'AMS_METR_INVALID_ORIGIN');
4041: FND_MSG_PUB.add;
4042: END IF;
4043: x_return_status := FND_API.g_ret_sts_error;
4044: END IF;
4188: p_object_type => l_act_metrics_rec.arc_act_metric_used_by,
4189: p_user_or_role_id => AMS_Utility_PVT.get_resource_id (FND_GLOBAL.user_id),
4190: p_user_or_role_type => 'USER') <> 'F' THEN
4191: x_return_status := Fnd_Api.G_RET_STS_ERROR;
4192: FND_MESSAGE.set_name ('AMS', 'AMS_NO_METRIC_UPDATE_ACCESS');
4193: FND_MESSAGE.set_token('OBJECT',
4194: AMS_Utility_PVT.get_object_name(l_act_metrics_rec.arc_act_metric_used_by,
4195: l_act_metrics_rec.act_metric_used_by_id)
4196: );
4189: p_user_or_role_id => AMS_Utility_PVT.get_resource_id (FND_GLOBAL.user_id),
4190: p_user_or_role_type => 'USER') <> 'F' THEN
4191: x_return_status := Fnd_Api.G_RET_STS_ERROR;
4192: FND_MESSAGE.set_name ('AMS', 'AMS_NO_METRIC_UPDATE_ACCESS');
4193: FND_MESSAGE.set_token('OBJECT',
4194: AMS_Utility_PVT.get_object_name(l_act_metrics_rec.arc_act_metric_used_by,
4195: l_act_metrics_rec.act_metric_used_by_id)
4196: );
4197: FND_MSG_PUB.add;
4227: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
4228: l_object_name := ams_utility_pvt.get_lookup_meaning(
4229: 'AMS_SYS_ARC_QUALIFIER',
4230: l_act_metrics_rec.arc_act_metric_used_by);
4231: Fnd_Message.set_name('AMS', 'AMS_UPDATE_FORECAST');
4232: Fnd_Message.set_token('OBJECT', l_object_name);
4233: Fnd_Msg_Pub.ADD;
4234: END IF; --msg_pub if
4235: x_return_status := Fnd_Api.G_RET_STS_ERROR;
4228: l_object_name := ams_utility_pvt.get_lookup_meaning(
4229: 'AMS_SYS_ARC_QUALIFIER',
4230: l_act_metrics_rec.arc_act_metric_used_by);
4231: Fnd_Message.set_name('AMS', 'AMS_UPDATE_FORECAST');
4232: Fnd_Message.set_token('OBJECT', l_object_name);
4233: Fnd_Msg_Pub.ADD;
4234: END IF; --msg_pub if
4235: x_return_status := Fnd_Api.G_RET_STS_ERROR;
4236: END IF;
4257: IF (l_allow_actual_update = 'N') THEN
4258: --object is not active and profile is N hence do not allow update
4259: IF (l_freeze_status = Fnd_Api.G_FALSE) THEN
4260: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
4261: Fnd_Message.set_name('AMS', 'AMS_METR_UPDATE_ACTUAL');
4262: Fnd_Msg_Pub.ADD;
4263: END IF; --msg_pub if
4264:
4265: x_return_status := Fnd_Api.G_RET_STS_ERROR;
4288: IF (l_allow_actual_update = 'N') THEN
4289: --object is not active and profile is N hence do not allow update
4290: IF (l_freeze_status = Fnd_Api.G_FALSE) THEN
4291: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
4292: Fnd_Message.set_name('AMS', 'AMS_METR_UPDATE_ACTUAL');
4293: Fnd_Msg_Pub.ADD;
4294: END IF; --msg_pub if
4295:
4296: x_return_status := Fnd_Api.G_RET_STS_ERROR;
4327: THEN
4328:
4329: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR)
4330: THEN
4331: Fnd_Message.Set_Name('AMS', 'AMS_METR_INVALID_ACT_USAGE');
4332: Fnd_Msg_Pub.ADD;
4333: END IF;
4334:
4335: x_return_status := Fnd_Api.G_RET_STS_ERROR;
4344: THEN
4345: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
4346: l_object_name := ams_utility_pvt.get_lookup_meaning(
4347: 'AMS_SYS_ARC_QUALIFIER',l_act_metrics_rec.arc_act_metric_used_by);
4348: Fnd_Message.Set_Name ('AMS', 'AMS_METR_INVALID_OBJECT');
4349: Fnd_Message.Set_Token('OBJTYPE',l_object_name);
4350: Fnd_Message.Set_Token('OBJID',l_pk_value);
4351: Fnd_Msg_Pub.ADD;
4352: END IF;
4345: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
4346: l_object_name := ams_utility_pvt.get_lookup_meaning(
4347: 'AMS_SYS_ARC_QUALIFIER',l_act_metrics_rec.arc_act_metric_used_by);
4348: Fnd_Message.Set_Name ('AMS', 'AMS_METR_INVALID_OBJECT');
4349: Fnd_Message.Set_Token('OBJTYPE',l_object_name);
4350: Fnd_Message.Set_Token('OBJID',l_pk_value);
4351: Fnd_Msg_Pub.ADD;
4352: END IF;
4353:
4346: l_object_name := ams_utility_pvt.get_lookup_meaning(
4347: 'AMS_SYS_ARC_QUALIFIER',l_act_metrics_rec.arc_act_metric_used_by);
4348: Fnd_Message.Set_Name ('AMS', 'AMS_METR_INVALID_OBJECT');
4349: Fnd_Message.Set_Token('OBJTYPE',l_object_name);
4350: Fnd_Message.Set_Token('OBJID',l_pk_value);
4351: Fnd_Msg_Pub.ADD;
4352: END IF;
4353:
4354: x_return_status := Fnd_Api.G_RET_STS_ERROR;
4366: IF c_check_uom%NOTFOUND
4367: THEN
4368: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
4369: THEN
4370: FND_MESSAGE.Set_Name('AMS', 'AMS_METR_INVALID_UOM');
4371: FND_MSG_PUB.ADD;
4372: END IF;
4373:
4374: x_return_status := FND_API.G_RET_STS_ERROR;
4391: ,p_object_id => l_act_metrics_rec.act_metric_used_by_id
4392: ) = Fnd_Api.G_FALSE
4393: THEN
4394: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
4395: Fnd_Message.Set_Name ('AMS', 'AMS_METR_INVALID_ORIGIN');
4396: Fnd_Msg_Pub.ADD;
4397: END IF;
4398:
4399: x_return_status := Fnd_Api.G_RET_STS_ERROR;
4495: FETCH c_act_metric INTO l_act_metric_rec;
4496: IF c_act_metric%NOTFOUND THEN
4497: CLOSE c_act_metric;
4498: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
4499: Fnd_Message.set_name('AMS', 'AMS_API_RECORD_NOT_FOUND');
4500: Fnd_Msg_Pub.ADD;
4501: END IF;
4502: RAISE Fnd_Api.g_exc_error;
4503: END IF;
5774:
5775: EXCEPTION
5776: WHEN Gl_Currency_Api.NO_RATE THEN
5777: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
5778: Fnd_Message.Set_Name ('AMS', 'AMS_NO_RATE');
5779: Fnd_Message.Set_Token ('CURRENCY_FROM', p_from_currency);
5780: Fnd_Message.Set_Token ('CURRENCY_TO', p_to_currency);
5781: Fnd_Msg_Pub.ADD;
5782: END IF;
5775: EXCEPTION
5776: WHEN Gl_Currency_Api.NO_RATE THEN
5777: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
5778: Fnd_Message.Set_Name ('AMS', 'AMS_NO_RATE');
5779: Fnd_Message.Set_Token ('CURRENCY_FROM', p_from_currency);
5780: Fnd_Message.Set_Token ('CURRENCY_TO', p_to_currency);
5781: Fnd_Msg_Pub.ADD;
5782: END IF;
5783: x_return_status := Fnd_Api.G_RET_STS_ERROR;
5776: WHEN Gl_Currency_Api.NO_RATE THEN
5777: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
5778: Fnd_Message.Set_Name ('AMS', 'AMS_NO_RATE');
5779: Fnd_Message.Set_Token ('CURRENCY_FROM', p_from_currency);
5780: Fnd_Message.Set_Token ('CURRENCY_TO', p_to_currency);
5781: Fnd_Msg_Pub.ADD;
5782: END IF;
5783: x_return_status := Fnd_Api.G_RET_STS_ERROR;
5784: WHEN Gl_Currency_Api.INVALID_CURRENCY THEN
5782: END IF;
5783: x_return_status := Fnd_Api.G_RET_STS_ERROR;
5784: WHEN Gl_Currency_Api.INVALID_CURRENCY THEN
5785: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
5786: Fnd_Message.Set_Name ('AMS', 'AMS_INVALID_CURR');
5787: Fnd_Message.Set_Token ('CURRENCY_FROM', p_from_currency);
5788: Fnd_Message.Set_Token ('CURRENCY_TO', p_to_currency);
5789: Fnd_Msg_Pub.ADD;
5790: END IF;
5783: x_return_status := Fnd_Api.G_RET_STS_ERROR;
5784: WHEN Gl_Currency_Api.INVALID_CURRENCY THEN
5785: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
5786: Fnd_Message.Set_Name ('AMS', 'AMS_INVALID_CURR');
5787: Fnd_Message.Set_Token ('CURRENCY_FROM', p_from_currency);
5788: Fnd_Message.Set_Token ('CURRENCY_TO', p_to_currency);
5789: Fnd_Msg_Pub.ADD;
5790: END IF;
5791: x_return_status := Fnd_Api.G_RET_STS_ERROR;
5784: WHEN Gl_Currency_Api.INVALID_CURRENCY THEN
5785: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
5786: Fnd_Message.Set_Name ('AMS', 'AMS_INVALID_CURR');
5787: Fnd_Message.Set_Token ('CURRENCY_FROM', p_from_currency);
5788: Fnd_Message.Set_Token ('CURRENCY_TO', p_to_currency);
5789: Fnd_Msg_Pub.ADD;
5790: END IF;
5791: x_return_status := Fnd_Api.G_RET_STS_ERROR;
5792: END Convert_Currency2;
5866:
5867: EXCEPTION
5868: WHEN Gl_Currency_Api.NO_RATE THEN
5869: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
5870: Fnd_Message.Set_Name ('AMS', 'AMS_NO_RATE');
5871: Fnd_Message.Set_Token ('CURRENCY_FROM', p_from_currency);
5872: Fnd_Message.Set_Token ('CURRENCY_TO', p_to_currency);
5873: Fnd_Msg_Pub.ADD;
5874: END IF;
5867: EXCEPTION
5868: WHEN Gl_Currency_Api.NO_RATE THEN
5869: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
5870: Fnd_Message.Set_Name ('AMS', 'AMS_NO_RATE');
5871: Fnd_Message.Set_Token ('CURRENCY_FROM', p_from_currency);
5872: Fnd_Message.Set_Token ('CURRENCY_TO', p_to_currency);
5873: Fnd_Msg_Pub.ADD;
5874: END IF;
5875: x_return_status := Fnd_Api.G_RET_STS_ERROR;
5868: WHEN Gl_Currency_Api.NO_RATE THEN
5869: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
5870: Fnd_Message.Set_Name ('AMS', 'AMS_NO_RATE');
5871: Fnd_Message.Set_Token ('CURRENCY_FROM', p_from_currency);
5872: Fnd_Message.Set_Token ('CURRENCY_TO', p_to_currency);
5873: Fnd_Msg_Pub.ADD;
5874: END IF;
5875: x_return_status := Fnd_Api.G_RET_STS_ERROR;
5876: WHEN Gl_Currency_Api.INVALID_CURRENCY THEN
5874: END IF;
5875: x_return_status := Fnd_Api.G_RET_STS_ERROR;
5876: WHEN Gl_Currency_Api.INVALID_CURRENCY THEN
5877: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
5878: Fnd_Message.Set_Name ('AMS', 'AMS_INVALID_CURR');
5879: Fnd_Message.Set_Token ('CURRENCY_FROM', p_from_currency);
5880: Fnd_Message.Set_Token ('CURRENCY_TO', p_to_currency);
5881: Fnd_Msg_Pub.ADD;
5882: END IF;
5875: x_return_status := Fnd_Api.G_RET_STS_ERROR;
5876: WHEN Gl_Currency_Api.INVALID_CURRENCY THEN
5877: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
5878: Fnd_Message.Set_Name ('AMS', 'AMS_INVALID_CURR');
5879: Fnd_Message.Set_Token ('CURRENCY_FROM', p_from_currency);
5880: Fnd_Message.Set_Token ('CURRENCY_TO', p_to_currency);
5881: Fnd_Msg_Pub.ADD;
5882: END IF;
5883: x_return_status := Fnd_Api.G_RET_STS_ERROR;
5876: WHEN Gl_Currency_Api.INVALID_CURRENCY THEN
5877: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
5878: Fnd_Message.Set_Name ('AMS', 'AMS_INVALID_CURR');
5879: Fnd_Message.Set_Token ('CURRENCY_FROM', p_from_currency);
5880: Fnd_Message.Set_Token ('CURRENCY_TO', p_to_currency);
5881: Fnd_Msg_Pub.ADD;
5882: END IF;
5883: x_return_status := Fnd_Api.G_RET_STS_ERROR;
5884: END Convert_Currency_Vector;
7370:
7371: --the object type passed is not a valid one for metrics.
7372: IF (l_valid_object = Fnd_Api.G_FALSE) THEN
7373: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
7374: Fnd_Message.Set_Name('AMS', 'AMS_COPY_INVALID_OBJECTS');
7375: Fnd_Msg_Pub.ADD;
7376: END IF;
7377: l_return_status := Fnd_Api.G_RET_STS_ERROR;
7378:
7380:
7381: --check if source object was not found
7382: IF (l_source_object_exists = Fnd_Api.G_FALSE) THEN
7383: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
7384: Fnd_Message.Set_Name('AMS', 'AMS_COPY_INVALID_SOURCE');
7385: Fnd_Message.set_token('OBJECT', l_object_name);
7386: Fnd_Msg_Pub.ADD;
7387: END IF;
7388: l_return_status := Fnd_Api.G_RET_STS_ERROR;
7381: --check if source object was not found
7382: IF (l_source_object_exists = Fnd_Api.G_FALSE) THEN
7383: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
7384: Fnd_Message.Set_Name('AMS', 'AMS_COPY_INVALID_SOURCE');
7385: Fnd_Message.set_token('OBJECT', l_object_name);
7386: Fnd_Msg_Pub.ADD;
7387: END IF;
7388: l_return_status := Fnd_Api.G_RET_STS_ERROR;
7389: END IF;
7418:
7419: --check if target object was not found
7420: IF (l_target_object_exists = Fnd_Api.G_FALSE) THEN
7421: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
7422: Fnd_Message.Set_Name('AMS', 'AMS_COPY_INVALID_TARGET');
7423: Fnd_Message.set_token('OBJECT', l_object_name);
7424: Fnd_Msg_Pub.ADD;
7425: END IF;
7426: l_return_status := Fnd_Api.G_RET_STS_ERROR;
7419: --check if target object was not found
7420: IF (l_target_object_exists = Fnd_Api.G_FALSE) THEN
7421: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
7422: Fnd_Message.Set_Name('AMS', 'AMS_COPY_INVALID_TARGET');
7423: Fnd_Message.set_token('OBJECT', l_object_name);
7424: Fnd_Msg_Pub.ADD;
7425: END IF;
7426: l_return_status := Fnd_Api.G_RET_STS_ERROR;
7427: