[Home] [Help]
1419: || Created By : museshad
1420: || Created On : 12-Sep-2005
1421: || Purpose : Round Pell disbursements based on the distribution method and rounding factor
1422: || Known limitations, enhancements or remarks :
1423: || Refer igf_aw_packaging.round_off_disbursements() for the explanation of the logic
1424: || Change History :
1425: || Who When What
1426: || (reverse chronological order - newest change first)
1427: */
1441: l_term_found BOOLEAN := FALSE;
1442:
1443: BEGIN
1444: -- Get the disbursement rounding factor
1445: l_disb_round_factor := igf_aw_packaging.get_disb_round_factor(p_fund_id => p_fund_id);
1446: l_term_found := FALSE;
1447:
1448: IF l_disb_round_factor NOT IN ('ONE_FIRST', 'DEC_FIRST', 'ONE_LAST', 'DEC_LAST') THEN
1449: -- Invalid disbursement round factor. Return with Err status
1680: l_disb_inter_sum_amt NUMBER := 0;
1681: l_disb_diff NUMBER := 0;
1682:
1683: BEGIN
1684: l_disb_round_factor := igf_aw_packaging.get_disb_round_factor(p_fund_id => p_fund_id);
1685:
1686: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1687: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_gr_pell_calc.round_all_disbursements.debug', 'Into round_all_disbursements. Parameters received ...');
1688: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_gr_pell_calc.round_all_disbursements.debug', 'p_aid: '||p_aid);
2003: CURSOR c_terms_det(
2004: l_adplans_id igf_aw_awd_dist_plans.adplans_id%TYPE,
2005: l_base_id igf_ap_fa_base_rec_all.base_id%TYPE
2006: ) IS
2007: SELECT NVL (igf_aw_packaging.get_date_instance (
2008: l_base_id,
2009: teach.date_offset_cd,
2010: terms.ld_cal_type,
2011: terms.ld_sequence_number
2179: (SELECT coa.ld_cal_type, coa.ld_sequence_number
2180: FROM igf_aw_coa_itm_terms coa
2181: WHERE coa.base_id = cp_base_id)
2182: ORDER BY
2183: igf_aw_packaging.get_term_start_date(cp_base_id, terms.ld_cal_type, terms.ld_sequence_number) ASC,
2184: prog.version_number DESC;
2185:
2186: l_get_ant_key_prog_ver_rec cur_get_ant_key_prog_ver%ROWTYPE;
2187:
3525: ant_data.program_cd = prog.course_cd AND
3526: prog.course_status = 'ACTIVE' AND
3527: ant_data.program_cd IS NOT NULL
3528: ORDER BY
3529: igf_aw_packaging.get_term_start_date(cp_base_id, awd_year_terms.ld_cal_type, awd_year_terms.ld_sequence_number) ASC,
3530: prog.version_number DESC;
3531:
3532: l_get_ant_key_prog_ver_rec cur_get_ant_key_prog_ver%ROWTYPE;
3533: