[Home] [Help]
79: END IF;
80:
81: -- Debug Message
82: IF (AMS_DEBUG_HIGH_ON) THEN
83: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
84: END IF;
85:
86:
87: -- Initialize API return status to SUCCESS
94: -- =========================================================================
95:
96: IF FND_GLOBAL.User_Id IS NULL
97: THEN
98: AMS_Utility_PVT.Error_Message(p_message_name => 'USER_PROFILE_MISSING');
99: RAISE FND_API.G_EXC_ERROR;
100: END IF;
101:
102: -- Debug Message
100: END IF;
101:
102: -- Debug Message
103: IF (AMS_DEBUG_HIGH_ON) THEN
104: AMS_UTILITY_PVT.debug_message( 'Private API: Calling table handler fnd_documents_pkg.insert_row');
105: END IF;
106:
107: l_media_id := p_Fnd_Attachment_rec.media_id;
108:
250:
251:
252: -- Debug Message
253: IF (AMS_DEBUG_HIGH_ON) THEN
254: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
255: END IF;
256:
257: -- Standard call to get message count and if count is 1, get message info.
258: FND_MSG_PUB.Count_And_Get
262:
263:
264: EXCEPTION
265:
266: WHEN AMS_Utility_PVT.resource_locked THEN
267: x_return_status := FND_API.g_ret_sts_error;
268: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
269:
270: WHEN FND_API.G_EXC_ERROR THEN
264: EXCEPTION
265:
266: WHEN AMS_Utility_PVT.resource_locked THEN
267: x_return_status := FND_API.g_ret_sts_error;
268: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
269:
270: WHEN FND_API.G_EXC_ERROR THEN
271: ROLLBACK TO CREATE_Fnd_Attachment_PVT;
272: x_return_status := FND_API.G_RET_STS_ERROR;
358: END IF;
359:
360: -- Debug Message
361: IF (AMS_DEBUG_HIGH_ON) THEN
362: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
363: END IF;
364:
365:
366: -- Initialize API return status to SUCCESS
367: x_return_status := FND_API.G_RET_STS_SUCCESS;
368:
369: -- Debug Message
370: IF (AMS_DEBUG_HIGH_ON) THEN
371: AMS_UTILITY_PVT.debug_message('Private API: - Open Cursor to Select');
372: END IF;
373:
374: OPEN c_get_Fnd_Documents( l_tar_fnd_attachment_rec.document_id);
375:
375:
376: FETCH c_get_Fnd_Documents INTO l_ref_fnd_attachment_rec ;
377:
378: If ( c_get_Fnd_Documents%NOTFOUND) THEN
379: AMS_Utility_PVT.Error_Message(p_message_name => 'API_MISSING_UPDATE_TARGET',
380: p_token_name => 'INFO',
381: p_token_value => 'Fnd_Attachment') ;
382: RAISE FND_API.G_EXC_ERROR;
383: END IF;
383: END IF;
384:
385:
386: IF (p_Fnd_Attachment_rec.concur_last_update_date <> l_ref_fnd_attachment_rec.last_update_date) THEN
387: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RECORD_NOT_FOUND') ;
388: RAISE FND_API.G_EXC_ERROR;
389: END IF;
390:
391: -- Debug Message
389: END IF;
390:
391: -- Debug Message
392: IF (AMS_DEBUG_HIGH_ON) THEN
393: AMS_UTILITY_PVT.debug_message('Private API: - Close Cursor');
394: END IF;
395: CLOSE c_get_Fnd_documents;
396:
397: -- Debug Message
394: END IF;
395: CLOSE c_get_Fnd_documents;
396:
397: -- Debug Message
398: --IF (AMS_DEBUG_HIGH_ON) THEN AMS_UTILITY_PVT.debug_message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Private API: Calling update table handler');END IF;
399:
400: if (p_Fnd_Attachment_rec.datatype_id = 1) then
401: if (p_Fnd_Attachment_rec.media_id is null) then
402: SELECT fnd_documents_short_text_s.nextval
455: where media_id = p_Fnd_Attachment_rec.media_id;
456:
457: if SQL%NOTFOUND then
458:
459: AMS_Utility_PVT.Error_Message(
460: p_message_name => 'API_MISSING_UPDATE_TARGET',
461: p_token_name => 'INFO',
462: p_token_value => 'Fnd_Documents_Short_Text') ;
463: RAISE FND_API.G_EXC_ERROR;
481:
482:
483: -- Debug Message
484: IF (AMS_DEBUG_HIGH_ON) THEN
485: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
486: END IF;
487:
488: -- Standard call to get message count and if count is 1, get message info.
489: FND_MSG_PUB.Count_And_Get
491: p_data => x_msg_data
492: );
493: EXCEPTION
494:
495: WHEN AMS_Utility_PVT.resource_locked THEN
496: x_return_status := FND_API.g_ret_sts_error;
497: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
498:
499: WHEN FND_API.G_EXC_ERROR THEN
493: EXCEPTION
494:
495: WHEN AMS_Utility_PVT.resource_locked THEN
496: x_return_status := FND_API.g_ret_sts_error;
497: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
498:
499: WHEN FND_API.G_EXC_ERROR THEN
500: ROLLBACK TO UPDATE_Fnd_Attachment_PVT;
501: x_return_status := FND_API.G_RET_STS_ERROR;
596: END IF;
597:
598: -- Debug Message
599: IF (AMS_DEBUG_HIGH_ON) THEN
600: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
601: END IF;
602:
603:
604: -- Initialize API return status to SUCCESS
608: -- Api body
609: --
610: -- Debug Message
611: IF (AMS_DEBUG_HIGH_ON) THEN
612: AMS_UTILITY_PVT.debug_message( 'Private API: Calling delete table handler');
613: END IF;
614:
615: IF ((p_datatype_id = 6) OR (p_datatype_id = 1)) THEN
616:
678:
679:
680: -- Debug Message
681: IF (AMS_DEBUG_HIGH_ON) THEN
682: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
683: END IF;
684:
685: -- Standard call to get message count and if count is 1, get message info.
686: FND_MSG_PUB.Count_And_Get
688: p_data => x_msg_data
689: );
690: EXCEPTION
691:
692: WHEN AMS_Utility_PVT.resource_locked THEN
693: x_return_status := FND_API.g_ret_sts_error;
694: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
695:
696: WHEN FND_API.G_EXC_ERROR THEN
690: EXCEPTION
691:
692: WHEN AMS_Utility_PVT.resource_locked THEN
693: x_return_status := FND_API.g_ret_sts_error;
694: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
695:
696: WHEN FND_API.G_EXC_ERROR THEN
697: ROLLBACK TO DELETE_Fnd_Attachment_PVT;
698: x_return_status := FND_API.G_RET_STS_ERROR;