571: -- Get new interface records
572: CURSOR int_cvinst_cur IS
573: SELECT cvinst.rowid,
574: cvinst.*
575: FROM igs_uc_cinst_ints cvinst
576: WHERE record_status = 'N';
577:
578: -- check whether corresponding record already exists.
579: CURSOR old_inst_cur (p_inst igs_uc_cinst_ints.inst%TYPE) IS
575: FROM igs_uc_cinst_ints cvinst
576: WHERE record_status = 'N';
577:
578: -- check whether corresponding record already exists.
579: CURSOR old_inst_cur (p_inst igs_uc_cinst_ints.inst%TYPE) IS
580: SELECT cominst.rowid,
581: cominst.*
582: FROM igs_uc_com_inst cominst
583: WHERE cominst.inst = p_inst ;
693: -- update the interface table rec - record_status if successfully processed or Error Code if any error encountered
694: -- while processing the record.
695: IF g_error_code IS NOT NULL THEN
696:
697: UPDATE igs_uc_cinst_ints
698: SET error_code = g_error_code
699: WHERE rowid = new_cvinst_rec.rowid;
700:
701: -- log error message/meaning.
705: g_error_rec_cnt := g_error_rec_cnt + 1;
706:
707: ELSE
708:
709: UPDATE igs_uc_cinst_ints
710: SET record_status = 'D',
711: error_code = NULL
712: WHERE rowid = new_cvinst_rec.rowid;
713: