936:
937: l_error := igf_ap_gen.get_lookup_meaning('IGF_AW_LOOKUPS_MSG','ERROR');
938: l_chk_profile := igf_ap_gen.check_profile;
939: IF l_chk_profile = 'N' THEN
940: fnd_message.set_name('IGF','IGF_AP_LGCY_PROC_NOT_RUN');
941: fnd_file.put_line(fnd_file.log,RPAD(l_error,12) || fnd_message.get);
942: RETURN;
943: END IF;
944:
937: l_error := igf_ap_gen.get_lookup_meaning('IGF_AW_LOOKUPS_MSG','ERROR');
938: l_chk_profile := igf_ap_gen.check_profile;
939: IF l_chk_profile = 'N' THEN
940: fnd_message.set_name('IGF','IGF_AP_LGCY_PROC_NOT_RUN');
941: fnd_file.put_line(fnd_file.log,RPAD(l_error,12) || fnd_message.get);
942: RETURN;
943: END IF;
944:
945: l_chk_batch := igf_ap_gen.check_batch(p_batch_id,'ISIR');
943: END IF;
944:
945: l_chk_batch := igf_ap_gen.check_batch(p_batch_id,'ISIR');
946: IF l_chk_batch = 'N' THEN
947: fnd_message.set_name('IGF','IGF_GR_BATCH_DOES_NOT_EXIST');
948: add_log_table_process(NULL,l_error,fnd_message.get);
949: l_terminate_flag := TRUE;
950: END IF;
951: -- this is to get the alternate code
944:
945: l_chk_batch := igf_ap_gen.check_batch(p_batch_id,'ISIR');
946: IF l_chk_batch = 'N' THEN
947: fnd_message.set_name('IGF','IGF_GR_BATCH_DOES_NOT_EXIST');
948: add_log_table_process(NULL,l_error,fnd_message.get);
949: l_terminate_flag := TRUE;
950: END IF;
951: -- this is to get the alternate code
952: l_get_alternate_code := NULL;
960: FETCH c_get_status INTO l_get_status;
961: CLOSE c_get_status;
962:
963: IF l_get_status.award_year_status_code NOT IN ('O','LD') THEN
964: fnd_message.set_name('IGF','IGF_AP_LG_INVALID_STAT');
965: fnd_message.set_token('AWARD_STATUS',l_get_status.award_year_status_code);
966: add_log_table_process(NULL,l_error,fnd_message.get);
967: l_terminate_flag := TRUE;
968: END IF;
961: CLOSE c_get_status;
962:
963: IF l_get_status.award_year_status_code NOT IN ('O','LD') THEN
964: fnd_message.set_name('IGF','IGF_AP_LG_INVALID_STAT');
965: fnd_message.set_token('AWARD_STATUS',l_get_status.award_year_status_code);
966: add_log_table_process(NULL,l_error,fnd_message.get);
967: l_terminate_flag := TRUE;
968: END IF;
969: IF l_terminate_flag = TRUE THEN
962:
963: IF l_get_status.award_year_status_code NOT IN ('O','LD') THEN
964: fnd_message.set_name('IGF','IGF_AP_LG_INVALID_STAT');
965: fnd_message.set_token('AWARD_STATUS',l_get_status.award_year_status_code);
966: add_log_table_process(NULL,l_error,fnd_message.get);
967: l_terminate_flag := TRUE;
968: END IF;
969: IF l_terminate_flag = TRUE THEN
970: print_log_process(l_get_alternate_code.alternate_code,p_batch_id,p_del_ind);
994: lv_base_id := NULL;
995: lv_person_id := NULL;
996: igf_ap_gen.check_person(l_get_records.person_number,l_cal_type,l_seq_number,lv_person_id,lv_base_id);
997: IF lv_person_id IS NULL THEN
998: fnd_message.set_name('IGF','IGF_AP_PE_NOT_EXIST');
999: add_log_table_process(l_get_records.person_number,l_error,fnd_message.get);
1000: l_error_flag := TRUE;
1001: ELSE
1002: IF lv_base_id IS NULL THEN
995: lv_person_id := NULL;
996: igf_ap_gen.check_person(l_get_records.person_number,l_cal_type,l_seq_number,lv_person_id,lv_base_id);
997: IF lv_person_id IS NULL THEN
998: fnd_message.set_name('IGF','IGF_AP_PE_NOT_EXIST');
999: add_log_table_process(l_get_records.person_number,l_error,fnd_message.get);
1000: l_error_flag := TRUE;
1001: ELSE
1002: IF lv_base_id IS NULL THEN
1003: fnd_message.set_name('IGF','IGF_AP_FABASE_NOT_FOUND');
999: add_log_table_process(l_get_records.person_number,l_error,fnd_message.get);
1000: l_error_flag := TRUE;
1001: ELSE
1002: IF lv_base_id IS NULL THEN
1003: fnd_message.set_name('IGF','IGF_AP_FABASE_NOT_FOUND');
1004: add_log_table_process(l_get_records.person_number,l_error,fnd_message.get);
1005: l_error_flag := TRUE;
1006: ELSE
1007: l_debug_str := l_debug_str || ' Person and Base ID check passed';
1000: l_error_flag := TRUE;
1001: ELSE
1002: IF lv_base_id IS NULL THEN
1003: fnd_message.set_name('IGF','IGF_AP_FABASE_NOT_FOUND');
1004: add_log_table_process(l_get_records.person_number,l_error,fnd_message.get);
1005: l_error_flag := TRUE;
1006: ELSE
1007: l_debug_str := l_debug_str || ' Person and Base ID check passed';
1008: -- HERE THE CHK FOR THE BATCH YEAR WILL BE THERE
1006: ELSE
1007: l_debug_str := l_debug_str || ' Person and Base ID check passed';
1008: -- HERE THE CHK FOR THE BATCH YEAR WILL BE THERE
1009: IF l_get_records.batch_year_num <> NVL(l_get_status.batch_year,-1) THEN
1010: fnd_message.set_name('IGF','IGF_AP_AW_BATCH_NOT_EXISTS');
1011: add_log_table_process(l_get_records.person_number,l_error,fnd_message.get);
1012: l_error_flag := TRUE;
1013: ELSE
1014: g_baseid_exists := NULL;
1007: l_debug_str := l_debug_str || ' Person and Base ID check passed';
1008: -- HERE THE CHK FOR THE BATCH YEAR WILL BE THERE
1009: IF l_get_records.batch_year_num <> NVL(l_get_status.batch_year,-1) THEN
1010: fnd_message.set_name('IGF','IGF_AP_AW_BATCH_NOT_EXISTS');
1011: add_log_table_process(l_get_records.person_number,l_error,fnd_message.get);
1012: l_error_flag := TRUE;
1013: ELSE
1014: g_baseid_exists := NULL;
1015: OPEN c_baseid_exists(lv_base_id);
1019: OPEN c_chk_isir_rec_legacy(lv_base_id,l_get_records.batch_year_num);
1020: FETCH c_chk_isir_rec_legacy INTO l_chk_isir_rec_legacy;
1021: CLOSE c_chk_isir_rec_legacy;
1022: IF l_chk_isir_rec_legacy.isir_id IS NOT NULL THEN
1023: fnd_message.set_name('IGF','IGF_AP_NON_LI_ISIR_EXISTS');
1024: add_log_table_process(l_get_records.person_number,l_error,fnd_message.get);
1025: l_error_flag := TRUE;
1026: ELSE -- THIS MEANS THE THERE IS ISIR IS IMPORTED BY LEGACY ONLY
1027: l_debug_str := l_debug_str || ' Legacy ISIR check passed';
1020: FETCH c_chk_isir_rec_legacy INTO l_chk_isir_rec_legacy;
1021: CLOSE c_chk_isir_rec_legacy;
1022: IF l_chk_isir_rec_legacy.isir_id IS NOT NULL THEN
1023: fnd_message.set_name('IGF','IGF_AP_NON_LI_ISIR_EXISTS');
1024: add_log_table_process(l_get_records.person_number,l_error,fnd_message.get);
1025: l_error_flag := TRUE;
1026: ELSE -- THIS MEANS THE THERE IS ISIR IS IMPORTED BY LEGACY ONLY
1027: l_debug_str := l_debug_str || ' Legacy ISIR check passed';
1028: l_get_isir_rec := NULL;
1029: OPEN c_get_isir_rec(lv_base_id,l_get_records.batch_year_num,l_get_records.transaction_num_txt,'ORIGINAL');
1030: FETCH c_get_isir_rec INTO l_get_isir_rec;
1031: CLOSE c_get_isir_rec;
1032: IF l_get_isir_rec.isir_id IS NULL THEN
1033: fnd_message.set_name('IGF','IGF_AP_NO_ISIR_RECS_EXIST');
1034: add_log_table_process(l_get_records.person_number,l_error,fnd_message.get);
1035: l_error_flag := TRUE;
1036: ELSE
1037: l_debug_str := l_debug_str || ' ISIR record exists check passed';
1030: FETCH c_get_isir_rec INTO l_get_isir_rec;
1031: CLOSE c_get_isir_rec;
1032: IF l_get_isir_rec.isir_id IS NULL THEN
1033: fnd_message.set_name('IGF','IGF_AP_NO_ISIR_RECS_EXIST');
1034: add_log_table_process(l_get_records.person_number,l_error,fnd_message.get);
1035: l_error_flag := TRUE;
1036: ELSE
1037: l_debug_str := l_debug_str || ' ISIR record exists check passed';
1038: IF l_get_isir_rec.primary_efc IS NULL THEN
1035: l_error_flag := TRUE;
1036: ELSE
1037: l_debug_str := l_debug_str || ' ISIR record exists check passed';
1038: IF l_get_isir_rec.primary_efc IS NULL THEN
1039: fnd_message.set_name('IGF','IGF_AP_ISIR_INVALID_EFC');
1040: add_log_table_process(l_get_records.person_number,l_error,fnd_message.get);
1041: l_error_flag := TRUE;
1042: ELSE
1043: l_debug_str := l_debug_str || ' EFC check passed';
1036: ELSE
1037: l_debug_str := l_debug_str || ' ISIR record exists check passed';
1038: IF l_get_isir_rec.primary_efc IS NULL THEN
1039: fnd_message.set_name('IGF','IGF_AP_ISIR_INVALID_EFC');
1040: add_log_table_process(l_get_records.person_number,l_error,fnd_message.get);
1041: l_error_flag := TRUE;
1042: ELSE
1043: l_debug_str := l_debug_str || ' EFC check passed';
1044: l_old_act_isir := NULL;
1051: -- make the old as inactive and the current as the active ISIR
1052: update_isir_rec(l_old_act_isir,'N');
1053: l_process_flag := TRUE;
1054: ELSE
1055: fnd_message.set_name('IGF','IGF_AP_UPD_IND_NOT_SET');
1056: add_log_table_process(l_get_records.person_number,l_error,fnd_message.get);
1057: l_error_flag := TRUE;
1058: END IF; -- update flag is not set
1059: ELSE
1052: update_isir_rec(l_old_act_isir,'N');
1053: l_process_flag := TRUE;
1054: ELSE
1055: fnd_message.set_name('IGF','IGF_AP_UPD_IND_NOT_SET');
1056: add_log_table_process(l_get_records.person_number,l_error,fnd_message.get);
1057: l_error_flag := TRUE;
1058: END IF; -- update flag is not set
1059: ELSE
1060: fnd_message.set_name('IGF','IGF_AP_REC_ALREADY_ACT');
1056: add_log_table_process(l_get_records.person_number,l_error,fnd_message.get);
1057: l_error_flag := TRUE;
1058: END IF; -- update flag is not set
1059: ELSE
1060: fnd_message.set_name('IGF','IGF_AP_REC_ALREADY_ACT');
1061: add_log_table_process(l_get_records.person_number,l_error,fnd_message.get);
1062: l_error_flag := TRUE;
1063: END IF; --
1064: ELSE -- MEANS THE CURRENT ACTIVE ISIR DOES NOT EXISTS
1057: l_error_flag := TRUE;
1058: END IF; -- update flag is not set
1059: ELSE
1060: fnd_message.set_name('IGF','IGF_AP_REC_ALREADY_ACT');
1061: add_log_table_process(l_get_records.person_number,l_error,fnd_message.get);
1062: l_error_flag := TRUE;
1063: END IF; --
1064: ELSE -- MEANS THE CURRENT ACTIVE ISIR DOES NOT EXISTS
1065: l_process_flag := TRUE;
1082: END IF; -- BASE ID EXISTS OR NOT
1083: END IF; -- PERSON EXISTS OR NOT
1084:
1085: ELSE
1086: fnd_message.set_name('IGF','IGF_AP_MK_ACT_SKIP');
1087: add_log_table_process(l_get_records.person_number,l_error,fnd_message.get);
1088: l_error_flag := TRUE;
1089: END IF; -- if the person is not duplicate
1090: IF l_error_flag = TRUE THEN
1083: END IF; -- PERSON EXISTS OR NOT
1084:
1085: ELSE
1086: fnd_message.set_name('IGF','IGF_AP_MK_ACT_SKIP');
1087: add_log_table_process(l_get_records.person_number,l_error,fnd_message.get);
1088: l_error_flag := TRUE;
1089: END IF; -- if the person is not duplicate
1090: IF l_error_flag = TRUE THEN
1091: l_error_flag := FALSE;
1115: WHEN others THEN
1116: l_process_flag := FALSE;
1117: l_debug_str := NULL;
1118: l_error_flag := FALSE;
1119: fnd_message.set_name('IGS','IGS_GE_UNHANDLED_EXP');
1120: fnd_message.set_token('NAME','IGF_AP_MK_ISIR_ACT_PKG.LG_MAKE_ACTIVE_ISIR');
1121: add_log_table_process(l_get_records.person_number,l_error,fnd_message.get);
1122: ROLLBACK TO sp1;
1123: END;
1116: l_process_flag := FALSE;
1117: l_debug_str := NULL;
1118: l_error_flag := FALSE;
1119: fnd_message.set_name('IGS','IGS_GE_UNHANDLED_EXP');
1120: fnd_message.set_token('NAME','IGF_AP_MK_ISIR_ACT_PKG.LG_MAKE_ACTIVE_ISIR');
1121: add_log_table_process(l_get_records.person_number,l_error,fnd_message.get);
1122: ROLLBACK TO sp1;
1123: END;
1124: COMMIT;
1117: l_debug_str := NULL;
1118: l_error_flag := FALSE;
1119: fnd_message.set_name('IGS','IGS_GE_UNHANDLED_EXP');
1120: fnd_message.set_token('NAME','IGF_AP_MK_ISIR_ACT_PKG.LG_MAKE_ACTIVE_ISIR');
1121: add_log_table_process(l_get_records.person_number,l_error,fnd_message.get);
1122: ROLLBACK TO sp1;
1123: END;
1124: COMMIT;
1125: END LOOP;
1125: END LOOP;
1126: CLOSE c_get_records;
1127:
1128: IF l_success_record_cnt = 0 AND l_error_record_cnt = 0 THEN
1129: fnd_message.set_name('IGS','IGS_FI_NO_RECORD_AVAILABLE');
1130: add_log_table_process(NULL,l_error,fnd_message.get);
1131: END IF;
1132:
1133: -- CALL THE PRINT LOG PROCESS
1126: CLOSE c_get_records;
1127:
1128: IF l_success_record_cnt = 0 AND l_error_record_cnt = 0 THEN
1129: fnd_message.set_name('IGS','IGS_FI_NO_RECORD_AVAILABLE');
1130: add_log_table_process(NULL,l_error,fnd_message.get);
1131: END IF;
1132:
1133: -- CALL THE PRINT LOG PROCESS
1134: print_log_process(l_get_alternate_code.alternate_code,p_batch_id,p_del_ind);
1133: -- CALL THE PRINT LOG PROCESS
1134: print_log_process(l_get_alternate_code.alternate_code,p_batch_id,p_del_ind);
1135:
1136: l_total_record_cnt := l_success_record_cnt + l_error_record_cnt;
1137: fnd_message.set_name('IGS','IGS_GE_TOTAL_REC_PROCESSED');
1138: fnd_file.put_line(fnd_file.OUTPUT,fnd_message.get || ' ' || l_total_record_cnt);
1139: fnd_message.set_name('IGS','IGS_AD_SUCC_IMP_OFR_RESP_REC');
1140: fnd_file.put_line(fnd_file.OUTPUT,fnd_message.get || ' : ' || l_success_record_cnt);
1141: fnd_message.set_name('IGS','IGS_GE_TOTAL_REC_FAILED');
1134: print_log_process(l_get_alternate_code.alternate_code,p_batch_id,p_del_ind);
1135:
1136: l_total_record_cnt := l_success_record_cnt + l_error_record_cnt;
1137: fnd_message.set_name('IGS','IGS_GE_TOTAL_REC_PROCESSED');
1138: fnd_file.put_line(fnd_file.OUTPUT,fnd_message.get || ' ' || l_total_record_cnt);
1139: fnd_message.set_name('IGS','IGS_AD_SUCC_IMP_OFR_RESP_REC');
1140: fnd_file.put_line(fnd_file.OUTPUT,fnd_message.get || ' : ' || l_success_record_cnt);
1141: fnd_message.set_name('IGS','IGS_GE_TOTAL_REC_FAILED');
1142: fnd_file.put_line(fnd_file.OUTPUT,fnd_message.get || ' : ' || l_error_record_cnt);
1135:
1136: l_total_record_cnt := l_success_record_cnt + l_error_record_cnt;
1137: fnd_message.set_name('IGS','IGS_GE_TOTAL_REC_PROCESSED');
1138: fnd_file.put_line(fnd_file.OUTPUT,fnd_message.get || ' ' || l_total_record_cnt);
1139: fnd_message.set_name('IGS','IGS_AD_SUCC_IMP_OFR_RESP_REC');
1140: fnd_file.put_line(fnd_file.OUTPUT,fnd_message.get || ' : ' || l_success_record_cnt);
1141: fnd_message.set_name('IGS','IGS_GE_TOTAL_REC_FAILED');
1142: fnd_file.put_line(fnd_file.OUTPUT,fnd_message.get || ' : ' || l_error_record_cnt);
1143: EXCEPTION
1136: l_total_record_cnt := l_success_record_cnt + l_error_record_cnt;
1137: fnd_message.set_name('IGS','IGS_GE_TOTAL_REC_PROCESSED');
1138: fnd_file.put_line(fnd_file.OUTPUT,fnd_message.get || ' ' || l_total_record_cnt);
1139: fnd_message.set_name('IGS','IGS_AD_SUCC_IMP_OFR_RESP_REC');
1140: fnd_file.put_line(fnd_file.OUTPUT,fnd_message.get || ' : ' || l_success_record_cnt);
1141: fnd_message.set_name('IGS','IGS_GE_TOTAL_REC_FAILED');
1142: fnd_file.put_line(fnd_file.OUTPUT,fnd_message.get || ' : ' || l_error_record_cnt);
1143: EXCEPTION
1144: WHEN others THEN
1137: fnd_message.set_name('IGS','IGS_GE_TOTAL_REC_PROCESSED');
1138: fnd_file.put_line(fnd_file.OUTPUT,fnd_message.get || ' ' || l_total_record_cnt);
1139: fnd_message.set_name('IGS','IGS_AD_SUCC_IMP_OFR_RESP_REC');
1140: fnd_file.put_line(fnd_file.OUTPUT,fnd_message.get || ' : ' || l_success_record_cnt);
1141: fnd_message.set_name('IGS','IGS_GE_TOTAL_REC_FAILED');
1142: fnd_file.put_line(fnd_file.OUTPUT,fnd_message.get || ' : ' || l_error_record_cnt);
1143: EXCEPTION
1144: WHEN others THEN
1145: IF fnd_log.level_exception >= fnd_log.g_current_runtime_level THEN
1138: fnd_file.put_line(fnd_file.OUTPUT,fnd_message.get || ' ' || l_total_record_cnt);
1139: fnd_message.set_name('IGS','IGS_AD_SUCC_IMP_OFR_RESP_REC');
1140: fnd_file.put_line(fnd_file.OUTPUT,fnd_message.get || ' : ' || l_success_record_cnt);
1141: fnd_message.set_name('IGS','IGS_GE_TOTAL_REC_FAILED');
1142: fnd_file.put_line(fnd_file.OUTPUT,fnd_message.get || ' : ' || l_error_record_cnt);
1143: EXCEPTION
1144: WHEN others THEN
1145: IF fnd_log.level_exception >= fnd_log.g_current_runtime_level THEN
1146: fnd_log.string(fnd_log.level_exception,'igf.plsql.igf_ap_mk_isir_act_pkg.lg_make_active_isir.exception','Unhandled Exception: '||SQLERRM);
1144: WHEN others THEN
1145: IF fnd_log.level_exception >= fnd_log.g_current_runtime_level THEN
1146: fnd_log.string(fnd_log.level_exception,'igf.plsql.igf_ap_mk_isir_act_pkg.lg_make_active_isir.exception','Unhandled Exception: '||SQLERRM);
1147: END IF;
1148: fnd_message.set_name('IGF','IGF_GE_UNHANDLED_EXP');
1149: fnd_message.set_token('NAME','IGF_AP_MK_ISIR_ACT_PKG.LG_MAKE_ACTIVE_ISIR');
1150: errbuf := fnd_message.get;
1151: igs_ge_msg_stack.conc_exception_hndl;
1152:
1145: IF fnd_log.level_exception >= fnd_log.g_current_runtime_level THEN
1146: fnd_log.string(fnd_log.level_exception,'igf.plsql.igf_ap_mk_isir_act_pkg.lg_make_active_isir.exception','Unhandled Exception: '||SQLERRM);
1147: END IF;
1148: fnd_message.set_name('IGF','IGF_GE_UNHANDLED_EXP');
1149: fnd_message.set_token('NAME','IGF_AP_MK_ISIR_ACT_PKG.LG_MAKE_ACTIVE_ISIR');
1150: errbuf := fnd_message.get;
1151: igs_ge_msg_stack.conc_exception_hndl;
1152:
1153: END lg_make_active_isir;
1146: fnd_log.string(fnd_log.level_exception,'igf.plsql.igf_ap_mk_isir_act_pkg.lg_make_active_isir.exception','Unhandled Exception: '||SQLERRM);
1147: END IF;
1148: fnd_message.set_name('IGF','IGF_GE_UNHANDLED_EXP');
1149: fnd_message.set_token('NAME','IGF_AP_MK_ISIR_ACT_PKG.LG_MAKE_ACTIVE_ISIR');
1150: errbuf := fnd_message.get;
1151: igs_ge_msg_stack.conc_exception_hndl;
1152:
1153: END lg_make_active_isir;
1154:
1705: CLOSE c_get_batch_desc;
1706: l_batch_desc := l_get_batch_desc.batch_desc ;
1707:
1708: -- HERE THE INPUT PARAMETERS ARE TO BE LOGGED TO THE LOG FILE
1709: fnd_message.set_name('IGS','IGS_DA_JOB');
1710: fnd_file.put_line(fnd_file.log,fnd_message.get);
1711: fnd_file.put_line(fnd_file.log,l_batch_id || ' : ' || p_batch_id || ' - ' || l_batch_desc);
1712: fnd_file.put_line(fnd_file.log,l_award_yr || ' : ' || p_alternate_code);
1713: fnd_message.set_name('IGS','IGS_GE_ASK_DEL_REC');
1706: l_batch_desc := l_get_batch_desc.batch_desc ;
1707:
1708: -- HERE THE INPUT PARAMETERS ARE TO BE LOGGED TO THE LOG FILE
1709: fnd_message.set_name('IGS','IGS_DA_JOB');
1710: fnd_file.put_line(fnd_file.log,fnd_message.get);
1711: fnd_file.put_line(fnd_file.log,l_batch_id || ' : ' || p_batch_id || ' - ' || l_batch_desc);
1712: fnd_file.put_line(fnd_file.log,l_award_yr || ' : ' || p_alternate_code);
1713: fnd_message.set_name('IGS','IGS_GE_ASK_DEL_REC');
1714: fnd_file.put_line(fnd_file.log,fnd_message.get || ' : ' || l_yes_no);
1709: fnd_message.set_name('IGS','IGS_DA_JOB');
1710: fnd_file.put_line(fnd_file.log,fnd_message.get);
1711: fnd_file.put_line(fnd_file.log,l_batch_id || ' : ' || p_batch_id || ' - ' || l_batch_desc);
1712: fnd_file.put_line(fnd_file.log,l_award_yr || ' : ' || p_alternate_code);
1713: fnd_message.set_name('IGS','IGS_GE_ASK_DEL_REC');
1714: fnd_file.put_line(fnd_file.log,fnd_message.get || ' : ' || l_yes_no);
1715: fnd_file.put_line(fnd_file.log,'------------------------------------------------------------------------------');
1716:
1717: FOR i IN 1..l_count LOOP
1710: fnd_file.put_line(fnd_file.log,fnd_message.get);
1711: fnd_file.put_line(fnd_file.log,l_batch_id || ' : ' || p_batch_id || ' - ' || l_batch_desc);
1712: fnd_file.put_line(fnd_file.log,l_award_yr || ' : ' || p_alternate_code);
1713: fnd_message.set_name('IGS','IGS_GE_ASK_DEL_REC');
1714: fnd_file.put_line(fnd_file.log,fnd_message.get || ' : ' || l_yes_no);
1715: fnd_file.put_line(fnd_file.log,'------------------------------------------------------------------------------');
1716:
1717: FOR i IN 1..l_count LOOP
1718: IF g_log_tab(i).person_number IS NOT NULL THEN