[Home] [Help]
61: FROM AMS_MET_TPL_ASSOCS
62: WHERE METRIC_TPL_ASSOC_ID = l_id;
63:
64: BEGIN
65: -- Standard Start of API savepoint
66: SAVEPOINT CREATE_Met_Tpl_Assoc_PVT;
67:
68: -- Standard call to check for call compatibility.
69: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
64: BEGIN
65: -- Standard Start of API savepoint
66: SAVEPOINT CREATE_Met_Tpl_Assoc_PVT;
67:
68: -- Standard call to check for call compatibility.
69: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
70: p_api_version_number,
71: l_api_name,
72: G_PKG_NAME)
184: --
185: -- End of API body
186: --
187:
188: -- Standard check for p_commit
189: IF FND_API.to_Boolean( p_commit )
190: THEN
191: COMMIT WORK;
192: END IF;
197:
198: Ams_Utility_Pvt.debug_message('Private API: ' || l_api_name || 'end');
199: END IF;
200:
201: -- Standard call to get message count and if count is 1, get message info.
202: FND_MSG_PUB.Count_And_Get
203: (p_count => x_msg_count,
204: p_data => x_msg_data
205: );
211:
212: WHEN FND_API.G_EXC_ERROR THEN
213: ROLLBACK TO CREATE_Met_Tpl_Assoc_PVT;
214: x_return_status := FND_API.G_RET_STS_ERROR;
215: -- Standard call to get message count and if count=1, get the message
216: FND_MSG_PUB.Count_And_Get (
217: p_encoded => FND_API.G_FALSE,
218: p_count => x_msg_count,
219: p_data => x_msg_data
221:
222: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
223: ROLLBACK TO CREATE_Met_Tpl_Assoc_PVT;
224: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
225: -- Standard call to get message count and if count=1, get the message
226: FND_MSG_PUB.Count_And_Get (
227: p_encoded => FND_API.G_FALSE,
228: p_count => x_msg_count,
229: p_data => x_msg_data
235: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
236: THEN
237: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
238: END IF;
239: -- Standard call to get message count and if count=1, get the message
240: FND_MSG_PUB.Count_And_Get (
241: p_encoded => FND_API.G_FALSE,
242: p_count => x_msg_count,
243: p_data => x_msg_data
287: l_tar_met_tpl_assoc_rec met_tpl_assoc_rec_type := P_met_tpl_assoc_rec;
288: l_rowid ROWID;
289:
290: BEGIN
291: -- Standard Start of API savepoint
292: SAVEPOINT UPDATE_Met_Tpl_Assoc_PVT;
293:
294: -- Standard call to check for call compatibility.
295: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
290: BEGIN
291: -- Standard Start of API savepoint
292: SAVEPOINT UPDATE_Met_Tpl_Assoc_PVT;
293:
294: -- Standard call to check for call compatibility.
295: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
296: p_api_version_number,
297: l_api_name,
298: G_PKG_NAME)
427: --
428: -- End of API body.
429: --
430:
431: -- Standard check for p_commit
432: IF FND_API.to_Boolean( p_commit )
433: THEN
434: COMMIT WORK;
435: END IF;
439:
440: Ams_Utility_Pvt.debug_message('Private API: ' || l_api_name || ': end');
441: END IF;
442:
443: -- Standard call to get message count and if count is 1, get message info.
444: FND_MSG_PUB.Count_And_Get
445: (p_count => x_msg_count,
446: p_data => x_msg_data
447: );
453:
454: WHEN FND_API.G_EXC_ERROR THEN
455: ROLLBACK TO UPDATE_Met_Tpl_Assoc_PVT;
456: x_return_status := FND_API.G_RET_STS_ERROR;
457: -- Standard call to get message count and if count=1, get the message
458: FND_MSG_PUB.Count_And_Get (
459: p_encoded => FND_API.G_FALSE,
460: p_count => x_msg_count,
461: p_data => x_msg_data
463:
464: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
465: ROLLBACK TO UPDATE_Met_Tpl_Assoc_PVT;
466: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
467: -- Standard call to get message count and if count=1, get the message
468: FND_MSG_PUB.Count_And_Get (
469: p_encoded => FND_API.G_FALSE,
470: p_count => x_msg_count,
471: p_data => x_msg_data
477: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
478: THEN
479: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
480: END IF;
481: -- Standard call to get message count and if count=1, get the message
482: FND_MSG_PUB.Count_And_Get (
483: p_encoded => FND_API.G_FALSE,
484: p_count => x_msg_count,
485: p_data => x_msg_data
504: L_API_VERSION_NUMBER CONSTANT NUMBER := 1.0;
505: l_object_version_number NUMBER;
506:
507: BEGIN
508: -- Standard Start of API savepoint
509: SAVEPOINT DELETE_Met_Tpl_Assoc_PVT;
510:
511: -- Standard call to check for call compatibility.
512: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
507: BEGIN
508: -- Standard Start of API savepoint
509: SAVEPOINT DELETE_Met_Tpl_Assoc_PVT;
510:
511: -- Standard call to check for call compatibility.
512: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
513: p_api_version_number,
514: l_api_name,
515: G_PKG_NAME)
560: --
561: -- End of API body
562: --
563:
564: -- Standard check for p_commit
565: IF FND_API.to_Boolean( p_commit )
566: THEN
567: COMMIT WORK;
568: END IF;
573:
574: Ams_Utility_Pvt.debug_message('Private API: ' || l_api_name || 'end');
575: END IF;
576:
577: -- Standard call to get message count and if count is 1, get message info.
578: FND_MSG_PUB.Count_And_Get
579: (p_count => x_msg_count,
580: p_data => x_msg_data
581: );
587:
588: WHEN FND_API.G_EXC_ERROR THEN
589: ROLLBACK TO DELETE_Met_Tpl_Assoc_PVT;
590: x_return_status := FND_API.G_RET_STS_ERROR;
591: -- Standard call to get message count and if count=1, get the message
592: FND_MSG_PUB.Count_And_Get (
593: p_encoded => FND_API.G_FALSE,
594: p_count => x_msg_count,
595: p_data => x_msg_data
597:
598: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
599: ROLLBACK TO DELETE_Met_Tpl_Assoc_PVT;
600: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
601: -- Standard call to get message count and if count=1, get the message
602: FND_MSG_PUB.Count_And_Get (
603: p_encoded => FND_API.G_FALSE,
604: p_count => x_msg_count,
605: p_data => x_msg_data
611: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
612: THEN
613: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
614: END IF;
615: -- Standard call to get message count and if count=1, get the message
616: FND_MSG_PUB.Count_And_Get (
617: p_encoded => FND_API.G_FALSE,
618: p_count => x_msg_count,
619: p_data => x_msg_data
660: THEN
661: FND_MSG_PUB.initialize;
662: END IF;
663:
664: -- Standard call to check for call compatibility.
665: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
666: p_api_version_number,
667: l_api_name,
668: G_PKG_NAME)
716:
717: WHEN FND_API.G_EXC_ERROR THEN
718: ROLLBACK TO LOCK_Met_Tpl_Assoc_PVT;
719: x_return_status := FND_API.G_RET_STS_ERROR;
720: -- Standard call to get message count and if count=1, get the message
721: FND_MSG_PUB.Count_And_Get (
722: p_encoded => FND_API.G_FALSE,
723: p_count => x_msg_count,
724: p_data => x_msg_data
726:
727: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
728: ROLLBACK TO LOCK_Met_Tpl_Assoc_PVT;
729: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
730: -- Standard call to get message count and if count=1, get the message
731: FND_MSG_PUB.Count_And_Get (
732: p_encoded => FND_API.G_FALSE,
733: p_count => x_msg_count,
734: p_data => x_msg_data
740: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
741: THEN
742: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
743: END IF;
744: -- Standard call to get message count and if count=1, get the message
745: FND_MSG_PUB.Count_And_Get (
746: p_encoded => FND_API.G_FALSE,
747: p_count => x_msg_count,
748: p_data => x_msg_data
1156: l_object_version_number NUMBER;
1157: l_met_tpl_assoc_rec Ams_Met_Tpl_Assoc_Pvt.met_tpl_assoc_rec_type;
1158:
1159: BEGIN
1160: -- Standard Start of API savepoint
1161: SAVEPOINT VALIDATE_Met_Tpl_Assoc_;
1162:
1163: -- Standard call to check for call compatibility.
1164: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1159: BEGIN
1160: -- Standard Start of API savepoint
1161: SAVEPOINT VALIDATE_Met_Tpl_Assoc_;
1162:
1163: -- Standard call to check for call compatibility.
1164: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1165: p_api_version_number,
1166: l_api_name,
1167: G_PKG_NAME)
1223:
1224: Ams_Utility_Pvt.debug_message('PRIVATE API: ' || l_api_name || 'END');
1225: END IF;
1226:
1227: -- Standard call to get message count and if count is 1, get message info.
1228: FND_MSG_PUB.Count_And_Get
1229: (p_count => x_msg_count,
1230: p_data => x_msg_data
1231: );
1237:
1238: WHEN FND_API.G_EXC_ERROR THEN
1239: ROLLBACK TO VALIDATE_Met_Tpl_Assoc_;
1240: x_return_status := FND_API.G_RET_STS_ERROR;
1241: -- Standard call to get message count and if count=1, get the message
1242: FND_MSG_PUB.Count_And_Get (
1243: p_encoded => FND_API.G_FALSE,
1244: p_count => x_msg_count,
1245: p_data => x_msg_data
1247:
1248: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1249: ROLLBACK TO VALIDATE_Met_Tpl_Assoc_;
1250: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1251: -- Standard call to get message count and if count=1, get the message
1252: FND_MSG_PUB.Count_And_Get (
1253: p_encoded => FND_API.G_FALSE,
1254: p_count => x_msg_count,
1255: p_data => x_msg_data
1261: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1262: THEN
1263: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1264: END IF;
1265: -- Standard call to get message count and if count=1, get the message
1266: FND_MSG_PUB.Count_And_Get (
1267: p_encoded => FND_API.G_FALSE,
1268: p_count => x_msg_count,
1269: p_data => x_msg_data
1299: IF (AMS_DEBUG_HIGH_ON) THEN
1300:
1301: Ams_Utility_Pvt.debug_message('PRIVATE API: Validate_met_tpl_assoc_rec');
1302: END IF;
1303: -- Standard call to get message count and if count is 1, get message info.
1304: FND_MSG_PUB.Count_And_Get
1305: (p_count => x_msg_count,
1306: p_data => x_msg_data
1307: );