[Home] [Help]
948: IF NVL(l_n_retention_amount, 0.0) > 0.0 THEN
949: log_to_fnd( p_v_module => 'finpl_prc_teach_prd_retn_levl',
950: p_v_string => 'Teach Period Retention - Retention Amount > 0, invoking create_retention_charge.');
951: IF (p_trace_on = 'Y') THEN
952: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'RET_LEVEL') || ': ' || igs_fi_gen_gl.get_lkp_meaning('IGS_FI_RET_LEVEL', p_v_retention_level));
953: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'WITHDWR_RET') || ': ' || igs_fi_gen_gl.get_lkp_meaning('YES_NO', p_v_cmp_withdr_ret));
954: END IF;
955:
956: create_retention_charge( p_n_person_id => p_person_id,
949: log_to_fnd( p_v_module => 'finpl_prc_teach_prd_retn_levl',
950: p_v_string => 'Teach Period Retention - Retention Amount > 0, invoking create_retention_charge.');
951: IF (p_trace_on = 'Y') THEN
952: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'RET_LEVEL') || ': ' || igs_fi_gen_gl.get_lkp_meaning('IGS_FI_RET_LEVEL', p_v_retention_level));
953: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'WITHDWR_RET') || ': ' || igs_fi_gen_gl.get_lkp_meaning('YES_NO', p_v_cmp_withdr_ret));
954: END IF;
955:
956: create_retention_charge( p_n_person_id => p_person_id,
957: p_v_course_cd => p_course_cd,
983: IF NVL(l_n_retention_amount, 0.0) > 0.0 THEN
984: log_to_fnd( p_v_module => 'finpl_prc_teach_prd_retn_levl',
985: p_v_string => 'Teach Period Retention - Retention Amount > 0, invoking create_retention_charge.');
986: IF (p_trace_on = 'Y') THEN
987: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'RET_LEVEL') || ': ' || igs_fi_gen_gl.get_lkp_meaning('IGS_FI_RET_LEVEL', p_v_retention_level));
988: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'WITHDWR_RET') || ': ' || igs_fi_gen_gl.get_lkp_meaning('YES_NO', p_v_cmp_withdr_ret));
989: END IF;
990:
991: create_retention_charge( p_n_person_id => p_person_id,
984: log_to_fnd( p_v_module => 'finpl_prc_teach_prd_retn_levl',
985: p_v_string => 'Teach Period Retention - Retention Amount > 0, invoking create_retention_charge.');
986: IF (p_trace_on = 'Y') THEN
987: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'RET_LEVEL') || ': ' || igs_fi_gen_gl.get_lkp_meaning('IGS_FI_RET_LEVEL', p_v_retention_level));
988: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'WITHDWR_RET') || ': ' || igs_fi_gen_gl.get_lkp_meaning('YES_NO', p_v_cmp_withdr_ret));
989: END IF;
990:
991: create_retention_charge( p_n_person_id => p_person_id,
992: p_v_course_cd => p_course_cd,
1156: p_person_id || ', ' || p_course_cd || ', ' || TO_CHAR(p_effective_dt, 'DD-MON-YYYY')
1157: || ', ' || p_fee_cal_type || ', ' || p_fee_ci_sequence_number || ', ' || p_fee_type
1158: || ', ' || p_s_fee_trigger_cat || ', ' || p_trace_on || ', ' || p_c_career );
1159: IF (p_trace_on = 'Y') THEN
1160: fnd_file.new_line(fnd_file.log);
1161: END IF;
1162: -- Obtain System Fee Type for the fee_type provided
1163:
1164: log_to_fnd( p_v_module => 'finpl_get_derived_am_at',
1235:
1236: IF (v_derived_attendance_type IS NULL) THEN
1237: IF (p_trace_on = 'Y') THEN
1238: fnd_message.set_name ( 'IGS', 'IGS_FI_UNABLE_DERIVE_ATTTYPE');
1239: fnd_file.put_line (fnd_file.log, fnd_message.get);
1240: END IF;
1241: END IF;
1242:
1243: log_to_fnd( p_v_module => 'finpl_get_derived_am_at',
1248: IF v_derived_govt_att_mode IS NULL AND v_derived_prog_att_mode IS NULL THEN
1249: IF (p_trace_on = 'Y') THEN
1250: -- Trace Entry
1251: fnd_message.set_name ( 'IGS', 'IGS_FI_UNABLE_DERIVE_ATTMODE');
1252: fnd_file.put_line (fnd_file.log, fnd_message.get);
1253: END IF;
1254: END IF;
1255: ELSE
1256:
1312: ELSE
1313: IF (p_trace_on = 'Y') THEN
1314: -- Trace Entry
1315: fnd_message.set_name ( 'IGS', 'IGS_FI_UNABLE_DERIVE_ATTMODE');
1316: fnd_file.put_line(fnd_file.log, fnd_message.get);
1317: END IF;
1318: END IF;
1319: log_to_fnd( p_v_module => 'finpl_get_derived_am_at',
1320: p_v_string => 'Institution Case: Attendance Mode: ' || v_derived_govt_att_mode);
1342: ELSE
1343: IF (p_trace_on = 'Y') THEN
1344: -- Trace Entry
1345: fnd_message.set_name ( 'IGS', 'IGS_FI_UNABLE_DERIVE_ATTMODE');
1346: fnd_file.put_line (fnd_file.log, fnd_message.get);
1347: END IF;
1348: END IF;
1349: log_to_fnd( p_v_module => 'finpl_get_derived_am_at',
1350: p_v_string => 'Non-Institution Case, PROGRAM/CAREER: Attendance Mode: ' || v_derived_govt_att_mode);
1397: ELSE
1398: IF (p_trace_on = 'Y') THEN
1399: -- Trace Entry
1400: fnd_message.set_name ( 'IGS', 'IGS_FI_UNABLE_DERIVE_ATTMODE');
1401: fnd_file.put_line (fnd_file.log, fnd_message.get);
1402: END IF;
1403: END IF;
1404: log_to_fnd( p_v_module => 'finpl_get_derived_am_at',
1405: p_v_string => 'Non-Institution Case, PRIMARY_CAREER: Attendance Mode: ' || v_derived_govt_att_mode);
1412: IF (v_derived_attendance_type IS NOT NULL) AND (v_derived_govt_att_mode IS NOT NULL) THEN
1413: IF (p_trace_on = 'Y') THEN
1414: fnd_message.set_name ( 'IGS', 'IGS_FI_ATTTYPE_GOVT_ATTMODE');
1415: fnd_message.set_token('ATT_TYPE', v_derived_attendance_type);
1416: fnd_file.put_line(fnd_file.log, fnd_message.get );
1417: fnd_message.set_name('IGS', 'IGS_FI_DER_ATT_TYPE_GOVT_MODE');
1418: fnd_message.set_token('ATT_MODE', v_derived_govt_att_mode);
1419: fnd_file.put_line (fnd_file.log, fnd_message.get);
1420: END IF;
1415: fnd_message.set_token('ATT_TYPE', v_derived_attendance_type);
1416: fnd_file.put_line(fnd_file.log, fnd_message.get );
1417: fnd_message.set_name('IGS', 'IGS_FI_DER_ATT_TYPE_GOVT_MODE');
1418: fnd_message.set_token('ATT_MODE', v_derived_govt_att_mode);
1419: fnd_file.put_line (fnd_file.log, fnd_message.get);
1420: END IF;
1421: END IF;
1422:
1423: p_derived_attendance_type := v_derived_attendance_type;
1995: p_person_id || ', ' || p_course_cd || ', ' || TO_CHAR(p_effective_dt, 'DD-MON-YYYY')
1996: || ', ' || p_fee_cal_type || ', ' || p_fee_ci_sequence_number || ', ' || p_fee_type
1997: || ', ' || p_s_fee_trigger_cat || ', ' || p_trace_on || ', ' || p_c_career );
1998: IF (p_trace_on = 'Y') THEN
1999: fnd_file.new_line(fnd_file.log);
2000: END IF;
2001: -- Obtain System Fee Type for the fee_type provided
2002: OPEN cur_fee_type(p_fee_type);
2003: FETCH cur_fee_type INTO l_v_s_fee_type;
2077:
2078: IF (v_derived_attendance_type IS NULL) THEN
2079: IF (p_trace_on = 'Y') THEN
2080: fnd_message.set_name ( 'IGS', 'IGS_FI_UNABLE_DERIVE_ATTTYPE');
2081: fnd_file.put_line (fnd_file.log, fnd_message.get);
2082: END IF;
2083: END IF;
2084:
2085: log_to_fnd( p_v_module => 'finpl_get_derived_values',
2091: IF v_derived_govt_att_mode IS NULL AND v_derived_prog_att_mode IS NULL THEN
2092: IF (p_trace_on = 'Y') THEN
2093: -- Trace Entry
2094: fnd_message.set_name ( 'IGS', 'IGS_FI_UNABLE_DERIVE_ATTMODE');
2095: fnd_file.put_line (fnd_file.log, fnd_message.get);
2096: END IF;
2097: END IF;
2098: -- End of Modification Enh# 2162747
2099: ELSE
2145: ELSE
2146: IF (p_trace_on = 'Y') THEN
2147: -- Trace Entry
2148: fnd_message.set_name ( 'IGS', 'IGS_FI_UNABLE_DERIVE_ATTMODE');
2149: fnd_file.put_line (fnd_file.log, fnd_message.get);
2150: END IF;
2151: END IF;
2152: log_to_fnd( p_v_module => 'finpl_get_derived_values',
2153: p_v_string => 'Institution Case: Attendance Mode: ' || v_derived_govt_att_mode);
2175: ELSE
2176: IF (p_trace_on = 'Y') THEN
2177: -- Trace Entry
2178: fnd_message.set_name ( 'IGS', 'IGS_FI_UNABLE_DERIVE_ATTMODE');
2179: fnd_file.put_line (fnd_file.log, fnd_message.get);
2180: END IF;
2181: END IF;
2182: log_to_fnd( p_v_module => 'finpl_get_derived_values',
2183: p_v_string => 'Non-Institution Case, PROGRAM/CAREER: Attendance Mode: ' || v_derived_govt_att_mode);
2230: ELSE
2231: IF (p_trace_on = 'Y') THEN
2232: -- Trace Entry
2233: fnd_message.set_name ( 'IGS', 'IGS_FI_UNABLE_DERIVE_ATTMODE');
2234: fnd_file.put_line (fnd_file.log, fnd_message.get);
2235: END IF;
2236: END IF;
2237: log_to_fnd( p_v_module => 'finpl_get_derived_values',
2238: p_v_string => 'Non-Institution Case, PRIMARY_CAREER: Attendance Mode: ' || v_derived_govt_att_mode);
2245: IF (v_derived_attendance_type IS NOT NULL) AND (v_derived_govt_att_mode IS NOT NULL) THEN
2246: IF (p_trace_on = 'Y') THEN
2247: fnd_message.set_name ( 'IGS', 'IGS_FI_ATTTYPE_GOVT_ATTMODE');
2248: fnd_message.set_token('ATT_TYPE', v_derived_attendance_type);
2249: fnd_file.put_line(fnd_file.log, fnd_message.get );
2250: fnd_message.set_name('IGS', 'IGS_FI_DER_ATT_TYPE_GOVT_MODE');
2251: fnd_message.set_token('ATT_MODE', v_derived_govt_att_mode);
2252: fnd_file.put_line (fnd_file.log, fnd_message.get);
2253: END IF;
2248: fnd_message.set_token('ATT_TYPE', v_derived_attendance_type);
2249: fnd_file.put_line(fnd_file.log, fnd_message.get );
2250: fnd_message.set_name('IGS', 'IGS_FI_DER_ATT_TYPE_GOVT_MODE');
2251: fnd_message.set_token('ATT_MODE', v_derived_govt_att_mode);
2252: fnd_file.put_line (fnd_file.log, fnd_message.get);
2253: END IF;
2254: END IF;
2255:
2256: -- Get the derived Residency Status
2264: IF v_derived_residency_status_cd IS NOT NULL THEN
2265: IF (p_trace_on = 'Y') THEN
2266: fnd_message.set_name('IGS', 'IGS_FI_RES_STAT');
2267: fnd_message.set_token('RES_STAT', v_derived_residency_status_cd);
2268: fnd_file.put_line (fnd_file.log, fnd_message.get);
2269: END IF;
2270: log_to_fnd( p_v_module => 'finpl_get_derived_values',
2271: p_v_string => 'Residency Status Code: ' || v_derived_residency_status_cd);
2272: ELSE
2271: p_v_string => 'Residency Status Code: ' || v_derived_residency_status_cd);
2272: ELSE
2273: IF (p_trace_on = 'Y') THEN
2274: fnd_message.set_name('IGS', 'IGS_FI_NO_RES_STAT');
2275: fnd_file.put_line (fnd_file.log, fnd_message.get);
2276: END IF;
2277: log_to_fnd( p_v_module => 'finpl_get_derived_values',
2278: p_v_string => 'Unable to derive Residency Status Code.');
2279: END IF;
2288: IF (v_derived_class_standing IS NOT NULL) THEN
2289: IF (p_trace_on = 'Y') THEN
2290: fnd_message.set_name('IGS', 'IGS_FI_CLASS_STD');
2291: fnd_message.set_token('CLASS_STD', v_derived_class_standing);
2292: fnd_file.put_line (fnd_file.log, fnd_message.get);
2293: END IF;
2294: log_to_fnd( p_v_module => 'finpl_get_derived_values',
2295: p_v_string => 'Class Standing: ' || v_derived_class_standing);
2296: ELSE
2295: p_v_string => 'Class Standing: ' || v_derived_class_standing);
2296: ELSE
2297: IF (p_trace_on = 'Y') THEN
2298: fnd_message.set_name ( 'IGS', 'IGS_FI_NO_CLASS_STD' );
2299: fnd_file.put_line (fnd_file.log, fnd_message.get);
2300: END IF;
2301: log_to_fnd( p_v_module => 'finpl_get_derived_values',
2302: p_v_string => 'Unable to derive Class Standing.');
2303: END IF;
2321: IF (p_trace_on = 'Y') THEN
2322: fnd_message.set_name('IGS','IGS_FI_DER_UNIT_SET');
2323: fnd_message.set_token('UNIT_SET',p_derived_unit_set_cd);
2324: fnd_message.set_token('VER',p_derived_us_version_num);
2325: fnd_file.put_line (fnd_file.log, fnd_message.get);
2326: fnd_file.new_line(fnd_file.log);
2327: END IF;
2328: log_to_fnd( p_v_module => 'finpl_get_derived_values',
2329: p_v_string => 'Unit Set Details: ' || p_derived_unit_set_cd || ', ' || p_derived_us_version_num);
2322: fnd_message.set_name('IGS','IGS_FI_DER_UNIT_SET');
2323: fnd_message.set_token('UNIT_SET',p_derived_unit_set_cd);
2324: fnd_message.set_token('VER',p_derived_us_version_num);
2325: fnd_file.put_line (fnd_file.log, fnd_message.get);
2326: fnd_file.new_line(fnd_file.log);
2327: END IF;
2328: log_to_fnd( p_v_module => 'finpl_get_derived_values',
2329: p_v_string => 'Unit Set Details: ' || p_derived_unit_set_cd || ', ' || p_derived_us_version_num);
2330: ELSE
2332: p_derived_us_version_num := NULL;
2333: v_message_name := 'IGS_FI_NO_UNIT_SET';
2334: IF (p_trace_on = 'Y') THEN
2335: fnd_message.set_name ( 'IGS', v_message_name);
2336: fnd_file.put_line (fnd_file.log, fnd_message.get);
2337: END IF;
2338: log_to_fnd( p_v_module => 'finpl_get_derived_values',
2339: p_v_string => 'Unable to derive Unit Set Details.');
2340: END IF;
2585: p_derived_unit_level
2586: ) = TRUE) THEN
2587: p_charge_rate := v_ftfarv_rec.chg_rate;
2588: IF (p_trace_on = 'Y') THEN
2589: fnd_file.new_line(fnd_file.log);
2590: IF (p_derived_unit_cd IS NOT NULL) THEN
2591: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_ACCT_ENTITIES', 'UNIT') || ': ' || p_derived_unit_cd);
2592: END IF;
2593: fnd_message.set_name('IGS', 'IGS_FI_LEV_CHG_RATE_NO');
2587: p_charge_rate := v_ftfarv_rec.chg_rate;
2588: IF (p_trace_on = 'Y') THEN
2589: fnd_file.new_line(fnd_file.log);
2590: IF (p_derived_unit_cd IS NOT NULL) THEN
2591: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_ACCT_ENTITIES', 'UNIT') || ': ' || p_derived_unit_cd);
2592: END IF;
2593: fnd_message.set_name('IGS', 'IGS_FI_LEV_CHG_RATE_NO');
2594: fnd_message.set_token('LEVEL', v_ftfarv_rec.s_relation_type);
2595: fnd_message.set_token('CH_RT', TO_CHAR(v_ftfarv_rec.chg_rate));
2609: fnd_message.set_token('UNIT_MODE', NVL(v_ftfarv_rec.unit_mode, l_v_lkp_all));
2610: fnd_message.set_token('UNIT_CODE', NVL(v_ftfarv_rec.unit_cd, l_v_lkp_all));
2611: fnd_message.set_token('UNIT_VER_NUM', NVL(TO_CHAR(v_ftfarv_rec.unit_version_number), l_v_lkp_all));
2612: fnd_message.set_token('UNIT_LEVEL', NVL(v_ftfarv_rec.unit_level, l_v_lkp_all));
2613: fnd_file.put_line (fnd_file.log, fnd_message.get);
2614: fnd_message.set_name('IGS', 'IGS_FI_FEEASS_RATE_MATCHES');
2615: fnd_file.put_line (fnd_file.log, fnd_message.get);
2616: fnd_file.new_line(fnd_file.log);
2617: END IF;
2611: fnd_message.set_token('UNIT_VER_NUM', NVL(TO_CHAR(v_ftfarv_rec.unit_version_number), l_v_lkp_all));
2612: fnd_message.set_token('UNIT_LEVEL', NVL(v_ftfarv_rec.unit_level, l_v_lkp_all));
2613: fnd_file.put_line (fnd_file.log, fnd_message.get);
2614: fnd_message.set_name('IGS', 'IGS_FI_FEEASS_RATE_MATCHES');
2615: fnd_file.put_line (fnd_file.log, fnd_message.get);
2616: fnd_file.new_line(fnd_file.log);
2617: END IF;
2618: -- stop processing Rate Records
2619: log_to_fnd( p_v_module => 'finpl_find_far',
2612: fnd_message.set_token('UNIT_LEVEL', NVL(v_ftfarv_rec.unit_level, l_v_lkp_all));
2613: fnd_file.put_line (fnd_file.log, fnd_message.get);
2614: fnd_message.set_name('IGS', 'IGS_FI_FEEASS_RATE_MATCHES');
2615: fnd_file.put_line (fnd_file.log, fnd_message.get);
2616: fnd_file.new_line(fnd_file.log);
2617: END IF;
2618: -- stop processing Rate Records
2619: log_to_fnd( p_v_module => 'finpl_find_far',
2620: p_v_string => 'Rate Matched: ' || p_charge_rate );
2680: p_derived_unit_level
2681: ) = TRUE) THEN
2682: p_charge_rate := v_ftfarv_rec.chg_rate;
2683: IF (p_trace_on = 'Y') THEN
2684: fnd_file.new_line(fnd_file.log);
2685: IF (p_derived_unit_cd IS NOT NULL) THEN
2686: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_ACCT_ENTITIES', 'UNIT') || ': ' || p_derived_unit_cd);
2687: END IF;
2688: fnd_message.set_name('IGS', 'IGS_FI_LEV_CHG_RATE_NO');
2682: p_charge_rate := v_ftfarv_rec.chg_rate;
2683: IF (p_trace_on = 'Y') THEN
2684: fnd_file.new_line(fnd_file.log);
2685: IF (p_derived_unit_cd IS NOT NULL) THEN
2686: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_ACCT_ENTITIES', 'UNIT') || ': ' || p_derived_unit_cd);
2687: END IF;
2688: fnd_message.set_name('IGS', 'IGS_FI_LEV_CHG_RATE_NO');
2689: fnd_message.set_token('LEVEL', v_ftfarv_rec.s_relation_type);
2690: fnd_message.set_token('CH_RT', TO_CHAR(v_ftfarv_rec.chg_rate));
2704: fnd_message.set_token('UNIT_MODE', NVL(v_ftfarv_rec.unit_mode, l_v_lkp_all));
2705: fnd_message.set_token('UNIT_CODE', NVL(v_ftfarv_rec.unit_cd, l_v_lkp_all));
2706: fnd_message.set_token('UNIT_VER_NUM', NVL(TO_CHAR(v_ftfarv_rec.unit_version_number), l_v_lkp_all));
2707: fnd_message.set_token('UNIT_LEVEL', NVL(v_ftfarv_rec.unit_level, l_v_lkp_all));
2708: fnd_file.put_line (fnd_file.log, fnd_message.get);
2709: fnd_message.set_name('IGS', 'IGS_FI_FEEASS_RATE_MATCHES');
2710: fnd_file.put_line (fnd_file.log, fnd_message.get);
2711: END IF;
2712: -- stop processing Rate Records
2706: fnd_message.set_token('UNIT_VER_NUM', NVL(TO_CHAR(v_ftfarv_rec.unit_version_number), l_v_lkp_all));
2707: fnd_message.set_token('UNIT_LEVEL', NVL(v_ftfarv_rec.unit_level, l_v_lkp_all));
2708: fnd_file.put_line (fnd_file.log, fnd_message.get);
2709: fnd_message.set_name('IGS', 'IGS_FI_FEEASS_RATE_MATCHES');
2710: fnd_file.put_line (fnd_file.log, fnd_message.get);
2711: END IF;
2712: -- stop processing Rate Records
2713: log_to_fnd( p_v_module => 'finpl_find_far',
2714: p_v_string => 'Rate Matched: ' || p_charge_rate );
2726: log_to_fnd( p_v_module => 'finpl_find_far',
2727: p_v_string => 'No Rate record found. Returning with 0 rate.');
2728: p_charge_rate := 0;
2729: IF (p_trace_on = 'Y') THEN
2730: fnd_file.new_line(fnd_file.log);
2731: IF (p_derived_unit_cd IS NOT NULL) THEN
2732: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_ACCT_ENTITIES', 'UNIT') || ': ' || p_derived_unit_cd);
2733: END IF;
2734: fnd_message.set_name ( 'IGS', 'IGS_FI_FEEASS_RATE_FOUND');
2728: p_charge_rate := 0;
2729: IF (p_trace_on = 'Y') THEN
2730: fnd_file.new_line(fnd_file.log);
2731: IF (p_derived_unit_cd IS NOT NULL) THEN
2732: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_ACCT_ENTITIES', 'UNIT') || ': ' || p_derived_unit_cd);
2733: END IF;
2734: fnd_message.set_name ( 'IGS', 'IGS_FI_FEEASS_RATE_FOUND');
2735: fnd_file.put_line (fnd_file.log, fnd_message.get);
2736: fnd_message.set_name('IGS', 'IGS_FI_CHG_RATE');
2731: IF (p_derived_unit_cd IS NOT NULL) THEN
2732: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_ACCT_ENTITIES', 'UNIT') || ': ' || p_derived_unit_cd);
2733: END IF;
2734: fnd_message.set_name ( 'IGS', 'IGS_FI_FEEASS_RATE_FOUND');
2735: fnd_file.put_line (fnd_file.log, fnd_message.get);
2736: fnd_message.set_name('IGS', 'IGS_FI_CHG_RATE');
2737: fnd_message.set_token('RATE', '0');
2738: fnd_file.put_line (fnd_file.log, fnd_message.get);
2739: fnd_file.new_line(fnd_file.log);
2734: fnd_message.set_name ( 'IGS', 'IGS_FI_FEEASS_RATE_FOUND');
2735: fnd_file.put_line (fnd_file.log, fnd_message.get);
2736: fnd_message.set_name('IGS', 'IGS_FI_CHG_RATE');
2737: fnd_message.set_token('RATE', '0');
2738: fnd_file.put_line (fnd_file.log, fnd_message.get);
2739: fnd_file.new_line(fnd_file.log);
2740: END IF;
2741: END IF;
2742:
2735: fnd_file.put_line (fnd_file.log, fnd_message.get);
2736: fnd_message.set_name('IGS', 'IGS_FI_CHG_RATE');
2737: fnd_message.set_token('RATE', '0');
2738: fnd_file.put_line (fnd_file.log, fnd_message.get);
2739: fnd_file.new_line(fnd_file.log);
2740: END IF;
2741: END IF;
2742:
2743: IF (l_b_fee_ass_rate_found = TRUE AND v_fee_ass_rate_match = FALSE) THEN
2746: p_v_string => 'No Rate Matched. Returning with 0 rate.');
2747: p_charge_rate := 0;
2748: -- fee ass rate records existed, but none matched
2749: IF (p_trace_on = 'Y') THEN
2750: fnd_file.new_line(fnd_file.log);
2751: IF (p_derived_unit_cd IS NOT NULL) THEN
2752: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_ACCT_ENTITIES', 'UNIT') || ': ' || p_derived_unit_cd);
2753: END IF;
2754: fnd_message.set_name('IGS', 'IGS_FI_FEEASS_RATE_EXISTS');
2748: -- fee ass rate records existed, but none matched
2749: IF (p_trace_on = 'Y') THEN
2750: fnd_file.new_line(fnd_file.log);
2751: IF (p_derived_unit_cd IS NOT NULL) THEN
2752: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_ACCT_ENTITIES', 'UNIT') || ': ' || p_derived_unit_cd);
2753: END IF;
2754: fnd_message.set_name('IGS', 'IGS_FI_FEEASS_RATE_EXISTS');
2755: fnd_file.put_line (fnd_file.log, fnd_message.get);
2756: fnd_message.set_name('IGS', 'IGS_FI_CHG_RATE');
2751: IF (p_derived_unit_cd IS NOT NULL) THEN
2752: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_ACCT_ENTITIES', 'UNIT') || ': ' || p_derived_unit_cd);
2753: END IF;
2754: fnd_message.set_name('IGS', 'IGS_FI_FEEASS_RATE_EXISTS');
2755: fnd_file.put_line (fnd_file.log, fnd_message.get);
2756: fnd_message.set_name('IGS', 'IGS_FI_CHG_RATE');
2757: fnd_message.set_token('RATE', '0');
2758: fnd_file.put_line (fnd_file.log, fnd_message.get);
2759: fnd_file.new_line(fnd_file.log);
2754: fnd_message.set_name('IGS', 'IGS_FI_FEEASS_RATE_EXISTS');
2755: fnd_file.put_line (fnd_file.log, fnd_message.get);
2756: fnd_message.set_name('IGS', 'IGS_FI_CHG_RATE');
2757: fnd_message.set_token('RATE', '0');
2758: fnd_file.put_line (fnd_file.log, fnd_message.get);
2759: fnd_file.new_line(fnd_file.log);
2760: END IF;
2761: END IF;
2762:
2755: fnd_file.put_line (fnd_file.log, fnd_message.get);
2756: fnd_message.set_name('IGS', 'IGS_FI_CHG_RATE');
2757: fnd_message.set_token('RATE', '0');
2758: fnd_file.put_line (fnd_file.log, fnd_message.get);
2759: fnd_file.new_line(fnd_file.log);
2760: END IF;
2761: END IF;
2762:
2763: log_to_fnd( p_v_module => 'finpl_find_far',
2954: log_to_fnd( p_v_module => 'finpl_prc_element_ranges',
2955: p_v_string => 'Global Element Range applies. Lower ' || rec_elm_ranges.lower_range || ', Upper: ' || rec_elm_ranges.upper_range);
2956: -- Global Element Range Applies
2957: IF (p_v_trace_on = 'Y') THEN
2958: fnd_file.new_line(fnd_file.log);
2959: fnd_message.set_name ( 'IGS', 'IGS_FI_ELE_RANGE_APPLIES');
2960: fnd_file.put_line (fnd_file.log, fnd_message.get);
2961: fnd_message.set_name('IGS', 'IGS_FI_TESTING_ELEMENT_RANGE');
2962: fnd_message.set_token('ELM_RNG_NUM', TO_CHAR(rec_elm_ranges.range_number));
2956: -- Global Element Range Applies
2957: IF (p_v_trace_on = 'Y') THEN
2958: fnd_file.new_line(fnd_file.log);
2959: fnd_message.set_name ( 'IGS', 'IGS_FI_ELE_RANGE_APPLIES');
2960: fnd_file.put_line (fnd_file.log, fnd_message.get);
2961: fnd_message.set_name('IGS', 'IGS_FI_TESTING_ELEMENT_RANGE');
2962: fnd_message.set_token('ELM_RNG_NUM', TO_CHAR(rec_elm_ranges.range_number));
2963: fnd_file.put_line (fnd_file.log, fnd_message.get);
2964: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'LOW_RANGE') || ': ' || TO_CHAR(rec_elm_ranges.lower_range));
2959: fnd_message.set_name ( 'IGS', 'IGS_FI_ELE_RANGE_APPLIES');
2960: fnd_file.put_line (fnd_file.log, fnd_message.get);
2961: fnd_message.set_name('IGS', 'IGS_FI_TESTING_ELEMENT_RANGE');
2962: fnd_message.set_token('ELM_RNG_NUM', TO_CHAR(rec_elm_ranges.range_number));
2963: fnd_file.put_line (fnd_file.log, fnd_message.get);
2964: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'LOW_RANGE') || ': ' || TO_CHAR(rec_elm_ranges.lower_range));
2965: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'UPPER_RANGE') || ': ' || TO_CHAR(rec_elm_ranges.upper_range));
2966: IF (rec_elm_ranges.override_chg_method_type IS NOT NULL) THEN
2967: fnd_message.set_name('IGS', 'IGS_FI_OVRRIDE_CHG_METH_TYPE');
2960: fnd_file.put_line (fnd_file.log, fnd_message.get);
2961: fnd_message.set_name('IGS', 'IGS_FI_TESTING_ELEMENT_RANGE');
2962: fnd_message.set_token('ELM_RNG_NUM', TO_CHAR(rec_elm_ranges.range_number));
2963: fnd_file.put_line (fnd_file.log, fnd_message.get);
2964: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'LOW_RANGE') || ': ' || TO_CHAR(rec_elm_ranges.lower_range));
2965: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'UPPER_RANGE') || ': ' || TO_CHAR(rec_elm_ranges.upper_range));
2966: IF (rec_elm_ranges.override_chg_method_type IS NOT NULL) THEN
2967: fnd_message.set_name('IGS', 'IGS_FI_OVRRIDE_CHG_METH_TYPE');
2968: fnd_message.set_token('CHG_MTHD', igs_fi_gen_gl.get_lkp_meaning('CHG_METHOD', rec_elm_ranges.override_chg_method_type));
2961: fnd_message.set_name('IGS', 'IGS_FI_TESTING_ELEMENT_RANGE');
2962: fnd_message.set_token('ELM_RNG_NUM', TO_CHAR(rec_elm_ranges.range_number));
2963: fnd_file.put_line (fnd_file.log, fnd_message.get);
2964: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'LOW_RANGE') || ': ' || TO_CHAR(rec_elm_ranges.lower_range));
2965: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'UPPER_RANGE') || ': ' || TO_CHAR(rec_elm_ranges.upper_range));
2966: IF (rec_elm_ranges.override_chg_method_type IS NOT NULL) THEN
2967: fnd_message.set_name('IGS', 'IGS_FI_OVRRIDE_CHG_METH_TYPE');
2968: fnd_message.set_token('CHG_MTHD', igs_fi_gen_gl.get_lkp_meaning('CHG_METHOD', rec_elm_ranges.override_chg_method_type));
2969: fnd_file.put_line (fnd_file.log, fnd_message.get);
2965: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'UPPER_RANGE') || ': ' || TO_CHAR(rec_elm_ranges.upper_range));
2966: IF (rec_elm_ranges.override_chg_method_type IS NOT NULL) THEN
2967: fnd_message.set_name('IGS', 'IGS_FI_OVRRIDE_CHG_METH_TYPE');
2968: fnd_message.set_token('CHG_MTHD', igs_fi_gen_gl.get_lkp_meaning('CHG_METHOD', rec_elm_ranges.override_chg_method_type));
2969: fnd_file.put_line (fnd_file.log, fnd_message.get);
2970: END IF;
2971: END IF;
2972:
2973: IF p_v_elm_rng_order_name IS NOT NULL THEN
2991: CLOSE c_elm_rng_rates;
2992: --Rate records not found
2993: IF (p_v_trace_on = 'Y') THEN
2994: fnd_message.set_name('IGS', 'IGS_FI_GLBELM_NO_RATE');
2995: fnd_file.put_line (fnd_file.log, fnd_message.get);
2996: END IF;
2997: p_n_charge_rate := 0;
2998: p_n_fee_amount := 0;
2999: log_to_fnd( p_v_module => 'finpl_prc_element_ranges',
3073:
3074: log_to_fnd( p_v_module => 'finpl_prc_element_ranges',
3075: p_v_string => 'Global Element Range rate matches');
3076: IF (p_v_trace_on = 'Y') THEN
3077: fnd_file.new_line(fnd_file.log);
3078: fnd_message.set_name('IGS', 'IGS_FI_LEV_CHG_RATE_NO');
3079: fnd_message.set_token('LEVEL', l_rec_global_rates.s_relation_type);
3080: fnd_message.set_token('CH_RT', TO_CHAR(l_rec_global_rates.chg_rate));
3081: fnd_message.set_token('RT_NUM', TO_CHAR(l_rec_global_rates.rate_number));
3094: fnd_message.set_token('UNIT_MODE', NVL(l_rec_global_rates.unit_mode, l_v_lkp_all));
3095: fnd_message.set_token('UNIT_CODE', NVL(l_rec_global_rates.unit_cd, l_v_lkp_all));
3096: fnd_message.set_token('UNIT_VER_NUM', NVL(TO_CHAR(l_rec_global_rates.unit_version_number), l_v_lkp_all));
3097: fnd_message.set_token('UNIT_LEVEL', NVL(l_rec_global_rates.unit_level, l_v_lkp_all));
3098: fnd_file.put_line (fnd_file.log, fnd_message.get);
3099: fnd_message.set_name('IGS', 'IGS_FI_FEEASS_RATE_MATCHES');
3100: fnd_file.put_line (fnd_file.log, fnd_message.get);
3101: fnd_file.new_line(fnd_file.log);
3102: END IF;
3096: fnd_message.set_token('UNIT_VER_NUM', NVL(TO_CHAR(l_rec_global_rates.unit_version_number), l_v_lkp_all));
3097: fnd_message.set_token('UNIT_LEVEL', NVL(l_rec_global_rates.unit_level, l_v_lkp_all));
3098: fnd_file.put_line (fnd_file.log, fnd_message.get);
3099: fnd_message.set_name('IGS', 'IGS_FI_FEEASS_RATE_MATCHES');
3100: fnd_file.put_line (fnd_file.log, fnd_message.get);
3101: fnd_file.new_line(fnd_file.log);
3102: END IF;
3103:
3104: l_b_elm_range_rate_match := TRUE;
3097: fnd_message.set_token('UNIT_LEVEL', NVL(l_rec_global_rates.unit_level, l_v_lkp_all));
3098: fnd_file.put_line (fnd_file.log, fnd_message.get);
3099: fnd_message.set_name('IGS', 'IGS_FI_FEEASS_RATE_MATCHES');
3100: fnd_file.put_line (fnd_file.log, fnd_message.get);
3101: fnd_file.new_line(fnd_file.log);
3102: END IF;
3103:
3104: l_b_elm_range_rate_match := TRUE;
3105: p_n_charge_rate := l_rec_global_rates.chg_rate;
3115: p_v_string => 'No Rate Matched. Returning with 0 rate.');
3116: p_n_charge_rate := 0;
3117: p_n_fee_amount := 0;
3118: IF (p_v_trace_on = 'Y') THEN
3119: fnd_file.new_line(fnd_file.log);
3120: fnd_message.set_name ( 'IGS', 'IGS_FI_NO_ELM_RNG_RATE_MATCH');
3121: fnd_file.put_line (fnd_file.log, fnd_message.get);
3122: fnd_message.set_name('IGS', 'IGS_FI_CHG_RATE');
3123: fnd_message.set_token('RATE', TO_CHAR(p_n_charge_rate) );
3117: p_n_fee_amount := 0;
3118: IF (p_v_trace_on = 'Y') THEN
3119: fnd_file.new_line(fnd_file.log);
3120: fnd_message.set_name ( 'IGS', 'IGS_FI_NO_ELM_RNG_RATE_MATCH');
3121: fnd_file.put_line (fnd_file.log, fnd_message.get);
3122: fnd_message.set_name('IGS', 'IGS_FI_CHG_RATE');
3123: fnd_message.set_token('RATE', TO_CHAR(p_n_charge_rate) );
3124: fnd_file.put_line (fnd_file.log, fnd_message.get);
3125: fnd_file.new_line(fnd_file.log);
3120: fnd_message.set_name ( 'IGS', 'IGS_FI_NO_ELM_RNG_RATE_MATCH');
3121: fnd_file.put_line (fnd_file.log, fnd_message.get);
3122: fnd_message.set_name('IGS', 'IGS_FI_CHG_RATE');
3123: fnd_message.set_token('RATE', TO_CHAR(p_n_charge_rate) );
3124: fnd_file.put_line (fnd_file.log, fnd_message.get);
3125: fnd_file.new_line(fnd_file.log);
3126: END IF;
3127: RETURN;
3128: END IF;
3121: fnd_file.put_line (fnd_file.log, fnd_message.get);
3122: fnd_message.set_name('IGS', 'IGS_FI_CHG_RATE');
3123: fnd_message.set_token('RATE', TO_CHAR(p_n_charge_rate) );
3124: fnd_file.put_line (fnd_file.log, fnd_message.get);
3125: fnd_file.new_line(fnd_file.log);
3126: END IF;
3127: RETURN;
3128: END IF;
3129:
3140: IF (p_n_charge_rate > l_n_cfar_chg_rate) THEN
3141: IF (p_trace_on = 'Y') THEN
3142: fnd_message.set_name('IGS', 'IGS_FI_CONTRACT_RATE');
3143: fnd_message.set_token('RATE', TO_CHAR(NVL(l_n_cfar_chg_rate, 0)) );
3144: fnd_file.put_line (fnd_file.log, fnd_message.get);
3145: fnd_message.set_name('IGS', 'IGS_FI_CHG_RATE');
3146: fnd_message.set_token('RATE', TO_CHAR(NVL(l_n_charge_rate, 0)) );
3147: fnd_file.put_line (fnd_file.log, fnd_message.get);
3148: END IF;
3143: fnd_message.set_token('RATE', TO_CHAR(NVL(l_n_cfar_chg_rate, 0)) );
3144: fnd_file.put_line (fnd_file.log, fnd_message.get);
3145: fnd_message.set_name('IGS', 'IGS_FI_CHG_RATE');
3146: fnd_message.set_token('RATE', TO_CHAR(NVL(l_n_charge_rate, 0)) );
3147: fnd_file.put_line (fnd_file.log, fnd_message.get);
3148: END IF;
3149: lv_cntrct_rt_apply := TRUE;
3150: p_n_charge_rate := l_n_cfar_chg_rate;
3151: log_to_fnd( p_v_module => 'finpl_prc_element_ranges',
3157: p_n_charge_rate := l_n_cfar_chg_rate;
3158: IF (p_trace_on = 'Y') THEN
3159: fnd_message.set_name('IGS', 'IGS_FI_CONTRACT_RATE');
3160: fnd_message.set_token('RATE', TO_CHAR(NVL(l_n_charge_rate, 0)) );
3161: fnd_file.put_line (fnd_file.log, fnd_message.get);
3162: END IF;
3163: log_to_fnd( p_v_module => 'finpl_prc_element_ranges',
3164: p_v_string => 'The contract rate will be used. Chg Rate: ' || l_n_charge_rate);
3165: END IF;
3178: END IF;
3179:
3180: IF (p_trace_on = 'Y') THEN
3181: fnd_message.set_name('IGS', 'IGS_FI_MULTI_CONTRACT_RT');
3182: fnd_file.put_line (fnd_file.log, fnd_message.get);
3183: END IF;
3184: log_to_fnd( p_v_module => 'finpl_prc_element_ranges',
3185: p_v_string => 'Raising e_one_record_expected.');
3186: RAISE e_one_record_expected;
3300: CLOSE c_elm_rng_rates;
3301: --Rate records not found
3302: IF (p_v_trace_on = 'Y') THEN
3303: fnd_message.set_name('IGS', 'IGS_FI_GLBELM_NO_RATE');
3304: fnd_file.put_line (fnd_file.log, fnd_message.get);
3305: END IF;
3306: p_n_charge_rate := 0;
3307: p_n_fee_amount := 0;
3308: log_to_fnd( p_v_module => 'finpl_prc_element_ranges',
3382:
3383: log_to_fnd( p_v_module => 'finpl_prc_element_ranges',
3384: p_v_string => 'Global Element Range rate matches');
3385: IF (p_v_trace_on = 'Y') THEN
3386: fnd_file.new_line(fnd_file.log);
3387: IF (p_v_fee_trigger_cat <> gcst_institutn) THEN
3388: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_ACCT_ENTITIES', 'UNIT') || ': ' || p_t_fee_as_items(i).unit_cd);
3389: END IF;
3390: fnd_message.set_name('IGS', 'IGS_FI_LEV_CHG_RATE_NO');
3384: p_v_string => 'Global Element Range rate matches');
3385: IF (p_v_trace_on = 'Y') THEN
3386: fnd_file.new_line(fnd_file.log);
3387: IF (p_v_fee_trigger_cat <> gcst_institutn) THEN
3388: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_ACCT_ENTITIES', 'UNIT') || ': ' || p_t_fee_as_items(i).unit_cd);
3389: END IF;
3390: fnd_message.set_name('IGS', 'IGS_FI_LEV_CHG_RATE_NO');
3391: fnd_message.set_token('LEVEL', l_rec_global_rates.s_relation_type);
3392: fnd_message.set_token('CH_RT', TO_CHAR(l_rec_global_rates.chg_rate));
3406: fnd_message.set_token('UNIT_MODE', NVL(l_rec_global_rates.unit_mode, l_v_lkp_all));
3407: fnd_message.set_token('UNIT_CODE', NVL(l_rec_global_rates.unit_cd, l_v_lkp_all));
3408: fnd_message.set_token('UNIT_VER_NUM', NVL(TO_CHAR(l_rec_global_rates.unit_version_number), l_v_lkp_all));
3409: fnd_message.set_token('UNIT_LEVEL', NVL(l_rec_global_rates.unit_level, l_v_lkp_all));
3410: fnd_file.put_line (fnd_file.log, fnd_message.get);
3411: fnd_message.set_name('IGS', 'IGS_FI_FEEASS_RATE_MATCHES');
3412: fnd_file.put_line (fnd_file.log, fnd_message.get);
3413: fnd_file.new_line(fnd_file.log);
3414: END IF;
3408: fnd_message.set_token('UNIT_VER_NUM', NVL(TO_CHAR(l_rec_global_rates.unit_version_number), l_v_lkp_all));
3409: fnd_message.set_token('UNIT_LEVEL', NVL(l_rec_global_rates.unit_level, l_v_lkp_all));
3410: fnd_file.put_line (fnd_file.log, fnd_message.get);
3411: fnd_message.set_name('IGS', 'IGS_FI_FEEASS_RATE_MATCHES');
3412: fnd_file.put_line (fnd_file.log, fnd_message.get);
3413: fnd_file.new_line(fnd_file.log);
3414: END IF;
3415:
3416: l_b_elm_range_rate_match := TRUE;
3409: fnd_message.set_token('UNIT_LEVEL', NVL(l_rec_global_rates.unit_level, l_v_lkp_all));
3410: fnd_file.put_line (fnd_file.log, fnd_message.get);
3411: fnd_message.set_name('IGS', 'IGS_FI_FEEASS_RATE_MATCHES');
3412: fnd_file.put_line (fnd_file.log, fnd_message.get);
3413: fnd_file.new_line(fnd_file.log);
3414: END IF;
3415:
3416: l_b_elm_range_rate_match := TRUE;
3417: p_n_charge_rate := l_rec_global_rates.chg_rate;
3429: p_v_string => 'No Rate Matched. Returning with 0 rate.');
3430: p_n_charge_rate := 0;
3431: p_t_fee_as_items(i).chg_rate := 0;
3432: IF (p_v_trace_on = 'Y') THEN
3433: fnd_file.new_line(fnd_file.log);
3434: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_ACCT_ENTITIES', 'UNIT') || ': ' || p_t_fee_as_items(i).unit_cd);
3435: fnd_message.set_name ( 'IGS', 'IGS_FI_NO_ELM_RNG_RATE_MATCH');
3436: fnd_file.put_line (fnd_file.log, fnd_message.get);
3437: fnd_message.set_name('IGS', 'IGS_FI_CHG_RATE');
3430: p_n_charge_rate := 0;
3431: p_t_fee_as_items(i).chg_rate := 0;
3432: IF (p_v_trace_on = 'Y') THEN
3433: fnd_file.new_line(fnd_file.log);
3434: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_ACCT_ENTITIES', 'UNIT') || ': ' || p_t_fee_as_items(i).unit_cd);
3435: fnd_message.set_name ( 'IGS', 'IGS_FI_NO_ELM_RNG_RATE_MATCH');
3436: fnd_file.put_line (fnd_file.log, fnd_message.get);
3437: fnd_message.set_name('IGS', 'IGS_FI_CHG_RATE');
3438: fnd_message.set_token('RATE', TO_CHAR(p_n_charge_rate) );
3432: IF (p_v_trace_on = 'Y') THEN
3433: fnd_file.new_line(fnd_file.log);
3434: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_ACCT_ENTITIES', 'UNIT') || ': ' || p_t_fee_as_items(i).unit_cd);
3435: fnd_message.set_name ( 'IGS', 'IGS_FI_NO_ELM_RNG_RATE_MATCH');
3436: fnd_file.put_line (fnd_file.log, fnd_message.get);
3437: fnd_message.set_name('IGS', 'IGS_FI_CHG_RATE');
3438: fnd_message.set_token('RATE', TO_CHAR(p_n_charge_rate) );
3439: fnd_file.put_line (fnd_file.log, fnd_message.get);
3440: fnd_file.new_line(fnd_file.log);
3435: fnd_message.set_name ( 'IGS', 'IGS_FI_NO_ELM_RNG_RATE_MATCH');
3436: fnd_file.put_line (fnd_file.log, fnd_message.get);
3437: fnd_message.set_name('IGS', 'IGS_FI_CHG_RATE');
3438: fnd_message.set_token('RATE', TO_CHAR(p_n_charge_rate) );
3439: fnd_file.put_line (fnd_file.log, fnd_message.get);
3440: fnd_file.new_line(fnd_file.log);
3441: END IF;
3442: END IF;
3443:
3436: fnd_file.put_line (fnd_file.log, fnd_message.get);
3437: fnd_message.set_name('IGS', 'IGS_FI_CHG_RATE');
3438: fnd_message.set_token('RATE', TO_CHAR(p_n_charge_rate) );
3439: fnd_file.put_line (fnd_file.log, fnd_message.get);
3440: fnd_file.new_line(fnd_file.log);
3441: END IF;
3442: END IF;
3443:
3444: lv_cntrct_rt_apply := FALSE;
3456: IF (p_n_charge_rate > l_n_cfar_chg_rate) THEN
3457: IF (p_trace_on = 'Y') THEN
3458: fnd_message.set_name('IGS', 'IGS_FI_CONTRACT_RATE');
3459: fnd_message.set_token('RATE', TO_CHAR(NVL(l_n_cfar_chg_rate, 0)) );
3460: fnd_file.put_line (fnd_file.log, fnd_message.get);
3461: fnd_message.set_name('IGS', 'IGS_FI_CHG_RATE');
3462: fnd_message.set_token('RATE', TO_CHAR(NVL(l_n_charge_rate, 0)) );
3463: fnd_file.put_line (fnd_file.log, fnd_message.get);
3464: END IF;
3459: fnd_message.set_token('RATE', TO_CHAR(NVL(l_n_cfar_chg_rate, 0)) );
3460: fnd_file.put_line (fnd_file.log, fnd_message.get);
3461: fnd_message.set_name('IGS', 'IGS_FI_CHG_RATE');
3462: fnd_message.set_token('RATE', TO_CHAR(NVL(l_n_charge_rate, 0)) );
3463: fnd_file.put_line (fnd_file.log, fnd_message.get);
3464: END IF;
3465: lv_cntrct_rt_apply := TRUE;
3466: p_n_charge_rate := l_n_cfar_chg_rate;
3467: p_t_fee_as_items(i).chg_rate := p_n_charge_rate;
3475: p_t_fee_as_items(i).chg_rate := p_n_charge_rate;
3476: IF (p_trace_on = 'Y') THEN
3477: fnd_message.set_name('IGS', 'IGS_FI_CONTRACT_RATE');
3478: fnd_message.set_token('RATE', TO_CHAR(NVL(l_n_charge_rate, 0)) );
3479: fnd_file.put_line (fnd_file.log, fnd_message.get);
3480: END IF;
3481: log_to_fnd( p_v_module => 'finpl_prc_element_ranges',
3482: p_v_string => 'The contract rate will be used. Chg Rate: ' || l_n_charge_rate);
3483: END IF;
3496: END IF;
3497:
3498: IF (p_trace_on = 'Y') THEN
3499: fnd_message.set_name('IGS', 'IGS_FI_MULTI_CONTRACT_RT');
3500: fnd_file.put_line (fnd_file.log, fnd_message.get);
3501: END IF;
3502: log_to_fnd( p_v_module => 'finpl_prc_element_ranges',
3503: p_v_string => 'Raising e_one_record_expected.');
3504: RAISE e_one_record_expected;
3540: FOR rec_sub_elm_ranges IN cur_sub_elm_ranges(rec_elm_ranges.er_id)
3541: LOOP
3542: IF (l_n_loop_subelm_rng = 0) THEN
3543: IF (p_v_trace_on = 'Y') THEN
3544: fnd_file.new_line(fnd_file.log);
3545: fnd_message.set_name ( 'IGS', 'IGS_FI_SUB_ELM_RNG_MATCH');
3546: fnd_file.put_line (fnd_file.log, fnd_message.get);
3547: fnd_file.new_line(fnd_file.log);
3548: END IF;
3542: IF (l_n_loop_subelm_rng = 0) THEN
3543: IF (p_v_trace_on = 'Y') THEN
3544: fnd_file.new_line(fnd_file.log);
3545: fnd_message.set_name ( 'IGS', 'IGS_FI_SUB_ELM_RNG_MATCH');
3546: fnd_file.put_line (fnd_file.log, fnd_message.get);
3547: fnd_file.new_line(fnd_file.log);
3548: END IF;
3549: l_n_loop_subelm_rng := 1;
3550: END IF;
3543: IF (p_v_trace_on = 'Y') THEN
3544: fnd_file.new_line(fnd_file.log);
3545: fnd_message.set_name ( 'IGS', 'IGS_FI_SUB_ELM_RNG_MATCH');
3546: fnd_file.put_line (fnd_file.log, fnd_message.get);
3547: fnd_file.new_line(fnd_file.log);
3548: END IF;
3549: l_n_loop_subelm_rng := 1;
3550: END IF;
3551:
3552: IF (rec_sub_elm_ranges.sub_chg_method_code IS NOT NULL) THEN
3553: IF (p_v_trace_on = 'Y') THEN
3554: fnd_message.set_name('IGS', 'IGS_FI_OVRRIDE_CHG_METH_TYPE');
3555: fnd_message.set_token('CHG_MTHD', igs_fi_gen_gl.get_lkp_meaning('CHG_METHOD', rec_sub_elm_ranges.sub_chg_method_code));
3556: fnd_file.put_line (fnd_file.log, fnd_message.get);
3557: END IF;
3558: END IF;
3559:
3560: log_to_fnd( p_v_module => 'finpl_prc_element_ranges',
3584: --Rate records not found
3585: CLOSE cur_sub_elm_rng_rates;
3586: IF (p_v_trace_on = 'Y') THEN
3587: fnd_message.set_name('IGS', 'IGS_FI_SUBELM_NO_RATE');
3588: fnd_file.put_line (fnd_file.log, fnd_message.get);
3589: fnd_file.new_line(fnd_file.log);
3590: END IF;
3591: p_n_charge_rate := 0;
3592: l_n_charge_rate := 0;
3585: CLOSE cur_sub_elm_rng_rates;
3586: IF (p_v_trace_on = 'Y') THEN
3587: fnd_message.set_name('IGS', 'IGS_FI_SUBELM_NO_RATE');
3588: fnd_file.put_line (fnd_file.log, fnd_message.get);
3589: fnd_file.new_line(fnd_file.log);
3590: END IF;
3591: p_n_charge_rate := 0;
3592: l_n_charge_rate := 0;
3593: log_to_fnd( p_v_module => 'finpl_prc_element_ranges',
3647: p_derived_unit_level => NULL ) = TRUE ) THEN
3648: log_to_fnd( p_v_module => 'finpl_prc_element_ranges',
3649: p_v_string => 'Sub Element Range rate matches');
3650: IF (p_v_trace_on = 'Y') THEN
3651: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'LOW_RANGE') || ': ' || TO_CHAR(rec_sub_elm_ranges.sub_lower_range));
3652: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'UPPER_RANGE') || ': ' || TO_CHAR(rec_sub_elm_ranges.sub_upper_range));
3653: fnd_message.set_name('IGS', 'IGS_FI_LEV_CHG_RATE_NO');
3654: fnd_message.set_token('LEVEL', l_rec_sub_rates.s_relation_type);
3655: fnd_message.set_token('CH_RT', TO_CHAR(l_rec_sub_rates.chg_rate));
3648: log_to_fnd( p_v_module => 'finpl_prc_element_ranges',
3649: p_v_string => 'Sub Element Range rate matches');
3650: IF (p_v_trace_on = 'Y') THEN
3651: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'LOW_RANGE') || ': ' || TO_CHAR(rec_sub_elm_ranges.sub_lower_range));
3652: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'UPPER_RANGE') || ': ' || TO_CHAR(rec_sub_elm_ranges.sub_upper_range));
3653: fnd_message.set_name('IGS', 'IGS_FI_LEV_CHG_RATE_NO');
3654: fnd_message.set_token('LEVEL', l_rec_sub_rates.s_relation_type);
3655: fnd_message.set_token('CH_RT', TO_CHAR(l_rec_sub_rates.chg_rate));
3656: fnd_message.set_token('RT_NUM', TO_CHAR(l_rec_sub_rates.rate_number));
3669: fnd_message.set_token('UNIT_MODE', NVL(l_rec_sub_rates.unit_mode, l_v_lkp_all));
3670: fnd_message.set_token('UNIT_CODE', NVL(l_rec_sub_rates.unit_cd, l_v_lkp_all));
3671: fnd_message.set_token('UNIT_VER_NUM', NVL(TO_CHAR(l_rec_sub_rates.unit_version_number), l_v_lkp_all));
3672: fnd_message.set_token('UNIT_LEVEL', NVL(l_rec_sub_rates.unit_level, l_v_lkp_all));
3673: fnd_file.put_line (fnd_file.log, fnd_message.get);
3674: fnd_message.set_name('IGS', 'IGS_FI_FEEASS_RATE_MATCHES');
3675: fnd_file.put_line (fnd_file.log, fnd_message.get);
3676: fnd_file.new_line(fnd_file.log);
3677: END IF;
3671: fnd_message.set_token('UNIT_VER_NUM', NVL(TO_CHAR(l_rec_sub_rates.unit_version_number), l_v_lkp_all));
3672: fnd_message.set_token('UNIT_LEVEL', NVL(l_rec_sub_rates.unit_level, l_v_lkp_all));
3673: fnd_file.put_line (fnd_file.log, fnd_message.get);
3674: fnd_message.set_name('IGS', 'IGS_FI_FEEASS_RATE_MATCHES');
3675: fnd_file.put_line (fnd_file.log, fnd_message.get);
3676: fnd_file.new_line(fnd_file.log);
3677: END IF;
3678:
3679: --If the rate matches
3672: fnd_message.set_token('UNIT_LEVEL', NVL(l_rec_sub_rates.unit_level, l_v_lkp_all));
3673: fnd_file.put_line (fnd_file.log, fnd_message.get);
3674: fnd_message.set_name('IGS', 'IGS_FI_FEEASS_RATE_MATCHES');
3675: fnd_file.put_line (fnd_file.log, fnd_message.get);
3676: fnd_file.new_line(fnd_file.log);
3677: END IF;
3678:
3679: --If the rate matches
3680: l_n_charge_rate := l_rec_sub_rates.chg_rate;
3713: IF (l_n_charge_rate > l_n_cfar_chg_rate) THEN
3714: IF (p_trace_on = 'Y') THEN
3715: fnd_message.set_name('IGS', 'IGS_FI_CONTRACT_RATE');
3716: fnd_message.set_token('RATE', TO_CHAR(NVL(l_n_cfar_chg_rate, 0)) );
3717: fnd_file.put_line (fnd_file.log, fnd_message.get);
3718: fnd_message.set_name('IGS', 'IGS_FI_CHG_RATE');
3719: fnd_message.set_token('RATE', TO_CHAR(NVL(l_n_charge_rate, 0)) );
3720: fnd_file.put_line (fnd_file.log, fnd_message.get);
3721: END IF;
3716: fnd_message.set_token('RATE', TO_CHAR(NVL(l_n_cfar_chg_rate, 0)) );
3717: fnd_file.put_line (fnd_file.log, fnd_message.get);
3718: fnd_message.set_name('IGS', 'IGS_FI_CHG_RATE');
3719: fnd_message.set_token('RATE', TO_CHAR(NVL(l_n_charge_rate, 0)) );
3720: fnd_file.put_line (fnd_file.log, fnd_message.get);
3721: END IF;
3722: lv_cntrct_rt_apply := TRUE;
3723: l_n_charge_rate := l_n_cfar_chg_rate;
3724: log_to_fnd( p_v_module => 'finpl_prc_element_ranges',
3730: l_n_charge_rate := l_n_cfar_chg_rate;
3731: IF (p_trace_on = 'Y') THEN
3732: fnd_message.set_name('IGS', 'IGS_FI_CONTRACT_RATE');
3733: fnd_message.set_token('RATE', TO_CHAR(NVL(l_n_charge_rate, 0)) );
3734: fnd_file.put_line (fnd_file.log, fnd_message.get);
3735: END IF;
3736: log_to_fnd( p_v_module => 'finpl_prc_element_ranges',
3737: p_v_string => 'The contract rate will be used. Chg Rate: ' || l_n_charge_rate);
3738: END IF;
3751: END IF;
3752:
3753: IF (p_trace_on = 'Y') THEN
3754: fnd_message.set_name('IGS', 'IGS_FI_MULTI_CONTRACT_RT');
3755: fnd_file.put_line (fnd_file.log, fnd_message.get);
3756: END IF;
3757: log_to_fnd( p_v_module => 'finpl_prc_element_ranges',
3758: p_v_string => 'Raising e_one_record_expected.');
3759: RAISE e_one_record_expected;
3790: p_n_fee_amount := 0;
3791:
3792: IF (p_v_trace_on = 'Y') THEN
3793: fnd_message.set_name('IGS', 'IGS_FI_SUBELM_NO_RANGE');
3794: fnd_file.put_line (fnd_file.log, fnd_message.get);
3795: END IF;
3796: RETURN;
3797:
3798: ELSE
3894: p_n_charge_rate := 0;
3895: p_n_fee_amount := 0;
3896: IF (p_v_trace_on = 'Y') THEN
3897: fnd_message.set_name ( 'IGS', 'IGS_FI_NO_ELEMNTRNG_MATCH');
3898: fnd_file.put_line (fnd_file.log, fnd_message.get);
3899: fnd_message.set_name('IGS', 'IGS_FI_CHG_RATE');
3900: fnd_message.set_token('RATE', TO_CHAR(p_n_charge_rate) );
3901: fnd_file.put_line (fnd_file.log, fnd_message.get);
3902: END IF;
3897: fnd_message.set_name ( 'IGS', 'IGS_FI_NO_ELEMNTRNG_MATCH');
3898: fnd_file.put_line (fnd_file.log, fnd_message.get);
3899: fnd_message.set_name('IGS', 'IGS_FI_CHG_RATE');
3900: fnd_message.set_token('RATE', TO_CHAR(p_n_charge_rate) );
3901: fnd_file.put_line (fnd_file.log, fnd_message.get);
3902: END IF;
3903: RETURN;
3904: END IF;
3905:
4353: IF (v_charge_rate > v_cfar_chg_rate) THEN
4354: IF (l_v_trace_on = 'Y') THEN
4355: fnd_message.set_name('IGS', 'IGS_FI_CONTRACT_RATE');
4356: fnd_message.set_token('RATE', TO_CHAR(NVL(v_cfar_chg_rate, 0)) );
4357: fnd_file.put_line (fnd_file.log, fnd_message.get);
4358: fnd_message.set_name('IGS', 'IGS_FI_CHG_RATE');
4359: fnd_message.set_token('RATE', TO_CHAR(NVL(v_charge_rate, 0)) );
4360: fnd_file.put_line (fnd_file.log, fnd_message.get);
4361: END IF;
4356: fnd_message.set_token('RATE', TO_CHAR(NVL(v_cfar_chg_rate, 0)) );
4357: fnd_file.put_line (fnd_file.log, fnd_message.get);
4358: fnd_message.set_name('IGS', 'IGS_FI_CHG_RATE');
4359: fnd_message.set_token('RATE', TO_CHAR(NVL(v_charge_rate, 0)) );
4360: fnd_file.put_line (fnd_file.log, fnd_message.get);
4361: END IF;
4362: lv_cntrct_rt_apply := TRUE;
4363: v_charge_rate := v_cfar_chg_rate;
4364: IF (p_n_called = 1) THEN
4380: END IF;
4381: IF (l_v_trace_on = 'Y') THEN
4382: fnd_message.set_name('IGS', 'IGS_FI_CONTRACT_RATE');
4383: fnd_message.set_token('RATE', TO_CHAR(NVL(v_charge_rate, 0)) );
4384: fnd_file.put_line (fnd_file.log, fnd_message.get);
4385: END IF;
4386: log_to_fnd( p_v_module => 'finp_clc_ass_amnt',
4387: p_v_string => 'The contract rate will be used. Chg Rate: ' || v_charge_rate);
4388: END IF;
4401: END IF;
4402:
4403: IF (l_v_trace_on = 'Y') THEN
4404: fnd_message.set_name('IGS', 'IGS_FI_MULTI_CONTRACT_RT');
4405: fnd_file.put_line (fnd_file.log, fnd_message.get);
4406: END IF;
4407: log_to_fnd( p_v_module => 'finp_clc_ass_amnt',
4408: p_v_string => 'Raising e_one_record_expected.');
4409: RAISE e_one_record_expected;
4952: v_message_name := 'IGS_GE_UNHANDLED_EXP';
4953: IF (p_trace_on = 'Y') THEN
4954: fnd_message.set_name('IGS', v_message_name);
4955: Fnd_Message.Set_Token('NAME','IGS_FI_PRC_FEE_ASS.FINPL_SUM_FEE_ASS_ITEM-'||SUBSTR(sqlerrm,1,500));
4956: fnd_file.put_line (fnd_file.log, fnd_message.get);
4957: END IF;
4958: p_message_name := v_message_name;
4959: RETURN FALSE;
4960: END finpl_sum_fee_ass_item;
5127:
5128: IF (p_trace_on = 'Y') THEN
5129: -- Old and New Amounts need not be logged in the log file if both are zero.
5130: IF (p_old_ass_amount > 0 OR p_new_ass_amount > 0) THEN
5131: fnd_file.new_line(fnd_file.log);
5132: fnd_message.set_name('IGS', 'IGS_FI_ST_DT_ASS_AMT');
5133: fnd_message.set_token('OLD_AMT', TO_CHAR(p_old_ass_amount));
5134: fnd_file.put_line (fnd_file.log, fnd_message.get);
5135: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'NEW_AMOUNT') || ': ' || TO_CHAR(p_new_ass_amount));
5130: IF (p_old_ass_amount > 0 OR p_new_ass_amount > 0) THEN
5131: fnd_file.new_line(fnd_file.log);
5132: fnd_message.set_name('IGS', 'IGS_FI_ST_DT_ASS_AMT');
5133: fnd_message.set_token('OLD_AMT', TO_CHAR(p_old_ass_amount));
5134: fnd_file.put_line (fnd_file.log, fnd_message.get);
5135: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'NEW_AMOUNT') || ': ' || TO_CHAR(p_new_ass_amount));
5136: fnd_file.new_line(fnd_file.log);
5137: END IF;
5138: END IF;
5131: fnd_file.new_line(fnd_file.log);
5132: fnd_message.set_name('IGS', 'IGS_FI_ST_DT_ASS_AMT');
5133: fnd_message.set_token('OLD_AMT', TO_CHAR(p_old_ass_amount));
5134: fnd_file.put_line (fnd_file.log, fnd_message.get);
5135: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'NEW_AMOUNT') || ': ' || TO_CHAR(p_new_ass_amount));
5136: fnd_file.new_line(fnd_file.log);
5137: END IF;
5138: END IF;
5139:
5132: fnd_message.set_name('IGS', 'IGS_FI_ST_DT_ASS_AMT');
5133: fnd_message.set_token('OLD_AMT', TO_CHAR(p_old_ass_amount));
5134: fnd_file.put_line (fnd_file.log, fnd_message.get);
5135: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'NEW_AMOUNT') || ': ' || TO_CHAR(p_new_ass_amount));
5136: fnd_file.new_line(fnd_file.log);
5137: END IF;
5138: END IF;
5139:
5140: -- If the Fee Type has Optional Indicator set to 'Y', Retention is not applicable. Return 0.0
5194: IF NVL(l_n_retention_amount, 0.0) > 0.0 THEN
5195: log_to_fnd( p_v_module => 'finpl_chk_debt_ret_sched',
5196: p_v_string => 'Complete Withdrawal Retention - Retention Amount > 0, invoking create_retention_charge.');
5197: IF (p_trace_on = 'Y') THEN
5198: fnd_file.new_line(fnd_file.log);
5199: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'RET_LEVEL') || ': ' || igs_fi_gen_gl.get_lkp_meaning('IGS_FI_RET_LEVEL', l_v_retention_level));
5200: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'WITHDWR_RET') || ': ' || igs_fi_gen_gl.get_lkp_meaning('YES_NO', l_v_cmp_withdr_ret));
5201: END IF;
5202: create_retention_charge( p_n_person_id => p_person_id,
5195: log_to_fnd( p_v_module => 'finpl_chk_debt_ret_sched',
5196: p_v_string => 'Complete Withdrawal Retention - Retention Amount > 0, invoking create_retention_charge.');
5197: IF (p_trace_on = 'Y') THEN
5198: fnd_file.new_line(fnd_file.log);
5199: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'RET_LEVEL') || ': ' || igs_fi_gen_gl.get_lkp_meaning('IGS_FI_RET_LEVEL', l_v_retention_level));
5200: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'WITHDWR_RET') || ': ' || igs_fi_gen_gl.get_lkp_meaning('YES_NO', l_v_cmp_withdr_ret));
5201: END IF;
5202: create_retention_charge( p_n_person_id => p_person_id,
5203: p_v_course_cd => p_course_cd,
5196: p_v_string => 'Complete Withdrawal Retention - Retention Amount > 0, invoking create_retention_charge.');
5197: IF (p_trace_on = 'Y') THEN
5198: fnd_file.new_line(fnd_file.log);
5199: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'RET_LEVEL') || ': ' || igs_fi_gen_gl.get_lkp_meaning('IGS_FI_RET_LEVEL', l_v_retention_level));
5200: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'WITHDWR_RET') || ': ' || igs_fi_gen_gl.get_lkp_meaning('YES_NO', l_v_cmp_withdr_ret));
5201: END IF;
5202: create_retention_charge( p_n_person_id => p_person_id,
5203: p_v_course_cd => p_course_cd,
5204: p_v_fee_cal_type => p_fee_cal_type,
5236: IF NVL(l_n_retention_amount, 0.0) > 0.0 THEN
5237: log_to_fnd( p_v_module => 'finpl_chk_debt_ret_sched',
5238: p_v_string => 'Fee Period retention - Retention Amount > 0, invoking create_retention_charge.');
5239: IF (p_trace_on = 'Y') THEN
5240: fnd_file.new_line(fnd_file.log);
5241: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'RET_LEVEL') || ': ' || igs_fi_gen_gl.get_lkp_meaning('IGS_FI_RET_LEVEL', l_v_retention_level));
5242: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'WITHDWR_RET') || ': ' || igs_fi_gen_gl.get_lkp_meaning('YES_NO', l_v_cmp_withdr_ret));
5243: END IF;
5244:
5237: log_to_fnd( p_v_module => 'finpl_chk_debt_ret_sched',
5238: p_v_string => 'Fee Period retention - Retention Amount > 0, invoking create_retention_charge.');
5239: IF (p_trace_on = 'Y') THEN
5240: fnd_file.new_line(fnd_file.log);
5241: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'RET_LEVEL') || ': ' || igs_fi_gen_gl.get_lkp_meaning('IGS_FI_RET_LEVEL', l_v_retention_level));
5242: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'WITHDWR_RET') || ': ' || igs_fi_gen_gl.get_lkp_meaning('YES_NO', l_v_cmp_withdr_ret));
5243: END IF;
5244:
5245: create_retention_charge( p_n_person_id => p_person_id,
5238: p_v_string => 'Fee Period retention - Retention Amount > 0, invoking create_retention_charge.');
5239: IF (p_trace_on = 'Y') THEN
5240: fnd_file.new_line(fnd_file.log);
5241: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'RET_LEVEL') || ': ' || igs_fi_gen_gl.get_lkp_meaning('IGS_FI_RET_LEVEL', l_v_retention_level));
5242: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'WITHDWR_RET') || ': ' || igs_fi_gen_gl.get_lkp_meaning('YES_NO', l_v_cmp_withdr_ret));
5243: END IF;
5244:
5245: create_retention_charge( p_n_person_id => p_person_id,
5246: p_v_course_cd => p_course_cd,
5863: t_fee_as_items(i).status := 'D';
5864: IF (p_trace_on = 'Y') THEN
5865: fnd_message.set_name('IGS', 'IGS_FI_SP_FEE_DECLINED');
5866: fnd_message.set_token('INVOICE_NUM', l_v_invoice_number);
5867: fnd_file.new_line(fnd_file.log);
5868: fnd_file.put_line(fnd_file.log, fnd_message.get);
5869: END IF;
5870: log_to_fnd( p_v_module => 'finpl_ins_fee_ass',
5871: p_v_string => 'Charge (Number: ' || l_v_invoice_number || ') is declined.' );
5864: IF (p_trace_on = 'Y') THEN
5865: fnd_message.set_name('IGS', 'IGS_FI_SP_FEE_DECLINED');
5866: fnd_message.set_token('INVOICE_NUM', l_v_invoice_number);
5867: fnd_file.new_line(fnd_file.log);
5868: fnd_file.put_line(fnd_file.log, fnd_message.get);
5869: END IF;
5870: log_to_fnd( p_v_module => 'finpl_ins_fee_ass',
5871: p_v_string => 'Charge (Number: ' || l_v_invoice_number || ') is declined.' );
5872: END IF;
5977: x_org_id => l_n_org_id );
5978:
5979: IF (p_trace_on = 'Y') THEN
5980: fnd_message.set_name('IGS', 'IGS_FI_STUDFEE_ASSESSED_PRG');
5981: fnd_file.put_line (fnd_file.log, fnd_message.get);
5982: fnd_file.new_line(fnd_file.log);
5983: END IF;
5984:
5985: END;
5978:
5979: IF (p_trace_on = 'Y') THEN
5980: fnd_message.set_name('IGS', 'IGS_FI_STUDFEE_ASSESSED_PRG');
5981: fnd_file.put_line (fnd_file.log, fnd_message.get);
5982: fnd_file.new_line(fnd_file.log);
5983: END IF;
5984:
5985: END;
5986:
6092: IF (p_trace_on = 'Y') THEN
6093: -- Trace Entry
6094: IF lv_diff_amount > 0 THEN
6095: l_v_invoice_num := igs_fi_gen_008.get_invoice_number(l_invoice_id);
6096: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'CHARGE_NUMBER') || ': ' || l_v_invoice_num);
6097: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'CHG_AMOUNT') || ': ' || TO_CHAR(NVL(lv_diff_amount, 0)));
6098: fnd_file.new_line(fnd_file.log);
6099: END IF;
6100: END IF;
6093: -- Trace Entry
6094: IF lv_diff_amount > 0 THEN
6095: l_v_invoice_num := igs_fi_gen_008.get_invoice_number(l_invoice_id);
6096: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'CHARGE_NUMBER') || ': ' || l_v_invoice_num);
6097: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'CHG_AMOUNT') || ': ' || TO_CHAR(NVL(lv_diff_amount, 0)));
6098: fnd_file.new_line(fnd_file.log);
6099: END IF;
6100: END IF;
6101:
6094: IF lv_diff_amount > 0 THEN
6095: l_v_invoice_num := igs_fi_gen_008.get_invoice_number(l_invoice_id);
6096: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'CHARGE_NUMBER') || ': ' || l_v_invoice_num);
6097: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'CHG_AMOUNT') || ': ' || TO_CHAR(NVL(lv_diff_amount, 0)));
6098: fnd_file.new_line(fnd_file.log);
6099: END IF;
6100: END IF;
6101:
6102: IF (p_s_fee_trigger_cat = gcst_institutn) THEN
6374: -- Trace Entry
6375: IF (p_charge_method = gcst_flatrate) THEN
6376: NULL;
6377: ELSE
6378: fnd_file.new_line(fnd_file.log);
6379: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_TRIGGER_GROUP', 'UNIT') || ': ' || p_unit_cd);
6380: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'TEACH_CAL_ALT_CD') || ': ' || p_cal_type ||
6381: ' ' || TO_CHAR(p_effective_start_dt,'DD/MM/YYYY') ||
6382: ' ' || TO_CHAR(p_effective_end_dt,'DD/MM/YYYY'));
6375: IF (p_charge_method = gcst_flatrate) THEN
6376: NULL;
6377: ELSE
6378: fnd_file.new_line(fnd_file.log);
6379: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_TRIGGER_GROUP', 'UNIT') || ': ' || p_unit_cd);
6380: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'TEACH_CAL_ALT_CD') || ': ' || p_cal_type ||
6381: ' ' || TO_CHAR(p_effective_start_dt,'DD/MM/YYYY') ||
6382: ' ' || TO_CHAR(p_effective_end_dt,'DD/MM/YYYY'));
6383: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_ACCT_ENTITIES', 'LOC') || ': ' || p_location_cd);
6376: NULL;
6377: ELSE
6378: fnd_file.new_line(fnd_file.log);
6379: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_TRIGGER_GROUP', 'UNIT') || ': ' || p_unit_cd);
6380: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'TEACH_CAL_ALT_CD') || ': ' || p_cal_type ||
6381: ' ' || TO_CHAR(p_effective_start_dt,'DD/MM/YYYY') ||
6382: ' ' || TO_CHAR(p_effective_end_dt,'DD/MM/YYYY'));
6383: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_ACCT_ENTITIES', 'LOC') || ': ' || p_location_cd);
6384: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'UNIT_CLASS') || ': ' || lv_unit_class_att);
6379: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_TRIGGER_GROUP', 'UNIT') || ': ' || p_unit_cd);
6380: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'TEACH_CAL_ALT_CD') || ': ' || p_cal_type ||
6381: ' ' || TO_CHAR(p_effective_start_dt,'DD/MM/YYYY') ||
6382: ' ' || TO_CHAR(p_effective_end_dt,'DD/MM/YYYY'));
6383: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_ACCT_ENTITIES', 'LOC') || ': ' || p_location_cd);
6384: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'UNIT_CLASS') || ': ' || lv_unit_class_att);
6385: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'AUDITED') || ': ' || l_v_no_assessment_ind);
6386: IF ((p_unit_cd IS NOT NULL) AND (p_unit_version_number IS NOT NULL)) THEN
6387: fnd_message.set_name('IGS', 'IGS_FI_UNIT_CD_VERSION');
6380: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'TEACH_CAL_ALT_CD') || ': ' || p_cal_type ||
6381: ' ' || TO_CHAR(p_effective_start_dt,'DD/MM/YYYY') ||
6382: ' ' || TO_CHAR(p_effective_end_dt,'DD/MM/YYYY'));
6383: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_ACCT_ENTITIES', 'LOC') || ': ' || p_location_cd);
6384: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'UNIT_CLASS') || ': ' || lv_unit_class_att);
6385: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'AUDITED') || ': ' || l_v_no_assessment_ind);
6386: IF ((p_unit_cd IS NOT NULL) AND (p_unit_version_number IS NOT NULL)) THEN
6387: fnd_message.set_name('IGS', 'IGS_FI_UNIT_CD_VERSION');
6388: fnd_message.set_token('UNIT_CD', p_unit_cd);
6381: ' ' || TO_CHAR(p_effective_start_dt,'DD/MM/YYYY') ||
6382: ' ' || TO_CHAR(p_effective_end_dt,'DD/MM/YYYY'));
6383: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_ACCT_ENTITIES', 'LOC') || ': ' || p_location_cd);
6384: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'UNIT_CLASS') || ': ' || lv_unit_class_att);
6385: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'AUDITED') || ': ' || l_v_no_assessment_ind);
6386: IF ((p_unit_cd IS NOT NULL) AND (p_unit_version_number IS NOT NULL)) THEN
6387: fnd_message.set_name('IGS', 'IGS_FI_UNIT_CD_VERSION');
6388: fnd_message.set_token('UNIT_CD', p_unit_cd);
6389: fnd_message.set_token('UNIT_VER', TO_CHAR(p_unit_version_number));
6386: IF ((p_unit_cd IS NOT NULL) AND (p_unit_version_number IS NOT NULL)) THEN
6387: fnd_message.set_name('IGS', 'IGS_FI_UNIT_CD_VERSION');
6388: fnd_message.set_token('UNIT_CD', p_unit_cd);
6389: fnd_message.set_token('UNIT_VER', TO_CHAR(p_unit_version_number));
6390: fnd_file.put_line (fnd_file.log, fnd_message.get);
6391: END IF;
6392: IF (p_n_unit_type_id IS NULL) THEN
6393: fnd_message.set_name('IGS', 'IGS_FI_NO_UNIT_TYPE');
6394: fnd_file.put_line (fnd_file.log, fnd_message.get);
6390: fnd_file.put_line (fnd_file.log, fnd_message.get);
6391: END IF;
6392: IF (p_n_unit_type_id IS NULL) THEN
6393: fnd_message.set_name('IGS', 'IGS_FI_NO_UNIT_TYPE');
6394: fnd_file.put_line (fnd_file.log, fnd_message.get);
6395: ELSE
6396: fnd_file.put_line (fnd_file.log,
6397: igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'UNIT_PROG_TYP') ||
6398: ': ' || finpl_get_uptl(p_n_unit_type_id));
6392: IF (p_n_unit_type_id IS NULL) THEN
6393: fnd_message.set_name('IGS', 'IGS_FI_NO_UNIT_TYPE');
6394: fnd_file.put_line (fnd_file.log, fnd_message.get);
6395: ELSE
6396: fnd_file.put_line (fnd_file.log,
6397: igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'UNIT_PROG_TYP') ||
6398: ': ' || finpl_get_uptl(p_n_unit_type_id));
6399: END IF;
6400: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'UNIT_LEVEL') || ': ' || p_v_unit_level);
6396: fnd_file.put_line (fnd_file.log,
6397: igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'UNIT_PROG_TYP') ||
6398: ': ' || finpl_get_uptl(p_n_unit_type_id));
6399: END IF;
6400: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'UNIT_LEVEL') || ': ' || p_v_unit_level);
6401: IF (p_v_unit_mode IS NULL) THEN
6402: fnd_message.set_name('IGS', 'IGS_FI_NO_UNIT_MODE');
6403: fnd_file.put_line (fnd_file.log, fnd_message.get);
6404: ELSE
6399: END IF;
6400: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'UNIT_LEVEL') || ': ' || p_v_unit_level);
6401: IF (p_v_unit_mode IS NULL) THEN
6402: fnd_message.set_name('IGS', 'IGS_FI_NO_UNIT_MODE');
6403: fnd_file.put_line (fnd_file.log, fnd_message.get);
6404: ELSE
6405: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'UNIT_MODE') || ': ' || p_v_unit_mode);
6406: END IF;
6407: END IF;
6401: IF (p_v_unit_mode IS NULL) THEN
6402: fnd_message.set_name('IGS', 'IGS_FI_NO_UNIT_MODE');
6403: fnd_file.put_line (fnd_file.log, fnd_message.get);
6404: ELSE
6405: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'UNIT_MODE') || ': ' || p_v_unit_mode);
6406: END IF;
6407: END IF;
6408: END IF;
6409:
6423: IF v_derived_org_unit_cd IS NOT NULL THEN
6424: IF (p_trace_on = 'Y') THEN
6425: fnd_message.set_name ( 'IGS', 'IGS_FI_ORG_UNIT');
6426: fnd_message.set_token('ORG_UNIT_CD',v_derived_org_unit_cd );
6427: fnd_file.put_line (fnd_file.log, fnd_message.get);
6428: END IF;
6429:
6430: ELSE
6431: -- Couldn't derive from Unit level, try at Unit Section
6440: IF v_derived_org_unit_cd IS NOT NULL THEN
6441: IF (p_trace_on = 'Y') THEN
6442: fnd_message.set_name ( 'IGS', 'IGS_FI_ORG_UNIT');
6443: fnd_message.set_token('ORG_UNIT_CD',v_derived_org_unit_cd);
6444: fnd_file.put_line (fnd_file.log, fnd_message.get);
6445: END IF;
6446: ELSE
6447: v_message_name := 'IGS_FI_NO_ORG_UNIT';
6448: IF (p_trace_on = 'Y') THEN
6447: v_message_name := 'IGS_FI_NO_ORG_UNIT';
6448: IF (p_trace_on = 'Y') THEN
6449: fnd_message.set_name('IGS', v_message_name);
6450: fnd_message.set_token('UNIT_CD', p_unit_cd);
6451: fnd_file.put_line (fnd_file.log, fnd_message.get);
6452: END IF;
6453: log_to_fnd( p_v_module => 'finpl_prc_sua_load',
6454: p_v_string => 'Other than Flat Rate: Could not derive Org Unit Code.' );
6455: END IF;
6504: END IF;
6505: END;
6506: IF (p_trace_on = 'Y') THEN
6507: -- Trace Entry
6508: fnd_file.new_line(fnd_file.log);
6509: fnd_message.set_name ( 'IGS', 'IGS_FI_LOAD_INCURRED');
6510: fnd_message.set_token('YES_NO', igs_fi_gen_gl.get_lkp_meaning('YES_NO', 'Y') );
6511: fnd_file.put_line (fnd_file.log, fnd_message.get);
6512: fnd_message.set_name('IGS', 'IGS_FI_CHG_METH_TYPE');
6507: -- Trace Entry
6508: fnd_file.new_line(fnd_file.log);
6509: fnd_message.set_name ( 'IGS', 'IGS_FI_LOAD_INCURRED');
6510: fnd_message.set_token('YES_NO', igs_fi_gen_gl.get_lkp_meaning('YES_NO', 'Y') );
6511: fnd_file.put_line (fnd_file.log, fnd_message.get);
6512: fnd_message.set_name('IGS', 'IGS_FI_CHG_METH_TYPE');
6513: fnd_message.set_token('CHG_MTHD', igs_fi_gen_gl.get_lkp_meaning('CHG_METHOD', p_charge_method));
6514: fnd_file.put_line (fnd_file.log, fnd_message.get);
6515: fnd_message.set_name('IGS', 'IGS_FI_CHRG_METHOD_ELEMENTS');
6510: fnd_message.set_token('YES_NO', igs_fi_gen_gl.get_lkp_meaning('YES_NO', 'Y') );
6511: fnd_file.put_line (fnd_file.log, fnd_message.get);
6512: fnd_message.set_name('IGS', 'IGS_FI_CHG_METH_TYPE');
6513: fnd_message.set_token('CHG_MTHD', igs_fi_gen_gl.get_lkp_meaning('CHG_METHOD', p_charge_method));
6514: fnd_file.put_line (fnd_file.log, fnd_message.get);
6515: fnd_message.set_name('IGS', 'IGS_FI_CHRG_METHOD_ELEMENTS');
6516: fnd_message.set_token('CHG_ELM', TO_CHAR(p_charge_elements));
6517: fnd_file.put_line (fnd_file.log, fnd_message.get);
6518: END IF;
6513: fnd_message.set_token('CHG_MTHD', igs_fi_gen_gl.get_lkp_meaning('CHG_METHOD', p_charge_method));
6514: fnd_file.put_line (fnd_file.log, fnd_message.get);
6515: fnd_message.set_name('IGS', 'IGS_FI_CHRG_METHOD_ELEMENTS');
6516: fnd_message.set_token('CHG_ELM', TO_CHAR(p_charge_elements));
6517: fnd_file.put_line (fnd_file.log, fnd_message.get);
6518: END IF;
6519: p_ret_true_flag := TRUE;
6520: RETURN TRUE;
6521:
6559: IF (p_trace_on = 'Y') THEN
6560: -- Trace Entry
6561: fnd_message.set_name ( 'IGS', 'IGS_FI_LOAD_INCURRED');
6562: fnd_message.set_token('YES_NO', igs_fi_gen_gl.get_lkp_meaning('YES_NO', 'Y') );
6563: fnd_file.put_line (fnd_file.log, fnd_message.get);
6564: fnd_message.set_name('IGS', 'IGS_FI_CHRG_METHOD_ELEMENTS');
6565: fnd_message.set_token('CHG_ELM', TO_CHAR(p_charge_elements));
6566: fnd_file.put_line (fnd_file.log, fnd_message.get);
6567: END IF;
6562: fnd_message.set_token('YES_NO', igs_fi_gen_gl.get_lkp_meaning('YES_NO', 'Y') );
6563: fnd_file.put_line (fnd_file.log, fnd_message.get);
6564: fnd_message.set_name('IGS', 'IGS_FI_CHRG_METHOD_ELEMENTS');
6565: fnd_message.set_token('CHG_ELM', TO_CHAR(p_charge_elements));
6566: fnd_file.put_line (fnd_file.log, fnd_message.get);
6567: END IF;
6568:
6569: ELSIF (p_charge_method = gcst_eftsu) THEN
6570: p_charge_elements := p_charge_elements + p_eftsu;
6612: l_n_eftsu := p_eftsu;
6613: END IF;
6614: fnd_message.set_name('IGS', 'IGS_FI_LOAD_INCURRED');
6615: fnd_message.set_token('YES_NO', igs_fi_gen_gl.get_lkp_meaning('YES_NO', 'Y') );
6616: fnd_file.put_line (fnd_file.log, fnd_message.get);
6617: fnd_message.set_name('IGS', 'IGS_FI_CHG_ELE');
6618: fnd_message.set_token('ELEMENTS', TO_CHAR(NVL(p_eftsu, 0)));
6619: fnd_file.put_line (fnd_file.log, fnd_message.get);
6620: END IF;
6615: fnd_message.set_token('YES_NO', igs_fi_gen_gl.get_lkp_meaning('YES_NO', 'Y') );
6616: fnd_file.put_line (fnd_file.log, fnd_message.get);
6617: fnd_message.set_name('IGS', 'IGS_FI_CHG_ELE');
6618: fnd_message.set_token('ELEMENTS', TO_CHAR(NVL(p_eftsu, 0)));
6619: fnd_file.put_line (fnd_file.log, fnd_message.get);
6620: END IF;
6621:
6622: ELSIF (p_charge_method = gcst_crpoint) THEN
6623: p_charge_elements := p_charge_elements + p_credit_points;
6665: l_n_credit_points := p_credit_points;
6666: END IF;
6667: fnd_message.set_name('IGS', 'IGS_FI_LOAD_INCURRED');
6668: fnd_message.set_token('YES_NO', igs_fi_gen_gl.get_lkp_meaning('YES_NO', 'Y') );
6669: fnd_file.put_line (fnd_file.log, fnd_message.get);
6670: fnd_message.set_name('IGS', 'IGS_FI_CHG_ELE');
6671: fnd_message.set_token('ELEMENTS', TO_CHAR(NVL(p_credit_points, 0)));
6672: fnd_file.put_line (fnd_file.log, fnd_message.get);
6673: END IF;
6668: fnd_message.set_token('YES_NO', igs_fi_gen_gl.get_lkp_meaning('YES_NO', 'Y') );
6669: fnd_file.put_line (fnd_file.log, fnd_message.get);
6670: fnd_message.set_name('IGS', 'IGS_FI_CHG_ELE');
6671: fnd_message.set_token('ELEMENTS', TO_CHAR(NVL(p_credit_points, 0)));
6672: fnd_file.put_line (fnd_file.log, fnd_message.get);
6673: END IF;
6674: END IF;
6675:
6676: log_to_fnd( p_v_module => 'finpl_prc_sua_load',
7176: END IF;
7177: ELSE
7178: IF (p_trace_on = 'Y') THEN
7179: fnd_message.set_name ( 'IGS', 'IGS_FI_UNABLE_DETM_DFLTLOAD');
7180: fnd_file.put_line (fnd_file.log, fnd_message.get);
7181: END IF;
7182: log_to_fnd( p_v_module => 'finpl_clc_chg_mthd_elements',
7183: p_v_string => 'Unable derive Default load. Returning false with message IGS_FI_UNABLE_DETM_DFLTLOAD.');
7184: RETURN FALSE;
7420: p_v_string => 'Flat Rate Case: Returning False as finpl_sum_fee_ass_item returned message: ' || lv_sum_message);
7421: RETURN FALSE;
7422: END IF;
7423: IF (p_trace_on = 'Y') THEN
7424: fnd_file.new_line(fnd_file.log);
7425: fnd_message.set_name ( 'IGS', 'IGS_FI_LOAD_INCURRED');
7426: fnd_message.set_token('YES_NO', igs_fi_gen_gl.get_lkp_meaning('YES_NO', 'Y') );
7427: fnd_file.put_line (fnd_file.log, fnd_message.get);
7428: fnd_message.set_name('IGS', 'IGS_FI_CHRG_METHOD_ELEMENTS');
7423: IF (p_trace_on = 'Y') THEN
7424: fnd_file.new_line(fnd_file.log);
7425: fnd_message.set_name ( 'IGS', 'IGS_FI_LOAD_INCURRED');
7426: fnd_message.set_token('YES_NO', igs_fi_gen_gl.get_lkp_meaning('YES_NO', 'Y') );
7427: fnd_file.put_line (fnd_file.log, fnd_message.get);
7428: fnd_message.set_name('IGS', 'IGS_FI_CHRG_METHOD_ELEMENTS');
7429: fnd_message.set_token('CHG_ELM', TO_CHAR(p_charge_elements));
7430: fnd_file.put_line (fnd_file.log, fnd_message.get);
7431: END IF;
7426: fnd_message.set_token('YES_NO', igs_fi_gen_gl.get_lkp_meaning('YES_NO', 'Y') );
7427: fnd_file.put_line (fnd_file.log, fnd_message.get);
7428: fnd_message.set_name('IGS', 'IGS_FI_CHRG_METHOD_ELEMENTS');
7429: fnd_message.set_token('CHG_ELM', TO_CHAR(p_charge_elements));
7430: fnd_file.put_line (fnd_file.log, fnd_message.get);
7431: END IF;
7432: v_ret_true_flag := TRUE;
7433: END IF;
7434:
7439: IF l_v_ret_level = 'TEACH_PERIOD' THEN
7440: tbl_fai_unit_dtls(l_n_count).chg_elements := 1;
7441: END IF;
7442: IF (p_trace_on = 'Y') THEN
7443: fnd_file.new_line(fnd_file.log);
7444: fnd_message.set_name ( 'IGS', 'IGS_FI_LOAD_INCURRED');
7445: fnd_message.set_token('YES_NO', igs_fi_gen_gl.get_lkp_meaning('YES_NO', 'Y') );
7446: fnd_file.put_line (fnd_file.log, fnd_message.get);
7447: fnd_message.set_name('IGS', 'IGS_FI_CHG_ELE');
7442: IF (p_trace_on = 'Y') THEN
7443: fnd_file.new_line(fnd_file.log);
7444: fnd_message.set_name ( 'IGS', 'IGS_FI_LOAD_INCURRED');
7445: fnd_message.set_token('YES_NO', igs_fi_gen_gl.get_lkp_meaning('YES_NO', 'Y') );
7446: fnd_file.put_line (fnd_file.log, fnd_message.get);
7447: fnd_message.set_name('IGS', 'IGS_FI_CHG_ELE');
7448: fnd_message.set_token('ELEMENTS', TO_CHAR(p_charge_elements));
7449: fnd_file.put_line (fnd_file.log, fnd_message.get);
7450: END IF;
7445: fnd_message.set_token('YES_NO', igs_fi_gen_gl.get_lkp_meaning('YES_NO', 'Y') );
7446: fnd_file.put_line (fnd_file.log, fnd_message.get);
7447: fnd_message.set_name('IGS', 'IGS_FI_CHG_ELE');
7448: fnd_message.set_token('ELEMENTS', TO_CHAR(p_charge_elements));
7449: fnd_file.put_line (fnd_file.log, fnd_message.get);
7450: END IF;
7451:
7452: ELSIF (p_charge_method = gcst_eftsu) THEN
7453: -- Consider all Units that are assessable, Cursor c_sualv_scafv will get all assessable units only.
7479: log_to_fnd( p_v_module => 'finpl_clc_chg_mthd_elements',
7480: p_v_string => 'Derived Vals from enrp_clc_sua_eftsu- Uoo: ' || v_sualv_scafv_rec.uoo_id
7481: || ', Eftsu:' || v_eftsu || ', Charge Elements: ' || p_charge_elements );
7482: IF (p_trace_on = 'Y') THEN
7483: fnd_file.new_line(fnd_file.log);
7484: fnd_message.set_name('IGS', 'IGS_FI_LOAD_INCURRED');
7485: fnd_message.set_token('YES_NO', igs_fi_gen_gl.get_lkp_meaning('YES_NO', 'Y') );
7486: fnd_file.put_line (fnd_file.log, fnd_message.get);
7487: fnd_message.set_name('IGS', 'IGS_FI_CHG_ELE');
7482: IF (p_trace_on = 'Y') THEN
7483: fnd_file.new_line(fnd_file.log);
7484: fnd_message.set_name('IGS', 'IGS_FI_LOAD_INCURRED');
7485: fnd_message.set_token('YES_NO', igs_fi_gen_gl.get_lkp_meaning('YES_NO', 'Y') );
7486: fnd_file.put_line (fnd_file.log, fnd_message.get);
7487: fnd_message.set_name('IGS', 'IGS_FI_CHG_ELE');
7488: fnd_message.set_token('ELEMENTS', TO_CHAR(NVL(v_eftsu, 0)));
7489: fnd_file.put_line (fnd_file.log, fnd_message.get);
7490: END IF;
7485: fnd_message.set_token('YES_NO', igs_fi_gen_gl.get_lkp_meaning('YES_NO', 'Y') );
7486: fnd_file.put_line (fnd_file.log, fnd_message.get);
7487: fnd_message.set_name('IGS', 'IGS_FI_CHG_ELE');
7488: fnd_message.set_token('ELEMENTS', TO_CHAR(NVL(v_eftsu, 0)));
7489: fnd_file.put_line (fnd_file.log, fnd_message.get);
7490: END IF;
7491:
7492: ELSIF (p_charge_method = gcst_crpoint) THEN -- Credit Points
7493: -- Consider all Units that are assessable, Cursor c_sualv_scafv will get all assessable units only.
7511: log_to_fnd( p_v_module => 'finpl_clc_chg_mthd_elements',
7512: p_v_string => 'Derived Vals from finpl_clc_sua_cp- Uoo: ' || v_sualv_scafv_rec.uoo_id
7513: || ', Credit Points:' || v_credit_points || ', Charge Elements: ' || p_charge_elements );
7514: IF (p_trace_on = 'Y') THEN
7515: fnd_file.new_line(fnd_file.log);
7516: fnd_message.set_name('IGS', 'IGS_FI_LOAD_INCURRED');
7517: fnd_message.set_token('YES_NO', igs_fi_gen_gl.get_lkp_meaning('YES_NO', 'Y') );
7518: fnd_file.put_line (fnd_file.log, fnd_message.get);
7519: fnd_message.set_name('IGS', 'IGS_FI_CHG_ELE');
7514: IF (p_trace_on = 'Y') THEN
7515: fnd_file.new_line(fnd_file.log);
7516: fnd_message.set_name('IGS', 'IGS_FI_LOAD_INCURRED');
7517: fnd_message.set_token('YES_NO', igs_fi_gen_gl.get_lkp_meaning('YES_NO', 'Y') );
7518: fnd_file.put_line (fnd_file.log, fnd_message.get);
7519: fnd_message.set_name('IGS', 'IGS_FI_CHG_ELE');
7520: fnd_message.set_token('ELEMENTS', TO_CHAR(NVL(v_credit_points, 0)));
7521: fnd_file.put_line (fnd_file.log, fnd_message.get);
7522: END IF;
7517: fnd_message.set_token('YES_NO', igs_fi_gen_gl.get_lkp_meaning('YES_NO', 'Y') );
7518: fnd_file.put_line (fnd_file.log, fnd_message.get);
7519: fnd_message.set_name('IGS', 'IGS_FI_CHG_ELE');
7520: fnd_message.set_token('ELEMENTS', TO_CHAR(NVL(v_credit_points, 0)));
7521: fnd_file.put_line (fnd_file.log, fnd_message.get);
7522: END IF;
7523: END IF;
7524: END IF;
7525: END IF;
8343: v_message_name := 'IGS_GE_UNHANDLED_EXP';
8344: IF (p_trace_on = 'Y') THEN
8345: fnd_message.set_name('IGS', v_message_name);
8346: Fnd_Message.Set_Token('NAME','IGS_FI_PRC_FEE_ASS.FINPL_INIT_FEE_ASS_ITEM');
8347: fnd_file.put_line (fnd_file.log, fnd_message.get);
8348: END IF;
8349: RETURN FALSE;
8350: END finpl_init_fee_ass_item;
8351:
8398: || TO_CHAR(v_fcci_fss_rec.start_dt, 'DD/MM/YYYY') || ' '
8399: || TO_CHAR(v_fcci_fss_rec.end_dt, 'DD/MM/YYYY'));
8400: IF (p_trace_on = 'Y') THEN
8401: -- Trace Entry
8402: fnd_file.new_line(fnd_file.log);
8403: fnd_message.set_name('IGS', 'IGS_FI_FEE_CAL');
8404: fnd_message.set_token('CAL_TYPE', v_fcci_fss_rec.fee_cal_type);
8405: fnd_file.put_line (fnd_file.log, fnd_message.get);
8406: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'START_DT') || ': ' || TO_CHAR(v_fcci_fss_rec.start_dt, 'DD/MM/YYYY'));
8401: -- Trace Entry
8402: fnd_file.new_line(fnd_file.log);
8403: fnd_message.set_name('IGS', 'IGS_FI_FEE_CAL');
8404: fnd_message.set_token('CAL_TYPE', v_fcci_fss_rec.fee_cal_type);
8405: fnd_file.put_line (fnd_file.log, fnd_message.get);
8406: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'START_DT') || ': ' || TO_CHAR(v_fcci_fss_rec.start_dt, 'DD/MM/YYYY'));
8407: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'END_DT') || ': ' || TO_CHAR(v_fcci_fss_rec.end_dt, 'DD/MM/YYYY'));
8408: END IF;
8409:
8402: fnd_file.new_line(fnd_file.log);
8403: fnd_message.set_name('IGS', 'IGS_FI_FEE_CAL');
8404: fnd_message.set_token('CAL_TYPE', v_fcci_fss_rec.fee_cal_type);
8405: fnd_file.put_line (fnd_file.log, fnd_message.get);
8406: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'START_DT') || ': ' || TO_CHAR(v_fcci_fss_rec.start_dt, 'DD/MM/YYYY'));
8407: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'END_DT') || ': ' || TO_CHAR(v_fcci_fss_rec.end_dt, 'DD/MM/YYYY'));
8408: END IF;
8409:
8410: log_to_fnd( p_v_module => 'finpl_prc_fee_cat_fee_liab',
8403: fnd_message.set_name('IGS', 'IGS_FI_FEE_CAL');
8404: fnd_message.set_token('CAL_TYPE', v_fcci_fss_rec.fee_cal_type);
8405: fnd_file.put_line (fnd_file.log, fnd_message.get);
8406: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'START_DT') || ': ' || TO_CHAR(v_fcci_fss_rec.start_dt, 'DD/MM/YYYY'));
8407: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'END_DT') || ': ' || TO_CHAR(v_fcci_fss_rec.end_dt, 'DD/MM/YYYY'));
8408: END IF;
8409:
8410: log_to_fnd( p_v_module => 'finpl_prc_fee_cat_fee_liab',
8411: p_v_string => 'Loop Accross FCFLs..' );
8554: -- Log FCFL information.
8555: IF (p_trace_on = 'Y' AND v_fcflv_rec.source <> 'OLD') THEN
8556:
8557: IF (v_fcflv_rec.start_dt_alias IS NOT NULL) THEN
8558: fnd_file.new_line(fnd_file.log);
8559: OPEN c_daiv (
8560: v_fcflv_rec.start_dt_alias,
8561: v_fcflv_rec.start_dai_sequence_number,
8562: v_fcci_fss_rec.fee_cal_type,
8564: FETCH c_daiv INTO v_fcflv_start_dt;
8565: CLOSE c_daiv;
8566: fnd_message.set_name('IGS', 'IGS_FI_START_DATE_ALIAS');
8567: fnd_message.set_token('DT_ALIAS', v_fcflv_rec.start_dt_alias ||' ');
8568: fnd_file.put (fnd_file.log, fnd_message.get);
8569: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'START_DT') || ': ' || TO_CHAR(v_fcflv_start_dt, 'DD/MM/YYYY'));
8570: END IF;
8571: IF (v_fcflv_rec.end_dt_alias IS NOT NULL) THEN
8572: OPEN c_daiv (
8565: CLOSE c_daiv;
8566: fnd_message.set_name('IGS', 'IGS_FI_START_DATE_ALIAS');
8567: fnd_message.set_token('DT_ALIAS', v_fcflv_rec.start_dt_alias ||' ');
8568: fnd_file.put (fnd_file.log, fnd_message.get);
8569: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'START_DT') || ': ' || TO_CHAR(v_fcflv_start_dt, 'DD/MM/YYYY'));
8570: END IF;
8571: IF (v_fcflv_rec.end_dt_alias IS NOT NULL) THEN
8572: OPEN c_daiv (
8573: v_fcflv_rec.end_dt_alias,
8577: FETCH c_daiv INTO v_fcflv_end_dt;
8578: CLOSE c_daiv;
8579: fnd_message.set_name('IGS', 'IGS_FI_END_DATE_ALIAS');
8580: fnd_message.set_token('DT_ALIAS', v_fcflv_rec.end_dt_alias ||' ');
8581: fnd_file.put (fnd_file.log, fnd_message.get);
8582: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'END_DT') || ': ' || TO_CHAR(v_fcflv_end_dt, 'DD/MM/YYYY'));
8583: END IF;
8584:
8585: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'FEE_TYPE') || ': ' || v_fcflv_rec.fee_type);
8578: CLOSE c_daiv;
8579: fnd_message.set_name('IGS', 'IGS_FI_END_DATE_ALIAS');
8580: fnd_message.set_token('DT_ALIAS', v_fcflv_rec.end_dt_alias ||' ');
8581: fnd_file.put (fnd_file.log, fnd_message.get);
8582: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'END_DT') || ': ' || TO_CHAR(v_fcflv_end_dt, 'DD/MM/YYYY'));
8583: END IF;
8584:
8585: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'FEE_TYPE') || ': ' || v_fcflv_rec.fee_type);
8586: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'SYSTEM_FEE_TYPE') || ': ' || v_fcflv_rec.s_fee_type);
8581: fnd_file.put (fnd_file.log, fnd_message.get);
8582: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'END_DT') || ': ' || TO_CHAR(v_fcflv_end_dt, 'DD/MM/YYYY'));
8583: END IF;
8584:
8585: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'FEE_TYPE') || ': ' || v_fcflv_rec.fee_type);
8586: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'SYSTEM_FEE_TYPE') || ': ' || v_fcflv_rec.s_fee_type);
8587: fnd_message.set_name('IGS', 'IGS_FI_FEE_TYPE_TRG_CAT');
8588: fnd_message.set_token('S_FEE_TRIG', v_fcflv_rec.s_fee_trigger_cat);
8589: fnd_file.put_line (fnd_file.log, fnd_message.get);
8582: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'END_DT') || ': ' || TO_CHAR(v_fcflv_end_dt, 'DD/MM/YYYY'));
8583: END IF;
8584:
8585: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'FEE_TYPE') || ': ' || v_fcflv_rec.fee_type);
8586: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'SYSTEM_FEE_TYPE') || ': ' || v_fcflv_rec.s_fee_type);
8587: fnd_message.set_name('IGS', 'IGS_FI_FEE_TYPE_TRG_CAT');
8588: fnd_message.set_token('S_FEE_TRIG', v_fcflv_rec.s_fee_trigger_cat);
8589: fnd_file.put_line (fnd_file.log, fnd_message.get);
8590:
8585: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'FEE_TYPE') || ': ' || v_fcflv_rec.fee_type);
8586: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'SYSTEM_FEE_TYPE') || ': ' || v_fcflv_rec.s_fee_type);
8587: fnd_message.set_name('IGS', 'IGS_FI_FEE_TYPE_TRG_CAT');
8588: fnd_message.set_token('S_FEE_TRIG', v_fcflv_rec.s_fee_trigger_cat);
8589: fnd_file.put_line (fnd_file.log, fnd_message.get);
8590:
8591: fnd_message.set_name('IGS', 'IGS_FI_CHG_METH_TYPE');
8592: fnd_message.set_token('CHG_MTHD', igs_fi_gen_gl.get_lkp_meaning('CHG_METHOD', v_fcflv_rec.s_chg_method_type));
8593: fnd_file.put_line (fnd_file.log, fnd_message.get);
8589: fnd_file.put_line (fnd_file.log, fnd_message.get);
8590:
8591: fnd_message.set_name('IGS', 'IGS_FI_CHG_METH_TYPE');
8592: fnd_message.set_token('CHG_MTHD', igs_fi_gen_gl.get_lkp_meaning('CHG_METHOD', v_fcflv_rec.s_chg_method_type));
8593: fnd_file.put_line (fnd_file.log, fnd_message.get);
8594: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'RULE_SEQ') || ': ' || TO_CHAR(v_fcflv_rec.rul_sequence_number));
8595: IF (v_fcflv_rec.scope_rul_sequence_num IS NOT NULL) THEN
8596: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'SEL_CRI_RULE') || ': ' || TO_CHAR(v_fcflv_rec.scope_rul_sequence_num));
8597: END IF;
8590:
8591: fnd_message.set_name('IGS', 'IGS_FI_CHG_METH_TYPE');
8592: fnd_message.set_token('CHG_MTHD', igs_fi_gen_gl.get_lkp_meaning('CHG_METHOD', v_fcflv_rec.s_chg_method_type));
8593: fnd_file.put_line (fnd_file.log, fnd_message.get);
8594: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'RULE_SEQ') || ': ' || TO_CHAR(v_fcflv_rec.rul_sequence_number));
8595: IF (v_fcflv_rec.scope_rul_sequence_num IS NOT NULL) THEN
8596: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'SEL_CRI_RULE') || ': ' || TO_CHAR(v_fcflv_rec.scope_rul_sequence_num));
8597: END IF;
8598: IF (v_fcflv_rec.elm_rng_order_name IS NOT NULL) THEN
8592: fnd_message.set_token('CHG_MTHD', igs_fi_gen_gl.get_lkp_meaning('CHG_METHOD', v_fcflv_rec.s_chg_method_type));
8593: fnd_file.put_line (fnd_file.log, fnd_message.get);
8594: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'RULE_SEQ') || ': ' || TO_CHAR(v_fcflv_rec.rul_sequence_number));
8595: IF (v_fcflv_rec.scope_rul_sequence_num IS NOT NULL) THEN
8596: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'SEL_CRI_RULE') || ': ' || TO_CHAR(v_fcflv_rec.scope_rul_sequence_num));
8597: END IF;
8598: IF (v_fcflv_rec.elm_rng_order_name IS NOT NULL) THEN
8599: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'ELM_RNG_ORDER') || ': ' || v_fcflv_rec.elm_rng_order_name);
8600: END IF;
8595: IF (v_fcflv_rec.scope_rul_sequence_num IS NOT NULL) THEN
8596: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'SEL_CRI_RULE') || ': ' || TO_CHAR(v_fcflv_rec.scope_rul_sequence_num));
8597: END IF;
8598: IF (v_fcflv_rec.elm_rng_order_name IS NOT NULL) THEN
8599: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'ELM_RNG_ORDER') || ': ' || v_fcflv_rec.elm_rng_order_name);
8600: END IF;
8601: IF (v_fcflv_rec.max_chg_elements IS NOT NULL) THEN
8602: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'MAX_CHG_ELM') || ': ' || TO_CHAR(v_fcflv_rec.max_chg_elements));
8603: END IF;
8598: IF (v_fcflv_rec.elm_rng_order_name IS NOT NULL) THEN
8599: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'ELM_RNG_ORDER') || ': ' || v_fcflv_rec.elm_rng_order_name);
8600: END IF;
8601: IF (v_fcflv_rec.max_chg_elements IS NOT NULL) THEN
8602: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'MAX_CHG_ELM') || ': ' || TO_CHAR(v_fcflv_rec.max_chg_elements));
8603: END IF;
8604: END IF;
8605: END IF; /* v_next_fcfl_flag = FALSE */
8606:
8609: AND g_c_predictive_ind = 'Y'
8610: AND v_fcflv_rec.s_fee_type = g_v_audit THEN
8611: IF (p_trace_on = 'Y' AND v_fcflv_rec.source <> 'OLD') THEN
8612: fnd_message.set_name ( 'IGS', 'IGS_FI_PRED_MODE_NO_AUDIT_FEE');
8613: fnd_file.put_line (fnd_file.log, fnd_message.get);
8614: END IF;
8615: log_to_fnd( p_v_module => 'finpl_prc_fee_cat_fee_liab',
8616: p_v_string => 'Predictive: Audit Fees can not be assessed. Proceeding with next FCFL.' );
8617: v_next_fcfl_flag := TRUE;
8628: IF (v_fcflv_rec.s_chg_method_type = gcst_perunit) THEN
8629: -- a PER UNIT charge method cannot be carried out in predictive assessment
8630: IF (p_trace_on = 'Y' AND v_fcflv_rec.source <> 'OLD') THEN
8631: fnd_message.set_name ( 'IGS', 'IGS_FI_PREDASS_PERUNIT_CHGMTH');
8632: fnd_file.put_line (fnd_file.log, fnd_message.get);
8633: END IF;
8634: log_to_fnd( p_v_module => 'finpl_prc_fee_cat_fee_liab',
8635: p_v_string => 'PER UNIT Chg Mthd can not be processed in Predictive. Proceed to next FCFL.' );
8636: v_next_fcfl_flag := TRUE;
8658: IF (v_fcflv_rec.s_fee_structure_status = gcst_planned) THEN
8659: v_message_name := 'IGS_FI_FEELIAB_STATU_PLANNED';
8660: IF (p_trace_on = 'Y' AND v_fcflv_rec.source <> 'OLD') THEN
8661: fnd_message.set_name ( 'IGS', v_message_name);
8662: fnd_file.put_line (fnd_file.log, fnd_message.get);
8663: END IF;
8664: log_to_fnd( p_v_module => 'finpl_prc_fee_cat_fee_liab',
8665: p_v_string => 'FCFL Status is Planned. So Proceed with next FCFL.' );
8666: v_next_fcfl_flag := TRUE;
8672: v_message_name := 'IGS_FI_FEELIAB_STATU_INACTIVE';
8673: IF (p_trace_on = 'Y' AND v_fcflv_rec.source <> 'OLD') THEN
8674: -- Trace entry
8675: fnd_message.set_name ( 'IGS', v_message_name);
8676: fnd_file.put_line (fnd_file.log, fnd_message.get);
8677: END IF;
8678:
8679: v_fee_assessment := 0;
8680: v_charge_rate := 0;
8720: IF v_fcci_fss_rec.end_dt_alias <> v_fcflv_rec.end_dt_alias
8721: OR v_fcci_fss_rec.end_dai_sequence_number <> v_fcflv_rec.end_dai_sequence_number THEN
8722: IF (TRUNC(SYSDATE) > TRUNC(v_fcflv_end_dt)) THEN
8723: IF (p_trace_on = 'Y') THEN
8724: fnd_file.new_line(fnd_file.log);
8725: fnd_message.set_name('IGS','IGS_ST_PROC_NEXT_FEE_CAT_CAL');
8726: fnd_file.put_line (fnd_file.log, fnd_message.get);
8727: END IF;
8728: log_to_fnd( p_v_module => 'finpl_prc_fee_cat_fee_liab',
8722: IF (TRUNC(SYSDATE) > TRUNC(v_fcflv_end_dt)) THEN
8723: IF (p_trace_on = 'Y') THEN
8724: fnd_file.new_line(fnd_file.log);
8725: fnd_message.set_name('IGS','IGS_ST_PROC_NEXT_FEE_CAT_CAL');
8726: fnd_file.put_line (fnd_file.log, fnd_message.get);
8727: END IF;
8728: log_to_fnd( p_v_module => 'finpl_prc_fee_cat_fee_liab',
8729: p_v_string => 'Today is past the fee assessment processing period. Processing next fee category calendar instance.' );
8730: v_next_fcfl_flag := TRUE;
8742: v_fee_assessment := 0;
8743: v_charge_rate := 0;
8744: IF (p_trace_on = 'Y') THEN
8745: -- Trace Entry
8746: fnd_file.new_line(fnd_file.log);
8747: fnd_message.set_name('IGS','IGS_FI_ST_DT_ASS_AMT');
8748: fnd_message.set_token('OLD_AMT', TO_CHAR(v_fee_assessment) );
8749: fnd_file.put_line (fnd_file.log, fnd_message.get);
8750: END IF;
8745: -- Trace Entry
8746: fnd_file.new_line(fnd_file.log);
8747: fnd_message.set_name('IGS','IGS_FI_ST_DT_ASS_AMT');
8748: fnd_message.set_token('OLD_AMT', TO_CHAR(v_fee_assessment) );
8749: fnd_file.put_line (fnd_file.log, fnd_message.get);
8750: END IF;
8751:
8752: log_to_fnd( p_v_module => 'finpl_prc_fee_cat_fee_liab',
8753: p_v_string => 'Effective Date does not fall within FCFL start date and end date. Calling finpl_ins_fee_ass with Assessment amount as 0.' );
8792: IF (p_trace_on = 'Y') THEN
8793: fnd_message.set_name('IGS','IGS_FI_PRED_PAST_TERM');
8794: fnd_message.set_token('DT_ALIAS', v_fcflv_rec.start_dt_alias );
8795: fnd_message.set_token('ALT_CD', g_v_fee_alt_code );
8796: fnd_file.put_line (fnd_file.log, fnd_message.get);
8797: END IF;
8798: log_to_fnd( p_v_module => 'finpl_prc_fee_cat_fee_liab',
8799: p_v_string => 'FCFL Start Date is greater than SYSDATE. Proceed to next FCFL.' );
8800: v_next_fcfl_flag := TRUE;
8838: log_to_fnd( p_v_module => 'finpl_prc_fee_cat_fee_liab',
8839: p_v_string => 'Trigger Fired: ' || v_trigger_fired );
8840: IF (v_trigger_fired = 'INSTITUTN') THEN
8841: IF (p_trace_on = 'Y') THEN
8842: fnd_file.new_line(fnd_file.log);
8843: fnd_message.set_name ( 'IGS', 'IGS_FI_FEETRGCAT_INSTITUTN');
8844: fnd_file.put_line (fnd_file.log, fnd_message.get);
8845: END IF;
8846: ELSIF (v_trigger_fired = 'CTFT') THEN
8840: IF (v_trigger_fired = 'INSTITUTN') THEN
8841: IF (p_trace_on = 'Y') THEN
8842: fnd_file.new_line(fnd_file.log);
8843: fnd_message.set_name ( 'IGS', 'IGS_FI_FEETRGCAT_INSTITUTN');
8844: fnd_file.put_line (fnd_file.log, fnd_message.get);
8845: END IF;
8846: ELSIF (v_trigger_fired = 'CTFT') THEN
8847: IF (p_trace_on = 'Y') THEN
8848: fnd_file.new_line(fnd_file.log);
8844: fnd_file.put_line (fnd_file.log, fnd_message.get);
8845: END IF;
8846: ELSIF (v_trigger_fired = 'CTFT') THEN
8847: IF (p_trace_on = 'Y') THEN
8848: fnd_file.new_line(fnd_file.log);
8849: fnd_message.set_name ( 'IGS', 'IGS_FI_PRGTYPE_FEETRG_MATCHES');
8850: fnd_file.put_line (fnd_file.log, fnd_message.get);
8851: END IF;
8852: ELSIF (v_trigger_fired = 'CGFT') THEN
8846: ELSIF (v_trigger_fired = 'CTFT') THEN
8847: IF (p_trace_on = 'Y') THEN
8848: fnd_file.new_line(fnd_file.log);
8849: fnd_message.set_name ( 'IGS', 'IGS_FI_PRGTYPE_FEETRG_MATCHES');
8850: fnd_file.put_line (fnd_file.log, fnd_message.get);
8851: END IF;
8852: ELSIF (v_trigger_fired = 'CGFT') THEN
8853: IF (p_trace_on = 'Y') THEN
8854: fnd_file.new_line(fnd_file.log);
8850: fnd_file.put_line (fnd_file.log, fnd_message.get);
8851: END IF;
8852: ELSIF (v_trigger_fired = 'CGFT') THEN
8853: IF (p_trace_on = 'Y') THEN
8854: fnd_file.new_line(fnd_file.log);
8855: fnd_message.set_name ( 'IGS', 'IGS_FI_PRGGRP_FEETRG_PRGATT');
8856: fnd_file.put_line (fnd_file.log, fnd_message.get);
8857: END IF;
8858: ELSIF (v_trigger_fired = 'CFT') THEN
8852: ELSIF (v_trigger_fired = 'CGFT') THEN
8853: IF (p_trace_on = 'Y') THEN
8854: fnd_file.new_line(fnd_file.log);
8855: fnd_message.set_name ( 'IGS', 'IGS_FI_PRGGRP_FEETRG_PRGATT');
8856: fnd_file.put_line (fnd_file.log, fnd_message.get);
8857: END IF;
8858: ELSIF (v_trigger_fired = 'CFT') THEN
8859: IF (p_trace_on = 'Y') THEN
8860: fnd_file.new_line(fnd_file.log);
8856: fnd_file.put_line (fnd_file.log, fnd_message.get);
8857: END IF;
8858: ELSIF (v_trigger_fired = 'CFT') THEN
8859: IF (p_trace_on = 'Y') THEN
8860: fnd_file.new_line(fnd_file.log);
8861: fnd_message.set_name ( 'IGS', 'IGS_FI_PRGFEE_TRGATTRIB_MATCH');
8862: fnd_file.put_line (fnd_file.log, fnd_message.get);
8863: END IF;
8864: ELSIF (v_trigger_fired = 'UFT') THEN
8858: ELSIF (v_trigger_fired = 'CFT') THEN
8859: IF (p_trace_on = 'Y') THEN
8860: fnd_file.new_line(fnd_file.log);
8861: fnd_message.set_name ( 'IGS', 'IGS_FI_PRGFEE_TRGATTRIB_MATCH');
8862: fnd_file.put_line (fnd_file.log, fnd_message.get);
8863: END IF;
8864: ELSIF (v_trigger_fired = 'UFT') THEN
8865: IF (p_trace_on = 'Y') THEN
8866: fnd_file.new_line(fnd_file.log);
8862: fnd_file.put_line (fnd_file.log, fnd_message.get);
8863: END IF;
8864: ELSIF (v_trigger_fired = 'UFT') THEN
8865: IF (p_trace_on = 'Y') THEN
8866: fnd_file.new_line(fnd_file.log);
8867: fnd_message.set_name ( 'IGS', 'IGS_FI_UNIT_FEETRG_ATTRIB');
8868: fnd_file.put_line (fnd_file.log, fnd_message.get);
8869: END IF;
8870: ELSIF (v_trigger_fired = 'USFT') THEN
8864: ELSIF (v_trigger_fired = 'UFT') THEN
8865: IF (p_trace_on = 'Y') THEN
8866: fnd_file.new_line(fnd_file.log);
8867: fnd_message.set_name ( 'IGS', 'IGS_FI_UNIT_FEETRG_ATTRIB');
8868: fnd_file.put_line (fnd_file.log, fnd_message.get);
8869: END IF;
8870: ELSIF (v_trigger_fired = 'USFT') THEN
8871: IF (p_trace_on = 'Y') THEN
8872: fnd_file.new_line(fnd_file.log);
8868: fnd_file.put_line (fnd_file.log, fnd_message.get);
8869: END IF;
8870: ELSIF (v_trigger_fired = 'USFT') THEN
8871: IF (p_trace_on = 'Y') THEN
8872: fnd_file.new_line(fnd_file.log);
8873: fnd_message.set_name ( 'IGS', 'IGS_FI_UNIT_SET_FEETRG_ATTRIB');
8874: fnd_file.put_line (fnd_file.log, fnd_message.get);
8875: END IF;
8876: ELSIF (v_trigger_fired = 'AUDIT') THEN
8870: ELSIF (v_trigger_fired = 'USFT') THEN
8871: IF (p_trace_on = 'Y') THEN
8872: fnd_file.new_line(fnd_file.log);
8873: fnd_message.set_name ( 'IGS', 'IGS_FI_UNIT_SET_FEETRG_ATTRIB');
8874: fnd_file.put_line (fnd_file.log, fnd_message.get);
8875: END IF;
8876: ELSIF (v_trigger_fired = 'AUDIT') THEN
8877: IF (p_trace_on = 'Y') THEN
8878: fnd_file.new_line(fnd_file.log);
8874: fnd_file.put_line (fnd_file.log, fnd_message.get);
8875: END IF;
8876: ELSIF (v_trigger_fired = 'AUDIT') THEN
8877: IF (p_trace_on = 'Y') THEN
8878: fnd_file.new_line(fnd_file.log);
8879: fnd_message.set_name ( 'IGS', 'IGS_FI_AUD_FEE_TRIG_FIRED');
8880: fnd_file.put_line (fnd_file.log, fnd_message.get);
8881: END IF;
8882: ELSIF (v_trigger_fired = 'COMPOSITE') THEN
8876: ELSIF (v_trigger_fired = 'AUDIT') THEN
8877: IF (p_trace_on = 'Y') THEN
8878: fnd_file.new_line(fnd_file.log);
8879: fnd_message.set_name ( 'IGS', 'IGS_FI_AUD_FEE_TRIG_FIRED');
8880: fnd_file.put_line (fnd_file.log, fnd_message.get);
8881: END IF;
8882: ELSIF (v_trigger_fired = 'COMPOSITE') THEN
8883: IF (p_trace_on = 'Y') THEN
8884: fnd_file.new_line(fnd_file.log);
8880: fnd_file.put_line (fnd_file.log, fnd_message.get);
8881: END IF;
8882: ELSIF (v_trigger_fired = 'COMPOSITE') THEN
8883: IF (p_trace_on = 'Y') THEN
8884: fnd_file.new_line(fnd_file.log);
8885: fnd_message.set_name ( 'IGS', 'IGS_FI_FEETRG_GRP_MEMBER');
8886: fnd_file.put_line (fnd_file.log, fnd_message.get);
8887: END IF;
8888:
8882: ELSIF (v_trigger_fired = 'COMPOSITE') THEN
8883: IF (p_trace_on = 'Y') THEN
8884: fnd_file.new_line(fnd_file.log);
8885: fnd_message.set_name ( 'IGS', 'IGS_FI_FEETRG_GRP_MEMBER');
8886: fnd_file.put_line (fnd_file.log, fnd_message.get);
8887: END IF;
8888:
8889: END IF;
8890: ELSE -- Trigger did not fire
8893: v_message_name := 'IGS_FI_TRG_DID_NOT_FIRE';
8894: IF (p_trace_on = 'Y') THEN
8895: -- Trace Entry
8896: fnd_message.set_name ( 'IGS', v_message_name);
8897: fnd_file.put_line (fnd_file.log, fnd_message.get);
8898: fnd_file.new_line(fnd_file.log);
8899: fnd_message.set_name('IGS','IGS_FI_ASS_AMT');
8900: fnd_message.set_token('AMOUNT',TO_CHAR(v_fee_assessment) );
8901: fnd_file.put_line (fnd_file.log, fnd_message.get);
8894: IF (p_trace_on = 'Y') THEN
8895: -- Trace Entry
8896: fnd_message.set_name ( 'IGS', v_message_name);
8897: fnd_file.put_line (fnd_file.log, fnd_message.get);
8898: fnd_file.new_line(fnd_file.log);
8899: fnd_message.set_name('IGS','IGS_FI_ASS_AMT');
8900: fnd_message.set_token('AMOUNT',TO_CHAR(v_fee_assessment) );
8901: fnd_file.put_line (fnd_file.log, fnd_message.get);
8902: END IF;
8897: fnd_file.put_line (fnd_file.log, fnd_message.get);
8898: fnd_file.new_line(fnd_file.log);
8899: fnd_message.set_name('IGS','IGS_FI_ASS_AMT');
8900: fnd_message.set_token('AMOUNT',TO_CHAR(v_fee_assessment) );
8901: fnd_file.put_line (fnd_file.log, fnd_message.get);
8902: END IF;
8903:
8904: log_to_fnd( p_v_module => 'finpl_prc_fee_cat_fee_liab',
8905: p_v_string => 'Trigger Not fired. Call finpl_ins_fee_ass with assessment amount 0.');
8972: IF (v_next_fcfl_flag = FALSE) THEN
8973: IF (v_charge_elements > 0) THEN
8974: -- Perform 2.3 Calculate Assessment Amount
8975: IF (p_trace_on = 'Y') THEN
8976: fnd_file.new_line(fnd_file.log);
8977: fnd_message.set_name('IGS','IGS_FI_CHRG_METHOD_ELEMENTS');
8978: fnd_message.set_token('CHG_ELM',TO_CHAR(v_charge_elements) );
8979: fnd_file.put_line (fnd_file.log, fnd_message.get);
8980: END IF;
8975: IF (p_trace_on = 'Y') THEN
8976: fnd_file.new_line(fnd_file.log);
8977: fnd_message.set_name('IGS','IGS_FI_CHRG_METHOD_ELEMENTS');
8978: fnd_message.set_token('CHG_ELM',TO_CHAR(v_charge_elements) );
8979: fnd_file.put_line (fnd_file.log, fnd_message.get);
8980: END IF;
8981: log_to_fnd( p_v_module => 'finpl_prc_fee_cat_fee_liab',
8982: p_v_string => 'Calling finp_clc_ass_amnt..');
8983: IF (finp_clc_ass_amnt(
9017: v_fee_assessment := 0;
9018: v_charge_rate := 0;
9019: IF (p_trace_on = 'Y') THEN
9020: fnd_message.set_name ( 'IGS', 'IGS_FI_NO_CHARGE_ELEMENTS');
9021: fnd_file.put_line (fnd_file.log, fnd_message.get);
9022: fnd_file.new_line(fnd_file.log);
9023: fnd_message.set_name('IGS', 'IGS_FI_ASS_AMT');
9024: fnd_message.set_token('AMOUNT', TO_CHAR(v_fee_assessment) );
9025: fnd_file.put_line (fnd_file.log, fnd_message.get);
9018: v_charge_rate := 0;
9019: IF (p_trace_on = 'Y') THEN
9020: fnd_message.set_name ( 'IGS', 'IGS_FI_NO_CHARGE_ELEMENTS');
9021: fnd_file.put_line (fnd_file.log, fnd_message.get);
9022: fnd_file.new_line(fnd_file.log);
9023: fnd_message.set_name('IGS', 'IGS_FI_ASS_AMT');
9024: fnd_message.set_token('AMOUNT', TO_CHAR(v_fee_assessment) );
9025: fnd_file.put_line (fnd_file.log, fnd_message.get);
9026: END IF;
9021: fnd_file.put_line (fnd_file.log, fnd_message.get);
9022: fnd_file.new_line(fnd_file.log);
9023: fnd_message.set_name('IGS', 'IGS_FI_ASS_AMT');
9024: fnd_message.set_token('AMOUNT', TO_CHAR(v_fee_assessment) );
9025: fnd_file.put_line (fnd_file.log, fnd_message.get);
9026: END IF;
9027:
9028: END IF; /* v_charge_elements > 0 */
9029: END IF;
9097: IF (v_fcfl_found = FALSE) THEN
9098: v_message_name := 'IGS_FI_NOACTIVE_FEECAT_FEE_LI';
9099: IF (p_trace_on = 'Y') THEN
9100: fnd_message.set_name ( 'IGS', v_message_name);
9101: fnd_file.put_line (fnd_file.log, fnd_message.get);
9102: END IF;
9103: log_to_fnd( p_v_module => 'finpl_prc_fee_cat_fee_liab',
9104: p_v_string => 'No Active FCFL found. Ending the processing. ' || v_message_name );
9105: END IF;
9107:
9108: -- Log a message if no Active FCCI records exist.
9109: IF (v_fcci_found = FALSE) THEN
9110: IF (p_trace_on = 'Y') THEN
9111: fnd_file.new_line(fnd_file.log);
9112: fnd_message.set_name ( 'IGS', 'IGS_FI_NOACTIVE_FEECATCAL_INS');
9113: fnd_file.put_line (fnd_file.log, fnd_message.get);
9114: END IF;
9115: log_to_fnd( p_v_module => 'finpl_prc_fee_cat_fee_liab',
9109: IF (v_fcci_found = FALSE) THEN
9110: IF (p_trace_on = 'Y') THEN
9111: fnd_file.new_line(fnd_file.log);
9112: fnd_message.set_name ( 'IGS', 'IGS_FI_NOACTIVE_FEECATCAL_INS');
9113: fnd_file.put_line (fnd_file.log, fnd_message.get);
9114: END IF;
9115: log_to_fnd( p_v_module => 'finpl_prc_fee_cat_fee_liab',
9116: p_v_string => 'No Active FCCI found. Ending the processing. IGS_FI_NOACTIVE_FEECATCAL_INS' );
9117: END IF;
9487: OR current_rec.adm_sequence_number IS NULL THEN
9488: IF current_rec.crs_attempt_status = 'UNCONFIRM' THEN
9489: IF p_v_trace_on = 'Y' THEN
9490: fnd_message.set_name ( 'IGS', 'IGS_FI_PRED_NO_START_DATE');
9491: fnd_file.put_line (fnd_file.log, fnd_message.get);
9492: END IF;
9493: log_to_fnd( p_v_module => 'validate_prog_att',
9494: p_v_string => 'Return False with message: IGS_FI_PRED_NO_START_DATE' );
9495: RETURN FALSE;
9498: IF current_rec.crs_commence_dt > g_d_ld_census_val THEN
9499: IF p_v_trace_on = 'Y' THEN
9500: fnd_message.set_name('IGS', 'IGS_FI_PRED_STRTDT_EARLY_CNSDT');
9501: fnd_message.set_token('ALT_CD', g_v_load_alt_code);
9502: fnd_file.put_line (fnd_file.log, fnd_message.get);
9503: END IF;
9504: log_to_fnd( p_v_module => 'validate_prog_att',
9505: p_v_string => 'Return False with message: IGS_FI_PRED_STRTDT_EARLY_CNSDT' );
9506: RETURN FALSE;
9529: -- Go to 'Admission Calendar Instance Validation' below
9530: ELSE
9531: IF p_v_trace_on = 'Y' THEN
9532: fnd_message.set_name ( 'IGS', 'IGS_FI_PRED_STATUS_NO_ACCEPTED');
9533: fnd_file.put_line (fnd_file.log, fnd_message.get);
9534: END IF;
9535: log_to_fnd( p_v_module => 'validate_prog_att',
9536: p_v_string => 'Returning False with message: IGS_FI_PRED_STATUS_NO_ACCEPTED' );
9537: RETURN FALSE;
9542: -- Go to 'Admission Calendar Instance Validation' below
9543: ELSE
9544: IF p_v_trace_on = 'Y' THEN
9545: fnd_message.set_name ( 'IGS', 'IGS_FI_PRED_STATUS_NOT_PENDING');
9546: fnd_file.put_line (fnd_file.log, fnd_message.get);
9547: END IF;
9548: log_to_fnd( p_v_module => 'validate_prog_att',
9549: p_v_string => 'Returning False with message: IGS_FI_PRED_STATUS_NOT_PENDING' );
9550: RETURN FALSE;
9572: IF rec_sub_adm_cal.sub_cal_type IS NULL OR rec_sub_adm_cal.sub_ci_sequence_number IS NULL THEN
9573: IF p_v_trace_on = 'Y' THEN
9574: fnd_message.set_name( 'IGS', 'IGS_FI_NO_ADM_LD_RELN_EXISTS' );
9575: fnd_message.set_token('ADM_ALT_CD', l_v_adm_alt_code);
9576: fnd_file.put_line (fnd_file.log, fnd_message.get);
9577: END IF;
9578: log_to_fnd( p_v_module => 'validate_prog_att',
9579: p_v_string => 'Returning False with message: IGS_FI_NO_ADM_LD_RELN_EXISTS' );
9580: RETURN FALSE;
9607: fnd_message.set_name( 'IGS', 'IGS_FI_PRED_FEE_LP_ERLY_ADM_LP' );
9608: fnd_message.set_token('LC1_ALT_CD', l_v_adm_load_alt_code);
9609: fnd_message.set_token('ALT_CD', l_v_adm_alt_code);
9610: fnd_message.set_token('LC2_ALT_CD', g_v_load_alt_code);
9611: fnd_file.put_line (fnd_file.log, fnd_message.get);
9612: END IF;
9613: log_to_fnd( p_v_module => 'validate_prog_att',
9614: p_v_string => 'Returning False with message: IGS_FI_PRED_FEE_LP_ERLY_ADM_LP' );
9615: RETURN FALSE;
9631: fnd_message.set_name( 'IGS', 'IGS_FI_PRED_LOAD_PRDS_NOTSAME' );
9632: fnd_message.set_token('LC1_ALT_CD', l_v_adm_load_alt_code);
9633: fnd_message.set_token('ALT_CD', l_v_adm_alt_code);
9634: fnd_message.set_token('LC2_ALT_CD', g_v_load_alt_code);
9635: fnd_file.put_line (fnd_file.log, fnd_message.get);
9636: END IF;
9637: log_to_fnd( p_v_module => 'validate_prog_att',
9638: p_v_string => 'Returning False with message: IGS_FI_PRED_LOAD_PRDS_NOTSAME' );
9639: RETURN FALSE;
9671: -- Check if derived course completion date is less than Census Date Alias
9672: IF l_d_crs_cmpl_dt < g_d_ld_census_val THEN
9673: IF p_v_trace_on = 'Y' THEN
9674: fnd_message.set_name ( 'IGS', 'IGS_FI_CRS_END_DT_LT_CNS_DT');
9675: fnd_file.put_line (fnd_file.log, fnd_message.get);
9676: END IF;
9677: log_to_fnd( p_v_module => 'validate_prog_att',
9678: p_v_string => 'Returning False with message: IGS_FI_CRS_END_DT_LT_CNS_DT' );
9679: RETURN FALSE;
9847:
9848: IF l_predictive_progs_tbl.COUNT > 0 THEN
9849: log_to_fnd( p_v_module => 'finpl_prc_predictive_scas',
9850: p_v_string => 'There are records in PL/SQL Table. Process each Program Att found.');
9851: fnd_file.new_line(fnd_file.log);
9852: FOR l_n_cntr IN l_predictive_progs_tbl.FIRST..l_predictive_progs_tbl.LAST LOOP
9853: IF l_predictive_progs_tbl.EXISTS(l_n_cntr) THEN
9854:
9855: IF (p_trace_on = 'Y') THEN
9855: IF (p_trace_on = 'Y') THEN
9856: fnd_message.set_name ( 'IGS', 'IGS_FI_MAJOR_PRGLOC_USED');
9857: fnd_message.set_token('PROG', l_predictive_progs_tbl(l_n_cntr).program_cd);
9858: fnd_message.set_token('VER', TO_CHAR(l_predictive_progs_tbl(l_n_cntr).program_version));
9859: fnd_file.put_line (fnd_file.log, fnd_message.get);
9860: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'STATUS') || ': ' || l_predictive_progs_tbl(l_n_cntr).crs_attempt_status);
9861: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'START_DT') || ': ' || TO_CHAR(l_predictive_progs_tbl(l_n_cntr).crs_commence_dt, 'DD/MM/YYYY'));
9862: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'FEE_CAT') || ': ' || l_predictive_progs_tbl(l_n_cntr).fee_cat);
9863: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_ACCT_ENTITIES', 'LOC') || ': ' || l_predictive_progs_tbl(l_n_cntr).location_cd);
9856: fnd_message.set_name ( 'IGS', 'IGS_FI_MAJOR_PRGLOC_USED');
9857: fnd_message.set_token('PROG', l_predictive_progs_tbl(l_n_cntr).program_cd);
9858: fnd_message.set_token('VER', TO_CHAR(l_predictive_progs_tbl(l_n_cntr).program_version));
9859: fnd_file.put_line (fnd_file.log, fnd_message.get);
9860: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'STATUS') || ': ' || l_predictive_progs_tbl(l_n_cntr).crs_attempt_status);
9861: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'START_DT') || ': ' || TO_CHAR(l_predictive_progs_tbl(l_n_cntr).crs_commence_dt, 'DD/MM/YYYY'));
9862: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'FEE_CAT') || ': ' || l_predictive_progs_tbl(l_n_cntr).fee_cat);
9863: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_ACCT_ENTITIES', 'LOC') || ': ' || l_predictive_progs_tbl(l_n_cntr).location_cd);
9864: fnd_message.set_name ( 'IGS', 'IGS_FI_DER_ATT_TYPE_GOVT_MODE');
9857: fnd_message.set_token('PROG', l_predictive_progs_tbl(l_n_cntr).program_cd);
9858: fnd_message.set_token('VER', TO_CHAR(l_predictive_progs_tbl(l_n_cntr).program_version));
9859: fnd_file.put_line (fnd_file.log, fnd_message.get);
9860: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'STATUS') || ': ' || l_predictive_progs_tbl(l_n_cntr).crs_attempt_status);
9861: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'START_DT') || ': ' || TO_CHAR(l_predictive_progs_tbl(l_n_cntr).crs_commence_dt, 'DD/MM/YYYY'));
9862: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'FEE_CAT') || ': ' || l_predictive_progs_tbl(l_n_cntr).fee_cat);
9863: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_ACCT_ENTITIES', 'LOC') || ': ' || l_predictive_progs_tbl(l_n_cntr).location_cd);
9864: fnd_message.set_name ( 'IGS', 'IGS_FI_DER_ATT_TYPE_GOVT_MODE');
9865: fnd_message.set_token('ATT_MODE', l_predictive_progs_tbl(l_n_cntr).att_mode);
9858: fnd_message.set_token('VER', TO_CHAR(l_predictive_progs_tbl(l_n_cntr).program_version));
9859: fnd_file.put_line (fnd_file.log, fnd_message.get);
9860: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'STATUS') || ': ' || l_predictive_progs_tbl(l_n_cntr).crs_attempt_status);
9861: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'START_DT') || ': ' || TO_CHAR(l_predictive_progs_tbl(l_n_cntr).crs_commence_dt, 'DD/MM/YYYY'));
9862: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'FEE_CAT') || ': ' || l_predictive_progs_tbl(l_n_cntr).fee_cat);
9863: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_ACCT_ENTITIES', 'LOC') || ': ' || l_predictive_progs_tbl(l_n_cntr).location_cd);
9864: fnd_message.set_name ( 'IGS', 'IGS_FI_DER_ATT_TYPE_GOVT_MODE');
9865: fnd_message.set_token('ATT_MODE', l_predictive_progs_tbl(l_n_cntr).att_mode);
9866: fnd_file.put_line (fnd_file.log, fnd_message.get);
9859: fnd_file.put_line (fnd_file.log, fnd_message.get);
9860: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'STATUS') || ': ' || l_predictive_progs_tbl(l_n_cntr).crs_attempt_status);
9861: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'START_DT') || ': ' || TO_CHAR(l_predictive_progs_tbl(l_n_cntr).crs_commence_dt, 'DD/MM/YYYY'));
9862: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'FEE_CAT') || ': ' || l_predictive_progs_tbl(l_n_cntr).fee_cat);
9863: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_ACCT_ENTITIES', 'LOC') || ': ' || l_predictive_progs_tbl(l_n_cntr).location_cd);
9864: fnd_message.set_name ( 'IGS', 'IGS_FI_DER_ATT_TYPE_GOVT_MODE');
9865: fnd_message.set_token('ATT_MODE', l_predictive_progs_tbl(l_n_cntr).att_mode);
9866: fnd_file.put_line (fnd_file.log, fnd_message.get);
9867: fnd_message.set_name ( 'IGS', 'IGS_FI_ATTTYPE_GOVT_ATTMODE');
9862: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'FEE_CAT') || ': ' || l_predictive_progs_tbl(l_n_cntr).fee_cat);
9863: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_ACCT_ENTITIES', 'LOC') || ': ' || l_predictive_progs_tbl(l_n_cntr).location_cd);
9864: fnd_message.set_name ( 'IGS', 'IGS_FI_DER_ATT_TYPE_GOVT_MODE');
9865: fnd_message.set_token('ATT_MODE', l_predictive_progs_tbl(l_n_cntr).att_mode);
9866: fnd_file.put_line (fnd_file.log, fnd_message.get);
9867: fnd_message.set_name ( 'IGS', 'IGS_FI_ATTTYPE_GOVT_ATTMODE');
9868: fnd_message.set_token('ATT_TYPE', l_predictive_progs_tbl(l_n_cntr).att_type);
9869: fnd_file.put_line (fnd_file.log, fnd_message.get);
9870: fnd_message.set_name ( 'IGS', 'IGS_FI_NO_KEY_PROGRAM');
9865: fnd_message.set_token('ATT_MODE', l_predictive_progs_tbl(l_n_cntr).att_mode);
9866: fnd_file.put_line (fnd_file.log, fnd_message.get);
9867: fnd_message.set_name ( 'IGS', 'IGS_FI_ATTTYPE_GOVT_ATTMODE');
9868: fnd_message.set_token('ATT_TYPE', l_predictive_progs_tbl(l_n_cntr).att_type);
9869: fnd_file.put_line (fnd_file.log, fnd_message.get);
9870: fnd_message.set_name ( 'IGS', 'IGS_FI_NO_KEY_PROGRAM');
9871: fnd_message.set_token('YES_NO', l_predictive_progs_tbl(l_n_cntr).key_program);
9872: END IF;
9873:
9911: log_to_fnd( p_v_module => 'finpl_prc_predictive_scas',
9912: p_v_string => 'Predictive: Fee Category at SPA level is Null, so log message and abort.');
9913: fnd_message.set_name ( 'IGS', 'IGS_FI_NO_SPA_FEE_CAT');
9914: fnd_message.set_token('PROG_ATT', l_predictive_progs_tbl(l_n_cntr).program_cd);
9915: fnd_file.new_line(fnd_file.log);
9916: fnd_file.put_line(fnd_file.log,fnd_message.get);
9917: p_b_return_status := FALSE;
9918: p_b_record_found := TRUE;
9919: RETURN;
9912: p_v_string => 'Predictive: Fee Category at SPA level is Null, so log message and abort.');
9913: fnd_message.set_name ( 'IGS', 'IGS_FI_NO_SPA_FEE_CAT');
9914: fnd_message.set_token('PROG_ATT', l_predictive_progs_tbl(l_n_cntr).program_cd);
9915: fnd_file.new_line(fnd_file.log);
9916: fnd_file.put_line(fnd_file.log,fnd_message.get);
9917: p_b_return_status := FALSE;
9918: p_b_record_found := TRUE;
9919: RETURN;
9920: END IF;
9929: OR rec_cur_fee_cat_curr.currency_cd IS NULL
9930: ) THEN
9931: IF (p_trace_on = 'Y') THEN
9932: fnd_message.set_name ( 'IGS', 'IGS_FI_INVALID_CURR_CODE');
9933: fnd_file.put_line (fnd_file.log, fnd_message.get);
9934: fnd_message.set_name('IGS', 'IGS_FI_INV_FEE_CAT_CURR_CODE');
9935: fnd_message.set_token('CUR_CODE1', rec_cur_fee_cat_curr.currency_cd );
9936: fnd_message.set_token('FEE_CAT', RTRIM(l_predictive_progs_tbl(l_n_cntr).fee_cat) );
9937: fnd_message.set_token('CUR_CODE2', p_v_curr_cd );
9934: fnd_message.set_name('IGS', 'IGS_FI_INV_FEE_CAT_CURR_CODE');
9935: fnd_message.set_token('CUR_CODE1', rec_cur_fee_cat_curr.currency_cd );
9936: fnd_message.set_token('FEE_CAT', RTRIM(l_predictive_progs_tbl(l_n_cntr).fee_cat) );
9937: fnd_message.set_token('CUR_CODE2', p_v_curr_cd );
9938: fnd_file.put_line (fnd_file.log, fnd_message.get);
9939: END IF;
9940: log_to_fnd( p_v_module => 'finpl_prc_predictive_scas',
9941: p_v_string => 'Currency at Sys Opt Level('|| p_v_curr_cd || ') and Fee Cat level('
9942: || rec_cur_fee_cat_curr.currency_cd ||') are not same. Proceed with next Program Att.');
9942: || rec_cur_fee_cat_curr.currency_cd ||') are not same. Proceed with next Program Att.');
9943: ELSE
9944:
9945: IF (p_trace_on = 'Y') THEN
9946: fnd_file.new_line(fnd_file.log);
9947: fnd_message.set_name ( 'IGS', 'IGS_FI_PREDICTIVE_FEEASS_SPA');
9948: fnd_file.put_line (fnd_file.log, fnd_message.get);
9949: END IF;
9950:
9944:
9945: IF (p_trace_on = 'Y') THEN
9946: fnd_file.new_line(fnd_file.log);
9947: fnd_message.set_name ( 'IGS', 'IGS_FI_PREDICTIVE_FEEASS_SPA');
9948: fnd_file.put_line (fnd_file.log, fnd_message.get);
9949: END IF;
9950:
9951: log_to_fnd( p_v_module => 'finpl_prc_predictive_scas',
9952: p_v_string => 'Calling finpl_prc_fee_cat_fee_liab for Predictive Assessment.');
10036: l_inst_fee_rec := l_inst_fee_rec_dummy;
10037: g_inst_fee_rec_cntr := 0;
10038:
10039: IF (p_trace_on = 'Y') THEN
10040: fnd_file.new_line(fnd_file.log);
10041: END IF;
10042:
10043: -- Check calling parameters
10044: IF (p_effective_dt IS NULL OR
10067: CLOSE c_fi_control;
10068: IF (p_trace_on = 'Y') THEN
10069: /* Could not determine Fee calculation method */
10070: fnd_message.set_name ( 'IGS', 'IGS_FI_FEE_CALC_MTHD_NOT_SET');
10071: fnd_file.put_line (fnd_file.log, fnd_message.get);
10072: END IF;
10073: p_message_name := 'IGS_FI_FEE_CALC_MTHD_NOT_SET';
10074: log_to_fnd( p_v_module => 'finp_ins_enr_fee_ass',
10075: p_v_string => 'Returning from finp_ins_enr_fee_ass with message ' || p_message_name );
10078: ELSE
10079: CLOSE c_fi_control;
10080: IF (p_trace_on = 'Y') THEN
10081: fnd_message.set_name ( 'IGS', 'IGS_FI_FEE_CALC_MTHD_NOT_SET');
10082: fnd_file.put_line (fnd_file.log, fnd_message.get);
10083: END IF;
10084: p_message_name := 'IGS_FI_FEE_CALC_MTHD_NOT_SET';
10085: log_to_fnd( p_v_module => 'finp_ins_enr_fee_ass',
10086: p_v_string => 'Returning from finp_ins_enr_fee_ass with message ' || p_message_name || '.');
10098: IF (c_course_type%NOTFOUND) THEN
10099: CLOSE c_course_type;
10100: IF (p_trace_on = 'Y') THEN
10101: fnd_message.set_name ( 'IGS', 'IGS_GE_INVALID_VALUE');
10102: fnd_file.put_line (fnd_file.log, fnd_message.get);
10103: END IF;
10104: p_message_name := 'IGS_GE_INVALID_VALUE';
10105: log_to_fnd( p_v_module => 'finp_ins_enr_fee_ass',
10106: p_v_string => 'Returning from finp_ins_enr_fee_ass: Invalid Course Type.' );
10111: ELSE
10112: IF ( p_c_career IS NOT NULL) THEN
10113: IF (p_trace_on = 'Y') THEN
10114: fnd_message.set_name ( 'IGS', 'IGS_GE_INVALID_VALUE');
10115: fnd_file.put_line (fnd_file.log, fnd_message.get);
10116: END IF;
10117: p_message_name := 'IGS_GE_INVALID_VALUE';
10118: log_to_fnd( p_v_module => 'finp_ins_enr_fee_ass',
10119: p_v_string => 'Returning from finp_ins_enr_fee_ass: Course Type passed when not CAREER.' );
10138: IF fnd_global.conc_request_id <> -1 THEN
10139: IF (p_trace_on = 'Y') THEN
10140: fnd_message.set_name('IGS', 'IGS_FI_PERSON_NUM');
10141: fnd_message.set_token('PERSON_NUM', g_v_person_number);
10142: fnd_file.put_line (fnd_file.log, fnd_message.get);
10143:
10144: fnd_message.set_name('IGS', 'IGS_FI_INC_PRG_TRANSFER');
10145: fnd_message.set_token('PERSON_NUM', g_v_person_number);
10146: fnd_file.put_line (fnd_file.log, fnd_message.get);
10142: fnd_file.put_line (fnd_file.log, fnd_message.get);
10143:
10144: fnd_message.set_name('IGS', 'IGS_FI_INC_PRG_TRANSFER');
10145: fnd_message.set_token('PERSON_NUM', g_v_person_number);
10146: fnd_file.put_line (fnd_file.log, fnd_message.get);
10147: END IF;
10148: p_message_name := 'IGS_FI_INC_PRG_TRANSFER';
10149: fnd_message.set_name('IGS', 'IGS_FI_INC_PRG_TRANSFER');
10150: igs_ge_msg_stack.ADD;
10167: -- other fee calculation methods.
10168: IF ( p_course_cd IS NOT NULL AND g_c_fee_calc_mthd <> g_v_program) THEN
10169: IF (p_trace_on = 'Y') THEN
10170: fnd_message.set_name ( 'IGS', 'IGS_GE_INVALID_VALUE');
10171: fnd_file.put_line (fnd_file.log, fnd_message.get);
10172: END IF;
10173: p_message_name := 'IGS_GE_INVALID_VALUE';
10174: RETURN FALSE;
10175: END IF;
10190: v_message_name);
10191: IF NOT l_b_fci_lci THEN
10192: IF (p_trace_on = 'Y') THEN
10193: fnd_message.set_name ( 'IGS', v_message_name);
10194: fnd_file.put_line (fnd_file.log, fnd_message.get);
10195: END IF;
10196: p_message_name := v_message_name;
10197: log_to_fnd( p_v_module => 'finp_ins_enr_fee_ass',
10198: p_v_string => 'Error in finp_get_lfci_reln. Returning from finp_ins_enr_fee_ass with message ' || p_message_name );
10233: CLOSE c_fcci_fss;
10234: v_message_name := 'IGS_FI_FEECAT_NOACTIVE_FEEASS';
10235: IF (p_trace_on = 'Y') THEN
10236: fnd_message.set_name ( 'IGS', v_message_name);
10237: fnd_file.put_line (fnd_file.log, fnd_message.get);
10238: END IF;
10239: -- call proc to save traces
10240: p_message_name := v_message_name;
10241: log_to_fnd( p_v_module => 'finp_ins_enr_fee_ass',
10251: IF g_v_include_audit IS NULL THEN
10252: v_message_name := 'IGS_FI_SP_FEE_NO_PROFILE';
10253: IF (p_trace_on = 'Y') THEN
10254: fnd_message.set_name ( 'IGS', v_message_name);
10255: fnd_file.put_line (fnd_file.log, fnd_message.get);
10256: END IF;
10257: -- call proc to save traces
10258: p_message_name := v_message_name;
10259: log_to_fnd( p_v_module => 'finp_ins_enr_fee_ass',
10281: fnd_message.set_name( 'IGS', l_v_message_name );
10282: IF l_v_message_name = 'IGS_FI_NO_CENSUS_DT_SETUP' THEN
10283: fnd_message.set_token('ALT_CD', g_v_load_alt_code );
10284: END IF;
10285: fnd_file.put_line (fnd_file.log, fnd_message.get);
10286: END IF;
10287: log_to_fnd( p_v_module => 'finp_ins_enr_fee_ass',
10288: p_v_string => 'Error in check_census_dt_setup: ' || l_v_message_name );
10289: RETURN FALSE;
10298:
10299: v_record_found := FALSE;
10300:
10301: IF (p_trace_on = 'Y') THEN
10302: fnd_file.new_line(fnd_file.log);
10303: OPEN cur_person_name(p_person_id);
10304: FETCH cur_person_name INTO l_v_person_name;
10305: CLOSE cur_person_name;
10306: fnd_file.put_line( fnd_file.log, RPAD('-', '79', '-') );
10302: fnd_file.new_line(fnd_file.log);
10303: OPEN cur_person_name(p_person_id);
10304: FETCH cur_person_name INTO l_v_person_name;
10305: CLOSE cur_person_name;
10306: fnd_file.put_line( fnd_file.log, RPAD('-', '79', '-') );
10307: fnd_message.set_name('IGS', 'IGS_FI_PERSON_NUM');
10308: fnd_message.set_token('PERSON_NUM', g_v_person_number);
10309: fnd_file.put_line (fnd_file.log, fnd_message.get);
10310: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_HOLDS', 'PERSON_NAME') || ': ' || l_v_person_name);
10305: CLOSE cur_person_name;
10306: fnd_file.put_line( fnd_file.log, RPAD('-', '79', '-') );
10307: fnd_message.set_name('IGS', 'IGS_FI_PERSON_NUM');
10308: fnd_message.set_token('PERSON_NUM', g_v_person_number);
10309: fnd_file.put_line (fnd_file.log, fnd_message.get);
10310: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_HOLDS', 'PERSON_NAME') || ': ' || l_v_person_name);
10311: END IF;
10312:
10313: tbl_wav_fcfl.DELETE;
10306: fnd_file.put_line( fnd_file.log, RPAD('-', '79', '-') );
10307: fnd_message.set_name('IGS', 'IGS_FI_PERSON_NUM');
10308: fnd_message.set_token('PERSON_NUM', g_v_person_number);
10309: fnd_file.put_line (fnd_file.log, fnd_message.get);
10310: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_HOLDS', 'PERSON_NAME') || ': ' || l_v_person_name);
10311: END IF;
10312:
10313: tbl_wav_fcfl.DELETE;
10314:
10337: fnd_message.set_name ( 'IGS', 'IGS_FI_NO_SPA_FEE_CAT');
10338: fnd_message.set_token('PROG_ATT', rec_scas.program_cd);
10339: --Bug 4735807,If this is called from Concurrent Manager
10340: IF fnd_global.conc_request_id <> -1 THEN
10341: fnd_file.new_line(fnd_file.log);
10342: fnd_file.put_line(fnd_file.log,fnd_message.get);
10343: ELSE
10344: -- This is called from Self-Service Package. Return FALSE so that this message is shown on page.
10345: p_message_name := 'IGS_FI_NO_SPA_FEE_CAT';
10338: fnd_message.set_token('PROG_ATT', rec_scas.program_cd);
10339: --Bug 4735807,If this is called from Concurrent Manager
10340: IF fnd_global.conc_request_id <> -1 THEN
10341: fnd_file.new_line(fnd_file.log);
10342: fnd_file.put_line(fnd_file.log,fnd_message.get);
10343: ELSE
10344: -- This is called from Self-Service Package. Return FALSE so that this message is shown on page.
10345: p_message_name := 'IGS_FI_NO_SPA_FEE_CAT';
10346: igs_ge_msg_stack.ADD;
10348: RETURN FALSE;
10349: END IF;
10350:
10351: IF (p_trace_on = 'Y') THEN
10352: fnd_file.new_line(fnd_file.log);
10353: fnd_message.set_name ( 'IGS', 'IGS_FI_MAJOR_PRGLOC_USED');
10354: fnd_message.set_token('PROG', rec_scas.program_cd);
10355: fnd_message.set_token('VER', TO_CHAR(rec_scas.program_version));
10356: fnd_file.put_line (fnd_file.log, fnd_message.get);
10352: fnd_file.new_line(fnd_file.log);
10353: fnd_message.set_name ( 'IGS', 'IGS_FI_MAJOR_PRGLOC_USED');
10354: fnd_message.set_token('PROG', rec_scas.program_cd);
10355: fnd_message.set_token('VER', TO_CHAR(rec_scas.program_version));
10356: fnd_file.put_line (fnd_file.log, fnd_message.get);
10357: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'TITLE') || ': ' || rec_scas.short_title);
10358: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'STATUS') || ': ' || igs_fi_gen_gl.get_lkp_meaning('VS_EN_COURSE_ATMPT_STATUS', rec_scas.course_attempt_status));
10359: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'START_DT') || ': ' || TO_CHAR(rec_scas.commencement_dt, 'DD/MM/YYYY'));
10360: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'FEE_CAT') || ': ' || l_fee_category);
10353: fnd_message.set_name ( 'IGS', 'IGS_FI_MAJOR_PRGLOC_USED');
10354: fnd_message.set_token('PROG', rec_scas.program_cd);
10355: fnd_message.set_token('VER', TO_CHAR(rec_scas.program_version));
10356: fnd_file.put_line (fnd_file.log, fnd_message.get);
10357: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'TITLE') || ': ' || rec_scas.short_title);
10358: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'STATUS') || ': ' || igs_fi_gen_gl.get_lkp_meaning('VS_EN_COURSE_ATMPT_STATUS', rec_scas.course_attempt_status));
10359: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'START_DT') || ': ' || TO_CHAR(rec_scas.commencement_dt, 'DD/MM/YYYY'));
10360: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'FEE_CAT') || ': ' || l_fee_category);
10361: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_ACCT_ENTITIES', 'LOC') || ': ' || rec_scas.location_cd);
10354: fnd_message.set_token('PROG', rec_scas.program_cd);
10355: fnd_message.set_token('VER', TO_CHAR(rec_scas.program_version));
10356: fnd_file.put_line (fnd_file.log, fnd_message.get);
10357: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'TITLE') || ': ' || rec_scas.short_title);
10358: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'STATUS') || ': ' || igs_fi_gen_gl.get_lkp_meaning('VS_EN_COURSE_ATMPT_STATUS', rec_scas.course_attempt_status));
10359: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'START_DT') || ': ' || TO_CHAR(rec_scas.commencement_dt, 'DD/MM/YYYY'));
10360: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'FEE_CAT') || ': ' || l_fee_category);
10361: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_ACCT_ENTITIES', 'LOC') || ': ' || rec_scas.location_cd);
10362: fnd_message.set_name ( 'IGS', 'IGS_FI_DER_ATT_TYPE_GOVT_MODE');
10355: fnd_message.set_token('VER', TO_CHAR(rec_scas.program_version));
10356: fnd_file.put_line (fnd_file.log, fnd_message.get);
10357: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'TITLE') || ': ' || rec_scas.short_title);
10358: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'STATUS') || ': ' || igs_fi_gen_gl.get_lkp_meaning('VS_EN_COURSE_ATMPT_STATUS', rec_scas.course_attempt_status));
10359: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'START_DT') || ': ' || TO_CHAR(rec_scas.commencement_dt, 'DD/MM/YYYY'));
10360: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'FEE_CAT') || ': ' || l_fee_category);
10361: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_ACCT_ENTITIES', 'LOC') || ': ' || rec_scas.location_cd);
10362: fnd_message.set_name ( 'IGS', 'IGS_FI_DER_ATT_TYPE_GOVT_MODE');
10363: fnd_message.set_token('ATT_MODE', rec_scas.attendance_mode);
10356: fnd_file.put_line (fnd_file.log, fnd_message.get);
10357: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'TITLE') || ': ' || rec_scas.short_title);
10358: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'STATUS') || ': ' || igs_fi_gen_gl.get_lkp_meaning('VS_EN_COURSE_ATMPT_STATUS', rec_scas.course_attempt_status));
10359: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'START_DT') || ': ' || TO_CHAR(rec_scas.commencement_dt, 'DD/MM/YYYY'));
10360: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'FEE_CAT') || ': ' || l_fee_category);
10361: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_ACCT_ENTITIES', 'LOC') || ': ' || rec_scas.location_cd);
10362: fnd_message.set_name ( 'IGS', 'IGS_FI_DER_ATT_TYPE_GOVT_MODE');
10363: fnd_message.set_token('ATT_MODE', rec_scas.attendance_mode);
10364: fnd_file.put_line (fnd_file.log, fnd_message.get);
10357: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'TITLE') || ': ' || rec_scas.short_title);
10358: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'STATUS') || ': ' || igs_fi_gen_gl.get_lkp_meaning('VS_EN_COURSE_ATMPT_STATUS', rec_scas.course_attempt_status));
10359: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'START_DT') || ': ' || TO_CHAR(rec_scas.commencement_dt, 'DD/MM/YYYY'));
10360: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'FEE_CAT') || ': ' || l_fee_category);
10361: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_ACCT_ENTITIES', 'LOC') || ': ' || rec_scas.location_cd);
10362: fnd_message.set_name ( 'IGS', 'IGS_FI_DER_ATT_TYPE_GOVT_MODE');
10363: fnd_message.set_token('ATT_MODE', rec_scas.attendance_mode);
10364: fnd_file.put_line (fnd_file.log, fnd_message.get);
10365: fnd_message.set_name ( 'IGS', 'IGS_FI_ATTTYPE_GOVT_ATTMODE');
10360: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'FEE_CAT') || ': ' || l_fee_category);
10361: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_ACCT_ENTITIES', 'LOC') || ': ' || rec_scas.location_cd);
10362: fnd_message.set_name ( 'IGS', 'IGS_FI_DER_ATT_TYPE_GOVT_MODE');
10363: fnd_message.set_token('ATT_MODE', rec_scas.attendance_mode);
10364: fnd_file.put_line (fnd_file.log, fnd_message.get);
10365: fnd_message.set_name ( 'IGS', 'IGS_FI_ATTTYPE_GOVT_ATTMODE');
10366: fnd_message.set_token('ATT_TYPE', rec_scas.attendance_type);
10367: fnd_file.put_line (fnd_file.log, fnd_message.get);
10368: fnd_message.set_name ( 'IGS', 'IGS_FI_NO_KEY_PROGRAM');
10363: fnd_message.set_token('ATT_MODE', rec_scas.attendance_mode);
10364: fnd_file.put_line (fnd_file.log, fnd_message.get);
10365: fnd_message.set_name ( 'IGS', 'IGS_FI_ATTTYPE_GOVT_ATTMODE');
10366: fnd_message.set_token('ATT_TYPE', rec_scas.attendance_type);
10367: fnd_file.put_line (fnd_file.log, fnd_message.get);
10368: fnd_message.set_name ( 'IGS', 'IGS_FI_NO_KEY_PROGRAM');
10369: fnd_message.set_token('YES_NO', rec_scas.key_program_flag);
10370: fnd_file.put_line (fnd_file.log, fnd_message.get);
10371: END IF;
10366: fnd_message.set_token('ATT_TYPE', rec_scas.attendance_type);
10367: fnd_file.put_line (fnd_file.log, fnd_message.get);
10368: fnd_message.set_name ( 'IGS', 'IGS_FI_NO_KEY_PROGRAM');
10369: fnd_message.set_token('YES_NO', rec_scas.key_program_flag);
10370: fnd_file.put_line (fnd_file.log, fnd_message.get);
10371: END IF;
10372:
10373: -- Process Fee Category Fee Liabilities
10374:
10379: CLOSE cur_fee_cat_curr;
10380:
10381: IF (l_cur_fee_cat_curr.currency_cd <> l_c_control_curr OR l_cur_fee_cat_curr.currency_cd IS NULL) THEN
10382: IF (p_trace_on = 'Y') THEN
10383: fnd_file.new_line(fnd_file.log);
10384: fnd_message.set_name ( 'IGS', 'IGS_FI_INVALID_CURR_CODE');
10385: fnd_file.put_line (fnd_file.log, fnd_message.get);
10386: fnd_message.set_name('IGS', 'IGS_FI_INV_FEE_CAT_CURR_CODE');
10387: fnd_message.set_token('CUR_CODE1', l_cur_fee_cat_curr.currency_cd );
10381: IF (l_cur_fee_cat_curr.currency_cd <> l_c_control_curr OR l_cur_fee_cat_curr.currency_cd IS NULL) THEN
10382: IF (p_trace_on = 'Y') THEN
10383: fnd_file.new_line(fnd_file.log);
10384: fnd_message.set_name ( 'IGS', 'IGS_FI_INVALID_CURR_CODE');
10385: fnd_file.put_line (fnd_file.log, fnd_message.get);
10386: fnd_message.set_name('IGS', 'IGS_FI_INV_FEE_CAT_CURR_CODE');
10387: fnd_message.set_token('CUR_CODE1', l_cur_fee_cat_curr.currency_cd );
10388: fnd_message.set_token('FEE_CAT', RTRIM(l_fee_category) );
10389: fnd_message.set_token('CUR_CODE2', l_c_control_curr );
10386: fnd_message.set_name('IGS', 'IGS_FI_INV_FEE_CAT_CURR_CODE');
10387: fnd_message.set_token('CUR_CODE1', l_cur_fee_cat_curr.currency_cd );
10388: fnd_message.set_token('FEE_CAT', RTRIM(l_fee_category) );
10389: fnd_message.set_token('CUR_CODE2', l_c_control_curr );
10390: fnd_file.put_line (fnd_file.log, fnd_message.get);
10391: log_to_fnd( p_v_module => 'finp_ins_enr_fee_ass',
10392: p_v_string => 'Currency at Fee Cat is Invalid. Sys Opt Level: ' || l_c_control_curr || ', Fee Cat Level: ' || l_cur_fee_cat_curr.currency_cd );
10393: END IF;
10394: ELSE
10442: log_to_fnd( p_v_module => 'finp_ins_enr_fee_ass',
10443: p_v_string => 'Waiver Processing: Fee Category at SPA level is Null, so log message and abort.');
10444: fnd_message.set_name ( 'IGS', 'IGS_FI_NO_SPA_FEE_CAT');
10445: fnd_message.set_token('PROG_ATT', rec_spa.program_cd);
10446: fnd_file.new_line(fnd_file.log);
10447: fnd_file.put_line(fnd_file.log,fnd_message.get);
10448: RETURN FALSE;
10449: END IF;
10450:
10443: p_v_string => 'Waiver Processing: Fee Category at SPA level is Null, so log message and abort.');
10444: fnd_message.set_name ( 'IGS', 'IGS_FI_NO_SPA_FEE_CAT');
10445: fnd_message.set_token('PROG_ATT', rec_spa.program_cd);
10446: fnd_file.new_line(fnd_file.log);
10447: fnd_file.put_line(fnd_file.log,fnd_message.get);
10448: RETURN FALSE;
10449: END IF;
10450:
10451: IF NOT((p_fee_category IS NOT NULL AND p_fee_category = rec_spa.fee_cat)
10452: OR (p_course_cd IS NOT NULL AND p_course_cd = rec_spa.program_cd)
10453: OR (p_c_career IS NOT NULL AND p_c_career = rec_spa.course_type)) THEN
10454: -- Log the Program Details
10455: IF (p_trace_on = 'Y') THEN
10456: fnd_file.new_line(fnd_file.log);
10457: fnd_message.set_name ( 'IGS', 'IGS_FI_MAJOR_PRGLOC_USED');
10458: fnd_message.set_token('PROG', rec_spa.program_cd);
10459: fnd_message.set_token('VER', TO_CHAR(rec_spa.program_version));
10460: fnd_file.put_line (fnd_file.log, fnd_message.get);
10456: fnd_file.new_line(fnd_file.log);
10457: fnd_message.set_name ( 'IGS', 'IGS_FI_MAJOR_PRGLOC_USED');
10458: fnd_message.set_token('PROG', rec_spa.program_cd);
10459: fnd_message.set_token('VER', TO_CHAR(rec_spa.program_version));
10460: fnd_file.put_line (fnd_file.log, fnd_message.get);
10461: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'TITLE') || ': ' || rec_spa.short_title);
10462: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'STATUS') || ': ' || igs_fi_gen_gl.get_lkp_meaning('VS_EN_COURSE_ATMPT_STATUS', rec_spa.course_attempt_status));
10463: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'START_DT') || ': ' || TO_CHAR(rec_spa.commencement_dt, 'DD/MM/YYYY'));
10464: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'FEE_CAT') || ': ' || rec_spa.fee_cat);
10457: fnd_message.set_name ( 'IGS', 'IGS_FI_MAJOR_PRGLOC_USED');
10458: fnd_message.set_token('PROG', rec_spa.program_cd);
10459: fnd_message.set_token('VER', TO_CHAR(rec_spa.program_version));
10460: fnd_file.put_line (fnd_file.log, fnd_message.get);
10461: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'TITLE') || ': ' || rec_spa.short_title);
10462: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'STATUS') || ': ' || igs_fi_gen_gl.get_lkp_meaning('VS_EN_COURSE_ATMPT_STATUS', rec_spa.course_attempt_status));
10463: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'START_DT') || ': ' || TO_CHAR(rec_spa.commencement_dt, 'DD/MM/YYYY'));
10464: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'FEE_CAT') || ': ' || rec_spa.fee_cat);
10465: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_ACCT_ENTITIES', 'LOC') || ': ' || rec_spa.location_cd);
10458: fnd_message.set_token('PROG', rec_spa.program_cd);
10459: fnd_message.set_token('VER', TO_CHAR(rec_spa.program_version));
10460: fnd_file.put_line (fnd_file.log, fnd_message.get);
10461: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'TITLE') || ': ' || rec_spa.short_title);
10462: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'STATUS') || ': ' || igs_fi_gen_gl.get_lkp_meaning('VS_EN_COURSE_ATMPT_STATUS', rec_spa.course_attempt_status));
10463: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'START_DT') || ': ' || TO_CHAR(rec_spa.commencement_dt, 'DD/MM/YYYY'));
10464: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'FEE_CAT') || ': ' || rec_spa.fee_cat);
10465: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_ACCT_ENTITIES', 'LOC') || ': ' || rec_spa.location_cd);
10466: fnd_message.set_name ( 'IGS', 'IGS_FI_DER_ATT_TYPE_GOVT_MODE');
10459: fnd_message.set_token('VER', TO_CHAR(rec_spa.program_version));
10460: fnd_file.put_line (fnd_file.log, fnd_message.get);
10461: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'TITLE') || ': ' || rec_spa.short_title);
10462: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'STATUS') || ': ' || igs_fi_gen_gl.get_lkp_meaning('VS_EN_COURSE_ATMPT_STATUS', rec_spa.course_attempt_status));
10463: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'START_DT') || ': ' || TO_CHAR(rec_spa.commencement_dt, 'DD/MM/YYYY'));
10464: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'FEE_CAT') || ': ' || rec_spa.fee_cat);
10465: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_ACCT_ENTITIES', 'LOC') || ': ' || rec_spa.location_cd);
10466: fnd_message.set_name ( 'IGS', 'IGS_FI_DER_ATT_TYPE_GOVT_MODE');
10467: fnd_message.set_token('ATT_MODE', rec_spa.attendance_mode);
10460: fnd_file.put_line (fnd_file.log, fnd_message.get);
10461: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'TITLE') || ': ' || rec_spa.short_title);
10462: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'STATUS') || ': ' || igs_fi_gen_gl.get_lkp_meaning('VS_EN_COURSE_ATMPT_STATUS', rec_spa.course_attempt_status));
10463: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'START_DT') || ': ' || TO_CHAR(rec_spa.commencement_dt, 'DD/MM/YYYY'));
10464: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'FEE_CAT') || ': ' || rec_spa.fee_cat);
10465: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_ACCT_ENTITIES', 'LOC') || ': ' || rec_spa.location_cd);
10466: fnd_message.set_name ( 'IGS', 'IGS_FI_DER_ATT_TYPE_GOVT_MODE');
10467: fnd_message.set_token('ATT_MODE', rec_spa.attendance_mode);
10468: fnd_file.put_line (fnd_file.log, fnd_message.get);
10461: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'TITLE') || ': ' || rec_spa.short_title);
10462: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'STATUS') || ': ' || igs_fi_gen_gl.get_lkp_meaning('VS_EN_COURSE_ATMPT_STATUS', rec_spa.course_attempt_status));
10463: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'START_DT') || ': ' || TO_CHAR(rec_spa.commencement_dt, 'DD/MM/YYYY'));
10464: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'FEE_CAT') || ': ' || rec_spa.fee_cat);
10465: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_ACCT_ENTITIES', 'LOC') || ': ' || rec_spa.location_cd);
10466: fnd_message.set_name ( 'IGS', 'IGS_FI_DER_ATT_TYPE_GOVT_MODE');
10467: fnd_message.set_token('ATT_MODE', rec_spa.attendance_mode);
10468: fnd_file.put_line (fnd_file.log, fnd_message.get);
10469: fnd_message.set_name ( 'IGS', 'IGS_FI_ATTTYPE_GOVT_ATTMODE');
10464: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'FEE_CAT') || ': ' || rec_spa.fee_cat);
10465: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_ACCT_ENTITIES', 'LOC') || ': ' || rec_spa.location_cd);
10466: fnd_message.set_name ( 'IGS', 'IGS_FI_DER_ATT_TYPE_GOVT_MODE');
10467: fnd_message.set_token('ATT_MODE', rec_spa.attendance_mode);
10468: fnd_file.put_line (fnd_file.log, fnd_message.get);
10469: fnd_message.set_name ( 'IGS', 'IGS_FI_ATTTYPE_GOVT_ATTMODE');
10470: fnd_message.set_token('ATT_TYPE', rec_spa.attendance_type);
10471: fnd_file.put_line (fnd_file.log, fnd_message.get);
10472: fnd_message.set_name ( 'IGS', 'IGS_FI_NO_KEY_PROGRAM');
10467: fnd_message.set_token('ATT_MODE', rec_spa.attendance_mode);
10468: fnd_file.put_line (fnd_file.log, fnd_message.get);
10469: fnd_message.set_name ( 'IGS', 'IGS_FI_ATTTYPE_GOVT_ATTMODE');
10470: fnd_message.set_token('ATT_TYPE', rec_spa.attendance_type);
10471: fnd_file.put_line (fnd_file.log, fnd_message.get);
10472: fnd_message.set_name ( 'IGS', 'IGS_FI_NO_KEY_PROGRAM');
10473: fnd_message.set_token('YES_NO', rec_spa.key_program_flag);
10474: fnd_file.put_line (fnd_file.log, fnd_message.get);
10475: END IF;
10470: fnd_message.set_token('ATT_TYPE', rec_spa.attendance_type);
10471: fnd_file.put_line (fnd_file.log, fnd_message.get);
10472: fnd_message.set_name ( 'IGS', 'IGS_FI_NO_KEY_PROGRAM');
10473: fnd_message.set_token('YES_NO', rec_spa.key_program_flag);
10474: fnd_file.put_line (fnd_file.log, fnd_message.get);
10475: END IF;
10476:
10477: -- Validate Currency against the currency setup in System Options
10478: OPEN cur_fee_cat_curr(rec_spa.fee_cat);
10479: FETCH cur_fee_cat_curr INTO l_v_currency_cd;
10480: CLOSE cur_fee_cat_curr;
10481: IF (l_v_currency_cd <> l_c_control_curr OR l_v_currency_cd IS NULL) THEN
10482: IF (p_trace_on = 'Y') THEN
10483: fnd_file.new_line(fnd_file.log);
10484: fnd_message.set_name ( 'IGS', 'IGS_FI_INVALID_CURR_CODE');
10485: fnd_file.put_line (fnd_file.log, fnd_message.get);
10486: fnd_message.set_name('IGS', 'IGS_FI_INV_FEE_CAT_CURR_CODE');
10487: fnd_message.set_token('CUR_CODE1', l_v_currency_cd );
10481: IF (l_v_currency_cd <> l_c_control_curr OR l_v_currency_cd IS NULL) THEN
10482: IF (p_trace_on = 'Y') THEN
10483: fnd_file.new_line(fnd_file.log);
10484: fnd_message.set_name ( 'IGS', 'IGS_FI_INVALID_CURR_CODE');
10485: fnd_file.put_line (fnd_file.log, fnd_message.get);
10486: fnd_message.set_name('IGS', 'IGS_FI_INV_FEE_CAT_CURR_CODE');
10487: fnd_message.set_token('CUR_CODE1', l_v_currency_cd );
10488: fnd_message.set_token('FEE_CAT', RTRIM(rec_spa.fee_cat) );
10489: fnd_message.set_token('CUR_CODE2', l_c_control_curr );
10486: fnd_message.set_name('IGS', 'IGS_FI_INV_FEE_CAT_CURR_CODE');
10487: fnd_message.set_token('CUR_CODE1', l_v_currency_cd );
10488: fnd_message.set_token('FEE_CAT', RTRIM(rec_spa.fee_cat) );
10489: fnd_message.set_token('CUR_CODE2', l_c_control_curr );
10490: fnd_file.put_line (fnd_file.log, fnd_message.get);
10491: log_to_fnd( p_v_module => 'finp_ins_enr_fee_ass',
10492: p_v_string => 'Waiver Procesing: Currency at Fee Cat is Invalid. Sys Opt Level: ' || l_c_control_curr
10493: || ', Fee Cat Level: ' || l_v_currency_cd );
10494: END IF;
10602: IF v_record_found = FALSE THEN
10603: v_message_name := 'IGS_FI_NO_STUDPRG_ATTEMPT';
10604: IF (p_trace_on = 'Y') THEN
10605: fnd_message.set_name ( 'IGS', v_message_name);
10606: fnd_file.put_line (fnd_file.log, fnd_message.get);
10607: END IF;
10608: log_to_fnd( p_v_module => 'finp_ins_enr_fee_ass',
10609: p_v_string => 'No Program Attempt Found. Returning from finp_ins_enr_fee_ass with message ' || v_message_name );
10610: ELSE
10680: p_v_string => 'Waiver Processing: Error: Message Count - '||NVL(l_n_msg_count,0)||' Message Data: '||l_v_msg_data);
10681: IF (p_trace_on = 'Y') THEN
10682: IF l_n_msg_count = 1 THEN
10683: fnd_message.set_encoded(l_v_msg_data);
10684: fnd_file.put_line(fnd_file.log,fnd_message.get);
10685: ELSIF l_n_msg_count > 1 THEN
10686: FOR l_n_count IN 1..l_n_msg_count LOOP
10687: l_v_err_msg := fnd_msg_pub.get(p_msg_index => l_n_count, p_encoded => 'T');
10688: fnd_message.set_encoded(l_v_err_msg);
10685: ELSIF l_n_msg_count > 1 THEN
10686: FOR l_n_count IN 1..l_n_msg_count LOOP
10687: l_v_err_msg := fnd_msg_pub.get(p_msg_index => l_n_count, p_encoded => 'T');
10688: fnd_message.set_encoded(l_v_err_msg);
10689: fnd_file.put_line(fnd_file.log,fnd_message.get);
10690: END LOOP;
10691: END IF;
10692: END IF; -- End if for p_trace_on
10693: END IF;
10698: -- But after the completion of create_waivers this parameter is set 'Y' as create_waivers internally call the Fee Assessment process
10699: g_v_wav_calc_flag := 'N';
10700:
10701: IF (p_trace_on = 'Y') THEN
10702: fnd_file.put_line(fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','WAIVER_AMOUNT')||': '||NVL(l_n_sum_waiver_amount,0));
10703: fnd_file.new_line(fnd_file.log);
10704: END IF;
10705:
10706: END IF;
10699: g_v_wav_calc_flag := 'N';
10700:
10701: IF (p_trace_on = 'Y') THEN
10702: fnd_file.put_line(fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','WAIVER_AMOUNT')||': '||NVL(l_n_sum_waiver_amount,0));
10703: fnd_file.new_line(fnd_file.log);
10704: END IF;
10705:
10706: END IF;
10707: END IF;
11163: app_exception.raise_exception;
11164: END IF;
11165: IF (p_trace_on = 'Y') THEN
11166: l_v_invoice_num := igs_fi_gen_008.get_invoice_number(l_n_invoice_id);
11167: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'RET_CHG_NUM') || ': ' || l_v_invoice_num);
11168: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'RET_CHG_AMT') || ': ' || TO_CHAR(p_n_amount));
11169: fnd_file.new_line(fnd_file.log);
11170: END IF;
11171: -- Call the TBH for inserting record in IGS_FI_FEE_AS_ITEMS if Charges API returned successfully
11164: END IF;
11165: IF (p_trace_on = 'Y') THEN
11166: l_v_invoice_num := igs_fi_gen_008.get_invoice_number(l_n_invoice_id);
11167: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'RET_CHG_NUM') || ': ' || l_v_invoice_num);
11168: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'RET_CHG_AMT') || ': ' || TO_CHAR(p_n_amount));
11169: fnd_file.new_line(fnd_file.log);
11170: END IF;
11171: -- Call the TBH for inserting record in IGS_FI_FEE_AS_ITEMS if Charges API returned successfully
11172: -- Modified fee_effective_dt entry as Trunc(Sysdate) as part of Bug 4240402: Timezone impact
11165: IF (p_trace_on = 'Y') THEN
11166: l_v_invoice_num := igs_fi_gen_008.get_invoice_number(l_n_invoice_id);
11167: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'RET_CHG_NUM') || ': ' || l_v_invoice_num);
11168: fnd_file.put_line (fnd_file.log, igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'RET_CHG_AMT') || ': ' || TO_CHAR(p_n_amount));
11169: fnd_file.new_line(fnd_file.log);
11170: END IF;
11171: -- Call the TBH for inserting record in IGS_FI_FEE_AS_ITEMS if Charges API returned successfully
11172: -- Modified fee_effective_dt entry as Trunc(Sysdate) as part of Bug 4240402: Timezone impact
11173: l_rowid := NULL;