22:
23: G_USER_ID NUMBER := FND_GLOBAL.USER_ID;
24: G_LOGIN_ID NUMBER := FND_GLOBAL.CONC_LOGIN_ID;
25:
26: AMS_DEBUG_HIGH_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
27: AMS_DEBUG_LOW_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
28: AMS_DEBUG_MEDIUM_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
29: --
30: -- Foreward Procedure Declarations
23: G_USER_ID NUMBER := FND_GLOBAL.USER_ID;
24: G_LOGIN_ID NUMBER := FND_GLOBAL.CONC_LOGIN_ID;
25:
26: AMS_DEBUG_HIGH_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
27: AMS_DEBUG_LOW_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
28: AMS_DEBUG_MEDIUM_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
29: --
30: -- Foreward Procedure Declarations
31: --
24: G_LOGIN_ID NUMBER := FND_GLOBAL.CONC_LOGIN_ID;
25:
26: AMS_DEBUG_HIGH_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
27: AMS_DEBUG_LOW_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
28: AMS_DEBUG_MEDIUM_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
29: --
30: -- Foreward Procedure Declarations
31: --
32:
117:
118: -- Initialize message list if p_init_msg_list is set to TRUE.
119: IF FND_API.to_Boolean( p_init_msg_list )
120: THEN
121: FND_MSG_PUB.initialize;
122: END IF;
123:
124:
125:
215: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
216:
217:
218: -- Standard call to get message count and if count is 1, get message info.
219: FND_MSG_PUB.Count_And_Get
220: (p_count => x_msg_count,
221: p_data => x_msg_data
222: );
223: EXCEPTION
229: WHEN FND_API.G_EXC_ERROR THEN
230: ROLLBACK TO CREATE_Dm_Target_Sources_PVT;
231: x_return_status := FND_API.G_RET_STS_ERROR;
232: -- Standard call to get message count and if count=1, get the message
233: FND_MSG_PUB.Count_And_Get (
234: p_encoded => FND_API.G_FALSE,
235: p_count => x_msg_count,
236: p_data => x_msg_data
237: );
239: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
240: ROLLBACK TO CREATE_Dm_Target_Sources_PVT;
241: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
242: -- Standard call to get message count and if count=1, get the message
243: FND_MSG_PUB.Count_And_Get (
244: p_encoded => FND_API.G_FALSE,
245: p_count => x_msg_count,
246: p_data => x_msg_data
247: );
248:
249: WHEN OTHERS THEN
250: ROLLBACK TO CREATE_Dm_Target_Sources_PVT;
251: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
252: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
253: THEN
254: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
255: END IF;
256: -- Standard call to get message count and if count=1, get the message
250: ROLLBACK TO CREATE_Dm_Target_Sources_PVT;
251: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
252: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
253: THEN
254: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
255: END IF;
256: -- Standard call to get message count and if count=1, get the message
257: FND_MSG_PUB.Count_And_Get (
258: p_encoded => FND_API.G_FALSE,
253: THEN
254: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
255: END IF;
256: -- Standard call to get message count and if count=1, get the message
257: FND_MSG_PUB.Count_And_Get (
258: p_encoded => FND_API.G_FALSE,
259: p_count => x_msg_count,
260: p_data => x_msg_data
261: );
344:
345: -- Initialize message list if p_init_msg_list is set to TRUE.
346: IF FND_API.to_Boolean( p_init_msg_list )
347: THEN
348: FND_MSG_PUB.initialize;
349: END IF;
350:
351:
352:
414: END IF;
415:
416:
417: -- Debug Message
418: AMS_UTILITY_PVT.debug_message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Private API: Calling update table handler');
419:
420: -- Invoke table handler(Ams_Dm_Target_Sources_Pkg.Update_Row)
421: Ams_Dm_Target_Sources_Pkg.Update_Row(
422: p_target_source_id => p_target_source_rec_type_rec.target_source_id,
442: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
443:
444:
445: -- Standard call to get message count and if count is 1, get message info.
446: FND_MSG_PUB.Count_And_Get
447: (p_count => x_msg_count,
448: p_data => x_msg_data
449: );
450: EXCEPTION
456: WHEN FND_API.G_EXC_ERROR THEN
457: ROLLBACK TO UPDATE_Dm_Target_Sources_PVT;
458: x_return_status := FND_API.G_RET_STS_ERROR;
459: -- Standard call to get message count and if count=1, get the message
460: FND_MSG_PUB.Count_And_Get (
461: p_encoded => FND_API.G_FALSE,
462: p_count => x_msg_count,
463: p_data => x_msg_data
464: );
466: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
467: ROLLBACK TO UPDATE_Dm_Target_Sources_PVT;
468: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
469: -- Standard call to get message count and if count=1, get the message
470: FND_MSG_PUB.Count_And_Get (
471: p_encoded => FND_API.G_FALSE,
472: p_count => x_msg_count,
473: p_data => x_msg_data
474: );
475:
476: WHEN OTHERS THEN
477: ROLLBACK TO UPDATE_Dm_Target_Sources_PVT;
478: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
479: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
480: THEN
481: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
482: END IF;
483: -- Standard call to get message count and if count=1, get the message
477: ROLLBACK TO UPDATE_Dm_Target_Sources_PVT;
478: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
479: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
480: THEN
481: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
482: END IF;
483: -- Standard call to get message count and if count=1, get the message
484: FND_MSG_PUB.Count_And_Get (
485: p_encoded => FND_API.G_FALSE,
480: THEN
481: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
482: END IF;
483: -- Standard call to get message count and if count=1, get the message
484: FND_MSG_PUB.Count_And_Get (
485: p_encoded => FND_API.G_FALSE,
486: p_count => x_msg_count,
487: p_data => x_msg_data
488: );
564:
565: -- Initialize message list if p_init_msg_list is set to TRUE.
566: IF FND_API.to_Boolean( p_init_msg_list )
567: THEN
568: FND_MSG_PUB.initialize;
569: END IF;
570:
571:
572:
611: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
612:
613:
614: -- Standard call to get message count and if count is 1, get message info.
615: FND_MSG_PUB.Count_And_Get
616: (p_count => x_msg_count,
617: p_data => x_msg_data
618: );
619: EXCEPTION
625: WHEN FND_API.G_EXC_ERROR THEN
626: ROLLBACK TO DELETE_Dm_Target_Sources_PVT;
627: x_return_status := FND_API.G_RET_STS_ERROR;
628: -- Standard call to get message count and if count=1, get the message
629: FND_MSG_PUB.Count_And_Get (
630: p_encoded => FND_API.G_FALSE,
631: p_count => x_msg_count,
632: p_data => x_msg_data
633: );
635: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
636: ROLLBACK TO DELETE_Dm_Target_Sources_PVT;
637: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
638: -- Standard call to get message count and if count=1, get the message
639: FND_MSG_PUB.Count_And_Get (
640: p_encoded => FND_API.G_FALSE,
641: p_count => x_msg_count,
642: p_data => x_msg_data
643: );
644:
645: WHEN OTHERS THEN
646: ROLLBACK TO DELETE_Dm_Target_Sources_PVT;
647: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
648: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
649: THEN
650: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
651: END IF;
652: -- Standard call to get message count and if count=1, get the message
646: ROLLBACK TO DELETE_Dm_Target_Sources_PVT;
647: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
648: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
649: THEN
650: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
651: END IF;
652: -- Standard call to get message count and if count=1, get the message
653: FND_MSG_PUB.Count_And_Get (
654: p_encoded => FND_API.G_FALSE,
649: THEN
650: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
651: END IF;
652: -- Standard call to get message count and if count=1, get the message
653: FND_MSG_PUB.Count_And_Get (
654: p_encoded => FND_API.G_FALSE,
655: p_count => x_msg_count,
656: p_data => x_msg_data
657: );
719:
720: -- Initialize message list if p_init_msg_list is set to TRUE.
721: IF FND_API.to_Boolean( p_init_msg_list )
722: THEN
723: FND_MSG_PUB.initialize;
724: END IF;
725:
726:
727:
744: Ams_Dm_Target_Sources_Pkg.Lock_Row(l_target_source_id,p_object_version);
745:
746:
747: -------------------- finish --------------------------
748: FND_MSG_PUB.count_and_get(
749: p_encoded => FND_API.g_false,
750: p_count => x_msg_count,
751: p_data => x_msg_data);
752: AMS_Utility_PVT.debug_message(l_full_name ||': end');
759: WHEN FND_API.G_EXC_ERROR THEN
760: ROLLBACK TO LOCK_Dm_Target_Sources_PVT;
761: x_return_status := FND_API.G_RET_STS_ERROR;
762: -- Standard call to get message count and if count=1, get the message
763: FND_MSG_PUB.Count_And_Get (
764: p_encoded => FND_API.G_FALSE,
765: p_count => x_msg_count,
766: p_data => x_msg_data
767: );
769: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
770: ROLLBACK TO LOCK_Dm_Target_Sources_PVT;
771: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
772: -- Standard call to get message count and if count=1, get the message
773: FND_MSG_PUB.Count_And_Get (
774: p_encoded => FND_API.G_FALSE,
775: p_count => x_msg_count,
776: p_data => x_msg_data
777: );
778:
779: WHEN OTHERS THEN
780: ROLLBACK TO LOCK_Dm_Target_Sources_PVT;
781: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
782: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
783: THEN
784: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
785: END IF;
786: -- Standard call to get message count and if count=1, get the message
780: ROLLBACK TO LOCK_Dm_Target_Sources_PVT;
781: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
782: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
783: THEN
784: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
785: END IF;
786: -- Standard call to get message count and if count=1, get the message
787: FND_MSG_PUB.Count_And_Get (
788: p_encoded => FND_API.G_FALSE,
783: THEN
784: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
785: END IF;
786: -- Standard call to get message count and if count=1, get the message
787: FND_MSG_PUB.Count_And_Get (
788: p_encoded => FND_API.G_FALSE,
789: p_count => x_msg_count,
790: p_data => x_msg_data
791: );
1105:
1106: -- Initialize message list if p_init_msg_list is set to TRUE.
1107: IF FND_API.to_Boolean( p_init_msg_list )
1108: THEN
1109: FND_MSG_PUB.initialize;
1110: END IF;
1111:
1112:
1113: IF p_validation_level >= JTF_PLSQL_API.g_valid_level_item THEN
1166: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
1167:
1168:
1169: -- Standard call to get message count and if count is 1, get message info.
1170: FND_MSG_PUB.Count_And_Get
1171: (p_count => x_msg_count,
1172: p_data => x_msg_data
1173: );
1174: EXCEPTION
1180: WHEN FND_API.G_EXC_ERROR THEN
1181: ROLLBACK TO VALIDATE_Dm_Target_Sources_;
1182: x_return_status := FND_API.G_RET_STS_ERROR;
1183: -- Standard call to get message count and if count=1, get the message
1184: FND_MSG_PUB.Count_And_Get (
1185: p_encoded => FND_API.G_FALSE,
1186: p_count => x_msg_count,
1187: p_data => x_msg_data
1188: );
1190: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1191: ROLLBACK TO VALIDATE_Dm_Target_Sources_;
1192: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1193: -- Standard call to get message count and if count=1, get the message
1194: FND_MSG_PUB.Count_And_Get (
1195: p_encoded => FND_API.G_FALSE,
1196: p_count => x_msg_count,
1197: p_data => x_msg_data
1198: );
1199:
1200: WHEN OTHERS THEN
1201: ROLLBACK TO VALIDATE_Dm_Target_Sources_;
1202: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1203: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1204: THEN
1205: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1206: END IF;
1207: -- Standard call to get message count and if count=1, get the message
1201: ROLLBACK TO VALIDATE_Dm_Target_Sources_;
1202: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1203: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1204: THEN
1205: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1206: END IF;
1207: -- Standard call to get message count and if count=1, get the message
1208: FND_MSG_PUB.Count_And_Get (
1209: p_encoded => FND_API.G_FALSE,
1204: THEN
1205: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1206: END IF;
1207: -- Standard call to get message count and if count=1, get the message
1208: FND_MSG_PUB.Count_And_Get (
1209: p_encoded => FND_API.G_FALSE,
1210: p_count => x_msg_count,
1211: p_data => x_msg_data
1212: );
1237: BEGIN
1238: -- Initialize message list if p_init_msg_list is set to TRUE.
1239: IF FND_API.to_Boolean( p_init_msg_list )
1240: THEN
1241: FND_MSG_PUB.initialize;
1242: END IF;
1243:
1244:
1245:
1268: END IF;
1269:
1270: END IF;
1271: -- Standard call to get message count and if count is 1, get message info.
1272: FND_MSG_PUB.Count_And_Get
1273: (p_count => x_msg_count,
1274: p_data => x_msg_data
1275: );
1276: END Validate_Target_Source_Rec;