201: WHEN OTHERS THEN
202: IF (SQLCODE = -54) THEN -- record already locked
203: l_exception := TRUE ;
204: ELSE
205: APP_EXCEPTION.Raise_Exception;
206: END IF;
207: END;
208: IF l_exception = FALSE THEN
209: IF g_debug_mode = 'Y' THEN
224: WHEN OTHERS THEN
225: IF (SQLCODE = -54) THEN -- record already locked
226: l_exception := TRUE ;
227: ELSE
228: APP_EXCEPTION.Raise_Exception;
229: END IF;
230: END;
231: IF l_exception = FALSE THEN
232: IF g_debug_mode = 'Y' THEN
247: WHEN OTHERS THEN
248: IF (SQLCODE = -54) THEN -- record already locked
249: l_exception := TRUE ;
250: ELSE
251: APP_EXCEPTION.Raise_Exception;
252: END IF;
253: END;
254: IF l_exception = FALSE THEN
255: IF g_debug_mode = 'Y' THEN
271: WHEN OTHERS THEN
272: IF (SQLCODE = -54) THEN -- record already locked
273: l_exception := TRUE ;
274: ELSE
275: APP_EXCEPTION.Raise_Exception;
276: END IF;
277: END;
278: IF l_exception = FALSE THEN
279: IF g_debug_mode = 'Y' THEN
301: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
302: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
303: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
304: END IF;
305: APP_EXCEPTION.Raise_Exception;
306: END Lock_Documents;
307:
308:
309:
408: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
409: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
410: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
411: END IF;
412: APP_EXCEPTION.Raise_Exception;
413: END Log_Error;
414:
415:
416:
509: fnd_message.set_name('IGC','IGC_CC_ER_SUBMIT_EXCPTION_RPT');
510: IF (g_debug_mode = 'Y') THEN
511: Put_Debug_Msg (l_full_path,fnd_message.get,g_event_level);
512: END IF;
513: app_exception.raise_exception;
514: END IF; -- l_request_id = 0
515:
516: IF (g_debug_mode = 'Y') THEN
517: Put_Debug_Msg (l_full_path,p_debug_msg => '**** Completed Execute Exceptions Report ****');
588: fnd_message.set_name('IGC','IGC_CC_ER_SUBMIT_EXCPTION_RPT');
589: IF (g_debug_mode = 'Y') THEN
590: Put_Debug_Msg (l_full_path,fnd_message.get,g_event_level);
591: END IF;
592: app_exception.raise_exception;
593: END IF; -- l_request_id = 0
594: IF (g_debug_mode = 'Y') THEN
595: Put_Debug_Msg (l_full_path,p_debug_msg => '**** Completed Execute Exceptions Report ****');
596: END IF;
607: fnd_message.set_name('IGC','IGC_CC_ER_SUBMIT_EXCPTION_RPT');
608: IF g_debug_mode = 'Y' THEN
609: Put_Debug_Msg (l_full_path,fnd_message.get,g_error_level);
610: END IF;
611: app_exception.raise_exception;
612: IF ( g_unexp_level >= g_debug_level ) THEN
613: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
614: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
615: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
677: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
678: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
679: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
680: END IF;
681: APP_EXCEPTION.Raise_Exception;
682:
683: END Insert_Exception_Record;
684:
685:
1237: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
1238: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
1239: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
1240: END IF;
1241: APP_EXCEPTION.Raise_Exception;
1242:
1243: END Validate_Period_Status ;
1244:
1245:
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: APP_EXCEPTION.Raise_Exception;
1351:
1352: END Fetch_PO_And_Releases;
1353:
1354:
1449: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
1450: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
1451: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
1452: END IF;
1453: APP_EXCEPTION.Raise_Exception;
1454:
1455: END Fetch_Requisitions ;
1456:
1457:
1546: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
1547: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
1548: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
1549: END IF;
1550: APP_EXCEPTION.Raise_Exception;
1551:
1552: END Fetch_BPAs ;
1553:
1554:
1729: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
1730: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
1731: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
1732: END IF;
1733: APP_EXCEPTION.Raise_Exception;
1734:
1735:
1736: END Validate_Distributions ;
1737:
3120: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
3121: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
3122: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
3123: END IF;
3124: APP_EXCEPTION.Raise_Exception;
3125: END Create_Journal_Adjustments;
3126:
3127:
3128:
5085: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
5086: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
5087: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
5088: END IF;
5089: APP_EXCEPTION.Raise_Exception;
5090: retcode := 2 ;
5091: fnd_message.set_name('IGC','IGC_LOGGING_USER_ERROR');
5092: errbuf := fnd_message.get;
5093: