18: cst_s_val_2 CONSTANT VARCHAR2(1) := '2';
19: cst_s_val_3 CONSTANT VARCHAR2(1) := '3';
20: cst_s_val_4 CONSTANT VARCHAR2(1) := '4';
21:
22: cst_et_val_E322 VARCHAR2(100) := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E322', 8405);
23: cst_et_val_E686 VARCHAR2(100) := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E686', 8405);
24: cst_et_val_E689 VARCHAR2(100) := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E689', 8405);
25: cst_et_val_E709 VARCHAR2(100) := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E709', 8405);
26: cst_et_val_E710 VARCHAR2(100) := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E710', 8405);
19: cst_s_val_3 CONSTANT VARCHAR2(1) := '3';
20: cst_s_val_4 CONSTANT VARCHAR2(1) := '4';
21:
22: cst_et_val_E322 VARCHAR2(100) := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E322', 8405);
23: cst_et_val_E686 VARCHAR2(100) := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E686', 8405);
24: cst_et_val_E689 VARCHAR2(100) := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E689', 8405);
25: cst_et_val_E709 VARCHAR2(100) := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E709', 8405);
26: cst_et_val_E710 VARCHAR2(100) := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E710', 8405);
27:
20: cst_s_val_4 CONSTANT VARCHAR2(1) := '4';
21:
22: cst_et_val_E322 VARCHAR2(100) := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E322', 8405);
23: cst_et_val_E686 VARCHAR2(100) := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E686', 8405);
24: cst_et_val_E689 VARCHAR2(100) := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E689', 8405);
25: cst_et_val_E709 VARCHAR2(100) := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E709', 8405);
26: cst_et_val_E710 VARCHAR2(100) := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E710', 8405);
27:
28: cst_ec_val_E322 CONSTANT VARCHAR2(4) := 'E322';
21:
22: cst_et_val_E322 VARCHAR2(100) := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E322', 8405);
23: cst_et_val_E686 VARCHAR2(100) := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E686', 8405);
24: cst_et_val_E689 VARCHAR2(100) := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E689', 8405);
25: cst_et_val_E709 VARCHAR2(100) := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E709', 8405);
26: cst_et_val_E710 VARCHAR2(100) := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E710', 8405);
27:
28: cst_ec_val_E322 CONSTANT VARCHAR2(4) := 'E322';
29: cst_ec_val_E686 CONSTANT VARCHAR2(4) := 'E686';
22: cst_et_val_E322 VARCHAR2(100) := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E322', 8405);
23: cst_et_val_E686 VARCHAR2(100) := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E686', 8405);
24: cst_et_val_E689 VARCHAR2(100) := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E689', 8405);
25: cst_et_val_E709 VARCHAR2(100) := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E709', 8405);
26: cst_et_val_E710 VARCHAR2(100) := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E710', 8405);
27:
28: cst_ec_val_E322 CONSTANT VARCHAR2(4) := 'E322';
29: cst_ec_val_E686 CONSTANT VARCHAR2(4) := 'E686';
30: cst_ec_val_E689 CONSTANT VARCHAR2(4) := 'E689';
91: l_error_text VARCHAR2(2000);
92: l_return_status VARCHAR2(1);
93: l_msg_count NUMBER ;
94: l_msg_data VARCHAR2(2000);
95: l_hash_msg_name_text_type_tab igs_ad_gen_016.g_msg_name_text_type_table;
96:
97:
98: PROCEDURE validate_appl_hist(p_appl_hist_rec c_appl_hist_cur%ROWTYPE,
99: p_status OUT NOCOPY igs_ad_interface.status%TYPE,
247: ROLLBACK ;
248: l_person_id_errored := appl_hist_rec.person_id ;
249: l_adm_appl_num_errored := appl_hist_rec.admission_appl_number;
250:
251: l_error_text := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', l_error_code, 8405);
252: UPDATE igs_ad_apphist_int
253: SET status = cst_s_val_3
254: , error_code = l_error_code
255: , error_text = l_error_text
258: IF p_enable_log = 'Y' THEN
259: igs_ad_imp_001.logerrormessage(appl_hist_rec.interface_apphist_id,l_error_code,'IGS_AD_APPHIST_INT');
260: END IF;
261: l_error_code := 'E688';
262: l_error_text := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E688', 8405);
263:
264: UPDATE igs_ad_apphist_int
265: SET status = cst_s_val_3
266: , error_code = l_error_code
272:
273: WHEN OTHERS THEN
274: ROLLBACK ;
275: l_error_code := 'E322';
276: igs_ad_gen_016.extract_msg_from_stack (
277: p_msg_at_index => l_msg_index,
278: p_return_status => l_return_status,
279: p_msg_count => l_msg_count,
280: p_msg_data => l_msg_data,
301: END IF;
302: l_person_id_errored := appl_hist_rec.person_id ;
303: l_adm_appl_num_errored := appl_hist_rec.admission_appl_number;
304:
305: l_error_text := NVL(l_msg_data,igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', l_error_code, 8405));
306:
307: UPDATE igs_ad_apphist_int
308: SET status = cst_s_val_3
309: , error_code = l_error_code
311: WHERE interface_apphist_id = appl_hist_rec.interface_apphist_id;
312:
313: l_error_code := 'E688';
314:
315: l_error_text := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', l_error_code, 8405);
316:
317: UPDATE igs_ad_apphist_int
318: SET status = cst_s_val_3
319: , error_code = l_error_code
410: l_error_text VARCHAR2(2000);
411: l_return_status VARCHAR2(1);
412: l_msg_count NUMBER ;
413: l_msg_data VARCHAR2(2000);
414: l_hash_msg_name_text_type_tab igs_ad_gen_016.g_msg_name_text_type_table;
415:
416: l_person_id igs_ad_interface.person_id%TYPE;
417: l_admission_appl_number igs_ad_insthist_int.admission_appl_number%TYPE;
418: l_nominated_course_cd igs_ad_insthist_int.nominated_course_cd%TYPE;
660: l_adm_appl_num_errored := applinst_hist_rec.admission_appl_number;
661: l_nominated_course_cd_errored := applinst_hist_rec.nominated_course_cd;
662: l_sequence_number_errored := applinst_hist_rec.sequence_number;
663:
664: l_error_text := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', l_error_code, 8405);
665:
666: UPDATE igs_ad_insthist_int
667: SET status = cst_s_val_3
668: , error_code = l_error_code
673: igs_ad_imp_001.logerrormessage(applinst_hist_rec.interface_insthist_id,l_error_code,'IGS_AD_INSTHIST_INT');
674: END IF;
675:
676: l_error_code := 'E691';
677: l_error_text := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', l_error_code, 8405);
678:
679: UPDATE igs_ad_insthist_int
680: SET status = cst_s_val_3
681: , error_code = l_error_code
689:
690: WHEN OTHERS THEN
691: ROLLBACK ;
692: l_error_code := 'E322';
693: igs_ad_gen_016.extract_msg_from_stack (
694: p_msg_at_index => l_msg_index,
695: p_return_status => l_return_status,
696: p_msg_count => l_msg_count,
697: p_msg_data => l_msg_data,
696: p_msg_count => l_msg_count,
697: p_msg_data => l_msg_data,
698: p_hash_msg_name_text_type_tab => l_hash_msg_name_text_type_tab);
699:
700: l_error_text := NVL(l_msg_data,igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', l_error_code, 8405));
701:
702: IF l_hash_msg_name_text_type_tab(l_msg_count-1).name <> 'ORA' THEN
703: l_error_text := l_msg_data;
704: IF p_enable_log = 'Y' THEN
722: l_adm_appl_num_errored := applinst_hist_rec.admission_appl_number;
723: l_nominated_course_cd_errored := applinst_hist_rec.nominated_course_cd;
724: l_sequence_number_errored := applinst_hist_rec.sequence_number;
725:
726: l_error_text := NVL(l_msg_data,igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', l_error_code, 8405));
727:
728: UPDATE igs_ad_insthist_int
729: SET status = cst_s_val_3
730: , error_code = l_error_code
732: WHERE interface_insthist_id = applinst_hist_rec.interface_insthist_id;
733:
734: l_error_code := 'E691';
735:
736: l_error_text := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', l_error_code, 8405);
737:
738: UPDATE igs_ad_insthist_int
739: SET status = cst_s_val_3
740: , error_code = l_error_code