[Home] [Help]
288: CURSOR unit_enr_max ( p_unit_cd VARCHAR2,
289: p_version_number NUMBER ) IS
290: /******************Enhancement bug no 1517114 -- NVL from 0 made to 999999***********/
291: SELECT NVL(enrollment_maximum,999999)
292: FROM igs_ps_unit_ver
293: WHERE unit_cd = p_unit_cd AND
294: version_number = p_version_number;
295: /******************Enhancement bug no 1517114 -- NVL from 0 made to 999999***********/
296: --
409: AND sub.sup_uoo_id = sup.uoo_id;
410:
411: CURSOR cur_placement_unit IS
412: SELECT 1
413: FROM igs_ps_unit_ver
414: WHERE unit_cd = new_references.unit_cd
415: AND version_number = new_references.version_number
416: AND practical_ind = 'Y';
417: l_sup_unit_cd igs_ps_unit_ofr_opt.unit_cd%TYPE;
476: new_references.unit_class,
477: v_message_name,
478: 'N' ) = FALSE THEN
479: IF (new_references.unit_attempt_status IN (cst_duplicate, cst_discontin, cst_completed)) THEN
480: -- Bypass IGS_PS_UNIT version must be active and offered error for duplicates.
481: NULL;
482: ELSE
483: FND_MESSAGE.SET_NAME('IGS',v_message_name);
484: IGS_GE_MSG_STACK.ADD;
1603: (old_references.sup_version_number = new_references.sup_version_number)) OR
1604: ((new_references.sup_unit_cd IS NULL) OR
1605: (new_references.sup_version_number IS NULL))) THEN
1606: NULL;
1607: ELSIF NOT IGS_PS_UNIT_VER_PKG.Get_PK_For_Validation (
1608: new_references.sup_unit_cd,
1609: new_references.sup_version_number
1610: ) THEN
1611: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
1914: END IF;
1915: CLOSE cur_rowid;
1916: END GET_FK_IGS_LOOKUPS_VIEW;
1917:
1918: PROCEDURE GET_FK_IGS_PS_UNIT_VER (
1919: x_unit_cd IN VARCHAR2,
1920: x_version_number IN NUMBER
1921: ) AS
1922: CURSOR cur_rowid IS
1937: APP_EXCEPTION.RAISE_EXCEPTION;
1938: RETURN;
1939: END IF;
1940: CLOSE cur_rowid;
1941: END GET_FK_IGS_PS_UNIT_VER;
1942:
1943: PROCEDURE GET_FK_IGS_PS_UNIT (
1944: x_unit_cd IN VARCHAR2
1945: ) AS
2171: -- Now the check is being done for both for updation and insertion for bug #2980069.
2172: --rvivekan 16-Jun-2003 Added handling for same_teaching_period (MUS) checkbox in unit_Section level
2173: -- as a part of Repeat and reenrollment build #2881363
2174: --rvivekan 9-sep-2003 PSP integration build#3052433. modified behavior and declarations of
2175: -- repeatable_ind in the igs_ps_unit_ver table and the column name of
2176: -- same_teaching_period flag in igs_ps_unit_oft_opt to not_multiple_section_flag.
2177: -- svanukur 14-jan-2004 Added teh code for MUS validations in case of update for bug 3368048
2178: -- rvangala 25-Feb-2004 Change cursors c_mus_allowed and c_mus_participate to ensure that
2179: -- unit attempts not in discontinued status are considered, Bug #3456893
2460: FROM igs_ps_unit_ofr_opt
2461: WHERE uoo_id = cp_uoo_id
2462: FOR UPDATE;
2463:
2464: CURSOR c_repeatable_unit (cp_unit_cd igs_ps_unit_ver.unit_cd%TYPE,
2465: cp_uv_version_number igs_ps_unit_ver.version_number%TYPE) IS
2466: SELECT uv.repeatable_ind
2467: FROM igs_ps_unit_ver uv
2468: WHERE uv.unit_cd = cp_unit_cd AND
2461: WHERE uoo_id = cp_uoo_id
2462: FOR UPDATE;
2463:
2464: CURSOR c_repeatable_unit (cp_unit_cd igs_ps_unit_ver.unit_cd%TYPE,
2465: cp_uv_version_number igs_ps_unit_ver.version_number%TYPE) IS
2466: SELECT uv.repeatable_ind
2467: FROM igs_ps_unit_ver uv
2468: WHERE uv.unit_cd = cp_unit_cd AND
2469: uv.version_number = cp_uv_version_number;
2463:
2464: CURSOR c_repeatable_unit (cp_unit_cd igs_ps_unit_ver.unit_cd%TYPE,
2465: cp_uv_version_number igs_ps_unit_ver.version_number%TYPE) IS
2466: SELECT uv.repeatable_ind
2467: FROM igs_ps_unit_ver uv
2468: WHERE uv.unit_cd = cp_unit_cd AND
2469: uv.version_number = cp_uv_version_number;
2470: CURSOR c_renrollcheck(cp_person_id igs_en_su_attempt.person_id%TYPE,
2471: cp_uoo_id igs_en_su_attempt.uoo_id%TYPE,
2578:
2579:
2580: l_sua_details c_sua_details%ROWTYPE;
2581: l_cnt igs_en_su_attempt.administrative_priority%TYPE;
2582: l_repeatable_unit igs_ps_unit_ver.repeatable_ind%TYPE;
2583: l_act_enr NUMBER;
2584: l_dummy VARCHAR2(10);
2585: l_dummy_value NUMBER;
2586: l_return_status VARCHAR2(100);