[Home] [Help]
34: -- the calls to the drop_all workflow is done after either dropping or
35: -- discontinuing a unit attempt. created new local procedure invoke_drop_workflow. Bug 2599925.
36: --kkillams 08-11-2002 As part of Legacy Build bug no:2661533,
37: -- Impacted object, due to addition of new paramter to the enrp_val_sca_discont fuctions
38: --svenkata 20-NOV-2002 Modified the call to the function igs_en_val_sua.enrp_val_sua_discont to add value 'N' for the parameter
39: -- p_legacy. Bug#2661533.
40: --ptandon 21-MAY-2003 Replaced usage of Message IGS_GE_OK with message IGS_AD_OK. Bug#2755657
41: --svanukur 26-jun-2003 Passing discontinued date with a nvl substitution of sysdate in the call to the update_row api of
42: -- ig_en_su_attmept in case of a "dropped" unit attempt status as part of bug 2898213.
1259: p_message_name := 'IGS_EN_ONE_SUA_NOT_DISCONTINU';
1260: RETURN FALSE;
1261: END IF;
1262: -- validate discontinuation
1263: IF (Igs_En_Val_Sua.enrp_val_sua_discont(
1264: p_person_id,
1265: p_course_cd,
1266: v_sua.unit_cd,
1267: v_sua.version_number,
3236: NULL);
3237: v_ret_val := FALSE;
3238: v_validation_error := TRUE;
3239: ELSE
3240: IF Igs_En_Val_Sua.enrp_val_sua_cnfrm(
3241: v_sua_sca_rec.person_id,
3242: v_sua_sca_rec.course_cd,
3243: v_sua_sca_rec.unit_cd,
3244: v_sua_sca_rec.version_number,
3372: 'IGS_EN_UA_STALT_INVALID_ENROL',
3373: NULL);
3374: v_ret_val := FALSE;
3375: v_change_made := TRUE;
3376: END IF; -- IGS_EN_VAL_SUA.enrp_val_sua_cnfrm
3377: END IF; --(c_sua_sca_rec.enrolled_cutoff_date IS NOT NULL AND
3378: -- SYSDATE > c_sua_sca_rec.enrolled_cutoff_date)
3379: IF v_validation_error = TRUE THEN
3380: -- no change done