6262: FROM igs_uc_istarz2_ints ivstz2
6263: WHERE ivstz2.record_status = 'N';
6264:
6265: -- check for corresponding record in main table.
6266: CURSOR old_starz2_cur(p_appno igs_uc_app_clr_rnd.app_no%TYPE,
6267: p_course igs_uc_app_clr_rnd.ucas_program_code%TYPE,
6268: p_campus igs_uc_app_clr_rnd.ucas_campus%TYPE,
6269: p_inst igs_uc_app_clr_rnd.institution%TYPE,
6270: p_system igs_uc_app_clr_rnd.system_code%TYPE ) IS
6263: WHERE ivstz2.record_status = 'N';
6264:
6265: -- check for corresponding record in main table.
6266: CURSOR old_starz2_cur(p_appno igs_uc_app_clr_rnd.app_no%TYPE,
6267: p_course igs_uc_app_clr_rnd.ucas_program_code%TYPE,
6268: p_campus igs_uc_app_clr_rnd.ucas_campus%TYPE,
6269: p_inst igs_uc_app_clr_rnd.institution%TYPE,
6270: p_system igs_uc_app_clr_rnd.system_code%TYPE ) IS
6271: SELECT uaclr.rowid,
6264:
6265: -- check for corresponding record in main table.
6266: CURSOR old_starz2_cur(p_appno igs_uc_app_clr_rnd.app_no%TYPE,
6267: p_course igs_uc_app_clr_rnd.ucas_program_code%TYPE,
6268: p_campus igs_uc_app_clr_rnd.ucas_campus%TYPE,
6269: p_inst igs_uc_app_clr_rnd.institution%TYPE,
6270: p_system igs_uc_app_clr_rnd.system_code%TYPE ) IS
6271: SELECT uaclr.rowid,
6272: uaclr.*
6265: -- check for corresponding record in main table.
6266: CURSOR old_starz2_cur(p_appno igs_uc_app_clr_rnd.app_no%TYPE,
6267: p_course igs_uc_app_clr_rnd.ucas_program_code%TYPE,
6268: p_campus igs_uc_app_clr_rnd.ucas_campus%TYPE,
6269: p_inst igs_uc_app_clr_rnd.institution%TYPE,
6270: p_system igs_uc_app_clr_rnd.system_code%TYPE ) IS
6271: SELECT uaclr.rowid,
6272: uaclr.*
6273: FROM igs_uc_app_clr_rnd uaclr
6266: CURSOR old_starz2_cur(p_appno igs_uc_app_clr_rnd.app_no%TYPE,
6267: p_course igs_uc_app_clr_rnd.ucas_program_code%TYPE,
6268: p_campus igs_uc_app_clr_rnd.ucas_campus%TYPE,
6269: p_inst igs_uc_app_clr_rnd.institution%TYPE,
6270: p_system igs_uc_app_clr_rnd.system_code%TYPE ) IS
6271: SELECT uaclr.rowid,
6272: uaclr.*
6273: FROM igs_uc_app_clr_rnd uaclr
6274: WHERE uaclr.app_no = p_appno
6269: p_inst igs_uc_app_clr_rnd.institution%TYPE,
6270: p_system igs_uc_app_clr_rnd.system_code%TYPE ) IS
6271: SELECT uaclr.rowid,
6272: uaclr.*
6273: FROM igs_uc_app_clr_rnd uaclr
6274: WHERE uaclr.app_no = p_appno
6275: AND uaclr.ucas_program_code = p_course
6276: AND uaclr.ucas_campus = p_campus
6277: AND uaclr.institution = p_inst
6326: old_starz2_rec old_starz2_cur%ROWTYPE;
6327: l_valid VARCHAR2(1);
6328: l_clearing_id igs_uc_app_clearing.clearing_app_id%TYPE; -- for holding clearing ID needed while insert
6329:
6330: l_oss_program igs_uc_app_clr_rnd.oss_program_code%TYPE ;
6331: l_oss_program_ver igs_uc_app_clr_rnd.oss_program_version%TYPE ;
6332: l_oss_attend_type igs_uc_app_clr_rnd.oss_attendance_type%TYPE ;
6333: l_oss_attend_mode igs_uc_app_clr_rnd.oss_attendance_mode%TYPE ;
6334: l_oss_location igs_uc_app_clr_rnd.oss_location%TYPE ;
6327: l_valid VARCHAR2(1);
6328: l_clearing_id igs_uc_app_clearing.clearing_app_id%TYPE; -- for holding clearing ID needed while insert
6329:
6330: l_oss_program igs_uc_app_clr_rnd.oss_program_code%TYPE ;
6331: l_oss_program_ver igs_uc_app_clr_rnd.oss_program_version%TYPE ;
6332: l_oss_attend_type igs_uc_app_clr_rnd.oss_attendance_type%TYPE ;
6333: l_oss_attend_mode igs_uc_app_clr_rnd.oss_attendance_mode%TYPE ;
6334: l_oss_location igs_uc_app_clr_rnd.oss_location%TYPE ;
6335:
6328: l_clearing_id igs_uc_app_clearing.clearing_app_id%TYPE; -- for holding clearing ID needed while insert
6329:
6330: l_oss_program igs_uc_app_clr_rnd.oss_program_code%TYPE ;
6331: l_oss_program_ver igs_uc_app_clr_rnd.oss_program_version%TYPE ;
6332: l_oss_attend_type igs_uc_app_clr_rnd.oss_attendance_type%TYPE ;
6333: l_oss_attend_mode igs_uc_app_clr_rnd.oss_attendance_mode%TYPE ;
6334: l_oss_location igs_uc_app_clr_rnd.oss_location%TYPE ;
6335:
6336:
6329:
6330: l_oss_program igs_uc_app_clr_rnd.oss_program_code%TYPE ;
6331: l_oss_program_ver igs_uc_app_clr_rnd.oss_program_version%TYPE ;
6332: l_oss_attend_type igs_uc_app_clr_rnd.oss_attendance_type%TYPE ;
6333: l_oss_attend_mode igs_uc_app_clr_rnd.oss_attendance_mode%TYPE ;
6334: l_oss_location igs_uc_app_clr_rnd.oss_location%TYPE ;
6335:
6336:
6337: BEGIN
6330: l_oss_program igs_uc_app_clr_rnd.oss_program_code%TYPE ;
6331: l_oss_program_ver igs_uc_app_clr_rnd.oss_program_version%TYPE ;
6332: l_oss_attend_type igs_uc_app_clr_rnd.oss_attendance_type%TYPE ;
6333: l_oss_attend_mode igs_uc_app_clr_rnd.oss_attendance_mode%TYPE ;
6334: l_oss_location igs_uc_app_clr_rnd.oss_location%TYPE ;
6335:
6336:
6337: BEGIN
6338:
6505: IF old_starz2_rec.rowid IS NULL THEN -- i.e. new record.
6506:
6507: BEGIN
6508: -- call the TBH to update the record
6509: igs_uc_app_clr_rnd_pkg.insert_row -- IGSXI05B.pls
6510: (
6511: x_rowid => old_starz2_rec.rowid
6512: ,x_app_clear_round_id => old_starz2_rec.app_clear_round_id -- since it would be NULL if no rec found.
6513: ,x_clearing_app_id => l_clearing_id
6540: ELSE -- update
6541:
6542: BEGIN
6543: -- call the TBH to update the record
6544: igs_uc_app_clr_rnd_pkg.update_row -- IGSXI05B.pls
6545: (
6546: x_rowid => old_starz2_rec.rowid
6547: ,x_app_clear_round_id => old_starz2_rec.app_clear_round_id
6548: ,x_clearing_app_id => old_starz2_rec.clearing_app_id