57: END IF;
58:
59: -- Initialize message list if p_init_msg_list is set to TRUE.
60: IF FND_API.to_Boolean( p_init_msg_list ) THEN
61: FND_MSG_PUB.initialize;
62: END IF;
63:
64: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
65: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.BEGIN',
135: COMMIT WORK;
136: END IF;
137:
138: -- Standard call to get message count and IF count is get message info.
139: FND_MSG_PUB.Count_And_Get
140: (p_count => x_msg_count,
141: p_data => x_msg_data );
142:
143: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
151: x_return_status := FND_API.G_RET_STS_ERROR;
152:
153: -- The definition already exists. No duplicates are allowed.
154: FND_MESSAGE.set_name('CSD', 'CSD_FLEX_DEFN_EXISTS');
155: FND_MSG_PUB.add;
156:
157: FND_MSG_PUB.Count_And_Get
158: (p_count => x_msg_count,
159: p_data => x_msg_data );
153: -- The definition already exists. No duplicates are allowed.
154: FND_MESSAGE.set_name('CSD', 'CSD_FLEX_DEFN_EXISTS');
155: FND_MSG_PUB.add;
156:
157: FND_MSG_PUB.Count_And_Get
158: (p_count => x_msg_count,
159: p_data => x_msg_data );
160:
161: -- save message in debug log
166: WHEN FND_API.G_EXC_ERROR THEN
167: ROLLBACK TO Create_Flwsts_Tran;
168: x_return_status := FND_API.G_RET_STS_ERROR;
169:
170: FND_MSG_PUB.Count_And_Get
171: (p_count => x_msg_count,
172: p_data => x_msg_data );
173:
174: -- save message in debug log
181: ROLLBACK TO Create_Flwsts_Tran;
182: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
183:
184: -- save message in fnd stack
185: IF FND_MSG_PUB.Check_Msg_Level
186: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
187: THEN
188: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
189: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
182: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
183:
184: -- save message in fnd stack
185: IF FND_MSG_PUB.Check_Msg_Level
186: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
187: THEN
188: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
189: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
190: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
186: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
187: THEN
188: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
189: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
190: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
191: end if;
192: FND_MSG_PUB.Add_Exc_Msg
193: (G_PKG_NAME ,
194: lc_api_name );
188: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
189: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
190: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
191: end if;
192: FND_MSG_PUB.Add_Exc_Msg
193: (G_PKG_NAME ,
194: lc_api_name );
195: END IF;
196:
193: (G_PKG_NAME ,
194: lc_api_name );
195: END IF;
196:
197: FND_MSG_PUB.Count_And_Get
198: ( p_count => x_msg_count,
199: p_data => x_msg_data );
200:
201: -- save message in debug log
208: ROLLBACK TO Create_Flwsts_Tran;
209: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
210:
211: -- save message in fnd stack
212: IF FND_MSG_PUB.Check_Msg_Level
213: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
214: THEN
215: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
216: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
209: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
210:
211: -- save message in fnd stack
212: IF FND_MSG_PUB.Check_Msg_Level
213: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
214: THEN
215: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
216: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
217: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
213: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
214: THEN
215: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
216: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
217: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
218: end if;
219: FND_MSG_PUB.Add_Exc_Msg
220: (G_PKG_NAME ,
221: lc_api_name );
215: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
216: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
217: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
218: end if;
219: FND_MSG_PUB.Add_Exc_Msg
220: (G_PKG_NAME ,
221: lc_api_name );
222: END IF;
223:
220: (G_PKG_NAME ,
221: lc_api_name );
222: END IF;
223:
224: FND_MSG_PUB.Count_And_Get
225: (p_count => x_msg_count,
226: p_data => x_msg_data );
227:
228: -- save message in debug log
287: END IF;
288:
289: -- Initialize message list if p_init_msg_list is set to TRUE.
290: IF FND_API.to_Boolean( p_init_msg_list ) THEN
291: FND_MSG_PUB.initialize;
292: END IF;
293:
294: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
295: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.BEGIN',
370: COMMIT WORK;
371: END IF;
372:
373: -- Standard call to get message count and IF count is get message info.
374: FND_MSG_PUB.Count_And_Get
375: (p_count => x_msg_count,
376: p_data => x_msg_data );
377:
378: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
386: x_return_status := FND_API.G_RET_STS_ERROR;
387:
388: -- The definition already exists. No duplicates are allowed.
389: FND_MESSAGE.set_name('CSD', 'CSD_FLEX_DEFN_EXISTS');
390: FND_MSG_PUB.add;
391:
392: FND_MSG_PUB.Count_And_Get
393: (p_count => x_msg_count,
394: p_data => x_msg_data );
388: -- The definition already exists. No duplicates are allowed.
389: FND_MESSAGE.set_name('CSD', 'CSD_FLEX_DEFN_EXISTS');
390: FND_MSG_PUB.add;
391:
392: FND_MSG_PUB.Count_And_Get
393: (p_count => x_msg_count,
394: p_data => x_msg_data );
395:
396: -- save message in debug log
401: WHEN FND_API.G_EXC_ERROR THEN
402: ROLLBACK TO Update_Flwsts_Tran;
403: x_return_status := FND_API.G_RET_STS_ERROR;
404:
405: FND_MSG_PUB.Count_And_Get
406: (p_count => x_msg_count,
407: p_data => x_msg_data );
408:
409: -- save message in debug log
415: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
416: ROLLBACK TO Update_Flwsts_Tran;
417: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
418:
419: IF FND_MSG_PUB.Check_Msg_Level
420: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
421: THEN
422: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
423: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
416: ROLLBACK TO Update_Flwsts_Tran;
417: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
418:
419: IF FND_MSG_PUB.Check_Msg_Level
420: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
421: THEN
422: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
423: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
424: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
420: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
421: THEN
422: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
423: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
424: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
425: end if;
426: FND_MSG_PUB.Add_Exc_Msg
427: (G_PKG_NAME ,
428: lc_api_name );
422: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
423: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
424: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
425: end if;
426: FND_MSG_PUB.Add_Exc_Msg
427: (G_PKG_NAME ,
428: lc_api_name );
429: END IF;
430:
427: (G_PKG_NAME ,
428: lc_api_name );
429: END IF;
430:
431: FND_MSG_PUB.Count_And_Get
432: ( p_count => x_msg_count,
433: p_data => x_msg_data );
434:
435: -- save message in debug log
442: ROLLBACK TO Update_Flwsts_Tran;
443: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
444:
445: -- save message in fnd stack
446: IF FND_MSG_PUB.Check_Msg_Level
447: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
448: THEN
449: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
450: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
443: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
444:
445: -- save message in fnd stack
446: IF FND_MSG_PUB.Check_Msg_Level
447: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
448: THEN
449: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
450: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
451: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
447: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
448: THEN
449: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
450: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
451: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
452: end if;
453: FND_MSG_PUB.Add_Exc_Msg
454: (G_PKG_NAME ,
455: lc_api_name );
449: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
450: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
451: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
452: end if;
453: FND_MSG_PUB.Add_Exc_Msg
454: (G_PKG_NAME ,
455: lc_api_name );
456: END IF;
457:
454: (G_PKG_NAME ,
455: lc_api_name );
456: END IF;
457:
458: FND_MSG_PUB.Count_And_Get
459: (p_count => x_msg_count,
460: p_data => x_msg_data );
461:
462: -- save message in debug log
510: END IF;
511:
512: -- Initialize message list if p_init_msg_list is set to TRUE.
513: IF FND_API.to_Boolean( p_init_msg_list ) THEN
514: FND_MSG_PUB.initialize;
515: END IF;
516:
517: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
518: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.BEGIN',
562: COMMIT WORK;
563: END IF;
564:
565: -- Standard call to get message count and IF count is get message info.
566: FND_MSG_PUB.Count_And_Get
567: (p_count => x_msg_count,
568: p_data => x_msg_data );
569:
570: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
578: ROLLBACK TO Delete_Flwsts_Tran;
579:
580: x_return_status := FND_API.G_RET_STS_ERROR;
581:
582: FND_MSG_PUB.Count_And_Get
583: (p_count => x_msg_count,
584: p_data => x_msg_data );
585:
586: -- save message in debug log
593: ROLLBACK TO Delete_Flwsts_Tran;
594:
595: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
596:
597: IF FND_MSG_PUB.Check_Msg_Level
598: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
599: THEN
600: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
601: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
594:
595: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
596:
597: IF FND_MSG_PUB.Check_Msg_Level
598: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
599: THEN
600: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
601: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
602: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
598: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
599: THEN
600: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
601: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
602: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
603: end if;
604: FND_MSG_PUB.Add_Exc_Msg
605: (G_PKG_NAME ,
606: lc_api_name );
600: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
601: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
602: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
603: end if;
604: FND_MSG_PUB.Add_Exc_Msg
605: (G_PKG_NAME ,
606: lc_api_name );
607: END IF;
608:
605: (G_PKG_NAME ,
606: lc_api_name );
607: END IF;
608:
609: FND_MSG_PUB.Count_And_Get
610: ( p_count => x_msg_count,
611: p_data => x_msg_data );
612:
613: -- save message in debug log
621:
622: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
623:
624: -- save message in fnd stack
625: IF FND_MSG_PUB.Check_Msg_Level
626: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
627: THEN
628: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
629: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
622: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
623:
624: -- save message in fnd stack
625: IF FND_MSG_PUB.Check_Msg_Level
626: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
627: THEN
628: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
629: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
630: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
626: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
627: THEN
628: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
629: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
630: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
631: end if;
632: FND_MSG_PUB.Add_Exc_Msg
633: (G_PKG_NAME ,
634: lc_api_name );
628: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
629: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
630: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
631: end if;
632: FND_MSG_PUB.Add_Exc_Msg
633: (G_PKG_NAME ,
634: lc_api_name );
635: END IF;
636:
633: (G_PKG_NAME ,
634: lc_api_name );
635: END IF;
636:
637: FND_MSG_PUB.Count_And_Get
638: (p_count => x_msg_count,
639: p_data => x_msg_data );
640:
641: -- save message in debug log
690: END IF;
691:
692: -- Initialize message list if p_init_msg_list is set to TRUE.
693: IF FND_API.to_Boolean( p_init_msg_list ) THEN
694: FND_MSG_PUB.initialize;
695: END IF;
696:
697: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
698: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.BEGIN',
750: COMMIT WORK;
751: END IF;
752:
753: -- Standard call to get message count and IF count is get message info.
754: FND_MSG_PUB.Count_And_Get
755: (p_count => x_msg_count,
756: p_data => x_msg_data );
757:
758: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
765: WHEN FND_API.G_EXC_ERROR THEN
766: ROLLBACK TO Lock_Flwsts_Tran;
767: x_return_status := FND_API.G_RET_STS_ERROR;
768:
769: FND_MSG_PUB.Count_And_Get
770: (p_count => x_msg_count,
771: p_data => x_msg_data );
772:
773: -- save message in debug log
779: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
780: ROLLBACK TO Lock_Flwsts_Tran;
781: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
782:
783: IF FND_MSG_PUB.Check_Msg_Level
784: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
785: THEN
786: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
787: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
780: ROLLBACK TO Lock_Flwsts_Tran;
781: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
782:
783: IF FND_MSG_PUB.Check_Msg_Level
784: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
785: THEN
786: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
787: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
788: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
784: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
785: THEN
786: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
787: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
788: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
789: end if;
790: FND_MSG_PUB.Add_Exc_Msg
791: (G_PKG_NAME ,
792: lc_api_name );
786: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
787: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
788: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
789: end if;
790: FND_MSG_PUB.Add_Exc_Msg
791: (G_PKG_NAME ,
792: lc_api_name );
793: END IF;
794:
791: (G_PKG_NAME ,
792: lc_api_name );
793: END IF;
794:
795: FND_MSG_PUB.Count_And_Get
796: ( p_count => x_msg_count,
797: p_data => x_msg_data );
798:
799: -- save message in debug log
806: ROLLBACK TO Lock_Flwsts_Tran;
807: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
808:
809: -- save message in fnd stack
810: IF FND_MSG_PUB.Check_Msg_Level
811: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
812: THEN
813: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
814: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
807: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
808:
809: -- save message in fnd stack
810: IF FND_MSG_PUB.Check_Msg_Level
811: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
812: THEN
813: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
814: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
815: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
811: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
812: THEN
813: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
814: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
815: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
816: end if;
817: FND_MSG_PUB.Add_Exc_Msg
818: (G_PKG_NAME ,
819: lc_api_name );
813: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
814: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
815: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
816: end if;
817: FND_MSG_PUB.Add_Exc_Msg
818: (G_PKG_NAME ,
819: lc_api_name );
820: END IF;
821:
818: (G_PKG_NAME ,
819: lc_api_name );
820: END IF;
821:
822: FND_MSG_PUB.Count_And_Get
823: (p_count => x_msg_count,
824: p_data => x_msg_data );
825:
826: -- save message in debug log