367: CURSOR cur_sequence IS SELECT IGF_GR_PELL_GEN_XML_S.NEXTVAL FROM DUAL;
368:
369: BEGIN
370:
371: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
372: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_fisap.submit_fisap_event','p_batch_id : ' || p_batch_id);
373: END IF;
374:
375: l_parameter_list := wf_parameter_list_t();
368:
369: BEGIN
370:
371: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
372: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_fisap.submit_fisap_event','p_batch_id : ' || p_batch_id);
373: END IF;
374:
375: l_parameter_list := wf_parameter_list_t();
376: l_event_name := 'oracle.apps.igf.aw.fisap';
380: OPEN cur_sequence;
381: FETCH cur_sequence INTO l_event_key;
382: CLOSE cur_sequence;
383:
384: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
385: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_fisap.submit_fisap_event','l_event_key : '||l_event_key);
386: END IF;
387:
388: -- Now add the parameters to the list to be passed to the workflow
381: FETCH cur_sequence INTO l_event_key;
382: CLOSE cur_sequence;
383:
384: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
385: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_fisap.submit_fisap_event','l_event_key : '||l_event_key);
386: END IF;
387:
388: -- Now add the parameters to the list to be passed to the workflow
389:
413: fnd_file.new_line(fnd_file.log,1);
414: fnd_file.put_line(fnd_file.log,fnd_message.get);
415: fnd_file.new_line(fnd_file.log,1);
416:
417: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
418: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_fisap.submit_fisap_event','raised event ');
419: END IF;
420:
421: EXCEPTION
414: fnd_file.put_line(fnd_file.log,fnd_message.get);
415: fnd_file.new_line(fnd_file.log,1);
416:
417: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
418: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_fisap.submit_fisap_event','raised event ');
419: END IF;
420:
421: EXCEPTION
422: WHEN OTHERS THEN
419: END IF;
420:
421: EXCEPTION
422: WHEN OTHERS THEN
423: IF fnd_log.level_exception >= fnd_log.g_current_runtime_level THEN
424: fnd_log.string(fnd_log.level_exception,'igf.plsql.igf_aw_fisap.submit_fisap_event.exception', 'Exception: ' || SQLERRM);
425: END IF;
426: fnd_message.set_name('IGF','IGF_GE_UNHANDLED_EXP');
427: fnd_message.set_token('NAME','IGF_AW_FISAP.SUBMIT_FISAP_EVENT');
420:
421: EXCEPTION
422: WHEN OTHERS THEN
423: IF fnd_log.level_exception >= fnd_log.g_current_runtime_level THEN
424: fnd_log.string(fnd_log.level_exception,'igf.plsql.igf_aw_fisap.submit_fisap_event.exception', 'Exception: ' || SQLERRM);
425: END IF;
426: fnd_message.set_name('IGF','IGF_GE_UNHANDLED_EXP');
427: fnd_message.set_token('NAME','IGF_AW_FISAP.SUBMIT_FISAP_EVENT');
428: igs_ge_msg_stack.add;
425: END IF;
426: fnd_message.set_name('IGF','IGF_GE_UNHANDLED_EXP');
427: fnd_message.set_token('NAME','IGF_AW_FISAP.SUBMIT_FISAP_EVENT');
428: igs_ge_msg_stack.add;
429: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
430: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_fisap.submit_fisap_event.debug', 'SQLERRM: ' || SQLERRM);
431: END IF;
432: app_exception.raise_exception;
433: END submit_fisap_event;
426: fnd_message.set_name('IGF','IGF_GE_UNHANDLED_EXP');
427: fnd_message.set_token('NAME','IGF_AW_FISAP.SUBMIT_FISAP_EVENT');
428: igs_ge_msg_stack.add;
429: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
430: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_fisap.submit_fisap_event.debug', 'SQLERRM: ' || SQLERRM);
431: END IF;
432: app_exception.raise_exception;
433: END submit_fisap_event;
434:
588: lv_reported_time_txt := TO_CHAR(TRUNC(SYSDATE), 'YYYY-MM-DD') || 'T' || TO_CHAR(SYSDATE, 'HH:MM:SS');
589: lv_cal_type := RTRIM(SUBSTR(p_award_year,1,10));
590: ln_seq_number := TO_NUMBER(RTRIM(SUBSTR(p_award_year,11)));
591:
592: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
593: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_gen_xml.main.debug', 'p_award_year: ' || p_award_year);
594: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_gen_xml.main.debug', 'award cal_type : ' || lv_cal_type);
595: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_gen_xml.main.debug', 'award ci_seq_num : ' || ln_seq_number);
596: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_gen_xml.main.debug', 'p_retain_prev_batches: ' || p_retain_prev_batches);
589: lv_cal_type := RTRIM(SUBSTR(p_award_year,1,10));
590: ln_seq_number := TO_NUMBER(RTRIM(SUBSTR(p_award_year,11)));
591:
592: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
593: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_gen_xml.main.debug', 'p_award_year: ' || p_award_year);
594: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_gen_xml.main.debug', 'award cal_type : ' || lv_cal_type);
595: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_gen_xml.main.debug', 'award ci_seq_num : ' || ln_seq_number);
596: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_gen_xml.main.debug', 'p_retain_prev_batches: ' || p_retain_prev_batches);
597: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_gen_xml.main.debug', 'p_descrption: ' || p_descrption);
590: ln_seq_number := TO_NUMBER(RTRIM(SUBSTR(p_award_year,11)));
591:
592: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
593: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_gen_xml.main.debug', 'p_award_year: ' || p_award_year);
594: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_gen_xml.main.debug', 'award cal_type : ' || lv_cal_type);
595: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_gen_xml.main.debug', 'award ci_seq_num : ' || ln_seq_number);
596: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_gen_xml.main.debug', 'p_retain_prev_batches: ' || p_retain_prev_batches);
597: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_gen_xml.main.debug', 'p_descrption: ' || p_descrption);
598: END IF;
591:
592: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
593: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_gen_xml.main.debug', 'p_award_year: ' || p_award_year);
594: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_gen_xml.main.debug', 'award cal_type : ' || lv_cal_type);
595: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_gen_xml.main.debug', 'award ci_seq_num : ' || ln_seq_number);
596: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_gen_xml.main.debug', 'p_retain_prev_batches: ' || p_retain_prev_batches);
597: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_gen_xml.main.debug', 'p_descrption: ' || p_descrption);
598: END IF;
599:
592: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
593: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_gen_xml.main.debug', 'p_award_year: ' || p_award_year);
594: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_gen_xml.main.debug', 'award cal_type : ' || lv_cal_type);
595: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_gen_xml.main.debug', 'award ci_seq_num : ' || ln_seq_number);
596: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_gen_xml.main.debug', 'p_retain_prev_batches: ' || p_retain_prev_batches);
597: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_gen_xml.main.debug', 'p_descrption: ' || p_descrption);
598: END IF;
599:
600: -- Step 1. Print parameters
593: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_gen_xml.main.debug', 'p_award_year: ' || p_award_year);
594: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_gen_xml.main.debug', 'award cal_type : ' || lv_cal_type);
595: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_gen_xml.main.debug', 'award ci_seq_num : ' || ln_seq_number);
596: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_gen_xml.main.debug', 'p_retain_prev_batches: ' || p_retain_prev_batches);
597: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_gen_xml.main.debug', 'p_descrption: ' || p_descrption);
598: END IF;
599:
600: -- Step 1. Print parameters
601: log_input_parameters(lv_cal_type, ln_seq_number, p_retain_prev_batches, p_descrption);
599:
600: -- Step 1. Print parameters
601: log_input_parameters(lv_cal_type, ln_seq_number, p_retain_prev_batches, p_descrption);
602:
603: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
604: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_gen_xml.main.debug','after log parameters');
605: END IF;
606:
607: -- Step 2. Delete previous batches
600: -- Step 1. Print parameters
601: log_input_parameters(lv_cal_type, ln_seq_number, p_retain_prev_batches, p_descrption);
602:
603: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
604: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_gen_xml.main.debug','after log parameters');
605: END IF;
606:
607: -- Step 2. Delete previous batches
608: IF (p_retain_prev_batches = 'N') THEN
617: -- delete from the parent(batch) table
618: igf_aw_fisap_batch_pkg.delete_row(rec_fisap_batch.row_id);
619: END LOOP;
620: END IF;
621: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
622: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_gen_xml.main.debug','after deleting previous batches');
623: END IF;
624:
625: -- Step 3. Insert eligible aid applicants into reporting table.
618: igf_aw_fisap_batch_pkg.delete_row(rec_fisap_batch.row_id);
619: END LOOP;
620: END IF;
621: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
622: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_gen_xml.main.debug','after deleting previous batches');
623: END IF;
624:
625: -- Step 3. Insert eligible aid applicants into reporting table.
626: FOR rec_student IN cur_students(lv_cal_type, ln_seq_number)
1141:
1142: -- Part II. Eligible Aid Grid data. 14 Rows.
1143: OPEN cur_2f_depend_smry(lv_cal_type, ln_seq_number, ln_batch_id);
1144: OPEN cur_2f_independ_smry(lv_cal_type, ln_seq_number, ln_batch_id);
1145: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1146: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_fisap_pkg.generate_partII.debug', 'Part II 1-14 rows cursor parameter values(cal type, seq no, batch id): ' || lv_cal_type || ', ' || ln_seq_number || ', ' || ln_batch_id);
1147: END IF;
1148:
1149: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1142: -- Part II. Eligible Aid Grid data. 14 Rows.
1143: OPEN cur_2f_depend_smry(lv_cal_type, ln_seq_number, ln_batch_id);
1144: OPEN cur_2f_independ_smry(lv_cal_type, ln_seq_number, ln_batch_id);
1145: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1146: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_fisap_pkg.generate_partII.debug', 'Part II 1-14 rows cursor parameter values(cal type, seq no, batch id): ' || lv_cal_type || ', ' || ln_seq_number || ', ' || ln_batch_id);
1147: END IF;
1148:
1149: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1150: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_fisap_pkg.generate_partII.debug', 'Before entering Part II 14 rows loop');
1145: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1146: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_fisap_pkg.generate_partII.debug', 'Part II 1-14 rows cursor parameter values(cal type, seq no, batch id): ' || lv_cal_type || ', ' || ln_seq_number || ', ' || ln_batch_id);
1147: END IF;
1148:
1149: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1150: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_fisap_pkg.generate_partII.debug', 'Before entering Part II 14 rows loop');
1151: END IF;
1152:
1153: lv_and_over_mesg := get_lookup_meaning('IGF_AW_FISAP_HTML_REP','AND_OVER');
1146: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_fisap_pkg.generate_partII.debug', 'Part II 1-14 rows cursor parameter values(cal type, seq no, batch id): ' || lv_cal_type || ', ' || ln_seq_number || ', ' || ln_batch_id);
1147: END IF;
1148:
1149: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1150: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_fisap_pkg.generate_partII.debug', 'Before entering Part II 14 rows loop');
1151: END IF;
1152:
1153: lv_and_over_mesg := get_lookup_meaning('IGF_AW_FISAP_HTML_REP','AND_OVER');
1154: LOOP
1159: EXIT;
1160: END IF;
1161:
1162: l_c_document := l_c_document || '
1160: END IF;
1161:
1162: l_c_document := l_c_document || '
1168: end_range_amt_txt := ' ' || lv_and_over_mesg;
1169: ELSE
1170: end_range_amt_txt := ' - $' || rec_2f_depend_smry.end_range_amt;
1171: END IF;
1172: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1173: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_fisap_pkg.generate_partII.debug', '2F Depend Start range = ' || end_range_amt_txt);
1174: END IF;
1175:
1176: l_c_document := l_c_document || end_range_amt_txt || '
1169: ELSE
1170: end_range_amt_txt := ' - $' || rec_2f_depend_smry.end_range_amt;
1171: END IF;
1172: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1173: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_fisap_pkg.generate_partII.debug', '2F Depend Start range = ' || end_range_amt_txt);
1174: END IF;
1175:
1176: l_c_document := l_c_document || end_range_amt_txt || '
1223:
1224: l_c_document := l_c_document||'
1224: l_c_document := l_c_document||'
1229: END IF;
1230: FOR rec IN cur_6a_ugdepend(lv_cal_type, ln_seq_number, ln_batch_id) LOOP
1231: ln_line_num := ln_line_num + 1;
1232: l_c_document := l_c_document || '
1230: FOR rec IN cur_6a_ugdepend(lv_cal_type, ln_seq_number, ln_batch_id) LOOP
1231: ln_line_num := ln_line_num + 1;
1232: l_c_document := l_c_document || '
1257:
1258: l_c_document := l_c_document || '
1258: l_c_document := l_c_document || '
1263: END IF;
1264: FOR rec IN cur_6a_ugindepend(lv_cal_type, ln_seq_number, ln_batch_id) LOOP
1265: ln_line_num := ln_line_num + 1;
1266: l_c_document := l_c_document || '
1264: FOR rec IN cur_6a_ugindepend(lv_cal_type, ln_seq_number, ln_batch_id) LOOP
1265: ln_line_num := ln_line_num + 1;
1266: l_c_document := l_c_document || '