86:
87: -- Initialize message list if p_init_msg_list is set to TRUE.
88: IF FND_API.to_Boolean( p_init_msg_list )
89: THEN
90: FND_MSG_PUB.initialize;
91: END IF;
92:
93: -- Debug Message
94: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
234: -- Debug Message
235: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
236:
237: -- Standard call to get message count and if count is 1, get message info.
238: FND_MSG_PUB.Count_And_Get
239: (p_count => x_msg_count,
240: p_data => x_msg_data
241: );
242: EXCEPTION
248: WHEN FND_API.G_EXC_ERROR THEN
249: ROLLBACK TO CREATE_List_Src_Field_PVT;
250: x_return_status := FND_API.G_RET_STS_ERROR;
251: -- Standard call to get message count and if count=1, get the message
252: FND_MSG_PUB.Count_And_Get (
253: p_encoded => FND_API.G_FALSE,
254: p_count => x_msg_count,
255: p_data => x_msg_data
256: );
258: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
259: ROLLBACK TO CREATE_List_Src_Field_PVT;
260: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
261: -- Standard call to get message count and if count=1, get the message
262: FND_MSG_PUB.Count_And_Get (
263: p_encoded => FND_API.G_FALSE,
264: p_count => x_msg_count,
265: p_data => x_msg_data
266: );
267:
268: WHEN OTHERS THEN
269: ROLLBACK TO CREATE_List_Src_Field_PVT;
270: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
271: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
272: THEN
273: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
274: END IF;
275: -- Standard call to get message count and if count=1, get the message
269: ROLLBACK TO CREATE_List_Src_Field_PVT;
270: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
271: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
272: THEN
273: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
274: END IF;
275: -- Standard call to get message count and if count=1, get the message
276: FND_MSG_PUB.Count_And_Get (
277: p_encoded => FND_API.G_FALSE,
272: THEN
273: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
274: END IF;
275: -- Standard call to get message count and if count=1, get the message
276: FND_MSG_PUB.Count_And_Get (
277: p_encoded => FND_API.G_FALSE,
278: p_count => x_msg_count,
279: p_data => x_msg_data
280: );
348:
349: -- Initialize message list if p_init_msg_list is set to TRUE.
350: IF FND_API.to_Boolean( p_init_msg_list )
351: THEN
352: FND_MSG_PUB.initialize;
353: END IF;
354:
355: -- Debug Message
356: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
441: END IF;
442:
443:
444: -- Debug Message
445: -- AMS_UTILITY_PVT.debug_message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Private API: Calling update table handler');
446:
447: -- Invoke table handler(AMS_LIST_SRC_FIELDS_PKG.Update_Row)
448: AMS_LIST_SRC_FIELDS_PKG.Update_Row(
449: p_list_source_field_id => p_list_src_field_rec.list_source_field_id,
516: -- Debug Message
517: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
518:
519: -- Standard call to get message count and if count is 1, get message info.
520: FND_MSG_PUB.Count_And_Get
521: (p_count => x_msg_count,
522: p_data => x_msg_data
523: );
524: EXCEPTION
530: WHEN FND_API.G_EXC_ERROR THEN
531: ROLLBACK TO UPDATE_List_Src_Field_PVT;
532: x_return_status := FND_API.G_RET_STS_ERROR;
533: -- Standard call to get message count and if count=1, get the message
534: FND_MSG_PUB.Count_And_Get (
535: p_encoded => FND_API.G_FALSE,
536: p_count => x_msg_count,
537: p_data => x_msg_data
538: );
540: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
541: ROLLBACK TO UPDATE_List_Src_Field_PVT;
542: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
543: -- Standard call to get message count and if count=1, get the message
544: FND_MSG_PUB.Count_And_Get (
545: p_encoded => FND_API.G_FALSE,
546: p_count => x_msg_count,
547: p_data => x_msg_data
548: );
549:
550: WHEN OTHERS THEN
551: ROLLBACK TO UPDATE_List_Src_Field_PVT;
552: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
553: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
554: THEN
555: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
556: END IF;
557: -- Standard call to get message count and if count=1, get the message
551: ROLLBACK TO UPDATE_List_Src_Field_PVT;
552: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
553: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
554: THEN
555: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
556: END IF;
557: -- Standard call to get message count and if count=1, get the message
558: FND_MSG_PUB.Count_And_Get (
559: p_encoded => FND_API.G_FALSE,
554: THEN
555: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
556: END IF;
557: -- Standard call to get message count and if count=1, get the message
558: FND_MSG_PUB.Count_And_Get (
559: p_encoded => FND_API.G_FALSE,
560: p_count => x_msg_count,
561: p_data => x_msg_data
562: );
595:
596: -- Initialize message list if p_init_msg_list is set to TRUE.
597: IF FND_API.to_Boolean( p_init_msg_list )
598: THEN
599: FND_MSG_PUB.initialize;
600: END IF;
601:
602: -- Debug Message
603: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
640: -- Debug Message
641: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
642:
643: -- Standard call to get message count and if count is 1, get message info.
644: FND_MSG_PUB.Count_And_Get
645: (p_count => x_msg_count,
646: p_data => x_msg_data
647: );
648: EXCEPTION
654: WHEN FND_API.G_EXC_ERROR THEN
655: ROLLBACK TO DELETE_List_Src_Field_PVT;
656: x_return_status := FND_API.G_RET_STS_ERROR;
657: -- Standard call to get message count and if count=1, get the message
658: FND_MSG_PUB.Count_And_Get (
659: p_encoded => FND_API.G_FALSE,
660: p_count => x_msg_count,
661: p_data => x_msg_data
662: );
664: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
665: ROLLBACK TO DELETE_List_Src_Field_PVT;
666: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
667: -- Standard call to get message count and if count=1, get the message
668: FND_MSG_PUB.Count_And_Get (
669: p_encoded => FND_API.G_FALSE,
670: p_count => x_msg_count,
671: p_data => x_msg_data
672: );
673:
674: WHEN OTHERS THEN
675: ROLLBACK TO DELETE_List_Src_Field_PVT;
676: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
677: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
678: THEN
679: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
680: END IF;
681: -- Standard call to get message count and if count=1, get the message
675: ROLLBACK TO DELETE_List_Src_Field_PVT;
676: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
677: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
678: THEN
679: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
680: END IF;
681: -- Standard call to get message count and if count=1, get the message
682: FND_MSG_PUB.Count_And_Get (
683: p_encoded => FND_API.G_FALSE,
678: THEN
679: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
680: END IF;
681: -- Standard call to get message count and if count=1, get the message
682: FND_MSG_PUB.Count_And_Get (
683: p_encoded => FND_API.G_FALSE,
684: p_count => x_msg_count,
685: p_data => x_msg_data
686: );
721:
722: -- Initialize message list if p_init_msg_list is set to TRUE.
723: IF FND_API.to_Boolean( p_init_msg_list )
724: THEN
725: FND_MSG_PUB.initialize;
726: END IF;
727:
728: -- Standard call to check for call compatibility.
729: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
747: FETCH c_List_Src_Field INTO l_LIST_SOURCE_FIELD_ID;
748:
749: IF (c_List_Src_Field%NOTFOUND) THEN
750: CLOSE c_List_Src_Field;
751: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
752: FND_MESSAGE.set_name('AMS', 'AMS_API_RECORD_NOT_FOUND');
753: FND_MSG_PUB.add;
754: END IF;
755: RAISE FND_API.g_exc_error;
749: IF (c_List_Src_Field%NOTFOUND) THEN
750: CLOSE c_List_Src_Field;
751: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
752: FND_MESSAGE.set_name('AMS', 'AMS_API_RECORD_NOT_FOUND');
753: FND_MSG_PUB.add;
754: END IF;
755: RAISE FND_API.g_exc_error;
756: END IF;
757:
757:
758: CLOSE c_List_Src_Field;
759:
760: -------------------- finish --------------------------
761: FND_MSG_PUB.count_and_get(
762: p_encoded => FND_API.g_false,
763: p_count => x_msg_count,
764: p_data => x_msg_data);
765: AMS_Utility_PVT.debug_message(l_full_name ||': end');
772: WHEN FND_API.G_EXC_ERROR THEN
773: ROLLBACK TO LOCK_List_Src_Field_PVT;
774: x_return_status := FND_API.G_RET_STS_ERROR;
775: -- Standard call to get message count and if count=1, get the message
776: FND_MSG_PUB.Count_And_Get (
777: p_encoded => FND_API.G_FALSE,
778: p_count => x_msg_count,
779: p_data => x_msg_data
780: );
782: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
783: ROLLBACK TO LOCK_List_Src_Field_PVT;
784: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
785: -- Standard call to get message count and if count=1, get the message
786: FND_MSG_PUB.Count_And_Get (
787: p_encoded => FND_API.G_FALSE,
788: p_count => x_msg_count,
789: p_data => x_msg_data
790: );
791:
792: WHEN OTHERS THEN
793: ROLLBACK TO LOCK_List_Src_Field_PVT;
794: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
795: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
796: THEN
797: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
798: END IF;
799: -- Standard call to get message count and if count=1, get the message
793: ROLLBACK TO LOCK_List_Src_Field_PVT;
794: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
795: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
796: THEN
797: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
798: END IF;
799: -- Standard call to get message count and if count=1, get the message
800: FND_MSG_PUB.Count_And_Get (
801: p_encoded => FND_API.G_FALSE,
796: THEN
797: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
798: END IF;
799: -- Standard call to get message count and if count=1, get the message
800: FND_MSG_PUB.Count_And_Get (
801: p_encoded => FND_API.G_FALSE,
802: p_count => x_msg_count,
803: p_data => x_msg_data
804: );
848: ||' and list_source_type_id = '||p_list_src_field_rec.list_source_type_id
849:
850: ) = FND_API.g_false
851: THEN
852: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
853: FND_MESSAGE.set_name('AMS', 'BAD_COMB');
854: FND_MSG_PUB.add;
855: END IF;
856: x_return_status := FND_API.g_ret_sts_error;
850: ) = FND_API.g_false
851: THEN
852: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
853: FND_MESSAGE.set_name('AMS', 'BAD_COMB');
854: FND_MSG_PUB.add;
855: END IF;
856: x_return_status := FND_API.g_ret_sts_error;
857: RETURN;
858: END IF;
1043: FETCH c_lstsrcfld_crt INTO l_lstsrcfld_crt_rec;
1044:
1045: IF (c_lstsrcfld_crt%FOUND) THEN
1046: FND_MESSAGE.set_name('AMS', 'AMS_DUPLICATE_SRC_COL_NAME');
1047: FND_MSG_PUB.Add;
1048: x_return_status := FND_API.g_ret_sts_error;
1049: RETURN;
1050: END IF;
1051:
1053: FETCH c_fldcolname_crt INTO l_fldcolname_crt_rec;
1054:
1055: IF (c_fldcolname_crt%FOUND) THEN
1056: FND_MESSAGE.set_name('AMS', 'AMS_DUPLICATE_FLD_COL_NAME');
1057: FND_MSG_PUB.Add;
1058: x_return_status := FND_API.g_ret_sts_error;
1059: RETURN;
1060: END IF;
1061:
1065: FETCH c_lstsrcfld_upd INTO l_lstsrcfld_upd_rec;
1066:
1067: IF (c_lstsrcfld_upd%FOUND) THEN
1068: FND_MESSAGE.set_name('AMS', 'AMS_DUPLICATE_SRC_COL_NAME');
1069: FND_MSG_PUB.Add;
1070: x_return_status := FND_API.g_ret_sts_error;
1071: RETURN;
1072: END IF;
1073:
1075: FETCH c_fldcolname_upd INTO l_fldcolname_upd_rec;
1076:
1077: IF (c_fldcolname_upd%FOUND) THEN
1078: FND_MESSAGE.set_name('AMS', 'AMS_DUPLICATE_FLD_COL_NAME');
1079: FND_MSG_PUB.Add;
1080: x_return_status := FND_API.g_ret_sts_error;
1081: RETURN;
1082: END IF;
1083:
1298:
1299: -- Initialize message list if p_init_msg_list is set to TRUE.
1300: IF FND_API.to_Boolean( p_init_msg_list )
1301: THEN
1302: FND_MSG_PUB.initialize;
1303: END IF;
1304:
1305:
1306:
1351: -- Debug Message
1352: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
1353:
1354: -- Standard call to get message count and if count is 1, get message info.
1355: FND_MSG_PUB.Count_And_Get
1356: (p_count => x_msg_count,
1357: p_data => x_msg_data
1358: );
1359: EXCEPTION
1365: WHEN FND_API.G_EXC_ERROR THEN
1366: ROLLBACK TO VALIDATE_List_Src_Field_;
1367: x_return_status := FND_API.G_RET_STS_ERROR;
1368: -- Standard call to get message count and if count=1, get the message
1369: FND_MSG_PUB.Count_And_Get (
1370: p_encoded => FND_API.G_FALSE,
1371: p_count => x_msg_count,
1372: p_data => x_msg_data
1373: );
1375: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1376: ROLLBACK TO VALIDATE_List_Src_Field_;
1377: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1378: -- Standard call to get message count and if count=1, get the message
1379: FND_MSG_PUB.Count_And_Get (
1380: p_encoded => FND_API.G_FALSE,
1381: p_count => x_msg_count,
1382: p_data => x_msg_data
1383: );
1384:
1385: WHEN OTHERS THEN
1386: ROLLBACK TO VALIDATE_List_Src_Field_;
1387: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1388: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1389: THEN
1390: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1391: END IF;
1392: -- Standard call to get message count and if count=1, get the message
1386: ROLLBACK TO VALIDATE_List_Src_Field_;
1387: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1388: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1389: THEN
1390: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1391: END IF;
1392: -- Standard call to get message count and if count=1, get the message
1393: FND_MSG_PUB.Count_And_Get (
1394: p_encoded => FND_API.G_FALSE,
1389: THEN
1390: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1391: END IF;
1392: -- Standard call to get message count and if count=1, get the message
1393: FND_MSG_PUB.Count_And_Get (
1394: p_encoded => FND_API.G_FALSE,
1395: p_count => x_msg_count,
1396: p_data => x_msg_data
1397: );
1410: BEGIN
1411: -- Initialize message list if p_init_msg_list is set to TRUE.
1412: IF FND_API.to_Boolean( p_init_msg_list )
1413: THEN
1414: FND_MSG_PUB.initialize;
1415: END IF;
1416:
1417: -- Initialize API return status to SUCCESS
1418: x_return_status := FND_API.G_RET_STS_SUCCESS;
1424:
1425: -- Debug Message
1426: AMS_UTILITY_PVT.debug_message('Private API: Validate_dm_model_rec');
1427: -- Standard call to get message count and if count is 1, get message info.
1428: FND_MSG_PUB.Count_And_Get
1429: (p_count => x_msg_count,
1430: p_data => x_msg_data
1431: );
1432: END Validate_list_src_field_Rec;