首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 数据库 > SQL Server >

对小弟我来说,实在是太难的,希望各位看一下,部门无级树的有关问题

2013-06-26 
对我来说,实在是太难的,希望各位大虾看一下,部门无级树的问题部门编码部门名称上级编码级数10000000集团总

对我来说,实在是太难的,希望各位大虾看一下,部门无级树的问题
部门编码            部门名称           上级编码           级数
10000000    集团总部          ROOT                  1
10020000    营销中心          10000000            2
10020100    综合部              10020000            3
10020101    综合部事务室   10020100            4


要得到的结果是
部门编码            部门名称         上级编码                  新增列
10000000集团总部        ROOT                   10000000
10020000营销中心         10000000            10000000,10020000
10020100综合部             10020000            10000000,10020000,10020100
10020101综合部事务室     10020100           10000000,10020000,10020100,100201010


这样的效果要如何实现啊,请各位大虾指点,感谢!!!!
[解决办法]

if OBJECT_ID('tempdb..#dept') is not null
  drop table #dept
create table #DEPT
(
  部门编码 varchar(20),
  部门名称 varchar(20),
  上级部门编码 varchar(20),
  级别 int
)
insert into #DEPT 
select '10000000','集团总部','ROOT' ,1 
union all
select '10020000','营销中心','10000000',2 
union all
select '10020100','综合部','10020000',3 
union all
select '10020101','综合部事务室','10020100',4 
union all
select '100201011','信息部','100201010' ,5

select 部门编码,部门名称,上级部门编码,LEFT(XX,LEN(XX)-1)as paths
  FROM (
     SELECT 部门编码,部门名称,上级部门编码,
       (SELECT 上级部门编码+',' 
          FROM #DEPT 
          WHERE A.部门编码>=上级部门编码 
          ORDER BY 部门编码 FOR XML PATH('') 
        )AS XX
       FROM #DEPT A 


       GROUP BY 部门编码,部门名称,上级部门编码 
   )B




[解决办法]
IF EXISTS (select OBJECT_ID('departments'))

DROP TABLE departments
CREATE TABLE [dbo].[departments](
[部门编码] [sysname] NOT NULL,
[部门名称] [sysname] NOT NULL,
[上级编码] [sysname] NOT NULL,
[级数] [int] NULL
)

INSERT INTO departments VALUES ('10000000','集团总部','ROOT',1)
INSERT INTO departments VALUES ('10020000','营销中心','10000000',2)
INSERT INTO departments VALUES ('10020100','综合部','10020000',3)
INSERT INTO departments VALUES ('10020101','综合部事务室','10020100',4)


SELECT 部门编码,
       部门名称,
       STUFF((SELECT ',' + 部门编码
               FROM   departments d1
               WHERE  d1.级数 <= d.级数 FOR XML PATH('')),1,1,'')
FROM   departments d

[解决办法]

select '10000000' 部门编码    ,N'集团总部'   部门名称   ,     'ROOT'  上级编码         ,        1  级数 
into #t
union all
select '10020000'             ,N'营销中心'       ,    '10000000'      ,      2        union all
select '10020100'             ,N'综合部'         ,      '10020000'    ,         3    union all
select '10020101'             ,N'综合部事务室'   , '10020100'         ,    4 

;With t as
(
select 部门编码,部门名称,上级编码,上级编码 上级编码2 
from #t
union all
select a.部门编码,a.部门名称,a.上级编码,b.上级编码 上级编码2
from t a join #t b
on a.上级编码2=b.部门编码
)
select 部门编码,部门名称,上级编码
,STUFF((select ',' +(Case when 上级编码2='ROOT' then 部门编码 else 上级编码2 end)
  from t t2 where t1.部门编码=t2.部门编码 and t1.部门名称=t2.部门名称 and t1.上级编码=t2.上级编码
  for xml path('')
  ),1,1,'')
as 新增列
from t t1 --
group by 部门编码,部门名称,上级编码

[解决办法]
create function [dbo].[BA_P_COMPANY]()
  returns @re table([id] int, [level] int, [sid] [varchar](6666))
as
begin
  declare @level int, @maxid int
  select @level = 0, @maxid = (select power(10, len(max([CID]))) from [BA_COMPANY])


  insert @re
  select [CID], @level, ComCode
    from [BA_COMPANY]
   where [PID] = 0

  while @@rowcount > 0
  begin
    set @level = @level + 1
    insert @re 
    select a.[CID], @level, b.[sid] + ',' + a.ComCode
      from [BA_COMPANY] a, @re b
     where a.[PID] = b.[id] and b.[level] = @level - 1
  end
  return
end

[解决办法]
用递归查询 见4楼
[解决办法]


/*
标题: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

;with t as
(
    select id , name , pid = id , path = cast(name as nvarchar(100)) from tb 
    union all
    select t.id , t.name , pid = tb.pid , path = cast(tb.name as nvarchar(100)) from t join tb on tb.id = t.pid 
)
select id , 
       name ,
       [路径(从父到子)_1] = pid1, 
       [路径(从父到子)_2] = reverse(substring(reverse(path1) , charindex(',' , reverse(path1)) + 1 , len(path1))) ,
       [路径(从子到父)_1] = pid2,
       [路径(从子到父)_2] = substring(path2 , charindex(',' , path2) + 1 , len(path2)) from
(
select id , name ,
       pid1 = STUFF((SELECT ',' + pid FROM t WHERE id = tb.id order by t.id , t.pid FOR XML PATH('')) , 1 , 1 , ''),
       pid2 = STUFF((SELECT ',' + pid FROM t WHERE id = tb.id FOR XML PATH('')) , 1 , 1 , ''),
       path1 = STUFF((SELECT ',' + path FROM t WHERE id = tb.id order by t.id , t.pid FOR XML PATH('')) , 1 , 1 , ''),


       path2 = STUFF((SELECT ',' + path FROM t WHERE id = tb.id FOR XML PATH('')) , 1 , 1 , '')
from tb
group by id , name
) m
order by id
/*
id   name    路径(从父到子)_1  路径(从父到子)_2             路径(从子到父)_1  路径(从子到父)_2
---- ------  ----------------  ---------------------------  ----------------  ---------------------------
001  广东省  001               广东省                       001               广东省
002  广州市  001,002           广东省,广州市                002,001           广州市,广东省
003  深圳市  001,003           广东省,深圳市                003,001           深圳市,广东省
004  天河区  001,002,004       广东省,广州市,天河区         004,002,001       天河区,广州市,广东省
005  罗湖区  001,003,005       广东省,深圳市,罗湖区         005,003,001       罗湖区,深圳市,广东省
006  福田区  001,003,006       广东省,深圳市,福田区         006,003,001       福田区,深圳市,广东省
007  宝安区  001,003,007       广东省,深圳市,宝安区         007,003,001       宝安区,深圳市,广东省
008  西乡镇  001,003,007,008   广东省,深圳市,宝安区,西乡镇  008,007,003,001   西乡镇,宝安区,深圳市,广东省
009  龙华镇  001,003,007,009   广东省,深圳市,宝安区,龙华镇  009,007,003,001   龙华镇,宝安区,深圳市,广东省
010  松岗镇  001,003,007,010   广东省,深圳市,宝安区,松岗镇  010,007,003,001   松岗镇,宝安区,深圳市,广东省

(10 行受影响)
*/

drop table tb

热点排行