[Home] [Help]
1509: -- Get new interface records
1510: CURSOR int_cvcrse_cur IS
1511: SELECT csci.rowid,
1512: csci.*
1513: FROM igs_uc_ccrse_ints csci
1514: WHERE csci.record_status = 'N';
1515:
1516: -- check whether corresponding record already exists.
1517: -- Currently since only FTUG is supported over Hercules and no course data for other systems come from UCAS,
1515:
1516: -- check whether corresponding record already exists.
1517: -- Currently since only FTUG is supported over Hercules and no course data for other systems come from UCAS,
1518: -- the system code has been hardcoded to U for 'FTUG'.
1519: CURSOR old_crse_cur (p_course igs_uc_ccrse_ints.course%TYPE, p_campus igs_uc_ccrse_ints.campus%TYPE,
1520: p_inst igs_uc_ccrse_ints.inst%TYPE, p_system_code igs_uc_ccrse_ints.system_code%TYPE) IS
1521: SELECT crdet.rowid,
1522: crdet.*
1523: FROM igs_uc_crse_dets crdet
1516: -- check whether corresponding record already exists.
1517: -- Currently since only FTUG is supported over Hercules and no course data for other systems come from UCAS,
1518: -- the system code has been hardcoded to U for 'FTUG'.
1519: CURSOR old_crse_cur (p_course igs_uc_ccrse_ints.course%TYPE, p_campus igs_uc_ccrse_ints.campus%TYPE,
1520: p_inst igs_uc_ccrse_ints.inst%TYPE, p_system_code igs_uc_ccrse_ints.system_code%TYPE) IS
1521: SELECT crdet.rowid,
1522: crdet.*
1523: FROM igs_uc_crse_dets crdet
1524: WHERE crdet.ucas_program_code = p_course
1526: AND crdet.ucas_campus = p_campus
1527: AND crdet.system_code = p_system_code;
1528:
1529: -- validate inst
1530: CURSOR chk_institute (p_inst igs_uc_ccrse_ints.inst%TYPE) IS
1531: SELECT 'X'
1532: FROM igs_uc_com_inst
1533: WHERE inst = p_inst;
1534:
1746: -- update the interface table rec - record_status if successfully processed or Error Code if any error encountered
1747: -- while processing the record.
1748: IF g_error_code IS NOT NULL THEN
1749:
1750: UPDATE igs_uc_ccrse_ints
1751: SET error_code = g_error_code
1752: WHERE rowid = new_cvcrse_rec.rowid;
1753:
1754: -- log error message/meaning.
1758: g_error_rec_cnt := g_error_rec_cnt + 1;
1759:
1760: ELSE
1761:
1762: UPDATE igs_uc_ccrse_ints
1763: SET record_status = 'D',
1764: error_code = NULL
1765: WHERE rowid = new_cvcrse_rec.rowid;
1766:
1869:
1870: -- check whether corresponding record already exists.
1871: -- Currently since only FTUG is supported over Hercules and no course data for other systems come from UCAS,
1872: -- the system code has been hardcoded to U for 'FTUG'.
1873: CURSOR old_ucrse_cur (p_course igs_uc_ccrse_ints.course%TYPE, p_campus igs_uc_ccrse_ints.campus%TYPE,
1874: p_inst igs_uc_ccrse_ints.inst%TYPE, p_system igs_uc_crse_dets.system_code%TYPE) IS
1875: SELECT ucrdet.rowid,
1876: ucrdet.*
1877: FROM igs_uc_crse_dets ucrdet
1870: -- check whether corresponding record already exists.
1871: -- Currently since only FTUG is supported over Hercules and no course data for other systems come from UCAS,
1872: -- the system code has been hardcoded to U for 'FTUG'.
1873: CURSOR old_ucrse_cur (p_course igs_uc_ccrse_ints.course%TYPE, p_campus igs_uc_ccrse_ints.campus%TYPE,
1874: p_inst igs_uc_ccrse_ints.inst%TYPE, p_system igs_uc_crse_dets.system_code%TYPE) IS
1875: SELECT ucrdet.rowid,
1876: ucrdet.*
1877: FROM igs_uc_crse_dets ucrdet
1878: WHERE ucrdet.ucas_program_code = p_course