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時在交叉表縱向最下邊加縱向合計asdeclare @s nvarchar(4000),@sql varchar(8000)
--判斷橫向字段是否大於縱向字段數目,如果是,則交換縱橫欄位set @s='declare @a sysnameif(select case when count(distinct ['+@縱軸+'])--生成交叉表處理語句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
生成交叉表的簡單通用儲存過程
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 生成交叉表的簡單通用儲存過程 根...
生成交叉表的簡單通用儲存過程
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 生成交叉表的簡單通用儲存過程 根...
生成交叉表的簡單通用儲存過程
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 生成交叉表的簡單通用儲存過程 根...