DBA Data[Home] [Help]

APPS.IGC_CC_APPROVAL_WF_PKG dependencies on FND_LOG

Line 53: g_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

49: g_use_approval_hier VARCHAR2(1);
50: -- CBC CC Bug 2111529 07-Feb-2001 S Brewer End(1)
51:
52: -- Bug 3199488
53: g_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
54: g_state_level NUMBER := FND_LOG.LEVEL_STATEMENT;
55: g_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
56: g_event_level NUMBER := FND_LOG.LEVEL_EVENT;
57: g_excep_level NUMBER := FND_LOG.LEVEL_EXCEPTION;

Line 54: g_state_level NUMBER := FND_LOG.LEVEL_STATEMENT;

50: -- CBC CC Bug 2111529 07-Feb-2001 S Brewer End(1)
51:
52: -- Bug 3199488
53: g_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
54: g_state_level NUMBER := FND_LOG.LEVEL_STATEMENT;
55: g_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
56: g_event_level NUMBER := FND_LOG.LEVEL_EVENT;
57: g_excep_level NUMBER := FND_LOG.LEVEL_EXCEPTION;
58: g_error_level NUMBER := FND_LOG.LEVEL_ERROR;

Line 55: g_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;

51:
52: -- Bug 3199488
53: g_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
54: g_state_level NUMBER := FND_LOG.LEVEL_STATEMENT;
55: g_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
56: g_event_level NUMBER := FND_LOG.LEVEL_EVENT;
57: g_excep_level NUMBER := FND_LOG.LEVEL_EXCEPTION;
58: g_error_level NUMBER := FND_LOG.LEVEL_ERROR;
59: g_unexp_level NUMBER := FND_LOG.LEVEL_UNEXPECTED;

Line 56: g_event_level NUMBER := FND_LOG.LEVEL_EVENT;

52: -- Bug 3199488
53: g_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
54: g_state_level NUMBER := FND_LOG.LEVEL_STATEMENT;
55: g_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
56: g_event_level NUMBER := FND_LOG.LEVEL_EVENT;
57: g_excep_level NUMBER := FND_LOG.LEVEL_EXCEPTION;
58: g_error_level NUMBER := FND_LOG.LEVEL_ERROR;
59: g_unexp_level NUMBER := FND_LOG.LEVEL_UNEXPECTED;
60: g_path VARCHAR2(255) := 'IGC.PLSQL.IGCVAWFB.IGC_CC_APPROVAL_WF_PKG.';

Line 57: g_excep_level NUMBER := FND_LOG.LEVEL_EXCEPTION;

53: g_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
54: g_state_level NUMBER := FND_LOG.LEVEL_STATEMENT;
55: g_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
56: g_event_level NUMBER := FND_LOG.LEVEL_EVENT;
57: g_excep_level NUMBER := FND_LOG.LEVEL_EXCEPTION;
58: g_error_level NUMBER := FND_LOG.LEVEL_ERROR;
59: g_unexp_level NUMBER := FND_LOG.LEVEL_UNEXPECTED;
60: g_path VARCHAR2(255) := 'IGC.PLSQL.IGCVAWFB.IGC_CC_APPROVAL_WF_PKG.';
61: l_full_path VARCHAR2(255);

Line 58: g_error_level NUMBER := FND_LOG.LEVEL_ERROR;

54: g_state_level NUMBER := FND_LOG.LEVEL_STATEMENT;
55: g_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
56: g_event_level NUMBER := FND_LOG.LEVEL_EVENT;
57: g_excep_level NUMBER := FND_LOG.LEVEL_EXCEPTION;
58: g_error_level NUMBER := FND_LOG.LEVEL_ERROR;
59: g_unexp_level NUMBER := FND_LOG.LEVEL_UNEXPECTED;
60: g_path VARCHAR2(255) := 'IGC.PLSQL.IGCVAWFB.IGC_CC_APPROVAL_WF_PKG.';
61: l_full_path VARCHAR2(255);
62:

Line 59: g_unexp_level NUMBER := FND_LOG.LEVEL_UNEXPECTED;

55: g_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
56: g_event_level NUMBER := FND_LOG.LEVEL_EVENT;
57: g_excep_level NUMBER := FND_LOG.LEVEL_EXCEPTION;
58: g_error_level NUMBER := FND_LOG.LEVEL_ERROR;
59: g_unexp_level NUMBER := FND_LOG.LEVEL_UNEXPECTED;
60: g_path VARCHAR2(255) := 'IGC.PLSQL.IGCVAWFB.IGC_CC_APPROVAL_WF_PKG.';
61: l_full_path VARCHAR2(255);
62:
63: -- Bug 3199488

Line 211: FND_LOG.STRING (g_event_level,l_full_path,l_api_name||' successfully completed, WF version '|| g_wf_version||' new approver name '||g_approver_name);

207: THEN
208: --Put_Debug_Msg( l_full_path,l_api_name||' successfully completed, WF version '||g_wf_version||' new approver name '||g_approver_name);
209: -- Bug 3199488
210: IF ( g_event_level >= g_debug_level ) THEN
211: FND_LOG.STRING (g_event_level,l_full_path,l_api_name||' successfully completed, WF version '|| g_wf_version||' new approver name '||g_approver_name);
212: END IF;
213: -- Bug 3199488
214: END IF;
215:

Line 245: FND_LOG.STRING (g_event_level,l_full_path,l_api_name||' successfully completed, WF version '|| g_wf_version||' new approver name '||g_approver_name);

241: THEN
242: --Put_Debug_Msg( l_full_path,l_api_name||' successfully completed, WF version '||g_wf_version||' new approver name '||g_approver_name);
243: -- Bug 3199488
244: IF ( g_event_level >= g_debug_level ) THEN
245: FND_LOG.STRING (g_event_level,l_full_path,l_api_name||' successfully completed, WF version '|| g_wf_version||' new approver name '||g_approver_name);
246: END IF;
247: -- Bug 3199488
248: END IF;
249:

Line 273: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

269: resultout := 'COMPLETE:E';
270: Generate_Message();
271: --Bug 3199488
272: IF ( g_excep_level >= g_debug_level ) THEN
273: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
274: END IF;
275: --Bug 3199488
276: return;
277:

Line 292: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);

288: IF ( g_unexp_level >= g_debug_level ) THEN
289: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
290: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
291: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
292: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
293: END IF;
294: -- Bug 3199488
295: RAISE ;
296:

Line 355: FND_LOG.STRING (g_event_level,l_full_path,l_api_name||' successfully completed, WF version '||g_wf_version||' result Y');

351: THEN
352: --Put_Debug_Msg( l_full_path,l_api_name||' successfully completed, WF version '||g_wf_version||' result Y');
353: -- Bug 3199488
354: IF ( g_event_level >= g_debug_level ) THEN
355: FND_LOG.STRING (g_event_level,l_full_path,l_api_name||' successfully completed, WF version '||g_wf_version||' result Y');
356: END IF;
357: -- Bug 3199488
358: END IF;
359:

Line 376: FND_LOG.STRING (g_event_level,l_full_path,l_api_name||' successfully completed, WF version '||g_wf_version||' result '||l_result);

372: THEN
373: Put_Debug_Msg( l_full_path,l_api_name||' successfully completed, WF version '||g_wf_version||' result '||l_result);
374: -- Bug 3199488
375: IF ( g_event_level >= g_debug_level ) THEN
376: FND_LOG.STRING (g_event_level,l_full_path,l_api_name||' successfully completed, WF version '||g_wf_version||' result '||l_result);
377: END IF;
378: -- Bug 3199488
379: END IF;
380:

Line 405: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

401: resultout := 'COMPLETE:E';
402: Generate_Message();
403: --Bug 3199488
404: IF ( g_excep_level >= g_debug_level ) THEN
405: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
406: END IF;
407: --Bug 3199488
408: return;
409:

Line 420: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);

416: IF ( g_unexp_level >= g_debug_level ) THEN
417: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
418: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
419: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
420: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
421: END IF;
422: -- Bug 3199488
423: RAISE ;
424:

