354: AND unit_set_cd = cp_unit_set_cd
355: AND us_version_number = cp_us_version_number;
356:
357: -- Determines course type
358: CURSOR c_prog_type (cp_course_cd igs_ps_ver_all.course_cd%TYPE,
359: cp_version_number igs_ps_ver_all.version_number%TYPE) IS
360: SELECT course_type
361: FROM igs_ps_ver_all
362: WHERE course_cd = cp_course_cd
355: AND us_version_number = cp_us_version_number;
356:
357: -- Determines course type
358: CURSOR c_prog_type (cp_course_cd igs_ps_ver_all.course_cd%TYPE,
359: cp_version_number igs_ps_ver_all.version_number%TYPE) IS
360: SELECT course_type
361: FROM igs_ps_ver_all
362: WHERE course_cd = cp_course_cd
363: AND version_number = cp_version_number;
357: -- Determines course type
358: CURSOR c_prog_type (cp_course_cd igs_ps_ver_all.course_cd%TYPE,
359: cp_version_number igs_ps_ver_all.version_number%TYPE) IS
360: SELECT course_type
361: FROM igs_ps_ver_all
362: WHERE course_cd = cp_course_cd
363: AND version_number = cp_version_number;
364:
365: -- Alternate ID Cursor
391:
392:
393:
394: l_enrolled_su c_enr_su%ROWTYPE ;
395: l_prog_type igs_ps_ver_all.course_type%TYPE;
396: l_prev_pid_type igs_pe_alt_pers_id.person_id_type%TYPE := 'X' ;
397: l_api_person_id igs_pe_alt_pers_id.api_person_id%TYPE;
398: l_id NUMBER;
399: l_awd_table igs_he_extract_fields_pkg.awd_table;