[Home] [Help]
12: p_message_name OUT NOCOPY VARCHAR2 )
13: RETURN BOOLEAN AS
14: BEGIN -- admp_val_acaiu_iud
15: -- This modules validates the insert/update/delete of
16: -- IGS_AD_PS_APLINSTUNT.
17: DECLARE
18: v_s_adm_appl_status IGS_AD_APPL_STAT.s_adm_appl_status%TYPE;
19: v_s_adm_outcome_status IGS_AD_OU_STAT.s_adm_outcome_status%TYPE;
20: CURSOR c_aa_aas IS
90: p_offered_ind IN VARCHAR2 DEFAULT 'N',
91: p_message_name OUT NOCOPY VARCHAR2 )
92: RETURN BOOLEAN AS
93: BEGIN -- admp_val_acaiu_unit
94: -- validate IGS_AD_PS_APLINSTUNT unit.
95: DECLARE
96: cst_yes CONSTANT VARCHAR2(1) := 'Y';
97: v_cir_1_rec_found BOOLEAN DEFAULT FALSE;
98: v_unit_version_valid BOOLEAN DEFAULT FALSE;
98: v_unit_version_valid BOOLEAN DEFAULT FALSE;
99: v_dummy VARCHAR2(1);
100: v_message_name VARCHAR2(30);
101: CURSOR c_cir_1 (
102: cp_unit_cd IGS_AD_PS_APLINSTUNT.unit_cd%TYPE,
103: cp_uv_version_number IGS_AD_PS_APLINSTUNT.uv_version_number%TYPE,
104: cp_acad_cal_type IGS_AD_APPL.acad_cal_type%TYPE,
105: cp_acad_ci_sequence_number IGS_AD_APPL.acad_ci_sequence_number%TYPE) IS
106: SELECT DISTINCT uoo.cal_type,
99: v_dummy VARCHAR2(1);
100: v_message_name VARCHAR2(30);
101: CURSOR c_cir_1 (
102: cp_unit_cd IGS_AD_PS_APLINSTUNT.unit_cd%TYPE,
103: cp_uv_version_number IGS_AD_PS_APLINSTUNT.uv_version_number%TYPE,
104: cp_acad_cal_type IGS_AD_APPL.acad_cal_type%TYPE,
105: cp_acad_ci_sequence_number IGS_AD_APPL.acad_ci_sequence_number%TYPE) IS
106: SELECT DISTINCT uoo.cal_type,
107: uoo.ci_sequence_number
196: p_message_name OUT NOCOPY VARCHAR2 )
197: RETURN BOOLEAN AS
198: BEGIN -- admp_val_acaiu_opt
199: -- This module validates the unit offering option of the
200: -- IGS_AD_PS_APLINSTUNT
201: DECLARE
202: -- Select valid teaching periods for the admission course application
203: CURSOR c_cir IS
204: SELECT cir.sub_cal_type,
409: p_adm_unit_outcome_status IN VARCHAR2 ,
410: p_message_name OUT NOCOPY VARCHAR2 )
411: RETURN BOOLEAN AS
412: BEGIN -- admp_val_acaiu_auos
413: -- This module validates IGS_AD_PS_APLINSTUNT outcome status.
414: DECLARE
415: cst_pending CONSTANT VARCHAR2(7) :='PENDING';
416: cst_offer CONSTANT VARCHAR2(5) :='OFFER';
417: cst_cond_offer CONSTANT VARCHAR2(10) :='COND-OFFER';
491: p_message_name OUT NOCOPY VARCHAR2 )
492: RETURN BOOLEAN AS
493: BEGIN -- admp_val_acaiu_ci
494: -- This module validates the teaching period IGS_CA_INST given for the
495: -- IGS_AD_PS_APLINSTUNT.
496: DECLARE
497: cst_teaching CONSTANT VARCHAR2(8) := 'TEACHING';
498: cst_inactive CONSTANT VARCHAR2(8) := 'INACTIVE';
499: cst_planned CONSTANT VARCHAR2(7) := 'PLANNED';
614: p_unit_mode IN VARCHAR2 ,
615: p_message_name OUT NOCOPY VARCHAR2 )
616: RETURN BOOLEAN AS
617: BEGIN -- admp_val_acaiu_um
618: -- This module validates that the IGS_AD_PS_APLINSTUNT unit class
619: -- and unit mode do not conflict.
620: DECLARE
621: v_dummy VARCHAR2(1);
622: CURSOR c_um IS
670: p_location_cd IN VARCHAR2 , -- Added for bug 3083148
671: p_unit_class IN VARCHAR2 ) -- Added for bug 3083148
672: RETURN BOOLEAN AS
673: BEGIN -- admp_val_acaiu_restr
674: -- This module validates the IGS_AD_PS_APLINSTUNT unit
675: -- restriction number.
676: DECLARE
677: v_count NUMBER(5);
678: CURSOR c_count_acaiu IS
676: DECLARE
677: v_count NUMBER(5);
678: CURSOR c_count_acaiu IS
679: SELECT count(*)
680: FROM IGS_AD_PS_APLINSTUNT acaiu
681: WHERE acaiu.person_id = p_person_id AND
682: acaiu.admission_appl_number = p_admission_appl_number AND
683: acaiu.nominated_course_cd = p_nominated_course_cd AND
684: acaiu.acai_sequence_number = p_acai_sequence_number AND
769: p_message_name OUT NOCOPY VARCHAR2 )
770: RETURN BOOLEAN AS
771: BEGIN -- admp_val_acaiu_altcd
772: -- This module validates the teaching period alternate code given
773: -- for the IGS_AD_PS_APLINSTUNT
774: DECLARE
775: cst_teaching CONSTANT VARCHAR2(10) := 'TEACHING';
776: CURSOR c_cat IS
777: SELECT cat.s_cal_cat
921: p_offered_ind IN VARCHAR2 ,
922: p_message_name OUT NOCOPY VARCHAR2 )
923: RETURN BOOLEAN AS
924: BEGIN -- admp_val_acaiu_uv
925: -- This module validate IGS_AD_PS_APLINSTUNT unit version.
926: DECLARE
927: v_award_course_only_ind IGS_PS_UNIT_VER.award_course_only_ind%TYPE;
928: v_s_unit_status IGS_PS_UNIT_STAT.s_unit_status%TYPE;
929: CURSOR c_val_unit_version IS
1064: DECLARE
1065: v_uv_rec VARCHAR2(1);
1066: v_can_rec VARCHAR2(1);
1067: v_admission_appl_number
1068: IGS_AD_PS_APLINSTUNT.admission_appl_number%TYPE;
1069: v_nominated_course_cd IGS_AD_PS_APLINSTUNT.nominated_course_cd%TYPE;
1070: v_acai_sequence_number
1071: IGS_AD_PS_APLINSTUNT.acai_sequence_number%TYPE;
1072: cst_error CONSTANT VARCHAR2(1) := 'E';
1065: v_uv_rec VARCHAR2(1);
1066: v_can_rec VARCHAR2(1);
1067: v_admission_appl_number
1068: IGS_AD_PS_APLINSTUNT.admission_appl_number%TYPE;
1069: v_nominated_course_cd IGS_AD_PS_APLINSTUNT.nominated_course_cd%TYPE;
1070: v_acai_sequence_number
1071: IGS_AD_PS_APLINSTUNT.acai_sequence_number%TYPE;
1072: cst_error CONSTANT VARCHAR2(1) := 'E';
1073: cst_warn CONSTANT VARCHAR2(1) := 'W';
1067: v_admission_appl_number
1068: IGS_AD_PS_APLINSTUNT.admission_appl_number%TYPE;
1069: v_nominated_course_cd IGS_AD_PS_APLINSTUNT.nominated_course_cd%TYPE;
1070: v_acai_sequence_number
1071: IGS_AD_PS_APLINSTUNT.acai_sequence_number%TYPE;
1072: cst_error CONSTANT VARCHAR2(1) := 'E';
1073: cst_warn CONSTANT VARCHAR2(1) := 'W';
1074: cst_readmit CONSTANT VARCHAR2(9) := 'RE-ADMIT';
1075: CURSOR c_uv IS