[Home] [Help]
3: l_rowid VARCHAR2(25);
4: old_references IGS_EN_STDNT_PS_ATT_ALL%ROWTYPE;
5: new_references IGS_EN_STDNT_PS_ATT_ALL%ROWTYPE;
6:
7: TYPE g_prim_prg_record_type IS RECORD(career igs_ps_ver.course_type%TYPE,program_cd igs_ps_ver.course_cd%TYPE);
8: TYPE g_prim_prg_rec_table_type IS TABLE OF g_prim_prg_record_type INDEX BY BINARY_INTEGER;
9: g_primary_prg_rec g_prim_prg_rec_table_type;
10: g_old_key_prg igs_ps_ver.course_cd%TYPE;
11: g_primary_prg_rec_count NUMBER;
6:
7: TYPE g_prim_prg_record_type IS RECORD(career igs_ps_ver.course_type%TYPE,program_cd igs_ps_ver.course_cd%TYPE);
8: TYPE g_prim_prg_rec_table_type IS TABLE OF g_prim_prg_record_type INDEX BY BINARY_INTEGER;
9: g_primary_prg_rec g_prim_prg_rec_table_type;
10: g_old_key_prg igs_ps_ver.course_cd%TYPE;
11: g_primary_prg_rec_count NUMBER;
12: g_sec_to_prim_first BOOLEAN;
13:
14: PROCEDURE beforerowdelete;
415: v_course_type IGS_PS_TYPE.COURSE_TYPE%TYPE;
416:
417: CURSOR c_course_type IS
418: SELECT crv.course_type
419: FROM igs_ps_ver crv
420: WHERE course_cd = new_references.course_cd
421: and version_number = new_references.version_number;
422:
423: BEGIN
920: pty.person_type_code = pti.person_type_code AND
921: pty.system_type = p_system_type;
922:
923: CURSOR cur_find_interm(cp_perosn_id igs_pe_person.person_id%TYPE,
924: cp_course_cd igs_ps_ver.course_cd%TYPE) IS
925: SELECT sci.person_id,sci.course_cd,start_dt, sci.end_dt, sci.voluntary_ind,sci.comments ,sci.created_by ,sci.creation_date ,
926: sci.last_updated_by ,sci.last_update_date , sci.last_update_login , sci.intermission_type , sci.approved ,sci.institution_name,
927: sci.max_credit_pts, sci.max_terms, sci.anticipated_credit_points, sci.approver_id
928: FROM igs_en_stdnt_ps_intm sci,
935:
936:
937:
938: CURSOR cur_re_canditure(cp_person_id igs_pe_person.person_id%TYPE,
939: cp_course_cd igs_ps_ver.course_cd%TYPE) IS
940: SELECT 1
941: FROM igs_re_candidature
942: WHERE sca_course_cd = cp_course_cd
943: AND person_id = cp_person_id ;
2494: END IF;
2495: CLOSE cur_rowid;
2496: END GET_FK_IGS_PS_COURSE;
2497:
2498: PROCEDURE GET_FK_IGS_PS_VER (
2499: x_course_cd IN VARCHAR2,
2500: x_version_number IN NUMBER
2501: ) AS
2502: CURSOR cur_rowid IS
2515: App_Exception.Raise_Exception;
2516: RETURN;
2517: END IF;
2518: CLOSE cur_rowid;
2519: END GET_FK_IGS_PS_VER;
2520:
2521:
2522: PROCEDURE GET_FK_IGS_FI_FEE_CAT (
2523: x_fee_cat IN VARCHAR2
3018: course_cd <> cp_course_cd AND
3019: key_program = 'Y';
3020:
3021: -- Cursor to get the Program Type/Career of a program version.
3022: CURSOR cur_get_prog_type(cp_course_cd igs_ps_ver.course_cd%TYPE,
3023: cp_version_num igs_ps_ver.version_number%TYPE)
3024: IS
3025: SELECT course_type
3026: FROM igs_ps_ver
3019: key_program = 'Y';
3020:
3021: -- Cursor to get the Program Type/Career of a program version.
3022: CURSOR cur_get_prog_type(cp_course_cd igs_ps_ver.course_cd%TYPE,
3023: cp_version_num igs_ps_ver.version_number%TYPE)
3024: IS
3025: SELECT course_type
3026: FROM igs_ps_ver
3027: WHERE course_cd = cp_course_cd AND
3022: CURSOR cur_get_prog_type(cp_course_cd igs_ps_ver.course_cd%TYPE,
3023: cp_version_num igs_ps_ver.version_number%TYPE)
3024: IS
3025: SELECT course_type
3026: FROM igs_ps_ver
3027: WHERE course_cd = cp_course_cd AND
3028: version_number = cp_version_num;
3029:
3030: -- Cursor to get the old primary program in a given career for a student.
3030: -- Cursor to get the old primary program in a given career for a student.
3031: CURSOR cur_get_course_cd_prim(cp_person_id igs_en_stdnt_ps_att.person_id%TYPE,
3032: cp_course_cd igs_en_stdnt_ps_att.course_cd%TYPE,
3033: cp_version_number igs_en_stdnt_ps_att.version_number%TYPE,
3034: cp_course_type igs_ps_ver.course_type%TYPE)
3035: IS
3036: SELECT spa.course_cd
3037: FROM igs_en_stdnt_ps_att spa,
3038: igs_ps_ver pv
3034: cp_course_type igs_ps_ver.course_type%TYPE)
3035: IS
3036: SELECT spa.course_cd
3037: FROM igs_en_stdnt_ps_att spa,
3038: igs_ps_ver pv
3039: WHERE spa.person_id = cp_person_id AND
3040: spa.course_cd <> cp_course_cd AND
3041: spa.primary_program_type = 'PRIMARY' AND
3042: spa.course_cd = pv.course_cd AND
3043: spa.version_number = pv.version_number AND
3044: pv.course_type = cp_course_type;
3045:
3046: -- bmerugu added for build 319 to get the secondary program attemps for student.
3047: CURSOR cur_pattempts(cp_person_id igs_en_stdnt_ps_att.person_id%TYPE, cp_course_type igs_ps_ver.course_type%TYPE)
3048: IS
3049: SELECT spa.person_id, spa.course_cd
3050: FROM igs_en_stdnt_ps_att spa,
3051: igs_ps_ver pv
3047: CURSOR cur_pattempts(cp_person_id igs_en_stdnt_ps_att.person_id%TYPE, cp_course_type igs_ps_ver.course_type%TYPE)
3048: IS
3049: SELECT spa.person_id, spa.course_cd
3050: FROM igs_en_stdnt_ps_att spa,
3051: igs_ps_ver pv
3052: WHERE spa.person_id = cp_person_id AND
3053: spa.primary_program_type = 'SECONDARY' AND
3054: spa.course_cd = pv.course_cd AND
3055: spa.version_number = pv.version_number AND
3064: sua.course_cd = cp_course_cd AND
3065: sua.unit_attempt_status = 'UNCONFIRM';
3066: cur_sua_uooid_rec cur_sua_uooid%ROWTYPE;
3067:
3068: l_prog_type igs_ps_ver.course_type%TYPE;
3069: l_old_key_prg igs_ps_ver.course_cd%TYPE := NULL;
3070: l_old_prim_prog_cd igs_ps_ver.course_cd%TYPE;
3071: l_spa_term_cal_type igs_ca_inst.cal_type%TYPE;
3072: l_spa_term_sequence_number igs_ca_inst.sequence_number%TYPE;
3065: sua.unit_attempt_status = 'UNCONFIRM';
3066: cur_sua_uooid_rec cur_sua_uooid%ROWTYPE;
3067:
3068: l_prog_type igs_ps_ver.course_type%TYPE;
3069: l_old_key_prg igs_ps_ver.course_cd%TYPE := NULL;
3070: l_old_prim_prog_cd igs_ps_ver.course_cd%TYPE;
3071: l_spa_term_cal_type igs_ca_inst.cal_type%TYPE;
3072: l_spa_term_sequence_number igs_ca_inst.sequence_number%TYPE;
3073: l_flag BOOLEAN;
3066: cur_sua_uooid_rec cur_sua_uooid%ROWTYPE;
3067:
3068: l_prog_type igs_ps_ver.course_type%TYPE;
3069: l_old_key_prg igs_ps_ver.course_cd%TYPE := NULL;
3070: l_old_prim_prog_cd igs_ps_ver.course_cd%TYPE;
3071: l_spa_term_cal_type igs_ca_inst.cal_type%TYPE;
3072: l_spa_term_sequence_number igs_ca_inst.sequence_number%TYPE;
3073: l_flag BOOLEAN;
3074: --bmerugu added for build 319 dummy variable to call del_sua_for_reopen