Recursion in pl/sql

Question

Hi all,
I need to find out all the nested procedure or functions list which are invoked by a particular procedure or function.I am trying to write code which I am using recursion.I am facing problem in storing values in INTO clause of the SELECT statement because multiple procs can not be stored on one index i.e proclist_v(i).Should I use any other type of object other than pl/sql table.please give me an idea
CREATE OR REPLACE PACKAGE finddblink_pack
IS
TYPE NameType IS TABLE OF
dba_dependencies.referenced_name%TYPE
INDEX BY BINARY_INTEGER;
PROCEDURE finddblink_proc (proc_par NameType)
END finddblink_pack;
CREATE OR REPLACE PACKAGE BODY finddblink_pack
IS
PROCEDURE finddblink_proc (proc_par NameType)
IS
proclist_v NameType;
BEGIN
FOR i in func_par.FIRST .. func_par.LAST LOOP
SELECT referenced_name
INTO proclist_v(i)
FROM dba_dependencies
WHERE name=upper(func_par(i))
AND referenced_type in('FUNCTION','PROCEDURE','PACKAGE BODY');
finddblink(proclist_v);
END LOOP;
END finddblink_proc;
END finddblink_pack;

Answer 1

Well, you do not need recursive plsql for that. Hierarchical SQL will do:
SQL> CREATE OR REPLACE
  2    PROCEDURE P1
  3      IS
  4      BEGIN
  5          NULL;
  6  END;
  7  /
Procedure created.
SQL> CREATE OR REPLACE
  2    PROCEDURE P2
  3      IS
  4      BEGIN
  5          P1;
  6  END;
  7  /
Procedure created.
SQL> CREATE OR REPLACE
  2    PROCEDURE P3
  3      IS
  4      BEGIN
  5          P2;
  6  END;
  7  /
Procedure created.
SQL> SELECT  referenced_name
  2    FROM  dba_dependencies
  3    START WITH name = 'P3'
  4    CONNECT BY prior referenced_name = name
  5    AND referenced_type in('FUNCTION','PROCEDURE','PACKAGE BODY')
  6  /
REFERENCED_NAME
P2
P1
SQL> SY.