522:
523: retcode := 2;
524:
525:
526: FND_MESSAGE.set_name ('IGI', 'IGI_GEN_UNHANDLED_EXCEPTION');
527: FND_MESSAGE.set_token ('NAME','IGI_CIS_CI36_DATA_PKG.EXTRACT_DATA');
528: errbuf := Fnd_message.get;
529:
530: Debug(l_excep_level, 'Extract_data',errbuf);
523: retcode := 2;
524:
525:
526: FND_MESSAGE.set_name ('IGI', 'IGI_GEN_UNHANDLED_EXCEPTION');
527: FND_MESSAGE.set_token ('NAME','IGI_CIS_CI36_DATA_PKG.EXTRACT_DATA');
528: errbuf := Fnd_message.get;
529:
530: Debug(l_excep_level, 'Extract_data',errbuf);
531:
524:
525:
526: FND_MESSAGE.set_name ('IGI', 'IGI_GEN_UNHANDLED_EXCEPTION');
527: FND_MESSAGE.set_token ('NAME','IGI_CIS_CI36_DATA_PKG.EXTRACT_DATA');
528: errbuf := Fnd_message.get;
529:
530: Debug(l_excep_level, 'Extract_data',errbuf);
531:
532: l_errbuf := 'Error Message: ' || sqlerrm || ' Error Code: ' || to_char(sqlcode);
533: Debug(l_excep_level, 'Extract_data',l_errbuf);
534:
535:
536: IF ( l_unexp_level >= l_debug_level ) THEN
537: FND_MESSAGE.SET_NAME('IGI','IGI_LOGGING_UNEXP_ERROR');
538: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
539: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
540: FND_LOG.MESSAGE ( l_unexp_level,l_path || 'Extract_data' , TRUE);
541: END IF;
534:
535:
536: IF ( l_unexp_level >= l_debug_level ) THEN
537: FND_MESSAGE.SET_NAME('IGI','IGI_LOGGING_UNEXP_ERROR');
538: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
539: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
540: FND_LOG.MESSAGE ( l_unexp_level,l_path || 'Extract_data' , TRUE);
541: END IF;
542: APP_EXCEPTION.raise_exception;
535:
536: IF ( l_unexp_level >= l_debug_level ) THEN
537: FND_MESSAGE.SET_NAME('IGI','IGI_LOGGING_UNEXP_ERROR');
538: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
539: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
540: FND_LOG.MESSAGE ( l_unexp_level,l_path || 'Extract_data' , TRUE);
541: END IF;
542: APP_EXCEPTION.raise_exception;
543: