ORACLE 递归查询（转）

一、树型表结构：

　　节点ID  上级ID  节点名称

二、公式：

　　select 节点ID,节点名称,level

       from 　　表

       connect by prior 节点ID=上级节点ID

       start with 上级节点ID=节点值

      说明：

      　　1、常见的树形结构为公司组织机构、地区……

　　　 2、求节点ID以上的结构，或以上的结构，将“节点ID=上级节点ID”左右顺序换一下即可。

　　　 3、Level为Oracle的特殊字段，表示“层”的意思。当前节点ID的下一层节点为“1”。

     测试SQL:

            说明1、求002以下(或以上)所有子节点和层次(动态:总是从1开始算),但不包括自身

            说明2、如果求002以上的节点，则“connect by prior topno=departno”，“=”两边的条件换位即可。

            select departno,departname,level

            from dept

            connect by prior departno=topno

            start with topno='002'; 

 

      测试数据

     　  create table Dept(

　　   DepartNO  varchar2(10),

          DepartName  varchar2(20),

          TopNo    varchar2(10));

          insert into Dept values('001',' 董事会','0');

　　  insert into Dept values('002','总裁办 ','001');

　　 insert into Dept values('003','财务部 ','001');

　　 insert into Dept values('004','市场部 ','002');

　　 insert into Dept values('005','公关部 ','002');

　　 insert into Dept values('006','销售部 ','002');

　　 insert into Dept values('007','分销处 ','006');

　　 insert into Dept values('008','业务拓展处','004');

　　 insert into Dept values('009','销售科','007');

 　向前查 比如

　　select distinct departno,departname,level

　　from dept

　　connect by prior topno=departno

　　start with

　　departno='005';

　那么其实是查005自身以及上级， 所以结果是005,002,001

 

============================================================================================

 

       写递归最关键的要定义出来 递归函数 ,递归函数 最关键的要定义出来它的 参数 .和它的 返回值

       咱么做展现，不用返回值，直接做展现就行了,参数最重要,那就分析一下参数怎么去定义?这时候要

       分析递归的过程,递归过程什么样呢?根据它的 id 找它的 父id,根据它的 父id 找到它的孩子,根据它

       的孩子再找到它的孩子.那么分析这个参数肯定是一个id，因为只有传进来id，才知道怎么去找这个id

       下面的孩子. 所以最关键定义出存储过程的参数

 

       create or replace procedure p (v_pid article.pid%type, v_level binary_integer) is

         cursor c is select * from article where pid = v_pid;

         v_preStr varchar2(1024) := '';

       begin

         for i in 1..v_level loop

           v_preStr := v_preStr || '****';

         end loop;

 

         for v_article in c loop

           dbms_output.put_line(v_preStr || v_article.cont);

           if(v_article.isleaf = 0) then

             p (v_article.id, v_level + 1);

           end if;

         end loop;

       end;

 

 

       --展现emp表的树状结构

       create or replace procedure p

           (v_empno emp.empno%type, v_grade binary_integer)

       is

           cursor c is

                  select * from emp where mgr = v_empno;

           v_preStr varchar2(4000) := '';

              v_i binary_integer := 0;

       begin

           while v_i < v_grade loop

             v_preStr := v_preStr || '****';

                v_i := v_i + 1;

           end loop;

             

              for v_emp in c loop

                  dbms_output.put_line(v_preStr || v_emp.ename);

                     p(v_emp.empno, v_grade + 1); 

              end loop;

       end;

 

       declare

           v_emp emp%rowtype;

       begin

           select * into v_emp from emp where mgr is null;

              dbms_output.put_line(v_emp.ename);

              p(v_emp.empno, 1);

       end;

 

应用例子：

create or replace procedure aa(GlobalOrgId varchar2)
as
    i integer;
    S varchar2(2000);
begin
     S:='create global temporary table t(newGlobalParentOrgId varchar(40),newGlobalOrgId varchar(40),level int) ';
     execute immediate S;
     i:=i+1;
     Insert into t  select globalparentorgid,globalorgid,i from dept_table
                    where globalorgid = GlobalOrgId connect by prior globalorgid=globalparentorgid
                    start with globalparentorgid=GlobalOrgId;
     i:=i+1;
    
     Insert into t  select c.globalparentorgid,c.globalorgid,i from dept_table c left join t d on c.globalparentorgid = d.newGlobalOrgId where d.level = i-1;
     select * from t;
end;