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',
125: COMMIT WORK;
126: END IF;
127:
128: -- Standard call to get message count and IF count is get message info.
129: FND_MSG_PUB.Count_And_Get
130: (p_count => x_msg_count,
131: p_data => x_msg_data );
132:
133: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
141: x_return_status := FND_API.G_RET_STS_ERROR;
142:
143: -- The definition already exists. No duplicates are allowed.
144: FND_MESSAGE.set_name('CSD', 'CSD_FLEX_DEFN_EXISTS');
145: FND_MSG_PUB.add;
146:
147: FND_MSG_PUB.Count_And_Get
148: (p_count => x_msg_count,
149: p_data => x_msg_data );
143: -- The definition already exists. No duplicates are allowed.
144: FND_MESSAGE.set_name('CSD', 'CSD_FLEX_DEFN_EXISTS');
145: FND_MSG_PUB.add;
146:
147: FND_MSG_PUB.Count_And_Get
148: (p_count => x_msg_count,
149: p_data => x_msg_data );
150:
151: -- save message in debug log
156: WHEN FND_API.G_EXC_ERROR THEN
157: ROLLBACK TO Create_Rt_Tran_Resp;
158: x_return_status := FND_API.G_RET_STS_ERROR;
159:
160: FND_MSG_PUB.Count_And_Get
161: (p_count => x_msg_count,
162: p_data => x_msg_data );
163:
164: -- save message in debug log
171: ROLLBACK TO Create_Rt_Tran_Resp;
172: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
173:
174: -- save message in fnd stack
175: IF FND_MSG_PUB.Check_Msg_Level
176: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
177: THEN
178: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
179: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
172: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
173:
174: -- save message in fnd stack
175: IF FND_MSG_PUB.Check_Msg_Level
176: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
177: THEN
178: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
179: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
180: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
176: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
177: THEN
178: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
179: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
180: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
181: end if;
182: FND_MSG_PUB.Add_Exc_Msg
183: (G_PKG_NAME ,
184: lc_api_name );
178: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
179: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
180: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
181: end if;
182: FND_MSG_PUB.Add_Exc_Msg
183: (G_PKG_NAME ,
184: lc_api_name );
185: END IF;
186:
183: (G_PKG_NAME ,
184: lc_api_name );
185: END IF;
186:
187: FND_MSG_PUB.Count_And_Get
188: ( p_count => x_msg_count,
189: p_data => x_msg_data );
190:
191: -- save message in debug log
198: ROLLBACK TO Create_Rt_Tran_Resp;
199: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
200:
201: -- save message in fnd stack
202: IF FND_MSG_PUB.Check_Msg_Level
203: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
204: THEN
205: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
206: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
199: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
200:
201: -- save message in fnd stack
202: IF FND_MSG_PUB.Check_Msg_Level
203: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
204: THEN
205: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
206: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
207: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
203: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
204: THEN
205: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
206: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
207: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
208: end if;
209: FND_MSG_PUB.Add_Exc_Msg
210: (G_PKG_NAME ,
211: lc_api_name );
205: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
206: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
207: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
208: end if;
209: FND_MSG_PUB.Add_Exc_Msg
210: (G_PKG_NAME ,
211: lc_api_name );
212: END IF;
213:
210: (G_PKG_NAME ,
211: lc_api_name );
212: END IF;
213:
214: FND_MSG_PUB.Count_And_Get
215: (p_count => x_msg_count,
216: p_data => x_msg_data );
217:
218: -- save message in debug log
277: END IF;
278:
279: -- Initialize message list if p_init_msg_list is set to TRUE.
280: IF FND_API.to_Boolean( p_init_msg_list ) THEN
281: FND_MSG_PUB.initialize;
282: END IF;
283:
284: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
285: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.BEGIN',
348: COMMIT WORK;
349: END IF;
350:
351: -- Standard call to get message count and IF count is get message info.
352: FND_MSG_PUB.Count_And_Get
353: (p_count => x_msg_count,
354: p_data => x_msg_data );
355:
356: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
364: x_return_status := FND_API.G_RET_STS_ERROR;
365:
366: -- The definition already exists. No duplicates are allowed.
367: FND_MESSAGE.set_name('CSD', 'CSD_FLEX_DEFN_EXISTS');
368: FND_MSG_PUB.add;
369:
370: FND_MSG_PUB.Count_And_Get
371: (p_count => x_msg_count,
372: p_data => x_msg_data );
366: -- The definition already exists. No duplicates are allowed.
367: FND_MESSAGE.set_name('CSD', 'CSD_FLEX_DEFN_EXISTS');
368: FND_MSG_PUB.add;
369:
370: FND_MSG_PUB.Count_And_Get
371: (p_count => x_msg_count,
372: p_data => x_msg_data );
373:
374: -- save message in debug log
379: WHEN FND_API.G_EXC_ERROR THEN
380: ROLLBACK TO Update_Rt_Tran_Resp;
381: x_return_status := FND_API.G_RET_STS_ERROR;
382:
383: FND_MSG_PUB.Count_And_Get
384: (p_count => x_msg_count,
385: p_data => x_msg_data );
386:
387: -- save message in debug log
393: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
394: ROLLBACK TO Update_Rt_Tran_Resp;
395: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
396:
397: IF FND_MSG_PUB.Check_Msg_Level
398: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
399: THEN
400: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
401: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
394: ROLLBACK TO Update_Rt_Tran_Resp;
395: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
396:
397: IF FND_MSG_PUB.Check_Msg_Level
398: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
399: THEN
400: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
401: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
402: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
398: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
399: THEN
400: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
401: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
402: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
403: end if;
404: FND_MSG_PUB.Add_Exc_Msg
405: (G_PKG_NAME ,
406: lc_api_name );
400: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
401: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
402: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
403: end if;
404: FND_MSG_PUB.Add_Exc_Msg
405: (G_PKG_NAME ,
406: lc_api_name );
407: END IF;
408:
405: (G_PKG_NAME ,
406: lc_api_name );
407: END IF;
408:
409: FND_MSG_PUB.Count_And_Get
410: ( p_count => x_msg_count,
411: p_data => x_msg_data );
412:
413: -- save message in debug log
420: ROLLBACK TO Update_Rt_Tran_Resp;
421: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
422:
423: -- save message in fnd stack
424: IF FND_MSG_PUB.Check_Msg_Level
425: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
426: THEN
427: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
428: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
421: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
422:
423: -- save message in fnd stack
424: IF FND_MSG_PUB.Check_Msg_Level
425: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
426: THEN
427: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
428: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
429: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
425: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
426: THEN
427: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
428: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
429: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
430: end if;
431: FND_MSG_PUB.Add_Exc_Msg
432: (G_PKG_NAME ,
433: lc_api_name );
427: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
428: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
429: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
430: end if;
431: FND_MSG_PUB.Add_Exc_Msg
432: (G_PKG_NAME ,
433: lc_api_name );
434: END IF;
435:
432: (G_PKG_NAME ,
433: lc_api_name );
434: END IF;
435:
436: FND_MSG_PUB.Count_And_Get
437: (p_count => x_msg_count,
438: p_data => x_msg_data );
439:
440: -- save message in debug log
488: END IF;
489:
490: -- Initialize message list if p_init_msg_list is set to TRUE.
491: IF FND_API.to_Boolean( p_init_msg_list ) THEN
492: FND_MSG_PUB.initialize;
493: END IF;
494:
495: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
496: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.BEGIN',
540: COMMIT WORK;
541: END IF;
542:
543: -- Standard call to get message count and IF count is get message info.
544: FND_MSG_PUB.Count_And_Get
545: (p_count => x_msg_count,
546: p_data => x_msg_data );
547:
548: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
556: ROLLBACK TO Delete_Rt_Tran_Resp;
557:
558: x_return_status := FND_API.G_RET_STS_ERROR;
559:
560: FND_MSG_PUB.Count_And_Get
561: (p_count => x_msg_count,
562: p_data => x_msg_data );
563:
564: -- save message in debug log
571: ROLLBACK TO Delete_Rt_Tran_Resp;
572:
573: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
574:
575: IF FND_MSG_PUB.Check_Msg_Level
576: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
577: THEN
578: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
579: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
572:
573: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
574:
575: IF FND_MSG_PUB.Check_Msg_Level
576: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
577: THEN
578: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
579: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
580: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
576: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
577: THEN
578: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
579: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
580: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
581: end if;
582: FND_MSG_PUB.Add_Exc_Msg
583: (G_PKG_NAME ,
584: lc_api_name );
578: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
579: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
580: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
581: end if;
582: FND_MSG_PUB.Add_Exc_Msg
583: (G_PKG_NAME ,
584: lc_api_name );
585: END IF;
586:
583: (G_PKG_NAME ,
584: lc_api_name );
585: END IF;
586:
587: FND_MSG_PUB.Count_And_Get
588: ( p_count => x_msg_count,
589: p_data => x_msg_data );
590:
591: -- save message in debug log
599:
600: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
601:
602: -- save message in fnd stack
603: IF FND_MSG_PUB.Check_Msg_Level
604: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
605: THEN
606: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
607: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
600: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
601:
602: -- save message in fnd stack
603: IF FND_MSG_PUB.Check_Msg_Level
604: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
605: THEN
606: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
607: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
608: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
604: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
605: THEN
606: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
607: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
608: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
609: end if;
610: FND_MSG_PUB.Add_Exc_Msg
611: (G_PKG_NAME ,
612: lc_api_name );
606: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
607: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
608: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
609: end if;
610: FND_MSG_PUB.Add_Exc_Msg
611: (G_PKG_NAME ,
612: lc_api_name );
613: END IF;
614:
611: (G_PKG_NAME ,
612: lc_api_name );
613: END IF;
614:
615: FND_MSG_PUB.Count_And_Get
616: (p_count => x_msg_count,
617: p_data => x_msg_data );
618:
619: -- save message in debug log
668: END IF;
669:
670: -- Initialize message list if p_init_msg_list is set to TRUE.
671: IF FND_API.to_Boolean( p_init_msg_list ) THEN
672: FND_MSG_PUB.initialize;
673: END IF;
674:
675: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
676: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.BEGIN',
728: COMMIT WORK;
729: END IF;
730:
731: -- Standard call to get message count and IF count is get message info.
732: FND_MSG_PUB.Count_And_Get
733: (p_count => x_msg_count,
734: p_data => x_msg_data );
735:
736: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
743: WHEN FND_API.G_EXC_ERROR THEN
744: ROLLBACK TO Lock_Rt_Tran_Resp;
745: x_return_status := FND_API.G_RET_STS_ERROR;
746:
747: FND_MSG_PUB.Count_And_Get
748: (p_count => x_msg_count,
749: p_data => x_msg_data );
750:
751: -- save message in debug log
757: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
758: ROLLBACK TO Lock_Rt_Tran_Resp;
759: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
760:
761: IF FND_MSG_PUB.Check_Msg_Level
762: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
763: THEN
764: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
765: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
758: ROLLBACK TO Lock_Rt_Tran_Resp;
759: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
760:
761: IF FND_MSG_PUB.Check_Msg_Level
762: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
763: THEN
764: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
765: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
766: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
762: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
763: THEN
764: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
765: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
766: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
767: end if;
768: FND_MSG_PUB.Add_Exc_Msg
769: (G_PKG_NAME ,
770: lc_api_name );
764: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
765: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
766: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
767: end if;
768: FND_MSG_PUB.Add_Exc_Msg
769: (G_PKG_NAME ,
770: lc_api_name );
771: END IF;
772:
769: (G_PKG_NAME ,
770: lc_api_name );
771: END IF;
772:
773: FND_MSG_PUB.Count_And_Get
774: ( p_count => x_msg_count,
775: p_data => x_msg_data );
776:
777: -- save message in debug log
784: ROLLBACK TO Lock_Rt_Tran_Resp;
785: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
786:
787: -- save message in fnd stack
788: IF FND_MSG_PUB.Check_Msg_Level
789: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
790: THEN
791: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
792: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
785: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
786:
787: -- save message in fnd stack
788: IF FND_MSG_PUB.Check_Msg_Level
789: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
790: THEN
791: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
792: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
793: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
789: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
790: THEN
791: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
792: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
793: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
794: end if;
795: FND_MSG_PUB.Add_Exc_Msg
796: (G_PKG_NAME ,
797: lc_api_name );
791: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
792: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
793: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
794: end if;
795: FND_MSG_PUB.Add_Exc_Msg
796: (G_PKG_NAME ,
797: lc_api_name );
798: END IF;
799:
796: (G_PKG_NAME ,
797: lc_api_name );
798: END IF;
799:
800: FND_MSG_PUB.Count_And_Get
801: (p_count => x_msg_count,
802: p_data => x_msg_data );
803:
804: -- save message in debug log