[Home] [Help]
62: WHERE EXISTS (SELECT 1 FROM AMS_DM_PERFORMANCE
63: WHERE PERFORMANCE_ID = l_id);
64:
65: BEGIN
66: -- Standard Start of API savepoint
67: SAVEPOINT Create_Performance_PVT;
68:
69: -- Standard call to check for call compatibility.
70: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
65: BEGIN
66: -- Standard Start of API savepoint
67: SAVEPOINT Create_Performance_PVT;
68:
69: -- Standard call to check for call compatibility.
70: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
71: p_api_version_number,
72: l_api_name,
73: G_PKG_NAME)
164: --
165: -- End of API body
166: --
167:
168: -- Standard check for p_commit
169: IF FND_API.to_Boolean( p_commit )
170: THEN
171: COMMIT WORK;
172: END IF;
177:
178: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
179: END IF;
180:
181: -- Standard call to get message count and if count is 1, get message info.
182: FND_MSG_PUB.Count_And_Get
183: (p_count => x_msg_count,
184: p_data => x_msg_data
185: );
194:
195: WHEN FND_API.G_EXC_ERROR THEN
196: ROLLBACK TO Create_Performance_PVT;
197: x_return_status := FND_API.G_RET_STS_ERROR;
198: -- Standard call to get message count and if count=1, get the message
199: FND_MSG_PUB.Count_And_Get (
200: p_encoded => FND_API.G_FALSE,
201: p_count => x_msg_count,
202: p_data => x_msg_data
204:
205: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
206: ROLLBACK TO Create_Performance_PVT;
207: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
208: -- Standard call to get message count and if count=1, get the message
209: FND_MSG_PUB.Count_And_Get (
210: p_encoded => FND_API.G_FALSE,
211: p_count => x_msg_count,
212: p_data => x_msg_data
218: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
219: THEN
220: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
221: END IF;
222: -- Standard call to get message count and if count=1, get the message
223: FND_MSG_PUB.Count_And_Get (
224: p_encoded => FND_API.G_FALSE,
225: p_count => x_msg_count,
226: p_data => x_msg_data
255: FROM AMS_DM_PERFORMANCE
256: WHERE performance_id = p_performance_id;
257: l_ref_performance_rec c_get_Dmperformance%ROWTYPE ;
258: BEGIN
259: -- Standard Start of API savepoint
260: SAVEPOINT Update_Performance_PVT;
261:
262: -- Standard call to check for call compatibility.
263: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
258: BEGIN
259: -- Standard Start of API savepoint
260: SAVEPOINT Update_Performance_PVT;
261:
262: -- Standard call to check for call compatibility.
263: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
264: p_api_version_number,
265: l_api_name,
266: G_PKG_NAME)
370: --
371: -- End of API body.
372: --
373:
374: -- Standard check for p_commit
375: IF FND_API.to_Boolean( p_commit )
376: THEN
377: COMMIT WORK;
378: END IF;
383:
384: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
385: END IF;
386:
387: -- Standard call to get message count and if count is 1, get message info.
388: FND_MSG_PUB.Count_And_Get
389: (p_count => x_msg_count,
390: p_data => x_msg_data
391: );
400:
401: WHEN FND_API.G_EXC_ERROR THEN
402: ROLLBACK TO Update_Performance_PVT;
403: x_return_status := FND_API.G_RET_STS_ERROR;
404: -- Standard call to get message count and if count=1, get the message
405: FND_MSG_PUB.Count_And_Get (
406: p_encoded => FND_API.G_FALSE,
407: p_count => x_msg_count,
408: p_data => x_msg_data
410:
411: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
412: ROLLBACK TO Update_Performance_PVT;
413: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
414: -- Standard call to get message count and if count=1, get the message
415: FND_MSG_PUB.Count_And_Get (
416: p_encoded => FND_API.G_FALSE,
417: p_count => x_msg_count,
418: p_data => x_msg_data
424: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
425: THEN
426: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
427: END IF;
428: -- Standard call to get message count and if count=1, get the message
429: FND_MSG_PUB.Count_And_Get (
430: p_encoded => FND_API.G_FALSE,
431: p_count => x_msg_count,
432: p_data => x_msg_data
451: L_API_VERSION_NUMBER CONSTANT NUMBER := 1.0;
452: l_object_version_number NUMBER;
453:
454: BEGIN
455: -- Standard Start of API savepoint
456: SAVEPOINT Delete_Performance_PVT;
457:
458: -- Standard call to check for call compatibility.
459: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
454: BEGIN
455: -- Standard Start of API savepoint
456: SAVEPOINT Delete_Performance_PVT;
457:
458: -- Standard call to check for call compatibility.
459: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
460: p_api_version_number,
461: l_api_name,
462: G_PKG_NAME)
495: --
496: -- End of API body
497: --
498:
499: -- Standard check for p_commit
500: IF FND_API.to_Boolean( p_commit )
501: THEN
502: COMMIT WORK;
503: END IF;
508:
509: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
510: END IF;
511:
512: -- Standard call to get message count and if count is 1, get message info.
513: FND_MSG_PUB.Count_And_Get
514: (p_count => x_msg_count,
515: p_data => x_msg_data
516: );
525:
526: WHEN FND_API.G_EXC_ERROR THEN
527: ROLLBACK TO Delete_Performance_PVT;
528: x_return_status := FND_API.G_RET_STS_ERROR;
529: -- Standard call to get message count and if count=1, get the message
530: FND_MSG_PUB.Count_And_Get (
531: p_encoded => FND_API.G_FALSE,
532: p_count => x_msg_count,
533: p_data => x_msg_data
535:
536: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
537: ROLLBACK TO Delete_Performance_PVT;
538: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
539: -- Standard call to get message count and if count=1, get the message
540: FND_MSG_PUB.Count_And_Get (
541: p_encoded => FND_API.G_FALSE,
542: p_count => x_msg_count,
543: p_data => x_msg_data
549: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
550: THEN
551: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
552: END IF;
553: -- Standard call to get message count and if count=1, get the message
554: FND_MSG_PUB.Count_And_Get (
555: p_encoded => FND_API.G_FALSE,
556: p_count => x_msg_count,
557: p_data => x_msg_data
599: THEN
600: FND_MSG_PUB.initialize;
601: END IF;
602:
603: -- Standard call to check for call compatibility.
604: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
605: p_api_version_number,
606: l_api_name,
607: G_PKG_NAME)
658:
659: WHEN FND_API.G_EXC_ERROR THEN
660: ROLLBACK TO Lock_Performance_PVT;
661: x_return_status := FND_API.G_RET_STS_ERROR;
662: -- Standard call to get message count and if count=1, get the message
663: FND_MSG_PUB.Count_And_Get (
664: p_encoded => FND_API.G_FALSE,
665: p_count => x_msg_count,
666: p_data => x_msg_data
668:
669: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
670: ROLLBACK TO Lock_Performance_PVT;
671: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
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
682: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
683: THEN
684: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
685: END IF;
686: -- Standard call to get message count and if count=1, get the message
687: FND_MSG_PUB.Count_And_Get (
688: p_encoded => FND_API.G_FALSE,
689: p_count => x_msg_count,
690: p_data => x_msg_data
910: L_API_VERSION_NUMBER CONSTANT NUMBER := 1.0;
911: l_object_version_number NUMBER;
912: l_performance_rec AMS_DMPerformance_PVT.performance_rec_type;
913: BEGIN
914: -- Standard Start of API savepoint
915: SAVEPOINT Validate_Performance_;
916:
917: -- Standard call to check for call compatibility.
918: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
913: BEGIN
914: -- Standard Start of API savepoint
915: SAVEPOINT Validate_Performance_;
916:
917: -- Standard call to check for call compatibility.
918: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
919: p_api_version_number,
920: l_api_name,
921: G_PKG_NAME)
980:
981: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
982: END IF;
983:
984: -- Standard call to get message count and if count is 1, get message info.
985: FND_MSG_PUB.Count_And_Get
986: (p_count => x_msg_count,
987: p_data => x_msg_data
988: );
997:
998: WHEN FND_API.G_EXC_ERROR THEN
999: ROLLBACK TO Validate_Performance_;
1000: x_return_status := FND_API.G_RET_STS_ERROR;
1001: -- Standard call to get message count and if count=1, get the message
1002: FND_MSG_PUB.Count_And_Get (
1003: p_encoded => FND_API.G_FALSE,
1004: p_count => x_msg_count,
1005: p_data => x_msg_data
1007:
1008: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1009: ROLLBACK TO Validate_Performance_;
1010: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1011: -- Standard call to get message count and if count=1, get the message
1012: FND_MSG_PUB.Count_And_Get (
1013: p_encoded => FND_API.G_FALSE,
1014: p_count => x_msg_count,
1015: p_data => x_msg_data
1021: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1022: THEN
1023: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1024: END IF;
1025: -- Standard call to get message count and if count=1, get the message
1026: FND_MSG_PUB.Count_And_Get (
1027: p_encoded => FND_API.G_FALSE,
1028: p_count => x_msg_count,
1029: p_data => x_msg_data
1059: IF (AMS_DEBUG_HIGH_ON) THEN
1060:
1061: AMS_UTILITY_PVT.debug_message('Private API: Validate_dm_model_rec');
1062: END IF;
1063: -- Standard call to get message count and if count is 1, get message info.
1064: FND_MSG_PUB.Count_And_Get
1065: (p_count => x_msg_count,
1066: p_data => x_msg_data
1067: );