[Home] [Help]
60: -- x_return_status OUT NOCOPY VARCHAR2
61: -- x_msg_count OUT NOCOPY NUMBER
62: -- x_msg_data OUT NOCOPY VARCHAR2
63: -- Version : Current version 1.0
64: -- Note: This automatic generated procedure definition, it includes standard IN/OUT parameters
65: -- and basic operation, developer must manually add parameters and business logic as necessary.
66: --
67: -- History
68: --
101: SELECT 1
102: FROM AMS_DM_TARGET_SOURCES
103: WHERE target_source_id = l_id;
104: BEGIN
105: -- Standard Start of API savepoint
106: SAVEPOINT create_dm_target_sources_pvt;
107:
108: -- Standard call to check for call compatibility.
109: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
104: BEGIN
105: -- Standard Start of API savepoint
106: SAVEPOINT create_dm_target_sources_pvt;
107:
108: -- Standard call to check for call compatibility.
109: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
110: p_api_version_number,
111: l_api_name,
112: G_PKG_NAME)
203: --
204: -- End of API body
205: --
206:
207: -- Standard check for p_commit
208: IF FND_API.to_Boolean( p_commit )
209: THEN
210: COMMIT WORK;
211: END IF;
214: -- Debug Message
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: );
228:
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
238:
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
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,
259: p_count => x_msg_count,
260: p_data => x_msg_data
284: -- x_return_status OUT NOCOPY VARCHAR2
285: -- x_msg_count OUT NOCOPY NUMBER
286: -- x_msg_data OUT NOCOPY VARCHAR2
287: -- Version : Current version 1.0
288: -- Note: This automatic generated procedure definition, it includes standard IN/OUT parameters
289: -- and basic operation, developer must manually add parameters and business logic as necessary.
290: --
291: -- History
292: -- 15-Dec-2003 choang pass in new object ver number to table handler; table
328: l_tar_target_source_rec target_source_rec_type := P_target_source_rec_type_rec;
329: l_rowid ROWID;
330:
331: BEGIN
332: -- Standard Start of API savepoint
333: SAVEPOINT update_dm_target_sources_pvt;
334:
335: -- Standard call to check for call compatibility.
336: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
331: BEGIN
332: -- Standard Start of API savepoint
333: SAVEPOINT update_dm_target_sources_pvt;
334:
335: -- Standard call to check for call compatibility.
336: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
337: p_api_version_number,
338: l_api_name,
339: G_PKG_NAME)
430: --
431: -- End of API body.
432: --
433:
434: -- Standard check for p_commit
435: IF FND_API.to_Boolean( p_commit )
436: THEN
437: COMMIT WORK;
438: END IF;
441: -- Debug Message
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: );
455:
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
465:
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
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,
486: p_count => x_msg_count,
487: p_data => x_msg_data
512: -- x_return_status OUT NOCOPY VARCHAR2
513: -- x_msg_count OUT NOCOPY NUMBER
514: -- x_msg_data OUT NOCOPY VARCHAR2
515: -- Version : Current version 1.0
516: -- Note: This automatic generated procedure definition, it includes standard IN/OUT parameters
517: -- and basic operation, developer must manually add parameters and business logic as necessary.
518: --
519: -- History
520: --
548:
549: l_dummy NUMBER ;
550:
551: BEGIN
552: -- Standard Start of API savepoint
553: SAVEPOINT delete_dm_target_sources_pvt;
554:
555: -- Standard call to check for call compatibility.
556: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
551: BEGIN
552: -- Standard Start of API savepoint
553: SAVEPOINT delete_dm_target_sources_pvt;
554:
555: -- Standard call to check for call compatibility.
556: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
557: p_api_version_number,
558: l_api_name,
559: G_PKG_NAME)
599: --
600: -- End of API body
601: --
602:
603: -- Standard check for p_commit
604: IF FND_API.to_Boolean( p_commit )
605: THEN
606: COMMIT WORK;
607: END IF;
610: -- Debug Message
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: );
624:
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
634:
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
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,
655: p_count => x_msg_count,
656: p_data => x_msg_data
682: -- x_return_status OUT NOCOPY VARCHAR2
683: -- x_msg_count OUT NOCOPY NUMBER
684: -- x_msg_data OUT NOCOPY VARCHAR2
685: -- Version : Current version 1.0
686: -- Note: This automatic generated procedure definition, it includes standard IN/OUT parameters
687: -- and basic operation, developer must manually add parameters and business logic as necessary.
688: --
689: -- History
690: --
724: END IF;
725:
726:
727:
728: -- Standard call to check for call compatibility.
729: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
730: p_api_version_number,
731: l_api_name,
732: G_PKG_NAME)
758:
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
768:
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
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,
789: p_count => x_msg_count,
790: p_data => x_msg_data
1089: l_object_version_number NUMBER;
1090: l_target_source_rec_type_rec target_source_rec_type := p_target_source_rec_type_rec;
1091:
1092: BEGIN
1093: -- Standard Start of API savepoint
1094: SAVEPOINT validate_dm_target_sources_;
1095:
1096: -- Standard call to check for call compatibility.
1097: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1092: BEGIN
1093: -- Standard Start of API savepoint
1094: SAVEPOINT validate_dm_target_sources_;
1095:
1096: -- Standard call to check for call compatibility.
1097: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1098: p_api_version_number,
1099: l_api_name,
1100: G_PKG_NAME)
1165: -- Debug Message
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: );
1179:
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
1189:
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
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,
1210: p_count => x_msg_count,
1211: p_data => x_msg_data
1267: x_return_status := FND_API.G_RET_STS_ERROR;
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: );
1279: IS
1280: L_API_NAME CONSTANT VARCHAR2(30) := 'delete_tgtsources_for_target';
1281:
1282: BEGIN
1283: -- Standard Start of API savepoint
1284: SAVEPOINT delete_tgtsources_for_target;
1285:
1286: -- Debug Message
1287: IF (AMS_DEBUG_HIGH_ON) THEN