[Home] [Help]
342:
343: -- 1. Check whether Unit set is offered within the students program offering option
344: -- 2. Check whether a unit set attempt is being created against a unit set, which has
345: -- already been completed by the student in the same program.
346: l_ret_val := igs_en_val_susa.enrp_val_susa_ins (p_person_id => p_person_id,
347: p_course_cd => p_susa_rec.program_cd,
348: p_unit_set_cd => p_susa_rec.unit_set_cd,
349: p_sequence_number => p_sequence_number,
350: p_us_version_number => p_susa_rec.us_version_number,
358:
359: -- 1. Check if the authorized date is set, then the authorized person must also be set (and visa versa).
360: -- 2. The authorized date/person can only be set if the unit set is being ended, or if the
361: -- unit set version is flagged as requiring authorization to enroll.
362: l_ret_val := igs_en_val_susa.enrp_val_susa_auth (p_unit_set_cd => p_susa_rec.unit_set_cd,
363: p_us_version_number => p_susa_rec.us_version_number,
364: p_end_dt => p_susa_rec.end_dt,
365: p_authorised_person_id => p_auth_person_id,
366: p_authorised_on => p_susa_rec.authorised_on,
373: END IF;
374:
375:
376: -- Check that when unit set requires authorisation then the authorised fields must be set
377: IF NOT igs_en_val_susa.enrp_val_susa_us_ath (p_unit_set_cd => p_susa_rec.unit_set_cd,
378: p_version_number => p_susa_rec.us_version_number,
379: p_authorised_person_id => p_auth_person_id,
380: p_authorised_on => p_susa_rec.authorised_on,
381: p_message_name => l_message_name) THEN
388:
389:
390: -- 1. If requirements complete date is set then complete flag must also be set and vice-versa.
391: -- 2. The completion flag/date can only be set if the unit set attempt has been confirmed
392: l_ret_val := igs_en_val_susa.enrp_val_susa_cmplt (p_rqrmnts_complete_dt => p_susa_rec.rqrmnts_complete_dt,
393: p_rqrmnts_complete_ind => NVL(p_susa_rec.rqrmnts_complete_ind,'N'),
394: p_student_confirmed_ind => p_susa_rec.student_confirmed_ind,
395: p_message_name => l_message_name,
396: p_legacy => l_legacy);
401: END IF;
402:
403:
404: -- Check that completed source type can only be set if completion date and indicator are set
405: IF NOT igs_en_val_susa.enrp_val_susa_scst (p_rqrmnts_complete_dt => p_susa_rec.rqrmnts_complete_dt,
406: p_rqrmnts_complete_ind => NVL(p_susa_rec.rqrmnts_complete_ind,'N'),
407: p_s_completed_source_type => p_susa_rec.s_completed_source_type,
408: p_message_name => l_message_name) THEN
409:
414: END IF;
415:
416:
417: -- Check whether the selection date is set if the student confirmed indicator is set and visa versa
418: l_ret_val := igs_en_val_susa.enrp_val_susa_sci_sd (p_student_confirmed_ind => NVL(p_susa_rec.student_confirmed_ind,'N'),
419: p_selection_dt => p_susa_rec.selection_dt,
420: p_message_name => l_message_name,
421: p_legacy => l_legacy);
422:
426: END IF;
427:
428:
429: -- Check that voluntary end indicator can only be set when end date is set
430: IF NOT igs_en_val_susa.enrp_val_susa_end_vi (p_voluntary_end_ind => p_susa_rec.voluntary_end_ind,
431: p_end_dt => p_susa_rec.end_dt,
432: p_message_name => l_message_name) THEN
433:
434: FND_MESSAGE.SET_NAME('IGS',l_message_name);
441: IF p_susa_rec.parent_unit_set_cd IS NOT NULL THEN
442:
443: -- 1. If the unit set is specified as a subordinate within the unit set relationships, then it must be a child attempt.
444: -- 2. If the attempt is a child attempt, then the parent set must be valid within the unit set relationships setup
445: l_ret_val := igs_en_val_susa.enrp_val_susa_cousr (p_person_id => p_person_id,
446: p_course_cd => p_susa_rec.program_cd,
447: p_unit_set_cd => p_susa_rec.unit_set_cd,
448: p_us_version_number => p_susa_rec.us_version_number,
449: p_parent_unit_set_cd => p_susa_rec.parent_unit_set_cd,
463: -- 1. If the unit set attempt is a direct parent of itself.
464: -- 2. Whether the unit set attempt is an indirect parent of itself.
465: -- 3. The Parent must be within the same program attempt, and must not be ended.
466: -- 4. Cannot have a confirmed parent if the attempt is not also confirmed
467: l_ret_val := igs_en_val_susa.enrp_val_susa_parent (p_person_id => p_person_id,
468: p_course_cd => p_susa_rec.program_cd,
469: p_unit_set_cd => p_susa_rec.unit_set_cd,
470: p_sequence_number => p_sequence_number,
471: p_parent_unit_set_cd => p_susa_rec.parent_unit_set_cd,
482:
483: -- 1. If end date is being set and the unit set was part of the admissions offer, then authorisation fields must be set.
484: -- 2. Cannot have two active attempts of the same unit set within a single program attempt.
485: -- 3. The end date must be set if the parent unit set is ended
486: l_ret_val := igs_en_val_susa.enrp_val_susa_end_dt (p_person_id => p_person_id,
487: p_course_cd => p_susa_rec.program_cd,
488: p_unit_set_cd => p_susa_rec.unit_set_cd,
489: p_sequence_number => p_sequence_number,
490: p_us_version_number => p_susa_rec.us_version_number,
506: -- 1. The confirmed indicator cannot be unset if the end date is set
507: -- 2. The confirmed indicator cannot be unset if the completed date is set
508: -- 3. The confirmed indicator cannot be set if the program attempt status is unconfirmed
509: -- 4. The confirmed indicator cannot be set when parent is unconfirmed
510: l_ret_val := igs_en_val_susa.enrp_val_susa_sci (p_person_id => p_person_id,
511: p_course_cd => p_susa_rec.program_cd,
512: p_unit_set_cd => p_susa_rec.unit_set_cd,
513: p_sequence_number => p_sequence_number,
514: p_us_version_number => p_susa_rec.us_version_number,
528: END IF;
529:
530:
531: -- Check that an administrative unit cannot be set to be a primary one
532: l_ret_val := igs_en_val_susa.enrp_val_susa_prmry (p_person_id => p_person_id,
533: p_course_cd => p_susa_rec.program_cd,
534: p_unit_set_cd => p_susa_rec.unit_set_cd,
535: p_us_version_number => p_susa_rec.us_version_number,
536: p_primary_set_ind => p_susa_rec.primary_set_ind,