[Home] [Help]
145: (SELECT 1 FROM ams_iba_pl_sites_b
146: WHERE site_id = l_id);
147:
148: BEGIN
149: -- Standard Start of API savepoint
150: SAVEPOINT CREATE_Iba_Pl_Sites_PVT;
151:
152: -- Standard call to check for call compatibility.
153: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
148: BEGIN
149: -- Standard Start of API savepoint
150: SAVEPOINT CREATE_Iba_Pl_Sites_PVT;
151:
152: -- Standard call to check for call compatibility.
153: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
154: p_api_version_number,
155: l_api_name,
156: G_PKG_NAME)
255: --
256: -- End of API body
257: --
258:
259: -- Standard check for p_commit
260: IF FND_API.to_Boolean( p_commit )
261: THEN
262: COMMIT WORK;
263: END IF;
268:
269: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
270: END IF;
271:
272: -- Standard call to get message count and if count is 1, get message info.
273: FND_MSG_PUB.Count_And_Get
274: (p_count => x_msg_count,
275: p_data => x_msg_data
276: );
282:
283: WHEN FND_API.G_EXC_ERROR THEN
284: ROLLBACK TO CREATE_Iba_Pl_Sites_PVT;
285: x_return_status := FND_API.G_RET_STS_ERROR;
286: -- Standard call to get message count and if count=1, get the message
287: FND_MSG_PUB.Count_And_Get (
288: p_encoded => FND_API.G_FALSE,
289: p_count => x_msg_count,
290: p_data => x_msg_data
292:
293: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
294: ROLLBACK TO CREATE_Iba_Pl_Sites_PVT;
295: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
296: -- Standard call to get message count and if count=1, get the message
297: FND_MSG_PUB.Count_And_Get (
298: p_encoded => FND_API.G_FALSE,
299: p_count => x_msg_count,
300: p_data => x_msg_data
306: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
307: THEN
308: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
309: END IF;
310: -- Standard call to get message count and if count=1, get the message
311: FND_MSG_PUB.Count_And_Get (
312: p_encoded => FND_API.G_FALSE,
313: p_count => x_msg_count,
314: p_data => x_msg_data
350: l_siterefcode_changed VARCHAR2(1);
351: l_sitename_changed VARCHAR2(1);
352:
353: BEGIN
354: -- Standard Start of API savepoint
355: SAVEPOINT UPDATE_Iba_Pl_Sites_PVT;
356:
357: -- Standard call to check for call compatibility.
358: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
353: BEGIN
354: -- Standard Start of API savepoint
355: SAVEPOINT UPDATE_Iba_Pl_Sites_PVT;
356:
357: -- Standard call to check for call compatibility.
358: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
359: p_api_version_number,
360: l_api_name,
361: G_PKG_NAME)
536: --
537: -- End of API body.
538: --
539:
540: -- Standard check for p_commit
541: IF FND_API.to_Boolean( p_commit )
542: THEN
543: COMMIT WORK;
544: END IF;
549:
550: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
551: END IF;
552:
553: -- Standard call to get message count and if count is 1, get message info.
554: FND_MSG_PUB.Count_And_Get
555: (p_count => x_msg_count,
556: p_data => x_msg_data
557: );
563:
564: WHEN FND_API.G_EXC_ERROR THEN
565: ROLLBACK TO UPDATE_Iba_Pl_Sites_PVT;
566: x_return_status := FND_API.G_RET_STS_ERROR;
567: -- Standard call to get message count and if count=1, get the message
568: FND_MSG_PUB.Count_And_Get (
569: p_encoded => FND_API.G_FALSE,
570: p_count => x_msg_count,
571: p_data => x_msg_data
577:
578: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || ' in Updte method - unexpected exception area');
579: END IF;
580: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
581: -- Standard call to get message count and if count=1, get the message
582: FND_MSG_PUB.Count_And_Get (
583: p_encoded => FND_API.G_FALSE,
584: p_count => x_msg_count,
585: p_data => x_msg_data
595: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
596: THEN
597: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
598: END IF;
599: -- Standard call to get message count and if count=1, get the message
600: FND_MSG_PUB.Count_And_Get (
601: p_encoded => FND_API.G_FALSE,
602: p_count => x_msg_count,
603: p_data => x_msg_data
628: FROM AMS_IBA_PL_PAGES_B
629: where site_id = c_site_id;
630:
631: BEGIN
632: -- Standard Start of API savepoint
633: SAVEPOINT DELETE_Iba_Pl_Sites_PVT;
634:
635: -- Standard call to check for call compatibility.
636: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
631: BEGIN
632: -- Standard Start of API savepoint
633: SAVEPOINT DELETE_Iba_Pl_Sites_PVT;
634:
635: -- Standard call to check for call compatibility.
636: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
637: p_api_version_number,
638: l_api_name,
639: G_PKG_NAME)
721:
722: AMS_UTILITY_PVT.debug_message( 'Private API: before Commit : p_commit = '|| p_commit);
723:
724: END IF;
725: -- Standard check for p_commit
726: IF FND_API.to_Boolean( p_commit )
727: THEN
728: COMMIT WORK;
729: IF (AMS_DEBUG_HIGH_ON) THEN
738:
739: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
740: END IF;
741:
742: -- Standard call to get message count and if count is 1, get message info.
743: FND_MSG_PUB.Count_And_Get
744: (p_count => x_msg_count,
745: p_data => x_msg_data
746: );
752:
753: WHEN FND_API.G_EXC_ERROR THEN
754: ROLLBACK TO DELETE_Iba_Pl_Sites_PVT;
755: x_return_status := FND_API.G_RET_STS_ERROR;
756: -- Standard call to get message count and if count=1, get the message
757: FND_MSG_PUB.Count_And_Get (
758: p_encoded => FND_API.G_FALSE,
759: p_count => x_msg_count,
760: p_data => x_msg_data
762:
763: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
764: ROLLBACK TO DELETE_Iba_Pl_Sites_PVT;
765: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
766: -- Standard call to get message count and if count=1, get the message
767: FND_MSG_PUB.Count_And_Get (
768: p_encoded => FND_API.G_FALSE,
769: p_count => x_msg_count,
770: p_data => x_msg_data
776: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
777: THEN
778: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
779: END IF;
780: -- Standard call to get message count and if count=1, get the message
781: FND_MSG_PUB.Count_And_Get (
782: p_encoded => FND_API.G_FALSE,
783: p_count => x_msg_count,
784: p_data => x_msg_data
826: THEN
827: FND_MSG_PUB.initialize;
828: END IF;
829:
830: -- Standard call to check for call compatibility.
831: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
832: p_api_version_number,
833: l_api_name,
834: G_PKG_NAME)
882:
883: WHEN FND_API.G_EXC_ERROR THEN
884: ROLLBACK TO LOCK_Iba_Pl_Sites_PVT;
885: x_return_status := FND_API.G_RET_STS_ERROR;
886: -- Standard call to get message count and if count=1, get the message
887: FND_MSG_PUB.Count_And_Get (
888: p_encoded => FND_API.G_FALSE,
889: p_count => x_msg_count,
890: p_data => x_msg_data
892:
893: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
894: ROLLBACK TO LOCK_Iba_Pl_Sites_PVT;
895: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
896: -- Standard call to get message count and if count=1, get the message
897: FND_MSG_PUB.Count_And_Get (
898: p_encoded => FND_API.G_FALSE,
899: p_count => x_msg_count,
900: p_data => x_msg_data
906: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
907: THEN
908: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
909: END IF;
910: -- Standard call to get message count and if count=1, get the message
911: FND_MSG_PUB.Count_And_Get (
912: p_encoded => FND_API.G_FALSE,
913: p_count => x_msg_count,
914: p_data => x_msg_data
1325: l_object_version_number NUMBER;
1326: l_iba_pl_sites_rec AMS_Iba_Pl_Sites_PVT.iba_pl_sites_rec_type;
1327:
1328: BEGIN
1329: -- Standard Start of API savepoint
1330: SAVEPOINT validate_iba_pl_sites_;
1331:
1332: -- Standard call to check for call compatibility.
1333: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1328: BEGIN
1329: -- Standard Start of API savepoint
1330: SAVEPOINT validate_iba_pl_sites_;
1331:
1332: -- Standard call to check for call compatibility.
1333: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1334: p_api_version_number,
1335: l_api_name,
1336: G_PKG_NAME)
1396:
1397: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
1398: END IF;
1399:
1400: -- Standard call to get message count and if count is 1, get message info.
1401: FND_MSG_PUB.Count_And_Get
1402: (p_count => x_msg_count,
1403: p_data => x_msg_data
1404: );
1410:
1411: WHEN FND_API.G_EXC_ERROR THEN
1412: ROLLBACK TO validate_iba_pl_sites_;
1413: x_return_status := FND_API.G_RET_STS_ERROR;
1414: -- Standard call to get message count and if count=1, get the message
1415: FND_MSG_PUB.Count_And_Get (
1416: p_encoded => FND_API.G_FALSE,
1417: p_count => x_msg_count,
1418: p_data => x_msg_data
1420:
1421: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1422: ROLLBACK TO validate_iba_pl_sites_;
1423: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1424: -- Standard call to get message count and if count=1, get the message
1425: FND_MSG_PUB.Count_And_Get (
1426: p_encoded => FND_API.G_FALSE,
1427: p_count => x_msg_count,
1428: p_data => x_msg_data
1434: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1435: THEN
1436: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1437: END IF;
1438: -- Standard call to get message count and if count=1, get the message
1439: FND_MSG_PUB.Count_And_Get (
1440: p_encoded => FND_API.G_FALSE,
1441: p_count => x_msg_count,
1442: p_data => x_msg_data
1472: IF (AMS_DEBUG_HIGH_ON) THEN
1473:
1474: AMS_UTILITY_PVT.debug_message('Private API: Validate_dm_model_rec');
1475: END IF;
1476: -- Standard call to get message count and if count is 1, get message info.
1477: FND_MSG_PUB.Count_And_Get
1478: (p_count => x_msg_count,
1479: p_data => x_msg_data
1480: );