求一SQL2000下SQL语句

Question

表中数据如下商品  销售单位  当前进价  销售日期  备注
手机  第一百货  100       2011-4-25 卖的不错
手机  第二百货  101       2011-4-26 卖的一般
电脑  第一百货  102       2011-4-27 卖的不好
手机  第一百货  108       2011-4-28 没卖
电脑  第一百货  105       2011-4-29 无货业务逻辑是：根据商品分组，选取某商品日期最大值的记录（也就是离当前日期最近的日子），罗列出商品名称，销售单位（有多个单位就拼接字符串），当前进价，销售日期，备注想得到的表
商品  销售单位            当前进价  销售日期  备注
手机  第一百货，第二百货  108       2011-4-28 没卖
电脑  第一百货            105       2011-4-29 无货希望大虾们帮忙，谢谢。

Answer 1

参考如下的例自己写个.
/*
标题：按某字段合并字符串之一(简单合并)
作者：爱新觉罗.毓华(十八年风雨,守得冰山雪莲花开)
时间：2008-11-06
地点：广东深圳描述：将如下形式的数据按id字段合并value字段。
id    value
----- ------
1     aa
1     bb
2     aaa
2     bbb
2     ccc
需要得到结果：
id     value
------ -----------
1      aa,bb
2      aaa,bbb,ccc
即：group by id, 求 value 的和（字符串相加）
*/
--1、sql2000中只能用自定义的函数解决
create table tb(id int, value varchar(10))
insert into tb values(1, 'aa')
insert into tb values(1, 'bb')
insert into tb values(2, 'aaa')
insert into tb values(2, 'bbb')
insert into tb values(2, 'ccc')
gocreate function dbo.f_str(@id varchar(10)) returns varchar(1000)
as
begin
  declare @str varchar(1000)
  select @str = isnull(@str + ',' , '') + cast(value as varchar) from tb where id = @id
  return @str
end
go--调用函数
select id , value = dbo.f_str(id) from tb group by iddrop function dbo.f_str
drop table tb
--2、sql2005中的方法
create table tb(id int, value varchar(10))
insert into tb values(1, 'aa')
insert into tb values(1, 'bb')
insert into tb values(2, 'aaa')
insert into tb values(2, 'bbb')
insert into tb values(2, 'ccc')
goselect id, [value] = stuff((select ',' + [value] from tb t where id = tb.id for xml path('')) , 1 , 1 , '')
from tb
group by iddrop table tb
--3、使用游标合并数据
create table tb(id int, value varchar(10))
insert into tb values(1, 'aa')
insert into tb values(1, 'bb')
insert into tb values(2, 'aaa')
insert into tb values(2, 'bbb')
insert into tb values(2, 'ccc')
go
declare @t table(id int,value varchar(100))--定义结果集表变量
--定义游标并进行合并处理
declare my_cursor cursor local for
select id , value from tb
declare @id_old int , @id int , @value varchar(10) , @s varchar(100)
open my_cursor
fetch my_cursor into @id , @value
select @id_old = @id , @s=''
while @@FETCH_STATUS = 0
begin
    if @id = @id_old
       select @s = @s + ',' + cast(@value as varchar)
    else
      begin
        insert @t values(@id_old , stuff(@s,1,1,''))
        select @s = ',' + cast(@value as varchar) , @id_old = @id
      end
    fetch my_cursor into @id , @value
END
insert @t values(@id_old , stuff(@s,1,1,''))
close my_cursor
deallocate my_cursorselect * from @t
drop table tb

Answer 2

select * from tb t where not exists (select 1 from tb where 商品 = t.商品 and 销售日期 <  t.销售日期)

Answer 3

create function getstr(@str varchar(20))
returns varchar(2000)
asbegin
     declare @strs varchar(2000)
     set @strs=''
     select @strs=','+@strs+销售单位 from tb
            where 商品=@str group by 销售单位
     return stuff(@strs,1,1,'')
endselect 商品,销售单位=dbo.getstr(商品),
      当前进价,销售日期,备注
from tb a where not exists(select 1 from tb where 商品=b.商品 and 销售日期>a.销售日期)

Answer 4

SQL SERVER 2000的话，只能用自定义函数。

Answer 5

create function getstr(@str varchar(20))
returns varchar(2000)
asbegin
     declare @strs varchar(2000)
     set @strs=''
     select @strs=','+@strs+销售单位 from tb
            where 商品=@str group by 销售单位
     return stuff(@strs,1,1,'')
endselect 商品,销售单位=dbo.getstr(商品),
      当前进价,销售日期,备注
from tb a where not exists(select 1 from tb where 商品=a.商品 and 销售日期>a.销售日期)

Answer 6

create function dbo.f_max(@商品 varchar(100)) returns varchar(1000)
as
begin
declare @sql varchar(100)
set @sql=''
select @sql=@sql+销售单位+',' from tb where 商品=@商品
set @sql=left(@sql,len(@sql)-1)
return @sql
end
select 商品,销售单位=dbo.f_max(商品),当前进价,销售日期,备注 from tb 
where not exists (select 1 from tb a where a.商品=tb.商品 and a.销售日期>tb.销售日期)

Answer 7

create function dbo.f_max(@商品 varchar(100)) returns varchar(1000)
as
begin
declare @sql varchar(100)
set @sql=''
select @sql=@sql+销售单位+',' from (select distinct 商品,销售单位 from tb) ta where 商品=@商品
set @sql=left(@sql,len(@sql)-1)
return @sql
end
select 商品,销售单位=dbo.f_max(商品),当前进价,销售日期,备注 from tb 
where not exists (select 1 from tb a where a.商品=tb.商品 and a.销售日期>tb.销售日期)