Passing a table into a procedure to be used in a curor

Question

Hi,
I'm using Oracle 9.2.0.6
I have a procedure that searches all objects for a passed in string value. The procedure is below.
CREATE OR REPLACE PROCEDURE Find_String (
pin_referenced_name IN dba_dependencies.referenced_name%TYPE)
IS
cursor cur_get_dependancy
is
SELECT distinct owner, name, type
  FROM [email protected]
WHERE lower(referenced_name) = lower(pin_referenced_name) --'ftbv_salesrep_all_1d'
   AND referenced_type != 'SYNONYM'
order by name;
v_owner  varchar2(40);
v_name   varchar2(50);
v_type   varchar2(40);
    BEGIN
       dbms_output.put_line(upper(pin_referenced_name)||' is found in the following objects.');
       dbms_output.put_line(' ');
       dbms_output.put_line(RPAD('OWNER', 30, ' ')||RPAD('NAME', 60, ' ')||RPAD('OBJECT TYPE', 30, ' '));
       dbms_output.put_line('-------------------------------------------------------------------------------------------------------------------');
        FOR i IN cur_get_dependancy
        LOOP
            v_owner := RPAD(i.owner, 30, ' ');
            v_name  := RPAD(i.name, 45, ' ');
            v_type  := RPAD(i.type, 30, ' ');
            dbms_output.put_line(v_owner ||v_name|| v_type);
        END LOOP;
END find_string;I was wondering if there's any way I could pass in the table name, and the name of the DB link to be used in the cursor, into the procedure and rig the cursor to be able to accept that as a parameter. I want our users to be able to search different databases using this utility code.
I thought of NDS, and that would be a way to do it, however I'm not sure if I could use an NDS statement in conjunction with a cursor.
Does anybody have any suggestions?
Thanks

Answer 1

One approach (there are obviously many ways to skin this particular cat)
SQL> ed
Wrote file afiedt.buf
  1  declare
  2    c1           sys_refcursor;
  3    l_val        number;
  4    l_table_name varchar2(30) := 'dual';
  5  begin
  6    open c1 for 'select 1 from ' || l_table_name;
  7    loop
  8      fetch c1 into l_val;
  9      exit when c1%notfound;
10      dbms_output.put_line( l_val );
11    end loop;
12    close c1;
13* end;
SQL> /
1
PL/SQL procedure successfully completed.Justin