[Home] [Help]
79: l_d_res_loan_per_end_dt igf_sl_cl_resp_r1_all.loan_per_end_date%TYPE;
80: l_n_cl_version igf_sl_cl_setup_all.cl_version%TYPE;
81: l_v_loan_status igf_sl_loans_all.loan_status%TYPE;
82: l_n_clchgsnd_id igf_sl_clchsn_dtls.clchgsnd_id%TYPE;
83: l_n_award_id igf_aw_award_all.award_id%TYPE;
84: l_v_loan_number igf_sl_loans_all.loan_number%TYPE;
85: l_n_loan_id igf_sl_loans_all.loan_id%TYPE;
86: l_c_cl_rec_status igf_sl_lor_all.cl_rec_status%TYPE;
87: l_v_prc_type_code igf_sl_lor_all.prc_type_code%TYPE;
791: l_v_message_name fnd_new_messages.message_name%TYPE;
792: l_b_return_status BOOLEAN;
793: l_c_cl_rec_status igf_sl_lor_all.cl_rec_status%TYPE;
794: l_v_prc_type_code igf_sl_lor_all.prc_type_code%TYPE;
795: l_n_award_id igf_aw_award_all.award_id%TYPE;
796: l_v_loan_number igf_sl_loans_all.loan_number%TYPE;
797:
798: e_valid_edits EXCEPTION;
799: e_resource_busy EXCEPTION;
1430: app_exception.raise_exception;
1431:
1432: END create_lor_chg_rec;
1433:
1434: PROCEDURE create_awd_chg_rec ( p_n_award_id IN igf_aw_award_all.award_id%TYPE,
1435: p_n_old_amount IN NUMBER,
1436: p_n_new_amount IN NUMBER,
1437: p_v_chg_type IN VARCHAR2,
1438: p_b_return_status OUT NOCOPY BOOLEAN,
1459: --Change History:
1460: --Who When What
1461: ------------------------------------------------------------------
1462:
1463: CURSOR c_igf_sl_lorlar(cp_n_award_id igf_aw_award_all.award_id%TYPE) IS
1464: SELECT lar.loan_number
1465: ,lar.loan_status
1466: ,lor.prc_type_code
1467: ,lor.cl_rec_status
1471: AND lar.award_id = cp_n_award_id;
1472:
1473: rec_c_igf_sl_lorlar c_igf_sl_lorlar%ROWTYPE;
1474:
1475: CURSOR c_igf_aw_awd_disb (cp_n_award_id igf_aw_award_all.award_id%TYPE) IS
1476: SELECT adisb.disb_num
1477: FROM igf_aw_awd_disb_all adisb
1478: WHERE adisb.award_id = cp_n_award_id
1479: AND NVL(adisb.fund_status,'N') = 'Y';
1501: l_v_message_name fnd_new_messages.message_name%TYPE;
1502: l_b_return_status BOOLEAN;
1503: l_c_cl_rec_status igf_sl_lor_all.cl_rec_status%TYPE;
1504: l_v_prc_type_code igf_sl_lor_all.prc_type_code%TYPE;
1505: l_n_award_id igf_aw_award_all.award_id%TYPE;
1506: l_v_loan_number igf_sl_loans_all.loan_number%TYPE;
1507: l_n_disb_num igf_aw_awd_disb_all.disb_num%TYPE;
1508: l_n_resp_guarantee_amt igf_sl_cl_resp_r1_all.guarantee_amt%TYPE;
1509: l_v_response_status_code igf_sl_clchsn_dtls.response_status_code%TYPE;
2856: --
2857: --Change History:
2858: --Who When What
2859: ------------------------------------------------------------------
2860: CURSOR c_igf_sl_lorlar(cp_n_award_id igf_aw_award_all.award_id%TYPE) IS
2861: SELECT lar.loan_number
2862: ,lar.loan_status
2863: ,lor.prc_type_code
2864: ,lor.cl_rec_status
2898: l_v_message_name fnd_new_messages.message_name%TYPE;
2899: l_b_return_status BOOLEAN;
2900: l_c_cl_rec_status igf_sl_lor_all.cl_rec_status%TYPE;
2901: l_v_prc_type_code igf_sl_lor_all.prc_type_code%TYPE;
2902: l_n_award_id igf_aw_award_all.award_id%TYPE;
2903: l_v_loan_number igf_sl_loans_all.loan_number%TYPE;
2904: l_n_disb_num igf_aw_awd_disb_all.disb_num%TYPE;
2905: l_v_old_fund_status igf_aw_awd_disb_all.fund_status%TYPE;
2906: l_n_resp_disb_gross_amt igf_aw_awd_disb_all.disb_gross_amt%TYPE;