转至繁体中文版     | 网站首页 | 文章中心 | 下载中心 | 图片中心 | 笑话频道 | 教程频道 | 会员中心 | 雁过留声 | 
最新公告:     "MinTao学以致用网"欢迎您的光临,你的支持便是我们的动力,欢迎广大网友和各界人士亲临指导,你们的一个小小的建议便是我们发展的开路石!  [MinTao  2007年9月5日]        
您现在的位置: MinTao学以致用网 >> 文章中心 >> 电子课堂 >> 数据库 >> Sql Server >> 文章正文
专题栏目
更多内容
最新推荐 更多内容
相关文章
sqlserver 2005 如何创建
通过OLEDB读取SQLSERVER
.Net下调用SqlServer2k存
sqlserver 存储过程、存
[C#]log4net写SQLServer
SQLServer 工具箱(脚本
重建 SQLServer 索引的重
SQLServer 日志文件处理
返回服务器登陆的时间,
谈JDBC SQLSERVERError 
更多内容
仿递归算法,得到当前部门下所包括的子部门树SQLServer2000         
仿递归算法,得到当前部门下所包括的子部门树SQLServer2000
作者:verybigmouthz 文章来源:不详 点击数: 更新时间:2007-11-14 13:09:17
[原创]得到当前部门下所包括的子部门树

/**
Table:公司部门信息
**/
Create Table tCore_Dept
(
DeptID varchar(8) not null,
DeptName        varchar(80) not null,
SuperiorDeptID        varchar(8) not null,
CONSTRAINT tCore_Dept_PK Primary Key(DeptID)
)
go

insert into tCore_Dept Values(''''A'''',''''A'''',''''Root'''')
insert into tCore_Dept Values(''''B'''',''''B'''',''''Root'''')
insert into tCore_Dept Values(''''C'''',''''C'''',''''Root'''')

insert into tCore_Dept Values(''''AA'''',''''AA'''',''''A'''')
insert into tCore_Dept Values(''''AB'''',''''AB'''',''''A'''')
insert into tCore_Dept Values(''''BA'''',''''BA'''',''''B'''')
insert into tCore_Dept Values(''''ABA'''',''''ABA'''',''''AB'''')
insert into tCore_Dept Values(''''ABAA'''',''''ABAA'''',''''ABA'''')

/**
Function:获取子部门
**/
Create Function GetNextDept
(@dept varchar(8))
Returns Table
WITH ENCRYPTION
As
Return
(
select deptid,  deptname, superiordeptid
from tCore_Dept
where superiordeptid = @dept
)
go
/**
Function:获取子部门树
**/
Create Procedure GetNextDeptTree
(@Child_node varchar(8))
WITH ENCRYPTION
As
begin

SET NOCOUNT ON

DECLARE @Cnt int
Declare @i int
Declare @tmpnode varchar(8)

create table #stack (node varchar(8))
create table #stackTmp (node varchar(8))
create table #stackTmpXXX (node varchar(8))

insert into  #stack
select DeptID from GetNextDept(@Child_node)

insert into  #stackTmp
select DeptID from GetNextDept(@Child_node)

select @tmpnode = @Child_node
select @Cnt = count(*) from tCore_Dept
select @i = 0

loops:

declare cur cursor for
select node from #stackTmp
open cur
fetch next from cur into @tmpnode
while   @@FETCH_STATUS = 0
begin
   insert into  #stack   select DeptID from GetNextDept(@tmpnode)
   insert into  #stackTmpXXX   select DeptID from GetNextDept(@tmpnode)
   select @i = @i + 1
   fetch next from cur into @tmpnode
end
CLOSE cur
DEALLOCATE cur

select @i = @i + 1

delete from #stackTmp
insert into #stackTmp select node from #stackTmpXXX
delete from #stackTmpXXX

if (@i >= @Cnt * 1.5 )
goto ends

goto loops

ends:
select node from #stack
end
go
/*
select * from tCore_Dept
exec GetNextDeptTree ''''B''''
*/
----------------------------------

后记 : 原想用存储过程的递归来实现子树的求取,但发现如果当前游标没有关闭,则递归调用中会发现无法创建新的游标,:(
没有想到存储过程的游标不支持递归,游标并不是重新建一个内存地址,而是沿用以前的那个游标。这算不算是一个bug.
同样对于树前要加----之类的 我想应该很简单了吧 ,在这里就不多废话了。
本算法的关键在于退出循环的条件,这里我用了一个计数器,但是末免会多运行好多次,这也是本算法的缺点所在,希望有人能得出最好的算法因子,即我存储过程中的

if (@i >= @Cnt * 1.5 )
goto ends

的那个1.5。:)好了就到这里。:)

 

原文及相关资料:http://www.whsdn.net/bbs/?p=thread&ForumID=4&ThreadID=388&Page=1&Location#4

----------------------------------------------
τ 认识你会不会是一种错误
如果这是个错误 也应该是个美丽的错误
但愿这个错误能够一辈子

______________ζ浮云¢惊龙

文章录入:mintao    责任编辑:mintao 
  • 上一篇文章:

  • 下一篇文章:
  • 【字体: 】【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口
      注:本站部分文章源于互联网,版权归原作者所有!如有侵权,请原作者与本站联系,本站将立即删除! 本站文章除特别注明外均可转载,但需注明出处! [MinTao学以致用网]
      网友评论:(只显示最新10条。评论内容只代表网友观点,与本站立场无关!)

    | 设为首页 |加入收藏 | 联系站长 | 友情链接 | 版权申明 | 广告服务
    MinTao学以致用网

    Copyright @ 2007 MinTao学以致用网(www.mintao.net) Inc All Rights Reserved.
    QQ:543098146有事请Q我! QQ:261561092有事请Q我 QQ:179647303有事请Q我 MSN:min906@126.com
    站长:MinTao 信息产业部ICP备案号:鄂ICP备07500065号

    学以致用是我们学习者的至高境界和不懈追求,[MinTao学以致用网]与大家共同学习,共同进步……
    信息产业部备案
    *鄂ICP备07500065号