update 表b set 表b.备注=t.备注
from 表b inner join (
SELECT 出货日期,
  STUFF((SELECT ',' + cast(实际编号 as varchar) AS [text()] --此处STUFF函数的目的是除去字符串首部的逗号
        FROM 表a AS G2 
        WHERE G2.出货日期 = G1.出货日期
        ORDER BY 实际编号
        FOR XML PATH('')), 1, 1, '') AS 备注
FROM 表a AS G1
GROUP BY 出货日期) as t on 表b.出货日期=t.出货日期

--各种字符串分函数

--3.3.1 使用游标法进行字符串合并处理的示例。
--处理的数据
CREATE TABLE tb(col1 varchar(10),col2 int)
INSERT tb SELECT 'a',1
UNION ALL SELECT 'a',2
UNION ALL SELECT 'b',1
UNION ALL SELECT 'b',2
UNION ALL SELECT 'b',3

--合并处理
--定义结果集表变量
DECLARE @t TABLE(col1 varchar(10),col2 varchar(100))

--定义游标并进行合并处理
DECLARE tb CURSOR LOCAL
FOR
SELECT col1,col2 FROM tb ORDER BY  col1,col2
DECLARE @col1_old varchar(10),@col1 varchar(10),@col2 int,@s varchar(100)
OPEN tb
FETCH tb INTO @col1,@col2
SELECT @col1_old=@col1,@s=''
WHILE @@FETCH_STATUS=0
BEGIN
    IF @col1=@col1_old
        SELECT @s=@s+','+CAST(@col2 as varchar)
    ELSE
    BEGIN
        INSERT @t VALUES(@col1_old,STUFF(@s,1,1,''))
        SELECT @s=','+CAST(@col2 as varchar),@col1_old=@col1
    END
    FETCH tb INTO @col1,@col2
END
INSERT @t VALUES(@col1_old,STUFF(@s,1,1,''))
CLOSE tb
DEALLOCATE tb
--显示结果并删除测试数据
SELECT * FROM @t
DROP TABLE tb
/*--结果
col1       col2
---------- -----------
a          1,2
b          1,2,3
--*/
GO


/*==============================================*/


--3.3.2 使用用户定义函数，配合SELECT处理完成字符串合并处理的示例
--处理的数据
CREATE TABLE tb(col1 varchar(10),col2 int)
INSERT tb SELECT 'a',1
UNION ALL SELECT 'a',2
UNION ALL SELECT 'b',1
UNION ALL SELECT 'b',2
UNION ALL SELECT 'b',3
GO

--合并处理函数
CREATE FUNCTION dbo.f_str(@col1 varchar(10))
RETURNS varchar(100)
AS
BEGIN
    DECLARE @re varchar(100)
    SET @re=''
    SELECT @re=@re+','+CAST(col2 as varchar)
    FROM tb
    WHERE col1=@col1
    RETURN(STUFF(@re,1,1,''))
END
GO

--调用函数
SELECT col1,col2=dbo.f_str(col1) FROM tb GROUP BY col1
--删除测试
DROP TABLE tb
DROP FUNCTION f_str
/*--结果
col1       col2
---------- -----------
a          1,2
b          1,2,3
--*/
GO

/*==============================================*/


--3.3.3 使用临时表实现字符串合并处理的示例
--处理的数据
CREATE TABLE tb(col1 varchar(10),col2 int)
INSERT tb SELECT 'a',1
UNION ALL SELECT 'a',2
UNION ALL SELECT 'b',1
UNION ALL SELECT 'b',2
UNION ALL SELECT 'b',3

--合并处理
SELECT col1,col2=CAST(col2 as varchar(100)) 
INTO #t FROM tb
ORDER BY col1,col2
DECLARE @col1 varchar(10),@col2 varchar(100)
UPDATE #t SET 
    @col2=CASE WHEN @col1=col1 THEN @col2+','+col2 ELSE col2 END,
    @col1=col1,
    col2=@col2
SELECT * FROM #t
/*--更新处理后的临时表
col1       col2
---------- -------------
a          1
a          1,2
b          1
b          1,2
b          1,2,3
--*/
--得到最终结果
SELECT col1,col2=MAX(col2) FROM #t GROUP BY col1
/*--结果
col1       col2
---------- -----------
a          1,2
b          1,2,3
--*/
--删除测试
DROP TABLE tb,#t
GO


/*==============================================*/

--3.3.4.1 每组 <=2 条记录的合并
--处理的数据
CREATE TABLE tb(col1 varchar(10),col2 int)
INSERT tb SELECT 'a',1
UNION ALL SELECT 'a',2
UNION ALL SELECT 'b',1
UNION ALL SELECT 'b',2
UNION ALL SELECT 'c',3

--合并处理
SELECT col1,
    col2=CAST(MIN(col2) as varchar)
        +CASE 
            WHEN COUNT(*)=1 THEN ''
            ELSE ','+CAST(MAX(col2) as varchar)
        END
FROM tb
GROUP BY col1
DROP TABLE tb
/*--结果
col1       col2      
---------- ----------
a          1,2
b          1,2
c          3
--*/

--3.3.4.2 每组 <=3 条记录的合并
--处理的数据
CREATE TABLE tb(col1 varchar(10),col2 int)
INSERT tb SELECT 'a',1
UNION ALL SELECT 'a',2
UNION ALL SELECT 'b',1
UNION ALL SELECT 'b',2
UNION ALL SELECT 'b',3
UNION ALL SELECT 'c',3

--合并处理
SELECT col1,
    col2=CAST(MIN(col2) as varchar)
        +CASE 
            WHEN COUNT(*)=3 THEN ','
                +CAST((SELECT col2 FROM tb WHERE col1=a.col1 AND col2 NOT IN(MAX(a.col2),MIN(a.col2))) as varchar)
            ELSE ''
        END
        +CASE 
            WHEN COUNT(*)>=2 THEN ','+CAST(MAX(col2) as varchar)
            ELSE ''
        END
FROM tb a
GROUP BY col1
DROP TABLE tb
/*--结果
col1       col2
---------- ------------
a          1,2
b          1,2,3
c          3
--*/
GO

如果是2000，注意每个日期的编号数目，这里最大为4个
update 表b set 表b.备注=t.备注
from 表b inner join (
SELECT 出货日期,
    MAX(CASE WHEN rn = 1 THEN cast(实际编号 as varchar) ELSE '' END)
  + MAX(CASE WHEN rn = 2 THEN ',' + cast(实际编号 as varchar) ELSE '' END)
  + MAX(CASE WHEN rn = 3 THEN ',' + cast(实际编号 as varchar) ELSE '' END)
  + MAX(CASE WHEN rn = 4 THEN ',' + cast(实际编号 as varchar) ELSE '' END) AS 备注
FROM (SELECT a,实际编号,
        (SELECT COUNT(*)
        FROM 表a AS B
        WHERE B.出货日期 = A.出货日期
          AND B.实际编号 <= A.实际编号) AS rn
      FROM 表a AS A) AS D
GROUP BY 出货日期) as t on 表b.出货日期=t.出货日期

create table ta(出货日期 datetime,实际编号 varchar(10))
insert into ta values('2008-1-14','1')
insert into ta values('2008-1-14','2')
insert into ta values('2008-1-15','3')
create table tb(出货日期 datetime,备注 varchar(8000))
insert into tb values('2008-1-14',null)
insert into tb values('2008-1-15',null)

create FUNCTION dbo.f_str(@col1 varchar(10))
RETURNS varchar(100)
AS
BEGIN
    DECLARE @re varchar(100)
    SET @re=''
    SELECT @re=@re+','+CAST(实际编号 as varchar)
    FROM ta
    WHERE 出货日期=@col1
    RETURN(STUFF(@re,1,1,''))
END

update tb set 备注=b.实际编号 from tb a,(select 出货日期,dbo.f_str(出货日期) as 实际编号 from ta group by 出货日期)b where a.出货日期=b.出货日期 

select * from tb

--环境
create table a
(
出货日期 datetime,
实际编号 int
)

create table b
(
出货日期 datetime,
备注 varchar(20)
)

insert into a select '2008-1-14',           1 
insert into a select '2008-1-14',           2 
insert into a select '2008-1-15',           3 

insert into b select '2008-1-14',       null 
insert into b select '2008-1-15',       null

--建立辅助函数
create function f_conn(@出货日期 datetime)
returns varchar(20)
as
begin
    declare @str varchar(20)
    set @str = ''
    select @str = @str + ',' + cast(实际编号 as varchar) from a 
    where 出货日期 = @出货日期

    select @str = stuff(@str,1,1,'')
    return (@str)
end

--更新
update b set 备注 = beizhu
from 
(select distinct 出货日期,dbo.f_conn(出货日期) as beizhu from a)a
where a.出货日期 = b.出货日期

--查询结果
select * from b

/*
出货日期                    备注
----------------------- --------------------
2008-01-14 00:00:00.000 1,2
2008-01-15 00:00:00.000 3

(2 row(s) affected)
*/

--删除环境
drop table a
drop table b
drop function f_conn