Line 517: l_stmt:='select upper(db.name) from v$database@'||p_dblink ||' db';
513: BEGIN
514:
515: edw_misc_util.globalNamesOff;
516: 517: l_stmt:='select upper(db.name) from v$database@'||p_dblink ||' db'; 518: open cv for l_stmt ;
519: fetch cv into l_host;
520: close cv;
521:
Line 524: FROM v$database db;
520: close cv;
521:
522: SELECT upper(db.name)
523: INTO l_db_name 524: FROM v$database db; 525:
526: IF (l_host = l_db_name) THEN
527: RETURN TRUE;
528: ELSE