DBA Data[Home] [Help]

APPS.IEX_CASE_INFO_PUB dependencies on FND_API

Line 83: x_return_status := FND_API.G_RET_STS_SUCCESS;

79:
80: BEGIN
81:
82: -- Initialize API return status to SUCCESS
83: x_return_status := FND_API.G_RET_STS_SUCCESS;
84:
85: l_api_version := 2.0;
86: l_total_amt := 0;
87: l_rcvble_amt := 0;

Line 127: WHEN FND_API.G_EXC_ERROR THEN

123: END IF;
124: end if;
125:
126: EXCEPTION
127: WHEN FND_API.G_EXC_ERROR THEN
128: x_return_status := FND_API.G_RET_STS_ERROR;
129: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
130: if PG_DEBUG < 10 then
131: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 128: x_return_status := FND_API.G_RET_STS_ERROR;

124: end if;
125:
126: EXCEPTION
127: WHEN FND_API.G_EXC_ERROR THEN
128: x_return_status := FND_API.G_RET_STS_ERROR;
129: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
130: if PG_DEBUG < 10 then
131: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
132: IEX_DEBUG_PUB.LogMessage('Exec Error ' || sqlerrm);

Line 136: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

132: IEX_DEBUG_PUB.LogMessage('Exec Error ' || sqlerrm);
133: END IF;
134: end if;
135:
136: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
137: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
138: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
139: if PG_DEBUG < 10 then
140: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 137: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

133: END IF;
134: end if;
135:
136: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
137: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
138: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
139: if PG_DEBUG < 10 then
140: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
141: IEX_DEBUG_PUB.LogMessage('Unexec Error ' || sqlerrm);

Line 146: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

142: END IF;
143: end if;
144:
145: WHEN OTHERS THEN
146: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
147: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
148: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
149: END IF;
150: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);

Line 204: x_return_status := FND_API.G_RET_STS_SUCCESS;

200:
201: BEGIN
202:
203: -- Initialize API return status to SUCCESS
204: x_return_status := FND_API.G_RET_STS_SUCCESS;
205:
206: l_total_amt := 0;
207: l_api_name := 'get_total_net_book_value';
208: l_api_version := 2.0;

Line 229: IF (x_return_status = fnd_api.G_RET_STS_UNEXP_ERROR) THEN

225: IEX_DEBUG_PUB.LogMessage('ContractID: ' || l_contract_id || ' Net Book: ' || l_nbook_amt);
226: END IF;
227: end if;
228:
229: IF (x_return_status = fnd_api.G_RET_STS_UNEXP_ERROR) THEN
230: RAISE fnd_api.G_EXC_UNEXPECTED_ERROR;
231: ELSIF (x_return_status = fnd_api.G_RET_STS_ERROR) THEN
232: RAISE fnd_api.G_EXC_ERROR;
233: END IF;

Line 230: RAISE fnd_api.G_EXC_UNEXPECTED_ERROR;

226: END IF;
227: end if;
228:
229: IF (x_return_status = fnd_api.G_RET_STS_UNEXP_ERROR) THEN
230: RAISE fnd_api.G_EXC_UNEXPECTED_ERROR;
231: ELSIF (x_return_status = fnd_api.G_RET_STS_ERROR) THEN
232: RAISE fnd_api.G_EXC_ERROR;
233: END IF;
234: l_total_amt := l_total_amt + l_nbook_amt;

Line 231: ELSIF (x_return_status = fnd_api.G_RET_STS_ERROR) THEN

227: end if;
228:
229: IF (x_return_status = fnd_api.G_RET_STS_UNEXP_ERROR) THEN
230: RAISE fnd_api.G_EXC_UNEXPECTED_ERROR;
231: ELSIF (x_return_status = fnd_api.G_RET_STS_ERROR) THEN
232: RAISE fnd_api.G_EXC_ERROR;
233: END IF;
234: l_total_amt := l_total_amt + l_nbook_amt;
235:

Line 232: RAISE fnd_api.G_EXC_ERROR;

228:
229: IF (x_return_status = fnd_api.G_RET_STS_UNEXP_ERROR) THEN
230: RAISE fnd_api.G_EXC_UNEXPECTED_ERROR;
231: ELSIF (x_return_status = fnd_api.G_RET_STS_ERROR) THEN
232: RAISE fnd_api.G_EXC_ERROR;
233: END IF;
234: l_total_amt := l_total_amt + l_nbook_amt;
235:
236: END LOOP;

Line 248: WHEN FND_API.G_EXC_ERROR THEN

244: END IF;
245: end if;
246:
247: EXCEPTION
248: WHEN FND_API.G_EXC_ERROR THEN
249: x_return_status := FND_API.G_RET_STS_ERROR;
250: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
251: if PG_DEBUG < 10 then
252: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 249: x_return_status := FND_API.G_RET_STS_ERROR;

245: end if;
246:
247: EXCEPTION
248: WHEN FND_API.G_EXC_ERROR THEN
249: x_return_status := FND_API.G_RET_STS_ERROR;
250: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
251: if PG_DEBUG < 10 then
252: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
253: IEX_DEBUG_PUB.LogMessage('Exec Error ' || sqlerrm);

Line 257: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

253: IEX_DEBUG_PUB.LogMessage('Exec Error ' || sqlerrm);
254: END IF;
255: end if;
256:
257: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
258: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
259: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
260: if PG_DEBUG < 10 then
261: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 258: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

254: END IF;
255: end if;
256:
257: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
258: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
259: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
260: if PG_DEBUG < 10 then
261: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
262: IEX_DEBUG_PUB.LogMessage('Unexec Error ' || sqlerrm);

Line 267: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

263: END IF;
264: end if;
265:
266: WHEN OTHERS THEN
267: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
268: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
269: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
270: END IF;
271: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);

Line 307: x_return_status := FND_API.G_RET_STS_SUCCESS;

303:
304: BEGIN
305:
306: -- Initialize API return status to SUCCESS
307: x_return_status := FND_API.G_RET_STS_SUCCESS;
308:
309: l_total_amt := 0;
310: l_oec_amt := 0;
311: l_api_version := 2.0;

Line 351: WHEN FND_API.G_EXC_ERROR THEN

347: END IF;
348: end if;
349:
350: EXCEPTION
351: WHEN FND_API.G_EXC_ERROR THEN
352: x_return_status := FND_API.G_RET_STS_ERROR;
353: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
354: if PG_DEBUG < 10 then
355: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 352: x_return_status := FND_API.G_RET_STS_ERROR;

348: end if;
349:
350: EXCEPTION
351: WHEN FND_API.G_EXC_ERROR THEN
352: x_return_status := FND_API.G_RET_STS_ERROR;
353: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
354: if PG_DEBUG < 10 then
355: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
356: IEX_DEBUG_PUB.LogMessage('Exec Error ' || sqlerrm);

Line 360: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

356: IEX_DEBUG_PUB.LogMessage('Exec Error ' || sqlerrm);
357: END IF;
358: end if;
359:
360: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
361: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
362: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
363: if PG_DEBUG < 10 then
364: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 361: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

357: END IF;
358: end if;
359:
360: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
361: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
362: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
363: if PG_DEBUG < 10 then
364: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
365: IEX_DEBUG_PUB.LogMessage('Unexec Error ' || sqlerrm);

Line 370: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

366: END IF;
367: end if;
368:
369: WHEN OTHERS THEN
370: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
371: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
372: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
373: END IF;
374: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);

Line 410: x_return_status := FND_API.G_RET_STS_SUCCESS;

406:
407: BEGIN
408:
409: -- Initialize API return status to SUCCESS
410: x_return_status := FND_API.G_RET_STS_SUCCESS;
411:
412: l_total_amt := 0;
413: l_tradein_amt := 0;
414: l_api_version := 2.0;

Line 456: WHEN FND_API.G_EXC_ERROR THEN

452: END IF;
453: end if;
454:
455: EXCEPTION
456: WHEN FND_API.G_EXC_ERROR THEN
457: x_return_status := FND_API.G_RET_STS_ERROR;
458: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
459: if PG_DEBUG < 10 then
460: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 457: x_return_status := FND_API.G_RET_STS_ERROR;

453: end if;
454:
455: EXCEPTION
456: WHEN FND_API.G_EXC_ERROR THEN
457: x_return_status := FND_API.G_RET_STS_ERROR;
458: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
459: if PG_DEBUG < 10 then
460: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
461: IEX_DEBUG_PUB.LogMessage('Exec Error ' || sqlerrm);

Line 465: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

461: IEX_DEBUG_PUB.LogMessage('Exec Error ' || sqlerrm);
462: END IF;
463: end if;
464:
465: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
466: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
467: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
468: if PG_DEBUG < 10 then
469: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 466: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

462: END IF;
463: end if;
464:
465: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
466: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
467: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
468: if PG_DEBUG < 10 then
469: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
470: IEX_DEBUG_PUB.LogMessage('Unexec Error ' || sqlerrm);

Line 475: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

471: END IF;
472: end if;
473:
474: WHEN OTHERS THEN
475: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
476: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
477: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
478: END IF;
479: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);

Line 515: x_return_status := FND_API.G_RET_STS_SUCCESS;

511:
512: BEGIN
513:
514: -- Initialize API return status to SUCCESS
515: x_return_status := FND_API.G_RET_STS_SUCCESS;
516:
517: l_total_amt := 0;
518: l_capred_amt := 0;
519: l_api_version := 2.0;

Line 557: WHEN FND_API.G_EXC_ERROR THEN

553: END IF;
554: end if;
555:
556: EXCEPTION
557: WHEN FND_API.G_EXC_ERROR THEN
558: x_return_status := FND_API.G_RET_STS_ERROR;
559: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
560: if PG_DEBUG < 10 then
561: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 558: x_return_status := FND_API.G_RET_STS_ERROR;

554: end if;
555:
556: EXCEPTION
557: WHEN FND_API.G_EXC_ERROR THEN
558: x_return_status := FND_API.G_RET_STS_ERROR;
559: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
560: if PG_DEBUG < 10 then
561: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
562: IEX_DEBUG_PUB.LogMessage('Exec Error ' || sqlerrm);

Line 566: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

562: IEX_DEBUG_PUB.LogMessage('Exec Error ' || sqlerrm);
563: END IF;
564: end if;
565:
566: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
567: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
568: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
569: if PG_DEBUG < 10 then
570: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 567: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

563: END IF;
564: end if;
565:
566: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
567: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
568: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
569: if PG_DEBUG < 10 then
570: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
571: IEX_DEBUG_PUB.LogMessage('Unexec Error ' || sqlerrm);

Line 576: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

572: END IF;
573: end if;
574:
575: WHEN OTHERS THEN
576: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
577: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
578: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
579: END IF;
580: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);

Line 615: x_return_status := FND_API.G_RET_STS_SUCCESS;

611:
612: BEGIN
613:
614: -- Initialize API return status to SUCCESS
615: x_return_status := FND_API.G_RET_STS_SUCCESS;
616:
617: l_total_amt := 0;
618: l_feecap_amt := 0;
619: l_api_version := 2.0;

Line 659: WHEN FND_API.G_EXC_ERROR THEN

655: END IF;
656: end if;
657:
658: EXCEPTION
659: WHEN FND_API.G_EXC_ERROR THEN
660: x_return_status := FND_API.G_RET_STS_ERROR;
661: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
662: if PG_DEBUG < 10 then
663: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 660: x_return_status := FND_API.G_RET_STS_ERROR;

656: end if;
657:
658: EXCEPTION
659: WHEN FND_API.G_EXC_ERROR THEN
660: x_return_status := FND_API.G_RET_STS_ERROR;
661: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
662: if PG_DEBUG < 10 then
663: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
664: IEX_DEBUG_PUB.LogMessage('Exec Error ' || sqlerrm);

Line 668: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

664: IEX_DEBUG_PUB.LogMessage('Exec Error ' || sqlerrm);
665: END IF;
666: end if;
667:
668: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
669: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
670: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
671: if PG_DEBUG < 10 then
672: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 669: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

665: END IF;
666: end if;
667:
668: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
669: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
670: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
671: if PG_DEBUG < 10 then
672: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
673: IEX_DEBUG_PUB.LogMessage('Unexec Error ' || sqlerrm);

Line 678: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

674: END IF;
675: end if;
676:
677: WHEN OTHERS THEN
678: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
679: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
680: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
681: END IF;
682: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);

Line 730: x_return_status := FND_API.G_RET_STS_SUCCESS;

726:
727: BEGIN
728:
729: -- Initialize API return status to SUCCESS
730: x_return_status := FND_API.G_RET_STS_SUCCESS;
731:
732: l_total_cap_amt := 0;
733: l_oec_amt := 0;
734: l_total_oec_amt := 0;

Line 761: WHEN FND_API.G_EXC_ERROR THEN

757: END IF;
758: end if;
759:
760: EXCEPTION
761: WHEN FND_API.G_EXC_ERROR THEN
762: x_return_status := FND_API.G_RET_STS_ERROR;
763: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
764: if PG_DEBUG < 10 then
765: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 762: x_return_status := FND_API.G_RET_STS_ERROR;

758: end if;
759:
760: EXCEPTION
761: WHEN FND_API.G_EXC_ERROR THEN
762: x_return_status := FND_API.G_RET_STS_ERROR;
763: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
764: if PG_DEBUG < 10 then
765: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
766: IEX_DEBUG_PUB.LogMessage('Exec Error ' || sqlerrm);

Line 770: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

766: IEX_DEBUG_PUB.LogMessage('Exec Error ' || sqlerrm);
767: END IF;
768: end if;
769:
770: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
771: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
772: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
773: if PG_DEBUG < 10 then
774: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 771: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

767: END IF;
768: end if;
769:
770: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
771: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
772: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);
773: if PG_DEBUG < 10 then
774: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
775: IEX_DEBUG_PUB.LogMessage('Unexec Error ' || sqlerrm);

Line 780: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

776: END IF;
777: end if;
778:
779: WHEN OTHERS THEN
780: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
781: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
782: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
783: END IF;
784: FND_MSG_PUB.Count_And_Get(p_count => l_msg_count, p_data => l_msg_data);