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;