[Home] [Help]
767: sua.course_cd = cp_spo_course_cd AND
768: sua.unit_attempt_status = cst_enrolled AND
769: sua.unit_cd IN
770: (SELECT spu.unit_cd
771: FROM IGS_PR_STDNT_PR_UNIT spu
772: WHERE spu.person_id = cp_spo_person_id AND
773: spu.course_cd = cp_spo_course_cd AND
774: spu.spo_sequence_number = cp_spo_sequence_number AND
775: spu.s_unit_type = cst_excluded);
3920: CLOSE c_uv;
3921: DECLARE
3922: LV_ROWID VARCHAR2(25);
3923: BEGIN
3924: IGS_PR_STDNT_PR_UNIT_PKG.INSERT_ROW (
3925: X_ROWID =>LV_ROWID,
3926: X_PERSON_ID =>p_person_id,
3927: X_COURSE_CD =>p_course_cd,
3928: X_SPO_SEQUENCE_NUMBER =>v_spo_sequence_number,
4364: FOR UPDATE NOWAIT;
4365:
4366:
4367: CURSOR c_spu (
4368: cp_sequence_number IGS_PR_STDNT_PR_UNIT.spo_sequence_number%TYPE) IS
4369: SELECT spu.ROWID
4370: FROM IGS_PR_STDNT_PR_UNIT spu
4371: WHERE spu.person_id = p_person_id AND
4372: spu.course_cd = p_course_cd AND
4366:
4367: CURSOR c_spu (
4368: cp_sequence_number IGS_PR_STDNT_PR_UNIT.spo_sequence_number%TYPE) IS
4369: SELECT spu.ROWID
4370: FROM IGS_PR_STDNT_PR_UNIT spu
4371: WHERE spu.person_id = p_person_id AND
4372: spu.course_cd = p_course_cd AND
4373: spu.spo_sequence_number = cp_sequence_number
4374: FOR UPDATE NOWAIT;
4528: RAISE;
4529: END;
4530:
4531:
4532: -- Delete from IGS_PR_STDNT_PR_UNIT
4533: BEGIN
4534: FOR v_spu_rec IN c_spu (v_spo_rec.sequence_number) LOOP
4535: IGS_PR_STDNT_PR_UNIT_PKG.DELETE_ROW(
4536: v_spu_rec.ROWID
4531:
4532: -- Delete from IGS_PR_STDNT_PR_UNIT
4533: BEGIN
4534: FOR v_spu_rec IN c_spu (v_spo_rec.sequence_number) LOOP
4535: IGS_PR_STDNT_PR_UNIT_PKG.DELETE_ROW(
4536: v_spu_rec.ROWID
4537: );
4538: END LOOP;
4539: EXCEPTION