86: 7. Advanced Standing REQ-ADV
87: 8. International Acceptance Advice Number CRS-INTERN
88: ----------------------------------------------------------------------------------------------------------*/
89: BEGIN
90: l_appl_type_Valid := igs_ad_gen_016.get_appl_type_apc (p_admission_application_type ,
91: l_admission_cat ,
92: l_s_admission_process_type) ;
93: IF l_s_admission_process_type <> 'RE-ADMIT' THEN
94: l_fee_cat := IGS_AD_GEN_005.admp_get_dflt_fcm(
110: IF l_s_admission_process_type = 'NON-AWARD' THEN
111: l_adm_entry_qual_status := IGS_AD_GEN_009.admp_get_sys_aeqs('NOT-APPLIC');
112: l_adm_doc_status := IGS_AD_GEN_009.admp_get_sys_ads('NOT-APPLIC');
113: ELSE
114: IF igs_ad_gen_016.get_apcs (p_admission_cat => l_admission_cat,
115: p_s_admission_process_type => l_s_admission_process_type,
116: p_s_admission_step_type => 'DFLT_ENTRY_QUAL') = 'FALSE' THEN
117: l_adm_entry_qual_status := IGS_AD_GEN_009.admp_get_sys_aeqs('PENDING');
118: ELSE
117: l_adm_entry_qual_status := IGS_AD_GEN_009.admp_get_sys_aeqs('PENDING');
118: ELSE
119: l_adm_entry_qual_status := IGS_AD_GEN_009.admp_get_sys_aeqs('QUALIFIED');
120: END IF;
121: IF igs_ad_gen_016.get_apcs (p_admission_cat => l_admission_cat,
122: p_s_admission_process_type => l_s_admission_process_type,
123: p_s_admission_step_type => 'DFLT_DOC_STATUS') = 'FALSE' THEN
124: l_adm_doc_status:= IGS_AD_GEN_009.admp_get_sys_ads('PENDING');
125: ELSE
129: END IF;
130: l_admission_application_type := p_admission_application_type ;
131:
132: -- Program Rank Set
133: IF igs_ad_gen_016.get_apcs (p_admission_cat => l_admission_cat,
134: p_s_admission_process_type => l_s_admission_process_type,
135: p_s_admission_step_type => 'RANK-SET') = 'FALSE' THEN
136: l_rank_set_allowed := 'N';
137: ELSE
137: ELSE
138: l_rank_set_allowed := 'Y';
139: END IF;
140: -- Unit Set
141: IF igs_ad_gen_016.get_apcs (p_admission_cat => l_admission_cat,
142: p_s_admission_process_type => l_s_admission_process_type,
143: p_s_admission_step_type => 'UNIT-SET') = 'FALSE' THEN
144: l_unit_set_allowed := 'N';
145: ELSE
145: ELSE
146: l_unit_set_allowed := 'Y';
147: END IF;
148: --Financial Aid
149: IF igs_ad_gen_016.get_apcs (p_admission_cat => l_admission_cat,
150: p_s_admission_process_type => l_s_admission_process_type,
151: p_s_admission_step_type => 'FINAID') = 'FALSE' THEN
152: l_fin_aid_allowed := 'N';
153: ELSE
153: ELSE
154: l_fin_aid_allowed := 'Y';
155: END IF;
156: --Fee Category
157: IF igs_ad_gen_016.get_apcs (p_admission_cat => l_admission_cat,
158: p_s_admission_process_type => l_s_admission_process_type,
159: p_s_admission_step_type => 'FEE-ASSESS') = 'FALSE' THEN
160: l_fee_cat_allowed := 'N';
161: ELSE
161: ELSE
162: l_fee_cat_allowed := 'Y';
163: END IF;
164: --Enrollment Category
165: IF igs_ad_gen_016.get_apcs (p_admission_cat => l_admission_cat,
166: p_s_admission_process_type => l_s_admission_process_type,
167: p_s_admission_step_type => 'ENRCATEGRY') = 'FALSE' THEN
168: l_enrol_cat_allowed := 'N';
169: ELSE
169: ELSE
170: l_enrol_cat_allowed := 'Y';
171: END IF;
172: -- Funding Source
173: IF igs_ad_gen_016.get_apcs (p_admission_cat => l_admission_cat,
174: p_s_admission_process_type => l_s_admission_process_type,
175: p_s_admission_step_type => 'FUNDSOURCE') = 'FALSE' THEN
176: l_fund_src_allowed := 'N';
177: ELSE
178: l_fund_src_allowed := 'Y';
179: END IF;
180:
181: --Advanced Standing
182: IF igs_ad_gen_016.get_apcs (p_admission_cat => l_admission_cat,
183: p_s_admission_process_type => l_s_admission_process_type,
184: p_s_admission_step_type => 'ADVSTAND') = 'FALSE' THEN
185: l_adv_std_allowed := 'N';
186: ELSE
186: ELSE
187: l_adv_std_allowed := 'Y';
188: END IF;
189: --International Acceptance Advice Number
190: IF igs_ad_gen_016.get_apcs (p_admission_cat => l_admission_cat,
191: p_s_admission_process_type => l_s_admission_process_type,
192: p_s_admission_step_type => 'CRS-INTERN') = 'FALSE' THEN
193: l_int_acc_adv_no_allowed := 'N';
194: ELSE
195: l_int_acc_adv_no_allowed := 'Y';
196: END IF;
197:
198: --International Acceptance Advice Number
199: IF igs_ad_gen_016.get_apcs (p_admission_cat => l_admission_cat,
200: p_s_admission_process_type => l_s_admission_process_type,
201: p_s_admission_step_type => 'PREF-LIMIT') = 'FALSE' THEN
202: l_pref_allowed := 'N';
203: ELSE
204: l_pref_allowed := 'Y';
205: END IF;
206:
207: --International Acceptance Advice Number
208: IF igs_ad_gen_016.get_apcs (p_admission_cat => l_admission_cat,
209: p_s_admission_process_type => l_s_admission_process_type,
210: p_s_admission_step_type => 'COMPLETION') = 'FALSE' THEN
211: l_comp_yr_allowed := 'N';
212: ELSE
213: l_comp_yr_allowed := 'Y';
214: END IF;
215:
216: --International Acceptance Advice Number
217: IF igs_ad_gen_016.get_apcs (p_admission_cat => l_admission_cat,
218: p_s_admission_process_type => l_s_admission_process_type,
219: p_s_admission_step_type => 'EDU-GOALS') = 'FALSE' THEN
220: l_edu_goal_allowed := 'N';
221: ELSE
537: l_msg_at_index NUMBER ;
538: l_return_status VARCHAR2(1);
539: l_msg_count NUMBER ;
540: l_msg_data VARCHAR2(2000);
541: l_hash_msg_name_text_type_tab igs_ad_gen_016.g_msg_name_text_type_table;
542:
543: l_error_code VARCHAR2(10);
544: l_error_text VARCHAR2(2000);
545: BEGIN
578: p_admission_appl_number := l_adm_appl_number;
579: EXCEPTION
580: WHEN OTHERS THEN
581: ROLLBACK TO before_insert_appl;
582: igs_ad_gen_016.extract_msg_from_stack (
583: p_msg_at_index => l_msg_at_index,
584: p_return_status => l_return_status,
585: p_msg_count => l_msg_count,
586: p_msg_data => l_msg_data,
592: IF p_enable_log = 'Y' THEN
593: igs_ad_imp_001.logerrormessage(p_appl_rec.interface_appl_id,l_msg_data,'IGS_AD_APL_INT');
594: END IF;
595: ELSE
596: l_error_text := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E518', 8405);
597: l_error_code := 'E518';
598: p_status := 'U';
599: IF fnd_log.test(fnd_log.level_exception,l_prog_label) THEN
600: l_label :='igs.plsql.igs_ad_imp_004.create_application_details.exception '|| l_msg_data;
640: l_msg_at_index NUMBER ;
641: l_return_status VARCHAR2(1);
642: l_msg_count NUMBER ;
643: l_msg_data VARCHAR2(2000);
644: l_hash_msg_name_text_type_tab igs_ad_gen_016.g_msg_name_text_type_table;
645:
646: l_error_code VARCHAR2(10);
647: l_error_text VARCHAR2(2000);
648: BEGIN
690: interface_appl_id = p_appl_rec.interface_appl_id;
691: EXCEPTION
692: WHEN OTHERS THEN
693: ROLLBACK TO before_update_appl;
694: igs_ad_gen_016.extract_msg_from_stack (
695: p_msg_at_index => l_msg_at_index,
696: p_return_status => l_return_status,
697: p_msg_count => l_msg_count,
698: p_msg_data => l_msg_data,
704: IF p_enable_log = 'Y' THEN
705: igs_ad_imp_001.logerrormessage(p_appl_rec.interface_appl_id,l_msg_data,'IGS_AD_APL_INT');
706: END IF;
707: ELSE
708: l_error_text := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E518', 8405);
709: l_error_code := 'E518';
710: IF fnd_log.test(fnd_log.level_exception,l_prog_label) THEN
711: l_label :='igs.plsql.igs_ad_imp_004.update_application_details.exception '|| l_msg_data;
712: fnd_message.set_name('IGS','IGS_PE_IMP_ERROR');
838: l_msg_at_index NUMBER ;
839: l_return_status VARCHAR2(1);
840: l_msg_count NUMBER ;
841: l_msg_data VARCHAR2(2000);
842: l_hash_msg_name_text_type_tab igs_ad_gen_016.g_msg_name_text_type_table;
843: l_completion_dt DATE;
844: l_course_start_dt DATE;
845: l_expected_completion_yr IGS_AD_PS_APPL_INST.expected_completion_yr%TYPE;
846: l_expected_completion_perd IGS_AD_PS_APPL_INST.expected_completion_perd%TYPE;
1224: EXCEPTION
1225: WHEN OTHERS THEN
1226: ROLLBACK TO before_insert_ps_appl;
1227: p_status := '3';
1228: igs_ad_gen_016.extract_msg_from_stack (
1229: p_msg_at_index => l_msg_at_index,
1230: p_return_status => l_return_status,
1231: p_msg_count => l_msg_count,
1232: p_msg_data => l_msg_data,
1238: IF p_enable_log = 'Y' THEN
1239: igs_ad_imp_001.logerrormessage(p_applinst_rec.interface_ps_appl_inst_id,l_error_text,'IGS_AD_APPL_INST_INT');
1240: END IF;
1241: ELSE
1242: l_error_text := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E518', 8405);
1243: l_error_code := 'E518';
1244: IF fnd_log.test(fnd_log.level_exception,l_prog_label) THEN
1245:
1246: l_label :='igs.plsql.igs_ad_imp_004.create_single_appl_instance.exception ';
1271: l_msg_at_index NUMBER ;
1272: l_return_status VARCHAR2(1);
1273: l_msg_count NUMBER ;
1274: l_msg_data VARCHAR2(2000);
1275: l_hash_msg_name_text_type_tab igs_ad_gen_016.g_msg_name_text_type_table;
1276: l_error_code VARCHAR2(4);
1277: l_error_text VARCHAR2(2000);
1278: l_finaid_apply_date igs_ad_ps_appl_inst.finaid_apply_date%TYPE;
1279:
1286: UPDATE igs_ad_ps_appl_inst_int aplinst
1287: SET
1288: status = '3'
1289: , error_code = 'E706'
1290: ,error_Text = igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E706', 8405)
1291: WHERE interface_run_id = p_interface_run_id
1292: AND status ='2'
1293: AND update_adm_seq_number IS NOT NULL
1294: AND NOT EXISTS ( SELECT 1 FROM igs_ad_ps_appl_inst
1303: UPDATE igs_ad_ps_appl_inst_int
1304: SET
1305: status = '3'
1306: , error_code = 'E700'
1307: ,error_Text = igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E700', 8405)
1308: WHERE interface_run_id = p_interface_run_id
1309: AND status = '2'
1310: AND NVL (match_ind, '15') <> '15';
1311: END IF;
1487: END LOOP;
1488: EXCEPTION
1489: WHEN OTHERS THEN
1490: ROLLBACK TO before_update_appl_inst;
1491: igs_ad_gen_016.extract_msg_from_stack (
1492: p_msg_at_index => l_msg_at_index,
1493: p_return_status => l_return_status,
1494: p_msg_count => l_msg_count,
1495: p_msg_data => l_msg_data,
1501: IF p_enable_log = 'Y' THEN
1502: igs_ad_imp_001.logerrormessage(applinst_rec.interface_ps_appl_inst_id,l_error_text,'IGS_AD_APPL_INST_INT');
1503: END IF;
1504: ELSE
1505: l_error_text := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E518', 8405);
1506: l_error_code := 'E518';
1507: IF fnd_log.test(fnd_log.level_exception,l_prog_label) THEN
1508: l_label :='igs.plsql.igs_ad_imp_004.Process_application_instance.exception '||l_msg_data;
1509:
1604: UPDATE igs_ad_ps_appl_inst_int
1605: SET
1606: status = '3'
1607: , error_code = 'E700'
1608: , error_text = igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E700', 8405)
1609: WHERE interface_run_id = p_interface_run_id
1610: AND status = '2'
1611: AND match_ind IS NOT NULL;
1612: END IF;
1659: UPDATE igs_ad_apl_int api
1660: SET
1661: status = '3',
1662: error_code = 'E523',
1663: error_text = igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E523', 8405)
1664: WHERE interface_run_id = p_interface_run_id
1665: AND update_adm_appl_number IS NOT NULL
1666: AND NOT EXISTS ( SELECT 1 FROM IGS_AD_APPL appl_oss
1667: WHERE person_id = api.person_id
1674: UPDATE igs_ad_apl_int
1675: SET
1676: status = '3'
1677: , error_code = 'E700'
1678: ,error_text = igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E700', 8405)
1679: WHERE interface_run_id = p_interface_run_id
1680: AND status = '2'
1681: AND NVL (match_ind, '15') <> '15';
1682: END IF;
1712: UPDATE igs_ad_apl_int api
1713: SET
1714: status = '3'
1715: ,error_code = 'E677'
1716: ,error_text = igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E677', 8405)
1717: WHERE interface_run_id = p_interface_run_id
1718: AND status = '2'
1719: AND update_adm_appl_number IS NOT NULL
1720: AND ( EXISTS (SELECT 1 FROM igs_ad_apphist_int WHERE person_id = api.person_id
1728: UPDATE igs_ad_apl_int api
1729: SET
1730: status = '3'
1731: ,error_code = 'E176'
1732: ,error_text = igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E176', 8405)
1733: WHERE interface_run_id = p_interface_run_id
1734: AND status = '2'
1735: AND NOT EXISTS( SELECT '1'
1736: FROM igs_ad_ss_appl_typ
1770: igs_ad_apl_int
1771: SET
1772: status = '3',
1773: error_code = 'E347'
1774: ,error_text = igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E347', 8405)
1775: WHERE
1776: interface_appl_id = appl_rec.interface_appl_id;
1777: ELSIF l_Status_instance = 'W' THEN
1778: UPDATE
1779: igs_ad_apl_int
1780: SET
1781: status = '4',
1782: error_code = 'E347'
1783: ,error_text = igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E347', 8405)
1784: WHERE
1785: interface_appl_id = appl_rec.interface_appl_id;
1786: ELSE
1787: UPDATE