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 ****');
589: fnd_message.set_name('IGC','IGC_CC_ER_SUBMIT_EXCPTION_RPT');
590: IF (g_debug_mode = 'Y') THEN
591: Put_Debug_Msg (l_full_path,fnd_message.get,g_event_level);
592: END IF;
593: app_exception.raise_exception;
594: END IF; -- l_request_id = 0
595: IF (g_debug_mode = 'Y') THEN
596: Put_Debug_Msg (l_full_path,p_debug_msg => '**** Completed Execute Exceptions Report ****');
597: END IF;
608: fnd_message.set_name('IGC','IGC_CC_ER_SUBMIT_EXCPTION_RPT');
609: IF g_debug_mode = 'Y' THEN
610: Put_Debug_Msg (l_full_path,fnd_message.get,g_error_level);
611: END IF;
612: app_exception.raise_exception;
613: IF ( g_unexp_level >= g_debug_level ) THEN
614: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
615: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
616: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
678: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
679: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
680: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
681: END IF;
682: APP_EXCEPTION.Raise_Exception;
683:
684: END Insert_Exception_Record;
685:
686:
1238: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
1239: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
1240: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
1241: END IF;
1242: APP_EXCEPTION.Raise_Exception;
1243:
1244: END Validate_Period_Status ;
1245:
1246:
1347: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
1348: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
1349: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
1350: END IF;
1351: APP_EXCEPTION.Raise_Exception;
1352:
1353: END Fetch_PO_And_Releases;
1354:
1355:
1450: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
1451: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
1452: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
1453: END IF;
1454: APP_EXCEPTION.Raise_Exception;
1455:
1456: END Fetch_Requisitions ;
1457:
1458:
1547: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
1548: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
1549: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
1550: END IF;
1551: APP_EXCEPTION.Raise_Exception;
1552:
1553: END Fetch_BPAs ;
1554:
1555:
1730: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
1731: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
1732: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
1733: END IF;
1734: APP_EXCEPTION.Raise_Exception;
1735:
1736:
1737: END Validate_Distributions ;
1738:
3121: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
3122: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
3123: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
3124: END IF;
3125: APP_EXCEPTION.Raise_Exception;
3126: END Create_Journal_Adjustments;
3127:
3128:
3129:
5086: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
5087: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
5088: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
5089: END IF;
5090: APP_EXCEPTION.Raise_Exception;
5091: retcode := 2 ;
5092: fnd_message.set_name('IGC','IGC_LOGGING_USER_ERROR');
5093: errbuf := fnd_message.get;
5094: