71:
72: -- Initialize message list if p_init_msg_list is set to TRUE.
73: IF Fnd_Api.to_Boolean( p_init_msg_list )
74: THEN
75: Fnd_Msg_Pub.initialize;
76: END IF;
77:
78: -- Initialize API return status to success
79: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
114: END IF;
115:
116: -- Debug Message
117: -- Standard call to get message count and if count is 1, get message info.
118: Fnd_Msg_Pub.Count_And_Get
119: (
120: p_count => x_msg_count,
121: p_data => x_msg_data
122: );
128:
129: ROLLBACK TO SAVE_JTF_PERZ_QUERY_PUB;
130: x_return_status := Fnd_Api.G_RET_STS_ERROR ;
131:
132: Fnd_Msg_Pub.Count_And_Get
133: ( p_count => x_msg_count,
134: p_data => x_msg_data
135: );
136:
133: ( p_count => x_msg_count,
134: p_data => x_msg_data
135: );
136:
137: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
138: THEN
139: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
140: END IF;
141:
135: );
136:
137: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
138: THEN
139: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
140: END IF;
141:
142: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
143:
143:
144: ROLLBACK TO SAVE_JTF_PERZ_QUERY_PUB;
145: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR ;
146:
147: Fnd_Msg_Pub.Count_And_Get
148: ( p_count => x_msg_count,
149: p_data => x_msg_data
150: );
151:
148: ( p_count => x_msg_count,
149: p_data => x_msg_data
150: );
151:
152: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
153: THEN
154: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
155: END IF;
156:
150: );
151:
152: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
153: THEN
154: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
155: END IF;
156:
157: WHEN OTHERS THEN
158:
158:
159: ROLLBACK TO SAVE_JTF_PERZ_QUERY_PUB;
160: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR ;
161:
162: Fnd_Msg_Pub.Count_And_Get
163: ( p_count => x_msg_count,
164: p_data => x_msg_data
165: );
166:
163: ( p_count => x_msg_count,
164: p_data => x_msg_data
165: );
166:
167: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
168: THEN
169: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
170: END IF;
171: END Save_Perz_Query;
165: );
166:
167: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
168: THEN
169: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
170: END IF;
171: END Save_Perz_Query;
172: -- ****************************************************************************
173: PROCEDURE Create_Perz_Query
218:
219: -- Initialize message list if p_init_msg_list is set to TRUE.
220: IF Fnd_Api.to_Boolean( p_init_msg_list )
221: THEN
222: Fnd_Msg_Pub.initialize;
223: END IF;
224:
225: -- Initialize API return status to success
226: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
259: END IF;
260:
261: -- Debug Message
262: -- Standard call to get message count and if count is 1, get message info.
263: Fnd_Msg_Pub.Count_And_Get
264: (
265: p_count => x_msg_count,
266: p_data => x_msg_data
267: );
273:
274: ROLLBACK TO CREATE_JTF_PERZ_QUERY_PUB;
275: x_return_status := Fnd_Api.G_RET_STS_ERROR ;
276:
277: Fnd_Msg_Pub.Count_And_Get
278: ( p_count => x_msg_count,
279: p_data => x_msg_data
280: );
281:
278: ( p_count => x_msg_count,
279: p_data => x_msg_data
280: );
281:
282: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
283: THEN
284: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
285: END IF;
286:
280: );
281:
282: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
283: THEN
284: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
285: END IF;
286:
287: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
288:
288:
289: ROLLBACK TO CREATE_JTF_PERZ_QUERY_PUB;
290: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR ;
291:
292: Fnd_Msg_Pub.Count_And_Get
293: ( p_count => x_msg_count,
294: p_data => x_msg_data
295: );
296:
293: ( p_count => x_msg_count,
294: p_data => x_msg_data
295: );
296:
297: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
298: THEN
299: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
300: END IF;
301:
295: );
296:
297: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
298: THEN
299: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
300: END IF;
301:
302: WHEN OTHERS THEN
303:
303:
304: ROLLBACK TO CREATE_JTF_PERZ_QUERY_PUB;
305: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR ;
306:
307: Fnd_Msg_Pub.Count_And_Get
308: ( p_count => x_msg_count,
309: p_data => x_msg_data
310: );
311:
308: ( p_count => x_msg_count,
309: p_data => x_msg_data
310: );
311:
312: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
313: THEN
314: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
315: END IF;
316:
310: );
311:
312: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
313: THEN
314: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
315: END IF;
316:
317: END Create_Perz_Query;
318: -- ****************************************************************************
360:
361: -- Initialize message list if p_init_msg_list is set to TRUE.
362: IF Fnd_Api.to_Boolean( p_init_msg_list )
363: THEN
364: Fnd_Msg_Pub.initialize;
365: END IF;
366:
367: -- Initialize API return status to success
368: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
399: -- End of API body.
400:
401: -- Debug Message
402: -- Standard call to get message count and if count is 1, get message info.
403: Fnd_Msg_Pub.Count_And_Get
404: (
405: p_count => x_msg_count,
406: p_data => x_msg_data
407: );
412: WHEN Fnd_Api.G_EXC_ERROR THEN
413:
414: x_return_status := Fnd_Api.G_RET_STS_ERROR ;
415:
416: Fnd_Msg_Pub.Count_And_Get
417: ( p_count => x_msg_count,
418: p_data => x_msg_data
419: );
420:
417: ( p_count => x_msg_count,
418: p_data => x_msg_data
419: );
420:
421: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
422: THEN
423: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
424: END IF;
425:
419: );
420:
421: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
422: THEN
423: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
424: END IF;
425:
426: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
427:
426: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
427:
428: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR ;
429:
430: Fnd_Msg_Pub.Count_And_Get
431: ( p_count => x_msg_count,
432: p_data => x_msg_data
433: );
434:
431: ( p_count => x_msg_count,
432: p_data => x_msg_data
433: );
434:
435: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
436: THEN
437: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
438: END IF;
439:
433: );
434:
435: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
436: THEN
437: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
438: END IF;
439:
440: WHEN OTHERS THEN
441:
441:
442:
443: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR ;
444:
445: Fnd_Msg_Pub.Count_And_Get
446: ( p_count => x_msg_count,
447: p_data => x_msg_data
448: );
449:
446: ( p_count => x_msg_count,
447: p_data => x_msg_data
448: );
449:
450: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
451: THEN
452: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
453: END IF;
454:
448: );
449:
450: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
451: THEN
452: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
453: END IF;
454:
455:
456: END Get_Perz_Query;
492:
493: -- Initialize message list if p_init_msg_list is set to TRUE.
494: IF Fnd_Api.to_Boolean( p_init_msg_list )
495: THEN
496: Fnd_Msg_Pub.initialize;
497: END IF;
498:
499: -- Initialize API return status to success
500: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
524: -- End of API body.
525:
526: -- Debug Message
527: -- Standard call to get message count and if count is 1, get message info.
528: Fnd_Msg_Pub.Count_And_Get
529: (
530: p_count => x_msg_count,
531: p_data => x_msg_data
532: );
537: WHEN Fnd_Api.G_EXC_ERROR THEN
538:
539: x_return_status := Fnd_Api.G_RET_STS_ERROR ;
540:
541: Fnd_Msg_Pub.Count_And_Get
542: ( p_count => x_msg_count,
543: p_data => x_msg_data
544: );
545:
542: ( p_count => x_msg_count,
543: p_data => x_msg_data
544: );
545:
546: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
547: THEN
548: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
549: END IF;
550:
544: );
545:
546: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
547: THEN
548: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
549: END IF;
550:
551: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
552:
551: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
552:
553: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR ;
554:
555: Fnd_Msg_Pub.Count_And_Get
556: ( p_count => x_msg_count,
557: p_data => x_msg_data
558: );
559:
556: ( p_count => x_msg_count,
557: p_data => x_msg_data
558: );
559:
560: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
561: THEN
562: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
563: END IF;
564:
558: );
559:
560: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
561: THEN
562: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
563: END IF;
564:
565: WHEN OTHERS THEN
566:
566:
567:
568: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR ;
569:
570: Fnd_Msg_Pub.Count_And_Get
571: ( p_count => x_msg_count,
572: p_data => x_msg_data
573: );
574:
571: ( p_count => x_msg_count,
572: p_data => x_msg_data
573: );
574:
575: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
576: THEN
577: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
578: END IF;
579: END Get_Perz_Query_Summary;
573: );
574:
575: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
576: THEN
577: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
578: END IF;
579: END Get_Perz_Query_Summary;
580: -- *****************************************************************************
581: PROCEDURE Update_Perz_Query
625:
626: -- Initialize message list if p_init_msg_list is set to TRUE.
627: IF Fnd_Api.to_Boolean( p_init_msg_list )
628: THEN
629: Fnd_Msg_Pub.initialize;
630: END IF;
631:
632: -- Initialize API return status to success
633: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
666: END IF;
667:
668: -- Debug Message
669: -- Standard call to get message count and if count is 1, get message info.
670: Fnd_Msg_Pub.Count_And_Get
671: (
672: p_count => x_msg_count,
673: p_data => x_msg_data
674: );
680:
681: ROLLBACK TO UPDATE_JTF_PERZ_QUERY_PUB;
682: x_return_status := Fnd_Api.G_RET_STS_ERROR ;
683:
684: Fnd_Msg_Pub.Count_And_Get
685: ( p_count => x_msg_count,
686: p_data => x_msg_data
687: );
688:
685: ( p_count => x_msg_count,
686: p_data => x_msg_data
687: );
688:
689: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
690: THEN
691: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
692: END IF;
693:
687: );
688:
689: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
690: THEN
691: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
692: END IF;
693:
694: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
695:
695:
696: ROLLBACK TO UPDATE_JTF_PERZ_QUERY_PUB;
697: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR ;
698:
699: Fnd_Msg_Pub.Count_And_Get
700: ( p_count => x_msg_count,
701: p_data => x_msg_data
702: );
703:
700: ( p_count => x_msg_count,
701: p_data => x_msg_data
702: );
703:
704: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
705: THEN
706: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
707: END IF;
708:
702: );
703:
704: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
705: THEN
706: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
707: END IF;
708:
709: WHEN OTHERS THEN
710:
710:
711: ROLLBACK TO UPDATE_JTF_PERZ_QUERY_PUB;
712: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR ;
713:
714: Fnd_Msg_Pub.Count_And_Get
715: ( p_count => x_msg_count,
716: p_data => x_msg_data
717: );
718:
715: ( p_count => x_msg_count,
716: p_data => x_msg_data
717: );
718:
719: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
720: THEN
721: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
722: END IF;
723:
717: );
718:
719: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
720: THEN
721: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
722: END IF;
723:
724:
725: END Update_Perz_Query;
759:
760: -- Initialize message list if p_init_msg_list is set to TRUE.
761: IF Fnd_Api.to_Boolean( p_init_msg_list )
762: THEN
763: Fnd_Msg_Pub.initialize;
764: END IF;
765:
766: -- Initialize API return status to success
767: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
792: END IF;
793:
794: -- Debug Message
795: -- Standard call to get message count and if count is 1, get message info.
796: Fnd_Msg_Pub.Count_And_Get
797: (
798: p_count => x_msg_count,
799: p_data => x_msg_data
800: );
806:
807: ROLLBACK TO DELETE_JTF_PERZ_QUERY_PUB;
808: x_return_status := Fnd_Api.G_RET_STS_ERROR ;
809:
810: Fnd_Msg_Pub.Count_And_Get
811: ( p_count => x_msg_count,
812: p_data => x_msg_data
813: );
814:
811: ( p_count => x_msg_count,
812: p_data => x_msg_data
813: );
814:
815: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
816: THEN
817: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
818: END IF;
819:
813: );
814:
815: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
816: THEN
817: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
818: END IF;
819:
820: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
821:
821:
822: ROLLBACK TO DELETE_JTF_PERZ_QUERY_PUB;
823: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR ;
824:
825: Fnd_Msg_Pub.Count_And_Get
826: ( p_count => x_msg_count,
827: p_data => x_msg_data
828: );
829:
826: ( p_count => x_msg_count,
827: p_data => x_msg_data
828: );
829:
830: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
831: THEN
832: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
833: END IF;
834:
828: );
829:
830: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
831: THEN
832: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
833: END IF;
834:
835: WHEN OTHERS THEN
836:
836:
837: ROLLBACK TO DELETE_JTF_PERZ_QUERY_PUB;
838: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR ;
839:
840: Fnd_Msg_Pub.Count_And_Get
841: ( p_count => x_msg_count,
842: p_data => x_msg_data
843: );
844:
841: ( p_count => x_msg_count,
842: p_data => x_msg_data
843: );
844:
845: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
846: THEN
847: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
848: END IF;
849:
843: );
844:
845: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR )
846: THEN
847: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME, l_api_name );
848: END IF;
849:
850:
851: