195: RAISE;
196: END;
197: EXCEPTION
198: WHEN OTHERS THEN
199: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
200: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.admp_val_ca_comm');
201: IGS_GE_MSG_STACK.ADD;
202: App_Exception.Raise_Exception;
203: END admp_val_ca_comm;
196: END;
197: EXCEPTION
198: WHEN OTHERS THEN
199: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
200: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.admp_val_ca_comm');
201: IGS_GE_MSG_STACK.ADD;
202: App_Exception.Raise_Exception;
203: END admp_val_ca_comm;
204: --
355: RAISE;
356: END;
357: EXCEPTION
358: WHEN OTHERS THEN
359: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
360: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.admp_val_ca_comm_val');
361: IGS_GE_MSG_STACK.ADD;
362: App_Exception.Raise_Exception;
363: END admp_val_ca_comm_val;
356: END;
357: EXCEPTION
358: WHEN OTHERS THEN
359: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
360: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.admp_val_ca_comm_val');
361: IGS_GE_MSG_STACK.ADD;
362: App_Exception.Raise_Exception;
363: END admp_val_ca_comm_val;
364: --
584: RAISE;
585: END;
586: EXCEPTION
587: WHEN OTHERS THEN
588: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
589: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.resp_val_ca_att_perc');
590: IGS_GE_MSG_STACK.ADD;
591: App_Exception.Raise_Exception;
592:
585: END;
586: EXCEPTION
587: WHEN OTHERS THEN
588: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
589: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.resp_val_ca_att_perc');
590: IGS_GE_MSG_STACK.ADD;
591: App_Exception.Raise_Exception;
592:
593: END resp_val_ca_att_perc;
656: END;
657: /*
658: EXCEPTION
659: WHEN OTHERS THEN
660: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
661: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.enrp_val_acai_cndtnl');
662: IGS_GE_MSG_STACK.ADD;
663: App_Exception.Raise_Exception;
664: */
657: /*
658: EXCEPTION
659: WHEN OTHERS THEN
660: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
661: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.enrp_val_acai_cndtnl');
662: IGS_GE_MSG_STACK.ADD;
663: App_Exception.Raise_Exception;
664: */
665: END enrp_val_acai_cndtnl;
730: END;
731: /*
732: EXCEPTION
733: WHEN OTHERS THEN
734: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
735: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.enrp_val_res_elgbl');
736: IGS_GE_MSG_STACK.ADD;
737: App_Exception.Raise_Exception;
738: */
731: /*
732: EXCEPTION
733: WHEN OTHERS THEN
734: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
735: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.enrp_val_res_elgbl');
736: IGS_GE_MSG_STACK.ADD;
737: App_Exception.Raise_Exception;
738: */
739: END enrp_val_res_elgbl;
858: END;
859: /*
860: EXCEPTION
861: WHEN OTHERS THEN
862: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
863: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.resp_val_ca_dtl_comp');
864: IGS_GE_MSG_STACK.ADD;
865: App_Exception.Raise_Exception;
866: */
859: /*
860: EXCEPTION
861: WHEN OTHERS THEN
862: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
863: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.resp_val_ca_dtl_comp');
864: IGS_GE_MSG_STACK.ADD;
865: App_Exception.Raise_Exception;
866: */
867: END resp_val_ca_dtl_comp;
934: RAISE;
935: END;
936: EXCEPTION
937: WHEN OTHERS THEN
938: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
939: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.enrp_val_unit_rule');
940: IGS_GE_MSG_STACK.ADD;
941: App_Exception.Raise_Exception;
942: END enrp_val_unit_rule;
935: END;
936: EXCEPTION
937: WHEN OTHERS THEN
938: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
939: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.enrp_val_unit_rule');
940: IGS_GE_MSG_STACK.ADD;
941: App_Exception.Raise_Exception;
942: END enrp_val_unit_rule;
943: --
1015: RAISE;
1016: END;
1017: EXCEPTION
1018: WHEN OTHERS THEN
1019: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
1020: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.enrp_val_sca_cat');
1021: IGS_GE_MSG_STACK.ADD;
1022: App_Exception.Raise_Exception;
1023: END enrp_val_sca_cat;
1016: END;
1017: EXCEPTION
1018: WHEN OTHERS THEN
1019: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
1020: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.enrp_val_sca_cat');
1021: IGS_GE_MSG_STACK.ADD;
1022: App_Exception.Raise_Exception;
1023: END enrp_val_sca_cat;
1024: --
1065: END IF;
1066: IF p_legacy = 'Y' THEN
1067: IF p_course_attempt_status IN (cst_unconfirm,cst_completed) THEN
1068: p_message_name := 'IGS_EN_SCA_NO_LP_DT_UNCOMFIRM';
1069: fnd_message.set_name('IGS','IGS_EN_SCA_NO_LP_DT_UNCOMFIRM');
1070: fnd_msg_pub.add;
1071: END IF;
1072: END IF;
1073: RETURN TRUE ;
1073: RETURN TRUE ;
1074: END;
1075: EXCEPTION
1076: WHEN OTHERS THEN
1077: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
1078: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.enrp_val_sca_lapse');
1079: IGS_GE_MSG_STACK.ADD;
1080: App_Exception.Raise_Exception;
1081: END enrp_val_sca_lapse;
1074: END;
1075: EXCEPTION
1076: WHEN OTHERS THEN
1077: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
1078: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.enrp_val_sca_lapse');
1079: IGS_GE_MSG_STACK.ADD;
1080: App_Exception.Raise_Exception;
1081: END enrp_val_sca_lapse;
1082: --
1171: RAISE;
1172: END;
1173: EXCEPTION
1174: WHEN OTHERS THEN
1175: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
1176: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.enrp_val_trnsfr_acpt');
1177: IGS_GE_MSG_STACK.ADD;
1178: App_Exception.Raise_Exception;
1179: END enrp_val_trnsfr_acpt;
1172: END;
1173: EXCEPTION
1174: WHEN OTHERS THEN
1175: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
1176: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.enrp_val_trnsfr_acpt');
1177: IGS_GE_MSG_STACK.ADD;
1178: App_Exception.Raise_Exception;
1179: END enrp_val_trnsfr_acpt;
1180: --
1225: RETURN v_ret_val;
1226: END;
1227: EXCEPTION
1228: WHEN OTHERS THEN
1229: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
1230: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.enrp_val_chgo_alwd');
1231: IGS_GE_MSG_STACK.ADD;
1232: App_Exception.Raise_Exception;
1233: END enrp_val_chgo_alwd;
1226: END;
1227: EXCEPTION
1228: WHEN OTHERS THEN
1229: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
1230: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.enrp_val_chgo_alwd');
1231: IGS_GE_MSG_STACK.ADD;
1232: App_Exception.Raise_Exception;
1233: END enrp_val_chgo_alwd;
1234: --
1329: END IF;
1330: END;
1331: /* EXCEPTION
1332: WHEN OTHERS THEN
1333: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
1334: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.enrp_val_sua_coo');
1335: IGS_GE_MSG_STACK.ADD;
1336: App_Exception.Raise_Exception;*/
1337: END enrp_val_sua_coo;
1330: END;
1331: /* EXCEPTION
1332: WHEN OTHERS THEN
1333: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
1334: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.enrp_val_sua_coo');
1335: IGS_GE_MSG_STACK.ADD;
1336: App_Exception.Raise_Exception;*/
1337: END enrp_val_sua_coo;
1338: --
1424: RAISE;
1425: END;
1426: EXCEPTION
1427: WHEN OTHERS THEN
1428: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
1429: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.enrp_val_sca_confirm');
1430: IGS_GE_MSG_STACK.ADD;
1431: App_Exception.Raise_Exception;
1432: END enrp_val_sca_confirm;
1425: END;
1426: EXCEPTION
1427: WHEN OTHERS THEN
1428: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
1429: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.enrp_val_sca_confirm');
1430: IGS_GE_MSG_STACK.ADD;
1431: App_Exception.Raise_Exception;
1432: END enrp_val_sca_confirm;
1433: --
1681: END IF;
1682: RETURN TRUE;
1683: /*EXCEPTION
1684: WHEN OTHERS THEN
1685: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
1686: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.enrp_val_coo_att');
1687: IGS_GE_MSG_STACK.ADD;
1688: App_Exception.Raise_Exception;*/
1689: END;
1682: RETURN TRUE;
1683: /*EXCEPTION
1684: WHEN OTHERS THEN
1685: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
1686: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.enrp_val_coo_att');
1687: IGS_GE_MSG_STACK.ADD;
1688: App_Exception.Raise_Exception;*/
1689: END;
1690: END enrp_val_coo_att;
1768: p_message_name := 'IGS_EN_CANT_SET_DISCONT_REASO';
1769: IF p_legacy <> 'Y' THEN
1770: RETURN FALSE;
1771: ELSE
1772: fnd_message.set_name('IGS',p_message_name);
1773: fnd_msg_pub.add;
1774: END IF;
1775: END IF;
1776: ELSIF (p_discontinued_dt IS NOT NULL) THEN
1777: p_message_name := 'IGS_EN_CANT_SET_DISCONT_DATE';
1778: IF p_legacy <> 'Y' THEN
1779: RETURN FALSE;
1780: ELSE
1781: fnd_message.set_name('IGS',p_message_name);
1782: fnd_msg_pub.add;
1783: END IF;
1784: END IF;
1785: RETURN TRUE;
1794: RAISE;
1795: END;
1796: EXCEPTION
1797: WHEN OTHERS THEN
1798: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
1799: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.enrp_val_sca_dr');
1800: IGS_GE_MSG_STACK.ADD;
1801: App_Exception.Raise_Exception;
1802: END enrp_val_sca_dr;
1795: END;
1796: EXCEPTION
1797: WHEN OTHERS THEN
1798: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
1799: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.enrp_val_sca_dr');
1800: IGS_GE_MSG_STACK.ADD;
1801: App_Exception.Raise_Exception;
1802: END enrp_val_sca_dr;
1803: --
1841: p_message_name := 'IGS_AD_FUNDING_SRC_RESTRICTIO';
1842: RETURN FALSE;
1843: EXCEPTION
1844: WHEN OTHERS THEN
1845: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
1846: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.enrp_val_sca_fsr');
1847: IGS_GE_MSG_STACK.ADD;
1848: App_Exception.Raise_Exception;
1849: END;
1842: RETURN FALSE;
1843: EXCEPTION
1844: WHEN OTHERS THEN
1845: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
1846: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.enrp_val_sca_fsr');
1847: IGS_GE_MSG_STACK.ADD;
1848: App_Exception.Raise_Exception;
1849: END;
1850: END enrp_val_sca_fsr;
1959: p_message_name := 'IGS_EN_ONLY_SPA_ST_ENROLLED';
1960: IF p_legacy <> 'Y' THEN
1961: RETURN FALSE;
1962: ELSE
1963: fnd_message.set_name('IGS',p_message_name);
1964: fnd_msg_pub.add;
1965: END IF;
1966: END IF;
1967: -- Validate that discontinued date is not prior to course commencement
1969: p_message_name := 'IGS_EN_DISCONT_DT_LT_COMM_DT';
1970: IF p_legacy <> 'Y' THEN
1971: RETURN FALSE;
1972: ELSE
1973: fnd_message.set_name('IGS',p_message_name);
1974: fnd_msg_pub.add;
1975: END IF;
1976: END IF;
1977: IF p_legacy <> 'Y' THEN
2080: RAISE;
2081: END;
2082: EXCEPTION
2083: WHEN OTHERS THEN
2084: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
2085: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.enrp_val_sca_discont');
2086: IGS_GE_MSG_STACK.ADD;
2087: App_Exception.Raise_Exception;
2088: END enrp_val_sca_discont;
2081: END;
2082: EXCEPTION
2083: WHEN OTHERS THEN
2084: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
2085: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.enrp_val_sca_discont');
2086: IGS_GE_MSG_STACK.ADD;
2087: App_Exception.Raise_Exception;
2088: END enrp_val_sca_discont;
2089: --
2262: RETURN TRUE;
2263: END;
2264: EXCEPTION
2265: WHEN OTHERS THEN
2266: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
2267: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.enrpl_val_ca_start_dt');
2268: IGS_GE_MSG_STACK.ADD;
2269: App_Exception.Raise_Exception;
2270: END enrpl_val_ca_start_dt;
2263: END;
2264: EXCEPTION
2265: WHEN OTHERS THEN
2266: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
2267: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.enrpl_val_ca_start_dt');
2268: IGS_GE_MSG_STACK.ADD;
2269: App_Exception.Raise_Exception;
2270: END enrpl_val_ca_start_dt;
2271: BEGIN
2480: RAISE;
2481: END;
2482: EXCEPTION
2483: WHEN OTHERS THEN
2484: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
2485: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.enrp_val_sca_comm');
2486: IGS_GE_MSG_STACK.ADD;
2487: App_Exception.Raise_Exception;
2488: END enrp_val_sca_comm;
2481: END;
2482: EXCEPTION
2483: WHEN OTHERS THEN
2484: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
2485: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.enrp_val_sca_comm');
2486: IGS_GE_MSG_STACK.ADD;
2487: App_Exception.Raise_Exception;
2488: END enrp_val_sca_comm;
2489: --
2570: RAISE;
2571: END;
2572: EXCEPTION
2573: WHEN OTHERS THEN
2574: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
2575: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.ENRP_VAL_SCA_FS');
2576: IGS_GE_MSG_STACK.ADD;
2577: App_Exception.Raise_Exception;
2578: END ENRP_VAL_SCA_FS;
2571: END;
2572: EXCEPTION
2573: WHEN OTHERS THEN
2574: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
2575: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.ENRP_VAL_SCA_FS');
2576: IGS_GE_MSG_STACK.ADD;
2577: App_Exception.Raise_Exception;
2578: END ENRP_VAL_SCA_FS;
2579: --
2668: RETURN FALSE;
2669: END IF;
2670: EXCEPTION
2671: WHEN OTHERS THEN
2672: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
2673: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.enrp_val_sca_cop');
2674: IGS_GE_MSG_STACK.ADD;
2675: App_Exception.Raise_Exception;
2676: END;
2669: END IF;
2670: EXCEPTION
2671: WHEN OTHERS THEN
2672: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
2673: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.enrp_val_sca_cop');
2674: IGS_GE_MSG_STACK.ADD;
2675: App_Exception.Raise_Exception;
2676: END;
2677: END enrp_val_sca_cop;
2715: END;
2716: /*
2717: EXCEPTION
2718: WHEN OTHERS THEN
2719: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
2720: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.finp_val_fc_closed');
2721: IGS_GE_MSG_STACK.ADD;
2722: App_Exception.Raise_Exception;
2723: */
2716: /*
2717: EXCEPTION
2718: WHEN OTHERS THEN
2719: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
2720: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SCA.finp_val_fc_closed');
2721: IGS_GE_MSG_STACK.ADD;
2722: App_Exception.Raise_Exception;
2723: */
2724: END finp_val_fc_closed;
2905: -- have to pass back program code as part of error message to be displayed in admissions
2906:
2907: CLOSE cur_sua;
2908:
2909: FND_MESSAGE.SET_NAME('IGS','IGS_EN_ADM_PROG_FAIL');
2910: FND_MESSAGE.SET_TOKEN('PROGRAM_CD',vcur_spa.course_cd);
2911: IGS_GE_MSG_STACK.ADD;
2912:
2913: RETURN FALSE;
2906:
2907: CLOSE cur_sua;
2908:
2909: FND_MESSAGE.SET_NAME('IGS','IGS_EN_ADM_PROG_FAIL');
2910: FND_MESSAGE.SET_TOKEN('PROGRAM_CD',vcur_spa.course_cd);
2911: IGS_GE_MSG_STACK.ADD;
2912:
2913: RETURN FALSE;
2914: ELSE
2933: OPEN cur_pri_prg(vcur_spa.person_id,l_career);
2934: FETCH cur_pri_prg INTO l_pri_prg;
2935: IF cur_pri_prg%FOUND THEN
2936: CLOSE cur_pri_prg;
2937: FND_MESSAGE.SET_NAME('IGS','IGS_EN_ADM_KEYPRG_FAIL');
2938: FND_MESSAGE.SET_TOKEN('PROGRAM_CD',vcur_spa.course_cd);
2939: IGS_GE_MSG_STACK.ADD;
2940:
2941: RETURN FALSE;
2934: FETCH cur_pri_prg INTO l_pri_prg;
2935: IF cur_pri_prg%FOUND THEN
2936: CLOSE cur_pri_prg;
2937: FND_MESSAGE.SET_NAME('IGS','IGS_EN_ADM_KEYPRG_FAIL');
2938: FND_MESSAGE.SET_TOKEN('PROGRAM_CD',vcur_spa.course_cd);
2939: IGS_GE_MSG_STACK.ADD;
2940:
2941: RETURN FALSE;
2942: END IF;
2954: IF cur_sua_unconfirm%FOUND AND cur_ps_sec%FOUND THEN
2955: CLOSE cur_sua_unconfirm;
2956: CLOSE cur_ps_sec;
2957:
2958: FND_MESSAGE.SET_NAME('IGS','IGS_EN_ADM_PROGPRIM_FAIL');
2959: FND_MESSAGE.SET_TOKEN('PROGRAM_CD',vcur_spa.course_cd);
2960: IGS_GE_MSG_STACK.ADD;
2961:
2962:
2955: CLOSE cur_sua_unconfirm;
2956: CLOSE cur_ps_sec;
2957:
2958: FND_MESSAGE.SET_NAME('IGS','IGS_EN_ADM_PROGPRIM_FAIL');
2959: FND_MESSAGE.SET_TOKEN('PROGRAM_CD',vcur_spa.course_cd);
2960: IGS_GE_MSG_STACK.ADD;
2961:
2962:
2963: RETURN FALSE;
2966: --Only unconfirm unit exist
2967:
2968:
2969: IF del_unconfirm_sua_for_reopen(vcur_spa.person_id,vcur_spa.course_cd) <> TRUE THEN
2970: FND_MESSAGE.SET_NAME('IGS','IGS_EN_ADM_DELUNIT_FAIL');
2971: FND_MESSAGE.SET_TOKEN('PROGRAM_CD',vcur_spa.course_cd);
2972: IGS_GE_MSG_STACK.ADD;
2973: IF cur_sua_unconfirm%ISOPEN THEN
2974: CLOSE cur_sua_unconfirm;
2967:
2968:
2969: IF del_unconfirm_sua_for_reopen(vcur_spa.person_id,vcur_spa.course_cd) <> TRUE THEN
2970: FND_MESSAGE.SET_NAME('IGS','IGS_EN_ADM_DELUNIT_FAIL');
2971: FND_MESSAGE.SET_TOKEN('PROGRAM_CD',vcur_spa.course_cd);
2972: IGS_GE_MSG_STACK.ADD;
2973: IF cur_sua_unconfirm%ISOPEN THEN
2974: CLOSE cur_sua_unconfirm;
2975: END IF;
2993: ELSIF NVL(vcur_spa.PRIMARY_PROGRAM_TYPE,'SECONDARY') = 'PRIMARY'
2994: AND vcur_spa.STUDENT_CONFIRMED_IND <> 'Y' THEN
2995: --program is primary in career and unconfirmed
2996: IF del_unconfirm_sua_for_reopen(vcur_spa.person_id,vcur_spa.course_cd) <> TRUE THEN
2997: FND_MESSAGE.SET_NAME('IGS','IGS_EN_ADM_DELUNIT_FAIL');
2998: FND_MESSAGE.SET_TOKEN('PROGRAM_CD',vcur_spa.course_cd);
2999: IGS_GE_MSG_STACK.ADD;
3000:
3001:
2994: AND vcur_spa.STUDENT_CONFIRMED_IND <> 'Y' THEN
2995: --program is primary in career and unconfirmed
2996: IF del_unconfirm_sua_for_reopen(vcur_spa.person_id,vcur_spa.course_cd) <> TRUE THEN
2997: FND_MESSAGE.SET_NAME('IGS','IGS_EN_ADM_DELUNIT_FAIL');
2998: FND_MESSAGE.SET_TOKEN('PROGRAM_CD',vcur_spa.course_cd);
2999: IGS_GE_MSG_STACK.ADD;
3000:
3001:
3002: RETURN FALSE;
3005:
3006: ELSIF NVL(vcur_spa.PRIMARY_PROGRAM_TYPE,'SECONDARY') = 'SECONDARY' THEN
3007: --program type is null or secondary in the career
3008: IF del_unconfirm_sua_for_reopen(vcur_spa.person_id,vcur_spa.course_cd) <> TRUE THEN
3009: FND_MESSAGE.SET_NAME('IGS','IGS_EN_ADM_DELUNIT_FAIL');
3010: FND_MESSAGE.SET_TOKEN('PROGRAM_CD',vcur_spa.course_cd);
3011: IGS_GE_MSG_STACK.ADD;
3012:
3013: RETURN FALSE;
3006: ELSIF NVL(vcur_spa.PRIMARY_PROGRAM_TYPE,'SECONDARY') = 'SECONDARY' THEN
3007: --program type is null or secondary in the career
3008: IF del_unconfirm_sua_for_reopen(vcur_spa.person_id,vcur_spa.course_cd) <> TRUE THEN
3009: FND_MESSAGE.SET_NAME('IGS','IGS_EN_ADM_DELUNIT_FAIL');
3010: FND_MESSAGE.SET_TOKEN('PROGRAM_CD',vcur_spa.course_cd);
3011: IGS_GE_MSG_STACK.ADD;
3012:
3013: RETURN FALSE;
3014: END IF ;
3031: OPEN cur_confirm_prg(vcur_spa.person_id,vcur_spa.course_cd);
3032: FETCH cur_confirm_prg INTO l_pri_prg;
3033: IF cur_confirm_prg%FOUND THEN
3034: CLOSE cur_confirm_prg;
3035: FND_MESSAGE.SET_NAME('IGS','IGS_EN_ADM_KEYPRG_FAIL');
3036: FND_MESSAGE.SET_TOKEN('PROGRAM_CD',vcur_spa.course_cd);
3037: IGS_GE_MSG_STACK.ADD;
3038:
3039: RETURN FALSE;
3032: FETCH cur_confirm_prg INTO l_pri_prg;
3033: IF cur_confirm_prg%FOUND THEN
3034: CLOSE cur_confirm_prg;
3035: FND_MESSAGE.SET_NAME('IGS','IGS_EN_ADM_KEYPRG_FAIL');
3036: FND_MESSAGE.SET_TOKEN('PROGRAM_CD',vcur_spa.course_cd);
3037: IGS_GE_MSG_STACK.ADD;
3038:
3039: RETURN FALSE;
3040: END IF;
3041: CLOSE cur_confirm_prg;
3042: END IF;
3043:
3044: IF del_unconfirm_sua_for_reopen(vcur_spa.person_id,vcur_spa.course_cd) <> TRUE THEN
3045: FND_MESSAGE.SET_NAME('IGS','IGS_EN_ADM_DELUNIT_FAIL');
3046: FND_MESSAGE.SET_TOKEN('PROGRAM_CD',vcur_spa.course_cd);
3047: IGS_GE_MSG_STACK.ADD;
3048: RETURN FALSE;
3049: END IF ;
3042: END IF;
3043:
3044: IF del_unconfirm_sua_for_reopen(vcur_spa.person_id,vcur_spa.course_cd) <> TRUE THEN
3045: FND_MESSAGE.SET_NAME('IGS','IGS_EN_ADM_DELUNIT_FAIL');
3046: FND_MESSAGE.SET_TOKEN('PROGRAM_CD',vcur_spa.course_cd);
3047: IGS_GE_MSG_STACK.ADD;
3048: RETURN FALSE;
3049: END IF ;
3050: l_primaryInd := vcur_spa.primary_program_type;