Line 470: FND_LOG.STRING (g_event_level,l_full_path,l_api_name || ' successfully completed, Return result: N');

466: THEN
467: --Put_Debug_Msg( l_full_path,l_api_name||' successfully completed, Return result: N');
468: -- Bug 3199488
469: IF ( g_event_level >= g_debug_level ) THEN
470: FND_LOG.STRING (g_event_level,l_full_path,l_api_name || ' successfully completed, Return result: N');
471: END IF;
472: -- Bug 3199488
473: END IF;
474:

Line 483: FND_LOG.STRING (g_event_level,l_full_path,l_api_name || ' successfully completed, Return result: Y');

479: THEN
480: --Put_Debug_Msg( l_full_path,l_api_name||' successfully completed, Return result: Y');
481: -- Bug 3199488
482: IF ( g_event_level >= g_debug_level ) THEN
483: FND_LOG.STRING (g_event_level,l_full_path,l_api_name || ' successfully completed, Return result: Y');
484: END IF;
485: -- Bug 3199488
486: END IF;
487:

Line 515: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);

511: IF ( g_unexp_level >= g_debug_level ) THEN
512: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
513: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
514: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
515: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
516: END IF;
517: -- Bug 3199488
518: RAISE ;
519:

Line 569: FND_LOG.STRING (g_event_level,l_full_path,l_api_name||' successfully completed, Return result: S');

565: THEN
566: Put_Debug_Msg( l_full_path,l_api_name||' successfully completed, Return result: S');
567: -- Bug 3199488
568: IF ( g_event_level >= g_debug_level ) THEN
569: FND_LOG.STRING (g_event_level,l_full_path,l_api_name||' successfully completed, Return result: S');
570: END IF;
571: -- Bug 3199488
572: END IF;
573:

Line 598: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

594: resultout := 'COMPLETE:E';
595: Generate_Message();
596: --Bug 3199488
597: IF ( g_excep_level >= g_debug_level ) THEN
598: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
599: END IF;
600: -- Bug 3199488
601: return;
602:

Line 613: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);

609: IF ( g_unexp_level >= g_debug_level ) THEN
610: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
611: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
612: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
613: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
614: END IF;
615: -- Bug 3199488
616: RAISE ;
617:

Line 667: FND_LOG.STRING (g_event_level,l_full_path,l_api_name||' successfully completed, Result: S');

663: THEN
664: --Put_Debug_Msg( l_full_path,l_api_name||' successfully completed, Result: S');
665: -- Bug 3199488
666: IF ( g_event_level >= g_debug_level ) THEN
667: FND_LOG.STRING (g_event_level,l_full_path,l_api_name||' successfully completed, Result: S');
668: END IF;
669: -- Bug 3199488
670: END IF;
671:

Line 696: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

692: resultout := 'COMPLETE:E';
693: Generate_Message();
694: -- Bug 3199488
695: IF ( g_excep_level >= g_debug_level ) THEN
696: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
697: END IF;
698: -- Bug 3199488
699: return;
700:

Line 711: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);

707: IF ( g_unexp_level >= g_debug_level ) THEN
708: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
709: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
710: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
711: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
712: END IF;
713: -- Bug 3199488
714: RAISE ;
715:

Line 787: FND_LOG.STRING (g_excep_level,l_full_path,'IGC_CC_BUDGETARY_CTRL_PKG.Execute_Budgetary_Ctrl returned error ');

783: THEN
784: --Put_Debug_Msg( l_full_path,'IGC_CC_BUDGETARY_CTRL_PKG.Execute_Budgetary_Ctrl returned error ');
785: -- Bug 3199488
786: IF ( g_excep_level >= g_debug_level ) THEN
787: FND_LOG.STRING (g_excep_level,l_full_path,'IGC_CC_BUDGETARY_CTRL_PKG.Execute_Budgetary_Ctrl returned error ');
788: END IF;
789: -- Bug 3199488
790: END IF;
791: raise FND_API.G_EXC_ERROR;

Line 817: FND_LOG.STRING (g_excep_level,l_full_path,l_api_name||' successfully completed, Return result: P');

813: THEN
814: --Put_Debug_Msg( l_full_path,l_api_name||' successfully completed, Return result: P');
815: -- Bug 3199488
816: IF ( g_excep_level >= g_debug_level ) THEN
817: FND_LOG.STRING (g_excep_level,l_full_path,l_api_name||' successfully completed, Return result: P');
818: END IF;
819: -- Bug 3199488
820: END IF;
821:

Line 863: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

859: resultout := 'COMPLETE:E';
860: Generate_Message();
861: -- Bug 3199488
862: IF ( g_excep_level >= g_debug_level ) THEN
863: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
864: END IF;
865: -- Bug 3199488
866: return;
867:

Line 878: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);

874: IF ( g_unexp_level >= g_debug_level ) THEN
875: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
876: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
877: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
878: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
879: END IF;
880: -- Bug 3199488
881: RAISE ;
882:

Line 932: FND_LOG.STRING (g_event_level,l_full_path,l_api_name||' successfully completed, Return result: None');

928: THEN
929: --Put_Debug_Msg( l_full_path,l_api_name||' successfully completed, Return result: None');
930: -- Bug 31994888
931: IF ( g_event_level >= g_debug_level ) THEN
932: FND_LOG.STRING (g_event_level,l_full_path,l_api_name||' successfully completed, Return result: None');
933: END IF;
934: -- Bug 3199488
935: END IF;
936:

Line 960: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

956: ROLLBACK TO Failed_Process;
957: Generate_Message();
958: --Bug 3199488
959: IF ( g_excep_level >= g_debug_level ) THEN
960: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
961: END IF;
962: -- Bug 3199488
963: RAISE;
964:

Line 975: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);

971: IF ( g_unexp_level >= g_debug_level ) THEN
972: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
973: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
974: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
975: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
976: END IF;
977: -- Bug 3199488
978: RAISE ;
979:

Line 1029: FND_LOG.STRING (g_event_level,l_full_path,l_api_name||' successfully completed, Return result: S');

1025: THEN
1026: Put_Debug_Msg( l_full_path,l_api_name||' successfully completed, Return result: S');
1027: -- Bug 31994888
1028: IF ( g_event_level >= g_debug_level ) THEN
1029: FND_LOG.STRING (g_event_level,l_full_path,l_api_name||' successfully completed, Return result: S');
1030: END IF;
1031: -- Bug 3199488
1032: END IF;
1033:

Line 1058: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

1054: resultout := 'COMPLETE:E';
1055: Generate_Message();
1056: --Bug 3199488
1057: IF ( g_excep_level >= g_debug_level ) THEN
1058: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
1059: END IF;
1060: --Bug 3199488
1061: return;
1062:

Line 1073: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);

1069: IF ( g_unexp_level >= g_debug_level ) THEN
1070: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
1071: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
1072: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
1073: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
1074: END IF;
1075: -- Bug 3199488
1076: RAISE ;
1077:

Line 1314: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

1310: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1311: p_data => x_msg_data );
1312: --Bug 3199488
1313: IF ( g_excep_level >= g_debug_level ) THEN
1314: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
1315: END IF;
1316: --Bug 3199488
1317:
1318: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1326: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

1322: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1323: p_data => x_msg_data );
1324: --Bug 3199488
1325: IF ( g_excep_level >= g_debug_level ) THEN
1326: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
1327: END IF;
1328: --Bug 3199488
1329:
1330: WHEN OTHERS THEN

Line 1348: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);

1344: IF ( g_unexp_level >= g_debug_level ) THEN
1345: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
1346: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
1347: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
1348: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
1349: END IF;
1350: -- Bug 3199488
1351:
1352: END Start_Process ;

Line 1575: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

1571: WHEN FND_API.G_EXC_ERROR THEN
1572: x_return_status := FND_API.G_RET_STS_ERROR;
1573: --Bug 3199488
1574: IF ( g_excep_level >= g_debug_level ) THEN
1575: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
1576: END IF;
1577: --Bug 3199488
1578: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1579: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1582: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

