[Home] [Help]
1: PACKAGE BODY igs_en_gen_008 AS
2: /* $Header: IGSEN08B.pls 120.6 2006/02/22 02:22:14 ckasu ship $ */
3: /*-------------------------------------------------------------------------------------------
4: --Change History:
5: --Who When What
122: cst_no CONSTANT VARCHAR2(1) := 'N';
123:
124: BEGIN
125: -- Get the person type of the logged on user by calling the function
126: l_v_person_type := igs_en_gen_008.enrp_get_person_type(p_course_cd =>NULL);
127:
128: -- If the logged on user is a self service type then a person type will be returned
129: -- If the user logged is a back-office user the validations defined at Unit level has to be validated
130: IF l_v_person_type IS NOT NULL THEN
220:
221: EXCEPTION
222: WHEN OTHERS THEN
223: fnd_message.set_name('IGS','IGS_GE_UNHANDLED_EXP');
224: fnd_message.set_token('NAME','IGS_EN_GEN_008.enrp_get_ua_del_alwd');
225: IGS_GE_MSG_STACK.ADD;
226: APP_EXCEPTION.RAISE_EXCEPTION;
227: END enrp_get_ua_del_alwd;
228:
300: END;
301: EXCEPTION
302: WHEN OTHERS THEN
303: fnd_message.set_name('IGS','IGS_GE_UNHANDLED_EXP');
304: fnd_message.set_token('NAME','IGS_EN_GEN_008.enrp_get_ua_rty');
305: IGS_GE_MSG_STACK.ADD;
306: app_exception.raise_exception;
307: END enrp_get_ua_rty;
308:
594: END;
595: EXCEPTION
596: WHEN OTHERS THEN
597: Fnd_Message.Set_name('IGS','IGS_GE_UNHANDLED_EXP');
598: FND_MESSAGE.SET_TOKEN('NAME','IGS_EN_GEN_008.enrp_get_ug_pg_crs');
599: IGS_GE_MSG_STACK.ADD;
600: App_Exception.Raise_Exception;
601: END enrp_get_ug_pg_crs;
602:
821: END IF;
822: EXCEPTION
823: WHEN OTHERS THEN
824: fnd_message.set_name('IGS','IGS_GE_UNHANDLED_EXP');
825: fnd_message.set_token('NAME','IGS_EN_GEN_008.enrp_get_var_window');
826: IGS_GE_MSG_STACK.ADD;
827: APP_EXCEPTION.RAISE_EXCEPTION;
828: END enrp_get_var_window;
829:
1718: p_text => l_mesg_txt);
1719: END IF;
1720: ELSE
1721: FND_MESSAGE.SET_NAME('IGS','IGS_GE_UNHANDLED_EXP');
1722: FND_MESSAGE.SET_TOKEN('NAME','IGS_EN_GEN_008.enrp_ins_btch_prenrl');
1723: l_mesg_txt := fnd_message.get;
1724: igs_ge_gen_003.genp_ins_log_entry(p_s_log_type => cst_pre_enrol,
1725: p_creation_dt => v_log_creation_dt,
1726: p_key => cst_error||','||TO_CHAR(v_acaiv_rec.person_id)||','||v_acaiv_rec.course_cd,
2055: p_text => l_mesg_txt);
2056: END IF;
2057: ELSE
2058: FND_MESSAGE.SET_NAME('IGS','IGS_GE_UNHANDLED_EXP');
2059: FND_MESSAGE.SET_TOKEN('NAME','IGS_EN_GEN_008.enrp_ins_btch_prenrl');
2060: l_mesg_txt := fnd_message.get;
2061: igs_ge_gen_003.genp_ins_log_entry(p_s_log_type => cst_pre_enrol,
2062: p_creation_dt => v_log_creation_dt,
2063: p_key => cst_error||','||TO_CHAR(v_sca_rec.person_id)||','||v_sca_rec.course_cd,
2093: END;
2094: EXCEPTION
2095: WHEN OTHERS THEN
2096: Fnd_Message.Set_name('IGS','IGS_GE_UNHANDLED_EXP');
2097: FND_MESSAGE.SET_TOKEN('NAME','IGS_EN_GEN_008.enrp_ins_btch_prenrl');
2098: IGS_GE_MSG_STACK.ADD;
2099: App_Exception.Raise_Exception;
2100: END enrp_ins_btch_prenrl;
2101:
2357: -- If the local variable is set to TRUE then start validating the date aliases
2358: -- at person level
2359: IF l_b_grade_schema THEN
2360: -- get the person_type of the logged on user
2361: l_v_person_type := igs_en_gen_008.enrp_get_person_type( p_course_cd => NULL);
2362:
2363: -- If there is a person_type defined then validate date aliases at person type level
2364: -- else validate dates at the unit section level
2365: IF l_v_person_type IS NOT NULL THEN
2584: RETURN 'N';
2585: END IF;
2586:
2587: --Get the person logged in frmo session
2588: l_v_person_type := igs_en_gen_008.enrp_get_person_type(p_course_cd=>NULL);
2589:
2590: -- According to ENCR012, check that approved cp are not defined for this student
2591: -- Added as per the bug# 2364461.
2592: -- Start of new code.
2839: RETURN cst_advance;
2840:
2841: END enrp_get_pr_outcome;
2842:
2843: END igs_en_gen_008;