[Home] [Help]
70: WHERE page_ref_code = l_page_ref_code
71: AND site_ref_code = l_site_ref_code;
72:
73: BEGIN
74: -- Standard Start of API savepoint
75: SAVEPOINT CREATE_Iba_Plcmnt_PVT;
76:
77: -- Standard call to check for call compatibility.
78: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
73: BEGIN
74: -- Standard Start of API savepoint
75: SAVEPOINT CREATE_Iba_Plcmnt_PVT;
76:
77: -- Standard call to check for call compatibility.
78: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
79: p_api_version_number,
80: l_api_name,
81: G_PKG_NAME)
210: --
211: -- End of API body
212: --
213:
214: -- Standard check for p_commit
215: IF FND_API.to_Boolean( p_commit )
216: THEN
217: COMMIT WORK;
218: END IF;
223:
224: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
225: END IF;
226:
227: -- Standard call to get message count and if count is 1, get message info.
228: FND_MSG_PUB.Count_And_Get
229: (p_count => x_msg_count,
230: p_data => x_msg_data
231: );
237:
238: WHEN FND_API.G_EXC_ERROR THEN
239: ROLLBACK TO CREATE_Iba_Plcmnt_PVT;
240: x_return_status := FND_API.G_RET_STS_ERROR;
241: -- Standard call to get message count and if count=1, get the message
242: FND_MSG_PUB.Count_And_Get (
243: p_encoded => FND_API.G_FALSE,
244: p_count => x_msg_count,
245: p_data => x_msg_data
247:
248: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
249: ROLLBACK TO CREATE_Iba_Plcmnt_PVT;
250: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
251: -- Standard call to get message count and if count=1, get the message
252: FND_MSG_PUB.Count_And_Get (
253: p_encoded => FND_API.G_FALSE,
254: p_count => x_msg_count,
255: p_data => x_msg_data
261: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
262: THEN
263: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
264: END IF;
265: -- Standard call to get message count and if count=1, get the message
266: FND_MSG_PUB.Count_And_Get (
267: p_encoded => FND_API.G_FALSE,
268: p_count => x_msg_count,
269: p_data => x_msg_data
301: l_tar_iba_plcmnt_rec AMS_Iba_Plcmnt_PVT.iba_plcmnt_rec_type := P_iba_plcmnt_rec;
302: l_rowid ROWID;
303:
304: BEGIN
305: -- Standard Start of API savepoint
306: SAVEPOINT UPDATE_Iba_Plcmnt_PVT;
307:
308: -- Standard call to check for call compatibility.
309: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
304: BEGIN
305: -- Standard Start of API savepoint
306: SAVEPOINT UPDATE_Iba_Plcmnt_PVT;
307:
308: -- Standard call to check for call compatibility.
309: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
310: p_api_version_number,
311: l_api_name,
312: G_PKG_NAME)
428: --
429: -- End of API body.
430: --
431:
432: -- Standard check for p_commit
433: IF FND_API.to_Boolean( p_commit )
434: THEN
435: COMMIT WORK;
436: END IF;
441:
442: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
443: END IF;
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_Iba_Plcmnt_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_Iba_Plcmnt_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
506: L_API_VERSION_NUMBER CONSTANT NUMBER := 1.0;
507: l_object_version_number NUMBER;
508:
509: BEGIN
510: -- Standard Start of API savepoint
511: SAVEPOINT DELETE_Iba_Plcmnt_PVT;
512:
513: -- Standard call to check for call compatibility.
514: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
509: BEGIN
510: -- Standard Start of API savepoint
511: SAVEPOINT DELETE_Iba_Plcmnt_PVT;
512:
513: -- Standard call to check for call compatibility.
514: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
515: p_api_version_number,
516: l_api_name,
517: G_PKG_NAME)
550: --
551: -- End of API body
552: --
553:
554: -- Standard check for p_commit
555: IF FND_API.to_Boolean( p_commit )
556: THEN
557: COMMIT WORK;
558: END IF;
563:
564: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
565: END IF;
566:
567: -- Standard call to get message count and if count is 1, get message info.
568: FND_MSG_PUB.Count_And_Get
569: (p_count => x_msg_count,
570: p_data => x_msg_data
571: );
577:
578: WHEN FND_API.G_EXC_ERROR THEN
579: ROLLBACK TO DELETE_Iba_Plcmnt_PVT;
580: x_return_status := FND_API.G_RET_STS_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
587:
588: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
589: ROLLBACK TO DELETE_Iba_Plcmnt_PVT;
590: x_return_status := FND_API.G_RET_STS_UNEXP_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
601: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
602: THEN
603: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
604: END IF;
605: -- Standard call to get message count and if count=1, get the message
606: FND_MSG_PUB.Count_And_Get (
607: p_encoded => FND_API.G_FALSE,
608: p_count => x_msg_count,
609: p_data => x_msg_data
651: THEN
652: FND_MSG_PUB.initialize;
653: END IF;
654:
655: -- Standard call to check for call compatibility.
656: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
657: p_api_version_number,
658: l_api_name,
659: G_PKG_NAME)
707:
708: WHEN FND_API.G_EXC_ERROR THEN
709: ROLLBACK TO LOCK_Iba_Plcmnt_PVT;
710: x_return_status := FND_API.G_RET_STS_ERROR;
711: -- Standard call to get message count and if count=1, get the message
712: FND_MSG_PUB.Count_And_Get (
713: p_encoded => FND_API.G_FALSE,
714: p_count => x_msg_count,
715: p_data => x_msg_data
717:
718: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
719: ROLLBACK TO LOCK_Iba_Plcmnt_PVT;
720: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
721: -- Standard call to get message count and if count=1, get the message
722: FND_MSG_PUB.Count_And_Get (
723: p_encoded => FND_API.G_FALSE,
724: p_count => x_msg_count,
725: p_data => x_msg_data
731: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
732: THEN
733: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
734: END IF;
735: -- Standard call to get message count and if count=1, get the message
736: FND_MSG_PUB.Count_And_Get (
737: p_encoded => FND_API.G_FALSE,
738: p_count => x_msg_count,
739: p_data => x_msg_data
1284: l_object_version_number NUMBER;
1285: l_iba_plcmnt_rec AMS_Iba_Plcmnt_PVT.iba_plcmnt_rec_type;
1286:
1287: BEGIN
1288: -- Standard Start of API savepoint
1289: SAVEPOINT VALIDATE_Iba_Plcmnt_;
1290:
1291: -- Standard call to check for call compatibility.
1292: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1287: BEGIN
1288: -- Standard Start of API savepoint
1289: SAVEPOINT VALIDATE_Iba_Plcmnt_;
1290:
1291: -- Standard call to check for call compatibility.
1292: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1293: p_api_version_number,
1294: l_api_name,
1295: G_PKG_NAME)
1362:
1363: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
1364: END IF;
1365:
1366: -- Standard call to get message count and if count is 1, get message info.
1367: FND_MSG_PUB.Count_And_Get
1368: (p_count => x_msg_count,
1369: p_data => x_msg_data
1370: );
1376:
1377: WHEN FND_API.G_EXC_ERROR THEN
1378: ROLLBACK TO VALIDATE_Iba_Plcmnt_;
1379: x_return_status := FND_API.G_RET_STS_ERROR;
1380: -- Standard call to get message count and if count=1, get the message
1381: FND_MSG_PUB.Count_And_Get (
1382: p_encoded => FND_API.G_FALSE,
1383: p_count => x_msg_count,
1384: p_data => x_msg_data
1390:
1391: AMS_UTILITY_PVT.debug_message('In Validate - unexpected err: validation_mode= ' || p_validation_mode);
1392: END IF;
1393: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1394: -- Standard call to get message count and if count=1, get the message
1395: FND_MSG_PUB.Count_And_Get (
1396: p_encoded => FND_API.G_FALSE,
1397: p_count => x_msg_count,
1398: p_data => x_msg_data
1408: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1409: THEN
1410: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1411: END IF;
1412: -- Standard call to get message count and if count=1, get the message
1413: FND_MSG_PUB.Count_And_Get (
1414: p_encoded => FND_API.G_FALSE,
1415: p_count => x_msg_count,
1416: p_data => x_msg_data
1446: IF (AMS_DEBUG_HIGH_ON) THEN
1447:
1448: AMS_UTILITY_PVT.debug_message('Private API: Validate_dm_model_rec');
1449: END IF;
1450: -- Standard call to get message count and if count is 1, get message info.
1451: FND_MSG_PUB.Count_And_Get
1452: (p_count => x_msg_count,
1453: p_data => x_msg_data
1454: );