德育量化管理系统

特色功能

数据库技术

SQL2000中用函数实现查询树型结构中指定节点的所有父节点

作者:admin 来源: 日期:2014-9-8 22:57:56 人气: 标签:


/*

标题:SQL SERVER 2000中查询指定节点及其所有父节点的函数(表格形式显示)

作者:爱新觉罗·毓华(十八年风雨,守得冰山雪莲花开) 

时间:2008-05-12

地点:广东深圳

*/



create table tb(id varchar(3) , pid varchar(3) , name varchar(10))

insert into tb values('001' , null  , '广东省')

insert into tb values('002' , '001' , '广州市')

insert into tb values('003' , '001' , '深圳市')

insert into tb values('004' , '002' , '天河区')

insert into tb values('005' , '003' , '罗湖区')

insert into tb values('006' , '003' , '福田区')

insert into tb values('007' , '003' , '宝安区')

insert into tb values('008' , '007' , '西乡镇')

insert into tb values('009' , '007' , '龙华镇')

insert into tb values('010' , '007' , '松岗镇')

go



--查询指定节点及其所有父节点的函数

create function f_pid(@id varchar(3)) returns @t_level table(id varchar(3))

as

begin

  insert into @t_level select @id

  select @id = pid from tb where id = @id and pid is not null

  while @@ROWCOUNT > 0

  begin

    insert into @t_level select @id 

    select @id = pid from tb where id = @id and pid is not null

  end

  return

end

go



--调用函数查询002(广州市)及其所有父节点

select a.* from tb a , f_pid('002') b where a.id = b.id order by a.id

/*

id   pid  name       

---- ---- ---------- 

001  NULL 广东省

002  001  广州市



(所影响的行数为 2 行)

*/



--调用函数查询003(深圳市)及其所有父节点

select a.* from tb a , f_pid('003') b where a.id = b.id order by a.id

/*

id   pid  name       

---- ---- ---------- 

001  NULL 广东省

003  001  深圳市



(所影响的行数为 2 行)

*/



--调用函数查询008(西乡镇)及其所有父节点

select a.* from tb a , f_pid('008') b where a.id = b.id order by a.id

/*

id   pid  name       

---- ---- ---------- 

001  NULL 广东省

003  001  深圳市

007  003  宝安区

008  007  西乡镇



(所影响的行数为 4 行)

*/



drop table tb

drop function f_pid





@@ROWCOUNT:返回受上一语句影响的行数。

返回类型:integer。

注释:任何不返回行的语句将这一变量设置为 0 ,如 IF 语句。

示例:下面的示例执行 UPDATE 语句并用 @@ROWCOUNT 来检测是否有发生更改的行。



UPDATE authors SET au_lname = 'Jones' WHERE au_id = '999-888-7777'

IF @@ROWCOUNT = 0

   print 'Warning: No rows were updated'



结果:



(所影响的行数为 0 行)

Warning: No rows were updated





/*

标题:SQL SERVER 2000中查询指定节点及其所有父节点的函数(字符串形式显示)

作者:爱新觉罗·毓华(十八年风雨,守得冰山雪莲花开)  

时间:2010-02-02

地点:新疆乌鲁木齐

*/



create table tb(id varchar(3) , pid varchar(3) , name varchar(10))

insert into tb values('001' , null  , '广东省')

insert into tb values('002' , '001' , '广州市')

insert into tb values('003' , '001' , '深圳市')

insert into tb values('004' , '002' , '天河区')

insert into tb values('005' , '003' , '罗湖区')

insert into tb values('006' , '003' , '福田区')

insert into tb values('007' , '003' , '宝安区')

insert into tb values('008' , '007' , '西乡镇')

insert into tb values('009' , '007' , '龙华镇')

insert into tb values('010' , '007' , '松岗镇')

go



--查询各节点的父路径函数(从父到子)

create function f_pid1(@id varchar(3)) returns varchar(100)

as

begin

  declare @re_str as varchar(100)

  set @re_str = ''

  select @re_str = name from tb where id = @id

  while exists (select 1 from tb where id = @id and pid is not null)

    begin

      select @id = b.id , @re_str = b.name + ',' + @re_str from tb a , tb b where a.id = @id and a.pid = b.id

    end

  return @re_str

end

go

--查询各节点的父路径函数(从子到父)

create function f_pid2(@id varchar(3)) returns varchar(100)

as

begin

  declare @re_str as varchar(100)

  set @re_str = ''

  select @re_str = name from tb where id = @id

  while exists (select 1 from tb where id = @id and pid is not null)

    begin

      select @id = b.id , @re_str = @re_str + ',' + b.name from tb a , tb b where a.id = @id and a.pid = b.id

    end

  return @re_str

end

go



select * , 

       dbo.f_pid1(id) [路径(从父到子)] ,

       dbo.f_pid2(id) [路径(从子到父)]

from tb order by id



drop function f_pid1 , f_pid2

drop table tb



/*

id   pid  name    路径(从父到子)               路径(从子到父)              

---- ---- ------  ---------------------------  ----------------------------

001  NULL 广东省  广东省                       广东省

002  001  广州市  广东省,广州市                广州市,广东省

003  001  深圳市  广东省,深圳市                深圳市,广东省

004  002  天河区  广东省,广州市,天河区         天河区,广州市,广东省

005  003  罗湖区  广东省,深圳市,罗湖区         罗湖区,深圳市,广东省

006  003  福田区  广东省,深圳市,福田区         福田区,深圳市,广东省

007  003  宝安区  广东省,深圳市,宝安区         宝安区,深圳市,广东省

008  007  西乡镇  广东省,深圳市,宝安区,西乡镇  西乡镇,宝安区,深圳市,广东省

009  007  龙华镇  广东省,深圳市,宝安区,龙华镇  龙华镇,宝安区,深圳市,广东省

010  007  松岗镇  广东省,深圳市,宝安区,松岗镇  松岗镇,宝安区,深圳市,广东省



(所影响的行数为 10 行)

*/