[Home] [Help]
55: FROM AMS_LIST_CONT_RESTRICTIONS
56: WHERE LIST_CONTACT_RESTRICTIONs_ID = l_id;
57:
58: BEGIN
59: -- Standard Start of API savepoint
60: SAVEPOINT CREATE_List_Assoc_PVT;
61:
62: -- Standard call to check for call compatibility.
63: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
58: BEGIN
59: -- Standard Start of API savepoint
60: SAVEPOINT CREATE_List_Assoc_PVT;
61:
62: -- Standard call to check for call compatibility.
63: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
64: p_api_version_number,
65: l_api_name,
66: G_PKG_NAME)
166: --
167: -- End of API body
168: --
169:
170: -- Standard check for p_commit
171: IF FND_API.to_Boolean( p_commit )
172: THEN
173: COMMIT WORK;
174: END IF;
179:
180: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
181: END IF;
182:
183: -- Standard call to get message count and if count is 1, get message info.
184: FND_MSG_PUB.Count_And_Get
185: (p_count => x_msg_count,
186: p_data => x_msg_data
187: );
193:
194: WHEN FND_API.G_EXC_ERROR THEN
195: ROLLBACK TO CREATE_List_Assoc_PVT;
196: x_return_status := FND_API.G_RET_STS_ERROR;
197: -- Standard call to get message count and if count=1, get the message
198: FND_MSG_PUB.Count_And_Get (
199: p_encoded => FND_API.G_FALSE,
200: p_count => x_msg_count,
201: p_data => x_msg_data
203:
204: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
205: ROLLBACK TO CREATE_List_Assoc_PVT;
206: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
207: -- Standard call to get message count and if count=1, get the message
208: FND_MSG_PUB.Count_And_Get (
209: p_encoded => FND_API.G_FALSE,
210: p_count => x_msg_count,
211: p_data => x_msg_data
217: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
218: THEN
219: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
220: END IF;
221: -- Standard call to get message count and if count=1, get the message
222: FND_MSG_PUB.Count_And_Get (
223: p_encoded => FND_API.G_FALSE,
224: p_count => x_msg_count,
225: p_data => x_msg_data
257: l_tar_list_assoc_rec AMS_List_Assoc_PVT.list_assoc_rec_type := P_list_assoc_rec;
258: l_rowid ROWID;
259:
260: BEGIN
261: -- Standard Start of API savepoint
262: SAVEPOINT UPDATE_List_Assoc_PVT;
263:
264: -- Standard call to check for call compatibility.
265: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
260: BEGIN
261: -- Standard Start of API savepoint
262: SAVEPOINT UPDATE_List_Assoc_PVT;
263:
264: -- Standard call to check for call compatibility.
265: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
266: p_api_version_number,
267: l_api_name,
268: G_PKG_NAME)
375: --
376: -- End of API body.
377: --
378:
379: -- Standard check for p_commit
380: IF FND_API.to_Boolean( p_commit )
381: THEN
382: COMMIT WORK;
383: END IF;
388:
389: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
390: END IF;
391:
392: -- Standard call to get message count and if count is 1, get message info.
393: FND_MSG_PUB.Count_And_Get
394: (p_count => x_msg_count,
395: p_data => x_msg_data
396: );
402:
403: WHEN FND_API.G_EXC_ERROR THEN
404: ROLLBACK TO UPDATE_List_Assoc_PVT;
405: x_return_status := FND_API.G_RET_STS_ERROR;
406: -- Standard call to get message count and if count=1, get the message
407: FND_MSG_PUB.Count_And_Get (
408: p_encoded => FND_API.G_FALSE,
409: p_count => x_msg_count,
410: p_data => x_msg_data
412:
413: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
414: ROLLBACK TO UPDATE_List_Assoc_PVT;
415: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
416: -- Standard call to get message count and if count=1, get the message
417: FND_MSG_PUB.Count_And_Get (
418: p_encoded => FND_API.G_FALSE,
419: p_count => x_msg_count,
420: p_data => x_msg_data
426: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
427: THEN
428: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
429: END IF;
430: -- Standard call to get message count and if count=1, get the message
431: FND_MSG_PUB.Count_And_Get (
432: p_encoded => FND_API.G_FALSE,
433: p_count => x_msg_count,
434: p_data => x_msg_data
453: L_API_VERSION_NUMBER CONSTANT NUMBER := 1.0;
454: l_object_version_number NUMBER;
455:
456: BEGIN
457: -- Standard Start of API savepoint
458: SAVEPOINT DELETE_List_Assoc_PVT;
459:
460: -- Standard call to check for call compatibility.
461: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
456: BEGIN
457: -- Standard Start of API savepoint
458: SAVEPOINT DELETE_List_Assoc_PVT;
459:
460: -- Standard call to check for call compatibility.
461: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
462: p_api_version_number,
463: l_api_name,
464: G_PKG_NAME)
498: --
499: -- End of API body
500: --
501:
502: -- Standard check for p_commit
503: IF FND_API.to_Boolean( p_commit )
504: THEN
505: COMMIT WORK;
506: END IF;
511:
512: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
513: END IF;
514:
515: -- Standard call to get message count and if count is 1, get message info.
516: FND_MSG_PUB.Count_And_Get
517: (p_count => x_msg_count,
518: p_data => x_msg_data
519: );
525:
526: WHEN FND_API.G_EXC_ERROR THEN
527: ROLLBACK TO DELETE_List_Assoc_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_List_Assoc_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)
656:
657: WHEN FND_API.G_EXC_ERROR THEN
658: ROLLBACK TO LOCK_List_Assoc_PVT;
659: x_return_status := FND_API.G_RET_STS_ERROR;
660: -- Standard call to get message count and if count=1, get the message
661: FND_MSG_PUB.Count_And_Get (
662: p_encoded => FND_API.G_FALSE,
663: p_count => x_msg_count,
664: p_data => x_msg_data
666:
667: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
668: ROLLBACK TO LOCK_List_Assoc_PVT;
669: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
670: -- Standard call to get message count and if count=1, get the message
671: FND_MSG_PUB.Count_And_Get (
672: p_encoded => FND_API.G_FALSE,
673: p_count => x_msg_count,
674: p_data => x_msg_data
680: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
681: THEN
682: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
683: END IF;
684: -- Standard call to get message count and if count=1, get the message
685: FND_MSG_PUB.Count_And_Get (
686: p_encoded => FND_API.G_FALSE,
687: p_count => x_msg_count,
688: p_data => x_msg_data
1063: l_object_version_number NUMBER;
1064: l_list_assoc_rec AMS_List_Assoc_PVT.list_assoc_rec_type;
1065:
1066: BEGIN
1067: -- Standard Start of API savepoint
1068: SAVEPOINT VALIDATE_List_Assoc_;
1069:
1070: -- Standard call to check for call compatibility.
1071: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1066: BEGIN
1067: -- Standard Start of API savepoint
1068: SAVEPOINT VALIDATE_List_Assoc_;
1069:
1070: -- Standard call to check for call compatibility.
1071: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1072: p_api_version_number,
1073: l_api_name,
1074: G_PKG_NAME)
1137:
1138: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
1139: END IF;
1140:
1141: -- Standard call to get message count and if count is 1, get message info.
1142: FND_MSG_PUB.Count_And_Get
1143: (p_count => x_msg_count,
1144: p_data => x_msg_data
1145: );
1151:
1152: WHEN FND_API.G_EXC_ERROR THEN
1153: ROLLBACK TO VALIDATE_List_Assoc_;
1154: x_return_status := FND_API.G_RET_STS_ERROR;
1155: -- Standard call to get message count and if count=1, get the message
1156: FND_MSG_PUB.Count_And_Get (
1157: p_encoded => FND_API.G_FALSE,
1158: p_count => x_msg_count,
1159: p_data => x_msg_data
1161:
1162: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1163: ROLLBACK TO VALIDATE_List_Assoc_;
1164: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1165: -- Standard call to get message count and if count=1, get the message
1166: FND_MSG_PUB.Count_And_Get (
1167: p_encoded => FND_API.G_FALSE,
1168: p_count => x_msg_count,
1169: p_data => x_msg_data
1175: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1176: THEN
1177: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1178: END IF;
1179: -- Standard call to get message count and if count=1, get the message
1180: FND_MSG_PUB.Count_And_Get (
1181: p_encoded => FND_API.G_FALSE,
1182: p_count => x_msg_count,
1183: p_data => x_msg_data
1213: IF (AMS_DEBUG_HIGH_ON) THEN
1214:
1215: AMS_UTILITY_PVT.debug_message('Private API: Validate_list_assoc_rec');
1216: END IF;
1217: -- Standard call to get message count and if count is 1, get message info.
1218: FND_MSG_PUB.Count_And_Get
1219: (p_count => x_msg_count,
1220: p_data => x_msg_data
1221: );