1578: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1579: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1580: --Bug 3199488
1581: IF ( g_excep_level >= g_debug_level ) THEN
1582: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
1583: END IF;
1584: --Bug 3199488
1585:
1586: WHEN OTHERS THEN

Line 1599: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);

1595: IF ( g_unexp_level >= g_debug_level ) THEN
1596: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
1597: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
1598: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
1599: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
1600: END IF;
1601: -- Bug 3199488
1602:
1603: END Generate_CC_Action;

Line 1686: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

1682: WHEN FND_API.G_EXC_ERROR THEN
1683: x_return_status := FND_API.G_RET_STS_ERROR;
1684: --Bug 3199488
1685: IF ( g_excep_level >= g_debug_level ) THEN
1686: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
1687: END IF;
1688: --Bug 3199488
1689:
1690: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1694: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

1690: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1691: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1692: --Bug 3199488
1693: IF ( g_excep_level >= g_debug_level ) THEN
1694: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
1695: END IF;
1696: --Bug 3199488
1697:
1698: WHEN OTHERS THEN

Line 1710: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);

1706: IF ( g_unexp_level >= g_debug_level ) THEN
1707: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
1708: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
1709: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
1710: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
1711: END IF;
1712: -- Bug 3199488
1713:
1714: END Get_Parameters;

Line 1802: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

1798: WHEN FND_API.G_EXC_ERROR THEN
1799: x_return_status := FND_API.G_RET_STS_ERROR;
1800: --Bug 3199488
1801: IF ( g_excep_level >= g_debug_level ) THEN
1802: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
1803: END IF;
1804: --Bug 3199488
1805:
1806: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1810: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

1806: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1807: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1808: --Bug 3199488
1809: IF ( g_excep_level >= g_debug_level ) THEN
1810: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
1811: END IF;
1812: --Bug 3199488
1813:
1814: WHEN OTHERS THEN

Line 1827: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);

1823: IF ( g_unexp_level >= g_debug_level ) THEN
1824: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
1825: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
1826: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
1827: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
1828: END IF;
1829: -- Bug 3199488
1830:
1831: END Set_Parameters;

Line 2058: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

2054: WHEN FND_API.G_EXC_ERROR THEN
2055: x_return_status := FND_API.G_RET_STS_ERROR;
2056: --Bug 3199488
2057: IF ( g_excep_level >= g_debug_level ) THEN
2058: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
2059: END IF;
2060: --Bug 3199488
2061:
2062: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2066: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

2062: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2063: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2064: --Bug 3199488
2065: IF ( g_excep_level >= g_debug_level ) THEN
2066: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
2067: END IF;
2068: --Bug 3199488
2069:
2070: WHEN OTHERS THEN

Line 2083: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);

2079: IF ( g_unexp_level >= g_debug_level ) THEN
2080: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
2081: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
2082: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
2083: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
2084: END IF;
2085: -- Bug 3199488
2086:
2087: END Init_variables;

Line 2145: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

2141: WHEN FND_API.G_EXC_ERROR THEN
2142: x_return_status := FND_API.G_RET_STS_ERROR;
2143: --Bug 3199488
2144: IF ( g_excep_level >= g_debug_level ) THEN
2145: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
2146: END IF;
2147: --Bug 3199488
2148:
2149: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2153: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

2149: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2150: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2151: --Bug 3199488
2152: IF ( g_excep_level >= g_debug_level ) THEN
2153: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
2154: END IF;
2155: --Bug 3199488
2156:
2157: WHEN OTHERS THEN

Line 2170: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);

2166: IF ( g_unexp_level >= g_debug_level ) THEN
2167: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
2168: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
2169: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
2170: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
2171: END IF;
2172: -- Bug 3199488
2173:
2174: END Reinit_version;

Line 2222: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

2218: WHEN FND_API.G_EXC_ERROR THEN
2219: x_return_status := FND_API.G_RET_STS_ERROR;
2220: --Bug 3199488
2221: IF ( g_excep_level >= g_debug_level ) THEN
2222: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
2223: END IF;
2224: --Bug 3199488
2225:
2226: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2230: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

2226: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2227: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2228: --Bug 3199488
2229: IF ( g_excep_level >= g_debug_level ) THEN
2230: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
2231: END IF;
2232: --Bug 3199488
2233:
2234: WHEN OTHERS THEN

Line 2247: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);

2243: IF ( g_unexp_level >= g_debug_level ) THEN
2244: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
2245: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
2246: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
2247: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
2248: END IF;
2249: -- Bug 3199488
2250:
2251: END Generate_PO;

Line 2335: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

2331: WHEN FND_API.G_EXC_ERROR THEN
2332: x_return_status := FND_API.G_RET_STS_ERROR;
2333: --Bug 3199488
2334: IF ( g_excep_level >= g_debug_level ) THEN
2335: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
2336: END IF;
2337: --Bug 3199488
2338:
2339: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2343: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

2339: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2340: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2341: --Bug 3199488
2342: IF ( g_excep_level >= g_debug_level ) THEN
2343: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
2344: END IF;
2345: --Bug 3199488
2346:
2347: WHEN OTHERS THEN

Line 2361: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);

2357: IF ( g_unexp_level >= g_debug_level ) THEN
2358: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
2359: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
2360: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
2361: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
2362: END IF;
2363: -- Bug 3199488
2364:
2365: END Process_request;

Line 2452: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

2448: WHEN FND_API.G_EXC_ERROR THEN
2449: x_return_status := FND_API.G_RET_STS_ERROR;
2450: --Bug 3199488
2451: IF ( g_excep_level >= g_debug_level ) THEN
2452: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
2453: END IF;
2454: --Bug 3199488
2455:
2456: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2460: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

2456: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2457: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2458: --Bug 3199488
2459: IF ( g_excep_level >= g_debug_level ) THEN
2460: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
2461: END IF;
2462: --Bug 3199488
2463:
2464: WHEN OTHERS THEN

Line 2477: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);

2473: IF ( g_unexp_level >= g_debug_level ) THEN
2474: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
2475: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
2476: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
2477: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
2478: END IF;
2479: -- Bug 3199488
2480:
2481: END Set_BC_Parameter;

Line 2541: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

2537: WHEN FND_API.G_EXC_ERROR THEN
2538: x_return_status := FND_API.G_RET_STS_ERROR;
2539: --Bug 3199488
2540: IF ( g_excep_level >= g_debug_level ) THEN
2541: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
2542: END IF;
2543: --Bug 3199488
2544:
2545: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2549: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

2545: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2546: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2547: --Bug 3199488
2548: IF ( g_excep_level >= g_debug_level ) THEN
2549: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
2550: END IF;
2551: --Bug 3199488
2552:
2553: WHEN OTHERS THEN

Line 2566: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);

2562: IF ( g_unexp_level >= g_debug_level ) THEN
2563: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
2564: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
2565: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
2566: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
2567: END IF;
2568: -- Bug 3199488
2569:
2570: END Create_History_Record;

Line 2653: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

2649: WHEN FND_API.G_EXC_ERROR THEN
2650: x_return_status := FND_API.G_RET_STS_ERROR;
2651: --Bug 3199488
2652: IF ( g_excep_level >= g_debug_level ) THEN
2653: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
2654: END IF;
2655: --Bug 3199488
2656:
2657: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2661: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

2657: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2658: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2659: --Bug 3199488
2660: IF ( g_excep_level >= g_debug_level ) THEN
2661: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
2662: END IF;
2663: --Bug 3199488
2664:
2665: WHEN OTHERS THEN

Line 2678: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);

2674: IF ( g_unexp_level >= g_debug_level ) THEN
2675: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
2676: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
2677: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
2678: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
2679: END IF;
2680: -- Bug 3199488
2681:
2682: END Update_CC;

Line 2771: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

2767: WHEN FND_API.G_EXC_ERROR THEN
2768: x_return_status := FND_API.G_RET_STS_ERROR;
2769: --Bug 3199488
2770: IF ( g_excep_level >= g_debug_level ) THEN
2771: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
2772: END IF;
2773: --Bug 3199488
2774:
2775: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2779: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

2775: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2776: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2777: --Bug 3199488
2778: IF ( g_excep_level >= g_debug_level ) THEN
2779: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
2780: END IF;
2781: --Bug 3199488
2782:
2783: WHEN OTHERS THEN

Line 2796: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);

2792: IF ( g_unexp_level >= g_debug_level ) THEN
2793: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
2794: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
2795: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
2796: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
2797: END IF;
2798: -- Bug 3199488
2799:
2800: END Get_Business_Group;

Line 3012: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

3008: WHEN FND_API.G_EXC_ERROR THEN
3009: x_return_status := FND_API.G_RET_STS_ERROR;
3010: --Bug 3199488
3011: IF ( g_excep_level >= g_debug_level ) THEN
3012: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
3013: END IF;
3014: --Bug 3199488
3015:
3016: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 3020: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

3016: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3017: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3018: --Bug 3199488
3019: IF ( g_excep_level >= g_debug_level ) THEN
3020: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
3021: END IF;
3022: --Bug 3199488
3023:
3024: WHEN OTHERS THEN

Line 3037: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);

3033: IF ( g_unexp_level >= g_debug_level ) THEN
3034: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
3035: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
3036: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
3037: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
3038: END IF;
3039: -- Bug 3199488
3040:
3041: END Find_Next_Approver;

Line 3725: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

3721: WHEN FND_API.G_EXC_ERROR THEN
3722: x_return_status := FND_API.G_RET_STS_ERROR;
3723: --Bug 3199488
3724: IF ( g_excep_level >= g_debug_level ) THEN
3725: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
3726: END IF;
3727: --Bug 3199488
3728:
3729: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 3733: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

3729: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3730: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3731: --Bug 3199488
3732: IF ( g_excep_level >= g_debug_level ) THEN
3733: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
3734: END IF;
3735: --Bug 3199488
3736:
3737: WHEN OTHERS THEN

Line 3750: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);

3746: IF ( g_unexp_level >= g_debug_level ) THEN
3747: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
3748: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
3749: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
3750: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
3751: END IF;
3752: -- Bug 3199488
3753:
3754: END Check_Authority;

Line 3827: FND_LOG.STRING(g_state_level, p_path, p_debug_msg);

3823: END IF;*/
3824:
3825: --Bug 3199488
3826: IF(g_state_level >= g_debug_level) THEN
3827: FND_LOG.STRING(g_state_level, p_path, p_debug_msg);
3828: END IF;
3829: -- Bug 3199488
3830:
3831: RETURN;

Line 3874: FND_LOG.STRING(g_excep_level, l_full_path,g_error_text);

3870: FOR l_cur IN 1..l_msg_count LOOP
3871: g_error_text := g_error_text||' Mes No'||l_cur||' '||FND_MSG_PUB.GET(l_cur,FND_API.G_FALSE);
3872: --Bug 3199488
3873: IF(g_excep_level >= g_debug_level) THEN
3874: FND_LOG.STRING(g_excep_level, l_full_path,g_error_text);
3875: END IF;
3876: --Bug 3199488
3877: END LOOP;
3878: ELSE

Line 4012: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

4008: WHEN FND_API.G_EXC_ERROR THEN
4009: x_return_status := FND_API.G_RET_STS_ERROR;
4010: --Bug 3199488
4011: IF ( g_excep_level >= g_debug_level ) THEN
4012: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
4013: END IF;
4014: --Bug 3199488
4015:
4016: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 4020: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');

4016: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4017: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4018: --Bug 3199488
4019: IF ( g_excep_level >= g_debug_level ) THEN
4020: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
4021: END IF;
4022: --Bug 3199488
4023:
4024: WHEN OTHERS THEN

Line 4037: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);

4033: IF ( g_unexp_level >= g_debug_level ) THEN
4034: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
4035: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
4036: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
4037: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
4038: END IF;
4039: -- Bug 3199488
4040:
4041: END Check_Supplier;