187: THEN
188: FND_MSG_PUB.initialize;
189: END IF;
190:
191: -- Standard call to check for call compatibility.
192: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
193: p_api_version,
194: l_api_name,
195: G_PKG_NAME)
246:
247: WHEN FND_API.G_EXC_ERROR THEN
248: ROLLBACK TO LOCK_source_PVT;
249: x_return_status := FND_API.G_RET_STS_ERROR;
250: -- Standard call to get message count and if count=1, get the message
251: FND_MSG_PUB.Count_And_Get (
252: p_encoded => FND_API.G_FALSE,
253: p_count => x_msg_count,
254: p_data => x_msg_data
256:
257: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
258: ROLLBACK TO LOCK_source_PVT;
259: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
260: -- Standard call to get message count and if count=1, get the message
261: FND_MSG_PUB.Count_And_Get (
262: p_encoded => FND_API.G_FALSE,
263: p_count => x_msg_count,
264: p_data => x_msg_data
270: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
271: THEN
272: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
273: END IF;
274: -- Standard call to get message count and if count=1, get the message
275: FND_MSG_PUB.Count_And_Get (
276: p_encoded => FND_API.G_FALSE,
277: p_count => x_msg_count,
278: p_data => x_msg_data
314: WHERE EXISTS (SELECT 1 FROM ams_dm_source
315: WHERE SOURCE_ID = l_id);
316:
317: BEGIN
318: -- Standard Start of API savepoint
319: SAVEPOINT CREATE_source_PVT;
320:
321: -- Standard call to check for call compatibility.
322: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
317: BEGIN
318: -- Standard Start of API savepoint
319: SAVEPOINT CREATE_source_PVT;
320:
321: -- Standard call to check for call compatibility.
322: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
323: p_api_version,
324: l_api_name,
325: G_PKG_NAME)
420: --
421: -- End of API body
422: --
423: x_source_id := l_source_id;
424: -- Standard check for p_commit
425: IF FND_API.to_Boolean( p_commit )
426: THEN
427: COMMIT WORK;
428: END IF;
433:
434: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || ' end');
435: END IF;
436:
437: -- Standard call to get message count and if count is 1, get message info.
438: FND_MSG_PUB.Count_And_Get
439: (p_count => x_msg_count,
440: p_data => x_msg_data
441: );
450:
451: WHEN FND_API.G_EXC_ERROR THEN
452: ROLLBACK TO CREATE_source_PVT;
453: x_return_status := FND_API.G_RET_STS_ERROR;
454: -- Standard call to get message count and if count=1, get the message
455: FND_MSG_PUB.Count_And_Get (
456: p_encoded => FND_API.G_FALSE,
457: p_count => x_msg_count,
458: p_data => x_msg_data
460:
461: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
462: ROLLBACK TO CREATE_source_PVT;
463: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
464: -- Standard call to get message count and if count=1, get the message
465: FND_MSG_PUB.Count_And_Get (
466: p_encoded => FND_API.G_FALSE,
467: p_count => x_msg_count,
468: p_data => x_msg_data
474: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
475: THEN
476: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
477: END IF;
478: -- Standard call to get message count and if count=1, get the message
479: FND_MSG_PUB.Count_And_Get (
480: p_encoded => FND_API.G_FALSE,
481: p_count => x_msg_count,
482: p_data => x_msg_data
513: l_tar_source_rec AMS_DMSource_PVT.Source_Rec_Type := P_source_rec;
514: l_rowid ROWID;
515:
516: BEGIN
517: -- Standard Start of API savepoint
518: SAVEPOINT UPDATE_source_PVT;
519:
520: -- Standard call to check for call compatibility.
521: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
516: BEGIN
517: -- Standard Start of API savepoint
518: SAVEPOINT UPDATE_source_PVT;
519:
520: -- Standard call to check for call compatibility.
521: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
522: p_api_version,
523: l_api_name,
524: G_PKG_NAME)
625: --
626: -- End of API body.
627: --
628:
629: -- Standard check for p_commit
630: IF FND_API.to_Boolean( p_commit )
631: THEN
632: COMMIT WORK;
633: END IF;
638:
639: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || ' end');
640: END IF;
641:
642: -- Standard call to get message count and if count is 1, get message info.
643: FND_MSG_PUB.Count_And_Get
644: (p_count => x_msg_count,
645: p_data => x_msg_data
646: );
655:
656: WHEN FND_API.G_EXC_ERROR THEN
657: ROLLBACK TO UPDATE_source_PVT;
658: x_return_status := FND_API.G_RET_STS_ERROR;
659: -- Standard call to get message count and if count=1, get the message
660: FND_MSG_PUB.Count_And_Get (
661: p_encoded => FND_API.G_FALSE,
662: p_count => x_msg_count,
663: p_data => x_msg_data
665:
666: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
667: ROLLBACK TO UPDATE_source_PVT;
668: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
669: -- Standard call to get message count and if count=1, get the message
670: FND_MSG_PUB.Count_And_Get (
671: p_encoded => FND_API.G_FALSE,
672: p_count => x_msg_count,
673: p_data => x_msg_data
679: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
680: THEN
681: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
682: END IF;
683: -- Standard call to get message count and if count=1, get the message
684: FND_MSG_PUB.Count_And_Get (
685: p_encoded => FND_API.G_FALSE,
686: p_count => x_msg_count,
687: p_data => x_msg_data
710: l_api_version_number CONSTANT NUMBER := 1.0;
711: l_object_version_number NUMBER;
712:
713: BEGIN
714: -- Standard Start of API savepoint
715: SAVEPOINT DELETE_source_PVT;
716:
717: -- Standard call to check for call compatibility.
718: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
713: BEGIN
714: -- Standard Start of API savepoint
715: SAVEPOINT DELETE_source_PVT;
716:
717: -- Standard call to check for call compatibility.
718: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
719: p_api_version,
720: l_api_name,
721: G_PKG_NAME)
781: --
782: -- End of API body
783: --
784:
785: -- Standard check for p_commit
786: IF FND_API.to_Boolean( p_commit )
787: THEN
788: COMMIT WORK;
789: END IF;
794:
795: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || ' end');
796: END IF;
797:
798: -- Standard call to get message count and if count is 1, get message info.
799: FND_MSG_PUB.Count_And_Get
800: (p_count => x_msg_count,
801: p_data => x_msg_data
802: );
820:
821: WHEN FND_API.G_EXC_ERROR THEN
822: ROLLBACK TO DELETE_source_PVT;
823: x_return_status := FND_API.G_RET_STS_ERROR;
824: -- Standard call to get message count and if count=1, get the message
825: FND_MSG_PUB.Count_And_Get (
826: p_encoded => FND_API.G_FALSE,
827: p_count => x_msg_count,
828: p_data => x_msg_data
830:
831: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
832: ROLLBACK TO DELETE_source_PVT;
833: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
834: -- Standard call to get message count and if count=1, get the message
835: FND_MSG_PUB.Count_And_Get (
836: p_encoded => FND_API.G_FALSE,
837: p_count => x_msg_count,
838: p_data => x_msg_data
844: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
845: THEN
846: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
847: END IF;
848: -- Standard call to get message count and if count=1, get the message
849: FND_MSG_PUB.Count_And_Get (
850: p_encoded => FND_API.G_FALSE,
851: p_count => x_msg_count,
852: p_data => x_msg_data
1087: l_object_version_number NUMBER;
1088: l_source_rec AMS_DMSource_PVT.Source_Rec_Type;
1089:
1090: BEGIN
1091: -- Standard call to check for call compatibility.
1092: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1093: p_api_version,
1094: l_api_name,
1095: G_PKG_NAME)
1154:
1155: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || ' end');
1156: END IF;
1157:
1158: -- Standard call to get message count and if count is 1, get message info.
1159: FND_MSG_PUB.Count_And_Get
1160: (p_count => x_msg_count,
1161: p_data => x_msg_data
1162: );
1170: END IF;
1171:
1172: WHEN FND_API.G_EXC_ERROR THEN
1173: x_return_status := FND_API.G_RET_STS_ERROR;
1174: -- Standard call to get message count and if count=1, get the message
1175: FND_MSG_PUB.Count_And_Get (
1176: p_encoded => FND_API.G_FALSE,
1177: p_count => x_msg_count,
1178: p_data => x_msg_data
1179: );
1180:
1181: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1182: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1183: -- Standard call to get message count and if count=1, get the message
1184: FND_MSG_PUB.Count_And_Get (
1185: p_encoded => FND_API.G_FALSE,
1186: p_count => x_msg_count,
1187: p_data => x_msg_data
1192: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1193: THEN
1194: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1195: END IF;
1196: -- Standard call to get message count and if count=1, get the message
1197: FND_MSG_PUB.Count_And_Get (
1198: p_encoded => FND_API.G_FALSE,
1199: p_count => x_msg_count,
1200: p_data => x_msg_data
1230: IF (AMS_DEBUG_HIGH_ON) THEN
1231:
1232: AMS_UTILITY_PVT.debug_message('Private API: Validate_dm_model_rec');
1233: END IF;
1234: -- Standard call to get message count and if count is 1, get message info.
1235: FND_MSG_PUB.Count_And_Get
1236: (p_count => x_msg_count,
1237: p_data => x_msg_data
1238: );
1251: IS
1252: L_API_VERSION_NUMBER CONSTANT NUMBER := 1.0;
1253: L_API_NAME CONSTANT VARCHAR2(30) := 'bin_probability';
1254: BEGIN
1255: -- Standard Start of API savepoint
1256: SAVEPOINT bin_probability;
1257:
1258: -- Standard call to check for call compatibility.
1259: IF NOT FND_API.Compatible_API_Call (l_api_version_number,
1254: BEGIN
1255: -- Standard Start of API savepoint
1256: SAVEPOINT bin_probability;
1257:
1258: -- Standard call to check for call compatibility.
1259: IF NOT FND_API.Compatible_API_Call (l_api_version_number,
1260: p_api_version,
1261: l_api_name,
1262: G_PKG_NAME)
1283: WHERE arc_used_for_object = 'SCOR'
1284: AND used_for_object_id = p_score_id
1285: AND continuous_score IS NOT NULL;
1286:
1287: -- Standard check for p_commit
1288: IF FND_API.to_Boolean (p_commit) THEN
1289: COMMIT WORK;
1290: END IF;
1291: EXCEPTION
1294: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1295: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1296: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1297: END IF;
1298: -- Standard call to get message count and if count=1, get the message
1299: FND_MSG_PUB.Count_And_Get (
1300: p_encoded => FND_API.G_FALSE,
1301: p_count => x_msg_count,
1302: p_data => x_msg_data
1358: IF (AMS_DEBUG_HIGH_ON) THEN
1359: AMS_Utility_PVT.debug_message (L_API_NAME || ' - l_source_object: ' || l_source_object);
1360: END IF;
1361:
1362: -- Standard Start of API savepoint
1363: SAVEPOINT process_scores;
1364:
1365: -- Standard call to check for call compatibility.
1366: IF NOT FND_API.Compatible_API_Call (l_api_version_number,
1361:
1362: -- Standard Start of API savepoint
1363: SAVEPOINT process_scores;
1364:
1365: -- Standard call to check for call compatibility.
1366: IF NOT FND_API.Compatible_API_Call (l_api_version_number,
1367: p_api_version,
1368: l_api_name,
1369: G_PKG_NAME)
1439:
1440: -- DELETE FROM ams_dm_apply_stg;
1441: DELETE FROM ams_dm_apply_stg_gt;
1442:
1443: -- Standard check for p_commit
1444: IF FND_API.to_Boolean (p_commit) THEN
1445: COMMIT WORK;
1446: END IF;
1447: EXCEPTION
1450: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1451: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1452: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1453: END IF;
1454: -- Standard call to get message count and if count=1, get the message
1455: FND_MSG_PUB.Count_And_Get (
1456: p_encoded => FND_API.G_FALSE,
1457: p_count => x_msg_count,
1458: p_data => x_msg_data
1602: l_check_sql VARCHAR2(32000);
1603: l_dummy NUMBER;
1604:
1605: BEGIN
1606: -- Standard call to check for call compatibility.
1607: IF NOT FND_API.Compatible_API_Call (l_api_version_number,
1608: p_api_version,
1609: l_api_name,
1610: G_PKG_NAME)
1764: );
1765: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1766: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1767: END IF;
1768: -- Standard call to get message count and if count=1, get the message
1769: FND_MSG_PUB.Count_And_Get (
1770: p_encoded => FND_API.G_FALSE,
1771: p_count => x_msg_count,
1772: p_data => x_msg_data