[Home] [Help]
1: PACKAGE BODY IGS_EN_VAL_SUA AS
2: /* $Header: IGSEN68B.pls 120.19 2006/06/05 10:12:58 smaddali ship $ */
3: -------------------------------------------------------------------------------------------
4: --Change History:
5: --Who When What
492: END;
493: EXCEPTION
494: WHEN OTHERS THEN
495: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
496: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SUA.resp_val_sua_all');
497: IGS_GE_MSG_STACK.ADD;
498: App_Exception.Raise_Exception;
499: END resp_val_sua_all;
500: --
779: END;
780: EXCEPTION
781: WHEN OTHERS THEN
782: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
783: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SUA.enrp_val_sua_update');
784: IGS_GE_MSG_STACK.ADD;
785: App_Exception.Raise_Exception;
786: END enrp_val_sua_update;
787: --
809: END;
810: EXCEPTION
811: WHEN OTHERS THEN
812: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
813: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SUA.enrp_val_sua_cp_rsn');
814: IGS_GE_MSG_STACK.ADD;
815: App_Exception.Raise_Exception;
816: END enrp_val_sua_cp_rsn;
817: --
958: END;
959: EXCEPTION
960: WHEN OTHERS THEN
961: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
962: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SUA.enrp_val_sua_alt_ttl');
963: IGS_GE_MSG_STACK.ADD;
964: App_Exception.Raise_Exception;
965: END enrp_val_sua_alt_ttl;
966: --
1069: END;
1070: EXCEPTION
1071: WHEN OTHERS THEN
1072: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
1073: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SUA.enrp_val_sua_pre');
1074: IGS_GE_MSG_STACK.ADD;
1075: App_Exception.Raise_Exception;
1076: END enrp_val_sua_pre;
1077: --
1551: END IF;
1552: END IF;
1553:
1554: -- validate administrative unit status grade
1555: IF (IGS_EN_VAL_SUA.enrp_get_sua_gs(
1556: p_discontinued_dt,
1557: p_administrative_unit_status,
1558: v_grading_schema_cd,
1559: v_version_number,
1569: RETURN TRUE;
1570: EXCEPTION
1571: WHEN OTHERS THEN
1572: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
1573: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SUA.enrp_val_discont_aus');
1574: IGS_GE_MSG_STACK.ADD;
1575: App_Exception.Raise_Exception;
1576: END;
1577: END enrp_val_discont_aus;
1639: END;
1640: EXCEPTION
1641: WHEN OTHERS THEN
1642: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
1643: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SUA.enrp_get_sua_gs');
1644: IGS_GE_MSG_STACK.ADD;
1645: App_Exception.Raise_Exception;
1646: END enrp_get_sua_gs;
1647: --
1856: END IF;
1857: EXCEPTION
1858: WHEN OTHERS THEN
1859: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
1860: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SUA.enrp_get_sua_ausg');
1861: IGS_GE_MSG_STACK.ADD;
1862: App_Exception.Raise_Exception;
1863: END;
1864: END enrp_get_sua_ausg;
1981: RETURN TRUE;
1982: EXCEPTION
1983: WHEN OTHERS THEN
1984: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
1985: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SUA.enrp_val_sua_discont');
1986: IGS_GE_MSG_STACK.ADD;
1987: App_Exception.Raise_Exception;
1988: END;
1989: END enrp_val_sua_discont;
2250: END;
2251: EXCEPTION
2252: WHEN OTHERS THEN
2253: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
2254: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SUA.enrp_val_sua_delete');
2255: IGS_GE_MSG_STACK.ADD;
2256: App_Exception.Raise_Exception;
2257: END enrp_val_sua_delete;
2258: --
2344: RETURN BOOLEAN AS
2345: -------------------------------------------------------------------------------------------
2346: --Change History:
2347: --Who When What
2348: --kkillams 28-04-2003 Impacted object, due to change in the signature of igs_en_val_sua.enrp_val_sua_dupl
2349: -- of the function w.r.t. bug number 2829262
2350: -------------------------------------------------------------------------------------------
2351:
2352: BEGIN -- enrp_val_sua_cnfrm
2353: -- Perform all validations associated with the confirmation of a unit
2354: -- attempt for a student. This module is a grouping of existing
2355: -- validation modules.
2356: -- Performs the following modules:
2357: -- Call IGS_EN_VAL_SUA.enrp_val_sua_insert;
2358: -- determine if the student is of the correct status to have
2359: -- a unit attempt added.
2360: -- Call IGS_EN_VAL_ENCMB.enrp_val_excld_unit;
2361: -- determine if the student is currently excluded from the unit.
2358: -- determine if the student is of the correct status to have
2359: -- a unit attempt added.
2360: -- Call IGS_EN_VAL_ENCMB.enrp_val_excld_unit;
2361: -- determine if the student is currently excluded from the unit.
2362: -- Call IGS_EN_VAL_SUA.enrp_val_sua_advstnd;
2363: -- determine if the student has already satisfied the unit
2364: -- through advanced standing.
2365: -- Call IGS_EN_VAL_SUA.enrp_val_sua_intrmt;
2366: -- determine if the attempt overlaps an existing period of
2361: -- determine if the student is currently excluded from the unit.
2362: -- Call IGS_EN_VAL_SUA.enrp_val_sua_advstnd;
2363: -- determine if the student has already satisfied the unit
2364: -- through advanced standing.
2365: -- Call IGS_EN_VAL_SUA.enrp_val_sua_intrmt;
2366: -- determine if the attempt overlaps an existing period of
2367: -- intermission.
2368: -- Call IGS_EN_VAL_SUA.enrp_val_coo_loc;
2369: -- determine if the attempt is in line with students forced
2364: -- through advanced standing.
2365: -- Call IGS_EN_VAL_SUA.enrp_val_sua_intrmt;
2366: -- determine if the attempt overlaps an existing period of
2367: -- intermission.
2368: -- Call IGS_EN_VAL_SUA.enrp_val_coo_loc;
2369: -- determine if the attempt is in line with students forced
2370: -- location (if applicable).
2371: -- Call IGS_EN_VAL_SUA.enrp_val_coo_mode;
2372: -- determine if the attemt is in line with students forced
2367: -- intermission.
2368: -- Call IGS_EN_VAL_SUA.enrp_val_coo_loc;
2369: -- determine if the attempt is in line with students forced
2370: -- location (if applicable).
2371: -- Call IGS_EN_VAL_SUA.enrp_val_coo_mode;
2372: -- determine if the attemt is in line with students forced
2373: -- mode (if applicable).
2374: -- Call IGS_EN_VAL_SUA.enrp_val_sua_enr_dt;
2375: -- validate the enrolled date.
2370: -- location (if applicable).
2371: -- Call IGS_EN_VAL_SUA.enrp_val_coo_mode;
2372: -- determine if the attemt is in line with students forced
2373: -- mode (if applicable).
2374: -- Call IGS_EN_VAL_SUA.enrp_val_sua_enr_dt;
2375: -- validate the enrolled date.
2376: -- Call IGS_EN_VAL_SUA.enrp_val_sua_ci;
2377: -- validate that the teaching period of the unit is not prior to
2378: -- the commencement date of the student course attempt.
2372: -- determine if the attemt is in line with students forced
2373: -- mode (if applicable).
2374: -- Call IGS_EN_VAL_SUA.enrp_val_sua_enr_dt;
2375: -- validate the enrolled date.
2376: -- Call IGS_EN_VAL_SUA.enrp_val_sua_ci;
2377: -- validate that the teaching period of the unit is not prior to
2378: -- the commencement date of the student course attempt.
2379: -- Call IGS_EN_VAL_SUA.enrp_val_sua_dupl;
2380: -- determine if the student is already enrolled concurrently in the
2375: -- validate the enrolled date.
2376: -- Call IGS_EN_VAL_SUA.enrp_val_sua_ci;
2377: -- validate that the teaching period of the unit is not prior to
2378: -- the commencement date of the student course attempt.
2379: -- Call IGS_EN_VAL_SUA.enrp_val_sua_dupl;
2380: -- determine if the student is already enrolled concurrently in the
2381: -- unit or has completed the unit with a pass or incomplete result type.
2382: -- Call IGS_EN_VAL_SUA.resp_val_sua_cnfrm;
2383: -- validate if attempting to confirm a research unit attempt.
2378: -- the commencement date of the student course attempt.
2379: -- Call IGS_EN_VAL_SUA.enrp_val_sua_dupl;
2380: -- determine if the student is already enrolled concurrently in the
2381: -- unit or has completed the unit with a pass or incomplete result type.
2382: -- Call IGS_EN_VAL_SUA.resp_val_sua_cnfrm;
2383: -- validate if attempting to confirm a research unit attempt.
2384: -- The current set of fail types are:
2385: -- course The course isn?t in a correct state. ie.
2386: -- Discontinued or intermitted for the teaching period.
2429: FETCH c_sua INTO l_uoo_id;
2430: CLOSE c_sua;
2431: -- Determine if the student is of the correct status to have a unit attempt
2432: -- added.
2433: IF NOT IGS_EN_VAL_SUA.enrp_val_sua_insert(
2434: p_person_id,
2435: p_course_cd,
2436: cst_enrolled,
2437: v_message_name) THEN
2443: p_fail_type := cst_course;
2444: p_message_name := v_message_name;
2445: END IF;
2446: -- Determine if the attempt overlaps an existing period of intermission.
2447: IF NOT IGS_EN_VAL_SUA.enrp_val_sua_intrmt(
2448: p_person_id,
2449: p_course_cd,
2450: p_cal_type,
2451: p_ci_sequence_number,
2458: p_fail_type := cst_course;
2459: p_message_name := v_message_name;
2460: END IF;
2461: -- Validate research unit attempt
2462: IF NOT IGS_EN_VAL_SUA.resp_val_sua_cnfrm(
2463: p_person_id,
2464: p_course_cd,
2465: p_unit_cd,
2466: p_uv_version_number,
2476: p_fail_type := cst_course;
2477: p_message_name := v_message_name;
2478: END IF;
2479: -- Determine if the student is currently excluded from the unit
2480: IF NOT IGS_EN_VAL_SUA.enrp_val_sua_excld(
2481: p_person_id,
2482: p_course_cd,
2483: p_unit_cd,
2484: p_cal_type,
2497: FETCH c_sca INTO v_sca_rec;
2498: CLOSE c_sca;
2499: -- Determine if the student has already satisfied the unit through advanced
2500: -- standing.
2501: IF NOT IGS_EN_VAL_SUA.enrp_val_sua_advstnd(
2502: p_person_id,
2503: p_course_cd,
2504: v_sca_rec.version_number,
2505: p_unit_cd,
2515: p_message_name := v_message_name;
2516: END IF;
2517: -- Determine if the attempt is in line with students
2518: -- forced location (if applicable).
2519: IF NOT IGS_EN_VAL_SUA.enrp_val_coo_loc(
2520: v_sca_rec.coo_id,
2521: p_location_cd,
2522: v_message_name) THEN
2523: p_fail_type := cst_cross;
2529: p_message_name := v_message_name;
2530: END IF;
2531: -- Determine if the attempt is in line with students forced mode (if
2532: -- applicable).
2533: IF NOT IGS_EN_VAL_SUA.enrp_val_coo_mode(
2534: v_sca_rec.coo_id,
2535: p_unit_class,
2536: v_message_name) THEN
2537: p_fail_type := cst_cross;
2542: p_fail_type := cst_cross;
2543: p_message_name := v_message_name;
2544: END IF;
2545: -- Validate the enrolled date.
2546: IF NOT IGS_EN_VAL_SUA.enrp_val_sua_enr_dt(
2547: p_person_id,
2548: p_course_cd,
2549: p_enrolled_dt,
2550: cst_enrolled,
2561: p_message_name := v_message_name;
2562: END IF;
2563: -- Determine if the student unit attempt has a teaching period
2564: -- which is prior to the commencement date of the student course attempt
2565: IF NOT IGS_EN_VAL_SUA.enrp_val_sua_ci(
2566: p_person_id,
2567: p_course_cd,
2568: p_cal_type,
2569: p_ci_sequence_number,
2580: p_message_name := v_message_name;
2581: END IF;
2582: -- Determine if the student unit attempt already exists as
2583: -- enrolled or completed with pass or incomplete result
2584: IF NOT IGS_EN_VAL_SUA.enrp_val_sua_dupl(
2585: p_person_id,
2586: p_course_cd,
2587: p_unit_cd,
2588: p_uv_version_number,
2641: BEGIN -- enrp_val_sua_cnfrm_p
2642: -- Perform all post-commit (or post) validations to a given student unit
2643: -- attempt. This module is a grouping of existing validation modules.
2644: -- Performs the following modules:
2645: -- Call IGS_EN_VAL_SUA.resp_val_sua_all to check any research unit related
2646: -- issues.
2647: -- Call IGS_EN_VAL_ENCMB.enrp_val_enr_encmb to check that the student hasn't
2648: -- breached any encumbrance restrictions (eg. max cp).
2649: -- Call IGS_EN_VAL_SCA.enrp_val_coo_att to ensure that the student is in line
2701: p_fail_type := NULL;
2702: p_message_name := null;
2703: p_message_name2 := null;
2704: -- Check research unit related issues
2705: IF IGS_EN_VAL_SUA.resp_val_sua_all(
2706: p_person_id,
2707: p_course_cd,
2708: p_cal_type,
2709: p_ci_sequence_number,
2822: END;
2823: EXCEPTION
2824: WHEN OTHERS THEN
2825: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
2826: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SUA.enrp_val_sua_cnfrm_p');
2827: IGS_GE_MSG_STACK.ADD;
2828: App_Exception.Raise_Exception;
2829: END enrp_val_sua_cnfrm_p;
2830: --
2934: END;
2935: EXCEPTION
2936: WHEN OTHERS THEN
2937: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
2938: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SUA.enrp_val_sua_ovrd_cp');
2939: IGS_GE_MSG_STACK.ADD;
2940: App_Exception.Raise_Exception;
2941: END enrp_val_sua_ovrd_cp;
2942: --
2965: END;
2966: EXCEPTION
2967: WHEN OTHERS THEN
2968: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
2969: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SUA.enrp_val_sua_rule_wv');
2970: IGS_GE_MSG_STACK.ADD;
2971: App_Exception.Raise_Exception;
2972: END enrp_val_sua_rule_wv;
2973:
3052: END;
3053: EXCEPTION
3054: WHEN OTHERS THEN
3055: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
3056: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SUA.enrp_val_sua_uoo');
3057: IGS_GE_MSG_STACK.ADD;
3058: App_Exception.Raise_Exception;
3059: END enrp_val_sua_uoo;
3060: --
3974: RAISE;
3975:
3976: WHEN OTHERS THEN
3977: FND_MESSAGE.SET_NAME('IGS','IGS_GE_UNHANDLED_EXP');
3978: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_SUA.validate_mus');
3979: IGS_GE_MSG_STACK.ADD;
3980: RAISE;
3981:
3982: END validate_mus;
3980: RAISE;
3981:
3982: END validate_mus;
3983:
3984: END IGS_EN_VAL_SUA;