sql 行列转换

问题：假设有张学生成绩表(tb)如下:
姓名 课程 分数
张三 语文 74
张三 数学 83
张三 物理 93
李四 语文 74
李四 数学 84
李四 物理 94
想变成(得到如下结果)：
姓名 语文 数学 物理
---- ---- ---- ----
李四 74   84   94
张三 74   83   93
-------------------
*/

create table tb(姓名 varchar ( 10 ) , 课程 varchar ( 10 ) , 分数 int )
insert into tb values ( ' 张三 ' , ' 语文 ' , 74 )
insert into tb values ( ' 张三 ' , ' 数学 ' , 83 )
insert into tb values ( ' 张三 ' , ' 物理 ' , 93 )
insert into tb values ( ' 李四 ' , ' 语文 ' , 74 )
insert into tb values ( ' 李四 ' , ' 数学 ' , 84 )
insert into tb values ( ' 李四 ' , ' 物理 ' , 94 )
go

-- SQL SERVER 2000 静态SQL,指课程只有语文、数学、物理这三门课程。(以下同)
select 姓名 as 姓名 ,
  max ( case 课程 when ' 语文 ' then 分数 else 0 end ) 语文,  -- 掌握case用法
  max ( case 课程 when ' 数学 ' then 分数 else 0 end ) 数学,
  max ( case 课程 when ' 物理 ' then 分数 else 0 end ) 物理
from tb
group by 姓名

-- SQL SERVER 2000 动态SQL,指课程不止语文、数学、物理这三门课程。(以下同)
declare @sql varchar ( 8000 )
set @sql = ' select 姓名 '
select @sql = @sql + ' , max(case 课程 when ''' + 课程 + ''' then 分数 else 0 end) [ ' + 课程 + ' ] '
from ( select distinct 课程 from tb) as a
set @sql = @sql + ' from tb group by 姓名 '
exec ( @sql )

-- SQL SERVER 2005 静态SQL。
select * from ( select * from tb) a pivot ( max (分数) for 课程 in (语文,数学,物理)) b

-- SQL SERVER 2005 动态SQL。
declare @sql varchar ( 8000 )
select @sql = isnull ( @sql + ' ],[ ' , '' ) + 课程 from tb group by 课程
set @sql = ' [ ' + @sql + ' ] '
exec ( ' select * from (select * from tb) a pivot (max(分数) for 课程 in ( ' + @sql + ' )) b ' )

-- SAS  transpose 转置 。
proc transpose data= tb ut= tb2 ;
   id 课程;
   var  分数;
   by 姓名;
run;
-- -------------------------------
/*
问题：如果上述两表互相换一下：即表结构和数据为：
姓名 语文 数学 物理
张三 74　　83　　93
李四 74　　84　　94
想变成(得到如下结果)：
姓名 课程 分数
---- ---- ----
李四 语文 74
李四 数学 84
李四 物理 94
张三 语文 74
张三 数学 83
张三 物理 93
--------------
*/

create table tb(姓名 varchar ( 10 ) , 语文 int , 数学 int , 物理 int )
insert into tb values ( ' 张三 ' , 74 , 83 , 93 )
insert into tb values ( ' 李四 ' , 74 , 84 , 94 )
go

-- SQL SERVER 2000 静态SQL。
select * from
(
select 姓名 , 课程 = ' 语文 ' , 分数 = 语文 from tb
union all
select 姓名 , 课程 = ' 数学 ' , 分数 = 数学 from tb
union all
select 姓名 , 课程 = ' 物理 ' , 分数 = 物理 from tb
) t
order by 姓名 , case 课程 when ' 语文 ' then 1 when ' 数学 ' then 2 when ' 物理 ' then 3 end

-- SQL SERVER 2000 动态SQL。
-- 调用系统表动态生态。
declare @sql varchar ( 8000 )
select @sql = isnull ( @sql + ' union all ' , '' ) + ' select 姓名 , [课程] = ' + quotename (Name , '''' ) + ' , [分数] = ' + quotename (Name) + ' from tb '
from syscolumns
where name! = N ' 姓名 ' and ID = object_id ( ' tb ' ) -- 表名tb，不包含列名为姓名的其它列
order by colid asc
exec ( @sql + ' order by 姓名 ' )

-- SQL SERVER 2005 静态 SQL。
select 姓名 , 课程 , 分数 from tb unpivot (分数 for 课程 in ( [ 语文 ] , [ 数学 ] , [ 物理 ] )) t

-- SQL SERVER 2005 动态SQL，同SQL SERVER 2000 动态SQL。

-- SAS  transpose 转置 。
proc transpose data= tb ut= tb2 name= 课程 ;
   var  语文 , 数学 , 物理 ;
   by 姓名;
run;

来自 “ ITPUB博客 ” ，链接：http://blog.itpub.net/7399830/viewspace-701371/，如需转载，请注明出处，否则将追究法律责任。

转载于:http://blog.itpub.net/7399830/viewspace-701371/