35: x_return_status := fnd_api.g_ret_sts_success;
36:
37: IF fnd_api.to_boolean (p_init_msg_list)
38: THEN
39: fnd_msg_pub.initialize;
40: END IF;
41:
42: IF NOT fnd_api.compatible_api_call (
43: l_api_version,
83: THEN
84: COMMIT WORK;
85: END IF;
86:
87: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
88: EXCEPTION
89: WHEN fnd_api.g_exc_unexpected_error
90: THEN
91: ROLLBACK TO SET_COUNTER_STATUS;
89: WHEN fnd_api.g_exc_unexpected_error
90: THEN
91: ROLLBACK TO SET_COUNTER_STATUS;
92: x_return_status := fnd_api.g_ret_sts_unexp_error;
93: fnd_msg_pub.count_and_get (
94: p_count => x_msg_count,
95: p_data => x_msg_data
96: );
97: WHEN fnd_api.g_exc_error
97: WHEN fnd_api.g_exc_error
98: THEN
99: ROLLBACK TO SET_COUNTER_STATUS;
100: x_return_status := fnd_api.G_RET_STS_ERROR;
101: fnd_msg_pub.count_and_get (
102: p_count => x_msg_count,
103: p_data => x_msg_data
104: );
105: WHEN OTHERS
106: THEN
107: ROLLBACK TO SET_COUNTER_STATUS;
108: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
109: fnd_message.set_token ('P_TEXT', SQLCODE || SQLERRM);
110: fnd_msg_pub.add;
111: x_return_status := fnd_api.g_ret_sts_unexp_error;
112: fnd_msg_pub.count_and_get (
113: p_count => x_msg_count,
114: p_data => x_msg_data
108: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
109: fnd_message.set_token ('P_TEXT', SQLCODE || SQLERRM);
110: fnd_msg_pub.add;
111: x_return_status := fnd_api.g_ret_sts_unexp_error;
112: fnd_msg_pub.count_and_get (
113: p_count => x_msg_count,
114: p_data => x_msg_data
115: );
116:
136: x_return_status := fnd_api.g_ret_sts_success;
137:
138: IF fnd_api.to_boolean (p_init_msg_list)
139: THEN
140: fnd_msg_pub.initialize;
141: END IF;
142:
143: IF NOT fnd_api.compatible_api_call (
144: l_api_version,
173: THEN
174: COMMIT WORK;
175: END IF;
176:
177: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
178: EXCEPTION
179: WHEN fnd_api.g_exc_unexpected_error
180: THEN
181: ROLLBACK TO RESET_COUNTER;
179: WHEN fnd_api.g_exc_unexpected_error
180: THEN
181: ROLLBACK TO RESET_COUNTER;
182: x_return_status := fnd_api.G_RET_STS_UNEXP_ERROR;
183: fnd_msg_pub.count_and_get (
184: p_count => x_msg_count,
185: p_data => x_msg_data
186: );
187: WHEN fnd_api.g_exc_error
187: WHEN fnd_api.g_exc_error
188: THEN
189: ROLLBACK TO RESET_COUNTER;
190: x_return_status := fnd_api.G_RET_STS_ERROR;
191: fnd_msg_pub.count_and_get (
192: p_count => x_msg_count,
193: p_data => x_msg_data
194: );
195: WHEN OTHERS
196: THEN
197: ROLLBACK TO RESET_COUNTER;
198: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
199: fnd_message.set_token ('P_TEXT', SQLCODE || SQLERRM);
200: fnd_msg_pub.add;
201: x_return_status := fnd_api.g_ret_sts_unexp_error;
202: fnd_msg_pub.count_and_get (
203: p_count => x_msg_count,
204: p_data => x_msg_data
198: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
199: fnd_message.set_token ('P_TEXT', SQLCODE || SQLERRM);
200: fnd_msg_pub.add;
201: x_return_status := fnd_api.g_ret_sts_unexp_error;
202: fnd_msg_pub.count_and_get (
203: p_count => x_msg_count,
204: p_data => x_msg_data
205: );
206:
246: x_return_status := fnd_api.g_ret_sts_success;
247:
248: IF fnd_api.to_boolean (p_init_msg_list)
249: THEN
250: fnd_msg_pub.initialize;
251: END IF;
252:
253: IF NOT fnd_api.compatible_api_call (
254: l_api_version,
285: THEN
286: COMMIT WORK;
287: END IF;
288:
289: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
290: EXCEPTION
291: WHEN fnd_api.g_exc_unexpected_error
292: THEN
293: ROLLBACK TO INCREASE_COUNTER;
291: WHEN fnd_api.g_exc_unexpected_error
292: THEN
293: ROLLBACK TO INCREASE_COUNTER;
294: x_return_status := fnd_api.g_ret_sts_unexp_error;
295: fnd_msg_pub.count_and_get (
296: p_count => x_msg_count,
297: p_data => x_msg_data
298: );
299: WHEN fnd_api.g_exc_error
299: WHEN fnd_api.g_exc_error
300: THEN
301: ROLLBACK TO INCREASE_COUNTER;
302: x_return_status := fnd_api.G_RET_STS_ERROR;
303: fnd_msg_pub.count_and_get (
304: p_count => x_msg_count,
305: p_data => x_msg_data
306: );
307: WHEN OTHERS
308: THEN
309: ROLLBACK TO INCREASE_COUNTER;
310: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
311: fnd_message.set_token ('P_TEXT', SQLCODE || SQLERRM);
312: fnd_msg_pub.add;
313: x_return_status := fnd_api.g_ret_sts_unexp_error;
314: fnd_msg_pub.count_and_get (
315: p_count => x_msg_count,
316: p_data => x_msg_data
310: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
311: fnd_message.set_token ('P_TEXT', SQLCODE || SQLERRM);
312: fnd_msg_pub.add;
313: x_return_status := fnd_api.g_ret_sts_unexp_error;
314: fnd_msg_pub.count_and_get (
315: p_count => x_msg_count,
316: p_data => x_msg_data
317: );
318:
341: x_return_status := fnd_api.g_ret_sts_success;
342:
343: IF fnd_api.to_boolean (p_init_msg_list)
344: THEN
345: fnd_msg_pub.initialize;
346: END IF;
347:
348: IF NOT fnd_api.compatible_api_call (
349: l_api_version,
380: THEN
381: COMMIT WORK;
382: END IF;
383:
384: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
385: EXCEPTION
386: WHEN fnd_api.g_exc_unexpected_error
387: THEN
388: ROLLBACK TO DECREASE_COUNTER;
386: WHEN fnd_api.g_exc_unexpected_error
387: THEN
388: ROLLBACK TO DECREASE_COUNTER;
389: x_return_status := fnd_api.g_ret_sts_unexp_error;
390: fnd_msg_pub.count_and_get (
391: p_count => x_msg_count,
392: p_data => x_msg_data
393: );
394: WHEN fnd_api.g_exc_error
394: WHEN fnd_api.g_exc_error
395: THEN
396: ROLLBACK TO DECREASE_COUNTER;
397: x_return_status := fnd_api.G_RET_STS_ERROR;
398: fnd_msg_pub.count_and_get (
399: p_count => x_msg_count,
400: p_data => x_msg_data
401: );
402: WHEN OTHERS
403: THEN
404: ROLLBACK TO DECREASE_COUNTER;
405: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
406: fnd_message.set_token ('P_TEXT', SQLCODE || SQLERRM);
407: fnd_msg_pub.add;
408: x_return_status := fnd_api.g_ret_sts_unexp_error;
409: fnd_msg_pub.count_and_get (
410: p_count => x_msg_count,
411: p_data => x_msg_data
405: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
406: fnd_message.set_token ('P_TEXT', SQLCODE || SQLERRM);
407: fnd_msg_pub.add;
408: x_return_status := fnd_api.g_ret_sts_unexp_error;
409: fnd_msg_pub.count_and_get (
410: p_count => x_msg_count,
411: p_data => x_msg_data
412: );
413:
436: x_return_status := fnd_api.g_ret_sts_success;
437:
438: IF fnd_api.to_boolean (p_init_msg_list)
439: THEN
440: fnd_msg_pub.initialize;
441: END IF;
442:
443: IF NOT fnd_api.compatible_api_call (
444: l_api_version,
475: THEN
476: COMMIT WORK;
477: END IF;
478:
479: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
480: EXCEPTION
481: WHEN fnd_api.g_exc_unexpected_error
482: THEN
483: ROLLBACK TO CHANGE_COUNTER_SIGN;
481: WHEN fnd_api.g_exc_unexpected_error
482: THEN
483: ROLLBACK TO CHANGE_COUNTER_SIGN;
484: x_return_status := fnd_api.g_ret_sts_unexp_error;
485: fnd_msg_pub.count_and_get (
486: p_count => x_msg_count,
487: p_data => x_msg_data
488: );
489: WHEN fnd_api.g_exc_error
489: WHEN fnd_api.g_exc_error
490: THEN
491: ROLLBACK TO CHANGE_COUNTER_SIGN;
492: x_return_status := fnd_api.G_RET_STS_ERROR;
493: fnd_msg_pub.count_and_get (
494: p_count => x_msg_count,
495: p_data => x_msg_data
496: );
497: WHEN OTHERS
498: THEN
499: ROLLBACK TO CHANGE_COUNTER_SIGN;
500: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
501: fnd_message.set_token ('P_TEXT', SQLCODE || SQLERRM);
502: fnd_msg_pub.add;
503: x_return_status := fnd_api.g_ret_sts_unexp_error;
504: fnd_msg_pub.count_and_get (
505: p_count => x_msg_count,
506: p_data => x_msg_data
500: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
501: fnd_message.set_token ('P_TEXT', SQLCODE || SQLERRM);
502: fnd_msg_pub.add;
503: x_return_status := fnd_api.g_ret_sts_unexp_error;
504: fnd_msg_pub.count_and_get (
505: p_count => x_msg_count,
506: p_data => x_msg_data
507: );
508:
533: x_return_status := fnd_api.g_ret_sts_success;
534:
535: IF fnd_api.to_boolean (p_init_msg_list)
536: THEN
537: fnd_msg_pub.initialize;
538: END IF;
539:
540: IF NOT fnd_api.compatible_api_call (
541: l_api_version,
570: THEN
571: COMMIT WORK;
572: END IF;
573:
574: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
575: EXCEPTION
576: WHEN fnd_api.g_exc_unexpected_error
577: THEN
578: ROLLBACK TO RESET_CONFIRMATION_STATUS;
576: WHEN fnd_api.g_exc_unexpected_error
577: THEN
578: ROLLBACK TO RESET_CONFIRMATION_STATUS;
579: x_return_status := fnd_api.g_ret_sts_unexp_error;
580: fnd_msg_pub.count_and_get (
581: p_count => x_msg_count,
582: p_data => x_msg_data
583: );
584: WHEN fnd_api.g_exc_error
584: WHEN fnd_api.g_exc_error
585: THEN
586: ROLLBACK TO RESET_CONFIRMATION_STATUS;
587: x_return_status := fnd_api.G_RET_STS_ERROR;
588: fnd_msg_pub.count_and_get (
589: p_count => x_msg_count,
590: p_data => x_msg_data
591: );
592: WHEN OTHERS
593: THEN
594: ROLLBACK TO RESET_CONFIRMATION_STATUS;
595: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
596: fnd_message.set_token ('P_TEXT', SQLCODE || SQLERRM);
597: fnd_msg_pub.add;
598: x_return_status := fnd_api.g_ret_sts_unexp_error;
599: fnd_msg_pub.count_and_get (
600: p_count => x_msg_count,
601: p_data => x_msg_data
595: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
596: fnd_message.set_token ('P_TEXT', SQLCODE || SQLERRM);
597: fnd_msg_pub.add;
598: x_return_status := fnd_api.g_ret_sts_unexp_error;
599: fnd_msg_pub.count_and_get (
600: p_count => x_msg_count,
601: p_data => x_msg_data
602: );
603:
628: x_return_status := fnd_api.g_ret_sts_success;
629:
630: IF fnd_api.to_boolean (p_init_msg_list)
631: THEN
632: fnd_msg_pub.initialize;
633: END IF;
634:
635: IF NOT fnd_api.compatible_api_call (
636: l_api_version,
666: THEN
667: COMMIT WORK;
668: END IF;
669:
670: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
671: EXCEPTION
672: WHEN fnd_api.g_exc_unexpected_error
673: THEN
674: ROLLBACK TO SET_CONFIRMATION_REQUIRED;
672: WHEN fnd_api.g_exc_unexpected_error
673: THEN
674: ROLLBACK TO SET_CONFIRMATION_REQUIRED;
675: x_return_status := fnd_api.g_ret_sts_unexp_error;
676: fnd_msg_pub.count_and_get (
677: p_count => x_msg_count,
678: p_data => x_msg_data
679: );
680: WHEN fnd_api.g_exc_error
680: WHEN fnd_api.g_exc_error
681: THEN
682: ROLLBACK TO SET_CONFIRMATION_REQUIRED;
683: x_return_status := fnd_api.G_RET_STS_ERROR;
684: fnd_msg_pub.count_and_get (
685: p_count => x_msg_count,
686: p_data => x_msg_data
687: );
688: WHEN OTHERS
689: THEN
690: ROLLBACK TO SET_CONFIRMATION_REQUIRED;
691: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
692: fnd_message.set_token ('P_TEXT', SQLCODE || SQLERRM);
693: fnd_msg_pub.add;
694: x_return_status := fnd_api.g_ret_sts_unexp_error;
695: fnd_msg_pub.count_and_get (
696: p_count => x_msg_count,
697: p_data => x_msg_data
691: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
692: fnd_message.set_token ('P_TEXT', SQLCODE || SQLERRM);
693: fnd_msg_pub.add;
694: x_return_status := fnd_api.g_ret_sts_unexp_error;
695: fnd_msg_pub.count_and_get (
696: p_count => x_msg_count,
697: p_data => x_msg_data
698: );
699:
723: x_return_status := fnd_api.g_ret_sts_success;
724:
725: IF fnd_api.to_boolean (p_init_msg_list)
726: THEN
727: fnd_msg_pub.initialize;
728: END IF;
729:
730: IF NOT fnd_api.compatible_api_call (
731: l_api_version,
762: THEN
763: COMMIT WORK;
764: END IF;
765:
766: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
767: EXCEPTION
768: WHEN fnd_api.g_exc_unexpected_error
769: THEN
770: ROLLBACK TO SET_CONFIRMATION_CONFIRMED;
768: WHEN fnd_api.g_exc_unexpected_error
769: THEN
770: ROLLBACK TO SET_CONFIRMATION_CONFIRMED;
771: x_return_status := fnd_api.g_ret_sts_unexp_error;
772: fnd_msg_pub.count_and_get (
773: p_count => x_msg_count,
774: p_data => x_msg_data
775: );
776: WHEN fnd_api.g_exc_error
776: WHEN fnd_api.g_exc_error
777: THEN
778: ROLLBACK TO SET_CONFIRMATION_CONFIRMED;
779: x_return_status := fnd_api.G_RET_STS_ERROR;
780: fnd_msg_pub.count_and_get (
781: p_count => x_msg_count,
782: p_data => x_msg_data
783: );
784: WHEN OTHERS
785: THEN
786: ROLLBACK TO SET_CONFIRMATION_CONFIRMED;
787: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
788: fnd_message.set_token ('P_TEXT', SQLCODE || SQLERRM);
789: fnd_msg_pub.add;
790: x_return_status := fnd_api.g_ret_sts_unexp_error;
791: fnd_msg_pub.count_and_get (
792: p_count => x_msg_count,
793: p_data => x_msg_data
787: fnd_message.set_name ('JTF', 'JTF_TASK_UNKNOWN_ERROR');
788: fnd_message.set_token ('P_TEXT', SQLCODE || SQLERRM);
789: fnd_msg_pub.add;
790: x_return_status := fnd_api.g_ret_sts_unexp_error;
791: fnd_msg_pub.count_and_get (
792: p_count => x_msg_count,
793: p_data => x_msg_data
794: );
795: