[Home] [Help]
287: THEN
288: FND_MSG_PUB.initialize;
289: END IF;
290:
291: -- Standard call to check for call compatibility.
292: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
293: p_api_version,
294: l_api_name,
295: G_PKG_NAME)
344:
345: WHEN FND_API.G_EXC_ERROR THEN
346: ROLLBACK TO LOCK_Score_PVT;
347: x_return_status := FND_API.G_RET_STS_ERROR;
348: -- Standard call to get message count and if count=1, get the message
349: FND_MSG_PUB.Count_And_Get (
350: p_encoded => FND_API.G_FALSE,
351: p_count => x_msg_count,
352: p_data => x_msg_data
354:
355: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
356: ROLLBACK TO LOCK_Score_PVT;
357: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
358: -- Standard call to get message count and if count=1, get the message
359: FND_MSG_PUB.Count_And_Get (
360: p_encoded => FND_API.G_FALSE,
361: p_count => x_msg_count,
362: p_data => x_msg_data
368: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
369: THEN
370: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
371: END IF;
372: -- Standard call to get message count and if count=1, get the message
373: FND_MSG_PUB.Count_And_Get (
374: p_encoded => FND_API.G_FALSE,
375: p_count => x_msg_count,
376: p_data => x_msg_data
446: WHERE model_id = l_model_id
447: ;
448:
449: BEGIN
450: -- Standard Start of API savepoint
451: SAVEPOINT CREATE_SCORE_PVT;
452:
453: -- Standard call to check for call compatibility.
454: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
449: BEGIN
450: -- Standard Start of API savepoint
451: SAVEPOINT CREATE_SCORE_PVT;
452:
453: -- Standard call to check for call compatibility.
454: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
455: p_api_version,
456: l_api_name,
457: G_PKG_NAME)
542:
543:
544: -- default row_selection_type
545: IF NVL (l_score_rec.row_selection_type, FND_API.G_MISS_CHAR) = FND_API.G_MISS_CHAR THEN
546: l_score_rec.row_selection_type := 'STANDARD';
547: END IF;
548:
549: -- Validation Section
550: IF ( p_validation_level >= FND_API.G_VALID_LEVEL_FULL) THEN
654: --
655: -- End of API body
656: --
657:
658: -- Standard check for p_commit
659: IF FND_API.to_Boolean( p_commit ) THEN
660: COMMIT WORK;
661: END IF;
662:
666:
667: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || ' end');
668: END IF;
669:
670: -- Standard call to get message count and if count is 1, get message info.
671: FND_MSG_PUB.Count_And_Get
672: (p_count => x_msg_count,
673: p_data => x_msg_data
674: );
683:
684: WHEN FND_API.G_EXC_ERROR THEN
685: ROLLBACK TO CREATE_Score_PVT;
686: x_return_status := FND_API.G_RET_STS_ERROR;
687: -- Standard call to get message count and if count=1, get the message
688: FND_MSG_PUB.Count_And_Get (
689: p_encoded => FND_API.G_FALSE,
690: p_count => x_msg_count,
691: p_data => x_msg_data
693:
694: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
695: ROLLBACK TO CREATE_Score_PVT;
696: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
697: -- Standard call to get message count and if count=1, get the message
698: FND_MSG_PUB.Count_And_Get (
699: p_encoded => FND_API.G_FALSE,
700: p_count => x_msg_count,
701: p_data => x_msg_data
707: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
708: THEN
709: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
710: END IF;
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
766: WHERE m.model_id = s.model_id
767: AND s.score_id = p_score_id
768: ;
769: BEGIN
770: -- Standard Start of API savepoint
771: SAVEPOINT UPDATE_SCORE_PVT;
772:
773: -- Standard call to check for call compatibility.
774: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
769: BEGIN
770: -- Standard Start of API savepoint
771: SAVEPOINT UPDATE_SCORE_PVT;
772:
773: -- Standard call to check for call compatibility.
774: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
775: p_api_version,
776: l_api_name,
777: G_PKG_NAME)
1290: --
1291: -- End of API body.
1292: --
1293:
1294: -- Standard check for p_commit
1295: IF FND_API.to_Boolean( p_commit ) THEN
1296: COMMIT WORK;
1297: END IF;
1298:
1302:
1303: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
1304: END IF;
1305:
1306: -- Standard call to get message count and if count is 1, get message info.
1307: FND_MSG_PUB.Count_And_Get
1308: (p_count => x_msg_count,
1309: p_data => x_msg_data
1310: );
1325:
1326: WHEN FND_API.G_EXC_ERROR THEN
1327: ROLLBACK TO UPDATE_Score_PVT;
1328: x_return_status := FND_API.G_RET_STS_ERROR;
1329: -- Standard call to get message count and if count=1, get the message
1330: FND_MSG_PUB.Count_And_Get (
1331: p_encoded => FND_API.G_FALSE,
1332: p_count => x_msg_count,
1333: p_data => x_msg_data
1335:
1336: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1337: ROLLBACK TO UPDATE_Score_PVT;
1338: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1339: -- Standard call to get message count and if count=1, get the message
1340: FND_MSG_PUB.Count_And_Get (
1341: p_encoded => FND_API.G_FALSE,
1342: p_count => x_msg_count,
1343: p_data => x_msg_data
1349: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1350: THEN
1351: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1352: END IF;
1353: -- Standard call to get message count and if count=1, get the message
1354: FND_MSG_PUB.Count_And_Get (
1355: p_encoded => FND_API.G_FALSE,
1356: p_count => x_msg_count,
1357: p_data => x_msg_data
1382: l_api_version_number CONSTANT NUMBER := 1.0;
1383: l_object_version_number NUMBER;
1384:
1385: BEGIN
1386: -- Standard Start of API savepoint
1387: SAVEPOINT DELETE_Score_PVT;
1388:
1389: -- Standard call to check for call compatibility.
1390: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1385: BEGIN
1386: -- Standard Start of API savepoint
1387: SAVEPOINT DELETE_Score_PVT;
1388:
1389: -- Standard call to check for call compatibility.
1390: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1391: p_api_version,
1392: l_api_name,
1393: G_PKG_NAME)
1465: --
1466: -- End of API body
1467: --
1468:
1469: -- Standard check for p_commit
1470: IF FND_API.to_Boolean( p_commit )
1471: THEN
1472: COMMIT WORK;
1473: END IF;
1478:
1479: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || ' end');
1480: END IF;
1481:
1482: -- Standard call to get message count and if count is 1, get message info.
1483: FND_MSG_PUB.Count_And_Get
1484: (p_count => x_msg_count,
1485: p_data => x_msg_data
1486: );
1496:
1497: WHEN FND_API.G_EXC_ERROR THEN
1498: ROLLBACK TO DELETE_Score_PVT;
1499: x_return_status := FND_API.G_RET_STS_ERROR;
1500: -- Standard call to get message count and if count=1, get the message
1501: FND_MSG_PUB.Count_And_Get (
1502: p_encoded => FND_API.G_FALSE,
1503: p_count => x_msg_count,
1504: p_data => x_msg_data
1506:
1507: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1508: ROLLBACK TO DELETE_Score_PVT;
1509: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1510: -- Standard call to get message count and if count=1, get the message
1511: FND_MSG_PUB.Count_And_Get (
1512: p_encoded => FND_API.G_FALSE,
1513: p_count => x_msg_count,
1514: p_data => x_msg_data
1520: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1521: THEN
1522: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1523: END IF;
1524: -- Standard call to get message count and if count=1, get the message
1525: FND_MSG_PUB.Count_And_Get (
1526: p_encoded => FND_API.G_FALSE,
1527: p_count => x_msg_count,
1528: p_data => x_msg_data
2120: IS
2121: l_api_name CONSTANT VARCHAR2(30) := 'Validate_Score';
2122: l_api_version_number CONSTANT NUMBER := 1.0;
2123: BEGIN
2124: -- Standard Start of API savepoint
2125: SAVEPOINT VALIDATE_Score_;
2126:
2127: -- Debug Message
2128: IF (AMS_DEBUG_HIGH_ON) THEN
2129:
2130: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || ' start');
2131: END IF;
2132:
2133: -- Standard call to check for call compatibility.
2134: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2135: p_api_version,
2136: l_api_name,
2137: G_PKG_NAME)
2183:
2184: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || ' end');
2185: END IF;
2186:
2187: -- Standard call to get message count and if count is 1, get message info.
2188: FND_MSG_PUB.Count_And_Get
2189: (p_count => x_msg_count,
2190: p_data => x_msg_data
2191: );
2200:
2201: WHEN FND_API.G_EXC_ERROR THEN
2202: ROLLBACK TO VALIDATE_Score_;
2203: x_return_status := FND_API.G_RET_STS_ERROR;
2204: -- Standard call to get message count and if count=1, get the message
2205: FND_MSG_PUB.Count_And_Get (
2206: p_encoded => FND_API.G_FALSE,
2207: p_count => x_msg_count,
2208: p_data => x_msg_data
2210:
2211: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2212: ROLLBACK TO VALIDATE_Score_;
2213: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2214: -- Standard call to get message count and if count=1, get the message
2215: FND_MSG_PUB.Count_And_Get (
2216: p_encoded => FND_API.G_FALSE,
2217: p_count => x_msg_count,
2218: p_data => x_msg_data
2224: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2225: THEN
2226: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2227: END IF;
2228: -- Standard call to get message count and if count=1, get the message
2229: FND_MSG_PUB.Count_And_Get (
2230: p_encoded => FND_API.G_FALSE,
2231: p_count => x_msg_count,
2232: p_data => x_msg_data
2373: END;
2374: END IF;
2375: -- End add rosharma 28-Nov-2002
2376:
2377: -- Standard call to get message count and if count is 1, get message info.
2378: FND_MSG_PUB.Count_And_Get
2379: (p_count => x_msg_count,
2380: p_data => x_msg_data
2381: );
2751:
2752: l_new_score_id NUMBER;
2753: l_score_rec score_rec_type;
2754:
2755: -- for non-standard out params in copy_act_access
2756: l_errnum NUMBER;
2757: l_errcode VARCHAR2(30);
2758: l_errmsg VARCHAR2(4000);
2759:
2775: l_target_id NUMBER;
2776: l_reference_rec c_score%ROWTYPE;
2777: l_new_score_rec c_score%ROWTYPE;
2778: BEGIN
2779: -- Standard Start of API savepoint
2780: SAVEPOINT ams_score_pvt_copy_score;
2781:
2782: -- Standard call to check for call compatibility.
2783: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2778: BEGIN
2779: -- Standard Start of API savepoint
2780: SAVEPOINT ams_score_pvt_copy_score;
2781:
2782: -- Standard call to check for call compatibility.
2783: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2784: p_api_version,
2785: l_api_name,
2786: G_PKG_NAME)
2958: --
2959: -- End of API body.
2960: --
2961:
2962: -- Standard check for p_commit
2963: IF FND_API.to_Boolean( p_commit ) THEN
2964: COMMIT WORK;
2965: END IF;
2966:
2970:
2971: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || ' end');
2972: END IF;
2973:
2974: -- Standard call to get message count and if count is 1, get message info.
2975: FND_MSG_PUB.Count_And_Get (
2976: p_count => x_msg_count,
2977: p_data => x_msg_data
2978: );
2979: EXCEPTION
2980: WHEN FND_API.G_EXC_ERROR THEN
2981: ROLLBACK TO ams_score_pvt_copy_score;
2982: x_return_status := FND_API.G_RET_STS_ERROR;
2983: -- Standard call to get message count and if count=1, get the message
2984: FND_MSG_PUB.Count_And_Get (
2985: p_encoded => FND_API.G_FALSE,
2986: p_count => x_msg_count,
2987: p_data => x_msg_data
2988: );
2989: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2990: ROLLBACK TO ams_score_pvt_copy_score;
2991: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2992: -- Standard call to get message count and if count=1, get the message
2993: FND_MSG_PUB.Count_And_Get (
2994: p_encoded => FND_API.G_FALSE,
2995: p_count => x_msg_count,
2996: p_data => x_msg_data
3000: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3001: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3002: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
3003: END IF;
3004: -- Standard call to get message count and if count=1, get the message
3005: FND_MSG_PUB.Count_And_Get (
3006: p_encoded => FND_API.G_FALSE,
3007: p_count => x_msg_count,
3008: p_data => x_msg_data