[Home] [Help]
35:
36: PROCEDURE Trans_Rec( p_dl_version igf_lookups_view.lookup_code%TYPE,
37: p_dl_batch_id igf_sl_dl_batch.batch_id%TYPE,
38: p_Rec_count IN OUT NOCOPY NUMBER,
39: p_ci_cal_type igf_sl_dl_setup.ci_cal_type%TYPE,
40: p_ci_sequence_number igf_sl_dl_setup.ci_sequence_number%TYPE,
41: p_school_code IN VARCHAR2
42: );
43:
36: PROCEDURE Trans_Rec( p_dl_version igf_lookups_view.lookup_code%TYPE,
37: p_dl_batch_id igf_sl_dl_batch.batch_id%TYPE,
38: p_Rec_count IN OUT NOCOPY NUMBER,
39: p_ci_cal_type igf_sl_dl_setup.ci_cal_type%TYPE,
40: p_ci_sequence_number igf_sl_dl_setup.ci_sequence_number%TYPE,
41: p_school_code IN VARCHAR2
42: );
43:
44: PROCEDURE disb_originate(errbuf OUT NOCOPY VARCHAR2,
296:
297: PROCEDURE trans_rec( p_dl_version igf_lookups_view.lookup_code%TYPE,
298: p_dl_batch_id igf_sl_dl_batch.batch_id%TYPE,
299: p_rec_count IN OUT NOCOPY NUMBER,
300: p_ci_cal_type igf_sl_dl_setup.ci_cal_type%TYPE,
301: p_ci_sequence_number igf_sl_dl_setup.ci_sequence_number%TYPE,
302: p_school_code IN VARCHAR2 )
303: AS
304: /*************************************************************
297: PROCEDURE trans_rec( p_dl_version igf_lookups_view.lookup_code%TYPE,
298: p_dl_batch_id igf_sl_dl_batch.batch_id%TYPE,
299: p_rec_count IN OUT NOCOPY NUMBER,
300: p_ci_cal_type igf_sl_dl_setup.ci_cal_type%TYPE,
301: p_ci_sequence_number igf_sl_dl_setup.ci_sequence_number%TYPE,
302: p_school_code IN VARCHAR2 )
303: AS
304: /*************************************************************
305: Created By : prchandr
314: filter only the loans having the school id matched with parameter p_school_code.
315: ugummall 17-OCT-2003 Bug 3102439. FA 126 Multiple FA Offices.
316: 1. Logic is changed so that it processes for only those students whose associated
317: Org Unit has an alternate identifier for Direct Loan School Code matching with
318: the supplied parameter p_school_code(instead of school_id picked from igf_sl_dl_setup table)
319: 2. school_id is removed from the cursor cur_school and its references are replaced with the
320: supplied parameter p_school_code.
321: vvutukur 25-Feb-2003 Enh#2758823.FA117 Build. Modified the if condition to include 03-04 removing 02-03.
322: ie., Changed IF p_dl_version IN ('2001-2002','2002-2003') to IF p_dl_version IN ('2002-2003','2003-2004').
336:
337:
338: l_Trans_Rec VARCHAR2(4000) := NULL; -- ## Variable to store the Disbursement Detail Record
339: l_Rec_count NUMBER := 0; -- ## Variable to store the Record Count
340: l_orig_fee_perct_stafford igf_sl_dl_setup.orig_fee_perct_stafford%TYPE;
341: l_orig_fee_perct_plus igf_sl_dl_setup.orig_fee_perct_plus%TYPE;
342: l_int_rebate_amt igf_aw_awd_disb.fee_1%TYPE; -- This field's data type is similar to Fees.
343:
344: -- ## Cursor to Retrieve the disbursements being credited to the Students Account
337:
338: l_Trans_Rec VARCHAR2(4000) := NULL; -- ## Variable to store the Disbursement Detail Record
339: l_Rec_count NUMBER := 0; -- ## Variable to store the Record Count
340: l_orig_fee_perct_stafford igf_sl_dl_setup.orig_fee_perct_stafford%TYPE;
341: l_orig_fee_perct_plus igf_sl_dl_setup.orig_fee_perct_plus%TYPE;
342: l_int_rebate_amt igf_aw_awd_disb.fee_1%TYPE; -- This field's data type is similar to Fees.
343:
344: -- ## Cursor to Retrieve the disbursements being credited to the Students Account
345:
363: -- ## Cursor to Retrieve the School ID for a Particular Award Year.
364: -- ## by ugummall. school_id is removed as it is being obsoleted w.r.t. FA 126.
365: -- ## Supplied parameter p_school_id is used instead of school_id.
366: CURSOR cur_school IS
367: SELECT orig_fee_perct_stafford, orig_fee_perct_plus FROM igf_sl_dl_setup
368: WHERE ci_cal_type = p_ci_cal_type
369: AND ci_sequence_number = p_ci_sequence_number;
370:
371: -- Cursor to get the Fed Fund code for the specified award.