[Home] [Help]
10: --
11: --Change History:
12: --Who When What
13: --ckasu 17-MAR-2006 Modified Enrp_Prc_Sua_Blk_E_D procedure inorder to pass p_no_assessment_ind in call to
14: -- igs_ss_en_wrappers.insert_into_enr_worksheet as part of Bug 4590889.
15: --rvangala 12-AUG-2005 Bug #4551013. EN320 Build
16: --jtmathew 18-Jan-2005 Modified procedure enrpl_upd_sca_coo for HE350 changes
17: --jtmathew 05-Nov-2004 Modified procedure enrpl_upd_sca_coo to update associated HESA records when
18: -- running the 'Bulk Program Offering Option Transfer Process' as per bug 3985220
100: --bdeviset 11-Apr-2005 Modified cursor c_sca in procedure Enrp_Prc_Sca_Blk_Trn for bug# 3701057
101: --sgurusam 29-Jun-2005 EN 317 TD: Imparted object modifications. Added parameter p_calling_obj with value 'JOB'
102: --ctyagi 20-SEPT-2005 Modified call to eval_rsv_seat for bug 4362302
103: --ckasu 17-MAR-2006 Modified Enrp_Prc_Sua_Blk_E_D procedure inorder to pass p_no_assessment_ind in call to
104: -- igs_ss_en_wrappers.insert_into_enr_worksheet as part of Bug 5070742.
105: --ckasu 02-May-2006 Modified as a part of bug#5191592
106: --------------------------------------------------------------------------
107:
108: TYPE r_sua_typ IS RECORD( unit_cd IGS_EN_SU_ATTEMPT.unit_cd%TYPE,
1229: --ckasu 13-Sep-2004 Modified procedure inorder to consider Person step validations in Discontinuing and Droping units.
1230: -- as part of Bug 3823810
1231: --stutta 07-Dec-2004 Modified c_sca to select programs which are primary in the passed term calendar.
1232: As per bug#4046043
1233: --ckasu 17-MAR-2006 Modified call to igs_ss_en_wrappers.insert_into_enr_worksheet by passing p_no_assessment_ind
1234: -- as part of Bug 5070742.
1235:
1236: --------------------------------------------------------------------------------------------------------------------------------------*/
1237: e_resource_busy_exception EXCEPTION;
1538: fnd_message.set_name('IGS',l_mesg_name);
1539: END IF;
1540: l_mesg_txt := fnd_message.get;
1541: ELSE
1542: --exception has occured in igs_ss_en_wrappers and l_mesg_name contains
1543: --the exception TEXT (not name)
1544: --So pass the text and use a dummy message (smaller than 30chars)
1545: --The dummy message needs to have the UNIT_CD token
1546: --Because only in this scneario does the report read the p_text instead of the p_sle_message_name
1987: IF l_action_processed THEN
1988: l_message_name:= NULL;
1989: l_return_status := TRUE;
1990: --Raise workflow event to notify the student regarding the droping of the unit section.
1991: igs_ss_en_wrappers.drop_notif_variable(p_reason,'ADMIN_DROP_JOB');
1992: igs_ss_en_wrappers.blk_drop_units(p_uoo_id =>rec_get_sua_d.uoo_id,
1993: p_person_id =>rec_sca.person_id,
1994: p_person_type =>l_person_type,
1995: p_load_cal_type =>p_load_cal_type,
1988: l_message_name:= NULL;
1989: l_return_status := TRUE;
1990: --Raise workflow event to notify the student regarding the droping of the unit section.
1991: igs_ss_en_wrappers.drop_notif_variable(p_reason,'ADMIN_DROP_JOB');
1992: igs_ss_en_wrappers.blk_drop_units(p_uoo_id =>rec_get_sua_d.uoo_id,
1993: p_person_id =>rec_sca.person_id,
1994: p_person_type =>l_person_type,
1995: p_load_cal_type =>p_load_cal_type,
1996: p_load_sequence_number =>p_load_cal_seq,
2176: END IF;
2177:
2178: --Following api will creates an unit attempt in unconfirm/waitlist status.
2179: BEGIN
2180: igs_ss_en_wrappers.insert_into_enr_worksheet(p_person_number =>l_person_number,
2181: p_course_cd =>rec_sca.course_cd,
2182: p_uoo_id =>l_uoo_id,
2183: p_waitlist_ind =>l_waitlist_ind,
2184: p_session_id =>NULL,
2291: l_ret_stat:= NULL;
2292: END LOOP; ---i IN 1 .. l_cntr_enroll
2293: IF p_confirmed_ind = 'Y' AND l_uoo_ids_list IS NOT NULL AND l_processed THEN
2294: BEGIN
2295: igs_ss_en_wrappers.validate_enroll_validate(p_person_id =>rec_sca.person_id,
2296: p_load_cal_type =>p_load_cal_type,
2297: p_load_ci_sequence_number =>p_load_cal_seq,
2298: p_uoo_ids =>substr(l_uoo_ids_list,1,length(l_uoo_ids_list)-1) , --remove trailing ','
2299: p_program_cd =>rec_sca.course_cd,
2419:
2420: IF l_action_processed THEN
2421: l_message_name:= NULL;
2422: l_return_status := TRUE;
2423: igs_ss_en_wrappers.blk_drop_units(p_uoo_id =>rec_get_sua_d.uoo_id,
2424: p_person_id =>rec_sca.person_id,
2425: p_person_type =>l_person_type,
2426: p_load_cal_type =>p_load_cal_type,
2427: p_load_sequence_number =>p_load_cal_seq,
3427: IF v_update_uoo THEN
3428:
3429: IF ((rec_f_unit.grading_schema_code IS NOT NULL) AND (rec_f_unit.gs_version_number IS NOT NULL)) THEN
3430:
3431: IF NOT igs_ss_en_wrappers.enr_val_grad_usec(
3432: p_destination_uoo_id,
3433: rec_f_unit.grading_schema_code,
3434: rec_f_unit.gs_version_number) THEN
3435:
4431: p_waitlist_uoo_ids => l_sub_waitlist,
4432: p_failed_uoo_ids => l_sub_failed);
4433: IF l_sub_success IS NOT NULL AND l_unit_attempt_status ='ENROLLED' THEN
4434: BEGIN
4435: igs_ss_en_wrappers.validate_enroll_validate(p_person_id =>p_person_id,
4436: p_load_cal_type =>p_load_cal_type,
4437: p_load_ci_sequence_number =>p_load_seq_number,
4438: p_uoo_ids =>l_sub_success,
4439: p_program_cd =>p_course_cd,
5323: ELSE
5324: l_unit_attempt_status := 'ENROLLED';
5325: END IF;
5326: --Calling procedure to raise business event when unit is transferred
5327: igs_ss_en_wrappers.transfer_workflow(
5328: p_source_uoo_ids => v_sua_rec.uoo_id,
5329: p_dest_uoo_ids => l_destination_uoo_id,
5330: p_person_id => v_sua_rec.person_id,
5331: p_load_cal_type => l_load_cal_type,