58:
59: -- Debug Message
60: IF (AMS_DEBUG_HIGH_ON) THEN
61:
62: AMS_UTILITY_PVT.debug_message('Public API: ' || l_api_name || 'start');
63: END IF;
64:
65:
66: -- Initialize API return status to SUCCESS
102:
103: -- Debug Message
104: IF (AMS_DEBUG_HIGH_ON) THEN
105:
106: AMS_UTILITY_PVT.debug_message('Public API: ' || l_api_name || 'end');
107: END IF;
108:
109: -- Standard call to get message count and if count is 1, get message info.
110: FND_MSG_PUB.Count_And_Get
112: p_data => x_msg_data
113: );
114: EXCEPTION
115:
116: WHEN AMS_Utility_PVT.resource_locked THEN
117: x_return_status := FND_API.g_ret_sts_error;
118: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
119:
120: WHEN FND_API.G_EXC_ERROR THEN
114: EXCEPTION
115:
116: WHEN AMS_Utility_PVT.resource_locked THEN
117: x_return_status := FND_API.g_ret_sts_error;
118: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
119:
120: WHEN FND_API.G_EXC_ERROR THEN
121: ROLLBACK TO CREATE_Ps_Strats_PUB;
122: x_return_status := FND_API.G_RET_STS_ERROR;
192:
193: -- Debug Message
194: IF (AMS_DEBUG_HIGH_ON) THEN
195:
196: AMS_UTILITY_PVT.debug_message('Public API: ' || l_api_name || 'start');
197: END IF;
198:
199:
200: -- Initialize API return status to SUCCESS
234:
235: -- Debug Message
236: IF (AMS_DEBUG_HIGH_ON) THEN
237:
238: AMS_UTILITY_PVT.debug_message('Public API: ' || l_api_name || 'end');
239: END IF;
240:
241: -- Standard call to get message count and if count is 1, get message info.
242: FND_MSG_PUB.Count_And_Get
244: p_data => x_msg_data
245: );
246: EXCEPTION
247:
248: WHEN AMS_Utility_PVT.resource_locked THEN
249: x_return_status := FND_API.g_ret_sts_error;
250: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
251:
252: WHEN FND_API.G_EXC_ERROR THEN
246: EXCEPTION
247:
248: WHEN AMS_Utility_PVT.resource_locked THEN
249: x_return_status := FND_API.g_ret_sts_error;
250: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
251:
252: WHEN FND_API.G_EXC_ERROR THEN
253: ROLLBACK TO UPDATE_Ps_Strats_PUB;
254: x_return_status := FND_API.G_RET_STS_ERROR;
323:
324: -- Debug Message
325: IF (AMS_DEBUG_HIGH_ON) THEN
326:
327: AMS_UTILITY_PVT.debug_message('Public API: ' || l_api_name || 'start');
328: END IF;
329:
330:
331: -- Initialize API return status to SUCCESS
365:
366: -- Debug Message
367: IF (AMS_DEBUG_HIGH_ON) THEN
368:
369: AMS_UTILITY_PVT.debug_message('Public API: ' || l_api_name || 'end');
370: END IF;
371:
372: -- Standard call to get message count and if count is 1, get message info.
373: FND_MSG_PUB.Count_And_Get
375: p_data => x_msg_data
376: );
377: EXCEPTION
378:
379: WHEN AMS_Utility_PVT.resource_locked THEN
380: x_return_status := FND_API.g_ret_sts_error;
381: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
382:
383: WHEN FND_API.G_EXC_ERROR THEN
377: EXCEPTION
378:
379: WHEN AMS_Utility_PVT.resource_locked THEN
380: x_return_status := FND_API.g_ret_sts_error;
381: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
382:
383: WHEN FND_API.G_EXC_ERROR THEN
384: ROLLBACK TO DELETE_Ps_Strats_PUB;
385: x_return_status := FND_API.G_RET_STS_ERROR;
450:
451: -- Debug Message
452: IF (AMS_DEBUG_HIGH_ON) THEN
453:
454: AMS_UTILITY_PVT.debug_message('Public API: ' || l_api_name || 'start');
455: END IF;
456:
457:
458: -- Initialize API return status to SUCCESS
485:
486: -- Debug Message
487: IF (AMS_DEBUG_HIGH_ON) THEN
488:
489: AMS_UTILITY_PVT.debug_message('Public API: ' || l_api_name || 'end');
490: END IF;
491:
492: EXCEPTION
493:
490: END IF;
491:
492: EXCEPTION
493:
494: WHEN AMS_Utility_PVT.resource_locked THEN
495: x_return_status := FND_API.g_ret_sts_error;
496: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
497:
498: WHEN FND_API.G_EXC_ERROR THEN
492: EXCEPTION
493:
494: WHEN AMS_Utility_PVT.resource_locked THEN
495: x_return_status := FND_API.g_ret_sts_error;
496: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
497:
498: WHEN FND_API.G_EXC_ERROR THEN
499: ROLLBACK TO LOCK_Ps_Strats_PUB;
500: x_return_status := FND_API.G_RET_STS_ERROR;