[Home] [Help]
478: END get_loan_fee2;
479:
480:
481: FUNCTION chk_disb_date(p_award_id igf_sl_loans.award_id%TYPE,
482: p_loan_per_begin_date igf_sl_loans_all.loan_per_begin_date%TYPE,
483: p_loan_per_end_date igf_sl_loans_all.loan_per_end_date%TYPE
484: )
485: RETURN VARCHAR2 AS
486: /* -------------------------------------------------------------
479:
480:
481: FUNCTION chk_disb_date(p_award_id igf_sl_loans.award_id%TYPE,
482: p_loan_per_begin_date igf_sl_loans_all.loan_per_begin_date%TYPE,
483: p_loan_per_end_date igf_sl_loans_all.loan_per_end_date%TYPE
484: )
485: RETURN VARCHAR2 AS
486: /* -------------------------------------------------------------
487: || Created By :
494: || smadathi 14-OCT-2004 Bug 3416936.Changes as per TD
495: ------------------------------------------------------------------*/
496:
497: CURSOR c_loans (cp_n_award_id igf_aw_award_all.award_id%TYPE,
498: cp_loan_per_begin_date igf_sl_loans_all.loan_per_begin_date%TYPE,
499: cp_loan_per_end_date igf_sl_loans_all.loan_per_end_date%TYPE) IS
500: SELECT disb.award_id
501: ,disb.disb_date
502: ,disb.disb_num
495: ------------------------------------------------------------------*/
496:
497: CURSOR c_loans (cp_n_award_id igf_aw_award_all.award_id%TYPE,
498: cp_loan_per_begin_date igf_sl_loans_all.loan_per_begin_date%TYPE,
499: cp_loan_per_end_date igf_sl_loans_all.loan_per_end_date%TYPE) IS
500: SELECT disb.award_id
501: ,disb.disb_date
502: ,disb.disb_num
503: FROM igf_aw_awd_disb_all disb
500: SELECT disb.award_id
501: ,disb.disb_date
502: ,disb.disb_num
503: FROM igf_aw_awd_disb_all disb
504: ,igf_sl_loans_all loans
505: WHERE loans.award_id=disb.award_id
506: AND loans.award_id = cp_n_award_id
507: AND ( disb.disb_date < NVL(cp_loan_per_begin_date, loans.loan_per_begin_date)
508: OR disb.disb_date > NVL(cp_loan_per_end_date, loans.loan_per_end_date));
1237: ------------------------------------------------------------------
1238: CURSOR c_chk_chg_enable (cp_n_award_id igf_aw_award_all.award_id%TYPE) IS
1239: SELECT loans.loan_number
1240: FROM igf_sl_lor_all lor
1241: ,igf_sl_loans_all loans
1242: ,igf_aw_award_all awd
1243: ,igf_aw_fund_mast_all fmast
1244: ,igf_sl_cl_setup_all clset
1245: WHERE loans.loan_id = lor.loan_id
1254: AND fmast.ci_sequence_number = clset.ci_sequence_number
1255: AND lor.relationship_cd = clset.relationship_cd
1256: AND clset.cl_version = 'RELEASE-4';
1257:
1258: l_v_loan_number igf_sl_loans_all.loan_number%TYPE;
1259: BEGIN
1260: OPEN c_chk_chg_enable (cp_n_award_id => p_n_award_id);
1261: FETCH c_chk_chg_enable INTO l_v_loan_number;
1262: IF c_chk_chg_enable%NOTFOUND THEN
1296: --Who When What
1297: ------------------------------------------------------------------
1298: CURSOR c_igf_sl_loans (cp_n_award_id igf_aw_award_all.award_id%TYPE) IS
1299: SELECT 'X'
1300: FROM igf_sl_loans_all lar
1301: WHERE lar.award_id = cp_n_award_id;
1302:
1303: rec_c_igf_sl_loans c_igf_sl_loans%ROWTYPE;
1304:
1370: --Who When What
1371: ------------------------------------------------------------------
1372: CURSOR c_igf_sl_loans (cp_n_award_id igf_aw_award_all.award_id%TYPE) IS
1373: SELECT 'X'
1374: FROM igf_sl_loans_all lar
1375: WHERE lar.award_id = cp_n_award_id;
1376:
1377: rec_c_igf_sl_loans c_igf_sl_loans%ROWTYPE;
1378:
1386: SELECT loans.loan_number loan_number
1387: ,clset.cl_version cl_version
1388: ,loans.loan_status loan_status
1389: FROM igf_sl_lor_all lor
1390: ,igf_sl_loans_all loans
1391: ,igf_aw_award_all awd
1392: ,igf_aw_fund_mast_all fmast
1393: ,igf_sl_cl_setup_all clset
1394: WHERE loans.loan_id = lor.loan_id
1401: AND fmast.ci_cal_type = clset.ci_cal_type
1402: AND fmast.ci_sequence_number = clset.ci_sequence_number
1403: AND lor.relationship_cd = clset.relationship_cd ;
1404:
1405: l_v_loan_number igf_sl_loans_all.loan_number%TYPE;
1406: l_n_cl_version igf_sl_cl_setup_all.cl_version%TYPE;
1407: l_v_loan_status igf_sl_loans_all.loan_status%TYPE;
1408: l_disb_num igf_aw_awd_disb_all.disb_num%TYPE;
1409: l_n_award_id igf_aw_award_all.award_id%TYPE;
1403: AND lor.relationship_cd = clset.relationship_cd ;
1404:
1405: l_v_loan_number igf_sl_loans_all.loan_number%TYPE;
1406: l_n_cl_version igf_sl_cl_setup_all.cl_version%TYPE;
1407: l_v_loan_status igf_sl_loans_all.loan_status%TYPE;
1408: l_disb_num igf_aw_awd_disb_all.disb_num%TYPE;
1409: l_n_award_id igf_aw_award_all.award_id%TYPE;
1410:
1411: BEGIN
1490: fmast.ci_sequence_number,
1491: lor.relationship_cd
1492: FROM
1493: igf_sl_lor_all lor,
1494: igf_sl_loans_all loans,
1495: igf_aw_award_all awd,
1496: igf_aw_fund_mast_all fmast
1497: WHERE
1498: loans.loan_id = lor.loan_id AND
1556: CURSOR c_chk_fund_st_chg_1 (cp_n_award_id IN igf_aw_award_all.award_id%TYPE,
1557: cp_n_disb_num IN igf_aw_awd_disb_all.disb_num%TYPE) IS
1558: SELECT dbresp.disb_num
1559: FROM igf_db_cl_disb_resp dbresp
1560: ,igf_sl_loans_all loans
1561: ,igf_aw_award_all awd
1562: WHERE dbresp.disb_num = cp_n_disb_num
1563: AND loans.loan_number = dbresp.loan_number
1564: AND awd.award_id = loans.award_id
1568: CURSOR c_chk_fund_st_chg_2 (cp_n_award_id IN igf_aw_award_all.award_id%TYPE,
1569: cp_n_disb_num IN igf_aw_awd_disb_all.disb_num%TYPE) IS
1570: SELECT chg.disbursement_number
1571: FROM igf_sl_clchsn_dtls chg
1572: ,igf_sl_loans_all loans
1573: ,igf_aw_award_all awd
1574: WHERE chg.disbursement_number = cp_n_disb_num
1575: AND chg.change_record_type_txt = '10'
1576: AND chg.status_code <> ('D')