[Home] [Help]
349: v_start_dt_time DATE;
350: v_award_course_ind IGS_PS_TYPE.award_course_ind%TYPE;
351: v_fee_cat IGS_FI_FEE_CAT.fee_cat%TYPE;
352: v_old_govt_semester IGS_ST_GVT_STDNTLOAD.govt_semester%TYPE DEFAULT NULL;
353: v_old_person_id IGS_PE_PERSON.person_id%TYPE;
354: v_old_course_cd IGS_PS_VER.course_cd%TYPE;
355: v_appl_owner all_indexes.owner%TYPE;
356: v_start_dt DATE;
357: v_end_dt DATE;
485: FROM IGS_CA_INST ci
486: WHERE ci.cal_type = cp_teach_cal_type AND
487: ci.sequence_number = cp_teach_ci_sequence_number;
488: CURSOR c_get_api (
489: cp_person_id IGS_PE_PERSON.person_id%TYPE,
490: cp_eff_dt DATE) IS
491: SELECT api.pe_person_id
492: FROM IGS_PE_ALT_PERS_ID api,
493: IGS_PE_PERSON_ID_TYP pit
489: cp_person_id IGS_PE_PERSON.person_id%TYPE,
490: cp_eff_dt DATE) IS
491: SELECT api.pe_person_id
492: FROM IGS_PE_ALT_PERS_ID api,
493: IGS_PE_PERSON_ID_TYP pit
494: WHERE api.api_person_id = TO_CHAR(cp_person_id) AND
495: pit.person_id_type = api.person_id_type AND
496: pit.s_person_id_type = 'OBSOLETE' AND
497: api.start_dt IS NOT NULL AND
818: --Create an entry in the system log entry
819: IGS_GE_GEN_003.genp_ins_log_entry (
820: p_s_log_type,
821: p_creation_dt,
822: 'IGS_PE_PERSON IGS_PS_COURSE IGS_PS_UNIT ' || ',' ||
823: TO_CHAR(p_person_id) || ',' ||
824: p_course_cd || ',' ||
825: p_unit_cd,
826: 4221,
863: v_current_log_ind BOOLEAN;
864: CURSOR c_get_person_dtls IS
865: SELECT pe.birth_dt,
866: pe.sex
867: FROM IGS_PE_PERSON pe
868: WHERE pe.person_id = p_current_person_id;
869: CURSOR c_prsn_stats IS
870: SELECT ps.citizenship_cd,
871: ps.perm_resident_cd
884: SELECT prcd.govt_perm_resident_cd
885: FROM IGS_PE_PERM_RES_CD prcd
886: WHERE prcd.perm_resident_cd = cp_perm_res_cd;
887: BEGIN
888: -- only get the IGS_PE_PERSON data if the IGS_PE_PERSON has changed
889: IF p_old_person_id IS NULL OR
890: p_old_person_id <> p_current_person_id THEN
891: p_birth_dt := NULL;
892: p_sex := NULL;
893: p_citizenship_cd := NULL;
894: p_govt_citizenship_cd := NULL;
895: p_perm_resident_cd := NULL;
896: p_govt_perm_resident_cd := NULL;
897: -- get the IGS_PE_PERSON data
898: OPEN c_get_person_dtls;
899: FETCH c_get_person_dtls INTO p_birth_dt,
900: p_sex;
901: -- raise an exception if no IGS_PE_PERSON record found
897: -- get the IGS_PE_PERSON data
898: OPEN c_get_person_dtls;
899: FETCH c_get_person_dtls INTO p_birth_dt,
900: p_sex;
901: -- raise an exception if no IGS_PE_PERSON record found
902: IF (c_get_person_dtls%NOTFOUND) THEN
903: CLOSE c_get_person_dtls;
904: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
905: IGS_GE_MSG_STACK.ADD;
917: -- create an entry in the system log entry
918: IGS_GE_GEN_003.genp_ins_log_entry (
919: p_s_log_type,
920: p_creation_dt,
921: 'IGS_PE_PERSON' || ',' ||
922: TO_CHAR(p_current_person_id),
923: 4194,
924: NULL);
925: END IF;
922: TO_CHAR(p_current_person_id),
923: 4194,
924: NULL);
925: END IF;
926: -- retrieve the IGS_PE_PERSON statistics data
927: -- get the first record only, which will
928: -- be the end dated record if one exists
929: OPEN c_prsn_stats;
930: FETCH c_prsn_stats INTO p_citizenship_cd,
941: -- create an entry in the system log entry
942: IGS_GE_GEN_003.genp_ins_log_entry (
943: p_s_log_type,
944: p_creation_dt,
945: 'IGS_PE_PERSON' || ',' || TO_CHAR(p_current_person_id),
946: 4196,
947: NULL);
948: ELSE
949: CLOSE c_prsn_stats;
968: -- create an entry in the system log entry
969: IGS_GE_GEN_003.genp_ins_log_entry (
970: p_s_log_type,
971: p_creation_dt,
972: 'IGS_PE_PERSON' || ',' || TO_CHAR(p_current_person_id),
973: 4202,
974: NULL);
975: END IF;
976: -- permanent resident code
993: -- create an entry in the system log entry
994: IGS_GE_GEN_003.genp_ins_log_entry (
995: p_s_log_type,
996: p_creation_dt,
997: 'IGS_PE_PERSON' || ',' ||
998: TO_CHAR(p_current_person_id),
999: 4203,
1000: NULL);
1001: ELSE
1011: -- create an entry in the system log entry
1012: IGS_GE_GEN_003.genp_ins_log_entry (
1013: p_s_log_type,
1014: p_creation_dt,
1015: 'IGS_PE_PERSON' || ',' ||
1016: TO_CHAR(p_current_person_id),
1017: 4644,
1018: NULL);
1019: END IF;
1585: -- are created in submission 1 only.
1586: -- government student load and liability
1587: -- records are created in submissions 1 and 2
1588: IF (p_submission_number = 1) THEN
1589: -- only get the IGS_PE_PERSON data if the
1590: -- person_id changes
1591: IF v_person_id IS NULL OR
1592: v_person_id <> v_enr_snpsht_rec.person_id OR
1593: v_course_cd IS NULL OR
1629: v_prior_seced_school, -- OUT NOCOPY
1630: v_prior_tafe_award, -- OUT NOCOPY
1631: v_govt_disability); -- OUT NOCOPY
1632: END IF;
1633: -- get the IGS_PE_PERSON IGS_PS_COURSE details if the IGS_PE_PERSON
1634: -- and IGS_PS_COURSE has changed from the previous
1635: -- record retrieved
1636: IF v_person_id IS NULL OR
1637: v_person_id <> v_enr_snpsht_rec.person_id OR
1707: v_enr_snpsht_rec.sua_ci_sequence_number,
1708: v_unit_completion_status,
1709: v_enr_snpsht_rec.uoo_id);
1710: -- create the government student enrolment record,
1711: -- which only needs to be created if the IGS_PE_PERSON or
1712: -- IGS_PS_COURSE values are different from the previous record
1713: IF v_person_id IS NULL OR
1714: v_person_id <> v_enr_snpsht_rec.person_id OR
1715: v_course_cd IS NULL OR
1833: v_commencement_dt,
1834: v_hecs_fee);
1835: END IF;
1836: ELSE -- p_submission_number = 2
1837: -- get the IGS_PE_PERSON IGS_PS_COURSE details if the IGS_PE_PERSON
1838: -- and IGS_PS_COURSE has changed from the previous
1839: -- record retrieved
1840: IF v_person_id IS NULL OR
1841: v_person_id <> v_enr_snpsht_rec.person_id OR
1934: v_s_log_type,
1935: v_creation_dt,
1936: v_enr_snpsht_rec.sua_location_cd,
1937: v_enr_snpsht_rec.unit_class);
1938: -- retrieve IGS_PE_PERSON and IGS_PE_PERSON IGS_PS_COURSE data for the government
1939: -- student liability record
1940: stapl_get_sca_data_for_liab(
1941: v_enr_snpsht_rec.person_id,
1942: v_person_id, -- old person_id
2133: IF (v_on = TRUE AND
2134: v_off = TRUE) THEN
2135: v_composite := TRUE;
2136: END IF;
2137: -- exit as soon as the IGS_PE_PERSON's mode is composite
2138: -- don't need to check any other records
2139: IF (v_composite = TRUE) THEN
2140: exit;
2141: END IF;
2328: --Create an entry in the system log entry
2329: IGS_GE_GEN_003.genp_ins_log_entry (
2330: v_s_log_type,
2331: IGS_GE_DATE.igscharDT(v_creation_dt),
2332: 'IGS_PE_PERSON IGS_PS_COURSE ' || ',' || TO_CHAR(v_person_id) || ',' || v_course_cd,
2333: 4222,
2334: NULL);
2335: -- set that an error has been logged
2336: v_logged_ind := TRUE;
2346: v_person_id := v_gse2.person_id;
2347: v_course_cd := v_gse2.course_cd;
2348: v_first_flag := FALSE;
2349: ELSE
2350: -- If the IGS_PE_PERSON is same as the previous IGS_PE_PERSON and the IGS_PS_COURSE is
2351: -- different, but we haven't already changed the major IGS_PS_COURSE for
2352: -- the student.
2353: IF (v_gse2.person_id = v_person_id AND
2354: v_gse2.course_cd <> v_course_cd AND
2352: -- the student.
2353: IF (v_gse2.person_id = v_person_id AND
2354: v_gse2.course_cd <> v_course_cd AND
2355: v_gse2.person_id <> v_tmp_person_id) THEN
2356: -- Not the first record and IGS_PE_PERSON enrolled in more than 1 IGS_PS_COURSE.
2357: -- Now using the flag for another purpose. Set the flag to true
2358: v_flag := TRUE;
2359: FOR v_gse_sca IN c_gse_sca(v_gse2.person_id) LOOP
2360: IF (v_flag = TRUE) THEN
2630: END IF;
2631: IGS_GE_GEN_003.genp_ins_log_entry(
2632: v_s_log_type,
2633: v_creation_dt,
2634: 'IGS_PE_PERSON IGS_PS_COURSE,' ||
2635: TO_CHAR(v_update_total_eftsu.person_id) || ',' ||
2636: v_update_total_eftsu.course_cd,
2637: 4222,
2638: NULL);
2689: END IF;
2690: IGS_GE_GEN_003.genp_ins_log_entry(
2691: v_s_log_type,
2692: v_creation_dt,
2693: 'IGS_PE_PERSON IGS_PS_COURSE,' ||
2694: TO_CHAR(v_update_indus_eftsu.person_id) || ',' ||
2695: v_update_indus_eftsu.course_cd,
2696: 4223,
2697: NULL);
3578: /**********************************************************************/
3579: /* IGS_GE_NOTE: It has been decided that the check for prior degree and
3580: prior post grad is no longer useful. The relevant code has been commented
3581: out NOCOPY so that if they change their mind again it can be put back easily */
3582: -- Find changes to IGS_PE_PERSON statistics
3583: /*
3584: OPEN c_gse( v_person_id,
3585: v_course_cd);
3586: FETCH c_gse INTO v_person_id,