1: PACKAGE BODY igf_aw_gen_004 AS
2: /* $Header: IGFAW13B.pls 120.7 2006/06/06 07:29:33 akomurav noship $ */
3:
4: /*************************************************************
5: Change History
105: igf_aw_awd_disb disb
106: WHERE
107: fmast.ci_cal_type = cp_fa_cal_type AND
108: fmast.ci_sequence_number = cp_fa_sequence_number AND
109: awd.base_id = igf_aw_gen_004.get_base_id_for_person (cp_person_id, cp_fa_cal_type, cp_fa_sequence_number) AND
110: awd.fund_id = fmast.fund_id AND
111: awd.award_status IN ('ACCEPTED', 'OFFERED') AND
112: -- awd.notification_status_code IN ('R', 'F') AND
113: awd.award_id = disb.award_id AND
157: igf_aw_awd_disb disb
158: WHERE
159: fmast.ci_cal_type = cp_fa_cal_type AND
160: fmast.ci_sequence_number = cp_fa_sequence_number AND
161: awd.base_id = igf_aw_gen_004.get_base_id_for_person (cp_person_id, cp_fa_cal_type, cp_fa_sequence_number) AND
162: awd.fund_id = fmast.fund_id AND
163: awd.award_status IN ('ACCEPTED', 'OFFERED') AND
164: -- awd.notification_status_code IN ('R', 'F') AND
165: awd.award_id = disb.award_id AND
227: --Who When What
228: ------------------------------------------------------------------
229: BEGIN
230: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
231: fnd_log.string( fnd_log.level_statement, 'igf.plsql.igf_aw_gen_004.'||p_v_module||'.'||p_v_log_category, p_v_string);
232: END IF;
233: END log_to_fnd;
234:
235:
291: l_award_year := p_award_year;
292: END IF;
293:
294: -- bvisvana - bug 3724328 - For Code refactoring (Issue with huge person id groups)
295: -- See the use of pipelined function igf_aw_gen_004.get_person_id();
296: log_to_fnd('build_sql_stmt','debug','IT IS LETTER CODE of type '||p_sys_ltr_code||' with select type as '||p_select_type||' and award year = '||l_award_year);
297: IF p_sys_ltr_code IN ('FAAWARD', 'FAMISTM','FADISBT') THEN
298: IF p_select_type IN ('S','G','A','L') THEN
299: IF p_sys_ltr_code='FAAWARD' THEN
296: log_to_fnd('build_sql_stmt','debug','IT IS LETTER CODE of type '||p_sys_ltr_code||' with select type as '||p_select_type||' and award year = '||l_award_year);
297: IF p_sys_ltr_code IN ('FAAWARD', 'FAMISTM','FADISBT') THEN
298: IF p_select_type IN ('S','G','A','L') THEN
299: IF p_sys_ltr_code='FAAWARD' THEN
300: fnd_dsql.add_text(' IGF_AW_PER_LIST_V WHERE person_id IN (select column_value from table(igf_aw_gen_004.get_person_id())');
301: fnd_dsql.add_text(') AND award_year =');
302: fnd_dsql.add_bind(l_award_year);
303: ELSIF p_sys_ltr_code='FAMISTM' THEN
304: fnd_dsql.add_text(' IGF_AP_MIS_ITMS_LTR_V WHERE person_id IN (select column_value from table(igf_aw_gen_004.get_person_id())');
300: fnd_dsql.add_text(' IGF_AW_PER_LIST_V WHERE person_id IN (select column_value from table(igf_aw_gen_004.get_person_id())');
301: fnd_dsql.add_text(') AND award_year =');
302: fnd_dsql.add_bind(l_award_year);
303: ELSIF p_sys_ltr_code='FAMISTM' THEN
304: fnd_dsql.add_text(' IGF_AP_MIS_ITMS_LTR_V WHERE person_id IN (select column_value from table(igf_aw_gen_004.get_person_id())');
305: fnd_dsql.add_text(') AND award_year =');
306: fnd_dsql.add_bind(l_award_year);
307: ELSIF p_sys_ltr_code='FADISBT' THEN
308: fnd_dsql.add_text(' IGF_SL_DISB_LTR_V WHERE person_id IN (select column_value from table(igf_aw_gen_004.get_person_id())');
304: fnd_dsql.add_text(' IGF_AP_MIS_ITMS_LTR_V WHERE person_id IN (select column_value from table(igf_aw_gen_004.get_person_id())');
305: fnd_dsql.add_text(') AND award_year =');
306: fnd_dsql.add_bind(l_award_year);
307: ELSIF p_sys_ltr_code='FADISBT' THEN
308: fnd_dsql.add_text(' IGF_SL_DISB_LTR_V WHERE person_id IN (select column_value from table(igf_aw_gen_004.get_person_id())');
309: fnd_dsql.add_text(') AND award_year =');
310: fnd_dsql.add_bind(l_award_year);
311: END IF;
312: END IF;
678: l_efc_f NUMBER;
679:
680: BEGIN
681: coa_amt := igf_aw_coa_gen.coa_amount(p_base_id => l_base_id,p_awd_prd_code => p_awd_prd_code);
682: l_efc_f := igf_aw_gen_004.efc_f(l_base_id => l_base_id,p_awd_prd_code => p_awd_prd_code);
683: IF coa_amt > l_efc_f THEN
684: need_f := coa_amt - l_efc_f;
685: ELSE
686: need_f := 0;
716:
717:
718: BEGIN
719: coa_amt := igf_aw_coa_gen.coa_amount(p_base_id => l_base_id,p_awd_prd_code => p_awd_prd_code);
720: l_efc_i := igf_aw_gen_004.efc_i(l_base_id => l_base_id,p_awd_prd_code => p_awd_prd_code);
721: IF coa_amt > l_efc_i THEN
722: need_i := coa_amt - l_efc_i;
723: ELSE
724: need_i := 0;
783: l_header_rec := l_header_rec || '
873:
874: EXCEPTION
875: WHEN OTHERS THEN
876: FND_MESSAGE.SET_NAME('IGS','IGS_GE_UNHANDLED_EXP');
877: FND_MESSAGE.SET_TOKEN('NAME','igf_aw_gen_004.get_award_data_wrap');
878: IGS_GE_MSG_STACK.ADD;
879: App_Exception.Raise_Exception;
880: END get_award_data_wrap;
881:
1005:
1006: EXCEPTION
1007: WHEN OTHERS THEN
1008: FND_MESSAGE.SET_NAME('IGS','IGS_GE_UNHANDLED_EXP');
1009: FND_MESSAGE.SET_TOKEN('NAME','IGF_AW_GEN_004.GET_TERM_TOTAL_WRAP');
1010: IGS_GE_MSG_STACK.ADD;
1011: App_Exception.Raise_Exception;
1012: END get_term_total_wrap;
1013:
1119:
1120: CURSOR get_awd_data IS
1121: SELECT NULL fund_code,-1 fund_id,
1122: '
1156: igf_aw_awd_disb disb
1157: WHERE
1158: fmast.ci_cal_type = RTRIM (SUBSTR (p_param1, 1, 10))
1159: AND fmast.ci_sequence_number = TO_NUMBER (RTRIM (SUBSTR (p_param1, 11)))
1160: AND awd.base_id = igf_aw_gen_004.get_base_id_for_person (p_person_id, RTRIM (SUBSTR (p_param1, 1, 10)), TO_NUMBER (RTRIM (SUBSTR (p_param1, 11))))
1161: AND awd.fund_id = fmast.fund_id
1162: AND awd.award_status IN ('ACCEPTED', 'OFFERED')
1163: -- AND awd.notification_status_code IN ('R', 'F')
1164: AND awd.award_id = disb.award_id
1179: AND apt.award_prd_cd = NVL(p_param2, award_prd_cd))
1180: UNION
1181: SELECT NULL fund_code,-1 fund_id,
1182: '
1254:
1255: EXCEPTION
1256: WHEN OTHERS THEN
1257: FND_MESSAGE.SET_NAME('IGS','IGS_GE_UNHANDLED_EXP');
1258: FND_MESSAGE.SET_TOKEN('NAME','igf_aw_gen_004.award_letter_matrix' || SQLERRM);
1259: IGS_GE_MSG_STACK.ADD;
1260: App_Exception.Raise_Exception;
1261: END award_letter_matrix;
1262:
1353:
1354: BEGIN
1355:
1356: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1357: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Document Name '|| NVL(p_document_id , -99));
1358: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Selection Criteria '|| NVL(p_select_type , 'NULL'));
1359: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','derived Letter Code -> FAAWARD/FAMISTM/FADISBT '|| NVL(p_sys_ltr_code, 'NULL'));
1360: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Person ID '|| NVL(p_person_id , -99));
1361: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','List Name -> Person ID Group '|| NVL(p_list_id , -99));
1354: BEGIN
1355:
1356: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1357: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Document Name '|| NVL(p_document_id , -99));
1358: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Selection Criteria '|| NVL(p_select_type , 'NULL'));
1359: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','derived Letter Code -> FAAWARD/FAMISTM/FADISBT '|| NVL(p_sys_ltr_code, 'NULL'));
1360: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Person ID '|| NVL(p_person_id , -99));
1361: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','List Name -> Person ID Group '|| NVL(p_list_id , -99));
1362: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','derived Letter Code -> FAAWARD/FAMISTM/FADISBT '|| NVL(p_letter_type , 'NULL'));
1355:
1356: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1357: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Document Name '|| NVL(p_document_id , -99));
1358: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Selection Criteria '|| NVL(p_select_type , 'NULL'));
1359: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','derived Letter Code -> FAAWARD/FAMISTM/FADISBT '|| NVL(p_sys_ltr_code, 'NULL'));
1360: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Person ID '|| NVL(p_person_id , -99));
1361: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','List Name -> Person ID Group '|| NVL(p_list_id , -99));
1362: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','derived Letter Code -> FAAWARD/FAMISTM/FADISBT '|| NVL(p_letter_type , 'NULL'));
1363: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Award Year '|| NVL(p_parameter_1 , 'NULL'));
1356: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1357: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Document Name '|| NVL(p_document_id , -99));
1358: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Selection Criteria '|| NVL(p_select_type , 'NULL'));
1359: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','derived Letter Code -> FAAWARD/FAMISTM/FADISBT '|| NVL(p_sys_ltr_code, 'NULL'));
1360: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Person ID '|| NVL(p_person_id , -99));
1361: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','List Name -> Person ID Group '|| NVL(p_list_id , -99));
1362: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','derived Letter Code -> FAAWARD/FAMISTM/FADISBT '|| NVL(p_letter_type , 'NULL'));
1363: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Award Year '|| NVL(p_parameter_1 , 'NULL'));
1364: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Awarding period '|| NVL(p_parameter_2 , 'NULL'));
1357: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Document Name '|| NVL(p_document_id , -99));
1358: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Selection Criteria '|| NVL(p_select_type , 'NULL'));
1359: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','derived Letter Code -> FAAWARD/FAMISTM/FADISBT '|| NVL(p_sys_ltr_code, 'NULL'));
1360: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Person ID '|| NVL(p_person_id , -99));
1361: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','List Name -> Person ID Group '|| NVL(p_list_id , -99));
1362: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','derived Letter Code -> FAAWARD/FAMISTM/FADISBT '|| NVL(p_letter_type , 'NULL'));
1363: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Award Year '|| NVL(p_parameter_1 , 'NULL'));
1364: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Awarding period '|| NVL(p_parameter_2 , 'NULL'));
1365: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_3 , 'NULL'));
1358: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Selection Criteria '|| NVL(p_select_type , 'NULL'));
1359: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','derived Letter Code -> FAAWARD/FAMISTM/FADISBT '|| NVL(p_sys_ltr_code, 'NULL'));
1360: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Person ID '|| NVL(p_person_id , -99));
1361: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','List Name -> Person ID Group '|| NVL(p_list_id , -99));
1362: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','derived Letter Code -> FAAWARD/FAMISTM/FADISBT '|| NVL(p_letter_type , 'NULL'));
1363: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Award Year '|| NVL(p_parameter_1 , 'NULL'));
1364: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Awarding period '|| NVL(p_parameter_2 , 'NULL'));
1365: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_3 , 'NULL'));
1366: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_4 , 'NULL'));
1359: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','derived Letter Code -> FAAWARD/FAMISTM/FADISBT '|| NVL(p_sys_ltr_code, 'NULL'));
1360: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Person ID '|| NVL(p_person_id , -99));
1361: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','List Name -> Person ID Group '|| NVL(p_list_id , -99));
1362: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','derived Letter Code -> FAAWARD/FAMISTM/FADISBT '|| NVL(p_letter_type , 'NULL'));
1363: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Award Year '|| NVL(p_parameter_1 , 'NULL'));
1364: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Awarding period '|| NVL(p_parameter_2 , 'NULL'));
1365: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_3 , 'NULL'));
1366: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_4 , 'NULL'));
1367: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_5 , 'NULL'));
1360: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Person ID '|| NVL(p_person_id , -99));
1361: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','List Name -> Person ID Group '|| NVL(p_list_id , -99));
1362: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','derived Letter Code -> FAAWARD/FAMISTM/FADISBT '|| NVL(p_letter_type , 'NULL'));
1363: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Award Year '|| NVL(p_parameter_1 , 'NULL'));
1364: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Awarding period '|| NVL(p_parameter_2 , 'NULL'));
1365: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_3 , 'NULL'));
1366: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_4 , 'NULL'));
1367: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_5 , 'NULL'));
1368: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_6 , 'NULL'));
1361: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','List Name -> Person ID Group '|| NVL(p_list_id , -99));
1362: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','derived Letter Code -> FAAWARD/FAMISTM/FADISBT '|| NVL(p_letter_type , 'NULL'));
1363: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Award Year '|| NVL(p_parameter_1 , 'NULL'));
1364: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Awarding period '|| NVL(p_parameter_2 , 'NULL'));
1365: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_3 , 'NULL'));
1366: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_4 , 'NULL'));
1367: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_5 , 'NULL'));
1368: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_6 , 'NULL'));
1369: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_7 , 'NULL'));
1362: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','derived Letter Code -> FAAWARD/FAMISTM/FADISBT '|| NVL(p_letter_type , 'NULL'));
1363: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Award Year '|| NVL(p_parameter_1 , 'NULL'));
1364: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Awarding period '|| NVL(p_parameter_2 , 'NULL'));
1365: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_3 , 'NULL'));
1366: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_4 , 'NULL'));
1367: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_5 , 'NULL'));
1368: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_6 , 'NULL'));
1369: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_7 , 'NULL'));
1370: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Not Used '|| NVL(p_parameter_8 , 'NULL'));
1363: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Award Year '|| NVL(p_parameter_1 , 'NULL'));
1364: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Awarding period '|| NVL(p_parameter_2 , 'NULL'));
1365: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_3 , 'NULL'));
1366: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_4 , 'NULL'));
1367: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_5 , 'NULL'));
1368: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_6 , 'NULL'));
1369: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_7 , 'NULL'));
1370: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Not Used '|| NVL(p_parameter_8 , 'NULL'));
1371: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Not Used '|| NVL(p_parameter_9 , 'NULL'));
1364: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Awarding period '|| NVL(p_parameter_2 , 'NULL'));
1365: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_3 , 'NULL'));
1366: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_4 , 'NULL'));
1367: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_5 , 'NULL'));
1368: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_6 , 'NULL'));
1369: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_7 , 'NULL'));
1370: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Not Used '|| NVL(p_parameter_8 , 'NULL'));
1371: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Not Used '|| NVL(p_parameter_9 , 'NULL'));
1372: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Override Flag '|| NVL(p_flag , 'NULL'));
1365: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_3 , 'NULL'));
1366: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_4 , 'NULL'));
1367: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_5 , 'NULL'));
1368: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_6 , 'NULL'));
1369: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_7 , 'NULL'));
1370: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Not Used '|| NVL(p_parameter_8 , 'NULL'));
1371: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Not Used '|| NVL(p_parameter_9 , 'NULL'));
1372: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Override Flag '|| NVL(p_flag , 'NULL'));
1373: END IF;
1366: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_4 , 'NULL'));
1367: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_5 , 'NULL'));
1368: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_6 , 'NULL'));
1369: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_7 , 'NULL'));
1370: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Not Used '|| NVL(p_parameter_8 , 'NULL'));
1371: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Not Used '|| NVL(p_parameter_9 , 'NULL'));
1372: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Override Flag '|| NVL(p_flag , 'NULL'));
1373: END IF;
1374:
1367: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_5 , 'NULL'));
1368: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_6 , 'NULL'));
1369: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_7 , 'NULL'));
1370: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Not Used '|| NVL(p_parameter_8 , 'NULL'));
1371: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Not Used '|| NVL(p_parameter_9 , 'NULL'));
1372: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Override Flag '|| NVL(p_flag , 'NULL'));
1373: END IF;
1374:
1375: l_static_group := 'Y';
1368: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_6 , 'NULL'));
1369: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','p_parameter_3 '|| NVL(p_parameter_7 , 'NULL'));
1370: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Not Used '|| NVL(p_parameter_8 , 'NULL'));
1371: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Not Used '|| NVL(p_parameter_9 , 'NULL'));
1372: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.corp_pre_process.debug','Override Flag '|| NVL(p_flag , 'NULL'));
1373: END IF;
1374:
1375: l_static_group := 'Y';
1376:
1745: IF lv_sql_code = -06502 THEN
1746: fnd_message.set_name('IGF','IGF_AW_PERS_OVFLOW');
1747: ELSE
1748: FND_MESSAGE.SET_NAME('IGS','IGS_GE_UNHANDLED_EXP');
1749: FND_MESSAGE.SET_TOKEN('NAME','igf_aw_gen_004.corp_pre_process - ' || SQLERRM);
1750: END IF;
1751: IGS_GE_MSG_STACK.ADD;
1752: App_Exception.Raise_Exception;
1753:
1811:
1812: -- Get the Baseid for the person in an award year
1813:
1814: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1815: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.missing_items.debug','p_person_id:'||p_person_id);
1816: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.missing_items.debug','p_param1:'||p_param1);
1817: END IF;
1818:
1819: OPEN c_base;
1812: -- Get the Baseid for the person in an award year
1813:
1814: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1815: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.missing_items.debug','p_person_id:'||p_person_id);
1816: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.missing_items.debug','p_param1:'||p_param1);
1817: END IF;
1818:
1819: OPEN c_base;
1820: FETCH c_base INTO l_base;
1831: EXIT WHEN c_tdcur%NOTFOUND;
1832: IF l_tdrec.corsp_date IS NULL THEN
1833: p_return_status := 'S';
1834: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1835: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.missing_items.debug','p_return_status(1):'||p_return_status);
1836: END IF;
1837: EXIT;
1838: ELSE
1839: l_newcorsp_dt := l_tdrec.corsp_date + NVL (l_tdrec.freq_attempt, 0);
1841:
1842: IF (l_tdrec.max_attempt IS NOT NULL AND l_new_cnt <= l_tdrec.max_attempt AND l_newcorsp_dt <= SYSDATE) OR (l_tdrec.max_attempt IS NULL AND l_newcorsp_dt <= SYSDATE) THEN
1843: p_return_status := 'S';
1844: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1845: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.missing_items.debug','p_return_status(2):'||p_return_status);
1846: END IF;
1847: EXIT;
1848: ELSE
1849: p_return_status := 'F';
1853: END LOOP;
1854:
1855: CLOSE c_tdcur;
1856: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1857: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.missing_items.debug','p_return_status:'||p_return_status);
1858: END IF;
1859: EXCEPTION
1860: WHEN OTHERS THEN
1861: FND_MESSAGE.SET_NAME('IGS','IGS_GE_UNHANDLED_EXP');
1858: END IF;
1859: EXCEPTION
1860: WHEN OTHERS THEN
1861: FND_MESSAGE.SET_NAME('IGS','IGS_GE_UNHANDLED_EXP');
1862: FND_MESSAGE.SET_TOKEN('NAME','igf_aw_gen_004.missing_items');
1863: IGS_GE_MSG_STACK.ADD;
1864: App_Exception.Raise_Exception;
1865: END missing_items;
1866:
1943: CLOSE cur_loan_disb_rec;
1944: EXCEPTION
1945: WHEN OTHERS THEN
1946: FND_MESSAGE.SET_NAME('IGS','IGS_GE_UNHANDLED_EXP');
1947: FND_MESSAGE.SET_TOKEN('NAME','igf_aw_gen_004.loan_disbursement_update');
1948: IGS_GE_MSG_STACK.ADD;
1949: App_Exception.Raise_Exception;
1950:
1951: END loan_disbursement_update;
2054:
2055: EXCEPTION
2056: WHEN OTHERS THEN
2057: FND_MESSAGE.SET_NAME('IGS','IGS_GE_UNHANDLED_EXP');
2058: FND_MESSAGE.SET_TOKEN('NAME','IGF_AW_GEN_004.mising_items_update');
2059: IGS_GE_MSG_STACK.ADD;
2060: App_Exception.Raise_Exception;
2061: END missing_items_update;
2062:
2145: BEGIN
2146:
2147: -- Update award notification status to s = Sent.
2148: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
2149: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.award_letter_update.debug', 'p_person_id - ' || p_person_id);
2150: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.award_letter_update.debug', 'p_award_year - ' || p_award_year);
2151: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.award_letter_update.debug', 'p_award_prd_cd - ' || p_award_prd_cd);
2152: END IF;
2153:
2146:
2147: -- Update award notification status to s = Sent.
2148: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
2149: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.award_letter_update.debug', 'p_person_id - ' || p_person_id);
2150: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.award_letter_update.debug', 'p_award_year - ' || p_award_year);
2151: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.award_letter_update.debug', 'p_award_prd_cd - ' || p_award_prd_cd);
2152: END IF;
2153:
2154: igf_aw_gen.update_notification_status (
2147: -- Update award notification status to s = Sent.
2148: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
2149: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.award_letter_update.debug', 'p_person_id - ' || p_person_id);
2150: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.award_letter_update.debug', 'p_award_year - ' || p_award_year);
2151: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_gen_004.award_letter_update.debug', 'p_award_prd_cd - ' || p_award_prd_cd);
2152: END IF;
2153:
2154: igf_aw_gen.update_notification_status (
2155: p_cal_type => RTRIM (SUBSTR (p_award_year,1,10)),
2154: igf_aw_gen.update_notification_status (
2155: p_cal_type => RTRIM (SUBSTR (p_award_year,1,10)),
2156: p_seq_num => TO_NUMBER (RTRIM (SUBSTR (p_award_year, 11))),
2157: p_awarding_period => p_award_prd_cd,
2158: p_base_id => igf_aw_gen_004.get_base_id_for_person (p_person_id, RTRIM (SUBSTR (p_award_year, 1, 10)), TO_NUMBER (RTRIM (SUBSTR (p_award_year, 11)))),
2159: p_notification_status_code => 'S',
2160: p_notification_status_date => TRUNC(SYSDATE),
2161: p_called_from => 'IGFAW13B'
2162: ) ;
2163:
2164: EXCEPTION
2165: WHEN OTHERS THEN
2166: FND_MESSAGE.SET_NAME('IGS','IGS_GE_UNHANDLED_EXP');
2167: FND_MESSAGE.SET_TOKEN('NAME','IGF_AW_GEN_004.AWARD_LETTER_UPDATE');
2168: IGS_GE_MSG_STACK.ADD;
2169: App_Exception.Raise_Exception;
2170:
2171: END award_letter_update ;
2206: WHEN OTHERS THEN
2207: NULL;
2208:
2209: END get_corr_cust_text;
2210: END igf_aw_gen_004;