数据库树形数据处理方案.doc

树形数据的排序,新增,修改,复制,删除,数据完整性检查,汇总统计--邹建20039--*//*--数据测试环境表名tb,如果修改表名,则相应修改所有数据处理中涉及到的表名tbid为编号(标识字段+主键)pid为上级编号name为名称,后面可以自行增加其他字段凡是未特殊标注的地方,对自行增加的字段不影响处理结果--*/createtabletb(idintidentity(1,1)notnullconstraintPK_tbprimarykeyclustered,pidint,namevarchar(20))insertintotbselect0,'中国'unionallselect0,'美国'unionallselect0,'加拿大'unionallselect1,'北京'unionallselect1,'上海'unionallselect1,'江苏'unionallselect6,'苏州'unionallselect7,'常熟'unionallselect6,'南京'unionallselect6,'无锡'unionallselect2,'纽约'unionallselect2,'旧金山'go/*--数据处理--*//*--一个重要的函数,很多处理的地方都会用到--*/--自定义函数--获取编码累计createfunctionf_getmergid(***@idint)returnsvarchar(8000)******@revarchar(8000),***@pidint--为了数字排序正常,需要统一编码宽度******@idlenint,***@idheadervarchar(20)******@idlen=max(len(id)),***@idheader=space(***@idlen)fromtb--得到编码累计******@re=right(***@idheader+cast(***@idasvarchar),***@idlen)******@pid=pidfromtbwhereid=***@idwhile@***@rowcount>******@re=right(***@idheader+cast(***@pidasvarchar),***@idlen)+','+***@re,***@pid=pidfromtbwhereid=***@pidreturn(***@re)endgo/*--数据显示排序--*/--分级显示--横向,先一级,后二级select*fromtborderbypid--分级显示--纵向select*fromtborderbydbof_getmergid(id)go/*--数据统计--*/--分级统计,每个地区下的明细地区数select*,明细地区数=(selectcount(*)fromtbwheredbof_getmergid(id)likedbof_getmergid(aid)+',%')fromtbaorderbydbof_getmergid(id)go/*--数据新增,修改数据新增,修改(包括修改所属的类别)没有什么技巧,只需要检查所属的上级是否存在就行了这个可以简单的用下面的语句来解决:ifexists(select1fromtbwhereid=***@id)print'存在'elseprint'不存在'--*//*--数据删除--*/createprocp_******@idint,--要删除的******@deletechildbit=0--是否删除子1删除子,0如果***@id有子,则删除失败******@deletechild=1deletefromtbwheredbof_getmergid(id)likedbof_getmergid(***@id)+'%'elseifexists(select1fromtbwherepid=***@id)gotolbErrelsedeletefromtbwhereid=***@idreturnlbErr:RAISERROR('该结点下有子结点,不能删除',16,1)go--调用示例--删除'美国'的数据--execp_delete2--不包含子,因为有美国下有子,所以删除会出错execp_delete2,1--包含子,将删除美国及所有数据go/*--数据完整性检查--*/--自定义函数--检测某个编码出发,是否被循环引用createfunctionf_chkid(***@idint)returnsbit--循环,返回1,否则返回******@rebit,***@******@re=0--检测******@pid=pidfromtbwhereid=***@idwhile@***@rowcount>******@pid=***@******@re=******@pid=pidfromtbwhereid=***@pidendlbErr:return