587: DECLARE
588: cst_no CONSTANT CHAR := 'N';
589: v_course_type IGS_PS_VER.course_type%TYPE;
590: V_MESSAGE_NAME VARCHAR2(30) := NULL;
591: CURSOR c_sua( cp_person_id IGS_EN_STDNT_PS_ATT.person_id%TYPE,
592: cp_course_cd IGS_EN_STDNT_PS_ATT.course_cd%TYPE) IS
593: SELECT crv.course_type
594: FROM IGS_EN_STDNT_PS_ATT sca,
595: IGS_PS_VER crv
588: cst_no CONSTANT CHAR := 'N';
589: v_course_type IGS_PS_VER.course_type%TYPE;
590: V_MESSAGE_NAME VARCHAR2(30) := NULL;
591: CURSOR c_sua( cp_person_id IGS_EN_STDNT_PS_ATT.person_id%TYPE,
592: cp_course_cd IGS_EN_STDNT_PS_ATT.course_cd%TYPE) IS
593: SELECT crv.course_type
594: FROM IGS_EN_STDNT_PS_ATT sca,
595: IGS_PS_VER crv
596: WHERE sca.person_id = cp_person_id AND
590: V_MESSAGE_NAME VARCHAR2(30) := NULL;
591: CURSOR c_sua( cp_person_id IGS_EN_STDNT_PS_ATT.person_id%TYPE,
592: cp_course_cd IGS_EN_STDNT_PS_ATT.course_cd%TYPE) IS
593: SELECT crv.course_type
594: FROM IGS_EN_STDNT_PS_ATT sca,
595: IGS_PS_VER crv
596: WHERE sca.person_id = cp_person_id AND
597: sca.course_cd = cp_course_cd AND
598: sca.course_cd = crv.course_cd AND