eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.PSB_ALLOCRULE_PERCENTS_PVT dependencies on FND_API

Line 11: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

7: /* ----------------------------------------------------------------------- */
8:
9: PROCEDURE Insert_Row
10: ( p_api_version IN NUMBER,
11: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
12: p_commit IN VARCHAR2 := FND_API.G_FALSE,
13: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
14: p_return_status OUT NOCOPY VARCHAR2,
15: p_msg_count OUT NOCOPY NUMBER,

Line 12: p_commit IN VARCHAR2 := FND_API.G_FALSE,

8:
9: PROCEDURE Insert_Row
10: ( p_api_version IN NUMBER,
11: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
12: p_commit IN VARCHAR2 := FND_API.G_FALSE,
13: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
14: p_return_status OUT NOCOPY VARCHAR2,
15: p_msg_count OUT NOCOPY NUMBER,
16: p_msg_data OUT NOCOPY VARCHAR2,

Line 13: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

9: PROCEDURE Insert_Row
10: ( p_api_version IN NUMBER,
11: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
12: p_commit IN VARCHAR2 := FND_API.G_FALSE,
13: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
14: p_return_status OUT NOCOPY VARCHAR2,
15: p_msg_count OUT NOCOPY NUMBER,
16: p_msg_data OUT NOCOPY VARCHAR2,
17: P_ALLOCATION_RULE_PERCENT_ID IN OUT NOCOPY NUMBER,

Line 51: if not FND_API.Compatible_API_Call (l_api_version,

47: SAVEPOINT Insert_Row_Pvt;
48:
49: -- Standard call to check for call compatibility.
50:
51: if not FND_API.Compatible_API_Call (l_api_version,
52: p_api_version,
53: l_api_name,
54: G_PKG_NAME)
55: then

Line 56: raise FND_API.G_EXC_UNEXPECTED_ERROR;

52: p_api_version,
53: l_api_name,
54: G_PKG_NAME)
55: then
56: raise FND_API.G_EXC_UNEXPECTED_ERROR;
57: end if;
58:
59: -- Initialize message list if p_init_msg_list is set to TRUE.
60:

Line 61: if FND_API.to_Boolean (p_init_msg_list) then

57: end if;
58:
59: -- Initialize message list if p_init_msg_list is set to TRUE.
60:
61: if FND_API.to_Boolean (p_init_msg_list) then
62: FND_MSG_PUB.initialize;
63: end if;
64:
65: -- Initialize API return status to success

Line 67: p_return_status := FND_API.G_RET_STS_SUCCESS;

63: end if;
64:
65: -- Initialize API return status to success
66:
67: p_return_status := FND_API.G_RET_STS_SUCCESS;
68:
69: -- API body
70: OPEN C;
71:

Line 198: if FND_API.to_Boolean (p_commit) then

194: -- End of API body.
195:
196: -- Standard check of p_commit.
197:
198: if FND_API.to_Boolean (p_commit) then
199: commit work;
200: end if;
201:
202: -- Standard call to get message count and if count is 1, get message info.

Line 209: when FND_API.G_EXC_ERROR then

205: p_data => p_msg_data);
206:
207: EXCEPTION
208:
209: when FND_API.G_EXC_ERROR then
210:
211: rollback to Insert_Row_Pvt;
212:
213: p_return_status := FND_API.G_RET_STS_ERROR;

Line 213: p_return_status := FND_API.G_RET_STS_ERROR;

209: when FND_API.G_EXC_ERROR then
210:
211: rollback to Insert_Row_Pvt;
212:
213: p_return_status := FND_API.G_RET_STS_ERROR;
214:
215: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
216: p_data => p_msg_data);
217:

Line 219: when FND_API.G_EXC_UNEXPECTED_ERROR then

215: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
216: p_data => p_msg_data);
217:
218:
219: when FND_API.G_EXC_UNEXPECTED_ERROR then
220:
221: rollback to Insert_Row_Pvt;
222:
223: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 223: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

219: when FND_API.G_EXC_UNEXPECTED_ERROR then
220:
221: rollback to Insert_Row_Pvt;
222:
223: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
224:
225: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
226: p_data => p_msg_data);
227:

Line 233: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

229: when OTHERS then
230:
231: rollback to Insert_Row_Pvt;
232:
233: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
234:
235: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then
236:
237: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,

Line 248: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

244: END Insert_Row;
245:
246: PROCEDURE Update_Row
247: ( p_api_version IN NUMBER,
248: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
249: p_commit IN VARCHAR2 := FND_API.G_FALSE,
250: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
251: p_return_status OUT NOCOPY VARCHAR2,
252: p_msg_count OUT NOCOPY NUMBER,

Line 249: p_commit IN VARCHAR2 := FND_API.G_FALSE,

245:
246: PROCEDURE Update_Row
247: ( p_api_version IN NUMBER,
248: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
249: p_commit IN VARCHAR2 := FND_API.G_FALSE,
250: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
251: p_return_status OUT NOCOPY VARCHAR2,
252: p_msg_count OUT NOCOPY NUMBER,
253: p_msg_data OUT NOCOPY VARCHAR2,

Line 250: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

246: PROCEDURE Update_Row
247: ( p_api_version IN NUMBER,
248: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
249: p_commit IN VARCHAR2 := FND_API.G_FALSE,
250: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
251: p_return_status OUT NOCOPY VARCHAR2,
252: p_msg_count OUT NOCOPY NUMBER,
253: p_msg_data OUT NOCOPY VARCHAR2,
254: P_ALLOCATION_RULE_ID IN NUMBER,

Line 281: if not FND_API.Compatible_API_Call (l_api_version,

277: SAVEPOINT Update_Row_Pvt;
278:
279: -- Standard call to check for call compatibility.
280:
281: if not FND_API.Compatible_API_Call (l_api_version,
282: p_api_version,
283: l_api_name,
284: G_PKG_NAME)
285: then

Line 286: raise FND_API.G_EXC_UNEXPECTED_ERROR;

282: p_api_version,
283: l_api_name,
284: G_PKG_NAME)
285: then
286: raise FND_API.G_EXC_UNEXPECTED_ERROR;
287: end if;
288:
289: -- Initialize message list if p_init_msg_list is set to TRUE.
290:

Line 291: if FND_API.to_Boolean (p_init_msg_list) then

287: end if;
288:
289: -- Initialize message list if p_init_msg_list is set to TRUE.
290:
291: if FND_API.to_Boolean (p_init_msg_list) then
292: FND_MSG_PUB.initialize;
293: end if;
294:
295: -- Initialize API return status to success

Line 297: p_return_status := FND_API.G_RET_STS_SUCCESS;

293: end if;
294:
295: -- Initialize API return status to success
296:
297: p_return_status := FND_API.G_RET_STS_SUCCESS;
298:
299: -- API body
300:
301: UPDATE PSB_ALLOCRULE_PERCENTS

Line 364: if FND_API.to_Boolean (p_commit) then

360: END IF;
361:
362: -- Standard check of p_commit.
363:
364: if FND_API.to_Boolean (p_commit) then
365: commit work;
366: end if;
367:
368: -- Standard call to get message count and if count is 1, get message info.

Line 375: when FND_API.G_EXC_ERROR then

371: p_data => p_msg_data);
372:
373: EXCEPTION
374:
375: when FND_API.G_EXC_ERROR then
376:
377: rollback to Update_Row_Pvt;
378:
379: p_return_status := FND_API.G_RET_STS_ERROR;

Line 379: p_return_status := FND_API.G_RET_STS_ERROR;

375: when FND_API.G_EXC_ERROR then
376:
377: rollback to Update_Row_Pvt;
378:
379: p_return_status := FND_API.G_RET_STS_ERROR;
380:
381: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
382: p_data => p_msg_data);
383:

Line 385: when FND_API.G_EXC_UNEXPECTED_ERROR then

381: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
382: p_data => p_msg_data);
383:
384:
385: when FND_API.G_EXC_UNEXPECTED_ERROR then
386:
387: rollback to Update_Row_Pvt;
388:
389: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 389: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

385: when FND_API.G_EXC_UNEXPECTED_ERROR then
386:
387: rollback to Update_Row_Pvt;
388:
389: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
390:
391: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
392: p_data => p_msg_data);
393:

Line 399: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

395: when OTHERS then
396:
397: rollback to Update_Row_Pvt;
398:
399: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
400:
401: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then
402:
403: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,

Line 414: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

410: END Update_Row;
411:
412: PROCEDURE Delete_Row
413: ( p_api_version IN NUMBER,
414: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
415: p_commit IN VARCHAR2 := FND_API.G_FALSE,
416: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
417: p_return_status OUT NOCOPY VARCHAR2,
418: p_msg_count OUT NOCOPY NUMBER,

Line 415: p_commit IN VARCHAR2 := FND_API.G_FALSE,

411:
412: PROCEDURE Delete_Row
413: ( p_api_version IN NUMBER,
414: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
415: p_commit IN VARCHAR2 := FND_API.G_FALSE,
416: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
417: p_return_status OUT NOCOPY VARCHAR2,
418: p_msg_count OUT NOCOPY NUMBER,
419: p_msg_data OUT NOCOPY VARCHAR2,

Line 416: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

412: PROCEDURE Delete_Row
413: ( p_api_version IN NUMBER,
414: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
415: p_commit IN VARCHAR2 := FND_API.G_FALSE,
416: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
417: p_return_status OUT NOCOPY VARCHAR2,
418: p_msg_count OUT NOCOPY NUMBER,
419: p_msg_data OUT NOCOPY VARCHAR2,
420: P_ALLOCATION_RULE_ID IN NUMBER,

Line 437: if not FND_API.Compatible_API_Call (l_api_version,

433: SAVEPOINT Delete_Row_Pvt;
434:
435: -- Standard call to check for call compatibility.
436:
437: if not FND_API.Compatible_API_Call (l_api_version,
438: p_api_version,
439: l_api_name,
440: G_PKG_NAME)
441: then

Line 442: raise FND_API.G_EXC_UNEXPECTED_ERROR;

438: p_api_version,
439: l_api_name,
440: G_PKG_NAME)
441: then
442: raise FND_API.G_EXC_UNEXPECTED_ERROR;
443: end if;
444:
445: -- Initialize message list if p_init_msg_list is set to TRUE.
446:

Line 447: if FND_API.to_Boolean (p_init_msg_list) then

443: end if;
444:
445: -- Initialize message list if p_init_msg_list is set to TRUE.
446:
447: if FND_API.to_Boolean (p_init_msg_list) then
448: FND_MSG_PUB.initialize;
449: end if;
450:
451: -- Initialize API return status to success

Line 453: p_return_status := FND_API.G_RET_STS_SUCCESS;

449: end if;
450:
451: -- Initialize API return status to success
452:
453: p_return_status := FND_API.G_RET_STS_SUCCESS;
454:
455: -- API body
456:
457: DELETE FROM PSB_ALLOCRULE_PERCENTS

Line 469: if FND_API.to_Boolean (p_commit) then

465: -- End of API body.
466:
467: -- Standard check of p_commit.
468:
469: if FND_API.to_Boolean (p_commit) then
470: commit work;
471: end if;
472:
473: -- Standard call to get message count and if count is 1, get message info.

Line 480: when FND_API.G_EXC_ERROR then

476: p_data => p_msg_data);
477:
478: EXCEPTION
479:
480: when FND_API.G_EXC_ERROR then
481:
482: rollback to Delete_Row_Pvt;
483:
484: p_return_status := FND_API.G_RET_STS_ERROR;

Line 484: p_return_status := FND_API.G_RET_STS_ERROR;

480: when FND_API.G_EXC_ERROR then
481:
482: rollback to Delete_Row_Pvt;
483:
484: p_return_status := FND_API.G_RET_STS_ERROR;
485:
486: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
487: p_data => p_msg_data);
488:

Line 490: when FND_API.G_EXC_UNEXPECTED_ERROR then

486: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
487: p_data => p_msg_data);
488:
489:
490: when FND_API.G_EXC_UNEXPECTED_ERROR then
491:
492: rollback to Delete_Row_Pvt;
493:
494: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 494: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

490: when FND_API.G_EXC_UNEXPECTED_ERROR then
491:
492: rollback to Delete_Row_Pvt;
493:
494: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
495:
496: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
497: p_data => p_msg_data);
498:

Line 504: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

500: when OTHERS then
501:
502: rollback to Delete_Row_Pvt;
503:
504: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
505:
506: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then
507:
508: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,

Line 519: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

515: END Delete_Row;
516:
517: PROCEDURE Lock_Row
518: ( p_api_version IN NUMBER,
519: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
520: p_commit IN VARCHAR2 := FND_API.G_FALSE,
521: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
522: p_return_status OUT NOCOPY VARCHAR2,
523: p_msg_count OUT NOCOPY NUMBER,

Line 520: p_commit IN VARCHAR2 := FND_API.G_FALSE,

516:
517: PROCEDURE Lock_Row
518: ( p_api_version IN NUMBER,
519: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
520: p_commit IN VARCHAR2 := FND_API.G_FALSE,
521: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
522: p_return_status OUT NOCOPY VARCHAR2,
523: p_msg_count OUT NOCOPY NUMBER,
524: p_msg_data OUT NOCOPY VARCHAR2,

Line 521: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

517: PROCEDURE Lock_Row
518: ( p_api_version IN NUMBER,
519: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
520: p_commit IN VARCHAR2 := FND_API.G_FALSE,
521: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
522: p_return_status OUT NOCOPY VARCHAR2,
523: p_msg_count OUT NOCOPY NUMBER,
524: p_msg_data OUT NOCOPY VARCHAR2,
525: p_lock_row OUT NOCOPY VARCHAR2,

Line 560: if not FND_API.Compatible_API_Call (l_api_version,

556: SAVEPOINT Lock_Row_Pvt;
557:
558: -- Standard call to check for call compatibility.
559:
560: if not FND_API.Compatible_API_Call (l_api_version,
561: p_api_version,
562: l_api_name,
563: G_PKG_NAME)
564: then

Line 565: raise FND_API.G_EXC_UNEXPECTED_ERROR;

561: p_api_version,
562: l_api_name,
563: G_PKG_NAME)
564: then
565: raise FND_API.G_EXC_UNEXPECTED_ERROR;
566: end if;
567:
568: -- Initialize message list if p_init_msg_list is set to TRUE.
569:

Line 570: if FND_API.to_Boolean (p_init_msg_list) then

566: end if;
567:
568: -- Initialize message list if p_init_msg_list is set to TRUE.
569:
570: if FND_API.to_Boolean (p_init_msg_list) then
571: FND_MSG_PUB.initialize;
572: end if;
573:
574: -- Initialize API return status to success

Line 576: p_return_status := FND_API.G_RET_STS_SUCCESS;

572: end if;
573:
574: -- Initialize API return status to success
575:
576: p_return_status := FND_API.G_RET_STS_SUCCESS;
577:
578: -- API body
579:
580: OPEN C;

Line 589: RAISE FND_API.G_EXC_ERROR;

585: IF (C%NOTFOUND) THEN
586: CLOSE C;
587: FND_MESSAGE.Set_Name('FND','FORM_RECORD_DELETED');
588: FND_MSG_PUB.Add;
589: RAISE FND_API.G_EXC_ERROR;
590: END IF;
591:
592: IF ((Recinfo.allocation_rule_id = P_ALLOCATION_RULE_ID) AND
593: ( (Recinfo.period_num = P_PERIOD_NUM) OR

Line 603: RAISE FND_API.G_EXC_ERROR;

599: l_lock_row1 := 1;
600: ELSE
601: FND_MESSAGE.Set_Name('FND','FORM_RECORD_CHANGED');
602: FND_MSG_PUB.Add;
603: RAISE FND_API.G_EXC_ERROR;
604: END IF;
605:
606: FETCH C INTO Recinfo;
607:

Line 612: RAISE FND_API.G_EXC_ERROR;

608: IF (C%NOTFOUND) THEN
609: CLOSE C;
610: FND_MESSAGE.Set_Name('FND','FORM_RECORD_DELETED');
611: FND_MSG_PUB.Add;
612: RAISE FND_API.G_EXC_ERROR;
613: END IF;
614:
615: IF ((Recinfo.allocation_rule_id = P_ALLOCATION_RULE_ID) AND
616: ( (Recinfo.period_num = P_PERIOD_NUM) OR

Line 626: RAISE FND_API.G_EXC_ERROR;

622: l_lock_row2 := 1;
623: ELSE
624: FND_MESSAGE.Set_Name('FND','FORM_RECORD_CHANGED');
625: FND_MSG_PUB.Add;
626: RAISE FND_API.G_EXC_ERROR;
627: END IF;
628:
629: FETCH C INTO Recinfo;
630:

Line 635: RAISE FND_API.G_EXC_ERROR;

631: IF (C%NOTFOUND) THEN
632: CLOSE C;
633: FND_MESSAGE.Set_Name('FND','FORM_RECORD_DELETED');
634: FND_MSG_PUB.Add;
635: RAISE FND_API.G_EXC_ERROR;
636: END IF;
637:
638: IF ((Recinfo.allocation_rule_id = P_ALLOCATION_RULE_ID) AND
639: ( (Recinfo.period_num = P_PERIOD_NUM) OR

Line 649: RAISE FND_API.G_EXC_ERROR;

645: l_lock_row3 := 1;
646: ELSE
647: FND_MESSAGE.Set_Name('FND','FORM_RECORD_CHANGED');
648: FND_MSG_PUB.Add;
649: RAISE FND_API.G_EXC_ERROR;
650: END IF;
651:
652:
653: CLOSE C;

Line 655: p_lock_row := FND_API.G_TRUE;

651:
652:
653: CLOSE C;
654: if ((l_lock_row1 = 1) AND (l_lock_row2 = 1) AND (l_lock_row3 = 1))then
655: p_lock_row := FND_API.G_TRUE;
656: end if;
657: -- Standard check of p_commit.
658:
659: if FND_API.to_Boolean (p_commit) then

Line 659: if FND_API.to_Boolean (p_commit) then

655: p_lock_row := FND_API.G_TRUE;
656: end if;
657: -- Standard check of p_commit.
658:
659: if FND_API.to_Boolean (p_commit) then
660: commit work;
661: end if;
662:
663: -- Standard call to get message count and if count is 1, get message info.

Line 670: when FND_API.G_EXC_ERROR then

666: p_data => p_msg_data);
667:
668: EXCEPTION
669:
670: when FND_API.G_EXC_ERROR then
671:
672: rollback to Lock_Row_Pvt;
673:
674: p_return_status := FND_API.G_RET_STS_ERROR;

Line 674: p_return_status := FND_API.G_RET_STS_ERROR;

670: when FND_API.G_EXC_ERROR then
671:
672: rollback to Lock_Row_Pvt;
673:
674: p_return_status := FND_API.G_RET_STS_ERROR;
675:
676: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
677: p_data => p_msg_data);
678:

Line 680: when FND_API.G_EXC_UNEXPECTED_ERROR then

676: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
677: p_data => p_msg_data);
678:
679:
680: when FND_API.G_EXC_UNEXPECTED_ERROR then
681:
682: rollback to Lock_Row_Pvt;
683:
684: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 684: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

680: when FND_API.G_EXC_UNEXPECTED_ERROR then
681:
682: rollback to Lock_Row_Pvt;
683:
684: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
685:
686: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
687: p_data => p_msg_data);
688:

Line 694: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

690: when OTHERS then
691:
692: rollback to Lock_Row_Pvt;
693:
694: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
695:
696: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then
697:
698: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME,