89:
90: -- Initialize message list if p_init_msg_list is set to TRUE.
91: IF FND_API.to_Boolean( p_init_msg_list )
92: THEN
93: FND_MSG_PUB.initialize;
94: END IF;
95:
96: -- Initialize API return status to success
97: x_return_status := FND_API.G_RET_STS_SUCCESS;
138: END IF;
139:
140: -- Debug Message
141: -- Standard call to get message count and if count is 1, get message info.
142: FND_MSG_PUB.Count_And_Get
143: (
144: p_count => x_msg_count,
145: p_data => x_msg_data
146: );
152:
153: ROLLBACK TO SAVE_PERZ_DDF_PUB;
154: x_return_status := FND_API.G_RET_STS_ERROR ;
155:
156: FND_MSG_PUB.Count_And_Get
157: ( p_count => x_msg_count,
158: p_data => x_msg_data
159: );
160:
157: ( p_count => x_msg_count,
158: p_data => x_msg_data
159: );
160:
161: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
162: THEN
163: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
164: END IF;
165:
159: );
160:
161: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
162: THEN
163: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
164: END IF;
165:
166: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
167:
167:
168: ROLLBACK TO SAVE_PERZ_DDF_PUB;
169: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
170:
171: FND_MSG_PUB.Count_And_Get
172: ( p_count => x_msg_count,
173: p_data => x_msg_data
174: );
175:
172: ( p_count => x_msg_count,
173: p_data => x_msg_data
174: );
175:
176: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
177: THEN
178: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
179: END IF;
180:
174: );
175:
176: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
177: THEN
178: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
179: END IF;
180:
181: WHEN OTHERS THEN
182:
182:
183: ROLLBACK TO SAVE_PERZ_DDF_PUB;
184: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
185:
186: FND_MSG_PUB.Count_And_Get
187: ( p_count => x_msg_count,
188: p_data => x_msg_data
189: );
190:
187: ( p_count => x_msg_count,
188: p_data => x_msg_data
189: );
190:
191: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
192: THEN
193: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
194: END IF;
195:
189: );
190:
191: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
192: THEN
193: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
194: END IF;
195:
196: END save_data_default;
197: -- *****************************************************************************
248:
249: -- Initialize message list if p_init_msg_list is set to TRUE.
250: IF FND_API.to_Boolean( p_init_msg_list )
251: THEN
252: FND_MSG_PUB.initialize;
253: END IF;
254:
255: -- Initialize API return status to success
256: x_return_status := FND_API.G_RET_STS_SUCCESS;
296: END IF;
297:
298: -- Debug Message
299: -- Standard call to get message count and if count is 1, get message info.
300: FND_MSG_PUB.Count_And_Get
301: (
302: p_count => x_msg_count,
303: p_data => x_msg_data
304: );
310:
311: ROLLBACK TO CREATE_PERZ_DDF_PUB;
312: x_return_status := FND_API.G_RET_STS_ERROR ;
313:
314: FND_MSG_PUB.Count_And_Get
315: ( p_count => x_msg_count,
316: p_data => x_msg_data
317: );
318:
315: ( p_count => x_msg_count,
316: p_data => x_msg_data
317: );
318:
319: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
320: THEN
321: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
322: END IF;
323:
317: );
318:
319: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
320: THEN
321: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
322: END IF;
323:
324: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
325:
325:
326: ROLLBACK TO CREATE_PERZ_DDF_PUB;
327: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
328:
329: FND_MSG_PUB.Count_And_Get
330: ( p_count => x_msg_count,
331: p_data => x_msg_data
332: );
333:
330: ( p_count => x_msg_count,
331: p_data => x_msg_data
332: );
333:
334: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
335: THEN
336: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
337: END IF;
338:
332: );
333:
334: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
335: THEN
336: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
337: END IF;
338:
339: WHEN OTHERS THEN
340:
340:
341: ROLLBACK TO CREATE_PERZ_DDF_PUB;
342: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
343:
344: FND_MSG_PUB.Count_And_Get
345: ( p_count => x_msg_count,
346: p_data => x_msg_data
347: );
348:
345: ( p_count => x_msg_count,
346: p_data => x_msg_data
347: );
348:
349: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
350: THEN
351: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
352: END IF;
353:
347: );
348:
349: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
350: THEN
351: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
352: END IF;
353:
354: END create_data_default;
355:
402:
403: -- Initialize message list if p_init_msg_list is set to TRUE.
404: IF FND_API.to_Boolean( p_init_msg_list )
405: THEN
406: FND_MSG_PUB.initialize;
407: END IF;
408:
409: -- Initialize API return status to success
410: x_return_status := FND_API.G_RET_STS_SUCCESS;
439: --
440: --
441: -- Debug Message
442: -- Standard call to get message count and if count is 1, get message info.
443: FND_MSG_PUB.Count_And_Get
444: (
445: p_count => x_msg_count,
446: p_data => x_msg_data
447: );
452: WHEN FND_API.G_EXC_ERROR THEN
453:
454: x_return_status := FND_API.G_RET_STS_ERROR ;
455:
456: FND_MSG_PUB.Count_And_Get
457: ( p_count => x_msg_count,
458: p_data => x_msg_data
459: );
460:
457: ( p_count => x_msg_count,
458: p_data => x_msg_data
459: );
460:
461: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
462: THEN
463: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
464: END IF;
465:
459: );
460:
461: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
462: THEN
463: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
464: END IF;
465:
466: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
467:
466: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
467:
468: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
469:
470: FND_MSG_PUB.Count_And_Get
471: ( p_count => x_msg_count,
472: p_data => x_msg_data
473: );
474:
471: ( p_count => x_msg_count,
472: p_data => x_msg_data
473: );
474:
475: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
476: THEN
477: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
478: END IF;
479:
473: );
474:
475: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
476: THEN
477: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
478: END IF;
479:
480: WHEN OTHERS THEN
481:
480: WHEN OTHERS THEN
481:
482: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
483:
484: FND_MSG_PUB.Count_And_Get
485: ( p_count => x_msg_count,
486: p_data => x_msg_data
487: );
488:
485: ( p_count => x_msg_count,
486: p_data => x_msg_data
487: );
488:
489: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
490: THEN
491: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
492: END IF;
493:
487: );
488:
489: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
490: THEN
491: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
492: END IF;
493:
494: END get_data_default;
495: -- *****************************************************************************
546:
547: -- Initialize message list if p_init_msg_list is set to TRUE.
548: IF FND_API.to_Boolean( p_init_msg_list )
549: THEN
550: FND_MSG_PUB.initialize;
551: END IF;
552:
553: -- Initialize API return status to success
554: x_return_status := FND_API.G_RET_STS_SUCCESS;
593: END IF;
594:
595: -- Debug Message
596: -- Standard call to get message count and if count is 1, get message info.
597: FND_MSG_PUB.Count_And_Get
598: (
599: p_count => x_msg_count,
600: p_data => x_msg_data
601: );
607:
608: ROLLBACK TO UPDATE_PERZ_DDF_PUB;
609: x_return_status := FND_API.G_RET_STS_ERROR ;
610:
611: FND_MSG_PUB.Count_And_Get
612: ( p_count => x_msg_count,
613: p_data => x_msg_data
614: );
615:
612: ( p_count => x_msg_count,
613: p_data => x_msg_data
614: );
615:
616: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
617: THEN
618: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
619: END IF;
620:
614: );
615:
616: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
617: THEN
618: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
619: END IF;
620:
621: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
622:
622:
623: ROLLBACK TO UPDATE_PERZ_DDF_PUB;
624: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
625:
626: FND_MSG_PUB.Count_And_Get
627: ( p_count => x_msg_count,
628: p_data => x_msg_data
629: );
630:
627: ( p_count => x_msg_count,
628: p_data => x_msg_data
629: );
630:
631: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
632: THEN
633: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
634: END IF;
635:
629: );
630:
631: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
632: THEN
633: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
634: END IF;
635:
636: WHEN OTHERS THEN
637:
637:
638: ROLLBACK TO UPDATE_PERZ_DDF_PUB;
639: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
640:
641: FND_MSG_PUB.Count_And_Get
642: ( p_count => x_msg_count,
643: p_data => x_msg_data
644: );
645:
642: ( p_count => x_msg_count,
643: p_data => x_msg_data
644: );
645:
646: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
647: THEN
648: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
649: END IF;
650:
644: );
645:
646: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
647: THEN
648: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
649: END IF;
650:
651:
652: END update_data_default;
693:
694: -- Initialize message list if p_init_msg_list is set to TRUE.
695: IF FND_API.to_Boolean( p_init_msg_list )
696: THEN
697: FND_MSG_PUB.initialize;
698: END IF;
699:
700: -- Initialize API return status to success
701: x_return_status := FND_API.G_RET_STS_SUCCESS;
727: END IF;
728:
729: -- Debug Message
730: -- Standard call to get message count and if count is 1, get message info.
731: FND_MSG_PUB.Count_And_Get
732: (
733: p_count => x_msg_count,
734: p_data => x_msg_data
735: );
741:
742: ROLLBACK TO DELETE_PERZ_DDF_PUB;
743: x_return_status := FND_API.G_RET_STS_ERROR ;
744:
745: FND_MSG_PUB.Count_And_Get
746: ( p_count => x_msg_count,
747: p_data => x_msg_data
748: );
749:
746: ( p_count => x_msg_count,
747: p_data => x_msg_data
748: );
749:
750: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
751: THEN
752: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
753: END IF;
754:
748: );
749:
750: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
751: THEN
752: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
753: END IF;
754:
755: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
756:
756:
757: ROLLBACK TO DELETE_PERZ_DDF_PUB;
758: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
759:
760: FND_MSG_PUB.Count_And_Get
761: ( p_count => x_msg_count,
762: p_data => x_msg_data
763: );
764:
761: ( p_count => x_msg_count,
762: p_data => x_msg_data
763: );
764:
765: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
766: THEN
767: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
768: END IF;
769:
763: );
764:
765: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
766: THEN
767: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
768: END IF;
769:
770: WHEN OTHERS THEN
771:
771:
772: ROLLBACK TO DELETE_PERZ_DDF_PUB;
773: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
774:
775: FND_MSG_PUB.Count_And_Get
776: ( p_count => x_msg_count,
777: p_data => x_msg_data
778: );
779:
776: ( p_count => x_msg_count,
777: p_data => x_msg_data
778: );
779:
780: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
781: THEN
782: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
783: END IF;
784:
778: );
779:
780: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
781: THEN
782: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
783: END IF;
784:
785: END delete_data_default;
786: