[Home] [Help]
86: WHERE program_contracts_id = l_id;
87:
88: BEGIN
89: ---------------Initialize --------------------
90: -- Standard Start of API savepoint
91: SAVEPOINT Create_Prgm_Contracts_PVT;
92:
93: -- Initialize message list if p_init_msg_list is set to TRUE.
94: IF FND_API.to_Boolean( p_init_msg_list )
95: THEN
96: FND_MSG_PUB.initialize;
97: END IF;
98:
99: -- Standard call to check for call compatibility.
100: IF NOT FND_API.Compatible_API_Call (
101: l_api_version_number
102: ,p_api_version_number
103: ,l_api_name
242:
243: PVX_UTILITY_PVT.debug_message('Private API: ' || l_api_name || ' - end');
244: END IF;
245:
246: -- Standard check for p_commit
247: IF FND_API.to_Boolean( p_commit ) THEN
248: COMMIT WORK;
249: END IF;
250:
252: EXCEPTION
253: WHEN FND_API.G_EXC_ERROR THEN
254: ROLLBACK TO CREATE_PRGM_CONTRACTS_PVT;
255: x_return_status := Fnd_Api.G_RET_STS_ERROR;
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
262:
263: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
264: ROLLBACK TO CREATE_PRGM_CONTRACTS_PVT;
265: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
266: -- Standard call to get message count and if count=1, get the message
267: Fnd_Msg_Pub.Count_And_Get (
268: p_encoded => Fnd_Api.G_FALSE
269: ,p_count => x_msg_count
270: ,p_data => x_msg_data
276: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
277: THEN
278: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
279: END IF;
280: -- Standard call to get message count and if count=1, get the message
281: Fnd_Msg_Pub.Count_And_Get (
282: p_encoded => Fnd_Api.G_FALSE
283: ,p_count => x_msg_count
284: ,p_data => x_msg_data
318:
319: BEGIN
320: ---------Initialize ------------------
321:
322: -- Standard Start of API savepoint
323: SAVEPOINT UPDATE_Prgm_Contracts_PVT;
324:
325: -- Standard call to check for call compatibility.
326: IF NOT FND_API.Compatible_API_Call (l_api_version_number
321:
322: -- Standard Start of API savepoint
323: SAVEPOINT UPDATE_Prgm_Contracts_PVT;
324:
325: -- Standard call to check for call compatibility.
326: IF NOT FND_API.Compatible_API_Call (l_api_version_number
327: ,p_api_version_number
328: ,l_api_name
329: ,G_PKG_NAME
449: EXCEPTION
450: WHEN Fnd_Api.G_EXC_ERROR THEN
451: ROLLBACK TO UPDATE_Prgm_Contracts_PVT;
452: x_return_status := Fnd_Api.G_RET_STS_ERROR;
453: -- Standard call to get message count and if count=1, get the message
454: Fnd_Msg_Pub.Count_And_Get (
455: p_encoded => Fnd_Api.G_FALSE
456: ,p_count => x_msg_count
457: ,p_data => x_msg_data
459:
460: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
461: ROLLBACK TO UPDATE_Prgm_Contracts_PVT;
462: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
463: -- Standard call to get message count and if count=1, get the message
464: Fnd_Msg_Pub.Count_And_Get (
465: p_encoded => Fnd_Api.G_FALSE
466: ,p_count => x_msg_count
467: ,p_data => x_msg_data
473: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
474: THEN
475: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
476: END IF;
477: -- Standard call to get message count and if count=1, get the message
478: Fnd_Msg_Pub.Count_And_Get (
479: p_encoded => Fnd_Api.G_FALSE
480: ,p_count => x_msg_count
481: ,p_data => x_msg_data
505: BEGIN
506:
507: ---- Initialize----------------
508:
509: -- Standard Start of API savepoint
510: SAVEPOINT DELETE_Prgm_Contracts_PVT;
511:
512: -- Debug Message
513: IF (PV_DEBUG_HIGH_ON) THEN
514:
515: PVX_UTILITY_PVT.debug_message('Private API: ' || l_api_name || ' - start');
516: END IF;
517:
518: -- Standard call to check for call compatibility.
519: IF NOT FND_API.Compatible_API_Call (l_api_version_number
520: ,p_api_version_number
521: ,l_api_name
522: ,G_PKG_NAME
566: EXCEPTION
567: WHEN Fnd_Api.G_EXC_ERROR THEN
568: ROLLBACK TO DELETE_Prgm_Contracts_PVT;
569: x_return_status := Fnd_Api.G_RET_STS_ERROR;
570: -- Standard call to get message count and if count=1, get the message
571: Fnd_Msg_Pub.Count_And_Get (
572: p_encoded => Fnd_Api.G_FALSE
573: ,p_count => x_msg_count
574: ,p_data => x_msg_data
576:
577: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
578: ROLLBACK TO DELETE_Prgm_Contracts_PVT;
579: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
580: -- Standard call to get message count and if count=1, get the message
581: Fnd_Msg_Pub.Count_And_Get (
582: p_encoded => Fnd_Api.G_FALSE
583: ,p_count => x_msg_count
584: ,p_data => x_msg_data
590: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
591: THEN
592: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
593: END IF;
594: -- Standard call to get message count and if count=1, get the message
595: Fnd_Msg_Pub.Count_And_Get (
596: p_encoded => Fnd_Api.G_FALSE
597: ,p_count => x_msg_count
598: ,p_data => x_msg_data
639: THEN
640: Fnd_Msg_Pub.initialize;
641: END IF;
642:
643: -- Standard call to check for call compatibility.
644: IF NOT Fnd_Api.Compatible_API_Call (
645: l_api_version_number
646: ,p_api_version_number
647: ,l_api_name
701: */
702: WHEN Fnd_Api.G_EXC_ERROR THEN
703: ROLLBACK TO LOCK_Prgm_Contracts_PVT;
704: x_return_status := Fnd_Api.G_RET_STS_ERROR;
705: -- Standard call to get message count and if count=1, get the message
706: Fnd_Msg_Pub.Count_And_Get (
707: p_encoded => Fnd_Api.G_FALSE
708: ,p_count => x_msg_count
709: ,p_data => x_msg_data
711:
712: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
713: ROLLBACK TO LOCK_Prgm_Contracts_PVT;
714: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
715: -- Standard call to get message count and if count=1, get the message
716: Fnd_Msg_Pub.Count_And_Get (
717: p_encoded => Fnd_Api.G_FALSE
718: ,p_count => x_msg_count
719: ,p_data => x_msg_data
725: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
726: THEN
727: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
728: END IF;
729: -- Standard call to get message count and if count=1, get the message
730: Fnd_Msg_Pub.Count_And_Get (
731: p_encoded => Fnd_Api.G_FALSE
732: ,p_count => x_msg_count
733: ,p_data => x_msg_data
1326: l_prgm_contracts_rec PV_PRGM_CONTRACTS_PVT.prgm_contracts_rec_type;
1327:
1328: BEGIN
1329:
1330: -- Standard Start of API savepoint
1331: SAVEPOINT VALIDATE_Prgm_Contracts_;
1332:
1333: -- Initialize API return status to SUCCESS
1334: x_return_status := FND_API.G_RET_STS_SUCCESS;
1332:
1333: -- Initialize API return status to SUCCESS
1334: x_return_status := FND_API.G_RET_STS_SUCCESS;
1335:
1336: -- Standard call to check for call compatibility.
1337: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1338: p_api_version_number,
1339: l_api_name,
1340: G_PKG_NAME)
1402:
1403: PVX_UTILITY_PVT.debug_message('Private API: ' || l_full_name || ' - end');
1404: END IF;
1405:
1406: -- Standard call to get message count and if count is 1, get message info.
1407: FND_MSG_PUB.Count_And_Get
1408: ( p_encoded => FND_API.G_FALSE,
1409: p_count => x_msg_count,
1410: p_data => x_msg_data
1415: WHEN Fnd_Api.G_EXC_ERROR THEN
1416: ROLLBACK TO VALIDATE_Prgm_Contracts_;
1417: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1418:
1419: -- Standard call to get message count and if count=1, get the message
1420: Fnd_Msg_Pub.Count_And_Get (
1421: p_encoded => Fnd_Api.G_FALSE
1422: ,p_count => x_msg_count
1423: ,p_data => x_msg_data
1425:
1426: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1427: ROLLBACK TO VALIDATE_Prgm_Contracts_;
1428: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1429: -- Standard call to get message count and if count=1, get the message
1430: Fnd_Msg_Pub.Count_And_Get (
1431: p_encoded => Fnd_Api.G_FALSE
1432: ,p_count => x_msg_count
1433: ,p_data => x_msg_data
1439: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
1440: THEN
1441: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1442: END IF;
1443: -- Standard call to get message count and if count=1, get the message
1444: Fnd_Msg_Pub.Count_And_Get (
1445: p_encoded => Fnd_Api.G_FALSE
1446: ,p_count => x_msg_count
1447: ,p_data => x_msg_data
1482:
1483: Pvx_Utility_Pvt.debug_message('Private API: Validate_dm_model_rec');
1484: END IF;
1485:
1486: -- Standard call to get message count and if count is 1, get message info.
1487: Fnd_Msg_Pub.Count_And_Get(
1488: p_count => x_msg_count
1489: ,p_data => x_msg_data
1490: );