[Home] [Help]
1045: FETCH c_group INTO l_group;
1046: IF ( c_group%NOTFOUND ) THEN
1047: fnd_message.set_name('IGF','IGF_AW_NO_STUDENTS');
1048: fnd_message.set_token('CODE', l_group_code );
1049: fnd_file.put_line(fnd_file.log,fnd_message.get);
1050: fnd_file.put_line(fnd_file.log,' ');
1051:
1052: ELSE
1053:
1046: IF ( c_group%NOTFOUND ) THEN
1047: fnd_message.set_name('IGF','IGF_AW_NO_STUDENTS');
1048: fnd_message.set_token('CODE', l_group_code );
1049: fnd_file.put_line(fnd_file.log,fnd_message.get);
1050: fnd_file.put_line(fnd_file.log,' ');
1051:
1052: ELSE
1053:
1054: -- Run for each student in the Given group. Insert the Calculated Need into the Temp Table. After calculating the
1287: x_full_resp_code => l_pell_orig.full_resp_code,
1288: x_document_id_txt => l_pell_orig.document_id_txt
1289: );
1290: fnd_message.set_name('IGF','IGF_GR_REORIG_PELL');
1291: fnd_file.put_line(fnd_file.log,fnd_message.get);
1292: END LOOP;
1293: END update_pell_orig_stat;
1294:
1295: PROCEDURE update_loan_stat(
1476: OPEN c_fund_code(awd_rec.fund_id);
1477: FETCH c_fund_code INTO l_fund_code;
1478: CLOSE c_fund_code;
1479: fnd_message.set_token('FUND',l_fund_code);
1480: fnd_file.put_line(fnd_file.log,fnd_message.get);
1481:
1482: FOR disb_rec IN c_disb(p_award_id) LOOP
1483:
1484: igf_aw_awd_disb_pkg.update_row(
2521:
2522: -- Log the Award details of the student in the OUTPUT file
2523: get_plan_desc(l_awd_tot.adplans_id,lv_method_name,lv_method_desc);
2524:
2525: fnd_file.put_line(fnd_file.output,' ' );
2526: fnd_file.put_line(fnd_file.output,' ' );
2527: fnd_message.set_name('IGF','IGF_AW_AWD_DTLS');
2528: fnd_file.put_line(fnd_file.output,RPAD('-',10,'-') ||' '|| RPAD(fnd_message.get,20) ||' '|| RPAD('-',10,'-'));
2529:
2522: -- Log the Award details of the student in the OUTPUT file
2523: get_plan_desc(l_awd_tot.adplans_id,lv_method_name,lv_method_desc);
2524:
2525: fnd_file.put_line(fnd_file.output,' ' );
2526: fnd_file.put_line(fnd_file.output,' ' );
2527: fnd_message.set_name('IGF','IGF_AW_AWD_DTLS');
2528: fnd_file.put_line(fnd_file.output,RPAD('-',10,'-') ||' '|| RPAD(fnd_message.get,20) ||' '|| RPAD('-',10,'-'));
2529:
2530: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'PERSON_NUMBER'), 40, ' ') || ' : ' || l_person_number.person_number );
2524:
2525: fnd_file.put_line(fnd_file.output,' ' );
2526: fnd_file.put_line(fnd_file.output,' ' );
2527: fnd_message.set_name('IGF','IGF_AW_AWD_DTLS');
2528: fnd_file.put_line(fnd_file.output,RPAD('-',10,'-') ||' '|| RPAD(fnd_message.get,20) ||' '|| RPAD('-',10,'-'));
2529:
2530: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'PERSON_NUMBER'), 40, ' ') || ' : ' || l_person_number.person_number );
2531: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'SSN'), 40, ' ') || ' : ' || l_person_number.ssn );
2532: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'FUND_CODE'), 40, ' ') || ' : ' || l_fmast.fund_code);
2526: fnd_file.put_line(fnd_file.output,' ' );
2527: fnd_message.set_name('IGF','IGF_AW_AWD_DTLS');
2528: fnd_file.put_line(fnd_file.output,RPAD('-',10,'-') ||' '|| RPAD(fnd_message.get,20) ||' '|| RPAD('-',10,'-'));
2529:
2530: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'PERSON_NUMBER'), 40, ' ') || ' : ' || l_person_number.person_number );
2531: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'SSN'), 40, ' ') || ' : ' || l_person_number.ssn );
2532: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'FUND_CODE'), 40, ' ') || ' : ' || l_fmast.fund_code);
2533: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'OFFERED_AMT'), 40, ' ') || ' : ' || TO_CHAR(l_awd_tot.offered_amt * ln_com_perct/100) );
2534: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','AWD_DIST_PLAN'), 40, ' ') || ' : ' || lv_method_name);
2527: fnd_message.set_name('IGF','IGF_AW_AWD_DTLS');
2528: fnd_file.put_line(fnd_file.output,RPAD('-',10,'-') ||' '|| RPAD(fnd_message.get,20) ||' '|| RPAD('-',10,'-'));
2529:
2530: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'PERSON_NUMBER'), 40, ' ') || ' : ' || l_person_number.person_number );
2531: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'SSN'), 40, ' ') || ' : ' || l_person_number.ssn );
2532: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'FUND_CODE'), 40, ' ') || ' : ' || l_fmast.fund_code);
2533: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'OFFERED_AMT'), 40, ' ') || ' : ' || TO_CHAR(l_awd_tot.offered_amt * ln_com_perct/100) );
2534: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','AWD_DIST_PLAN'), 40, ' ') || ' : ' || lv_method_name);
2535: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','DIST_PLAN_METHOD'),40,' ') || ' : ' || lv_method_desc);
2528: fnd_file.put_line(fnd_file.output,RPAD('-',10,'-') ||' '|| RPAD(fnd_message.get,20) ||' '|| RPAD('-',10,'-'));
2529:
2530: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'PERSON_NUMBER'), 40, ' ') || ' : ' || l_person_number.person_number );
2531: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'SSN'), 40, ' ') || ' : ' || l_person_number.ssn );
2532: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'FUND_CODE'), 40, ' ') || ' : ' || l_fmast.fund_code);
2533: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'OFFERED_AMT'), 40, ' ') || ' : ' || TO_CHAR(l_awd_tot.offered_amt * ln_com_perct/100) );
2534: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','AWD_DIST_PLAN'), 40, ' ') || ' : ' || lv_method_name);
2535: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','DIST_PLAN_METHOD'),40,' ') || ' : ' || lv_method_desc);
2536: fnd_file.put_line(fnd_file.output,' ' );
2529:
2530: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'PERSON_NUMBER'), 40, ' ') || ' : ' || l_person_number.person_number );
2531: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'SSN'), 40, ' ') || ' : ' || l_person_number.ssn );
2532: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'FUND_CODE'), 40, ' ') || ' : ' || l_fmast.fund_code);
2533: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'OFFERED_AMT'), 40, ' ') || ' : ' || TO_CHAR(l_awd_tot.offered_amt * ln_com_perct/100) );
2534: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','AWD_DIST_PLAN'), 40, ' ') || ' : ' || lv_method_name);
2535: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','DIST_PLAN_METHOD'),40,' ') || ' : ' || lv_method_desc);
2536: fnd_file.put_line(fnd_file.output,' ' );
2537:
2530: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'PERSON_NUMBER'), 40, ' ') || ' : ' || l_person_number.person_number );
2531: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'SSN'), 40, ' ') || ' : ' || l_person_number.ssn );
2532: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'FUND_CODE'), 40, ' ') || ' : ' || l_fmast.fund_code);
2533: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'OFFERED_AMT'), 40, ' ') || ' : ' || TO_CHAR(l_awd_tot.offered_amt * ln_com_perct/100) );
2534: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','AWD_DIST_PLAN'), 40, ' ') || ' : ' || lv_method_name);
2535: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','DIST_PLAN_METHOD'),40,' ') || ' : ' || lv_method_desc);
2536: fnd_file.put_line(fnd_file.output,' ' );
2537:
2538: l_fee1 := NULL;
2531: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'SSN'), 40, ' ') || ' : ' || l_person_number.ssn );
2532: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'FUND_CODE'), 40, ' ') || ' : ' || l_fmast.fund_code);
2533: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'OFFERED_AMT'), 40, ' ') || ' : ' || TO_CHAR(l_awd_tot.offered_amt * ln_com_perct/100) );
2534: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','AWD_DIST_PLAN'), 40, ' ') || ' : ' || lv_method_name);
2535: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','DIST_PLAN_METHOD'),40,' ') || ' : ' || lv_method_desc);
2536: fnd_file.put_line(fnd_file.output,' ' );
2537:
2538: l_fee1 := NULL;
2539: l_fee2 := NULL;
2532: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'FUND_CODE'), 40, ' ') || ' : ' || l_fmast.fund_code);
2533: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'OFFERED_AMT'), 40, ' ') || ' : ' || TO_CHAR(l_awd_tot.offered_amt * ln_com_perct/100) );
2534: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','AWD_DIST_PLAN'), 40, ' ') || ' : ' || lv_method_name);
2535: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','DIST_PLAN_METHOD'),40,' ') || ' : ' || lv_method_desc);
2536: fnd_file.put_line(fnd_file.output,' ' );
2537:
2538: l_fee1 := NULL;
2539: l_fee2 := NULL;
2540:
2617: ROLLBACK TO disb_not_found;
2618: l_ret_status := 'D'; -- No disbursements created
2619: fnd_message.set_name('IGF','IGF_AW_SKP_FUND');
2620: fnd_message.set_token('FUND',l_fmast.fund_code);
2621: fnd_file.put_line(fnd_file.log,fnd_message.get);
2622: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
2623: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.post_award.debug '|| g_req_id,'raising skip_record as total disbursements is 0');
2624: END IF;
2625: RAISE SKIP_RECORD;
2656: */
2657: fnd_message.set_name('IGF','IGF_AW_ENTITLE_OVAWD');
2658: fnd_message.set_token('FUND_CODE',l_fmast.fund_code);
2659: fnd_message.set_token('AWD',TO_CHAR(l_awd_tot.offered_amt * ln_com_perct / 100));
2660: fnd_file.put_line(fnd_file.log,fnd_message.get);
2661: END IF;
2662:
2663: IF g_sf_packaging = 'F' AND l_hld_flg = 'Y' AND l_fmast.entitlement <> 'Y' THEN
2664: /*
3129: -- here, a check is made on the fed_fund_code of the fund and paid_amt.
3130: IF l_fmast.fed_fund_code = 'FWS' AND l_award_det.paid_amt > l_awd_tot.offered_amt THEN
3131: --skip the student
3132: fnd_message.set_name('IGF','IGF_AW_INV_FWS_AWD');
3133: fnd_file.put_line(fnd_file.log,fnd_message.get);
3134: RAISE INV_FWS_AWARD;
3135: END IF;
3136:
3137: IF l_award_det.award_status = 'CANCELLED' THEN
3209:
3210: -- Log the Award details of the student in the OUTPUT file
3211: get_plan_desc(l_awd_tot.adplans_id,lv_method_name,lv_method_desc);
3212:
3213: fnd_file.put_line(fnd_file.output,' ' );
3214: fnd_file.put_line(fnd_file.output,' ' );
3215: fnd_message.set_name('IGF','IGF_AW_AWD_DTLS');
3216: fnd_file.put_line(fnd_file.output,RPAD('-',10,'-') ||' '|| RPAD(fnd_message.get,20) ||' '|| RPAD('-',10,'-'));
3217:
3210: -- Log the Award details of the student in the OUTPUT file
3211: get_plan_desc(l_awd_tot.adplans_id,lv_method_name,lv_method_desc);
3212:
3213: fnd_file.put_line(fnd_file.output,' ' );
3214: fnd_file.put_line(fnd_file.output,' ' );
3215: fnd_message.set_name('IGF','IGF_AW_AWD_DTLS');
3216: fnd_file.put_line(fnd_file.output,RPAD('-',10,'-') ||' '|| RPAD(fnd_message.get,20) ||' '|| RPAD('-',10,'-'));
3217:
3218: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'PERSON_NUMBER'), 40, ' ') || ' : ' || l_person_number.person_number );
3212:
3213: fnd_file.put_line(fnd_file.output,' ' );
3214: fnd_file.put_line(fnd_file.output,' ' );
3215: fnd_message.set_name('IGF','IGF_AW_AWD_DTLS');
3216: fnd_file.put_line(fnd_file.output,RPAD('-',10,'-') ||' '|| RPAD(fnd_message.get,20) ||' '|| RPAD('-',10,'-'));
3217:
3218: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'PERSON_NUMBER'), 40, ' ') || ' : ' || l_person_number.person_number );
3219: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'SSN'), 40, ' ') || ' : ' || l_person_number.ssn );
3220: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'FUND_CODE'), 40, ' ') || ' : ' || l_fmast.fund_code);
3214: fnd_file.put_line(fnd_file.output,' ' );
3215: fnd_message.set_name('IGF','IGF_AW_AWD_DTLS');
3216: fnd_file.put_line(fnd_file.output,RPAD('-',10,'-') ||' '|| RPAD(fnd_message.get,20) ||' '|| RPAD('-',10,'-'));
3217:
3218: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'PERSON_NUMBER'), 40, ' ') || ' : ' || l_person_number.person_number );
3219: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'SSN'), 40, ' ') || ' : ' || l_person_number.ssn );
3220: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'FUND_CODE'), 40, ' ') || ' : ' || l_fmast.fund_code);
3221: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'OFFERED_AMT'), 40, ' ') || ' : ' || TO_CHAR(l_awd_tot.offered_amt * ln_com_perct/100) );
3222: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','AWD_DIST_PLAN'), 40, ' ') || ' : ' || lv_method_name);
3215: fnd_message.set_name('IGF','IGF_AW_AWD_DTLS');
3216: fnd_file.put_line(fnd_file.output,RPAD('-',10,'-') ||' '|| RPAD(fnd_message.get,20) ||' '|| RPAD('-',10,'-'));
3217:
3218: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'PERSON_NUMBER'), 40, ' ') || ' : ' || l_person_number.person_number );
3219: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'SSN'), 40, ' ') || ' : ' || l_person_number.ssn );
3220: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'FUND_CODE'), 40, ' ') || ' : ' || l_fmast.fund_code);
3221: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'OFFERED_AMT'), 40, ' ') || ' : ' || TO_CHAR(l_awd_tot.offered_amt * ln_com_perct/100) );
3222: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','AWD_DIST_PLAN'), 40, ' ') || ' : ' || lv_method_name);
3223: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','DIST_PLAN_METHOD'),40,' ') || ' : ' || lv_method_desc);
3216: fnd_file.put_line(fnd_file.output,RPAD('-',10,'-') ||' '|| RPAD(fnd_message.get,20) ||' '|| RPAD('-',10,'-'));
3217:
3218: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'PERSON_NUMBER'), 40, ' ') || ' : ' || l_person_number.person_number );
3219: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'SSN'), 40, ' ') || ' : ' || l_person_number.ssn );
3220: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'FUND_CODE'), 40, ' ') || ' : ' || l_fmast.fund_code);
3221: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'OFFERED_AMT'), 40, ' ') || ' : ' || TO_CHAR(l_awd_tot.offered_amt * ln_com_perct/100) );
3222: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','AWD_DIST_PLAN'), 40, ' ') || ' : ' || lv_method_name);
3223: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','DIST_PLAN_METHOD'),40,' ') || ' : ' || lv_method_desc);
3224: fnd_file.put_line(fnd_file.output,' ' );
3217:
3218: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'PERSON_NUMBER'), 40, ' ') || ' : ' || l_person_number.person_number );
3219: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'SSN'), 40, ' ') || ' : ' || l_person_number.ssn );
3220: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'FUND_CODE'), 40, ' ') || ' : ' || l_fmast.fund_code);
3221: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'OFFERED_AMT'), 40, ' ') || ' : ' || TO_CHAR(l_awd_tot.offered_amt * ln_com_perct/100) );
3222: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','AWD_DIST_PLAN'), 40, ' ') || ' : ' || lv_method_name);
3223: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','DIST_PLAN_METHOD'),40,' ') || ' : ' || lv_method_desc);
3224: fnd_file.put_line(fnd_file.output,' ' );
3225:
3218: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'PERSON_NUMBER'), 40, ' ') || ' : ' || l_person_number.person_number );
3219: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'SSN'), 40, ' ') || ' : ' || l_person_number.ssn );
3220: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'FUND_CODE'), 40, ' ') || ' : ' || l_fmast.fund_code);
3221: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'OFFERED_AMT'), 40, ' ') || ' : ' || TO_CHAR(l_awd_tot.offered_amt * ln_com_perct/100) );
3222: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','AWD_DIST_PLAN'), 40, ' ') || ' : ' || lv_method_name);
3223: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','DIST_PLAN_METHOD'),40,' ') || ' : ' || lv_method_desc);
3224: fnd_file.put_line(fnd_file.output,' ' );
3225:
3226: l_fee1 := NULL;
3219: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'SSN'), 40, ' ') || ' : ' || l_person_number.ssn );
3220: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'FUND_CODE'), 40, ' ') || ' : ' || l_fmast.fund_code);
3221: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'OFFERED_AMT'), 40, ' ') || ' : ' || TO_CHAR(l_awd_tot.offered_amt * ln_com_perct/100) );
3222: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','AWD_DIST_PLAN'), 40, ' ') || ' : ' || lv_method_name);
3223: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','DIST_PLAN_METHOD'),40,' ') || ' : ' || lv_method_desc);
3224: fnd_file.put_line(fnd_file.output,' ' );
3225:
3226: l_fee1 := NULL;
3227: l_fee2 := NULL;
3220: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'FUND_CODE'), 40, ' ') || ' : ' || l_fmast.fund_code);
3221: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG', 'OFFERED_AMT'), 40, ' ') || ' : ' || TO_CHAR(l_awd_tot.offered_amt * ln_com_perct/100) );
3222: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','AWD_DIST_PLAN'), 40, ' ') || ' : ' || lv_method_name);
3223: fnd_file.put_line(fnd_file.output,RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','DIST_PLAN_METHOD'),40,' ') || ' : ' || lv_method_desc);
3224: fnd_file.put_line(fnd_file.output,' ' );
3225:
3226: l_fee1 := NULL;
3227: l_fee2 := NULL;
3228:
3288: ROLLBACK TO disb_not_found;
3289: l_ret_status := 'D'; -- No disbursements created
3290: fnd_message.set_name('IGF','IGF_AW_SKP_FUND');
3291: fnd_message.set_token('FUND',l_fmast.fund_code);
3292: fnd_file.put_line(fnd_file.log,fnd_message.get);
3293: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
3294: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.post_award.debug '|| g_req_id,'raising skip_record as total disbursements is 0');
3295: END IF;
3296: RAISE SKIP_RECORD;
3327: */
3328: fnd_message.set_name('IGF','IGF_AW_ENTITLE_OVAWD');
3329: fnd_message.set_token('FUND_CODE',l_fmast.fund_code);
3330: fnd_message.set_token('AWD',TO_CHAR(l_awd_tot.offered_amt * ln_com_perct / 100));
3331: fnd_file.put_line(fnd_file.log,fnd_message.get);
3332: END IF;
3333:
3334: IF g_sf_packaging = 'F' AND l_hld_flg = 'Y' AND l_fmast.entitlement <> 'Y' THEN
3335: /*
4806: OPEN c_fund(l_non_merge.fund_id);
4807: FETCH c_fund INTO l_fund_code;
4808: CLOSE c_fund;
4809: fnd_message.set_token('FUND_CODE',l_fund_code);
4810: fnd_file.put_line(fnd_file.log,fnd_message.get);
4811: RAISE NON_MERGABLE_FUNDS;
4812: END IF;
4813:
4814: --at this point, we know there are funds to be merged and all those can be merged.
5225: If fund is PELL,print a message
5226: */
5227: IF lv_fed_fund_code = 'PELL' THEN
5228: fnd_message.set_name('IGF','IGF_GR_ORIG_SENT_NO_RECALC');
5229: fnd_file.put_line(fnd_file.log,fnd_message.get);
5230: END IF;
5231: ELSE
5232: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
5233: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.load_awards.debug '|| g_req_id,'not originated');
5243: IF fund is PELL,print a message
5244: */
5245: IF lv_fed_fund_code = 'PELL' AND isOriginated(p_fund_id,l_awds.award_id) THEN
5246: fnd_message.set_name('IGF','IGF_GR_ORIG_SENT_NO_RECALC');
5247: fnd_file.put_line(fnd_file.log,fnd_message.get);
5248: END IF;
5249: ELSE
5250: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
5251: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.load_awards.debug '|| g_req_id,'passed orig_or_actual chk');
5949: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
5950: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.load_funds.debug '|| g_req_id,'c_rmv_funds_check%NOTFOUND=TRUE');
5951: END IF;
5952: -- Log the message in the log file
5953: fnd_file.put_line(fnd_file.log,' ');
5954: fnd_message.set_name('IGF','IGF_AW_SKIP_REC');
5955: lv_message_str := fnd_message.get;
5956: lv_message_str := lv_message_str || l_fund_ld.fund_code || '. ';
5957:
5958: fnd_message.set_name('IGF','IGF_AP_STUD_NOT_QLFY_GRP');
5959: fnd_message.set_token('GROUP',lc_rmv_funds.group_cd);
5960:
5961: lv_message_str := lv_message_str || fnd_message.get;
5962: fnd_file.put_line(fnd_file.log,lv_message_str);
5963: fnd_file.put_line(fnd_file.log,' ');
5964: END IF;
5965: END IF;
5966: CLOSE c_rmv_funds;
5959: fnd_message.set_token('GROUP',lc_rmv_funds.group_cd);
5960:
5961: lv_message_str := lv_message_str || fnd_message.get;
5962: fnd_file.put_line(fnd_file.log,lv_message_str);
5963: fnd_file.put_line(fnd_file.log,' ');
5964: END IF;
5965: END IF;
5966: CLOSE c_rmv_funds;
5967:
5973: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.load_funds.debug '|| g_req_id,'after c_remv_funds cursor loop,igf_aw_gen_005.get_stud_hold_effect(A,'||l_person_id||','||l_fund_ld.fund_code||'=F');
5974: END IF;
5975: fnd_message.set_name('IGF','IGF_AW_AWD_FUND_HOLD_FAIL');
5976: fnd_message.set_token('FUND',l_fund_ld.fund_code);
5977: fnd_file.put_line(fnd_file.log,fnd_message.get);
5978: lb_create_funds := FALSE;
5979: lb_elig_funds := FALSE;
5980: END IF;
5981:
6004: lb_create_funds := FALSE;
6005:
6006: fnd_message.set_name('IGF','IGF_AW_PROC_FUND');
6007: fnd_message.set_token('FUND',l_fund_ld.fund_code);
6008: fnd_file.put_line(fnd_file.log,fnd_message.get);
6009:
6010: fnd_message.set_name('IGF','IGF_AW_COA_COMMON_TERMS_FAIL');
6011: get_plan_desc(l_fund_ld.adplans_id,lv_name,lv_desc);
6012: fnd_message.set_token('PLAN_CD',lv_name);
6009:
6010: fnd_message.set_name('IGF','IGF_AW_COA_COMMON_TERMS_FAIL');
6011: get_plan_desc(l_fund_ld.adplans_id,lv_name,lv_desc);
6012: fnd_message.set_token('PLAN_CD',lv_name);
6013: fnd_file.put_line(fnd_file.log,fnd_message.get);
6014:
6015: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
6016: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.load_funds.debug '|| g_req_id,'not loading fund '||l_fund_ld.fund_code||' as common terms failed for the MATCH COA distribution');
6017: END IF;
6024: lb_create_funds := FALSE;
6025:
6026: fnd_message.set_name('IGF','IGF_AW_PROC_FUND');
6027: fnd_message.set_token('FUND',l_fund_ld.fund_code);
6028: fnd_file.put_line(fnd_file.log,fnd_message.get);
6029:
6030: fnd_message.set_name('IGF','IGF_AW_COA_COMMON_TERMS_FAIL');
6031: get_plan_desc(NVL(l_fund_ld.adplans_id,g_plan_id),lv_name,lv_desc);
6032: fnd_message.set_token('PLAN_CD',lv_name);
6029:
6030: fnd_message.set_name('IGF','IGF_AW_COA_COMMON_TERMS_FAIL');
6031: get_plan_desc(NVL(l_fund_ld.adplans_id,g_plan_id),lv_name,lv_desc);
6032: fnd_message.set_token('PLAN_CD',lv_name);
6033: fnd_file.put_line(fnd_file.log,fnd_message.get);
6034:
6035: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
6036: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.load_funds.debug '|| g_req_id,'not loading fund '||l_fund_ld.fund_code||' as common terms = 0');
6037: END IF;
6041: ELSIF l_fund_ld.max_num_disb IS NOT NULL AND l_terms > l_fund_ld.max_num_disb THEN
6042:
6043: fnd_message.set_name('IGF','IGF_AW_PROC_FUND');
6044: fnd_message.set_token('FUND',l_fund_ld.fund_code);
6045: fnd_file.put_line(fnd_file.log,fnd_message.get);
6046:
6047: fnd_message.set_name('IGF','IGF_AW_MAX_NUM_DISB_EXCEEDED');
6048: fnd_file.put_line(fnd_file.log,fnd_message.get);
6049: lb_create_funds := FALSE;
6044: fnd_message.set_token('FUND',l_fund_ld.fund_code);
6045: fnd_file.put_line(fnd_file.log,fnd_message.get);
6046:
6047: fnd_message.set_name('IGF','IGF_AW_MAX_NUM_DISB_EXCEEDED');
6048: fnd_file.put_line(fnd_file.log,fnd_message.get);
6049: lb_create_funds := FALSE;
6050: ELSIF l_fund_ld.min_num_disb IS NOT NULL AND l_terms < l_fund_ld.min_num_disb THEN
6051:
6052: fnd_message.set_name('IGF','IGF_AW_PROC_FUND');
6050: ELSIF l_fund_ld.min_num_disb IS NOT NULL AND l_terms < l_fund_ld.min_num_disb THEN
6051:
6052: fnd_message.set_name('IGF','IGF_AW_PROC_FUND');
6053: fnd_message.set_token('FUND',l_fund_ld.fund_code);
6054: fnd_file.put_line(fnd_file.log,fnd_message.get);
6055:
6056: fnd_message.set_name('IGF','IGF_AW_MIN_NUM_DISB_NOT_EXCEED');
6057: fnd_file.put_line(fnd_file.log,fnd_message.get);
6058: lb_create_funds := FALSE;
6053: fnd_message.set_token('FUND',l_fund_ld.fund_code);
6054: fnd_file.put_line(fnd_file.log,fnd_message.get);
6055:
6056: fnd_message.set_name('IGF','IGF_AW_MIN_NUM_DISB_NOT_EXCEED');
6057: fnd_file.put_line(fnd_file.log,fnd_message.get);
6058: lb_create_funds := FALSE;
6059: END IF;
6060:
6061: IF l_fund_ld.max_num_disb IS NULL THEN
6064:
6065: IF lv_fed_fund_code IN ('DLP','FLP') THEN -- PLUS
6066: IF l_terms > 4 THEN
6067: fnd_message.set_name('IGF','IGF_AW_PLUS_DISB');
6068: fnd_file.put_line(fnd_file.log,fnd_message.get);
6069: lb_create_funds := FALSE;
6070: END IF;
6071:
6072: ELSIF lv_fed_fund_code IN ('DLS','FLS','DLU','FLU') THEN -- S.UNS.
6071:
6072: ELSIF lv_fed_fund_code IN ('DLS','FLS','DLU','FLU') THEN -- S.UNS.
6073: IF l_terms > 20 THEN
6074: fnd_message.set_name('IGF','IGF_AW_SUNS_DISB');
6075: fnd_file.put_line(fnd_file.log,fnd_message.get);
6076: lb_create_funds := FALSE;
6077: END IF;
6078:
6079: ELSIF lv_fed_fund_code = 'PELL' THEN
6081: -- If the maximum disb num is not specified, for Pell it can be 90
6082: --
6083: IF l_terms > 90 THEN
6084: fnd_message.set_name('IGF','IGF_AW_PELL_DISB');
6085: fnd_file.put_line(fnd_file.log,fnd_message.get);
6086: lb_create_funds := FALSE;
6087: END IF;
6088:
6089: END IF;
6100: -- get the rel_code assosiated with the fund_code and check if the set up is present
6101: IF l_alt_rel_code IS NULL THEN
6102: fnd_message.set_name('IGF','IGF_AW_PROC_FUND');
6103: fnd_message.set_token('FUND',l_fund_ld.fund_code);
6104: fnd_file.put_line(fnd_file.log,fnd_message.get);
6105: fnd_message.set_name('IGF','IGF_AW_NO_ALT_LOAN_CD');
6106: fnd_file.put_line(fnd_file.log,fnd_message.get);
6107: lb_create_funds := FALSE;
6108: lb_elig_funds := FALSE;
6102: fnd_message.set_name('IGF','IGF_AW_PROC_FUND');
6103: fnd_message.set_token('FUND',l_fund_ld.fund_code);
6104: fnd_file.put_line(fnd_file.log,fnd_message.get);
6105: fnd_message.set_name('IGF','IGF_AW_NO_ALT_LOAN_CD');
6106: fnd_file.put_line(fnd_file.log,fnd_message.get);
6107: lb_create_funds := FALSE;
6108: lb_elig_funds := FALSE;
6109: ELSE
6110: -- this will ensure whether that relationship code has a set up for the context award year
6111: igf_sl_award.pick_setup(l_base_id,l_ci_cal_type,l_ci_sequence_number,l_rel_code,ln_person_id,l_party_id,l_alt_rel_code);
6112: IF l_rel_code IS NULL AND l_party_id IS NULL THEN
6113: fnd_message.set_name('IGF','IGF_AW_PROC_FUND');
6114: fnd_message.set_token('FUND',l_fund_ld.fund_code);
6115: fnd_file.put_line(fnd_file.log,fnd_message.get);
6116: fnd_message.set_name('IGF','IGF_SL_NO_ALT_SETUP');
6117: fnd_file.put_line(fnd_file.log,fnd_message.get);
6118: lb_create_funds := FALSE;
6119: lb_elig_funds := FALSE;
6113: fnd_message.set_name('IGF','IGF_AW_PROC_FUND');
6114: fnd_message.set_token('FUND',l_fund_ld.fund_code);
6115: fnd_file.put_line(fnd_file.log,fnd_message.get);
6116: fnd_message.set_name('IGF','IGF_SL_NO_ALT_SETUP');
6117: fnd_file.put_line(fnd_file.log,fnd_message.get);
6118: lb_create_funds := FALSE;
6119: lb_elig_funds := FALSE;
6120: END IF;
6121: END IF;
6124: IF get_fed_fund_code(l_fund_ld.fund_id) = 'FWS' THEN
6125: IF NOT check_disb(l_base_id,NVL(l_fund_ld.adplans_id,g_plan_id),g_awd_prd) THEN
6126: fnd_message.set_name('IGF','IGF_AW_PROC_FUND');
6127: fnd_message.set_token('FUND',l_fund_ld.fund_code);
6128: fnd_file.put_line(fnd_file.log,fnd_message.get);
6129: fnd_message.set_name('IGF','IGF_SE_MAX_TP_SETUP');
6130: fnd_file.put_line(fnd_file.log,fnd_message.get);
6131: lb_create_funds := FALSE;
6132: END IF;
6126: fnd_message.set_name('IGF','IGF_AW_PROC_FUND');
6127: fnd_message.set_token('FUND',l_fund_ld.fund_code);
6128: fnd_file.put_line(fnd_file.log,fnd_message.get);
6129: fnd_message.set_name('IGF','IGF_SE_MAX_TP_SETUP');
6130: fnd_file.put_line(fnd_file.log,fnd_message.get);
6131: lb_create_funds := FALSE;
6132: END IF;
6133: END IF;
6134:
6145: lv_name := NULL;
6146: lv_desc := NULL;
6147: get_plan_desc(NVL(l_fund_ld.adplans_id,g_plan_id),lv_name,lv_desc);
6148: fnd_message.set_token('DISTRPLAN',lv_name);
6149: fnd_file.put_line(fnd_file.log,fnd_message.get);
6150: RAISE INVALID_DISTR_PLAN;
6151: END IF;
6152: CLOSE c_dp_ap;
6153: END IF;
6261: -- Not Eligible
6262: fnd_message.set_name('IGF','IGF_AW_FND_NOT_ELIGIBLE');
6263: fnd_message.set_token('PROGRAM',l_stud_program_cd);
6264: fnd_message.set_token('FUND',(l_fund_ld.fund_code));
6265: fnd_file.put_line(fnd_file.log,fnd_message.get);
6266: lb_create_funds := FALSE;
6267: lb_elig_funds := FALSE;
6268:
6269: -- Log values
6715: CLOSE c_fund_cd;
6716:
6717: fnd_message.set_name('IGF','IGF_AW_RECONSIDER_FUND');
6718: fnd_message.set_token('FUND', l_fund_cd.fund_code );
6719: fnd_file.put_line(fnd_file.log,fnd_message.get);
6720: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
6721: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.excl_incl_check.debug '|| g_req_id,'c_fund_cd%FOUND - reconsidering fund:'||l_fund_cd.fund_code);
6722: END IF;
6723: END IF;
6830: CLOSE c_fund_cd;
6831:
6832: fnd_message.set_name('IGF','IGF_AW_PK_EX_FND_FAIL');
6833: fnd_message.set_token('FUND', l_fund_cd.fund_code );
6834: fnd_file.put_line(fnd_file.log,fnd_message.get);
6835: END IF;
6836:
6837: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
6838: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.excl_incl_check.debug '|| g_req_id,'updating igf_aw_award_t for fund_id:'||l_fund_chk.fund_id||' with flag:RF,adplans_id:'||l_fund_chk.adplans_id);
6932: CLOSE c_fund_cd;
6933:
6934: fnd_message.set_name('IGF','IGF_AW_PK_IN_FND_FAIL');
6935: fnd_message.set_token('FUND', l_fund_cd.fund_code );
6936: fnd_file.put_line(fnd_file.log,fnd_message.get);
6937: END IF;
6938:
6939: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
6940: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.excl_incl_check.debug '|| g_req_id,'updating igf_aw_award_t for fund_id:'||l_fund_chk.fund_id||' with flag:RF');
7338: END IF;
7339:
7340: fnd_message.set_name('IGF','IGF_AW_PKG_EFC_MONTH');
7341: fnd_message.set_token('MONTH',l_efc_months);
7342: fnd_file.put_line(fnd_file.log,fnd_message.get);
7343:
7344: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
7345: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.calc_need.debug '|| g_req_id,'fund Setup values are, Award ID : '||p_awds.award_id||' Fund Id: '||p_awds.fund_id);
7346: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.calc_need.debug '|| g_req_id,' p_awds.replace_fc : '||p_awds.replace_fc||' p_awds.update_need: '||p_awds.update_need);
7459: END IF;
7460: END IF; -- End of logic to populate the student aid INTO plsql table
7461: EXCEPTION
7462: WHEN OTHERS THEN
7463: fnd_file.put_line(fnd_file.log,SQLERRM);
7464: IF fnd_log.level_exception >= fnd_log.g_current_runtime_level THEN
7465: fnd_log.string(fnd_log.level_exception,'igf.plsql.igf_aw_packaging.calc_need.exception '|| g_req_id,'sql error message: '||SQLERRM);
7466: END IF;
7467: RAISE;
7745: -- Log a message stating that : Process Person : Person Number
7746: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
7747: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.stud_run.debug '|| g_req_id,'************* Student : '||l_person_number.person_number||' *************');
7748: END IF;
7749: fnd_file.put_line(fnd_file.log,' ');
7750: fnd_file.put_line(fnd_file.log,' ');
7751: fnd_file.put_line(fnd_file.log,'------------------------------------------------- ');
7752: fnd_message.set_name('IGF','IGF_AW_PROCESS_STUD');
7753: fnd_message.set_token('STUD', l_person_number.person_number );
7746: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
7747: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.stud_run.debug '|| g_req_id,'************* Student : '||l_person_number.person_number||' *************');
7748: END IF;
7749: fnd_file.put_line(fnd_file.log,' ');
7750: fnd_file.put_line(fnd_file.log,' ');
7751: fnd_file.put_line(fnd_file.log,'------------------------------------------------- ');
7752: fnd_message.set_name('IGF','IGF_AW_PROCESS_STUD');
7753: fnd_message.set_token('STUD', l_person_number.person_number );
7754: fnd_file.put_line(fnd_file.log,fnd_message.get);
7747: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.stud_run.debug '|| g_req_id,'************* Student : '||l_person_number.person_number||' *************');
7748: END IF;
7749: fnd_file.put_line(fnd_file.log,' ');
7750: fnd_file.put_line(fnd_file.log,' ');
7751: fnd_file.put_line(fnd_file.log,'------------------------------------------------- ');
7752: fnd_message.set_name('IGF','IGF_AW_PROCESS_STUD');
7753: fnd_message.set_token('STUD', l_person_number.person_number );
7754: fnd_file.put_line(fnd_file.log,fnd_message.get);
7755: fnd_file.put_line(fnd_file.log,'------------------------------------------------- ');
7750: fnd_file.put_line(fnd_file.log,' ');
7751: fnd_file.put_line(fnd_file.log,'------------------------------------------------- ');
7752: fnd_message.set_name('IGF','IGF_AW_PROCESS_STUD');
7753: fnd_message.set_token('STUD', l_person_number.person_number );
7754: fnd_file.put_line(fnd_file.log,fnd_message.get);
7755: fnd_file.put_line(fnd_file.log,'------------------------------------------------- ');
7756:
7757:
7758: -- Check for the valid EFC of the student. If no valid EFC, show message and stop processing
7751: fnd_file.put_line(fnd_file.log,'------------------------------------------------- ');
7752: fnd_message.set_name('IGF','IGF_AW_PROCESS_STUD');
7753: fnd_message.set_token('STUD', l_person_number.person_number );
7754: fnd_file.put_line(fnd_file.log,fnd_message.get);
7755: fnd_file.put_line(fnd_file.log,'------------------------------------------------- ');
7756:
7757:
7758: -- Check for the valid EFC of the student. If no valid EFC, show message and stop processing
7759: IF g_sf_packaging <> 'T' THEN
7759: IF g_sf_packaging <> 'T' THEN
7760: IF igf_aw_gen_005.validate_student_efc(l_base_id,g_awd_prd) = 'F' THEN
7761: fnd_message.set_name('IGF','IGF_AW_NO_VALID_EFC');
7762: fnd_message.set_token('STDNT', l_pers_num );
7763: fnd_file.put_line(fnd_file.log,fnd_message.get);
7764: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
7765: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.stud_run.debug '|| g_req_id,'no valid efc for '||l_pers_num);
7766: END IF;
7767: RETURN;
7773:
7774: IF hasActiveIsir(l_base_id) IS NULL THEN
7775: fnd_message.set_name('IGF','IGF_AW_NO_ISIR');
7776: fnd_message.set_token('STDNT',l_person_number.person_number);
7777: fnd_file.put_line(fnd_file.log,fnd_message.get);
7778: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
7779: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.stud_run.debug '|| g_req_id,'no active ISIR for '||l_person_number.person_number);
7780: END IF;
7781: RETURN;
7784: --Cbeck if student has valid COA in multiple fund packaging.if not error out
7785:
7786: IF NOT igf_aw_gen_003.check_coa(l_base_id,g_awd_prd) THEN
7787: fnd_message.set_name('IGF','IGF_AW_PK_COA_NULL');
7788: fnd_file.put_line(fnd_file.log,fnd_message.get);
7789: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
7790: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.stud_run.debug '|| g_req_id,'no COA for '||l_person_number.person_number);
7791: END IF;
7792: RETURN;
7804: get_plan_desc(g_plan_id,lv_name,lv_desc);
7805:
7806: fnd_message.set_name('IGF','IGF_AW_COA_COMMON_TERMS_FAIL');
7807: fnd_message.set_token('PLAN_CD',lv_name);
7808: fnd_file.put_line(fnd_file.log,fnd_message.get);
7809: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
7810: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.stud_run.debug '|| g_req_id,'no COA for '||l_pers_num||' and allow_to_exceed=NULL');
7811: END IF;
7812: RETURN;
7815: ELSIF g_allow_to_exceed = 'NEED' THEN
7816:
7817: IF NOT igf_aw_gen_003.check_coa(l_base_id,g_awd_prd) THEN
7818: fnd_message.set_name('IGF','IGF_AW_PK_COA_NULL');
7819: fnd_file.put_line(fnd_file.log,fnd_message.get);
7820: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
7821: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.stud_run.debug '|| g_req_id,'no COA for '||l_person_number.person_number ||' and allow_to_exceed=NEED');
7822: END IF;
7823: RETURN;
7847:
7848: -- Check whether are there any package hold are present at the student level, if not continue the packaging
7849: IF igf_aw_gen_005.get_stud_hold_effect('A', l_fabase.person_id, NULL ) = 'F' THEN
7850: fnd_message.set_name('IGF','IGF_AW_AWD_PACK_HOLD_FAIL');
7851: fnd_file.put_line(fnd_file.log,fnd_message.get);
7852: CLOSE c_fabase;
7853: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
7854: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.stud_run.debug '|| g_req_id,'igf_aw_gen_005.get_stud_hold_effect(A,'||l_fabase.person_id||',NULL=F');
7855: END IF;
7862: */
7863: IF get_award_process_status(l_fabase.ci_cal_type,l_fabase.ci_sequence_number,g_awd_prd,l_fabase.base_id) IN ('AWARDED','REVIEW','DO_NOT_REPKG') THEN
7864: fnd_message.set_name('IGF','IGF_AW_CANNOT_REPACKAGE');
7865: fnd_message.set_token('PERSON', l_person_number.person_number );
7866: fnd_file.put_line(fnd_file.log,fnd_message.get);
7867: RETURN;
7868: END IF;
7869:
7870: IF NVL(l_fabase.lock_awd_flag,'N') = 'Y' THEN
7869:
7870: IF NVL(l_fabase.lock_awd_flag,'N') = 'Y' THEN
7871: fnd_message.set_name('IGF','IGF_AW_LOCK_AWD');
7872: fnd_message.set_token('PERSON', l_person_number.person_number );
7873: fnd_file.put_line(fnd_file.log,fnd_message.get);
7874: RETURN;
7875: END IF;
7876: -- Clear old simualted records for the student which were created in the previous run
7877: clear_simulation( l_base_id );
7898: END IF;
7899: -- If Formula policys were not present then log a message and skip the formula checks
7900: IF c_frml_plcy%NOTFOUND THEN
7901: fnd_message.set_name('IGF','IGF_AW_PK_FRML_PLCY');
7902: fnd_file.put_line(fnd_file.log,fnd_message.get);
7903: CLOSE c_frml_plcy;
7904: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
7905: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.stud_run.debug '|| g_req_id,'no formula policies available');
7906: END IF;
7910:
7911: IF ( l_run_mode = 'D') THEN
7912: fnd_message.set_name('IGF','IGF_AW_PKG_AWD_GRP');
7913: fnd_message.set_token('AWDGRP',l_fabase.target_group);
7914: fnd_file.put_line(fnd_file.log,fnd_message.get);
7915: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
7916: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.stud_run.debug '|| g_req_id,'after closing c_frml_policy packaging award group '||l_fabase.target_group);
7917: END IF;
7918: END IF;
7925: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
7926: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.stud_run.debug '|| g_req_id,'check_plan did not return true-it returned '||lv_result);
7927: END IF;
7928: fnd_message.set_name('IGF',lv_result);
7929: fnd_file.put_line(fnd_file.log,fnd_message.get);
7930: RETURN;
7931: ELSE
7932: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
7933: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.stud_run.debug '|| g_req_id,'check_plan returned TRUE with g_plan_id:'||g_plan_id||',g_method_cd:'||g_method_cd);
8077: l_fund_fail := FALSE;
8078:
8079: IF l_chk = 0 THEN
8080: fnd_message.set_name('IGF','IGF_AW_PKG_EXCL_FND_CHK');
8081: fnd_file.put_line(fnd_file.log,fnd_message.get);
8082: ELSE
8083: fnd_file.put_line(fnd_file.log,' ');
8084: fnd_file.put_line(fnd_file.log,'------------------------------------------------- ');
8085: fnd_message.set_name('IGF','IGF_AW_PKG_EXCL_FND_RE_CHK');
8079: IF l_chk = 0 THEN
8080: fnd_message.set_name('IGF','IGF_AW_PKG_EXCL_FND_CHK');
8081: fnd_file.put_line(fnd_file.log,fnd_message.get);
8082: ELSE
8083: fnd_file.put_line(fnd_file.log,' ');
8084: fnd_file.put_line(fnd_file.log,'------------------------------------------------- ');
8085: fnd_message.set_name('IGF','IGF_AW_PKG_EXCL_FND_RE_CHK');
8086: fnd_file.put_line(fnd_file.log,fnd_message.get);
8087: END IF;
8080: fnd_message.set_name('IGF','IGF_AW_PKG_EXCL_FND_CHK');
8081: fnd_file.put_line(fnd_file.log,fnd_message.get);
8082: ELSE
8083: fnd_file.put_line(fnd_file.log,' ');
8084: fnd_file.put_line(fnd_file.log,'------------------------------------------------- ');
8085: fnd_message.set_name('IGF','IGF_AW_PKG_EXCL_FND_RE_CHK');
8086: fnd_file.put_line(fnd_file.log,fnd_message.get);
8087: END IF;
8088:
8082: ELSE
8083: fnd_file.put_line(fnd_file.log,' ');
8084: fnd_file.put_line(fnd_file.log,'------------------------------------------------- ');
8085: fnd_message.set_name('IGF','IGF_AW_PKG_EXCL_FND_RE_CHK');
8086: fnd_file.put_line(fnd_file.log,fnd_message.get);
8087: END IF;
8088:
8089: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
8090: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.stud_run.debug '|| g_req_id,'after calling excl_incl_check, calling process_stud with fund_id:'||l_fund_id);
8165:
8166: --FUND MANAGER HAS BEEN LOCKED SKIPPING STUDENT
8167:
8168: fnd_message.set_name('IGF', 'IGF_AW_AWARD_NOT_CREATED');
8169: fnd_file.put_line(fnd_file.output,fnd_message.get);
8170:
8171: fnd_message.set_name('IGF', 'IGF_AW_FUND_LOCK_ERR');
8172: fnd_file.put_line(fnd_file.log,fnd_message.get);
8173:
8168: fnd_message.set_name('IGF', 'IGF_AW_AWARD_NOT_CREATED');
8169: fnd_file.put_line(fnd_file.output,fnd_message.get);
8170:
8171: fnd_message.set_name('IGF', 'IGF_AW_FUND_LOCK_ERR');
8172: fnd_file.put_line(fnd_file.log,fnd_message.get);
8173:
8174: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
8175: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.stud_run.debug '|| g_req_id,'fund has been locked');
8176: END IF;
8201:
8202: WHEN NON_MERGABLE_FUNDS THEN
8203: ROLLBACK TO STUD_SP;
8204: fnd_message.set_name('IGF','IGF_SL_SKIPPING');
8205: fnd_file.put_line(fnd_file.log,fnd_message.get || igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','PERSON_NUMBER') || ' : ' || l_pers_num);
8206: fnd_file.new_line(fnd_file.log,1);
8207:
8208: WHEN INVALID_DISTR_PLAN THEN
8209: ROLLBACK TO STUD_SP;
8202: WHEN NON_MERGABLE_FUNDS THEN
8203: ROLLBACK TO STUD_SP;
8204: fnd_message.set_name('IGF','IGF_SL_SKIPPING');
8205: fnd_file.put_line(fnd_file.log,fnd_message.get || igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','PERSON_NUMBER') || ' : ' || l_pers_num);
8206: fnd_file.new_line(fnd_file.log,1);
8207:
8208: WHEN INVALID_DISTR_PLAN THEN
8209: ROLLBACK TO STUD_SP;
8210: fnd_message.set_name('IGF','IGF_SL_SKIPPING');
8207:
8208: WHEN INVALID_DISTR_PLAN THEN
8209: ROLLBACK TO STUD_SP;
8210: fnd_message.set_name('IGF','IGF_SL_SKIPPING');
8211: fnd_file.put_line(fnd_file.log,fnd_message.get || igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','PERSON_NUMBER') || ' : ' || l_pers_num);
8212: fnd_file.new_line(fnd_file.log,1);
8213:
8214: WHEN INV_FWS_AWARD THEN
8215: ROLLBACK TO STUD_SP;
8208: WHEN INVALID_DISTR_PLAN THEN
8209: ROLLBACK TO STUD_SP;
8210: fnd_message.set_name('IGF','IGF_SL_SKIPPING');
8211: fnd_file.put_line(fnd_file.log,fnd_message.get || igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','PERSON_NUMBER') || ' : ' || l_pers_num);
8212: fnd_file.new_line(fnd_file.log,1);
8213:
8214: WHEN INV_FWS_AWARD THEN
8215: ROLLBACK TO STUD_SP;
8216: fnd_message.set_name('IGF','IGF_SL_SKIPPING');
8213:
8214: WHEN INV_FWS_AWARD THEN
8215: ROLLBACK TO STUD_SP;
8216: fnd_message.set_name('IGF','IGF_SL_SKIPPING');
8217: fnd_file.put_line(fnd_file.log,fnd_message.get || igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','PERSON_NUMBER') || ' : ' || l_pers_num);
8218: fnd_file.new_line(fnd_file.log,1);
8219:
8220: WHEN PELL_NO_REPACK THEN
8221: ROLLBACK TO STUD_SP;
8214: WHEN INV_FWS_AWARD THEN
8215: ROLLBACK TO STUD_SP;
8216: fnd_message.set_name('IGF','IGF_SL_SKIPPING');
8217: fnd_file.put_line(fnd_file.log,fnd_message.get || igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','PERSON_NUMBER') || ' : ' || l_pers_num);
8218: fnd_file.new_line(fnd_file.log,1);
8219:
8220: WHEN PELL_NO_REPACK THEN
8221: ROLLBACK TO STUD_SP;
8222: fnd_message.set_name('IGF','IGF_SL_SKIPPING');
8219:
8220: WHEN PELL_NO_REPACK THEN
8221: ROLLBACK TO STUD_SP;
8222: fnd_message.set_name('IGF','IGF_SL_SKIPPING');
8223: fnd_file.put_line(fnd_file.log,fnd_message.get || igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','PERSON_NUMBER') || ' : ' || l_pers_num);
8224: fnd_file.new_line(fnd_file.log,1);
8225:
8226: WHEN OTHERS THEN
8227: ROLLBACK TO STUD_SP;
8220: WHEN PELL_NO_REPACK THEN
8221: ROLLBACK TO STUD_SP;
8222: fnd_message.set_name('IGF','IGF_SL_SKIPPING');
8223: fnd_file.put_line(fnd_file.log,fnd_message.get || igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','PERSON_NUMBER') || ' : ' || l_pers_num);
8224: fnd_file.new_line(fnd_file.log,1);
8225:
8226: WHEN OTHERS THEN
8227: ROLLBACK TO STUD_SP;
8228: fnd_file.put_line(fnd_file.log,SQLERRM);
8224: fnd_file.new_line(fnd_file.log,1);
8225:
8226: WHEN OTHERS THEN
8227: ROLLBACK TO STUD_SP;
8228: fnd_file.put_line(fnd_file.log,SQLERRM);
8229: fnd_file.put_line(fnd_file.log,' ');
8230: fnd_message.set_name('IGS','IGS_GE_UNHANDLED_EXP');
8231: fnd_message.set_token('NAME','IGF_AW_PACKAGING.STUD_RUN ' || SQLERRM);
8232: IF fnd_log.level_exception >= fnd_log.g_current_runtime_level THEN
8225:
8226: WHEN OTHERS THEN
8227: ROLLBACK TO STUD_SP;
8228: fnd_file.put_line(fnd_file.log,SQLERRM);
8229: fnd_file.put_line(fnd_file.log,' ');
8230: fnd_message.set_name('IGS','IGS_GE_UNHANDLED_EXP');
8231: fnd_message.set_token('NAME','IGF_AW_PACKAGING.STUD_RUN ' || SQLERRM);
8232: IF fnd_log.level_exception >= fnd_log.g_current_runtime_level THEN
8233: fnd_log.string(fnd_log.level_exception,'igf.plsql.igf_aw_packaging.stud_run.exception '|| g_req_id,'sql error message: '||SQLERRM);
8233: fnd_log.string(fnd_log.level_exception,'igf.plsql.igf_aw_packaging.stud_run.exception '|| g_req_id,'sql error message: '||SQLERRM);
8234: END IF;
8235: igs_ge_msg_stack.conc_exception_hndl;
8236: fnd_message.set_name('IGF','IGF_SL_SKIPPING');
8237: fnd_file.put_line(fnd_file.log,fnd_message.get || igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','PERSON_NUMBER') || ' : ' || l_pers_num);
8238: fnd_file.put_line(fnd_file.log,' ');
8239:
8240: -------------------------------------------------------------------------
8241: -- Important : Do not remove these comments
8234: END IF;
8235: igs_ge_msg_stack.conc_exception_hndl;
8236: fnd_message.set_name('IGF','IGF_SL_SKIPPING');
8237: fnd_file.put_line(fnd_file.log,fnd_message.get || igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','PERSON_NUMBER') || ' : ' || l_pers_num);
8238: fnd_file.put_line(fnd_file.log,' ');
8239:
8240: -------------------------------------------------------------------------
8241: -- Important : Do not remove these comments
8242: -- APP_EXCEPTION.RAISE_EXCEPTION;
8965: l_efc := 0;
8966: l_rem_rep_efc := 0;
8967: l_reset_need := FALSE;
8968:
8969: fnd_file.new_line(fnd_file.log,1);
8970: fnd_message.set_name('IGF','IGF_AW_PROC_FUND');
8971: fnd_message.set_token('FUND',l_fund.fund_code);
8972: fnd_file.put_line(fnd_file.log,fnd_message.get);
8973:
8968:
8969: fnd_file.new_line(fnd_file.log,1);
8970: fnd_message.set_name('IGF','IGF_AW_PROC_FUND');
8971: fnd_message.set_token('FUND',l_fund.fund_code);
8972: fnd_file.put_line(fnd_file.log,fnd_message.get);
8973:
8974: IF (NOT(g_sf_packaging = 'T' AND g_allow_to_exceed = 'COA')) THEN
8975: -- Based on the fund Methodology, check whether the student has either ISIR or PROFILE, if not log an error message
8976: IF (
8988: FETCH c_person_number INTO l_person_number;
8989: CLOSE c_person_number;
8990: fnd_message.set_name('IGF','IGF_AW_NO_ISIR');
8991: fnd_message.set_token('STDNT',l_person_number.person_number);
8992: fnd_file.put_line(fnd_file.log,fnd_message.get);
8993:
8994: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
8995: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.stud_run.debug '|| g_req_id,'no active ISIR for '||l_person_number.person_number);
8996: END IF;
9003:
9004: IF hasActiveProfile(l_fabase.base_id) IS NOT NULL THEN
9005: --student has no profile
9006: fnd_message.set_name('IGF','IGF_AP_NO_ACTIVE_PROFILE');
9007: fnd_file.put_line(fnd_file.log,fnd_message.get);
9008: l_fund_id := l_fund.fund_id;
9009: l_fund_fail := TRUE;
9010: l_award_id := l_fund.award_id;
9011: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
9023: IF c_fmast%NOTFOUND THEN
9024:
9025: fnd_message.set_name('IGF','IGF_AW_PK_FUND_NOT_EXIST');
9026: fnd_message.set_token('FUND',l_fund.fund_code);
9027: fnd_file.put_line(fnd_file.log,fnd_message.get);
9028: l_fund_id := l_fund.fund_id;
9029: l_fund_fail := TRUE;
9030: l_award_id := l_fund.award_id;
9031: EXIT;
9060: IF l_fmast.auto_pkg = 'N' THEN
9061:
9062: fnd_message.set_name('IGF','IGF_AW_PK_AUTO_SKIP');
9063: fnd_message.set_token('FUND_ID',l_fmast.fund_code);
9064: fnd_file.put_line(fnd_file.log,fnd_message.get);
9065: l_fund_id := l_fund.fund_id;
9066: l_fund_fail := TRUE;
9067: l_award_id := l_fund.award_id;
9068: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
9075:
9076: check_plan(l_fund.adplans_id,lv_result,lv_method_code);
9077: IF lv_result <> 'TRUE' THEN
9078: fnd_message.set_name('IGF',lv_result);
9079: fnd_file.put_line(fnd_file.log,fnd_message.get);
9080: l_fund_id := l_fund.fund_id;
9081: l_fund_fail := TRUE;
9082: l_award_id := l_fund.award_id;
9083: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
9090:
9091: IF hasActiveProfile(l_fabase.base_id) IS NOT NULL THEN
9092: --student has no profile
9093: fnd_message.set_name('IGF','IGF_AP_NO_ACTIVE_PROFILE');
9094: fnd_file.put_line(fnd_file.log,fnd_message.get);
9095: l_fund_id := l_fund.fund_id;
9096: l_fund_fail := TRUE;
9097: l_award_id := l_fund.award_id;
9098: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
9110: IF g_sf_packaging = 'T' THEN
9111: IF get_fed_fund_code(l_fund.fund_id) = 'FWS' THEN
9112: IF NOT check_disb(l_fabase.base_id,l_fund.adplans_id,g_awd_prd) THEN
9113: fnd_message.set_name('IGF','IGF_SE_MAX_TP_SETUP');
9114: fnd_file.put_line(fnd_file.log,fnd_message.get);
9115: l_fund_id := l_fund.fund_id;
9116: l_fund_fail := TRUE;
9117: l_award_id := l_fund.award_id;
9118: END IF;
9133: CLOSE c_person_number;
9134:
9135: fnd_message.set_name('IGF','IGF_AW_NO_ISIR');
9136: fnd_message.set_token('STDNT',l_person_number.person_number);
9137: fnd_file.put_line(fnd_file.log,fnd_message.get);
9138:
9139: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
9140: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.stud_run.debug '|| g_req_id,'No active ISIR for '||l_person_number.person_number||'. For GPLUSDL/GPLUSFL funds the Student must have a valid ISIR');
9141: END IF;
9271: END IF;
9272:
9273: fnd_message.set_name('IGF','IGF_AW_PKG_EFC_MONTH');
9274: fnd_message.set_token('MONTH',l_efc_months);
9275: fnd_file.put_line(fnd_file.log,fnd_message.get);
9276:
9277:
9278: igf_aw_award_t_pkg.insert_row(
9279: x_rowid => lv_rowid ,
9393:
9394: IF lv_return_status = 'E' THEN
9395: --Error occured in the pell calculation wrapper
9396: --so log the error message
9397: fnd_file.put_line(fnd_file.log,lv_message);
9398: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
9399: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.process_stud.debug '|| g_req_id,'pell wrapper returned error message '||lv_message);
9400: END IF;
9401: l_fund_id := l_fund.fund_id;
9408: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.process_stud.debug '|| g_req_id,'pell_calc returned NO pell aid');
9409: END IF;
9410: IF ( l_run_mode = 'D') THEN
9411: fnd_message.set_name('IGF','IGF_AW_NO_PELL_AID');
9412: fnd_file.put_line(fnd_file.log,fnd_message.get);
9413: END IF;
9414:
9415: l_fund_id := l_fund.fund_id;
9416: l_fund_fail := TRUE;
9461: IF igs_ge_msg_stack.count_msg > 0 THEN
9462: FOR i IN 1..igs_ge_msg_stack.count_msg LOOP
9463: lv_msg_text := NULL;
9464: igs_ge_msg_stack.get(i,'F',lv_msg_text, ln_msg_index);
9465: fnd_file.put_line(fnd_file.log,lv_msg_text);
9466: END LOOP;
9467: END IF;
9468: RAISE PELL_NO_REPACK;
9469: END IF;
9523: 'PACKAGING',
9524: l_pell_schedule_code
9525: );
9526: IF NVL(lv_return_status,'N') = 'E' THEN
9527: fnd_file.put_line(fnd_file.log,lv_message);
9528: RAISE PELL_NO_REPACK;
9529: ELSE
9530: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
9531: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.process_stud.debug '|| g_req_id,'for term '||l_term_amounts.ld_cal_type||
9641:
9642: IF ( l_run_mode = 'D' ) THEN
9643: fnd_message.set_name('IGF','IGF_AW_NEED_OVER');
9644: fnd_message.set_token('FUND', l_fmast.fund_code );
9645: fnd_file.put_line(fnd_file.log,fnd_message.get);
9646: END IF;
9647: l_fund_id := l_fund.fund_id;
9648: l_fund_fail := TRUE;
9649: l_award_id := l_fund.award_id;
9663: -- if need is still zero, log a message and skip the fund
9664: IF l_need <= 0 AND l_need_set THEN
9665: fnd_message.set_name('IGF','IGF_AW_NEED_OVER');
9666: fnd_message.set_token('FUND', l_fmast.fund_code );
9667: fnd_file.put_line(fnd_file.log,fnd_message.get);
9668: l_fund_id := l_fund.fund_id;
9669: l_fund_fail := TRUE;
9670: l_award_id := l_fund.award_id;
9671: EXIT;
9707: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
9708: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.process_stud.debug '|| g_req_id,'student has no COA defined');
9709: END IF;
9710: fnd_message.set_name('IGF','IGF_AW_PK_COA_NULL');
9711: fnd_file.put_line(fnd_file.log,fnd_message.get);
9712: l_fund_id := l_fund.fund_id;
9713: l_fund_fail := TRUE;
9714: l_award_id := l_fund.award_id;
9715: EXIT;
9748: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
9749: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.process_stud.debug '|| g_req_id,'student has no COA defined');
9750: END IF;
9751: fnd_message.set_name('IGF','IGF_AW_PK_COA_NULL');
9752: fnd_file.put_line(fnd_file.log,fnd_message.get);
9753: l_fund_id := l_fund.fund_id;
9754: l_fund_fail := TRUE;
9755: l_award_id := l_fund.award_id;
9756: EXIT;
9786: ELSE -- ISIR Else
9787: --log error message
9788: fnd_message.set_name('IGF','IGF_AW_NO_ISIR');
9789: fnd_message.set_token('STDNT',l_person_number.person_number);
9790: fnd_file.put_line(fnd_file.log,fnd_message.get);
9791: l_fund_id := l_fund.fund_id;
9792: l_fund_fail := TRUE;
9793: l_award_id := l_fund.award_id;
9794: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
9814: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
9815: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.process_stud.debug '|| g_req_id,'student has no COA defined');
9816: END IF;
9817: fnd_message.set_name('IGF','IGF_AW_PK_COA_NULL');
9818: fnd_file.put_line(fnd_file.log,fnd_message.get);
9819: l_fund_id := l_fund.fund_id;
9820: l_fund_fail := TRUE;
9821: l_award_id := l_fund.award_id;
9822: EXIT;
9906: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.process_stud.debug '|| g_req_id,'student has no active ISIR-cant continue');
9907: END IF;
9908: fnd_message.set_name('IGF','IGF_AW_NO_ISIR');
9909: fnd_message.set_token('STDNT',l_person_number.person_number);
9910: fnd_file.put_line(fnd_file.log,fnd_message.get);
9911: l_fund_id := l_fund.fund_id;
9912: l_fund_fail := TRUE;
9913: l_award_id := l_fund.award_id;
9914: EXIT;
9924: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
9925: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.process_stud.debug '|| g_req_id,'student has no active profile-cant continue');
9926: END IF;
9927: fnd_message.set_name('IGF','IGF_AP_NO_ACTIVE_PROFILE');
9928: fnd_file.put_line(fnd_file.log,fnd_message.get);
9929: l_fund_id := l_fund.fund_id;
9930: l_fund_fail := TRUE;
9931: l_award_id := l_fund.award_id;
9932: EXIT;
10152: END IF;
10153:
10154: IF hasActiveProfile(l_fabase.base_id) IS NOT NULL THEN
10155: fnd_message.set_name('IGF','IGF_AP_NO_ACTIVE_PROFILE');
10156: fnd_file.put_line(fnd_file.log,fnd_message.get);
10157: l_fund_id := l_fund.fund_id;
10158: l_fund_fail := TRUE;
10159: l_award_id := l_fund.award_id;
10160: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
10232: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.process_stud.debug '|| g_req_id,'ln_award_perct:'||ln_award_perct);
10233: END IF;
10234:
10235: get_plan_desc(l_fund.adplans_id,lv_method_name,lv_method_desc);
10236: fnd_file.put_line(fnd_file.log,igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','AWD_DIST_PLAN') || ' : ' || lv_method_name);
10237: fnd_file.put_line(fnd_file.log,igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','DIST_PLAN_METHOD') || ' : ' || lv_method_desc);
10238:
10239: fnd_message.set_name('IGF','IGF_AW_PKG_PERSNT_CALC');
10240: fnd_message.set_token('PERSNT',ln_award_perct);
10233: END IF;
10234:
10235: get_plan_desc(l_fund.adplans_id,lv_method_name,lv_method_desc);
10236: fnd_file.put_line(fnd_file.log,igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','AWD_DIST_PLAN') || ' : ' || lv_method_name);
10237: fnd_file.put_line(fnd_file.log,igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','DIST_PLAN_METHOD') || ' : ' || lv_method_desc);
10238:
10239: fnd_message.set_name('IGF','IGF_AW_PKG_PERSNT_CALC');
10240: fnd_message.set_token('PERSNT',ln_award_perct);
10241: fnd_file.put_line(fnd_file.log,fnd_message.get);
10237: fnd_file.put_line(fnd_file.log,igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','DIST_PLAN_METHOD') || ' : ' || lv_method_desc);
10238:
10239: fnd_message.set_name('IGF','IGF_AW_PKG_PERSNT_CALC');
10240: fnd_message.set_token('PERSNT',ln_award_perct);
10241: fnd_file.put_line(fnd_file.log,fnd_message.get);
10242:
10243: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
10244: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.process_stud.debug '|| g_req_id,'matching term percent ln_award_perct:'||ln_award_perct);
10245: END IF;
10256: l_aid := (ln_award_perct * l_aid ) / 100;
10257:
10258: fnd_message.set_name('IGF','IGF_AW_PKG_PERSNT_AMT');
10259: fnd_message.set_token('AMOUNT',l_aid);
10260: fnd_file.put_line(fnd_file.log,fnd_message.get);
10261:
10262: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
10263: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.process_stud.debug '|| g_req_id,'decreased aid,upto macthing terms is l_aid: '||l_aid||' l_need: '||l_need);
10264: END IF;
10313: --
10314: IF l_aid = 0 THEN
10315: fnd_message.set_name('IGF','IGF_AW_INSUFFCNT_FUND');
10316: fnd_message.set_token('AMOUNT',0);
10317: fnd_file.put_line(fnd_file.log,fnd_message.get);
10318: l_fund_id := l_fund.fund_id;
10319: l_fund_fail := TRUE;
10320: l_award_id := l_fund.award_id;
10321: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
10390:
10391: fnd_message.set_name('IGF','IGF_AW_PK_EXCEED_LIFE_TERM');
10392: fnd_message.set_token('PERSON_NUMBER', l_person_number.person_number);
10393: fnd_message.set_token('FUND_ID',l_fmast.fund_code);
10394: fnd_file.put_line(fnd_file.log,fnd_message.get);
10395:
10396: l_fund_id := l_fund.fund_id;
10397: l_fund_fail := TRUE;
10398: l_award_id := l_fund.award_id;
10560: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.process_stud.debug '|| g_req_id,'loans fed_fund_code not in PRK,DLP,FLP');
10561: END IF;
10562: fnd_message.set_name('IGF','IGF_AW_PKG_CHK_LOAN_LMTS');
10563: fnd_message.set_token('FUND',l_fmast.fund_code);
10564: fnd_file.put_line(fnd_file.log,fnd_message.get);
10565:
10566: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
10567: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.process_stud.debug '|| g_req_id,'calling igf_aw_packng_subfns.check_loan_limits');
10568: END IF;
10585: -- In the log file the amount that is returned from the check_loan_limits
10586: IF l_aid > 0 THEN
10587: fnd_message.set_name('IGF','IGF_AW_CHK_LOAN_LMT_AMT');
10588: fnd_message.set_token('AMOUNT',l_aid);
10589: fnd_file.put_line(fnd_file.log,fnd_message.get);
10590: END IF;
10591:
10592: END IF;
10593:
10595: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
10596: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.process_stud.debug '|| g_req_id,'after calling check_loan_limts l_aid=0');
10597: END IF;
10598: fnd_message.set_name('IGF','IGF_AW_PKG_NO_LOAN_AMT');
10599: fnd_file.put_line(fnd_file.log,fnd_message.get);
10600: l_fund_id := l_fund.fund_id;
10601: l_fund_fail := TRUE;
10602: l_award_id := l_fund.award_id;
10603: EXIT;
10608: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.process_stud.debug '|| g_req_id,'after calling checkloan_limits l_msg_name:'||l_msg_name);
10609: END IF;
10610: IF l_aid = 0 THEN
10611: fnd_message.set_name('IGF',l_msg_name);
10612: fnd_file.put_line(fnd_file.log,fnd_message.get);
10613: ELSE
10614: fnd_message.set_name('IGF',l_msg_name);
10615: fnd_message.set_token('FUND_CODE',l_fmast.fed_fund_code);
10616: fnd_file.put_line(fnd_file.log,fnd_message.get);
10612: fnd_file.put_line(fnd_file.log,fnd_message.get);
10613: ELSE
10614: fnd_message.set_name('IGF',l_msg_name);
10615: fnd_message.set_token('FUND_CODE',l_fmast.fed_fund_code);
10616: fnd_file.put_line(fnd_file.log,fnd_message.get);
10617: END IF;
10618: l_fund_id := l_fund.fund_id;
10619: l_fund_fail := TRUE;
10620: l_award_id := l_fund.award_id;
10643:
10644: IF l_msg_name = 'IGF_AW_LOAN_LMT_NOT_EXHST' THEN
10645: fnd_message.set_name('IGF',l_msg_name);
10646: fnd_message.set_token('FUND',l_fmast.fed_fund_code);
10647: fnd_file.put_line(fnd_file.log,fnd_message.get);
10648: ELSE
10649: IF l_msg_name IS NOT NULL THEN
10650: fnd_message.set_name('IGF',l_msg_name);
10651: fnd_file.put_line(fnd_file.log,fnd_message.get);
10647: fnd_file.put_line(fnd_file.log,fnd_message.get);
10648: ELSE
10649: IF l_msg_name IS NOT NULL THEN
10650: fnd_message.set_name('IGF',l_msg_name);
10651: fnd_file.put_line(fnd_file.log,fnd_message.get);
10652: END IF;
10653: END IF;
10654:
10655: l_fund_id := l_fund.fund_id;
10695: l_aid := 0;
10696: fnd_message.set_name('IGF','IGF_AW_MIN_AWD_CHK_AWDGRP');
10697: fnd_message.set_token('FUND',l_fmast.fund_code);
10698: fnd_message.set_token('AWDGRP',l_fabase.target_group);
10699: fnd_file.put_line(fnd_file.log,fnd_message.get);
10700: l_fund_id := l_fund.fund_id;
10701: l_fund_fail := TRUE;
10702: l_award_id := l_fund.award_id;
10703: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
10709: ELSIF NVL(l_aid,0) < NVL(l_fmast.min_award_amt,0) THEN
10710: l_aid := 0;
10711: fnd_message.set_name('IGF','IGF_AW_MIN_AWD_CHECK');
10712: fnd_message.set_token('FUND',l_fmast.fund_code);
10713: fnd_file.put_line(fnd_file.log,fnd_message.get);
10714: l_fund_id := l_fund.fund_id;
10715: l_fund_fail := TRUE;
10716: l_award_id := l_fund.award_id;
10717: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
10724: -- Incase of No Need Skip fund
10725: IF ( l_aid <= 0) THEN
10726: fnd_message.set_name('IGF','IGF_AW_NO_AID');
10727: fnd_message.set_token('FUND',l_fmast.fund_code);
10728: fnd_file.put_line(fnd_file.log,fnd_message.get);
10729: l_aid := 0;
10730: l_fund_id := l_fund.fund_id;
10731: l_fund_fail := TRUE;
10732: l_award_id := l_fund.award_id;
11194: l_fund_fail := TRUE;
11195: IF ( l_run_mode = 'D') THEN
11196: fnd_message.set_name('IGF','IGF_AW_FSEOG_MATCH_PCT');
11197: fnd_message.set_token('FUND',to_char(l_fund_id));
11198: fnd_file.put_line(fnd_file.log,fnd_message.get);
11199: END IF;
11200: END IF;
11201:
11202: END IF; -- *3
11364: IF ( l_aid < l_fmast.min_award_amt ) OR ( l_aid < 0 ) THEN
11365: IF ( l_run_mode = 'D') THEN
11366: fnd_message.set_name('IGF','IGF_AW_MIN_AWD_CHECK');
11367: fnd_message.set_token('FUND',l_fmast.fund_code);
11368: fnd_file.put_line(fnd_file.log,fnd_message.get);
11369: END IF;
11370: l_fund_id := l_fund.fund_id;
11371: l_fund_fail := TRUE;
11372: l_award_id := l_fund.award_id;
11770: FETCH c_paid_amt INTO l_paid_amt;
11771: CLOSE c_paid_amt;
11772: IF l_paid_amt IS NOT NULL THEN
11773: fnd_message.set_name('IGF','IGF_AW_INV_FWS_AWD');
11774: fnd_file.put_line(fnd_file.log,fnd_message.get);
11775: RAISE INV_FWS_AWARD;
11776: END IF;
11777: END IF;
11778:
12953:
12954: -- If There are no students in the person_id group then log message and exit
12955: IF ln_person_count = 0 THEN
12956: fnd_message.set_name('IGF','IGF_DB_NO_PER_GRP');
12957: fnd_file.put_line(fnd_file.log,fnd_message.get);
12958: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
12959: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.process_single_fund.debug '|| g_req_id,'no persons in person id group');
12960: END IF;
12961: END IF;
13131: l_sim_log := igf_ap_gen.get_lookup_meaning('IGF_GE_PARAMETERS','SIM_MODE');
13132: l_runm_log := igf_ap_gen.get_lookup_meaning('IGF_GE_PARAMETERS','RUN_MODE');
13133: l_publish_log := igf_ap_gen.get_lookup_meaning('IGF_GE_PARAMETERS','PUBLISH_IN_SS');
13134:
13135: fnd_file.put_line(fnd_file.log,l_param_pass_log);
13136:
13137: --log award year
13138: IF p_award_year IS NOT NULL THEN
13139: OPEN c_alternate_code(p_award_year);
13138: IF p_award_year IS NOT NULL THEN
13139: OPEN c_alternate_code(p_award_year);
13140: FETCH c_alternate_code INTO l_alternate_code;
13141: CLOSE c_alternate_code;
13142: fnd_file.put_line(fnd_file.log,RPAD(l_awd_yr_log,40) || ' : ' || l_alternate_code);
13143: END IF;
13144:
13145: --log award period
13146: IF p_awd_prd_code IS NOT NULL THEN
13146: IF p_awd_prd_code IS NOT NULL THEN
13147: OPEN c_ap(p_awd_prd_code,p_award_year);
13148: FETCH c_ap INTO l_ap;
13149: CLOSE c_ap;
13150: fnd_file.put_line(fnd_file.log,RPAD(l_ap_log,40) || ' : ' || l_ap);
13151: END IF;
13152:
13153: --log fund_id
13154: IF p_fund_id IS NOT NULL THEN
13154: IF p_fund_id IS NOT NULL THEN
13155: OPEN c_fund(p_fund_id);
13156: FETCH c_fund INTO l_fund;
13157: CLOSE c_fund;
13158: fnd_file.put_line(fnd_file.log,RPAD(l_fund_log,40) || ' : ' || l_fund);
13159: END IF;
13160:
13161: --log distribution plan
13162: IF p_dist_id IS NOT NULL THEN
13162: IF p_dist_id IS NOT NULL THEN
13163: OPEN c_dp(p_dist_id);
13164: FETCH c_dp INTO l_dp;
13165: CLOSE c_dp;
13166: fnd_file.put_line(fnd_file.log,RPAD(l_dp_log,40) || ' : ' || l_dp);
13167: END IF;
13168:
13169: --log person number
13170: IF p_base_id IS NOT NULL THEN
13170: IF p_base_id IS NOT NULL THEN
13171: OPEN c_person_number(p_base_id);
13172: FETCH c_person_number INTO l_person_number;
13173: CLOSE c_person_number;
13174: fnd_file.put_line(fnd_file.log,RPAD(l_pers_number_log,40) || ' : ' || l_person_number);
13175: END IF;
13176:
13177: --log person id group
13178: IF p_persid_grp IS NOT NULL THEN
13178: IF p_persid_grp IS NOT NULL THEN
13179: OPEN c_person_group(p_persid_grp);
13180: FETCH c_person_group INTO l_persid_grp_name;
13181: CLOSE c_person_group;
13182: fnd_file.put_line(fnd_file.log,RPAD(l_pers_id_grp_log,40) || ' : ' || l_persid_grp_name.group_name);
13183: END IF;
13184:
13185: --log minimum amount
13186: IF p_sf_min_amount IS NOT NULL THEN
13183: END IF;
13184:
13185: --log minimum amount
13186: IF p_sf_min_amount IS NOT NULL THEN
13187: fnd_file.put_line(fnd_file.log,RPAD(l_sf_min_log,40) || ' : ' || p_sf_min_amount);
13188: END IF;
13189:
13190: --log maximum amount
13191: IF p_sf_max_amount IS NOT NULL THEN
13188: END IF;
13189:
13190: --log maximum amount
13191: IF p_sf_max_amount IS NOT NULL THEN
13192: fnd_file.put_line(fnd_file.log,RPAD(l_sf_max_log,40) || ' : ' || p_sf_max_amount);
13193: END IF;
13194:
13195: --log allow to exceed
13196: IF p_allow_to_exceed IS NOT NULL THEN
13193: END IF;
13194:
13195: --log allow to exceed
13196: IF p_allow_to_exceed IS NOT NULL THEN
13197: fnd_file.put_line(fnd_file.log,RPAD(l_allow_log,40) || ' : ' || igf_aw_gen.lookup_desc('IGF_AW_SF_ALLOW_EXCEED',p_allow_to_exceed));
13198: END IF;
13199:
13200: --log update award notification status
13201: IF p_upd_awd_notif_status IS NOT NULL THEN
13198: END IF;
13199:
13200: --log update award notification status
13201: IF p_upd_awd_notif_status IS NOT NULL THEN
13202: fnd_file.put_line(fnd_file.log,RPAD(l_notif_log,40) || ' : ' || igf_aw_gen.lookup_desc('IGF_AP_YES_NO',p_upd_awd_notif_status));
13203: END IF;
13204:
13205: --log lock award setting
13206: IF p_lock_award IS NOT NULL THEN
13203: END IF;
13204:
13205: --log lock award setting
13206: IF p_lock_award IS NOT NULL THEN
13207: fnd_file.put_line(fnd_file.log,RPAD(l_lock_log,40) || ' : ' || igf_aw_gen.lookup_desc('IGF_AP_YES_NO',p_lock_award));
13208: END IF;
13209:
13210: --log award group
13211: IF p_grp_code IS NOT NULL THEN
13211: IF p_grp_code IS NOT NULL THEN
13212: OPEN c_awd_grp(p_grp_code,p_award_year);
13213: FETCH c_awd_grp INTO l_awd_grp;
13214: CLOSE c_awd_grp;
13215: fnd_file.put_line(fnd_file.log,RPAD(l_agrp_log,40) || ' : ' ||l_awd_grp.description);
13216: END IF;
13217:
13218: --log simulation
13219: IF p_sim_mode IS NOT NULL THEN
13216: END IF;
13217:
13218: --log simulation
13219: IF p_sim_mode IS NOT NULL THEN
13220: fnd_file.put_line(fnd_file.log,RPAD(l_sim_log,40) || ' : ' || igf_aw_gen.lookup_desc('IGF_AP_YES_NO',p_sim_mode));
13221: END IF;
13222:
13223: --log run mode
13224: IF p_run_mode IS NOT NULL THEN
13221: END IF;
13222:
13223: --log run mode
13224: IF p_run_mode IS NOT NULL THEN
13225: fnd_file.put_line(fnd_file.log,RPAD(l_runm_log,40) || ' : ' || p_run_mode);
13226: END IF;
13227:
13228: --log publish mode
13229: IF p_publish_in_ss_flag IS NOT NULL THEN
13226: END IF;
13227:
13228: --log publish mode
13229: IF p_publish_in_ss_flag IS NOT NULL THEN
13230: fnd_file.put_line(fnd_file.log,RPAD(l_publish_log,40) || ' : ' || igf_aw_gen.lookup_desc('IGF_AP_YES_NO',p_publish_in_ss_flag));
13231: END IF;
13232:
13233: fnd_file.put_line(fnd_file.log,RPAD('-',55,'-'));
13234: END log_parameters;
13229: IF p_publish_in_ss_flag IS NOT NULL THEN
13230: fnd_file.put_line(fnd_file.log,RPAD(l_publish_log,40) || ' : ' || igf_aw_gen.lookup_desc('IGF_AP_YES_NO',p_publish_in_ss_flag));
13231: END IF;
13232:
13233: fnd_file.put_line(fnd_file.log,RPAD('-',55,'-'));
13234: END log_parameters;
13235:
13236: PROCEDURE run(
13237: errbuf OUT NOCOPY VARCHAR2,
13402:
13403: IF l_ci_cal_type IS NULL OR l_ci_sequence_number IS NULL THEN
13404: retcode := 2;
13405: fnd_message.set_name('IGS','IGS_AD_SYSCAL_CONFIG_NOT_DTMN');
13406: fnd_file.put_line(fnd_file.log,fnd_message.get);
13407: RETURN;
13408: END IF;
13409:
13410: get_process_id;
13421: END IF;
13422:
13423: IF lv_result <> 'TRUE' THEN
13424: fnd_message.set_name('IGF',lv_result);
13425: fnd_file.put_line(fnd_file.log,fnd_message.get);
13426: RETURN;
13427: END IF;
13428: END IF;
13429:
13448: FOR c_fund_dtls_rec IN c_fund_dtls(p_fund_id) LOOP
13449: IF c_fund_dtls_rec.auto_pkg <>'Y' THEN
13450: fnd_message.set_name('IGF','IGF_AW_PK_AUTO_SKIP');
13451: fnd_message.set_token('FUND_ID',c_fund_dtls_rec.fund_code);
13452: fnd_file.put_line(fnd_file.log,fnd_message.get);
13453: RETURN;
13454: END IF;
13455:
13456: IF c_fund_dtls_rec.entitlement = 'Y' AND g_allow_to_exceed IS NOT NULL THEN
13454: END IF;
13455:
13456: IF c_fund_dtls_rec.entitlement = 'Y' AND g_allow_to_exceed IS NOT NULL THEN
13457: fnd_message.set_name('IGF','IGF_AW_ALLOW_EXCD_WHEN_ENTLMNT');
13458: fnd_file.put_line(fnd_file.log,fnd_message.get);
13459: RAISE PARAM_ERR;
13460: END IF;
13461:
13462: IF c_fund_dtls_rec.fund_source = 'FEDERAL' AND g_allow_to_exceed IS NOT NULL THEN
13460: END IF;
13461:
13462: IF c_fund_dtls_rec.fund_source = 'FEDERAL' AND g_allow_to_exceed IS NOT NULL THEN
13463: fnd_message.set_name('IGF','IGF_AW_ALLOW_EXCD_WHEN_FEDERAL');
13464: fnd_file.put_line(fnd_file.log,fnd_message.get);
13465: RAISE PARAM_ERR;
13466: END IF;
13467:
13468: IF g_sf_min_amount IS NOT NULL AND g_sf_max_amount IS NOT NULL AND g_sf_min_amount > g_sf_max_amount THEN
13466: END IF;
13467:
13468: IF g_sf_min_amount IS NOT NULL AND g_sf_max_amount IS NOT NULL AND g_sf_min_amount > g_sf_max_amount THEN
13469: fnd_message.set_name('IGF','IGF_AW_MAX_MIN');
13470: fnd_file.put_line(fnd_file.log,fnd_message.get);
13471: RAISE PARAM_ERR;
13472: END IF;
13473:
13474: IF c_fund_dtls_rec.fed_fund_code IN ('ACG','SMART') AND g_persid_grp IS NULL THEN
13472: END IF;
13473:
13474: IF c_fund_dtls_rec.fed_fund_code IN ('ACG','SMART') AND g_persid_grp IS NULL THEN
13475: fnd_message.set_name('IGF','IGF_AW_PER_GRP_REQD');
13476: fnd_file.put_line(fnd_file.log,fnd_message.get);
13477: RAISE PARAM_ERR;
13478: END IF;
13479:
13480: IF (g_sf_min_amount IS NOT NULL) AND
13480: IF (g_sf_min_amount IS NOT NULL) AND
13481: ( g_sf_min_amount < NVL(c_fund_dtls_rec.min_award_amt,0) OR g_sf_min_amount > c_fund_dtls_rec.max_award_amt)
13482: THEN
13483: fnd_message.set_name('IGF','IGF_AW_SF_MIN_AMT_LESS_FUND');
13484: fnd_file.put_line(fnd_file.log,fnd_message.get);
13485: END IF;
13486:
13487: IF (g_sf_max_amount IS NOT NULL) AND
13488: (g_sf_max_amount > c_fund_dtls_rec.max_award_amt OR g_sf_max_amount < NVL(c_fund_dtls_rec.min_award_amt,0))
13487: IF (g_sf_max_amount IS NOT NULL) AND
13488: (g_sf_max_amount > c_fund_dtls_rec.max_award_amt OR g_sf_max_amount < NVL(c_fund_dtls_rec.min_award_amt,0))
13489: THEN
13490: fnd_message.set_name('IGF','IGF_AW_SF_MAX_AMT_GTR_FUND');
13491: fnd_file.put_line(fnd_file.log,fnd_message.get);
13492: END IF;
13493:
13494: END LOOP;
13495:
13510:
13511: -- Conc program cannot be executed for both group code and the base id at a time, so log message and exit
13512: IF l_grp_code IS NOT NULL AND l_base_id IS NOT NULL THEN
13513: fnd_message.set_name('IGF','IGF_AW_SF_GRP_BASE');
13514: fnd_file.put_line(fnd_file.log,fnd_message.get);
13515: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
13516: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_packaging.run.debug '|| g_req_id,'both base_id and l_grp_code specified');
13517: END IF;
13518: RAISE PARAM_ERR;
13632: IF c_summary_awd%ROWCOUNT = 1 THEN
13633: l_str := RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG','FUND_CODE'), 40, ' ');
13634: l_str := l_str ||RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG','AWARD_COUNT'), 30, ' ');
13635: l_str := l_str ||RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG','AWARD_AMOUNT'), 30, ' ');
13636: fnd_file.put_line(fnd_file.output,RPAD('-',90,'-'));
13637: fnd_file.put_line(fnd_file.output,l_str);
13638: fnd_file.put_line(fnd_file.output,RPAD('-',90,'-'));
13639: END IF;
13640:
13633: l_str := RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG','FUND_CODE'), 40, ' ');
13634: l_str := l_str ||RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG','AWARD_COUNT'), 30, ' ');
13635: l_str := l_str ||RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG','AWARD_AMOUNT'), 30, ' ');
13636: fnd_file.put_line(fnd_file.output,RPAD('-',90,'-'));
13637: fnd_file.put_line(fnd_file.output,l_str);
13638: fnd_file.put_line(fnd_file.output,RPAD('-',90,'-'));
13639: END IF;
13640:
13641: l_str := NULL;
13634: l_str := l_str ||RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG','AWARD_COUNT'), 30, ' ');
13635: l_str := l_str ||RPAD(igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG','AWARD_AMOUNT'), 30, ' ');
13636: fnd_file.put_line(fnd_file.output,RPAD('-',90,'-'));
13637: fnd_file.put_line(fnd_file.output,l_str);
13638: fnd_file.put_line(fnd_file.output,RPAD('-',90,'-'));
13639: END IF;
13640:
13641: l_str := NULL;
13642: l_str := RPAD(l_summ_rec.fund_code,40,' ');
13641: l_str := NULL;
13642: l_str := RPAD(l_summ_rec.fund_code,40,' ');
13643: l_str :=l_str||RPAD(TO_CHAR(l_summ_rec.cnt),30,' ');
13644: l_str :=l_str||LPAD(TO_CHAR(l_summ_rec.offered_amt),20,' ');
13645: fnd_file.put_line(fnd_file.output,l_str );
13646: END LOOP;
13647: CLOSE c_summary_awd;
13648:
13649: IF l_count > 0 THEN
13646: END LOOP;
13647: CLOSE c_summary_awd;
13648:
13649: IF l_count > 0 THEN
13650: fnd_file.put_line(fnd_file.output,RPAD('-',90,'-'));
13651: END IF;
13652:
13653: -- Clear out NOCOPY temporary records
13654: OPEN c_temp_rec;
13660:
13661: END LOOP;
13662: CLOSE c_temp_rec;
13663:
13664: fnd_file.new_line(fnd_file.log,2);
13665:
13666: EXCEPTION
13667:
13668: WHEN PARAM_ERR THEN
13667:
13668: WHEN PARAM_ERR THEN
13669: ROLLBACK;
13670: retcode := 2;
13671: fnd_file.new_line(fnd_file.log,2);
13672: fnd_message.set_name('IGF','IGF_AW_PARAM_ERR');
13673: igs_ge_msg_stack.add;
13674: igs_ge_msg_stack.conc_exception_hndl;
13675:
13764: -- Check whether the required parameters are passed or not.
13765: -- If sufficient parameters are not present then log a message and exit the conc job
13766: IF p_base_id IS NULL AND p_persid_grp IS NULL THEN
13767: fnd_message.set_name('IGF','IGF_AW_SF_PARAM_NULL');
13768: fnd_file.put_line(fnd_file.log,fnd_message.get);
13769: RAISE PARAM_ERR;
13770: ELSIF p_base_id IS NOT NULL AND p_persid_grp IS NOT NULL THEN
13771: fnd_message.set_name('IGF','IGF_AW_SF_BASE_PERSID');
13772: fnd_file.put_line(fnd_file.log,fnd_message.get);
13768: fnd_file.put_line(fnd_file.log,fnd_message.get);
13769: RAISE PARAM_ERR;
13770: ELSIF p_base_id IS NOT NULL AND p_persid_grp IS NOT NULL THEN
13771: fnd_message.set_name('IGF','IGF_AW_SF_BASE_PERSID');
13772: fnd_file.put_line(fnd_file.log,fnd_message.get);
13773: RAISE PARAM_ERR;
13774: END IF;
13775:
13776: g_sf_packaging := 'T';
13783: END IF;
13784:
13785: IF lv_result <> 'TRUE' THEN
13786: fnd_message.set_name('IGF',lv_result);
13787: fnd_file.put_line(fnd_file.log,fnd_message.get);
13788: RAISE PARAM_ERR;
13789: ELSE
13790: g_plan_id := p_dist_id;
13791: g_method_cd := lv_method_code;
13817: EXCEPTION
13818: WHEN PARAM_ERR THEN
13819: ROLLBACK;
13820: retcode := 2;
13821: fnd_file.new_line(fnd_file.log,2);
13822: fnd_message.set_name('IGF','IGF_AW_PARAM_ERR');
13823: igs_ge_msg_stack.add;
13824: igs_ge_msg_stack.conc_exception_hndl;
13825: