199: OPEN c_batch ;
200: FETCH c_batch INTO c_batch_rec;
201: IF c_batch%FOUND THEN
202: CLOSE c_batch;
203: FND_MESSAGE.SET_NAME('IGF','IGF_GE_BATCH_ALREADY_LOADED');
204: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
205: RETURN;
206: END IF;
207: CLOSE c_batch;
200: FETCH c_batch INTO c_batch_rec;
201: IF c_batch%FOUND THEN
202: CLOSE c_batch;
203: FND_MESSAGE.SET_NAME('IGF','IGF_GE_BATCH_ALREADY_LOADED');
204: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
205: RETURN;
206: END IF;
207: CLOSE c_batch;
208:
263: );
264:
265: l_processed_count := l_processed_count +1 ;
266: ELSE
267: fnd_message.set_name('IGF','IGF_SL_INVALID_RECORD');
268: fnd_message.set_token('BATCH_ID',SUBSTR(loadrec.record_data, 2,23));
269: fnd_file.put_line(FND_FILE.LOG,fnd_message.get);
270: END IF;
271: EXCEPTION
264:
265: l_processed_count := l_processed_count +1 ;
266: ELSE
267: fnd_message.set_name('IGF','IGF_SL_INVALID_RECORD');
268: fnd_message.set_token('BATCH_ID',SUBSTR(loadrec.record_data, 2,23));
269: fnd_file.put_line(FND_FILE.LOG,fnd_message.get);
270: END IF;
271: EXCEPTION
272: WHEN OTHERS THEN
265: l_processed_count := l_processed_count +1 ;
266: ELSE
267: fnd_message.set_name('IGF','IGF_SL_INVALID_RECORD');
268: fnd_message.set_token('BATCH_ID',SUBSTR(loadrec.record_data, 2,23));
269: fnd_file.put_line(FND_FILE.LOG,fnd_message.get);
270: END IF;
271: EXCEPTION
272: WHEN OTHERS THEN
273: fnd_message.set_name('IGF','IGF_SL_INVALID_RECORD');
269: fnd_file.put_line(FND_FILE.LOG,fnd_message.get);
270: END IF;
271: EXCEPTION
272: WHEN OTHERS THEN
273: fnd_message.set_name('IGF','IGF_SL_INVALID_RECORD');
274: fnd_message.set_token('BATCH_ID',SUBSTR(loadrec.record_data, 2,23));
275: fnd_file.put_line(FND_FILE.LOG,fnd_message.get);
276: END ;
277:
270: END IF;
271: EXCEPTION
272: WHEN OTHERS THEN
273: fnd_message.set_name('IGF','IGF_SL_INVALID_RECORD');
274: fnd_message.set_token('BATCH_ID',SUBSTR(loadrec.record_data, 2,23));
275: fnd_file.put_line(FND_FILE.LOG,fnd_message.get);
276: END ;
277:
278: END LOOP;
271: EXCEPTION
272: WHEN OTHERS THEN
273: fnd_message.set_name('IGF','IGF_SL_INVALID_RECORD');
274: fnd_message.set_token('BATCH_ID',SUBSTR(loadrec.record_data, 2,23));
275: fnd_file.put_line(FND_FILE.LOG,fnd_message.get);
276: END ;
277:
278: END LOOP;
279:
276: END ;
277:
278: END LOOP;
279:
280: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_SUM_FET');
281: FND_MESSAGE.SET_TOKEN('VALUE',(l_n_last_lort_id-2));
282: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
283:
284: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_SCHOOL_AWARD');
277:
278: END LOOP;
279:
280: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_SUM_FET');
281: FND_MESSAGE.SET_TOKEN('VALUE',(l_n_last_lort_id-2));
282: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
283:
284: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_SCHOOL_AWARD');
285: FND_MESSAGE.SET_TOKEN('VALUE',p_school_code);
278: END LOOP;
279:
280: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_SUM_FET');
281: FND_MESSAGE.SET_TOKEN('VALUE',(l_n_last_lort_id-2));
282: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
283:
284: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_SCHOOL_AWARD');
285: FND_MESSAGE.SET_TOKEN('VALUE',p_school_code);
286: FND_MESSAGE.SET_TOKEN('AWD_YR',p_award_year);
280: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_SUM_FET');
281: FND_MESSAGE.SET_TOKEN('VALUE',(l_n_last_lort_id-2));
282: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
283:
284: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_SCHOOL_AWARD');
285: FND_MESSAGE.SET_TOKEN('VALUE',p_school_code);
286: FND_MESSAGE.SET_TOKEN('AWD_YR',p_award_year);
287: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
288:
281: FND_MESSAGE.SET_TOKEN('VALUE',(l_n_last_lort_id-2));
282: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
283:
284: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_SCHOOL_AWARD');
285: FND_MESSAGE.SET_TOKEN('VALUE',p_school_code);
286: FND_MESSAGE.SET_TOKEN('AWD_YR',p_award_year);
287: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
288:
289: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_SUM_PRO');
282: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
283:
284: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_SCHOOL_AWARD');
285: FND_MESSAGE.SET_TOKEN('VALUE',p_school_code);
286: FND_MESSAGE.SET_TOKEN('AWD_YR',p_award_year);
287: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
288:
289: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_SUM_PRO');
290: FND_MESSAGE.SET_TOKEN('VALUE',l_processed_count);
283:
284: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_SCHOOL_AWARD');
285: FND_MESSAGE.SET_TOKEN('VALUE',p_school_code);
286: FND_MESSAGE.SET_TOKEN('AWD_YR',p_award_year);
287: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
288:
289: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_SUM_PRO');
290: FND_MESSAGE.SET_TOKEN('VALUE',l_processed_count);
291: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
285: FND_MESSAGE.SET_TOKEN('VALUE',p_school_code);
286: FND_MESSAGE.SET_TOKEN('AWD_YR',p_award_year);
287: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
288:
289: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_SUM_PRO');
290: FND_MESSAGE.SET_TOKEN('VALUE',l_processed_count);
291: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
292:
293: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_SUM_REJ');
286: FND_MESSAGE.SET_TOKEN('AWD_YR',p_award_year);
287: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
288:
289: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_SUM_PRO');
290: FND_MESSAGE.SET_TOKEN('VALUE',l_processed_count);
291: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
292:
293: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_SUM_REJ');
294: FND_MESSAGE.SET_TOKEN('VALUE',((l_n_last_lort_id-2) - l_processed_count));
287: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
288:
289: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_SUM_PRO');
290: FND_MESSAGE.SET_TOKEN('VALUE',l_processed_count);
291: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
292:
293: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_SUM_REJ');
294: FND_MESSAGE.SET_TOKEN('VALUE',((l_n_last_lort_id-2) - l_processed_count));
295: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
289: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_SUM_PRO');
290: FND_MESSAGE.SET_TOKEN('VALUE',l_processed_count);
291: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
292:
293: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_SUM_REJ');
294: FND_MESSAGE.SET_TOKEN('VALUE',((l_n_last_lort_id-2) - l_processed_count));
295: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
296:
297: EXCEPTION
290: FND_MESSAGE.SET_TOKEN('VALUE',l_processed_count);
291: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
292:
293: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_SUM_REJ');
294: FND_MESSAGE.SET_TOKEN('VALUE',((l_n_last_lort_id-2) - l_processed_count));
295: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
296:
297: EXCEPTION
298: WHEN INV_TRL_NUM THEN
291: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
292:
293: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_SUM_REJ');
294: FND_MESSAGE.SET_TOKEN('VALUE',((l_n_last_lort_id-2) - l_processed_count));
295: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
296:
297: EXCEPTION
298: WHEN INV_TRL_NUM THEN
299: RAISE;
301: WHEN INV_HDR_OR_TLR THEN
302: RAISE;
303:
304: WHEN OTHERS THEN
305: FND_MESSAGE.SET_NAME('IGS','IGS_GE_UNHANDLED_EXP');
306: FND_MESSAGE.SET_TOKEN('NAME','igf_db_dl_reconc.ytd_load_summary');
307: IGS_GE_MSG_STACK.ADD;
308: APP_EXCEPTION.RAISE_EXCEPTION;
309:
302: RAISE;
303:
304: WHEN OTHERS THEN
305: FND_MESSAGE.SET_NAME('IGS','IGS_GE_UNHANDLED_EXP');
306: FND_MESSAGE.SET_TOKEN('NAME','igf_db_dl_reconc.ytd_load_summary');
307: IGS_GE_MSG_STACK.ADD;
308: APP_EXCEPTION.RAISE_EXCEPTION;
309:
310: END load_ytd_summary;
397: OPEN c_batch ;
398: FETCH c_batch INTO c_batch_rec;
399: IF c_batch%FOUND THEN
400: CLOSE c_batch;
401: FND_MESSAGE.SET_NAME('IGF','IGF_GE_BATCH_ALREADY_LOADED');
402: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
403: RETURN;
404: END IF;
405: CLOSE c_batch;
398: FETCH c_batch INTO c_batch_rec;
399: IF c_batch%FOUND THEN
400: CLOSE c_batch;
401: FND_MESSAGE.SET_NAME('IGF','IGF_GE_BATCH_ALREADY_LOADED');
402: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
403: RETURN;
404: END IF;
405: CLOSE c_batch;
406:
476: );
477:
478: l_processed_count := l_processed_count +1;
479: ELSE
480: fnd_message.set_name('IGF','IGF_SL_INVALID_RECORD');
481: fnd_message.set_token('BATCH_ID',SUBSTR(loadrec.record_data, 2,23));
482: fnd_file.put_line(FND_FILE.LOG,fnd_message.get);
483: END IF;
484:
477:
478: l_processed_count := l_processed_count +1;
479: ELSE
480: fnd_message.set_name('IGF','IGF_SL_INVALID_RECORD');
481: fnd_message.set_token('BATCH_ID',SUBSTR(loadrec.record_data, 2,23));
482: fnd_file.put_line(FND_FILE.LOG,fnd_message.get);
483: END IF;
484:
485: EXCEPTION
478: l_processed_count := l_processed_count +1;
479: ELSE
480: fnd_message.set_name('IGF','IGF_SL_INVALID_RECORD');
481: fnd_message.set_token('BATCH_ID',SUBSTR(loadrec.record_data, 2,23));
482: fnd_file.put_line(FND_FILE.LOG,fnd_message.get);
483: END IF;
484:
485: EXCEPTION
486: WHEN INV_TRL_NUM THEN
485: EXCEPTION
486: WHEN INV_TRL_NUM THEN
487: RAISE;
488: WHEN OTHERS THEN
489: fnd_message.set_name('IGF','IGF_SL_INVALID_RECORD');
490: fnd_message.set_token('BATCH_ID',SUBSTR(loadrec.record_data, 2,23));
491: fnd_file.put_line(FND_FILE.LOG,fnd_message.get);
492: END ;
493:
486: WHEN INV_TRL_NUM THEN
487: RAISE;
488: WHEN OTHERS THEN
489: fnd_message.set_name('IGF','IGF_SL_INVALID_RECORD');
490: fnd_message.set_token('BATCH_ID',SUBSTR(loadrec.record_data, 2,23));
491: fnd_file.put_line(FND_FILE.LOG,fnd_message.get);
492: END ;
493:
494: END LOOP;
487: RAISE;
488: WHEN OTHERS THEN
489: fnd_message.set_name('IGF','IGF_SL_INVALID_RECORD');
490: fnd_message.set_token('BATCH_ID',SUBSTR(loadrec.record_data, 2,23));
491: fnd_file.put_line(FND_FILE.LOG,fnd_message.get);
492: END ;
493:
494: END LOOP;
495:
492: END ;
493:
494: END LOOP;
495:
496: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_DET_FET');
497: FND_MESSAGE.SET_TOKEN('VALUE',(l_n_last_lort_id-2));
498: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
499:
500: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_SCHOOL_AWD_DTL');
493:
494: END LOOP;
495:
496: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_DET_FET');
497: FND_MESSAGE.SET_TOKEN('VALUE',(l_n_last_lort_id-2));
498: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
499:
500: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_SCHOOL_AWD_DTL');
501: FND_MESSAGE.SET_TOKEN('VALUE',p_school_code);
494: END LOOP;
495:
496: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_DET_FET');
497: FND_MESSAGE.SET_TOKEN('VALUE',(l_n_last_lort_id-2));
498: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
499:
500: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_SCHOOL_AWD_DTL');
501: FND_MESSAGE.SET_TOKEN('VALUE',p_school_code);
502: FND_MESSAGE.SET_TOKEN('AWD_YR',p_award_year);
496: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_DET_FET');
497: FND_MESSAGE.SET_TOKEN('VALUE',(l_n_last_lort_id-2));
498: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
499:
500: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_SCHOOL_AWD_DTL');
501: FND_MESSAGE.SET_TOKEN('VALUE',p_school_code);
502: FND_MESSAGE.SET_TOKEN('AWD_YR',p_award_year);
503: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
504:
497: FND_MESSAGE.SET_TOKEN('VALUE',(l_n_last_lort_id-2));
498: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
499:
500: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_SCHOOL_AWD_DTL');
501: FND_MESSAGE.SET_TOKEN('VALUE',p_school_code);
502: FND_MESSAGE.SET_TOKEN('AWD_YR',p_award_year);
503: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
504:
505: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_DET_PRO');
498: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
499:
500: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_SCHOOL_AWD_DTL');
501: FND_MESSAGE.SET_TOKEN('VALUE',p_school_code);
502: FND_MESSAGE.SET_TOKEN('AWD_YR',p_award_year);
503: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
504:
505: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_DET_PRO');
506: FND_MESSAGE.SET_TOKEN('VALUE',l_processed_count);
499:
500: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_SCHOOL_AWD_DTL');
501: FND_MESSAGE.SET_TOKEN('VALUE',p_school_code);
502: FND_MESSAGE.SET_TOKEN('AWD_YR',p_award_year);
503: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
504:
505: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_DET_PRO');
506: FND_MESSAGE.SET_TOKEN('VALUE',l_processed_count);
507: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
501: FND_MESSAGE.SET_TOKEN('VALUE',p_school_code);
502: FND_MESSAGE.SET_TOKEN('AWD_YR',p_award_year);
503: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
504:
505: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_DET_PRO');
506: FND_MESSAGE.SET_TOKEN('VALUE',l_processed_count);
507: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
508:
509: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_DET_REJ');
502: FND_MESSAGE.SET_TOKEN('AWD_YR',p_award_year);
503: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
504:
505: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_DET_PRO');
506: FND_MESSAGE.SET_TOKEN('VALUE',l_processed_count);
507: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
508:
509: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_DET_REJ');
510: FND_MESSAGE.SET_TOKEN('VALUE',((l_n_last_lort_id-2) - l_processed_count));
503: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
504:
505: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_DET_PRO');
506: FND_MESSAGE.SET_TOKEN('VALUE',l_processed_count);
507: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
508:
509: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_DET_REJ');
510: FND_MESSAGE.SET_TOKEN('VALUE',((l_n_last_lort_id-2) - l_processed_count));
511: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
505: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_DET_PRO');
506: FND_MESSAGE.SET_TOKEN('VALUE',l_processed_count);
507: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
508:
509: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_DET_REJ');
510: FND_MESSAGE.SET_TOKEN('VALUE',((l_n_last_lort_id-2) - l_processed_count));
511: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
512:
513: EXCEPTION
506: FND_MESSAGE.SET_TOKEN('VALUE',l_processed_count);
507: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
508:
509: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_DET_REJ');
510: FND_MESSAGE.SET_TOKEN('VALUE',((l_n_last_lort_id-2) - l_processed_count));
511: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
512:
513: EXCEPTION
514:
507: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
508:
509: FND_MESSAGE.SET_NAME('IGF','IGF_DB_YTD_DET_REJ');
510: FND_MESSAGE.SET_TOKEN('VALUE',((l_n_last_lort_id-2) - l_processed_count));
511: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
512:
513: EXCEPTION
514:
515: WHEN INV_TRL_NUM THEN
518: RAISE;
519: WHEN INV_HDR_OR_TLR THEN
520: RAISE;
521: WHEN OTHERS THEN
522: FND_MESSAGE.SET_NAME('IGS','IGS_GE_UNHANDLED_EXP');
523: FND_MESSAGE.SET_TOKEN('NAME','igf_db_dl_reconc.ytd_load_detail');
524: IGS_GE_MSG_STACK.ADD;
525: APP_EXCEPTION.RAISE_EXCEPTION;
526:
519: WHEN INV_HDR_OR_TLR THEN
520: RAISE;
521: WHEN OTHERS THEN
522: FND_MESSAGE.SET_NAME('IGS','IGS_GE_UNHANDLED_EXP');
523: FND_MESSAGE.SET_TOKEN('NAME','igf_db_dl_reconc.ytd_load_detail');
524: IGS_GE_MSG_STACK.ADD;
525: APP_EXCEPTION.RAISE_EXCEPTION;
526:
527: END load_ytd_detail;
571: FETCH c_get_ver INTO c_get_ver_rec;
572: --Checking if the data setup for the version is there or not
573: IF c_get_ver%NOTFOUND THEN
574: CLOSE c_get_ver;
575: FND_MESSAGE.SET_NAME('IGF','IGF_DB_DL_VERSION_FALSE');
576: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
577: RETURN;
578: ELSE
579: l_award_year:=c_get_ver_rec.ci_alternate_code;
572: --Checking if the data setup for the version is there or not
573: IF c_get_ver%NOTFOUND THEN
574: CLOSE c_get_ver;
575: FND_MESSAGE.SET_NAME('IGF','IGF_DB_DL_VERSION_FALSE');
576: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
577: RETURN;
578: ELSE
579: l_award_year:=c_get_ver_rec.ci_alternate_code;
580:
587: EXCEPTION
588: WHEN INV_TRL_NUM THEN
589: ROLLBACK;
590: retcode := 2;
591: errbuf := fnd_message.get_string('IGF','IGF_GE_RECORD_NUM_NOT_MATCH');
592:
593: WHEN INVALID_FILE THEN
594: ROLLBACK;
595: retcode := 2;
592:
593: WHEN INVALID_FILE THEN
594: ROLLBACK;
595: retcode := 2;
596: errbuf := fnd_message.get_string('IGF','IGF_GE_INVALID_FILE');
597:
598: WHEN INV_HDR_OR_TLR THEN
599: ROLLBACK;
600: retcode := 2;
597:
598: WHEN INV_HDR_OR_TLR THEN
599: ROLLBACK;
600: retcode := 2;
601: errbuf := fnd_message.get_string('IGF','IGF_GE_FILE_NOT_COMPLETE');
602:
603: WHEN app_exception.record_lock_exception THEN
604: ROLLBACK;
605: retcode := 2;
602:
603: WHEN app_exception.record_lock_exception THEN
604: ROLLBACK;
605: retcode := 2;
606: errbuf := FND_MESSAGE.GET_STRING('IGF','IGF_GE_LOCK_ERROR');
607: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
608:
609: WHEN OTHERS THEN
610: ROLLBACK;
608:
609: WHEN OTHERS THEN
610: ROLLBACK;
611: retcode := 2;
612: errbuf := FND_MESSAGE.GET_STRING('IGS','IGS_GE_UNHANDLED_EXCEPTION');
613: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
614:
615: END main_smr;
616:
662: FETCH c_get_ver INTO c_get_ver_rec;
663: --Checking if the data setup for the version is there or not
664: IF c_get_ver%NOTFOUND THEN
665: CLOSE c_get_ver;
666: FND_MESSAGE.SET_NAME('IGF','IGF_DB_DL_VERSION_FALSE');
667: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
668: RETURN;
669: ELSE
670: l_award_year :=c_get_ver_rec.ci_alternate_code;
663: --Checking if the data setup for the version is there or not
664: IF c_get_ver%NOTFOUND THEN
665: CLOSE c_get_ver;
666: FND_MESSAGE.SET_NAME('IGF','IGF_DB_DL_VERSION_FALSE');
667: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
668: RETURN;
669: ELSE
670: l_award_year :=c_get_ver_rec.ci_alternate_code;
671:
679: EXCEPTION
680: WHEN INV_TRL_NUM THEN
681: ROLLBACK;
682: retcode := 2;
683: errbuf := fnd_message.get_string('IGF','IGF_GE_RECORD_NUM_NOT_MATCH');
684:
685: WHEN INVALID_FILE THEN
686: ROLLBACK;
687: retcode := 2;
684:
685: WHEN INVALID_FILE THEN
686: ROLLBACK;
687: retcode := 2;
688: errbuf := fnd_message.get_string('IGF','IGF_GE_INVALID_FILE');
689:
690: WHEN INV_HDR_OR_TLR THEN
691: ROLLBACK;
692: retcode := 2;
689:
690: WHEN INV_HDR_OR_TLR THEN
691: ROLLBACK;
692: retcode := 2;
693: errbuf := fnd_message.get_string('IGF','IGF_GE_FILE_NOT_COMPLETE');
694:
695: WHEN app_exception.record_lock_exception THEN
696: ROLLBACK;
697: retcode := 2;
694:
695: WHEN app_exception.record_lock_exception THEN
696: ROLLBACK;
697: retcode := 2;
698: errbuf := FND_MESSAGE.GET_STRING('IGF','IGF_GE_LOCK_ERROR');
699: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
700:
701: WHEN OTHERS THEN
702: ROLLBACK;
700:
701: WHEN OTHERS THEN
702: ROLLBACK;
703: retcode := 2;
704: errbuf := FND_MESSAGE.GET_STRING('IGS','IGS_GE_UNHANDLED_EXCEPTION');
705: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
706:
707: END main_dtl;
708: