一条SQL语句，大家一起来讨论一下

[wxcnl]

id name
1 tony
1 tom
1 jarry
2 eric
2 jane
3 monic


得到：
id name
1 tony,tom,jarry
2 eric,jane,monic
不用游标，一条SQL号实现吗？

[dawugui]

2000用函数.
2005可以.

[dawugui]

问题描述：

无论是在sql 2000， 还是在 sql 2005 中，都没有提供字符串的聚合函数， 
所以， 当我们在处理下列要求时，会比较麻烦：
有表tb, 如下：

id    value
----- ------
1     aa
1     bb
2     aaa
2     bbb
2     ccc

需要得到结果：
id     values
------ -----------
1      aa,bb
2      aaa,bbb,ccc
即， group by id, 求 value 的和（字符串相加）

1. 旧的解决方法
-- 1. 创建处理函数
CREATE FUNCTION dbo.f_str(@id int)
RETURNS varchar(8000)
AS
BEGIN
    DECLARE @r varchar(8000)
    SET @r = ''
    SELECT @r = @r + ',' + value
    FROM tb
    WHERE id=@id
    RETURN STUFF(@r, 1, 1, '')
END
GO

-- 调用函数
SELECt id, values=dbo.f_str(id) 
FROM tb 
GROUP BY id

-- 2. 新的解决方法
-- 示例数据
DECLARE @t TABLE(id int, value varchar(10))
INSERT @t SELECT 1, 'aa'
UNION ALL SELECT 1, 'bb'
UNION ALL SELECT 2, 'aaa'
UNION ALL SELECT 2, 'bbb'
UNION ALL SELECT 2, 'ccc'
-- 查询处理
SELECT *
FROM(
    SELECT DISTINCT 
        id
    FROM @t
)A
OUTER APPLY(
    SELECT 
        [values]= STUFF(REPLACE(REPLACE(
            (
                SELECT value FROM @t N
                WHERE id = A.id
                FOR XML AUTO
            ), '<N value="', ','), '"/>', ''), 1, 1, '')
)N
/*--结果
id          values
----------- ----------------
1           aa,bb
2           aaa,bbb,ccc
(2 行受影响)
--*/

附: 合并与分拆的CLR， sql2005的示例中有：
在安装sql 2005的示例后，默认安装目录为 drive:\Program Files\Microsoft SQL Server\90\Samples\Engine\Programmability\CLR\StringUtilities中

[dawugui]

--2000下用函数的各种情况.
/*
带符号合并行列转换(2007-11-19于海南三亚)

有表tb，其数据如下：
  a b
  1 1
  1 2
  1 3
  2 1
  2 2
  3 1
如何转换成如下结果:
  a b
  1 1,2,3
  2 1,2
  3 1 
*/

create table tb
(
   a int,
   b int
)
insert into tb(a,b) values(1,1)
insert into tb(a,b) values(1,2)
insert into tb(a,b) values(1,3)
insert into tb(a,b) values(2,1)
insert into tb(a,b) values(2,2)
insert into tb(a,b) values(3,1)
go

--创建一个合并的函数
create function f_hb(@a int)
returns varchar(8000)
as
begin
  declare @str varchar(8000)
  set @str = ''
  select @str = @str + ',' + cast(b as varchar) from tb where a = @a 
  set @str = right(@str , len(@str) - 1)
  return(@str)
End
go

--调用自定义函数得到结果：
select distinct a ,dbo.f_hb(a) as b from tb

drop table tb
drop function f_hb

/*
结果
a           b     
----------- ------
1           1,2,3
2           1,2
3           1

（所影响的行数为 3 行）
*/

----------------------------------------------------
/*
多个前列的合并
数据的原始状态如下：
ID  PR   CON  OP    SC 
001 p    c    差    6
001 p    c    好    2
001 p    c    一般  4
002 w    e    差    8
002 w    e    好    7
002 w    e    一般  1
用SQL语句实现，变成如下的数据
ID  PR   CON  OPS
001 p    c    差(6),好(2),一般(4)
002 w    e    差(8),好(7),一般(1)
*/

create table tb
(
  id  varchar(10),
  pr  varchar(10),
  con varchar(10),
  op  varchar(10),
  sc  int
)
 
insert into tb(ID,PR,CON,OP,SC) values('001', 'p',    'c',    '差',    6)
insert into tb(ID,PR,CON,OP,SC) values('001', 'p',    'c',    '好',    2)
insert into tb(ID,PR,CON,OP,SC) values('001', 'p',    'c',    '一般',  4)
insert into tb(ID,PR,CON,OP,SC) values('002', 'w',    'e',    '差',    8)
insert into tb(ID,PR,CON,OP,SC) values('002', 'w',    'e',    '好',    7)
insert into tb(ID,PR,CON,OP,SC) values('002', 'w',    'e',    '一般',  1)
go

--创建一个合并的函数
create function f_hb(@id varchar(10) , @pr varchar(10) , @con varchar(10))
returns varchar(8000)
as
begin
  declare @str varchar(8000)
  set @str = ''
  select @str = @str + ',' + cast(OP as varchar) + '(' 
                           + cast(sc as varchar) + ')' 
  from tb where id = @id and @pr = pr and @con = con
  set @str = right(@str , len(@str) - 1)
  return(@str)
End
go

--调用自定义函数得到结果：
select distinct id , pr , con , dbo.f_hb(id,pr,con) as ops from tb

drop table tb
drop function f_hb

/*
结果
id         pr         con        ops               
---------- ---------- ---------- ------------------
001        p          c          差(6),好(2),一般(4)
002        w          e          差(8),好(7),一般(1)

（所影响的行数为 2 行）
*/

----------------------------------------------------
/*如何将一列中所有的值一行显示
数据源
  a
  b
  c
  d
  e
结果
a,b,c,d,e
*/

create table tb(col varchar(20))
insert tb values ('a')
insert tb values ('b')
insert tb values ('c')
insert tb values ('d')
insert tb values ('e')
go

--方法一
declare @sql varchar(1000)
set @sql = ''
select @sql = @sql + t.col + ',' from (select col from tb) as t
set @sql='select result = ''' + @sql + ''''
exec(@sql)
/*
result     
---------- 
a,b,c,d,e,
*/

--方法二
declare @output varchar(8000)
select @output = coalesce(@output + ',' , '') + col from tb
print @output
/*
a,b,c,d,e
*/

drop table tb

[winjay84]

-- 借助一个函数可以完成一条sql

create function fn_merge
	(@id int)
returns varchar(100)
begin
	declare @str varchar(100)
	set @str = ''
	select @str = @str + name + ','
	from table
	where id = @id

	set @str = left(@str,len(@str)-1)
	return @str
	
end

-- 一条SQL查询
select id, fn_merge(id)
from table
group by id

[areswang]

记下。

[tre_sdlpq]

declare @aa varchar(300)

select a.id,@a=@a+b.name from table1 a,table1 b
into #AAA
where a.id=b.id
group by a.id
select * from #AAA

[LYDF4151]

老龟都给你说了,我们怎么活啊!

[xiaoxiangqing]

潇洒老乌龟的方法不错

[pt1314917]

create table trr (id int,name varchar(10))
insert into trr select 1,'tony'
union all select 1,'tom'
union all select 1,'jarry'
union all select 2,'eric'
union all select 2,'jane'
union all select 2,'monic'


create function wspsss(@id int)
returns varchar(1000)
as
begin
declare @sql varchar(1000)
select @sql=isnull(@sql+',','')+name from trr where id=@id
return @sql
end 

select distinct id,dbo.wspsss(id) from trr

[cxmcxm]

2005可创建自定义聚合函数.
然后
select ...from ...group by id
得到结果