[Home] [Help]
5379:
5380: CURSOR new_ivstarh_cur IS
5381: SELECT ivsth.rowid,
5382: ivsth.*
5383: FROM igs_uc_istarh_ints ivsth
5384: WHERE ivsth.record_status = 'N';
5385:
5386: -- check for corresponding record in main table.
5387: CURSOR old_starh_cur(p_appno igs_uc_app_choices.app_no%TYPE) IS
5390: FROM igs_uc_app_stats uast
5391: WHERE uast.app_no = p_appno;
5392:
5393: -- validate ethnic value
5394: CURSOR validate_ethnic (p_ethnic igs_uc_istarh_ints.ethnic%TYPE) IS
5395: SELECT 'X'
5396: FROM igs_uc_ref_codes
5397: WHERE code_type = 'ET'
5398: and code = p_ethnic;
5397: WHERE code_type = 'ET'
5398: and code = p_ethnic;
5399:
5400: -- validate Socialclass value
5401: CURSOR validate_socialclass (p_socialclass igs_uc_istarh_ints.socialclass%TYPE) IS
5402: SELECT 'X'
5403: FROM igs_uc_ref_codes
5404: WHERE code_type = 'PC'
5405: AND code = p_socialclass;
5640: -- update the interface table rec - record_status if successfully processed or Error Code if any error encountered
5641: -- while processing the record.
5642: IF g_error_code IS NOT NULL THEN
5643:
5644: UPDATE igs_uc_istarh_ints
5645: SET error_code = g_error_code
5646: WHERE rowid = new_ivstarh_rec.rowid;
5647:
5648: -- log error message/meaning.
5652: g_error_rec_cnt := g_error_rec_cnt + 1;
5653:
5654: ELSE
5655:
5656: UPDATE igs_uc_istarh_ints
5657: SET record_status = 'D',
5658: error_code = NULL
5659: WHERE rowid = new_ivstarh_rec.rowid;
5660: