25: -- Raise exception for invalid flag.
26: -- 5. If a flag column is not passed in, default it to 'Y' or 'N'.
27: -- 6. Please don't pass in any FND_API.g_mess_char/num/date.
28: ---------------------------------------------------------------------
29: AMS_DEBUG_HIGH_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
30: AMS_DEBUG_LOW_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
31: AMS_DEBUG_MEDIUM_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
32:
33: PROCEDURE create_listentry(
26: -- 5. If a flag column is not passed in, default it to 'Y' or 'N'.
27: -- 6. Please don't pass in any FND_API.g_mess_char/num/date.
28: ---------------------------------------------------------------------
29: AMS_DEBUG_HIGH_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
30: AMS_DEBUG_LOW_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
31: AMS_DEBUG_MEDIUM_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
32:
33: PROCEDURE create_listentry(
34: p_api_version IN NUMBER,
27: -- 6. Please don't pass in any FND_API.g_mess_char/num/date.
28: ---------------------------------------------------------------------
29: AMS_DEBUG_HIGH_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
30: AMS_DEBUG_LOW_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
31: AMS_DEBUG_MEDIUM_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
32:
33: PROCEDURE create_listentry(
34: p_api_version IN NUMBER,
35: p_init_msg_list IN VARCHAR2 := FND_API.g_false,
57:
58: -- initialize the message list;
59: -- won't do it again when calling private API
60: IF FND_API.to_boolean(p_init_msg_list) THEN
61: FND_MSG_PUB.initialize;
62: END IF;
63:
64: AMS_LISTENTRY_PVT.create_listentry(
65: p_api_version => p_api_version,
86: IF FND_API.to_boolean(p_commit) THEN
87: COMMIT;
88: END IF;
89: x_return_status := FND_API.g_ret_sts_success;
90: FND_MSG_PUB.count_and_get(
91: p_encoded => FND_API.g_false,
92: p_count => x_msg_count,
93: p_data => x_msg_data
94: );
97:
98: WHEN FND_API.g_exc_error THEN
99: ROLLBACK TO create_listentry_pub;
100: x_return_status := FND_API.g_ret_sts_error;
101: FND_MSG_PUB.count_and_get(
102: p_encoded => FND_API.g_false,
103: p_count => x_msg_count,
104: p_data => x_msg_data
105: );
106:
107: WHEN FND_API.g_exc_unexpected_error THEN
108: ROLLBACK TO create_listentry_pub;
109: x_return_status := FND_API.g_ret_sts_unexp_error ;
110: FND_MSG_PUB.count_and_get(
111: p_encoded => FND_API.g_false,
112: p_count => x_msg_count,
113: p_data => x_msg_data
114: );
117: WHEN OTHERS THEN
118: ROLLBACK TO create_listentry_pub;
119: x_return_status := FND_API.g_ret_sts_unexp_error ;
120:
121: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
122: THEN
123: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
124: END IF;
125:
119: x_return_status := FND_API.g_ret_sts_unexp_error ;
120:
121: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
122: THEN
123: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
124: END IF;
125:
126: FND_MSG_PUB.count_and_get(
127: p_encoded => FND_API.g_false,
122: THEN
123: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
124: END IF;
125:
126: FND_MSG_PUB.count_and_get(
127: p_encoded => FND_API.g_false,
128: p_count => x_msg_count,
129: p_data => x_msg_data
130: );
172:
173: -- initialize the message list;
174: -- won't do it again when calling private API
175: IF FND_API.to_boolean(p_init_msg_list) THEN
176: FND_MSG_PUB.initialize;
177: END IF;
178:
179: AMS_LISTENTRY_PVT.update_listentry
180: ( p_api_version => p_api_version,
196: IF FND_API.to_boolean(p_commit) THEN
197: COMMIT;
198: END IF;
199: x_return_status := FND_API.g_ret_sts_success;
200: FND_MSG_PUB.count_and_get(
201: p_encoded => FND_API.g_false,
202: p_count => x_msg_count,
203: p_data => x_msg_data
204: );
207:
208: WHEN FND_API.g_exc_error THEN
209: ROLLBACK TO update_listentry_pub;
210: x_return_status := FND_API.g_ret_sts_error;
211: FND_MSG_PUB.count_and_get(
212: p_encoded => FND_API.g_false,
213: p_count => x_msg_count,
214: p_data => x_msg_data
215: );
216:
217: WHEN FND_API.g_exc_unexpected_error THEN
218: ROLLBACK TO update_listentry_pub;
219: x_return_status := FND_API.g_ret_sts_unexp_error ;
220: FND_MSG_PUB.count_and_get(
221: p_encoded => FND_API.g_false,
222: p_count => x_msg_count,
223: p_data => x_msg_data
224: );
227: WHEN OTHERS THEN
228: ROLLBACK TO update_listentry_pub;
229: x_return_status := FND_API.g_ret_sts_unexp_error ;
230:
231: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
232: THEN
233: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
234: END IF;
235:
229: x_return_status := FND_API.g_ret_sts_unexp_error ;
230:
231: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
232: THEN
233: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
234: END IF;
235:
236: FND_MSG_PUB.count_and_get(
237: p_encoded => FND_API.g_false,
232: THEN
233: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
234: END IF;
235:
236: FND_MSG_PUB.count_and_get(
237: p_encoded => FND_API.g_false,
238: p_count => x_msg_count,
239: p_data => x_msg_data
240: );
284:
285: -- initialize the message list;
286: -- won't do it again when calling private API
287: IF FND_API.to_boolean(p_init_msg_list) THEN
288: FND_MSG_PUB.initialize;
289: END IF;
290:
291: AMS_LISTENTRY_PVT.delete_listentry(
292: p_api_version => p_api_version,
311: IF FND_API.to_boolean(p_commit) THEN
312: COMMIT;
313: END IF;
314: x_return_status := FND_API.g_ret_sts_success;
315: FND_MSG_PUB.count_and_get(
316: p_encoded => FND_API.g_false,
317: p_count => x_msg_count,
318: p_data => x_msg_data
319: );
322:
323: WHEN FND_API.g_exc_error THEN
324: ROLLBACK TO delete_listentry_pub;
325: x_return_status := FND_API.g_ret_sts_error;
326: FND_MSG_PUB.count_and_get(
327: p_encoded => FND_API.g_false,
328: p_count => x_msg_count,
329: p_data => x_msg_data
330: );
331:
332: WHEN FND_API.g_exc_unexpected_error THEN
333: ROLLBACK TO delete_listentry_pub;
334: x_return_status := FND_API.g_ret_sts_unexp_error ;
335: FND_MSG_PUB.count_and_get(
336: p_encoded => FND_API.g_false,
337: p_count => x_msg_count,
338: p_data => x_msg_data
339: );
342: WHEN OTHERS THEN
343: ROLLBACK TO delete_listentry_pub;
344: x_return_status := FND_API.g_ret_sts_unexp_error ;
345:
346: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
347: THEN
348: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
349: END IF;
350:
344: x_return_status := FND_API.g_ret_sts_unexp_error ;
345:
346: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
347: THEN
348: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
349: END IF;
350:
351: FND_MSG_PUB.count_and_get(
352: p_encoded => FND_API.g_false,
347: THEN
348: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
349: END IF;
350:
351: FND_MSG_PUB.count_and_get(
352: p_encoded => FND_API.g_false,
353: p_count => x_msg_count,
354: p_data => x_msg_data
355: );
396:
397: -- initialize the message list;
398: -- won't do it again when calling private API
399: IF FND_API.to_boolean(p_init_msg_list) THEN
400: FND_MSG_PUB.initialize;
401: END IF;
402:
403: lock_listentry
404: ( p_api_version => p_api_version ,
420: END IF;
421:
422:
423: x_return_status := FND_API.g_ret_sts_success;
424: FND_MSG_PUB.count_and_get(
425: p_encoded => FND_API.g_false,
426: p_count => x_msg_count,
427: p_data => x_msg_data
428: );
431:
432: WHEN FND_API.g_exc_error THEN
433: ROLLBACK TO lock_listentry_pub;
434: x_return_status := FND_API.g_ret_sts_error;
435: FND_MSG_PUB.count_and_get(
436: p_encoded => FND_API.g_false,
437: p_count => x_msg_count,
438: p_data => x_msg_data
439: );
440:
441: WHEN FND_API.g_exc_unexpected_error THEN
442: ROLLBACK TO lock_listentry_pub;
443: x_return_status := FND_API.g_ret_sts_unexp_error ;
444: FND_MSG_PUB.count_and_get(
445: p_encoded => FND_API.g_false,
446: p_count => x_msg_count,
447: p_data => x_msg_data
448: );
451: WHEN OTHERS THEN
452: ROLLBACK TO lock_listentry_pub;
453: x_return_status := FND_API.g_ret_sts_unexp_error ;
454:
455: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
456: THEN
457: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
458: END IF;
459:
453: x_return_status := FND_API.g_ret_sts_unexp_error ;
454:
455: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
456: THEN
457: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
458: END IF;
459:
460: FND_MSG_PUB.count_and_get(
461: p_encoded => FND_API.g_false,
456: THEN
457: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
458: END IF;
459:
460: FND_MSG_PUB.count_and_get(
461: p_encoded => FND_API.g_false,
462: p_count => x_msg_count,
463: p_data => x_msg_data
464: );
503:
504: -- initialize the message list;
505: -- won't do it again when calling private API
506: IF FND_API.to_boolean(p_init_msg_list) THEN
507: FND_MSG_PUB.initialize;
508: END IF;
509:
510:
511: AMS_LISTENTRY_PVT.validate_listentry
526: END IF;
527:
528:
529: x_return_status := FND_API.g_ret_sts_success;
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
534: );
537:
538: WHEN FND_API.g_exc_error THEN
539: ROLLBACK TO validate_listentry_pub;
540: x_return_status := FND_API.g_ret_sts_error;
541: FND_MSG_PUB.count_and_get(
542: p_encoded => FND_API.g_false,
543: p_count => x_msg_count,
544: p_data => x_msg_data
545: );
547: WHEN FND_API.g_exc_unexpected_error THEN
548: ROLLBACK TO validate_listentry_pub;
549: x_return_status := FND_API.g_ret_sts_unexp_error ;
550:
551: FND_MSG_PUB.count_and_get(
552: p_encoded => FND_API.g_false,
553: p_count => x_msg_count,
554: p_data => x_msg_data
555: );
558: WHEN OTHERS THEN
559: ROLLBACK TO validate_listentry_pub;
560: x_return_status := FND_API.g_ret_sts_unexp_error ;
561:
562: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
563: THEN
564: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
565: END IF;
566:
560: x_return_status := FND_API.g_ret_sts_unexp_error ;
561:
562: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
563: THEN
564: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
565: END IF;
566:
567: FND_MSG_PUB.count_and_get(
568: p_encoded => FND_API.g_false,
563: THEN
564: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
565: END IF;
566:
567: FND_MSG_PUB.count_and_get(
568: p_encoded => FND_API.g_false,
569: p_count => x_msg_count,
570: p_data => x_msg_data
571: );