[Home] [Help]
1083: lDataEmpty tDataBuff;
1084: t1_idx BINARY_INTEGER := 0;
1085: l_prereq_failed_uoo_ids VARCHAR2(2000);
1086: l_coreq_failed_uoo_ids VARCHAR2(2000);
1087: l_person_id_found igs_en_su_attempt_all.person_id%TYPE;
1088: BEGIN
1089: lData := lDataEmpty; --Initializing the array
1090:
1091: -- call igs_en_gen_017.enrp_get_enr_method to decide enrollment method type
2071:
2072: -- Cursor to get the Unit Attempt Details .
2073: CURSOR get_sua_dtls IS
2074: SELECT sua.rowid , sua.*
2075: FROM igs_en_su_attempt_all sua
2076: WHERE person_id = x_person_id AND
2077: course_cd = x_program_cd AND
2078: uoo_id = x_uoo_id FOR UPDATE NOWAIT;
2079:
2749:
2750: TYPE c_ref_cursor IS REF CURSOR;
2751: c_ref_cur_inst c_ref_cursor;
2752: v_ref_cur_rec igs_en_su_attempt%ROWTYPE;
2753: l_person_id_found igs_en_su_attempt_all.person_id%TYPE;
2754: TYPE tDataBuff IS
2755: TABLE OF igs_en_su_attempt%ROWTYPE
2756: INDEX BY BINARY_INTEGER;
2757:
3798: Cursor cur_grading(cp_person_id NUMBER,
3799: cp_course_cd VARCHAR2,
3800: cp_uoo_id NUMBER) IS
3801: SELECT su.ROWID , su.*
3802: FROM IGS_EN_SU_ATTEMPT_ALL su
3803: WHERE person_id = cp_person_id
3804: AND course_cd = cp_course_cd
3805: AND uoo_id = cp_uoo_id;
3806:
3929: CURSOR cur_credit(cp_person_id NUMBER,
3930: cp_course_cd VARCHAR2,
3931: cp_uoo_id NUMBER) IS
3932: SELECT su.ROWID, su.*
3933: FROM IGS_EN_SU_ATTEMPT_ALL su
3934: WHERE person_id = cp_person_id
3935: AND course_cd = cp_course_cd
3936: AND uoo_id = cp_uoo_id;
3937: l_rowid VARCHAR2(25);
4136: CURSOR cur_grading(cp_person_id NUMBER,
4137: cp_course_cd VARCHAR2,
4138: cp_uoo_id NUMBER) IS
4139: SELECT su.ROWID , su.*
4140: FROM IGS_EN_SU_ATTEMPT_ALL su
4141: WHERE person_id = cp_person_id
4142: AND course_cd = cp_course_cd
4143: AND uoo_id = cp_uoo_id;
4144:
4557: CURSOR cur_core_ind(p_person_id NUMBER,
4558: p_course_cd VARCHAR2,
4559: p_uoo_id NUMBER) IS
4560: SELECT su.ROWID, su.*
4561: FROM IGS_EN_SU_ATTEMPT_ALL su
4562: WHERE person_id = p_person_id
4563: AND course_cd = p_course_cd
4564: AND uoo_id = p_uoo_id;
4565:
4564: AND uoo_id = p_uoo_id;
4565:
4566: l_rowid VARCHAR2(25);
4567: l_data cur_core_ind%ROWTYPE;
4568: l_core_indicator igs_en_su_attempt_all.core_indicator_code%TYPE;
4569: l_enc_message_name VARCHAR2(2000);
4570: l_app_short_name VARCHAR2(10);
4571: l_msg_index NUMBER;
4572: BEGIN
4706:
4707: --cursor to get the rowid for the unit attempt of the student
4708: CURSOR cur_unit(p_person_id NUMBER, p_course_cd VARCHAR2, p_uoo_id IN NUMBER) IS
4709: SELECT sua.ROWID
4710: FROM igs_en_su_attempt_all sua
4711: WHERE sua.person_id = p_person_id
4712: AND sua.course_cd = p_course_cd
4713: AND sua.uoo_id = p_uoo_id;
4714:
4804:
4805: l_unit_rowid := NULL;
4806:
4807: -- get the unit attempt rowid
4808: IF p_uoo_id IS NOT NULL AND p_table = 'IGS_EN_SU_ATTEMPT_ALL' THEN
4809: -- get the row id for unit attempt
4810: OPEN cur_unit(p_person_id,p_course_cd,p_uoo_id);
4811: FETCH cur_unit INTO l_unit_rowid;
4812: CLOSE cur_unit;
4816: --Checking for unit Updates
4817: IF (l_unit_rowid IS NOT NULL) THEN
4818: -- check for update permission on the table student unit attempt
4819: l_sec_out := Igs_sc_gen_001.check_sel_upd_del_security(
4820: p_tab_name => 'IGS_EN_SU_ATTEMPT_ALL',
4821: p_rowid => l_unit_rowid,
4822: p_action => 'U',
4823: p_msg_data => l_msg_data);
4824:
4824:
4825: IF NOT l_sec_out THEN
4826: p_message := 'IGS_SC_NO_ACCESS_PRIV';
4827: IF l_msg_data IS NOT NULL THEN
4828: p_message := 'IGS_SC_PRE_CHECK_EXCEP*'||l_msg_data||'*IGS_EN_SU_ATTEMPT_ALL*U';
4829: END IF;
4830: RETURN;
4831: END IF;
4832: