合并分拆表数据

  原贴地址： http://topic.csdn.net/u/20080614/17/22e73f33-f071-46dc-b9bf-321204b1656f.html

1. /******************************************************************************************************************************************************
2. 合并分拆表数据
4. 整理人：中国风(Roy)
6. 日期:2008.06.06
7. ******************************************************************************************************************************************************/
9. --> --> (Roy)生成測試數據
11. if not object_id('Tab') is null
12.     drop table Tab
13. Go
14. Create table Tab([Col1] int,[Col2] nvarchar(1))
15. Insert Tab
16. select 1,N'a' union all
17. select 1,N'b' union all
18. select 1,N'c' union all
19. select 2,N'd' union all
20. select 2,N'e' union all
21. select 3,N'f'
22. Go
24. 合并表:
26. SQL2000用函数:
28. go
29. if object_id('F_Str') is not null
30.     drop function F_Str
31. go
32. create function F_Str(@Col1 int)
33. returns nvarchar(100)
34. as
35. begin
36.     declare @S nvarchar(100)
37.     select @S=isnull(@S+',','')+Col2 from Tab where Col1=@Col1
38.     return @S
39. end
40. go
41. Select distinct Col1,Col2=dbo.F_Str(Col1) from Tab
43. go
45. SQL2005用XML:
47. 方法1:
49. select 
50.     a.Col1,Col2=stuff(b.Col2.value('/R[1]','nvarchar(max)'),1,1,'')
51. from 
52.     (select distinct COl1 from Tab) a
53. Cross apply
54.     (select COl2=(select N','+Col2 from Tab where Col1=a.COl1 For XML PATH(''), ROOT('R'), TYPE))b
56. 方法2:
58. select 
59.     a.Col1,COl2=replace(b.Col2.value('/Tab[1]','nvarchar(max)'),char(44)+char(32),char(44))
60. from 
61.     (select distinct COl1 from Tab) a
62. cross apply
63.     (select Col2=(select COl2 from Tab  where COl1=a.COl1 FOR XML AUTO, TYPE)
64.                 .query('<Tab>
65.                 {for $i in /Tab[position()<last()]/@COl2 return concat(string($i),",")}
66.                 {concat("",string(/Tab[last()]/@COl2))}
67.                 </Tab>')
68.                 )b
70. SQL05用CTE:
72. ;with roy as(select Col1,Col2,row=row_number()over(partition by COl1 order by COl1) from Tab)
73. ,Roy2 as
74. (select COl1,cast(COl2 as nvarchar(100))COl2,row from Roy where row=1 
75. union all 
76. select a.Col1,cast(b.COl2+','+a.COl2 as nvarchar(100)),a.row from Roy a join Roy2 b on a.COl1=b.COl1 and a.row=b.row+1)
77. select Col1,Col2 from Roy2 a where row=(select max(row) from roy where Col1=a.COl1) order by Col1 option (MAXRECURSION 0)
80. 生成结果:
81. /*
82. Col1        COl2
83. ----------- ------------
84. 1           a,b,c
85. 2           d,e
86. 3           f
88. (3 行受影响)
89. */
92. 拆分表:
94. --> --> (Roy)生成測試數據
96. if not object_id('Tab') is null
97.     drop table Tab
98. Go
99. Create table Tab([Col1] int,[COl2] nvarchar(5))
100. Insert Tab
101. select 1,N'a,b,c' union all
102. select 2,N'd,e' union all
103. select 3,N'f'
104. Go
106. SQL2000用辅助表:
107. if object_id('Tempdb..#Num') is not null
108.     drop table #Num
109. go
110. select top 100 ID=Identity(int,1,1) into #Num from syscolumns a,syscolumns b
111. Select 
112.     a.Col1,COl2=substring(a.Col2,b.ID,charindex(',',a.Col2+',',b.ID)-b.ID) 
113. from 
114.     Tab a,#Num b
115. where
116.     charindex(',',','+a.Col2,b.ID)=b.ID --也可用 substring(','+a.COl2,b.ID,1)=','
119. SQL2005用Xml:
121. select 
122.     a.COl1,b.Col2
123. from 
124.     (select Col1,COl2=convert(xml,'<root><v>'+replace(COl2,',','</v><v>')+'</v></root>') from Tab)a
125. outer apply
126.     (select Col2=C.v.value('.','nvarchar(100)') from a.COl2.nodes('/root/v')C(v))b
131. SQL05用CTE:
133. ;with roy as 
134. (select Col1,COl2=cast(left(Col2,charindex(',',Col2+',')-1) as nvarchar(100)),Split=cast(stuff(COl2+',',1,charindex(',',Col2+','),'') as nvarchar(100)) from Tab
135. union all
136. select Col1,COl2=cast(left(Split,charindex(',',Split)-1) as nvarchar(100)),Split= cast(stuff(Split,1,charindex(',',Split),'') as nvarchar(100)) from Roy where split>''
137. )
138. select COl1,COl2 from roy order by COl1 option (MAXRECURSION 0)
140. 生成结果:
141. /*
142. Col1        COl2
143. ----------- -----
144. 1           a
145. 1           b
146. 1           c
147. 2           d
148. 2           e
149. 3           f
150. */