[Home] [Help]
45: L_API_NAME CONSTANT VARCHAR2(30) := 'Create_Model';
46: L_API_VERSION_NUMBER CONSTANT NUMBER := 1.0;
47: l_pvt_model_rec AMS_DM_Model_PVT.dm_model_rec_type;
48: BEGIN
49: -- Standard Start of API savepoint
50: SAVEPOINT Create_Model_PUB;
51:
52: -- Standard call to check for call compatibility.
53: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
48: BEGIN
49: -- Standard Start of API savepoint
50: SAVEPOINT Create_Model_PUB;
51:
52: -- Standard call to check for call compatibility.
53: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
54: p_api_version_number,
55: l_api_name,
56: G_PKG_NAME)
146: --
147: -- End of API body.
148: --
149:
150: -- Standard check for p_commit
151: IF FND_API.to_Boolean( p_commit )
152: THEN
153: COMMIT WORK;
154: END IF;
159:
160: AMS_UTILITY_PVT.debug_message('Public API: ' || l_api_name || 'end');
161: END IF;
162:
163: -- Standard call to get message count and if count is 1, get message info.
164: FND_MSG_PUB.Count_And_Get
165: (p_count => x_msg_count,
166: p_data => x_msg_data
167: );
176:
177: WHEN FND_API.G_EXC_ERROR THEN
178: ROLLBACK TO Create_Model_PUB;
179: x_return_status := FND_API.G_RET_STS_ERROR;
180: -- Standard call to get message count and if count=1, get the message
181: FND_MSG_PUB.Count_And_Get (
182: p_encoded => FND_API.G_FALSE,
183: p_count => x_msg_count,
184: p_data => x_msg_data
186:
187: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
188: ROLLBACK TO Create_Model_PUB;
189: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
190: -- Standard call to get message count and if count=1, get the message
191: FND_MSG_PUB.Count_And_Get (
192: p_encoded => FND_API.G_FALSE,
193: p_count => x_msg_count,
194: p_data => x_msg_data
200: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
201: THEN
202: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
203: END IF;
204: -- Standard call to get message count and if count=1, get the message
205: FND_MSG_PUB.Count_And_Get (
206: p_encoded => FND_API.G_FALSE,
207: p_count => x_msg_count,
208: p_data => x_msg_data
228: L_API_VERSION_NUMBER CONSTANT NUMBER := 1.0;
229: l_object_version_number NUMBER;
230: l_pvt_model_rec AMS_DM_Model_PVT.dm_model_rec_type;
231: BEGIN
232: -- Standard Start of API savepoint
233: SAVEPOINT Update_Model_PUB;
234:
235: -- Standard call to check for call compatibility.
236: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
231: BEGIN
232: -- Standard Start of API savepoint
233: SAVEPOINT Update_Model_PUB;
234:
235: -- Standard call to check for call compatibility.
236: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
237: p_api_version_number,
238: l_api_name,
239: G_PKG_NAME)
328: --
329: -- End of API body
330: --
331:
332: -- Standard check for p_commit
333: IF FND_API.to_Boolean( p_commit )
334: THEN
335: COMMIT WORK;
336: END IF;
341:
342: AMS_UTILITY_PVT.debug_message('Public API: ' || l_api_name || 'end');
343: END IF;
344:
345: -- Standard call to get message count and if count is 1, get message info.
346: FND_MSG_PUB.Count_And_Get
347: (p_count => x_msg_count,
348: p_data => x_msg_data
349: );
358:
359: WHEN FND_API.G_EXC_ERROR THEN
360: ROLLBACK TO Update_Model_PUB;
361: x_return_status := FND_API.G_RET_STS_ERROR;
362: -- Standard call to get message count and if count=1, get the message
363: FND_MSG_PUB.Count_And_Get (
364: p_encoded => FND_API.G_FALSE,
365: p_count => x_msg_count,
366: p_data => x_msg_data
368:
369: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
370: ROLLBACK TO Update_Model_PUB;
371: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
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
382: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
383: THEN
384: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
385: END IF;
386: -- Standard call to get message count and if count=1, get the message
387: FND_MSG_PUB.Count_And_Get (
388: p_encoded => FND_API.G_FALSE,
389: p_count => x_msg_count,
390: p_data => x_msg_data
409: l_MODEL_ID NUMBER := p_MODEL_ID;
410: l_object_version_number NUMBER := p_object_version_number;
411: l_pvt_model_rec AMS_DM_Model_PVT.dm_model_rec_type;
412: BEGIN
413: -- Standard Start of API savepoint
414: SAVEPOINT Delete_Model_PUB;
415:
416: -- Standard call to check for call compatibility.
417: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
412: BEGIN
413: -- Standard Start of API savepoint
414: SAVEPOINT Delete_Model_PUB;
415:
416: -- Standard call to check for call compatibility.
417: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
418: p_api_version_number,
419: l_api_name,
420: G_PKG_NAME)
462: --
463: -- End of API body
464: --
465:
466: -- Standard check for p_commit
467: IF FND_API.to_Boolean( p_commit )
468: THEN
469: COMMIT WORK;
470: END IF;
475:
476: AMS_UTILITY_PVT.debug_message('Public API: ' || l_api_name || 'end');
477: END IF;
478:
479: -- Standard call to get message count and if count is 1, get message info.
480: FND_MSG_PUB.Count_And_Get
481: (p_count => x_msg_count,
482: p_data => x_msg_data
483: );
492:
493: WHEN FND_API.G_EXC_ERROR THEN
494: ROLLBACK TO Delete_Model_PUB;
495: x_return_status := FND_API.G_RET_STS_ERROR;
496: -- Standard call to get message count and if count=1, get the message
497: FND_MSG_PUB.Count_And_Get (
498: p_encoded => FND_API.G_FALSE,
499: p_count => x_msg_count,
500: p_data => x_msg_data
502:
503: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
504: ROLLBACK TO Delete_Model_PUB;
505: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
506: -- Standard call to get message count and if count=1, get the message
507: FND_MSG_PUB.Count_And_Get (
508: p_encoded => FND_API.G_FALSE,
509: p_count => x_msg_count,
510: p_data => x_msg_data
516: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
517: THEN
518: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
519: END IF;
520: -- Standard call to get message count and if count=1, get the message
521: FND_MSG_PUB.Count_And_Get (
522: p_encoded => FND_API.G_FALSE,
523: p_count => x_msg_count,
524: p_data => x_msg_data
542: L_API_VERSION_NUMBER CONSTANT NUMBER := 1.0;
543: l_pvt_model_rec AMS_DM_Model_PVT.dm_model_rec_type;
544: BEGIN
545:
546: -- Standard call to check for call compatibility.
547: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
548: p_api_version_number,
549: l_api_name,
550: G_PKG_NAME)
610:
611: WHEN FND_API.G_EXC_ERROR THEN
612: ROLLBACK TO Lock_Model_PUB;
613: x_return_status := FND_API.G_RET_STS_ERROR;
614: -- Standard call to get message count and if count=1, get the message
615: FND_MSG_PUB.Count_And_Get (
616: p_encoded => FND_API.G_FALSE,
617: p_count => x_msg_count,
618: p_data => x_msg_data
620:
621: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
622: ROLLBACK TO Lock_Model_PUB;
623: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
624: -- Standard call to get message count and if count=1, get the message
625: FND_MSG_PUB.Count_And_Get (
626: p_encoded => FND_API.G_FALSE,
627: p_count => x_msg_count,
628: p_data => x_msg_data
634: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
635: THEN
636: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
637: END IF;
638: -- Standard call to get message count and if count=1, get the message
639: FND_MSG_PUB.Count_And_Get (
640: p_encoded => FND_API.G_FALSE,
641: p_count => x_msg_count,
642: p_data => x_msg_data
660: L_API_NAME CONSTANT VARCHAR2(30) := 'Create_Model';
661: L_API_VERSION CONSTANT NUMBER := 1.0;
662: L_MODEL_STATUS_TYPE CONSTANT VARCHAR2(30) := 'AMS_DM_MODEL_STATUS';
663: L_CUSTOM_MODEL_STATUS CONSTANT VARCHAR2(30) := 'CUSTOM';
664: L_STANDARD_ROW_SELECTION CONSTANT VARCHAR2(30) := 'STANDARD';
665: L_OBJECT_TYPE_MODEL CONSTANT VARCHAR2(30) := 'MODL';
666:
667: l_model_rec AMS_DM_Model_PVT.dm_model_rec_type;
668:
739: l_model_rec.results_flag := 'Y';
740: l_model_rec.logs_flag := 'N';
741: l_model_rec.target_type := p_target_type;
742: l_model_rec.target_positive_value := p_target_value;
743: l_model_rec.row_selection_type := L_STANDARD_ROW_SELECTION;
744: l_model_rec.country_id := FND_PROFILE.value ('AMS_SRCGEN_USER_CITY');
745:
746: -- validate input
747: AMS_DM_Model_PVT.Validate_dm_model(