[Home] [Help]
25: -- Validate the authorisation fields.
26: FUNCTION enrp_val_susa_auth(
27: p_unit_set_cd IN VARCHAR2 ,
28: p_us_version_number IN NUMBER ,
29: p_end_dt IN IGS_AS_SU_SETATMPT.end_dt%TYPE ,
30: p_authorised_person_id IN NUMBER ,
31: p_authorised_on IN DATE ,
32: p_message_name OUT NOCOPY VARCHAR2,
33: p_legacy IN VARCHAR2)
35:
36: v_message_name VARCHAR2(30);
37: BEGIN -- enrp_val_susa_auth
38: -- This module validates the authorisation fields associated with the
39: -- IGS_AS_SU_SETATMPT:
40: -- - If the authorised_person_id is set, then the authorised_on must also be
41:
42: -- set and visa versa.
43: -- - authorised_person_id and authorised_on fields can only be set if the
134: END enrp_val_susa_auth;
135:
136:
137: --
138: -- Validate the requirement complete fields for IGS_AS_SU_SETATMPT.
139: FUNCTION enrp_val_susa_cmplt(
140: p_rqrmnts_complete_dt IN DATE ,
141: p_rqrmnts_complete_ind IN VARCHAR2,
142: p_student_confirmed_ind IN VARCHAR2,
145: RETURN BOOLEAN AS
146:
147: BEGIN -- enrp_val_susa_cmplt
148: -- This module validates the requirements complete fields
149: -- associated with the IGS_AS_SU_SETATMPT:
150: -- - If the rqrmnts_complete_ind is set, then the rqrmnts_complete_dt
151: -- must also be set and visa versa.
152: -- - rqrmnts_complete_dt and rqrmnts_complete_ind fields can only be
153:
228: p_legacy IN VARCHAR2)
229: RETURN BOOLEAN AS
230: gv_other_detail VARCHAR2(255);
231: BEGIN -- enrp_val_susa_cousr
232: -- Validates that the IGS_EN_UNIT_SET being allocated to the IGS_AS_SU_SETATMPT
233: -- is:
234:
235: -- * If the unit set is a subordinate within the IGS_PS_OF_UNT_SET_RL
236: -- table, then it must be specified as a child of one of the superior
235: -- * If the unit set is a subordinate within the IGS_PS_OF_UNT_SET_RL
236: -- table, then it must be specified as a child of one of the superior
237: -- units.
238: -- * If the unit set is being specified as a child of another
239: -- IGS_AS_SU_SETATMPT, then then parent unit set version must be
240: -- permitted within the course_off_unit_set_relationship entries
241: DECLARE
242: v_ver_no IGS_EN_STDNT_PS_ATT.version_number%TYPE;
243: v_susa_us_version_no IGS_AS_SU_SETATMPT.us_version_number%TYPE;
239: -- IGS_AS_SU_SETATMPT, then then parent unit set version must be
240: -- permitted within the course_off_unit_set_relationship entries
241: DECLARE
242: v_ver_no IGS_EN_STDNT_PS_ATT.version_number%TYPE;
243: v_susa_us_version_no IGS_AS_SU_SETATMPT.us_version_number%TYPE;
244: v_cal_type IGS_EN_STDNT_PS_ATT.cal_type%TYPE;
245: v_only_as_sub_ind IGS_PS_OFR_UNIT_SET.only_as_sub_ind%TYPE;
246: v_check VARCHAR2(1) := NULL;
247: -- Determine if the student's course offering and the course version
252: WHERE sca.person_id = p_person_id AND
253: sca.course_cd = p_course_cd;
254: CURSOR c_susa IS
255: SELECT susa.us_version_number
256: FROM IGS_AS_SU_SETATMPT susa
257: WHERE susa.person_id = p_person_id AND
258:
259: susa.course_cd = p_course_cd AND
260: susa.unit_set_cd = p_parent_unit_set_cd AND
261: susa.sequence_number = p_parent_sequence_number;
262: CURSOR c_cousr(
263: cp_version_number IGS_EN_STDNT_PS_ATT.version_number%TYPE,
264: cp_cal_type IGS_EN_STDNT_PS_ATT.cal_type%TYPE,
265: cp_susa_us_version_number IGS_AS_SU_SETATMPT.us_version_number%TYPE) IS
266: SELECT 'x'
267: FROM IGS_PS_OF_UNT_SET_RL cousr
268: WHERE cousr.course_cd = p_course_cd AND
269: cousr.crv_version_number = cp_version_number AND
419: p_message_name OUT NOCOPY VARCHAR2 )
420: RETURN BOOLEAN AS
421: gv_other_detail VARCHAR2(255);
422: BEGIN -- enrp_val_susa_del
423: -- This module validates that the IGS_AS_SU_SETATMPT record being
424: -- deleted meets the following conditions:
425: -- - Cannot be deleted if the unit set has been completed.
426: -- - Cannot be deleted if the unit set has been ended.
427:
431: DECLARE
432: v_dummy VARCHAR2(1);
433: CURSOR c_susa IS
434: SELECT 'X'
435: FROM IGS_AS_SU_SETATMPT susa
436: WHERE susa.person_id = p_person_id AND
437: susa.course_cd = p_course_cd AND
438: susa.parent_unit_set_cd = p_unit_set_cd AND
439: susa.parent_sequence_number = p_sequence_number;
516: RETURN BOOLEAN AS
517: gv_other_detail VARCHAR2(255);
518: BEGIN -- enrp_val_susa_dts
519: -- This module validates the date fields associated with the
520: -- IGS_AS_SU_SETATMPT:
521: -- . If end_dt and selection_dt set, then end_dt >= selection_dt.
522: -- . end_dt and rqrmnts_complete_dt cannot both be set.
523: -- . Selection_dt, end_dt, rqrmnts_complete_dt cannot be future dated.
524: -- . If rqrmnts_complete_dt and selection_dt set,
600: RETURN BOOLEAN AS
601:
602: BEGIN -- enrp_val_susa_end_dt
603: -- This module validates that the end date being altered for the
604: -- IGS_AS_SU_SETATMPT meets the following conditions:
605: -- . If the end date is being set and was specified as part of the students
606: -- offer (the admissions offer relating to the course attempt contains the
607: -- unit set), then the authorise person and authorise on fields must be
608: -- set. (If fields already set, then return a warning message.)
613: v_dummy VARCHAR2(1);
614: v_found BOOLEAN;
615: CURSOR c_susa IS
616: SELECT 'x'
617: FROM IGS_AS_SU_SETATMPT susa
618: WHERE susa.person_id = p_person_id AND
619: susa.course_cd = p_course_cd AND
620: susa.unit_set_cd = p_unit_set_cd AND
621: susa.end_dt IS NULL AND
622: susa.sequence_number <> NVL(p_sequence_number, 0);
623:
624: CURSOR c_susa_parent IS
625: SELECT 'x'
626: FROM IGS_AS_SU_SETATMPT susa
627: WHERE susa.person_id = p_person_id AND
628: susa.course_cd = p_course_cd AND
629: susa.unit_set_cd = p_parent_unit_set_cd AND
630: susa.sequence_number = p_parent_sequence_number AND
759: RETURN BOOLEAN AS
760:
761: BEGIN -- enrp_val_susa_end_vi
762: -- This module validates the voluntary_end_ind against the end_dt for a
763: -- IGS_AS_SU_SETATMPT record. The voluntary end indicator can only
764: -- be set if the end date is set, although it is not mandatory that it is set.
765: DECLARE
766: BEGIN
767: -- Validate the end date must be set if the voluntary end indicator is set
798: --Who When What
799: --stutta 06-Mar-2006 Split cursor c_susv to 3 cursors cur_susa, c_uso,c_usoo for
800: -- perf bug #3696127
801: BEGIN -- enrp_val_susa_ins
802: -- This module validates that the IGS_AS_SU_SETATMPT record being
803:
804: -- created meets the following conditions:
805: -- . unit set version must be applicable to the course offering or the student
806: -- must have had it previously selected.
851: AND uss1.s_unit_set_status = 'ACTIVE';
852:
853: CURSOR c_susa IS
854: SELECT 'X'
855: FROM IGS_AS_SU_SETATMPT susa
856: WHERE susa.person_id = p_person_id AND
857: susa.course_cd = p_course_cd AND
858: susa.unit_set_cd = p_unit_set_cd AND
859: susa.sequence_number<> NVL(p_sequence_number, 0) AND
946: RETURN BOOLEAN AS
947:
948: BEGIN -- enrp_val_susa_parent
949: -- This module validates the IGS_EN_UNIT_SET being allocated to the
950: -- IGS_AS_SU_SETATMPT as a parent:
951: -- - Cannot be a parent unit set attempt of itself.
952: -- - Can only be linked to a IGS_AS_SU_SETATMPT record for
953: -- the same person and course where the end date is null.
954: -- - Cannot be linked to itself via the parent student unit set
948: BEGIN -- enrp_val_susa_parent
949: -- This module validates the IGS_EN_UNIT_SET being allocated to the
950: -- IGS_AS_SU_SETATMPT as a parent:
951: -- - Cannot be a parent unit set attempt of itself.
952: -- - Can only be linked to a IGS_AS_SU_SETATMPT record for
953: -- the same person and course where the end date is null.
954: -- - Cannot be linked to itself via the parent student unit set
955: -- attempt relationship.
956: -- - Cannot be linked to a confirmed parent if the unit set is
955: -- attempt relationship.
956: -- - Cannot be linked to a confirmed parent if the unit set is
957: -- unconfirmed.
958: DECLARE
959: v_end_dt IGS_AS_SU_SETATMPT.end_dt%TYPE;
960: v_student_confirmed_ind IGS_AS_SU_SETATMPT.student_confirmed_ind%TYPE;
961: v_unit_set_cd IGS_AS_SU_SETATMPT.unit_set_cd%TYPE;
962:
963: CURSOR c_susa IS
956: -- - Cannot be linked to a confirmed parent if the unit set is
957: -- unconfirmed.
958: DECLARE
959: v_end_dt IGS_AS_SU_SETATMPT.end_dt%TYPE;
960: v_student_confirmed_ind IGS_AS_SU_SETATMPT.student_confirmed_ind%TYPE;
961: v_unit_set_cd IGS_AS_SU_SETATMPT.unit_set_cd%TYPE;
962:
963: CURSOR c_susa IS
964: SELECT susa.end_dt,
957: -- unconfirmed.
958: DECLARE
959: v_end_dt IGS_AS_SU_SETATMPT.end_dt%TYPE;
960: v_student_confirmed_ind IGS_AS_SU_SETATMPT.student_confirmed_ind%TYPE;
961: v_unit_set_cd IGS_AS_SU_SETATMPT.unit_set_cd%TYPE;
962:
963: CURSOR c_susa IS
964: SELECT susa.end_dt,
965: susa.student_confirmed_ind
962:
963: CURSOR c_susa IS
964: SELECT susa.end_dt,
965: susa.student_confirmed_ind
966: FROM IGS_AS_SU_SETATMPT susa
967: WHERE susa.person_id = p_person_id AND
968: susa.course_cd = p_course_cd AND
969: susa.unit_set_cd = p_parent_unit_set_cd AND
970: susa.sequence_number = p_parent_sequence_number;
969: susa.unit_set_cd = p_parent_unit_set_cd AND
970: susa.sequence_number = p_parent_sequence_number;
971: CURSOR c_susa_ancestor IS
972: SELECT susa1.unit_set_cd
973: FROM IGS_AS_SU_SETATMPT susa1
974: START WITH susa1.person_id = p_person_id AND
975: susa1.course_cd = p_course_cd AND
976: susa1.unit_set_cd = p_parent_unit_set_cd AND
977: susa1.sequence_number = p_parent_sequence_number
980: PRIOR susa1.parent_unit_set_cd = susa1.unit_set_cd AND
981: PRIOR susa1.parent_sequence_number = susa1.sequence_number;
982: CURSOR c_susa_descendant IS
983: SELECT susa1.unit_set_cd
984: FROM IGS_AS_SU_SETATMPT susa1
985: START WITH susa1.person_id = p_person_id AND
986:
987: susa1.course_cd = p_course_cd AND
988: susa1.unit_set_cd = p_unit_set_cd AND
1015: RETURN FALSE;
1016: END IF;
1017: END IF;
1018:
1019: -- Validate can only be linked to a IGS_AS_SU_SETATMPT record for the
1020: -- same person and course where the end date is null.
1021: OPEN c_susa;
1022: FETCH c_susa INTO v_end_dt, v_student_confirmed_ind;
1023: IF (c_susa%NOTFOUND) THEN
1135:
1136: END enrp_val_susa_parent;
1137:
1138: --
1139: -- Validate the IGS_AS_SU_SETATMPT.primary_set_ind field.
1140: FUNCTION ENRP_VAL_SUSA_PRMRY(
1141: p_person_id IN NUMBER ,
1142: p_course_cd IN VARCHAR2 ,
1143: p_unit_set_cd IN VARCHAR2 ,
1147: p_legacy IN VARCHAR2)
1148: RETURN BOOLEAN AS
1149:
1150: BEGIN -- enrp_val_susa_prmry
1151: -- This module validates the IGS_AS_SU_SETATMPT.primary_set_ind cannot
1152: -- be set if there exists a unit set of a higher rank within the students
1153: -- unit set. Also, check that the primary indicator is only set for
1154: -- non-administrative files.
1155: DECLARE
1168: us.unit_set_cat = usc.unit_set_cat;
1169: CURSOR c_susa_us_usc (
1170: cp_rank IGS_EN_UNIT_SET_CAT.rank%TYPE) IS
1171: SELECT 'x'
1172: FROM IGS_AS_SU_SETATMPT susa,
1173: IGS_EN_UNIT_SET us,
1174: IGS_EN_UNIT_SET_CAT usc
1175: WHERE susa.person_id = p_person_id AND
1176: susa.course_cd = p_course_cd AND
1247: p_message_name OUT NOCOPY VARCHAR2 )
1248: RETURN BOOLEAN AS
1249:
1250: BEGIN -- enrp_val_susa_sca
1251: -- This module validates the IGS_AS_SU_SETATMPT is created against
1252: -- a valid IGS_EN_STDNT_PS_ATT status.
1253: DECLARE
1254: cst_discontin CONSTANT VARCHAR2(10) := 'DISCONTIN';
1255: cst_lapsed CONSTANT VARCHAR2(10) := 'LAPSED';
1312: RETURN BOOLEAN AS
1313:
1314: BEGIN -- enrp_val_susa_sci
1315: -- This module validates the confirmation of a IGS_EN_UNIT_SET for a
1316: -- IGS_AS_SU_SETATMPT record. The validations are:
1317: -- - The student confirmed indicator cannot be unset once the
1318:
1319: -- end date has been set.
1320: -- - The student confirmed indicator cannot be unset once the
1343: cst_enrolled,
1344: cst_inactive);
1345: CURSOR c_susa IS
1346: SELECT 'X'
1347: FROM IGS_AS_SU_SETATMPT susa
1348: WHERE susa.person_id = p_person_id AND
1349: susa.course_cd = p_course_cd AND
1350: susa.unit_set_cd = p_parent_unit_set_cd AND
1351: susa.sequence_number = p_parent_sequence_number AND
1594: p_legacy IN VARCHAR2)
1595: RETURN BOOLEAN AS
1596: BEGIN -- enrp_val_susa_sci_sd
1597: -- This module validates the student_confirmed_ind against the selection_dt
1598: -- for a IGS_AS_SU_SETATMPT record. The validations are:
1599: -- - The selection date must be set if the confirmed indicator is set
1600: -- (and visa versa).
1601: -- - The selection date being unset, then the confirmed indicator must be
1602: -- unset (and visa versa).
1660:
1661:
1662: BEGIN -- enrp_val_susa_us_act
1663: -- This module validates that the IGS_EN_UNIT_SET being allocated to the
1664: -- IGS_AS_SU_SETATMPT is active with a null expiry date or active with
1665: -- expiry date set and the student has previously selected in within the same
1666: -- course attempt.
1667: DECLARE
1668: cst_active CONSTANT VARCHAR2(6) := 'ACTIVE';
1678: us.unit_set_cd = p_unit_set_cd AND
1679: us.version_number = p_version_number;
1680: CURSOR c_susa IS
1681: SELECT 'x'
1682: FROM IGS_AS_SU_SETATMPT susa
1683: WHERE susa.person_id = p_person_id AND
1684:
1685: susa.course_cd = p_course_cd AND
1686: susa.unit_set_cd = p_unit_set_cd AND
1735: RETURN BOOLEAN AS
1736:
1737: BEGIN -- enrp_val_susa_us_ath
1738: -- This module validates that the IGS_EN_UNIT_SET being allocated to the
1739: -- IGS_AS_SU_SETATMPT requires authorisation.
1740: DECLARE
1741: v_auth_rqrd_ind IGS_EN_UNIT_SET.authorisation_rqrd_ind%TYPE;
1742: CURSOR c_us IS
1743: SELECT us.authorisation_rqrd_ind
1809: -- This module validates
1810: DECLARE
1811: v_message_name VARCHAR2(30);
1812: v_old_student_confirmed_ind
1813: IGS_AS_SU_SETATMPT.student_confirmed_ind%TYPE;
1814: CURSOR c_old_susa IS
1815: SELECT *
1816: FROM IGS_AS_SU_SETATMPT susa
1817: WHERE susa.person_id = p_person_id AND
1812: v_old_student_confirmed_ind
1813: IGS_AS_SU_SETATMPT.student_confirmed_ind%TYPE;
1814: CURSOR c_old_susa IS
1815: SELECT *
1816: FROM IGS_AS_SU_SETATMPT susa
1817: WHERE susa.person_id = p_person_id AND
1818: susa.course_cd = p_course_cd AND
1819: susa.unit_set_cd = p_unit_set_cd AND
1820: susa.sequence_number = p_sequence_number;
2259: p_message_name OUT NOCOPY VARCHAR2 )
2260: RETURN BOOLEAN AS
2261:
2262: BEGIN -- enrp_val_susa_ed_upd
2263: -- This module is called when a IGS_AS_SU_SETATMPT is ended (end_dt set).
2264: -- This module will check if the unit set has any child unit sets and
2265: -- validate if able to set the end_dt and associated authorisation details
2266: -- for all children
2267: DECLARE
2264: -- This module will check if the unit set has any child unit sets and
2265: -- validate if able to set the end_dt and associated authorisation details
2266: -- for all children
2267: DECLARE
2268: v_unit_set_cd IGS_AS_SU_SETATMPT.unit_set_cd%TYPE;
2269: v_us_version_number IGS_AS_SU_SETATMPT.us_version_number%TYPE;
2270: v_sequence_number IGS_AS_SU_SETATMPT.sequence_number%TYPE;
2271: v_authorised_person_id IGS_AS_SU_SETATMPT.authorised_person_id%TYPE;
2272: v_authorised_on IGS_AS_SU_SETATMPT.authorised_on%TYPE;
2265: -- validate if able to set the end_dt and associated authorisation details
2266: -- for all children
2267: DECLARE
2268: v_unit_set_cd IGS_AS_SU_SETATMPT.unit_set_cd%TYPE;
2269: v_us_version_number IGS_AS_SU_SETATMPT.us_version_number%TYPE;
2270: v_sequence_number IGS_AS_SU_SETATMPT.sequence_number%TYPE;
2271: v_authorised_person_id IGS_AS_SU_SETATMPT.authorised_person_id%TYPE;
2272: v_authorised_on IGS_AS_SU_SETATMPT.authorised_on%TYPE;
2273: v_selection_dt IGS_AS_SU_SETATMPT.selection_dt%TYPE;
2266: -- for all children
2267: DECLARE
2268: v_unit_set_cd IGS_AS_SU_SETATMPT.unit_set_cd%TYPE;
2269: v_us_version_number IGS_AS_SU_SETATMPT.us_version_number%TYPE;
2270: v_sequence_number IGS_AS_SU_SETATMPT.sequence_number%TYPE;
2271: v_authorised_person_id IGS_AS_SU_SETATMPT.authorised_person_id%TYPE;
2272: v_authorised_on IGS_AS_SU_SETATMPT.authorised_on%TYPE;
2273: v_selection_dt IGS_AS_SU_SETATMPT.selection_dt%TYPE;
2274:
2267: DECLARE
2268: v_unit_set_cd IGS_AS_SU_SETATMPT.unit_set_cd%TYPE;
2269: v_us_version_number IGS_AS_SU_SETATMPT.us_version_number%TYPE;
2270: v_sequence_number IGS_AS_SU_SETATMPT.sequence_number%TYPE;
2271: v_authorised_person_id IGS_AS_SU_SETATMPT.authorised_person_id%TYPE;
2272: v_authorised_on IGS_AS_SU_SETATMPT.authorised_on%TYPE;
2273: v_selection_dt IGS_AS_SU_SETATMPT.selection_dt%TYPE;
2274:
2275: v_end_dt IGS_AS_SU_SETATMPT.end_dt%TYPE;
2268: v_unit_set_cd IGS_AS_SU_SETATMPT.unit_set_cd%TYPE;
2269: v_us_version_number IGS_AS_SU_SETATMPT.us_version_number%TYPE;
2270: v_sequence_number IGS_AS_SU_SETATMPT.sequence_number%TYPE;
2271: v_authorised_person_id IGS_AS_SU_SETATMPT.authorised_person_id%TYPE;
2272: v_authorised_on IGS_AS_SU_SETATMPT.authorised_on%TYPE;
2273: v_selection_dt IGS_AS_SU_SETATMPT.selection_dt%TYPE;
2274:
2275: v_end_dt IGS_AS_SU_SETATMPT.end_dt%TYPE;
2276: v_rqrmnts_complete_dt IGS_AS_SU_SETATMPT.rqrmnts_complete_dt%TYPE;
2269: v_us_version_number IGS_AS_SU_SETATMPT.us_version_number%TYPE;
2270: v_sequence_number IGS_AS_SU_SETATMPT.sequence_number%TYPE;
2271: v_authorised_person_id IGS_AS_SU_SETATMPT.authorised_person_id%TYPE;
2272: v_authorised_on IGS_AS_SU_SETATMPT.authorised_on%TYPE;
2273: v_selection_dt IGS_AS_SU_SETATMPT.selection_dt%TYPE;
2274:
2275: v_end_dt IGS_AS_SU_SETATMPT.end_dt%TYPE;
2276: v_rqrmnts_complete_dt IGS_AS_SU_SETATMPT.rqrmnts_complete_dt%TYPE;
2277: v_parent_unit_set_cd IGS_AS_SU_SETATMPT.parent_unit_set_cd%TYPE;
2271: v_authorised_person_id IGS_AS_SU_SETATMPT.authorised_person_id%TYPE;
2272: v_authorised_on IGS_AS_SU_SETATMPT.authorised_on%TYPE;
2273: v_selection_dt IGS_AS_SU_SETATMPT.selection_dt%TYPE;
2274:
2275: v_end_dt IGS_AS_SU_SETATMPT.end_dt%TYPE;
2276: v_rqrmnts_complete_dt IGS_AS_SU_SETATMPT.rqrmnts_complete_dt%TYPE;
2277: v_parent_unit_set_cd IGS_AS_SU_SETATMPT.parent_unit_set_cd%TYPE;
2278: v_parent_sequence_number IGS_AS_SU_SETATMPT.parent_sequence_number%TYPE;
2279: v_student_confirmed_ind IGS_AS_SU_SETATMPT.student_confirmed_ind%TYPE;
2272: v_authorised_on IGS_AS_SU_SETATMPT.authorised_on%TYPE;
2273: v_selection_dt IGS_AS_SU_SETATMPT.selection_dt%TYPE;
2274:
2275: v_end_dt IGS_AS_SU_SETATMPT.end_dt%TYPE;
2276: v_rqrmnts_complete_dt IGS_AS_SU_SETATMPT.rqrmnts_complete_dt%TYPE;
2277: v_parent_unit_set_cd IGS_AS_SU_SETATMPT.parent_unit_set_cd%TYPE;
2278: v_parent_sequence_number IGS_AS_SU_SETATMPT.parent_sequence_number%TYPE;
2279: v_student_confirmed_ind IGS_AS_SU_SETATMPT.student_confirmed_ind%TYPE;
2280: v_primary_set_ind IGS_AS_SU_SETATMPT.primary_set_ind%TYPE;
2273: v_selection_dt IGS_AS_SU_SETATMPT.selection_dt%TYPE;
2274:
2275: v_end_dt IGS_AS_SU_SETATMPT.end_dt%TYPE;
2276: v_rqrmnts_complete_dt IGS_AS_SU_SETATMPT.rqrmnts_complete_dt%TYPE;
2277: v_parent_unit_set_cd IGS_AS_SU_SETATMPT.parent_unit_set_cd%TYPE;
2278: v_parent_sequence_number IGS_AS_SU_SETATMPT.parent_sequence_number%TYPE;
2279: v_student_confirmed_ind IGS_AS_SU_SETATMPT.student_confirmed_ind%TYPE;
2280: v_primary_set_ind IGS_AS_SU_SETATMPT.primary_set_ind%TYPE;
2281: v_voluntary_end_ind IGS_AS_SU_SETATMPT.voluntary_end_ind%TYPE;
2274:
2275: v_end_dt IGS_AS_SU_SETATMPT.end_dt%TYPE;
2276: v_rqrmnts_complete_dt IGS_AS_SU_SETATMPT.rqrmnts_complete_dt%TYPE;
2277: v_parent_unit_set_cd IGS_AS_SU_SETATMPT.parent_unit_set_cd%TYPE;
2278: v_parent_sequence_number IGS_AS_SU_SETATMPT.parent_sequence_number%TYPE;
2279: v_student_confirmed_ind IGS_AS_SU_SETATMPT.student_confirmed_ind%TYPE;
2280: v_primary_set_ind IGS_AS_SU_SETATMPT.primary_set_ind%TYPE;
2281: v_voluntary_end_ind IGS_AS_SU_SETATMPT.voluntary_end_ind%TYPE;
2282: v_override_title IGS_AS_SU_SETATMPT.override_title%TYPE;
2275: v_end_dt IGS_AS_SU_SETATMPT.end_dt%TYPE;
2276: v_rqrmnts_complete_dt IGS_AS_SU_SETATMPT.rqrmnts_complete_dt%TYPE;
2277: v_parent_unit_set_cd IGS_AS_SU_SETATMPT.parent_unit_set_cd%TYPE;
2278: v_parent_sequence_number IGS_AS_SU_SETATMPT.parent_sequence_number%TYPE;
2279: v_student_confirmed_ind IGS_AS_SU_SETATMPT.student_confirmed_ind%TYPE;
2280: v_primary_set_ind IGS_AS_SU_SETATMPT.primary_set_ind%TYPE;
2281: v_voluntary_end_ind IGS_AS_SU_SETATMPT.voluntary_end_ind%TYPE;
2282: v_override_title IGS_AS_SU_SETATMPT.override_title%TYPE;
2283: v_rqrmnts_complete_ind IGS_AS_SU_SETATMPT.rqrmnts_complete_ind%TYPE;
2276: v_rqrmnts_complete_dt IGS_AS_SU_SETATMPT.rqrmnts_complete_dt%TYPE;
2277: v_parent_unit_set_cd IGS_AS_SU_SETATMPT.parent_unit_set_cd%TYPE;
2278: v_parent_sequence_number IGS_AS_SU_SETATMPT.parent_sequence_number%TYPE;
2279: v_student_confirmed_ind IGS_AS_SU_SETATMPT.student_confirmed_ind%TYPE;
2280: v_primary_set_ind IGS_AS_SU_SETATMPT.primary_set_ind%TYPE;
2281: v_voluntary_end_ind IGS_AS_SU_SETATMPT.voluntary_end_ind%TYPE;
2282: v_override_title IGS_AS_SU_SETATMPT.override_title%TYPE;
2283: v_rqrmnts_complete_ind IGS_AS_SU_SETATMPT.rqrmnts_complete_ind%TYPE;
2284: v_s_completed_source_type
2277: v_parent_unit_set_cd IGS_AS_SU_SETATMPT.parent_unit_set_cd%TYPE;
2278: v_parent_sequence_number IGS_AS_SU_SETATMPT.parent_sequence_number%TYPE;
2279: v_student_confirmed_ind IGS_AS_SU_SETATMPT.student_confirmed_ind%TYPE;
2280: v_primary_set_ind IGS_AS_SU_SETATMPT.primary_set_ind%TYPE;
2281: v_voluntary_end_ind IGS_AS_SU_SETATMPT.voluntary_end_ind%TYPE;
2282: v_override_title IGS_AS_SU_SETATMPT.override_title%TYPE;
2283: v_rqrmnts_complete_ind IGS_AS_SU_SETATMPT.rqrmnts_complete_ind%TYPE;
2284: v_s_completed_source_type
2285: IGS_AS_SU_SETATMPT.s_completed_source_type%TYPE;
2278: v_parent_sequence_number IGS_AS_SU_SETATMPT.parent_sequence_number%TYPE;
2279: v_student_confirmed_ind IGS_AS_SU_SETATMPT.student_confirmed_ind%TYPE;
2280: v_primary_set_ind IGS_AS_SU_SETATMPT.primary_set_ind%TYPE;
2281: v_voluntary_end_ind IGS_AS_SU_SETATMPT.voluntary_end_ind%TYPE;
2282: v_override_title IGS_AS_SU_SETATMPT.override_title%TYPE;
2283: v_rqrmnts_complete_ind IGS_AS_SU_SETATMPT.rqrmnts_complete_ind%TYPE;
2284: v_s_completed_source_type
2285: IGS_AS_SU_SETATMPT.s_completed_source_type%TYPE;
2286: v_message_name VARCHAR2(30);
2279: v_student_confirmed_ind IGS_AS_SU_SETATMPT.student_confirmed_ind%TYPE;
2280: v_primary_set_ind IGS_AS_SU_SETATMPT.primary_set_ind%TYPE;
2281: v_voluntary_end_ind IGS_AS_SU_SETATMPT.voluntary_end_ind%TYPE;
2282: v_override_title IGS_AS_SU_SETATMPT.override_title%TYPE;
2283: v_rqrmnts_complete_ind IGS_AS_SU_SETATMPT.rqrmnts_complete_ind%TYPE;
2284: v_s_completed_source_type
2285: IGS_AS_SU_SETATMPT.s_completed_source_type%TYPE;
2286: v_message_name VARCHAR2(30);
2287: v_message_text VARCHAR2 (2000) := NULL;
2281: v_voluntary_end_ind IGS_AS_SU_SETATMPT.voluntary_end_ind%TYPE;
2282: v_override_title IGS_AS_SU_SETATMPT.override_title%TYPE;
2283: v_rqrmnts_complete_ind IGS_AS_SU_SETATMPT.rqrmnts_complete_ind%TYPE;
2284: v_s_completed_source_type
2285: IGS_AS_SU_SETATMPT.s_completed_source_type%TYPE;
2286: v_message_name VARCHAR2(30);
2287: v_message_text VARCHAR2 (2000) := NULL;
2288: CURSOR c_susa IS
2289: SELECT susa.unit_set_cd,
2302: susa.voluntary_end_ind,
2303: susa.override_title,
2304: susa.rqrmnts_complete_ind,
2305: susa.s_completed_source_type
2306: FROM IGS_AS_SU_SETATMPT susa
2307: START WITH susa.person_id = p_person_id AND
2308: susa.course_cd = p_course_cd AND
2309: susa.parent_unit_set_cd = p_unit_set_cd AND
2310: susa.parent_sequence_number = p_sequence_number
2451: susa.voluntary_end_ind,
2452: susa.override_title,
2453: susa.rqrmnts_complete_ind,
2454: susa.s_completed_source_type
2455: FROM IGS_AS_SU_SETATMPT susa
2456: START WITH susa.person_id = p_person_id AND
2457: susa.course_cd = p_course_cd AND
2458: susa.parent_unit_set_cd = p_unit_set_cd AND
2459: susa.parent_sequence_number = p_sequence_number
2534: IGS_GE_MSG_STACK.ADD;
2535: App_Exception.Raise_Exception;
2536: END enrp_val_susa_sci_up;
2537: --
2538: -- Validate the requirement complete fields for IGS_AS_SU_SETATMPT.
2539: FUNCTION enrp_val_susa_scst(
2540: p_rqrmnts_complete_dt IN DATE ,
2541: p_rqrmnts_complete_ind IN VARCHAR2,
2542: p_s_completed_source_type IN VARCHAR2,
2544: RETURN BOOLEAN AS
2545:
2546: BEGIN -- enrp_val_susa_scst
2547: -- This module validates the system completed source type
2548: -- field associated with the IGS_AS_SU_SETATMPT:
2549: -- - s_completed_source_type can only be set if rqrmnts_complete_dt
2550: -- and rqrmnts_complete_ind fields are set.
2551: DECLARE
2552: BEGIN