[Home] [Help]
123: SELECT site_id
124: FROM ams_iba_pl_sites_b
125: WHERE site_ref_code = l_site_ref_code;
126: BEGIN
127: -- Standard Start of API savepoint
128: SAVEPOINT CREATE_Iba_Pl_Pages_PVT;
129:
130: -- Standard call to check for call compatibility.
131: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
126: BEGIN
127: -- Standard Start of API savepoint
128: SAVEPOINT CREATE_Iba_Pl_Pages_PVT;
129:
130: -- Standard call to check for call compatibility.
131: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
132: p_api_version_number,
133: l_api_name,
134: G_PKG_NAME)
238: --
239: -- End of API body
240: --
241:
242: -- Standard check for p_commit
243: IF FND_API.to_Boolean( p_commit )
244: THEN
245: COMMIT WORK;
246: END IF;
251:
252: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
253: END IF;
254:
255: -- Standard call to get message count and if count is 1, get message info.
256: FND_MSG_PUB.Count_And_Get
257: (p_count => x_msg_count,
258: p_data => x_msg_data
259: );
265:
266: WHEN FND_API.G_EXC_ERROR THEN
267: ROLLBACK TO CREATE_Iba_Pl_Pages_PVT;
268: x_return_status := FND_API.G_RET_STS_ERROR;
269: -- Standard call to get message count and if count=1, get the message
270: FND_MSG_PUB.Count_And_Get (
271: p_encoded => FND_API.G_FALSE,
272: p_count => x_msg_count,
273: p_data => x_msg_data
275:
276: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
277: ROLLBACK TO CREATE_Iba_Pl_Pages_PVT;
278: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
279: -- Standard call to get message count and if count=1, get the message
280: FND_MSG_PUB.Count_And_Get (
281: p_encoded => FND_API.G_FALSE,
282: p_count => x_msg_count,
283: p_data => x_msg_data
289: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
290: THEN
291: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
292: END IF;
293: -- Standard call to get message count and if count=1, get the message
294: FND_MSG_PUB.Count_And_Get (
295: p_encoded => FND_API.G_FALSE,
296: p_count => x_msg_count,
297: p_data => x_msg_data
330: l_page_placements NUMBER;
331: l_pagerefcode_changed VARCHAR2(1);
332:
333: BEGIN
334: -- Standard Start of API savepoint
335: SAVEPOINT UPDATE_Iba_Pl_Pages_PVT;
336:
337: -- Standard call to check for call compatibility.
338: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
333: BEGIN
334: -- Standard Start of API savepoint
335: SAVEPOINT UPDATE_Iba_Pl_Pages_PVT;
336:
337: -- Standard call to check for call compatibility.
338: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
339: p_api_version_number,
340: l_api_name,
341: G_PKG_NAME)
478: --
479: -- End of API body.
480: --
481:
482: -- Standard check for p_commit
483: IF FND_API.to_Boolean( p_commit )
484: THEN
485: COMMIT WORK;
486: END IF;
491:
492: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
493: END IF;
494:
495: -- Standard call to get message count and if count is 1, get message info.
496: FND_MSG_PUB.Count_And_Get
497: (p_count => x_msg_count,
498: p_data => x_msg_data
499: );
505:
506: WHEN FND_API.G_EXC_ERROR THEN
507: ROLLBACK TO UPDATE_Iba_Pl_Pages_PVT;
508: x_return_status := FND_API.G_RET_STS_ERROR;
509: -- Standard call to get message count and if count=1, get the message
510: FND_MSG_PUB.Count_And_Get (
511: p_encoded => FND_API.G_FALSE,
512: p_count => x_msg_count,
513: p_data => x_msg_data
515:
516: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
517: ROLLBACK TO UPDATE_Iba_Pl_Pages_PVT;
518: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
519: -- Standard call to get message count and if count=1, get the message
520: FND_MSG_PUB.Count_And_Get (
521: p_encoded => FND_API.G_FALSE,
522: p_count => x_msg_count,
523: p_data => x_msg_data
529: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
530: THEN
531: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
532: END IF;
533: -- Standard call to get message count and if count=1, get the message
534: FND_MSG_PUB.Count_And_Get (
535: p_encoded => FND_API.G_FALSE,
536: p_count => x_msg_count,
537: p_data => x_msg_data
555: L_API_VERSION_NUMBER CONSTANT NUMBER := 1.0;
556: l_object_version_number NUMBER;
557: l_page_placements NUMBER;
558: BEGIN
559: -- Standard Start of API savepoint
560: SAVEPOINT DELETE_Iba_Pl_Pages_PVT;
561:
562: -- Standard call to check for call compatibility.
563: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
558: BEGIN
559: -- Standard Start of API savepoint
560: SAVEPOINT DELETE_Iba_Pl_Pages_PVT;
561:
562: -- Standard call to check for call compatibility.
563: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
564: p_api_version_number,
565: l_api_name,
566: G_PKG_NAME)
617: --
618: END IF;
619:
620:
621: -- Standard check for p_commit
622: IF FND_API.to_Boolean( p_commit )
623: THEN
624: COMMIT WORK;
625: END IF;
630:
631: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
632: END IF;
633:
634: -- Standard call to get message count and if count is 1, get message info.
635: FND_MSG_PUB.Count_And_Get
636: (p_count => x_msg_count,
637: p_data => x_msg_data
638: );
644:
645: WHEN FND_API.G_EXC_ERROR THEN
646: ROLLBACK TO DELETE_Iba_Pl_Pages_PVT;
647: x_return_status := FND_API.G_RET_STS_ERROR;
648: -- Standard call to get message count and if count=1, get the message
649: FND_MSG_PUB.Count_And_Get (
650: p_encoded => FND_API.G_FALSE,
651: p_count => x_msg_count,
652: p_data => x_msg_data
654:
655: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
656: ROLLBACK TO DELETE_Iba_Pl_Pages_PVT;
657: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
658: -- Standard call to get message count and if count=1, get the message
659: FND_MSG_PUB.Count_And_Get (
660: p_encoded => FND_API.G_FALSE,
661: p_count => x_msg_count,
662: p_data => x_msg_data
668: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
669: THEN
670: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
671: END IF;
672: -- Standard call to get message count and if count=1, get the message
673: FND_MSG_PUB.Count_And_Get (
674: p_encoded => FND_API.G_FALSE,
675: p_count => x_msg_count,
676: p_data => x_msg_data
716: THEN
717: FND_MSG_PUB.initialize;
718: END IF;
719:
720: -- Standard call to check for call compatibility.
721: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
722: p_api_version_number,
723: l_api_name,
724: G_PKG_NAME)
772:
773: WHEN FND_API.G_EXC_ERROR THEN
774: ROLLBACK TO LOCK_Iba_Pl_Pages_PVT;
775: x_return_status := FND_API.G_RET_STS_ERROR;
776: -- Standard call to get message count and if count=1, get the message
777: FND_MSG_PUB.Count_And_Get (
778: p_encoded => FND_API.G_FALSE,
779: p_count => x_msg_count,
780: p_data => x_msg_data
782:
783: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
784: ROLLBACK TO LOCK_Iba_Pl_Pages_PVT;
785: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
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
796: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
797: THEN
798: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
799: END IF;
800: -- Standard call to get message count and if count=1, get the message
801: FND_MSG_PUB.Count_And_Get (
802: p_encoded => FND_API.G_FALSE,
803: p_count => x_msg_count,
804: p_data => x_msg_data
1202: l_object_version_number NUMBER;
1203: l_iba_pl_pages_rec AMS_Iba_Pl_Pages_PVT.iba_pl_pages_rec_type;
1204:
1205: BEGIN
1206: -- Standard Start of API savepoint
1207: SAVEPOINT VALIDATE_Iba_Pl_Pages_;
1208:
1209: -- Standard call to check for call compatibility.
1210: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1205: BEGIN
1206: -- Standard Start of API savepoint
1207: SAVEPOINT VALIDATE_Iba_Pl_Pages_;
1208:
1209: -- Standard call to check for call compatibility.
1210: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1211: p_api_version_number,
1212: l_api_name,
1213: G_PKG_NAME)
1272:
1273: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
1274: END IF;
1275:
1276: -- Standard call to get message count and if count is 1, get message info.
1277: FND_MSG_PUB.Count_And_Get
1278: (p_count => x_msg_count,
1279: p_data => x_msg_data
1280: );
1286:
1287: WHEN FND_API.G_EXC_ERROR THEN
1288: ROLLBACK TO VALIDATE_Iba_Pl_Pages_;
1289: x_return_status := FND_API.G_RET_STS_ERROR;
1290: -- Standard call to get message count and if count=1, get the message
1291: FND_MSG_PUB.Count_And_Get (
1292: p_encoded => FND_API.G_FALSE,
1293: p_count => x_msg_count,
1294: p_data => x_msg_data
1296:
1297: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1298: ROLLBACK TO VALIDATE_Iba_Pl_Pages_;
1299: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1300: -- Standard call to get message count and if count=1, get the message
1301: FND_MSG_PUB.Count_And_Get (
1302: p_encoded => FND_API.G_FALSE,
1303: p_count => x_msg_count,
1304: p_data => x_msg_data
1310: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1311: THEN
1312: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1313: END IF;
1314: -- Standard call to get message count and if count=1, get the message
1315: FND_MSG_PUB.Count_And_Get (
1316: p_encoded => FND_API.G_FALSE,
1317: p_count => x_msg_count,
1318: p_data => x_msg_data
1348: IF (AMS_DEBUG_HIGH_ON) THEN
1349:
1350: AMS_UTILITY_PVT.debug_message('Private API: Validate_dm_model_rec');
1351: END IF;
1352: -- Standard call to get message count and if count is 1, get message info.
1353: FND_MSG_PUB.Count_And_Get
1354: (p_count => x_msg_count,
1355: p_data => x_msg_data
1356: );