[Home] [Help]
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
108: FROM IGS_PS_UNIT_OFR_OPT uoo,
109: IGS_CA_INST_REL cir
110: WHERE uoo.unit_cd = cp_unit_cd AND
111: uoo.version_number = cp_uv_version_number AND
112: uoo.offered_ind = cst_yes AND
113: cir.sub_cal_type = uoo.cal_type AND
119: cp_adm_ci_sequence_number IGS_AD_APPL.acad_ci_sequence_number%TYPE,
120: cp_sup_cal_type IGS_AD_APPL.acad_cal_type%TYPE,
121: cp_sup_ci_sequence_number IGS_AD_APPL.acad_ci_sequence_number%TYPE) IS
122: SELECT 'x'
123: FROM IGS_CA_INST_REL cir
124: WHERE cir.sub_cal_type = cp_adm_cal_type AND
125: cir.sub_ci_sequence_number = cp_adm_ci_sequence_number AND
126: cir.sup_cal_type = cp_sup_cal_type AND
127: cir.sup_ci_sequence_number = cp_sup_ci_sequence_number;
202: -- Select valid teaching periods for the admission course application
203: CURSOR c_cir IS
204: SELECT cir.sub_cal_type,
205: cir.sub_ci_sequence_number
206: FROM IGS_CA_INST_REL cir,
207: IGS_CA_TYPE cat1,
208: IGS_CA_TYPE cat2
209: WHERE cir.sup_cal_type = p_acad_cal_type AND
210: cir.sup_ci_sequence_number = p_acad_ci_sequence_number AND
211: cat1.s_cal_cat = 'TEACHING' AND
212: cat2.s_cal_cat = 'ACADEMIC' AND
213: cir.sub_cal_type = cat1.cal_type AND
214: cir.sup_cal_type = cat2.cal_type;
215: v_cal_type IGS_CA_INST.cal_type%TYPE;
216: v_ci_sequence_number IGS_CA_INST.sequence_number%TYPE;
217: v_message_name VARCHAR2(30);
218: v_val_off_optn_found BOOLEAN DEFAULT FALSE;
219: v_cir_found BOOLEAN DEFAULT FALSE;
212: cat2.s_cal_cat = 'ACADEMIC' AND
213: cir.sub_cal_type = cat1.cal_type AND
214: cir.sup_cal_type = cat2.cal_type;
215: v_cal_type IGS_CA_INST.cal_type%TYPE;
216: v_ci_sequence_number IGS_CA_INST.sequence_number%TYPE;
217: v_message_name VARCHAR2(30);
218: v_val_off_optn_found BOOLEAN DEFAULT FALSE;
219: v_cir_found BOOLEAN DEFAULT FALSE;
220: v_admp_pk_ind BOOLEAN DEFAULT FALSE;
340: v_ci_sequence_number,
341: v_val_ind_type_offer) = TRUE THEN
342: v_val_ind_type := v_val_ind_type_offer;
343: v_val_off_optn_found := TRUE;
344: EXIT; -- (IGS_CA_INST_REL)
345: ELSE
346: v_val_ind_type := v_val_ind_type_offer;
347: v_val_off_optn_found := FALSE;
348: END IF;
346: v_val_ind_type := v_val_ind_type_offer;
347: v_val_off_optn_found := FALSE;
348: END IF;
349: END IF;
350: END LOOP; -- (IGS_CA_INST_REL)
351: -- set flag to 1 so that the error msg number could be returned
352: IF v_cir_found = FALSE OR v_admp_pk_ind = FALSE THEN
353: v_val_ind_type := 1;
354: END IF;
490: p_offered_ind IN VARCHAR2 DEFAULT 'N',
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';
502: v_dummy VARCHAR2(1);
503: CURSOR c_teach_perd IS
504: SELECT cs.s_cal_status,
505: cat.s_cal_cat
506: FROM IGS_CA_INST ci,
507: IGS_CA_STAT cs,
508: IGS_CA_TYPE cat
509: WHERE ci.cal_status = cs.cal_status AND
510: ci.cal_type = cat.cal_type AND
512: ci.sequence_number = p_teach_ci_sequence_number;
513: v_teach_perd_rec c_teach_perd%ROWTYPE;
514: CURSOR c_chk_within_acad IS
515: SELECT 'x'
516: FROM IGS_CA_INST_REL cir,
517: IGS_CA_TYPE cat
518: WHERE cir.sup_cal_type = cat.cal_type AND
519: cir.sup_cal_type = p_acad_cal_type AND
520: cir.sup_ci_sequence_number = p_acad_ci_sequence_number AND
522: cir.sub_ci_sequence_number = p_teach_ci_sequence_number AND
523: cat.s_cal_cat = cst_academic;
524: CURSOR c_chk_include_adm IS
525: SELECT 'x'
526: FROM IGS_CA_INST_REL cir,
527: IGS_CA_TYPE cat
528: WHERE cir.sub_cal_type = cat.cal_type AND
529: cir.sup_cal_type = p_teach_cal_type AND
530: cir.sup_ci_sequence_number = p_teach_ci_sequence_number AND
774: DECLARE
775: cst_teaching CONSTANT VARCHAR2(10) := 'TEACHING';
776: CURSOR c_cat IS
777: SELECT cat.s_cal_cat
778: FROM IGS_CA_INST ci,
779: IGS_CA_TYPE cat
780: WHERE ci.alternate_code = p_alternate_code AND
781: ci.cal_type = cat.cal_type;
782: CURSOR c_cir IS
782: CURSOR c_cir IS
783: SELECT ci.cal_type,
784: ci.sequence_number,
785: cs.s_cal_status
786: FROM IGS_CA_INST_REL cir,
787: IGS_CA_INST ci,
788: IGS_CA_TYPE cat,
789: IGS_CA_STAT cs
790: WHERE cir.sup_cal_type = p_acad_cal_type AND
783: SELECT ci.cal_type,
784: ci.sequence_number,
785: cs.s_cal_status
786: FROM IGS_CA_INST_REL cir,
787: IGS_CA_INST ci,
788: IGS_CA_TYPE cat,
789: IGS_CA_STAT cs
790: WHERE cir.sup_cal_type = p_acad_cal_type AND
791: cir.sup_ci_sequence_number = p_acad_ci_sequence_number AND
799: CURSOR c_cir_cat(
800: cp_cal_type IGS_AD_APPL.adm_cal_type%TYPE,
801: cp_sequence_number IGS_AD_APPL.adm_ci_sequence_number%TYPE) IS
802: SELECT 'x'
803: FROM IGS_CA_INST_REL cir,
804: IGS_CA_TYPE cat
805: WHERE cir.sub_cal_type = p_adm_cal_type AND
806: cir.sub_ci_sequence_number = p_adm_ci_sequence_number AND
807: cir.sup_cal_type = cp_cal_type AND
1161: -- Validate the admission course application instance unit version against
1162: -- the teaching calendar
1163: DECLARE
1164: v_expiry_dt IGS_PS_UNIT_VER.expiry_dt%TYPE;
1165: v_start_dt IGS_CA_INST.start_dt%TYPE;
1166: CURSOR c_uv IS
1167: SELECT uv.expiry_dt
1168: FROM IGS_PS_UNIT_VER uv
1169: WHERE uv.unit_cd = p_unit_cd AND
1170: uv.version_number = p_uv_version_number AND
1171: uv.expiry_dt IS NOT NULL;
1172: CURSOR c_ci IS
1173: SELECT ci.start_dt
1174: FROM IGS_CA_INST ci
1175: WHERE ci.cal_type = p_teach_cal_type AND
1176: ci.sequence_number = p_teach_ci_sequence_number;
1177: BEGIN
1178: -- Set the default message number