238: --Following codes checks whether message has token or not.
239: --If any call to igs_ss_en_wrappers results in a exception
240: --Then l_mesg_name contains the exception text and should not be translated
241: --Message texts are generally more than 30 chars and even if they are less
242: --than 30 chars, fnd_message returns the same text if it cant find a match.
243: --If messages larger than 30 chars (max size if msg_name field) are passed to
244: --fnd_message, an plsql exception is thrown.Hence the check for 30 characters size.
245: IF LENGTH(l_mesg_name)<=30 THEN
246: l_str_place :=INSTR(l_mesg_name,'*');
240: --Then l_mesg_name contains the exception text and should not be translated
241: --Message texts are generally more than 30 chars and even if they are less
242: --than 30 chars, fnd_message returns the same text if it cant find a match.
243: --If messages larger than 30 chars (max size if msg_name field) are passed to
244: --fnd_message, an plsql exception is thrown.Hence the check for 30 characters size.
245: IF LENGTH(l_mesg_name)<=30 THEN
246: l_str_place :=INSTR(l_mesg_name,'*');
247: IF l_str_place <> 0 THEN
248: l_msg_token:= SUBSTR(l_mesg_name,l_str_place+1);
246: l_str_place :=INSTR(l_mesg_name,'*');
247: IF l_str_place <> 0 THEN
248: l_msg_token:= SUBSTR(l_mesg_name,l_str_place+1);
249: l_mesg_name:= SUBSTR(l_mesg_name,1,l_str_place-1);
250: fnd_message.set_name('IGS',l_mesg_name);
251: fnd_message.set_token('UNIT_CD',l_msg_token);
252: ELSE
253: fnd_message.set_name('IGS',l_mesg_name);
254: END IF;
247: IF l_str_place <> 0 THEN
248: l_msg_token:= SUBSTR(l_mesg_name,l_str_place+1);
249: l_mesg_name:= SUBSTR(l_mesg_name,1,l_str_place-1);
250: fnd_message.set_name('IGS',l_mesg_name);
251: fnd_message.set_token('UNIT_CD',l_msg_token);
252: ELSE
253: fnd_message.set_name('IGS',l_mesg_name);
254: END IF;
255: l_mesg_txt:=fnd_message.get;
249: l_mesg_name:= SUBSTR(l_mesg_name,1,l_str_place-1);
250: fnd_message.set_name('IGS',l_mesg_name);
251: fnd_message.set_token('UNIT_CD',l_msg_token);
252: ELSE
253: fnd_message.set_name('IGS',l_mesg_name);
254: END IF;
255: l_mesg_txt:=fnd_message.get;
256: ELSE
257: l_mesg_txt:=l_mesg_name;
251: fnd_message.set_token('UNIT_CD',l_msg_token);
252: ELSE
253: fnd_message.set_name('IGS',l_mesg_name);
254: END IF;
255: l_mesg_txt:=fnd_message.get;
256: ELSE
257: l_mesg_txt:=l_mesg_name;
258: END IF; --30 character message name
259:
285: l_regid_person_dtls VARCHAR2(1000);
286:
287: BEGIN
288:
289: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_REG');
290: l_regid_person_dtls := fnd_message.get || ' : ' || p_regid || ' ';
291: Fnd_Message.SET_NAME ('IGS','IGS_PR_PERSON_ID');
292: l_regid_person_dtls := l_regid_person_dtls || fnd_message.get || ' : ' || p_person_number || ' ';
293:
286:
287: BEGIN
288:
289: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_REG');
290: l_regid_person_dtls := fnd_message.get || ' : ' || p_regid || ' ';
291: Fnd_Message.SET_NAME ('IGS','IGS_PR_PERSON_ID');
292: l_regid_person_dtls := l_regid_person_dtls || fnd_message.get || ' : ' || p_person_number || ' ';
293:
294: FND_MESSAGE.SET_NAME('IGS','IGS_FI_CAL_BALANCES_LOG');
287: BEGIN
288:
289: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_REG');
290: l_regid_person_dtls := fnd_message.get || ' : ' || p_regid || ' ';
291: Fnd_Message.SET_NAME ('IGS','IGS_PR_PERSON_ID');
292: l_regid_person_dtls := l_regid_person_dtls || fnd_message.get || ' : ' || p_person_number || ' ';
293:
294: FND_MESSAGE.SET_NAME('IGS','IGS_FI_CAL_BALANCES_LOG');
295: FND_MESSAGE.SET_TOKEN('PARAMETER_NAME','LOAD CAL ');
288:
289: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_REG');
290: l_regid_person_dtls := fnd_message.get || ' : ' || p_regid || ' ';
291: Fnd_Message.SET_NAME ('IGS','IGS_PR_PERSON_ID');
292: l_regid_person_dtls := l_regid_person_dtls || fnd_message.get || ' : ' || p_person_number || ' ';
293:
294: FND_MESSAGE.SET_NAME('IGS','IGS_FI_CAL_BALANCES_LOG');
295: FND_MESSAGE.SET_TOKEN('PARAMETER_NAME','LOAD CAL ');
296: FND_MESSAGE.SET_TOKEN('PARAMETER_VAL' ,p_load_cal_type||'*'||p_load_seq_number) ;
290: l_regid_person_dtls := fnd_message.get || ' : ' || p_regid || ' ';
291: Fnd_Message.SET_NAME ('IGS','IGS_PR_PERSON_ID');
292: l_regid_person_dtls := l_regid_person_dtls || fnd_message.get || ' : ' || p_person_number || ' ';
293:
294: FND_MESSAGE.SET_NAME('IGS','IGS_FI_CAL_BALANCES_LOG');
295: FND_MESSAGE.SET_TOKEN('PARAMETER_NAME','LOAD CAL ');
296: FND_MESSAGE.SET_TOKEN('PARAMETER_VAL' ,p_load_cal_type||'*'||p_load_seq_number) ;
297:
298: l_regid_person_dtls := l_regid_person_dtls || fnd_message.get;
291: Fnd_Message.SET_NAME ('IGS','IGS_PR_PERSON_ID');
292: l_regid_person_dtls := l_regid_person_dtls || fnd_message.get || ' : ' || p_person_number || ' ';
293:
294: FND_MESSAGE.SET_NAME('IGS','IGS_FI_CAL_BALANCES_LOG');
295: FND_MESSAGE.SET_TOKEN('PARAMETER_NAME','LOAD CAL ');
296: FND_MESSAGE.SET_TOKEN('PARAMETER_VAL' ,p_load_cal_type||'*'||p_load_seq_number) ;
297:
298: l_regid_person_dtls := l_regid_person_dtls || fnd_message.get;
299: Fnd_File.PUT_LINE(Fnd_File.LOG,l_regid_person_dtls);
292: l_regid_person_dtls := l_regid_person_dtls || fnd_message.get || ' : ' || p_person_number || ' ';
293:
294: FND_MESSAGE.SET_NAME('IGS','IGS_FI_CAL_BALANCES_LOG');
295: FND_MESSAGE.SET_TOKEN('PARAMETER_NAME','LOAD CAL ');
296: FND_MESSAGE.SET_TOKEN('PARAMETER_VAL' ,p_load_cal_type||'*'||p_load_seq_number) ;
297:
298: l_regid_person_dtls := l_regid_person_dtls || fnd_message.get;
299: Fnd_File.PUT_LINE(Fnd_File.LOG,l_regid_person_dtls);
300:
294: FND_MESSAGE.SET_NAME('IGS','IGS_FI_CAL_BALANCES_LOG');
295: FND_MESSAGE.SET_TOKEN('PARAMETER_NAME','LOAD CAL ');
296: FND_MESSAGE.SET_TOKEN('PARAMETER_VAL' ,p_load_cal_type||'*'||p_load_seq_number) ;
297:
298: l_regid_person_dtls := l_regid_person_dtls || fnd_message.get;
299: Fnd_File.PUT_LINE(Fnd_File.LOG,l_regid_person_dtls);
300:
301: END log_regid_person_dtls;
302:
390:
391: FETCH get_person_number into l_person_id ;
392: IF get_person_number%NOTFOUND THEN
393:
394: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_PERSON_NUMBER');
395: l_message := FND_MESSAGE.GET;
396: l_message_text := l_message ;
397:
398: END IF ;
391: FETCH get_person_number into l_person_id ;
392: IF get_person_number%NOTFOUND THEN
393:
394: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_PERSON_NUMBER');
395: l_message := FND_MESSAGE.GET;
396: l_message_text := l_message ;
397:
398: END IF ;
399: CLOSE get_person_number ;
403: OPEN get_course_cd(l_reg_update_int_rec.course_cd );
404: FETCH get_course_cd into l_course_cd_chk;
405: IF get_course_cd%NOTFOUND THEN
406:
407: FND_MESSAGE.SET_NAME('IGS','IGS_PR_INVALID_PRG_CD');
408: l_message := FND_MESSAGE.GET;
409:
410: IF l_message_text IS NOT NULL THEN
411: l_message_text := l_message_text || ';' || l_message ;
404: FETCH get_course_cd into l_course_cd_chk;
405: IF get_course_cd%NOTFOUND THEN
406:
407: FND_MESSAGE.SET_NAME('IGS','IGS_PR_INVALID_PRG_CD');
408: l_message := FND_MESSAGE.GET;
409:
410: IF l_message_text IS NOT NULL THEN
411: l_message_text := l_message_text || ';' || l_message ;
412: ELSE
424:
425: -- If NO matching Academic Cal is found , or if multiple matches are found , error out.
426: IF l_cnt > 1 OR l_cnt = 0 THEN
427:
428: FND_MESSAGE.SET_NAME('IGS','IGS_EN_INVLD_ACA_CD');
429: l_message := FND_MESSAGE.GET;
430:
431: IF l_message_text IS NOT NULL THEN
432: l_message_text := l_message_text || ';' || l_message ;
425: -- If NO matching Academic Cal is found , or if multiple matches are found , error out.
426: IF l_cnt > 1 OR l_cnt = 0 THEN
427:
428: FND_MESSAGE.SET_NAME('IGS','IGS_EN_INVLD_ACA_CD');
429: l_message := FND_MESSAGE.GET;
430:
431: IF l_message_text IS NOT NULL THEN
432: l_message_text := l_message_text || ';' || l_message ;
433: ELSE
616: l_get_load_cal_inst_rec.sequence_number ) = 'SECONDARY'
617: THEN
618: log_regid_person_dtls(l_reg_update_int_rec.registration_id,l_reg_update_int_rec.person_number,
619: l_get_load_cal_inst_rec.cal_type,l_get_load_cal_inst_rec.sequence_number);
620: fnd_message.set_name('IGS','IGS_EN_UPD_FUT_TRANS');
621: fnd_message.set_token('COURSE_CD',l_prgm_dtls_rec.course_cd);
622: fnd_message.set_token('UNIT_CD',l_unitcd_and_uooid_str);
623: fnd_file.put_line(fnd_file.log, fnd_message.get);
624: END IF ; -- end of igs_en_spa_terms_api.get_spat_primary_prg
617: THEN
618: log_regid_person_dtls(l_reg_update_int_rec.registration_id,l_reg_update_int_rec.person_number,
619: l_get_load_cal_inst_rec.cal_type,l_get_load_cal_inst_rec.sequence_number);
620: fnd_message.set_name('IGS','IGS_EN_UPD_FUT_TRANS');
621: fnd_message.set_token('COURSE_CD',l_prgm_dtls_rec.course_cd);
622: fnd_message.set_token('UNIT_CD',l_unitcd_and_uooid_str);
623: fnd_file.put_line(fnd_file.log, fnd_message.get);
624: END IF ; -- end of igs_en_spa_terms_api.get_spat_primary_prg
625: --end of code added by ckasu as apart of bug#4095276
618: log_regid_person_dtls(l_reg_update_int_rec.registration_id,l_reg_update_int_rec.person_number,
619: l_get_load_cal_inst_rec.cal_type,l_get_load_cal_inst_rec.sequence_number);
620: fnd_message.set_name('IGS','IGS_EN_UPD_FUT_TRANS');
621: fnd_message.set_token('COURSE_CD',l_prgm_dtls_rec.course_cd);
622: fnd_message.set_token('UNIT_CD',l_unitcd_and_uooid_str);
623: fnd_file.put_line(fnd_file.log, fnd_message.get);
624: END IF ; -- end of igs_en_spa_terms_api.get_spat_primary_prg
625: --end of code added by ckasu as apart of bug#4095276
626:
619: l_get_load_cal_inst_rec.cal_type,l_get_load_cal_inst_rec.sequence_number);
620: fnd_message.set_name('IGS','IGS_EN_UPD_FUT_TRANS');
621: fnd_message.set_token('COURSE_CD',l_prgm_dtls_rec.course_cd);
622: fnd_message.set_token('UNIT_CD',l_unitcd_and_uooid_str);
623: fnd_file.put_line(fnd_file.log, fnd_message.get);
624: END IF ; -- end of igs_en_spa_terms_api.get_spat_primary_prg
625: --end of code added by ckasu as apart of bug#4095276
626:
627: l_message_name:=NULL;
639: p_enr_method => p_enroll_mtd_type,
640: p_enrolled_dt => SYSDATE);
641: EXCEPTION WHEN OTHERS THEN
642: IF IGS_GE_MSG_STACK.COUNT_MSG <> 0 THEN
643: l_message_name := FND_MESSAGE.GET;
644: ELSE
645: l_message_name := SQLERRM;
646: END IF;
647: l_deny_warn := 'DENY';
694: EXCEPTION
695: WHEN OTHERS THEN
696: l_del_int_rec := 'N';
697: ROLLBACK TO load_prgm_rec ;
698: FND_MESSAGE.SET_NAME('IGS','IGS_EN_PGM_STP_FAIL');
699: l_message_text := l_message_text || ',' || FND_MESSAGE.GET;
700: UPDATE igs_en_reg_upd_int
701: SET errors = l_message_text ,
702: creation_date = l_creation_date ,
695: WHEN OTHERS THEN
696: l_del_int_rec := 'N';
697: ROLLBACK TO load_prgm_rec ;
698: FND_MESSAGE.SET_NAME('IGS','IGS_EN_PGM_STP_FAIL');
699: l_message_text := l_message_text || ',' || FND_MESSAGE.GET;
700: UPDATE igs_en_reg_upd_int
701: SET errors = l_message_text ,
702: creation_date = l_creation_date ,
703: last_update_date = l_last_update_date ,
745: -- If no INACTIVE Program Attempts are found, log the error message and start processing the next record.
746: IF l_prgm_inactive_chk = 'N'
747: THEN
748: -- Update the records with error message in the interface table
749: FND_MESSAGE.SET_NAME('IGS','IGS_EN_INACT_PGM');
750: l_message_text := FND_MESSAGE.GET;
751: UPDATE igs_en_reg_upd_int
752: SET errors = l_message_text ,
753: creation_date = l_creation_date ,
746: IF l_prgm_inactive_chk = 'N'
747: THEN
748: -- Update the records with error message in the interface table
749: FND_MESSAGE.SET_NAME('IGS','IGS_EN_INACT_PGM');
750: l_message_text := FND_MESSAGE.GET;
751: UPDATE igs_en_reg_upd_int
752: SET errors = l_message_text ,
753: creation_date = l_creation_date ,
754: last_update_date = l_last_update_date ,
764: --
765: -- Update FAIL error messages for records that failed all validations.
766: ELSIF l_del_int_rec = 'N' AND l_prgm_val_int_pass = 'N'
767: THEN
768: FND_MESSAGE.SET_NAME('IGS','IGS_EN_PGM_STP_FAIL');
769: l_message_text := FND_MESSAGE.GET;
770: UPDATE igs_en_reg_upd_int
771: SET errors = l_message_text ,
772: creation_date = l_creation_date ,
765: -- Update FAIL error messages for records that failed all validations.
766: ELSIF l_del_int_rec = 'N' AND l_prgm_val_int_pass = 'N'
767: THEN
768: FND_MESSAGE.SET_NAME('IGS','IGS_EN_PGM_STP_FAIL');
769: l_message_text := FND_MESSAGE.GET;
770: UPDATE igs_en_reg_upd_int
771: SET errors = l_message_text ,
772: creation_date = l_creation_date ,
773: last_update_date = l_last_update_date ,
783: --
784: -- Update WARN error messages for records that partially passed the validations.
785: ELSIF l_del_int_rec = 'N' AND l_prgm_val_int_pass = 'Y' AND l_unit_val_pass = 'N'
786: THEN
787: FND_MESSAGE.SET_NAME('IGS','IGS_EN_PGM_STP_WARN');
788: l_message_text := FND_MESSAGE.GET;
789: UPDATE igs_en_reg_upd_int
790: SET errors = l_message_text ,
791: creation_date = l_creation_date ,
784: -- Update WARN error messages for records that partially passed the validations.
785: ELSIF l_del_int_rec = 'N' AND l_prgm_val_int_pass = 'Y' AND l_unit_val_pass = 'N'
786: THEN
787: FND_MESSAGE.SET_NAME('IGS','IGS_EN_PGM_STP_WARN');
788: l_message_text := FND_MESSAGE.GET;
789: UPDATE igs_en_reg_upd_int
790: SET errors = l_message_text ,
791: creation_date = l_creation_date ,
792: last_update_date = l_last_update_date ,
814: -- should be updated in the interface table, and processing should continue for the next record.
815: EXCEPTION
816: WHEN OTHERS THEN
817: ROLLBACK TO interface_rec;
818: l_message_text := FND_MESSAGE.GET;
819: Fnd_Message.Set_name('IGS','IGS_GE_UNHANDLED_EXP');
820: FND_MESSAGE.SET_TOKEN('NAME','IGS_EN_GEN_016.enrp_batch_reg_upd');
821: l_message_text := l_message_text || ',' || FND_MESSAGE.GET;
822: UPDATE igs_en_reg_upd_int
815: EXCEPTION
816: WHEN OTHERS THEN
817: ROLLBACK TO interface_rec;
818: l_message_text := FND_MESSAGE.GET;
819: Fnd_Message.Set_name('IGS','IGS_GE_UNHANDLED_EXP');
820: FND_MESSAGE.SET_TOKEN('NAME','IGS_EN_GEN_016.enrp_batch_reg_upd');
821: l_message_text := l_message_text || ',' || FND_MESSAGE.GET;
822: UPDATE igs_en_reg_upd_int
823: SET errors = l_message_text ,
816: WHEN OTHERS THEN
817: ROLLBACK TO interface_rec;
818: l_message_text := FND_MESSAGE.GET;
819: Fnd_Message.Set_name('IGS','IGS_GE_UNHANDLED_EXP');
820: FND_MESSAGE.SET_TOKEN('NAME','IGS_EN_GEN_016.enrp_batch_reg_upd');
821: l_message_text := l_message_text || ',' || FND_MESSAGE.GET;
822: UPDATE igs_en_reg_upd_int
823: SET errors = l_message_text ,
824: creation_date = l_creation_date ,
817: ROLLBACK TO interface_rec;
818: l_message_text := FND_MESSAGE.GET;
819: Fnd_Message.Set_name('IGS','IGS_GE_UNHANDLED_EXP');
820: FND_MESSAGE.SET_TOKEN('NAME','IGS_EN_GEN_016.enrp_batch_reg_upd');
821: l_message_text := l_message_text || ',' || FND_MESSAGE.GET;
822: UPDATE igs_en_reg_upd_int
823: SET errors = l_message_text ,
824: creation_date = l_creation_date ,
825: last_update_date = l_last_update_date ,
954: CLOSE cur_pref_per_type;
955:
956: --
957: -- Get the labels for the batch details
958: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_BATCH');
959: l_batch_id_label := fnd_message.get;
960: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_DESC');
961: l_batch_desc_label := fnd_message.get;
962: --
955:
956: --
957: -- Get the labels for the batch details
958: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_BATCH');
959: l_batch_id_label := fnd_message.get;
960: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_DESC');
961: l_batch_desc_label := fnd_message.get;
962: --
963: -- log the Batch details into log file
956: --
957: -- Get the labels for the batch details
958: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_BATCH');
959: l_batch_id_label := fnd_message.get;
960: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_DESC');
961: l_batch_desc_label := fnd_message.get;
962: --
963: -- log the Batch details into log file
964: Fnd_File.PUT_LINE(Fnd_File.LOG,'=============================================================================');
957: -- Get the labels for the batch details
958: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_BATCH');
959: l_batch_id_label := fnd_message.get;
960: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_DESC');
961: l_batch_desc_label := fnd_message.get;
962: --
963: -- log the Batch details into log file
964: Fnd_File.PUT_LINE(Fnd_File.LOG,'=============================================================================');
965: Fnd_File.PUT_LINE(Fnd_File.LOG,l_batch_id_label||' : '||RPAD(p_batch_id,20,' ')||l_batch_desc_label||' : '||l_batch_desc);
969: FETCH get_int_cnt INTO l_later_cnt;
970: CLOSE get_int_cnt ;
971:
972: IF l_int_cnt = 0 THEN
973: Fnd_Message.SET_NAME ('IGS','IGS_EN_NO_DATA_IMP');
974: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get);
975: RETURN;
976: ELSIF l_later_cnt = l_int_cnt THEN
977: Fnd_Message.SET_NAME ('IGS','IGS_EN_NO_DATA_IMP');
970: CLOSE get_int_cnt ;
971:
972: IF l_int_cnt = 0 THEN
973: Fnd_Message.SET_NAME ('IGS','IGS_EN_NO_DATA_IMP');
974: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get);
975: RETURN;
976: ELSIF l_later_cnt = l_int_cnt THEN
977: Fnd_Message.SET_NAME ('IGS','IGS_EN_NO_DATA_IMP');
978: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get);
973: Fnd_Message.SET_NAME ('IGS','IGS_EN_NO_DATA_IMP');
974: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get);
975: RETURN;
976: ELSIF l_later_cnt = l_int_cnt THEN
977: Fnd_Message.SET_NAME ('IGS','IGS_EN_NO_DATA_IMP');
978: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get);
979: END IF ;
980:
981: --
974: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get);
975: RETURN;
976: ELSIF l_later_cnt = l_int_cnt THEN
977: Fnd_Message.SET_NAME ('IGS','IGS_EN_NO_DATA_IMP');
978: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get);
979: END IF ;
980:
981: --
982: -- Get all the records in Interface table where 'errors' column has value.
996: OPEN cur_alt_pers_id(l_pref_per_type,l_person_id);
997: FETCH cur_alt_pers_id INTO l_alt_pers_id;
998: CLOSE cur_alt_pers_id;
999:
1000: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_REG');
1001: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get||' : '||cur_enr_reg_err_rec.registration_id);
1002: Fnd_Message.SET_NAME ('IGS','IGS_PR_PERSON_ID');
1003: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get||' : '||cur_enr_reg_err_rec.person_number);
1004: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_NAME');
997: FETCH cur_alt_pers_id INTO l_alt_pers_id;
998: CLOSE cur_alt_pers_id;
999:
1000: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_REG');
1001: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get||' : '||cur_enr_reg_err_rec.registration_id);
1002: Fnd_Message.SET_NAME ('IGS','IGS_PR_PERSON_ID');
1003: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get||' : '||cur_enr_reg_err_rec.person_number);
1004: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_NAME');
1005: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get||' : '||l_full_name);
998: CLOSE cur_alt_pers_id;
999:
1000: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_REG');
1001: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get||' : '||cur_enr_reg_err_rec.registration_id);
1002: Fnd_Message.SET_NAME ('IGS','IGS_PR_PERSON_ID');
1003: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get||' : '||cur_enr_reg_err_rec.person_number);
1004: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_NAME');
1005: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get||' : '||l_full_name);
1006: Fnd_File.PUT_LINE(Fnd_File.LOG,l_pref_per_type||' : '||l_alt_pers_id);
999:
1000: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_REG');
1001: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get||' : '||cur_enr_reg_err_rec.registration_id);
1002: Fnd_Message.SET_NAME ('IGS','IGS_PR_PERSON_ID');
1003: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get||' : '||cur_enr_reg_err_rec.person_number);
1004: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_NAME');
1005: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get||' : '||l_full_name);
1006: Fnd_File.PUT_LINE(Fnd_File.LOG,l_pref_per_type||' : '||l_alt_pers_id);
1007: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_PGM');
1000: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_REG');
1001: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get||' : '||cur_enr_reg_err_rec.registration_id);
1002: Fnd_Message.SET_NAME ('IGS','IGS_PR_PERSON_ID');
1003: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get||' : '||cur_enr_reg_err_rec.person_number);
1004: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_NAME');
1005: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get||' : '||l_full_name);
1006: Fnd_File.PUT_LINE(Fnd_File.LOG,l_pref_per_type||' : '||l_alt_pers_id);
1007: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_PGM');
1008: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get||' : '||cur_enr_reg_err_rec.course_cd);
1001: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get||' : '||cur_enr_reg_err_rec.registration_id);
1002: Fnd_Message.SET_NAME ('IGS','IGS_PR_PERSON_ID');
1003: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get||' : '||cur_enr_reg_err_rec.person_number);
1004: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_NAME');
1005: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get||' : '||l_full_name);
1006: Fnd_File.PUT_LINE(Fnd_File.LOG,l_pref_per_type||' : '||l_alt_pers_id);
1007: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_PGM');
1008: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get||' : '||cur_enr_reg_err_rec.course_cd);
1009: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_ACAD');
1003: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get||' : '||cur_enr_reg_err_rec.person_number);
1004: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_NAME');
1005: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get||' : '||l_full_name);
1006: Fnd_File.PUT_LINE(Fnd_File.LOG,l_pref_per_type||' : '||l_alt_pers_id);
1007: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_PGM');
1008: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get||' : '||cur_enr_reg_err_rec.course_cd);
1009: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_ACAD');
1010: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get||' : '||cur_enr_reg_err_rec.alternate_code);
1011: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_ERR');
1004: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_NAME');
1005: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get||' : '||l_full_name);
1006: Fnd_File.PUT_LINE(Fnd_File.LOG,l_pref_per_type||' : '||l_alt_pers_id);
1007: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_PGM');
1008: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get||' : '||cur_enr_reg_err_rec.course_cd);
1009: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_ACAD');
1010: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get||' : '||cur_enr_reg_err_rec.alternate_code);
1011: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_ERR');
1012: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get||' : '||cur_enr_reg_err_rec.errors);
1005: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get||' : '||l_full_name);
1006: Fnd_File.PUT_LINE(Fnd_File.LOG,l_pref_per_type||' : '||l_alt_pers_id);
1007: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_PGM');
1008: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get||' : '||cur_enr_reg_err_rec.course_cd);
1009: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_ACAD');
1010: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get||' : '||cur_enr_reg_err_rec.alternate_code);
1011: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_ERR');
1012: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get||' : '||cur_enr_reg_err_rec.errors);
1013:
1006: Fnd_File.PUT_LINE(Fnd_File.LOG,l_pref_per_type||' : '||l_alt_pers_id);
1007: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_PGM');
1008: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get||' : '||cur_enr_reg_err_rec.course_cd);
1009: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_ACAD');
1010: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get||' : '||cur_enr_reg_err_rec.alternate_code);
1011: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_ERR');
1012: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get||' : '||cur_enr_reg_err_rec.errors);
1013:
1014: Fnd_File.PUT_LINE(Fnd_File.LOG,'-----------------------------------------------------------------------------');
1007: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_PGM');
1008: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get||' : '||cur_enr_reg_err_rec.course_cd);
1009: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_ACAD');
1010: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get||' : '||cur_enr_reg_err_rec.alternate_code);
1011: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_ERR');
1012: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get||' : '||cur_enr_reg_err_rec.errors);
1013:
1014: Fnd_File.PUT_LINE(Fnd_File.LOG,'-----------------------------------------------------------------------------');
1015:
1008: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get||' : '||cur_enr_reg_err_rec.course_cd);
1009: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_ACAD');
1010: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get||' : '||cur_enr_reg_err_rec.alternate_code);
1011: Fnd_Message.SET_NAME ('IGS','IGS_EN_REG_LOG_ERR');
1012: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get||' : '||cur_enr_reg_err_rec.errors);
1013:
1014: Fnd_File.PUT_LINE(Fnd_File.LOG,'-----------------------------------------------------------------------------');
1015:
1016: END LOOP;
1020: -- If No error record(s) were found , show this message indicating that all records were processed ,
1021: -- Data imported into OSS tables and records in Interface Table deleted.
1022: --
1023: IF l_error_rec = 'N' THEN
1024: Fnd_Message.Set_name('IGS','IGS_EN_REG_UPD_SUCCESS');
1025: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get);
1026: Fnd_File.PUT_LINE(Fnd_File.LOG,'-----------------------------------------------------------------------------');
1027: END IF;
1028:
1021: -- Data imported into OSS tables and records in Interface Table deleted.
1022: --
1023: IF l_error_rec = 'N' THEN
1024: Fnd_Message.Set_name('IGS','IGS_EN_REG_UPD_SUCCESS');
1025: Fnd_File.PUT_LINE(Fnd_File.LOG,fnd_message.get);
1026: Fnd_File.PUT_LINE(Fnd_File.LOG,'-----------------------------------------------------------------------------');
1027: END IF;
1028:
1029: EXCEPTION
1029: EXCEPTION
1030: WHEN OTHERS THEN
1031: retcode:=2;
1032: Fnd_File.PUT_LINE(Fnd_File.LOG,SQLERRM);
1033: ERRBUF := Fnd_Message.GET_STRING('IGS','IGS_GE_UNHANDLED_EXCEPTION');
1034: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
1035:
1036: END enrp_batch_reg_upd;
1037: