185: ELSIF l_efc_duration = 0 THEN
186: RETURN;
187: END IF;
188:
189: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
190: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.calculate_efc.main','l_efc_duration:'||l_efc_duration);
191: END IF;
192:
193: --get sys award year based on cal type and sequence number
186: RETURN;
187: END IF;
188:
189: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
190: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.calculate_efc.main','l_efc_duration:'||l_efc_duration);
191: END IF;
192:
193: --get sys award year based on cal type and sequence number
194: OPEN c_award_year(p_cal_type,p_seq_number);
194: OPEN c_award_year(p_cal_type,p_seq_number);
195: FETCH c_award_year INTO l_award_year;
196: CLOSE c_award_year;
197:
198: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
199: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.calculate_efc.main','l_award_year:'||l_award_year);
200: END IF;
201:
202: --Get all profiles
195: FETCH c_award_year INTO l_award_year;
196: CLOSE c_award_year;
197:
198: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
199: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.calculate_efc.main','l_award_year:'||l_award_year);
200: END IF;
201:
202: --Get all profiles
203: OPEN c_all_profiles(p_base_id);
235:
236: --for each profile
237: fnd_file.put_line(fnd_file.log,g_tab_1 || l_internal_id_log || l_profile.css_id_number || l_profile.stu_record_type);
238:
239: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
240: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.calculate_efc.debug','processing internal id '||l_profile.css_id_number || l_profile.stu_record_type);
241: END IF;
242:
243: --call user hook
236: --for each profile
237: fnd_file.put_line(fnd_file.log,g_tab_1 || l_internal_id_log || l_profile.css_id_number || l_profile.stu_record_type);
238:
239: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
240: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.calculate_efc.debug','processing internal id '||l_profile.css_id_number || l_profile.stu_record_type);
241: END IF;
242:
243: --call user hook
244: lv_success := igf_ap_uhk_inas_pkg.get_im_efc(
268: END IF;
269:
270:
271: BEGIN
272: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
273: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.calculate_efc.debug','l_coa_duration_efc_amt:'||l_coa_duration_efc_amt);
274: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.calculate_efc.debug','l_efc_duration:'||l_efc_duration);
275: END IF;
276: --update coa_duration_efc_amt,coa_duration_num
269:
270:
271: BEGIN
272: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
273: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.calculate_efc.debug','l_coa_duration_efc_amt:'||l_coa_duration_efc_amt);
274: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.calculate_efc.debug','l_efc_duration:'||l_efc_duration);
275: END IF;
276: --update coa_duration_efc_amt,coa_duration_num
277: igf_ap_css_profile_pkg.update_row(
270:
271: BEGIN
272: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
273: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.calculate_efc.debug','l_coa_duration_efc_amt:'||l_coa_duration_efc_amt);
274: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.calculate_efc.debug','l_efc_duration:'||l_efc_duration);
275: END IF;
276: --update coa_duration_efc_amt,coa_duration_num
277: igf_ap_css_profile_pkg.update_row(
278: x_rowid => l_profile.row_id,
1104: l_seq_number := TO_NUMBER(SUBSTR(p_award_year,11));
1105: errbuf := NULL;
1106: retcode := 0;
1107:
1108: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1109: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.main.debug','l_cal_type:'||l_cal_type);
1110: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.main.debug','l_seq_number:'||l_seq_number);
1111: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.main.debug','p_base_id:'||p_base_id);
1112: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.main.debug','p_persid_grp:'||p_persid_grp);
1105: errbuf := NULL;
1106: retcode := 0;
1107:
1108: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1109: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.main.debug','l_cal_type:'||l_cal_type);
1110: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.main.debug','l_seq_number:'||l_seq_number);
1111: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.main.debug','p_base_id:'||p_base_id);
1112: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.main.debug','p_persid_grp:'||p_persid_grp);
1113: END IF;
1106: retcode := 0;
1107:
1108: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1109: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.main.debug','l_cal_type:'||l_cal_type);
1110: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.main.debug','l_seq_number:'||l_seq_number);
1111: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.main.debug','p_base_id:'||p_base_id);
1112: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.main.debug','p_persid_grp:'||p_persid_grp);
1113: END IF;
1114: --Start Logging the parameters
1107:
1108: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1109: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.main.debug','l_cal_type:'||l_cal_type);
1110: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.main.debug','l_seq_number:'||l_seq_number);
1111: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.main.debug','p_base_id:'||p_base_id);
1112: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.main.debug','p_persid_grp:'||p_persid_grp);
1113: END IF;
1114: --Start Logging the parameters
1115: log_parameters(l_cal_type,l_seq_number,p_base_id,p_persid_grp);
1108: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1109: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.main.debug','l_cal_type:'||l_cal_type);
1110: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.main.debug','l_seq_number:'||l_seq_number);
1111: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.main.debug','p_base_id:'||p_base_id);
1112: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.main.debug','p_persid_grp:'||p_persid_grp);
1113: END IF;
1114: --Start Logging the parameters
1115: log_parameters(l_cal_type,l_seq_number,p_base_id,p_persid_grp);
1116:
1115: log_parameters(l_cal_type,l_seq_number,p_base_id,p_persid_grp);
1116:
1117: IF p_base_id IS NOT NULL AND p_persid_grp IS NOT NULL THEN
1118: --Error.Cant have both parameters as not null
1119: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1120: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.main.debug','Cant specify both base_id and persid_grp.exiting');
1121: END IF;
1122: fnd_message.set_name('IGS','IGS_FI_NO_PERS_PGRP');
1123: fnd_file.put_line(fnd_file.log,fnd_message.get);
1116:
1117: IF p_base_id IS NOT NULL AND p_persid_grp IS NOT NULL THEN
1118: --Error.Cant have both parameters as not null
1119: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1120: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.main.debug','Cant specify both base_id and persid_grp.exiting');
1121: END IF;
1122: fnd_message.set_name('IGS','IGS_FI_NO_PERS_PGRP');
1123: fnd_file.put_line(fnd_file.log,fnd_message.get);
1124: retcode := 2;
1126: END IF;
1127:
1128: IF NOT igf_aw_gen_004.is_inas_integrated THEN
1129: --Error.INAS has to be integrated
1130: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1131: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.main.debug','INAS not integrated');
1132: END IF;
1133: fnd_message.set_name('IGF','IGF_AP_INAS_NOT_ITEGRATED');
1134: fnd_file.put_line(fnd_file.log,fnd_message.get);
1127:
1128: IF NOT igf_aw_gen_004.is_inas_integrated THEN
1129: --Error.INAS has to be integrated
1130: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1131: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.main.debug','INAS not integrated');
1132: END IF;
1133: fnd_message.set_name('IGF','IGF_AP_INAS_NOT_ITEGRATED');
1134: fnd_file.put_line(fnd_file.log,fnd_message.get);
1135: retcode := 2;
1145: CLOSE c_person_number;
1146:
1147: fnd_file.put_line(fnd_file.log,l_processing_log || l_pers_number_log || l_person_number);
1148:
1149: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1150: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.main.debug','calling calculate_efc with base_id:'||p_base_id);
1151: END IF;
1152: --base_id specified. so calculate EFC for all profiles of the current base_id
1153: calculate_efc(l_cal_type,l_seq_number,p_base_id);
1146:
1147: fnd_file.put_line(fnd_file.log,l_processing_log || l_pers_number_log || l_person_number);
1148:
1149: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1150: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.main.debug','calling calculate_efc with base_id:'||p_base_id);
1151: END IF;
1152: --base_id specified. so calculate EFC for all profiles of the current base_id
1153: calculate_efc(l_cal_type,l_seq_number,p_base_id);
1154:
1177: FETCH c_person_number INTO l_person_number;
1178: CLOSE c_person_number;
1179:
1180: fnd_file.put_line(fnd_file.log,l_processing_log || l_pers_number_log || l_person_number);
1181: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1182: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.main.debug','calling calculate_efc with base_id:'||lbase);
1183: END IF;
1184:
1185: calculate_efc(l_cal_type,l_seq_number,lbase);
1178: CLOSE c_person_number;
1179:
1180: fnd_file.put_line(fnd_file.log,l_processing_log || l_pers_number_log || l_person_number);
1181: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1182: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.main.debug','calling calculate_efc with base_id:'||lbase);
1183: END IF;
1184:
1185: calculate_efc(l_cal_type,l_seq_number,lbase);
1186:
1202: FETCH c_person_number INTO l_person_number;
1203: CLOSE c_person_number;
1204:
1205: fnd_file.put_line(fnd_file.log,l_processing_log || l_pers_number_log || l_person_number);
1206: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1207: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.main.debug','calling calculate_efc with base_id:'||l_all_base_id.base_id);
1208: END IF;
1209: --calculate efc
1210: calculate_efc(l_cal_type,l_seq_number,l_all_base_id.base_id);
1203: CLOSE c_person_number;
1204:
1205: fnd_file.put_line(fnd_file.log,l_processing_log || l_pers_number_log || l_person_number);
1206: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1207: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_ap_calc_im_efc.main.debug','calling calculate_efc with base_id:'||l_all_base_id.base_id);
1208: END IF;
1209: --calculate efc
1210: calculate_efc(l_cal_type,l_seq_number,l_all_base_id.base_id);
1211: