CREATE
proc
p_qry
@TableName
sysname,
--
表名
@纵轴
sysname,
--
交叉表最左面的列
@横轴
sysname,
--
交叉表最上面的列
@表体内容
sysname,
--
交叉表的数数据字段
@是否加横向合计
bit
,
--
为1时在交叉表横向最右边加横向合计
@是否家纵向合计
bit
,
--
为1时在交叉表纵向最下边加纵向合计
@where
varchar
(
400
)
--
查询where条件
as
declare
@s
nvarchar
(
4000
),
@sql
varchar
(
8000
)
--
判断横向字段是否大于纵向字段数目,如果是,则交换纵横字段
set
@s
=
'
declare @a sysname if(select case when count(distinct [
'
+
@纵轴
+
'
])<count(distinct [
'
+
@横轴
+
'
]) then 1 else 0 end 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
+
'
] where
'
+
@where
+
'
group by [
'
+
@纵轴
+
'
]
'
+
@sum3
)
GO
扫一扫
被折叠的 条评论
为什么被折叠?
到【灌水乐园】发言
