[Home] [Help]
28: -- b) Also the DUNS_BORW_LENDER_ID
29: -- DUNS_GUARNT_ID
30: -- DUNS_LENDER_ID
31: -- DUNS_RECIP_ID columns are osboleted from the
32: -- igf_sl_lor_loc_all table.
33: -----------------------------------------------------------------------------------------------------------------------------
34: -- veramach 23-SEP-2003 Bug 3104228: Obsoleted lend_apprv_denied_code,lend_apprv_denied_date,cl_rec_status_last_update,
35: -- cl_rec_status,mpn_confirm_code,appl_loan_phase_code_chg,appl_loan_phase_code,
36: -- p_ssn_chg_date,p_dob_chg_date,s_ssn_chg_date,s_dob_chg_date,s_local_addr_chg_date,
37: -- chg_batch_id,appl_send_error_codes from igf_sl_lor
38: -- Obsoleted lend_apprv_denied_code,lend_apprv_denied_date,cl_rec_status_last_update,
39: -- cl_rec_status,mpn_confirm_code,appl_loan_phase_code_chg,appl_loan_phase_code,
40: -- p_ssn_chg_date,p_dob_chg_date,s_ssn_chg_date,s_dob_chg_date,s_local_addr_chg_date,
41: -- chg_batch_id from igf_sl_lor_loc
42: ------------------------------------------------------------------------------------------------------------------------------
43: ---------------------------------------------------------------------------
44: -- sjadhav 28-Mar-2003 Bug 2863960 added code 'X' for orign records
45: ---------------------------------------------------------------------------
84: -- ENH DESCRIPTION: Loan Processing-Nov 2001
85: -- Uploaded pnote_id field of
86: -- IGF_SL_DL_LOR_RESP table into
87: -- pnote_mpn_ind field
88: -- of IGF_SL_LOR, IGF_SL_LOR_LOC tables.
89: -- If School is configured to print,
90: -- then the pnote_status field of IGF_SL_LOR
91: -- is set to 'G' (Ready to Print)
92: ---------------------------------------------------------------------------
96: -- Know limitations, enhancements or remarks
97: ---------------------------------------------------------------------------
98:
99:
100: g_lor_loc_rec igf_sl_lor_loc%ROWTYPE;
101: g_sl_dl_lor_resp igf_sl_dl_lor_resp%ROWTYPE;
102: g_entry_point VARCHAR2(10) DEFAULT 'NULL';
103: file_not_loaded EXCEPTION;
104: yr_full_participant EXCEPTION;
555: FOR resp_rec IN cur_lor_resp(l_dbth_id) LOOP
556: l_rec_present := 'N';
557: l_rec_updated := 'N';
558:
559: -- Use this to update igf_sl_lor_loc table, with old values.
560: g_lor_loc_rec.orig_status_flag := resp_rec.orig_status_flag;
561: g_lor_loc_rec.orig_ack_date := resp_rec.orig_ack_date;
562: g_lor_loc_rec.pnote_status := resp_rec.pnote_status;
563:
671:
672: l_rec_present := 'N';
673: l_rec_updated := 'N';
674:
675: -- Use this to update igf_sl_lor_loc table, with old values.
676: g_lor_loc_rec.credit_override := crresp_rec.credit_override;
677: g_lor_loc_rec.credit_decision_date := crresp_rec.credit_decision_date;
678: g_lor_loc_rec.pnote_status := crresp_rec.mpn_status;
679: g_lor_loc_rec.pnote_status_date := crresp_rec.credit_decision_date;
808: chg_batch_id,appl_send_error_codes from igf_sl_lor
809: 2. Obsoleted lend_apprv_denied_code,lend_apprv_denied_date,cl_rec_status_last_update,
810: cl_rec_status,mpn_confirm_code,appl_loan_phase_code_chg,appl_loan_phase_code,
811: p_ssn_chg_date,p_dob_chg_date,s_ssn_chg_date,s_dob_chg_date,s_local_addr_chg_date,
812: chg_batch_id from igf_sl_lor_loc
813:
814: agairola 15-MAR-2002 Modified the Update Row call of the IGF_SL_LOANS_PKG
815: added as part of the Refunds DLD - 2144600
816: rboddu 18/05/2001 uploaded pnote_id field of IGF_SL_DL_LOR_RESP table into
1150: -- The DUNS_BORW_LENDER_ID,
1151: -- DUNS_GUARNT_ID,
1152: -- DUNS_LENDER_ID,
1153: -- DUNS_RECIP_ID columns are osboleted from the
1154: -- igf_sl_lor_loc_all table.
1155: -----------------------------------------------------------------------------------------------------------
1156: veramach 23-SEP-2003 Bug 3104228:
1157: 1. Obsoleted lend_apprv_denied_code,lend_apprv_denied_date,cl_rec_status_last_update,
1158: cl_rec_status,mpn_confirm_code,appl_loan_phase_code_chg,appl_loan_phase_code,
1160: chg_batch_id,appl_send_error_codes from igf_sl_lor
1161: 2. Obsoleted lend_apprv_denied_code,lend_apprv_denied_date,cl_rec_status_last_update,
1162: cl_rec_status,mpn_confirm_code,appl_loan_phase_code_chg,appl_loan_phase_code,
1163: p_ssn_chg_date,p_dob_chg_date,s_ssn_chg_date,s_dob_chg_date,s_local_addr_chg_date,
1164: chg_batch_id from igf_sl_lor_loc
1165: rboddu 18/05/2001 uploaded pnote_id field of IGF_SL_DL_LOR_RESP table into
1166: pnote_mpn_ind field of IGF_SL_LOR_LOC table.
1167:
1168: (reverse chronological order - newest change first)
1162: cl_rec_status,mpn_confirm_code,appl_loan_phase_code_chg,appl_loan_phase_code,
1163: p_ssn_chg_date,p_dob_chg_date,s_ssn_chg_date,s_dob_chg_date,s_local_addr_chg_date,
1164: chg_batch_id from igf_sl_lor_loc
1165: rboddu 18/05/2001 uploaded pnote_id field of IGF_SL_DL_LOR_RESP table into
1166: pnote_mpn_ind field of IGF_SL_LOR_LOC table.
1167:
1168: (reverse chronological order - newest change first)
1169: ***************************************************************/
1170:
1170:
1171: CURSOR c_tbh_cur
1172: IS
1173: SELECT
1174: igf_sl_lor_loc.*
1175: FROM
1176: igf_sl_lor_loc
1177: WHERE loan_id = p_loan_id
1178: FOR UPDATE OF igf_sl_lor_loc.loan_status NOWAIT;
1172: IS
1173: SELECT
1174: igf_sl_lor_loc.*
1175: FROM
1176: igf_sl_lor_loc
1177: WHERE loan_id = p_loan_id
1178: FOR UPDATE OF igf_sl_lor_loc.loan_status NOWAIT;
1179:
1180: BEGIN
1174: igf_sl_lor_loc.*
1175: FROM
1176: igf_sl_lor_loc
1177: WHERE loan_id = p_loan_id
1178: FOR UPDATE OF igf_sl_lor_loc.loan_status NOWAIT;
1179:
1180: BEGIN
1181:
1182: FOR tbh_rec in c_tbh_cur LOOP
1198:
1199: tbh_rec.loan_status := g_lor_loc_rec.loan_status;
1200: tbh_rec.loan_status_date := g_lor_loc_rec.loan_status_date;
1201:
1202: igf_sl_lor_loc_pkg.update_row (
1203: x_mode => 'R',
1204: x_rowid => tbh_rec.row_id,
1205: x_loan_id => tbh_rec.loan_id,
1206: x_origination_id => tbh_rec.origination_id,