生成交叉表的简单通用存储过程

原创 2004年06月25日 08:41:00

if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[p_qry]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
drop procedure [dbo].[p_qry]
GO

/*--生成交叉表的简单通用存储过程
 
 根据指定的表名,纵横字段,统计字段,自动生成交叉表
 并可根据需要生成纵横两个方向的合计

 注意,横向字段数目如果大于纵向字段数目,将自动交换纵横字段
 如果不要此功能,则去掉交换处理部分

--邹建 204.06(引用请保留此信息)--*/

/*--调用示例

 exec p_qry 'syscolumns','id','colid','colid',1,1
--*/

create proc p_qry
@TableName sysname, --表名
@纵轴 sysname,  --交叉表最左面的列
@横轴 sysname,  --交叉表最上面的列
@表体内容 sysname, --交叉表的数数据字段
@是否加横向合计 bit,--为1时在交叉表横向最右边加横向合计
@是否家纵向合计 bit --为1时在交叉表纵向最下边加纵向合计
as
declare @s nvarchar(4000),@sql varchar(8000)

--判断横向字段是否大于纵向字段数目,如果是,则交换纵横字段
set @s='declare @a sysname
if(select case when count(distinct ['+@纵轴+'])from ['+@TableName+'])=1
 select @a=@纵轴,@纵轴=@横轴,@横轴=@a'
exec sp_executesql @s
 ,N'@纵轴 sysname out,@横轴 sysname out'
 ,@纵轴 out,@横轴 out

--生成交叉表处理语句
set @s='
set @s=''''
select @s=@s+'',[''+cast(['+@横轴+'] as varchar)+'']=sum(case ['+@横轴
 +'] when ''''''+cast(['+@横轴+'] as varchar)+'''''' then ['+@表体内容+'] else 0 end)''
from ['+@TableName+']
group by ['+@横轴+']'
exec sp_executesql @s
 ,N'@s varchar(8000) out'
 ,@sql out

--是否生成合计字段的处理
declare @sum1 varchar(200),@sum2 varchar(200),@sum3 varchar(200)
select @sum1=case @是否加横向合计
  when 1 then ',[合计]=sum(['+@表体内容+'])'
  else '' end
 ,@sum2=case @是否家纵向合计
  when 1 then '['+@纵轴+']=case grouping(['
   +@纵轴+']) when 1 then ''合计'' else cast(['
   +@纵轴+'] as varchar) end'
  else '['+@纵轴+']' end
 ,@sum3=case @是否家纵向合计
  when 1 then ' with rollup'
  else '' end

--生成交叉表
exec('select '+@sum2+@sql+@sum1+'
from ['+@TableName+']
group by ['+@纵轴+']'+@sum3)
go

 

SQL存储过程实现SPSS交叉表(有图有真相)

SP代码: /****** Object: StoredProcedure [dbo].[Pro_CrossTable] Script Date: 03/27/2014 20:46:38 ...

交叉表 存储过程 实例

  • 2009年07月10日 16:48
  • 5KB
  • 下载

存储过程02-简单通用分页

create PROCEDURE [dbo].[GetPageDataOutRowNumber] ( @tn nvarchar(30),--表名称 @idn nvarchar(20),--表主键...
  • vfush
  • vfush
  • 2014年10月24日 18:25
  • 594

存储过程-简单通用分页

create PROCEDURE [dbo].[GetPageDataOutRowNumber] ( @tn nvarchar(30),--表名称 @idn nvarchar(20),--表主键名称 ...

mysql 查询拓展 触发器 交叉表 存储过程

SHOW TRIGGERS; DROP TRIGGER insertUser DROP TRIGGER deleteUser; DROP TRIGGER updateUser;CREATE TRIGG...

sql server交叉表存储过程

/*   假设有张学生成绩表(tb)如下: Name Subject Result 张三 语文  74 张三 数学  83 张三 物理  93 李四 语文  ...
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:生成交叉表的简单通用存储过程
举报原因:
原因补充:

(最多只允许输入30个字)