[Home] [Help]
219: CURSOR c_chk_mark_sheets (cp_mark_sheet igs_as_mark_sheet.sheet_number%TYPE) IS
220: SELECT 'x'
221: FROM DUAL
222: WHERE EXISTS ( SELECT *
223: FROM igs_as_msht_su_atmpt iamsa
224: WHERE iamsa.sheet_number = cp_mark_sheet);
225: CURSOR c_grd_entry_tmp IS
226: SELECT p_keying_who,
227: v_keying_time,
240: NULL n2,
241: NULL n3,
242: NULL n4,
243: 'N'
244: FROM igs_as_msht_su_atmpt mssua,
245: hz_parties pe,
246: igs_en_su_attempt sua
247: WHERE mssua.sheet_number = p_sheet_number
248: AND pe.party_id = mssua.person_id
269: CLOSE c_chk_keying_time;
270: END LOOP;
271: IF p_sheet_number IS NOT NULL THEN
272: -- The routine should copy the records from the nominated mark sheet
273: -- Copy records from IGS_AS_MSHT_SU_ATMPT to the IGS_AS_INS_GRD_ENTRY table
274: -- where the sheet_number matches p_sheet_number
275: FOR c_grd_entry_tmp_rec IN c_grd_entry_tmp LOOP
276: igs_as_ins_grd_entry_pkg.insert_row (
277: x_mode => 'R',
709: v_not_duplicate BOOLEAN;
710: v_duplicate_ind VARCHAR2 (1) := 'N';
711: v_ins_ms BOOLEAN DEFAULT FALSE;
712: v_sheet_number igs_as_mark_sheet.sheet_number%TYPE;
713: v_person_id igs_as_msht_su_atmpt.person_id%TYPE;
714: v_course_cd igs_as_msht_su_atmpt.course_cd%TYPE;
715: v_unit_cd igs_as_msht_su_atmpt.unit_cd%TYPE;
716: v_cal_type igs_as_msht_su_atmpt.cal_type%TYPE;
717: v_ci_sequence_number igs_as_msht_su_atmpt.ci_sequence_number%TYPE;
710: v_duplicate_ind VARCHAR2 (1) := 'N';
711: v_ins_ms BOOLEAN DEFAULT FALSE;
712: v_sheet_number igs_as_mark_sheet.sheet_number%TYPE;
713: v_person_id igs_as_msht_su_atmpt.person_id%TYPE;
714: v_course_cd igs_as_msht_su_atmpt.course_cd%TYPE;
715: v_unit_cd igs_as_msht_su_atmpt.unit_cd%TYPE;
716: v_cal_type igs_as_msht_su_atmpt.cal_type%TYPE;
717: v_ci_sequence_number igs_as_msht_su_atmpt.ci_sequence_number%TYPE;
718: v_unit_class igs_as_msht_su_atmpt.unit_class%TYPE;
711: v_ins_ms BOOLEAN DEFAULT FALSE;
712: v_sheet_number igs_as_mark_sheet.sheet_number%TYPE;
713: v_person_id igs_as_msht_su_atmpt.person_id%TYPE;
714: v_course_cd igs_as_msht_su_atmpt.course_cd%TYPE;
715: v_unit_cd igs_as_msht_su_atmpt.unit_cd%TYPE;
716: v_cal_type igs_as_msht_su_atmpt.cal_type%TYPE;
717: v_ci_sequence_number igs_as_msht_su_atmpt.ci_sequence_number%TYPE;
718: v_unit_class igs_as_msht_su_atmpt.unit_class%TYPE;
719: v_student_sequence igs_as_msht_su_atmpt.student_sequence%TYPE;
712: v_sheet_number igs_as_mark_sheet.sheet_number%TYPE;
713: v_person_id igs_as_msht_su_atmpt.person_id%TYPE;
714: v_course_cd igs_as_msht_su_atmpt.course_cd%TYPE;
715: v_unit_cd igs_as_msht_su_atmpt.unit_cd%TYPE;
716: v_cal_type igs_as_msht_su_atmpt.cal_type%TYPE;
717: v_ci_sequence_number igs_as_msht_su_atmpt.ci_sequence_number%TYPE;
718: v_unit_class igs_as_msht_su_atmpt.unit_class%TYPE;
719: v_student_sequence igs_as_msht_su_atmpt.student_sequence%TYPE;
720: v_update_on igs_as_msht_su_atmpt.last_update_date%TYPE;
713: v_person_id igs_as_msht_su_atmpt.person_id%TYPE;
714: v_course_cd igs_as_msht_su_atmpt.course_cd%TYPE;
715: v_unit_cd igs_as_msht_su_atmpt.unit_cd%TYPE;
716: v_cal_type igs_as_msht_su_atmpt.cal_type%TYPE;
717: v_ci_sequence_number igs_as_msht_su_atmpt.ci_sequence_number%TYPE;
718: v_unit_class igs_as_msht_su_atmpt.unit_class%TYPE;
719: v_student_sequence igs_as_msht_su_atmpt.student_sequence%TYPE;
720: v_update_on igs_as_msht_su_atmpt.last_update_date%TYPE;
721: v_update_who igs_as_msht_su_atmpt.last_updated_by%TYPE;
714: v_course_cd igs_as_msht_su_atmpt.course_cd%TYPE;
715: v_unit_cd igs_as_msht_su_atmpt.unit_cd%TYPE;
716: v_cal_type igs_as_msht_su_atmpt.cal_type%TYPE;
717: v_ci_sequence_number igs_as_msht_su_atmpt.ci_sequence_number%TYPE;
718: v_unit_class igs_as_msht_su_atmpt.unit_class%TYPE;
719: v_student_sequence igs_as_msht_su_atmpt.student_sequence%TYPE;
720: v_update_on igs_as_msht_su_atmpt.last_update_date%TYPE;
721: v_update_who igs_as_msht_su_atmpt.last_updated_by%TYPE;
722: CURSOR c_uop (
715: v_unit_cd igs_as_msht_su_atmpt.unit_cd%TYPE;
716: v_cal_type igs_as_msht_su_atmpt.cal_type%TYPE;
717: v_ci_sequence_number igs_as_msht_su_atmpt.ci_sequence_number%TYPE;
718: v_unit_class igs_as_msht_su_atmpt.unit_class%TYPE;
719: v_student_sequence igs_as_msht_su_atmpt.student_sequence%TYPE;
720: v_update_on igs_as_msht_su_atmpt.last_update_date%TYPE;
721: v_update_who igs_as_msht_su_atmpt.last_updated_by%TYPE;
722: CURSOR c_uop (
723: cp_assess_cal_type IN igs_ca_inst.cal_type%TYPE,
716: v_cal_type igs_as_msht_su_atmpt.cal_type%TYPE;
717: v_ci_sequence_number igs_as_msht_su_atmpt.ci_sequence_number%TYPE;
718: v_unit_class igs_as_msht_su_atmpt.unit_class%TYPE;
719: v_student_sequence igs_as_msht_su_atmpt.student_sequence%TYPE;
720: v_update_on igs_as_msht_su_atmpt.last_update_date%TYPE;
721: v_update_who igs_as_msht_su_atmpt.last_updated_by%TYPE;
722: CURSOR c_uop (
723: cp_assess_cal_type IN igs_ca_inst.cal_type%TYPE,
724: cp_assess_sequence_number IN igs_ca_inst.sequence_number%TYPE,
717: v_ci_sequence_number igs_as_msht_su_atmpt.ci_sequence_number%TYPE;
718: v_unit_class igs_as_msht_su_atmpt.unit_class%TYPE;
719: v_student_sequence igs_as_msht_su_atmpt.student_sequence%TYPE;
720: v_update_on igs_as_msht_su_atmpt.last_update_date%TYPE;
721: v_update_who igs_as_msht_su_atmpt.last_updated_by%TYPE;
722: CURSOR c_uop (
723: cp_assess_cal_type IN igs_ca_inst.cal_type%TYPE,
724: cp_assess_sequence_number IN igs_ca_inst.sequence_number%TYPE,
725: cp_teach_cal_type IN igs_ps_unit_ofr_opt.cal_type%TYPE,
788: AND ms.sheet_number <> cp_ms_sequence_number
789: AND ms.grading_period_cd = p_grading_period_cd;
790: CURSOR c_mssua1 (cp_ms_sequence_number IN igs_as_mark_sheet.sheet_number%TYPE) IS
791: SELECT mssua.person_id
792: FROM igs_as_msht_su_atmpt mssua
793: WHERE mssua.sheet_number = cp_ms_sequence_number;
794: CURSOR c_mss (cp_ms_sequence_number IN igs_as_mark_sheet.sheet_number%TYPE) IS
795: SELECT mss.sheet_number
796: FROM igs_as_mark_sheet mss
797: WHERE mss.sheet_number = cp_ms_sequence_number
798: FOR UPDATE OF duplicate_ind NOWAIT;
799: CURSOR c_mssua2 (
800: cp_ms_mark_sheet IN igs_as_mark_sheet.sheet_number%TYPE,
801: cp_mssua1_person_id IN igs_as_msht_su_atmpt.person_id%TYPE
802: ) IS
803: SELECT sheet_number,
804: person_id,
805: course_cd,
809: student_sequence,
810: unit_class,
811: last_update_date,
812: last_updated_by
813: FROM igs_as_msht_su_atmpt mssua2
814: WHERE mssua2.sheet_number = cp_ms_mark_sheet
815: AND mssua2.person_id = cp_mssua1_person_id;
816: CURSOR c_get_nxt_seq_no IS
817: SELECT igs_as_mark_sheet_grpseqnum_s.NEXTVAL
987: v_stdnt_seq := v_stdnt_seq + 1;
988: DECLARE
989: l_rowid1 VARCHAR2 (25);
990: BEGIN
991: igs_as_msht_su_atmpt_pkg.insert_row (
992: x_mode => 'R',
993: x_rowid => l_rowid1,
994: x_sheet_number => v_ms_sequence_number,
995: x_person_id => v_sua_person_id_rec.person_id,
1022: v_stdnt_seq := v_stdnt_seq + 1;
1023: DECLARE
1024: l_rowid4 VARCHAR2 (25);
1025: BEGIN
1026: igs_as_msht_su_atmpt_pkg.insert_row (
1027: x_mode => 'R',
1028: x_rowid => l_rowid4,
1029: x_sheet_number => v_ms_sequence_number,
1030: x_person_id => v_sua_surname_rec.person_id,
1164: -- Delete sheets which were created but have no students.
1165: DELETE igs_as_mark_sheet_all
1166: WHERE group_sequence_number = v_group_sequence_number
1167: AND NOT EXISTS ( SELECT sheet_number
1168: FROM igs_as_msht_su_atmpt
1169: WHERE sheet_number = igs_as_mark_sheet_all.sheet_number);
1170: p_group_sequence_number := v_group_sequence_number;
1171: RETURN TRUE;
1172: ELSE