[Home] [Help]
255: Removed the UPPER check for INSTITUTION_CD
256: ***************************************************************/
257:
258: l_rowid VARCHAR2(25);
259: l_crswalk_id igs_or_cwlk.crosswalk_id%TYPE;
260:
261: BEGIN
262:
263: IGS_OR_CWLK_PKG.INSERT_ROW (
259: l_crswalk_id igs_or_cwlk.crosswalk_id%TYPE;
260:
261: BEGIN
262:
263: IGS_OR_CWLK_PKG.INSERT_ROW (
264: x_rowid => l_rowid,
265: x_crosswalk_id => l_crswalk_id,
266: x_institution_code => p_inst_code,
267: x_institution_name => p_inst_name
300: ***************************************************************/
301:
302: CURSOR chk_dup(cp_data_src VARCHAR2,cp_data_val VARCHAR2) IS
303: SELECT 'Y'
304: FROM IGS_OR_CWLK_DTL
305: WHERE ALT_ID_TYPE = cp_data_src AND
306: ALT_ID_VALUE = cp_data_val;
307:
308: l_rowid VARCHAR2(25);
306: ALT_ID_VALUE = cp_data_val;
307:
308: l_rowid VARCHAR2(25);
309: l_exists VARCHAR2(1);
310: l_crswalkdtl_id igs_or_cwlk_dtl.crosswalk_dtl_id%TYPE;
311:
312: BEGIN
313:
314: OPEN chk_dup(p_datasrc,p_dataval);
315: FETCH chk_dup INTO l_exists;
316: CLOSE chk_dup;
317:
318: IF l_exists IS NULL THEN
319: IGS_OR_CWLK_DTL_PKG.INSERT_ROW (
320: x_rowid => l_rowid,
321: x_crosswalk_dtl_id => l_crswalkdtl_id,
322: x_crosswalk_id => p_crwlkid,
323: x_alt_id_type => p_datasrc,
637: Removed the UPPER check for INSTITUTION_CD
638: ***************************************************************/
639: CURSOR c_getrow (cp_cwlkid NUMBER) IS
640: SELECT rowid ,ORC.*
641: FROM IGS_OR_CWLK ORC
642: WHERE crosswalk_id = cp_cwlkid;
643:
644: l_rowid VARCHAR2(25);
645: l_getrow_rec c_getrow%ROWTYPE;
647: BEGIN
648: OPEN c_getrow(p_cwlkid);
649: FETCH c_getrow INTO l_getrow_rec;
650: CLOSE c_getrow;
651: IGS_OR_CWLK_PKG.update_row (
652: x_rowid => l_getrow_rec.rowid,
653: x_crosswalk_id => p_cwlkid,
654: x_institution_code => p_instcd,
655: x_institution_name => l_getrow_rec.institution_name,