[Home] [Help]
7: --------------------------------------------------------------------------
8: -- veramach 04-May-2004 bug 3603289
9: -- (a) Modified cursor cur_student_licence to select
10: -- dependency_status from ISIR. other details are
11: -- derived from igf_sl_gen.get_person_details.
12: -- (b) Modified logic dl_lar_validate so that the loop
13: -- executes whenever called from FORM.
14: --------------------------------------------------------------------------
15: -- sjadhav, Jan 26,2002
20: -------------------------------------------------------------------------
21:
22: p_dl_version igf_lookups_view.lookup_code%TYPE;
23: g_loan_id igf_sl_Loans_all.loan_id%TYPE;
24: student_dtl_rec igf_sl_gen.person_dtl_rec;
25: parent_dtl_rec igf_sl_gen.person_dtl_rec;
26:
27: CURSOR cur_disb(c_award_id igf_aw_awd_disb.award_id%TYPE) IS
28: SELECT COUNT(*) disb_count FROM igf_aw_awd_disb_all
21:
22: p_dl_version igf_lookups_view.lookup_code%TYPE;
23: g_loan_id igf_sl_Loans_all.loan_id%TYPE;
24: student_dtl_rec igf_sl_gen.person_dtl_rec;
25: parent_dtl_rec igf_sl_gen.person_dtl_rec;
26:
27: CURSOR cur_disb(c_award_id igf_aw_awd_disb.award_id%TYPE) IS
28: SELECT COUNT(*) disb_count FROM igf_aw_awd_disb_all
29: WHERE award_id = c_award_id
316: added one parameter p_school_code to this function.
317: bkkumar 30-sep-2003 Bug 3104228 Changed the cursor cur_loans
318: containing igf_sl_lor_dtls_v with simple
319: joins and got the details of student and parent
320: from igf_sl_gen.get_person_details.
321: Added the debugging log messages.
322:
323: gmuralid 3-July-2003 Bug 2995944 - Legacy Part 3 - FFELP Import
324: Added legacy record flag as parameter to
346: l_status_2 igf_sl_loans_all.loan_status%TYPE;
347: l_status_3 igf_sl_loans_all.loan_status%TYPE;
348: l_fed_fund_1 igf_aw_fund_cat_all.fed_fund_code%TYPE;
349: l_fed_fund_2 igf_aw_fund_cat_all.fed_fund_code%TYPE;
350: student_dtl_cur igf_sl_gen.person_dtl_cur;
351: parent_dtl_cur igf_sl_gen.person_dtl_cur;
352: lv_message VARCHAR2(100);
353: lv_complete BOOLEAN;
354: lv_disb_count NUMBER;
347: l_status_3 igf_sl_loans_all.loan_status%TYPE;
348: l_fed_fund_1 igf_aw_fund_cat_all.fed_fund_code%TYPE;
349: l_fed_fund_2 igf_aw_fund_cat_all.fed_fund_code%TYPE;
350: student_dtl_cur igf_sl_gen.person_dtl_cur;
351: parent_dtl_cur igf_sl_gen.person_dtl_cur;
352: lv_message VARCHAR2(100);
353: lv_complete BOOLEAN;
354: lv_disb_count NUMBER;
355: lv_special_school VARCHAR2(30);
454: BEGIN
455:
456: lv_complete := TRUE;
457: BEGIN
458: p_dl_version := igf_sl_gen.get_dl_version(p_ci_cal_type, p_ci_sequence_number);
459: EXCEPTION
460: WHEN NO_DATA_FOUND THEN
461: fnd_message.set_name('IGF','IGF_SL_NO_DL_SETUP');
462: fnd_file.put_line(fnd_file.log,fnd_message.get);
501: LOOP
502: --Need not perform the validations if the Loan ID is same.
503: IF NVL(g_loan_id,0) <> orec.loan_id OR p_call_mode = 'FORM' THEN
504:
505: -- FA 122 Loan Enhancements Use the igf_sl_gen.get_person_details for getting the student as
506: -- well as parent details.
507: igf_sl_gen.get_person_details(orec.student_id,student_dtl_cur);
508: FETCH student_dtl_cur INTO student_dtl_rec;
509:
503: IF NVL(g_loan_id,0) <> orec.loan_id OR p_call_mode = 'FORM' THEN
504:
505: -- FA 122 Loan Enhancements Use the igf_sl_gen.get_person_details for getting the student as
506: -- well as parent details.
507: igf_sl_gen.get_person_details(orec.student_id,student_dtl_cur);
508: FETCH student_dtl_cur INTO student_dtl_rec;
509:
510: -- this will fetch the parent details
511: igf_sl_gen.get_person_details(orec.p_person_id,parent_dtl_cur);
507: igf_sl_gen.get_person_details(orec.student_id,student_dtl_cur);
508: FETCH student_dtl_cur INTO student_dtl_rec;
509:
510: -- this will fetch the parent details
511: igf_sl_gen.get_person_details(orec.p_person_id,parent_dtl_cur);
512: FETCH parent_dtl_cur INTO parent_dtl_rec;
513:
514: CLOSE student_dtl_cur;
515: CLOSE parent_dtl_cur;
925: l_s_phone VARCHAR2(80);
926: lv_special_school VARCHAR2(30);
927: lv_complete BOOLEAN;
928: lv_disb_count NUMBER;
929: student_dtl_cur igf_sl_gen.person_dtl_cur;
930: parent_dtl_cur igf_sl_gen.person_dtl_cur;
931: l_dl_std_code igf_ap_class_std_map.dl_std_code%TYPE;
932: lv_dummy varchar2(1);
933: lv_lookup_code igf_lookups_view.LOOKUP_CODE%TYPE;
926: lv_special_school VARCHAR2(30);
927: lv_complete BOOLEAN;
928: lv_disb_count NUMBER;
929: student_dtl_cur igf_sl_gen.person_dtl_cur;
930: parent_dtl_cur igf_sl_gen.person_dtl_cur;
931: l_dl_std_code igf_ap_class_std_map.dl_std_code%TYPE;
932: lv_dummy varchar2(1);
933: lv_lookup_code igf_lookups_view.LOOKUP_CODE%TYPE;
934:
943:
944: BEGIN
945:
946: BEGIN
947: p_dl_version := igf_sl_gen.get_dl_version(p_loan_rec.ci_cal_type, p_loan_rec.ci_sequence_number);
948: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
949: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_validation.cod_loan_validations.debug','p_dl_version '|| p_dl_version );
950: END IF;
951: EXCEPTION
995: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
996: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_sl_dl_validation.cod_loan_validations.debug','lv_acad_end_date got from igf_sl_dl_record.get_acad_cal_dtls:'|| lv_acad_end_date);
997: END IF;
998:
999: igf_sl_gen.get_person_details(igf_gr_gen.get_person_id(p_loan_rec.base_id),student_dtl_cur);
1000: FETCH student_dtl_cur INTO student_dtl_rec;
1001:
1002: igf_sl_gen.get_person_details(p_loan_rec.p_person_id,parent_dtl_cur);
1003: FETCH parent_dtl_cur INTO parent_dtl_rec;
998:
999: igf_sl_gen.get_person_details(igf_gr_gen.get_person_id(p_loan_rec.base_id),student_dtl_cur);
1000: FETCH student_dtl_cur INTO student_dtl_rec;
1001:
1002: igf_sl_gen.get_person_details(p_loan_rec.p_person_id,parent_dtl_cur);
1003: FETCH parent_dtl_cur INTO parent_dtl_rec;
1004:
1005: CLOSE student_dtl_cur;
1006: CLOSE parent_dtl_cur;
1316: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'S_INV_EMAIL', 'S_EMAIL_ADDR', student_dtl_rec.p_email_addr);
1317: END IF;
1318:
1319: -- validating student's Phone Number sl03b.pls
1320: l_s_phone := igf_sl_gen.get_person_phone(igf_gr_gen.get_person_id(p_loan_rec.base_id));
1321: IF l_s_phone = 'N/A' THEN
1322: p_s_phone := NULL;--bug 4093556, When there is no phone number existing for a student then the phone number tag was populated using '000000000000' .
1323: --This has being changed to NULL(akomurav)
1324: ELSE
1683: igf_sl_edit.insert_edit(p_loan_rec.loan_number, 'V', 'IGF_SL_ERR_CODES', 'P_INV_EMAIL', 'P_EMAIL_ADDR', parent_dtl_rec.p_email_addr);
1684: END IF;
1685:
1686: -- validating borrower's Phone Number
1687: l_p_phone := igf_sl_gen.get_person_phone(p_loan_rec.p_person_id);
1688: IF l_p_phone = 'N/A' THEN
1689: p_p_phone := NULL; --bug 4093556, When there is no phone number existing for a student then the phone number tag was populated using '000000000000' .
1690: --This has being changed to NULL(akomurav)
1691: ELSE