請高手幫忙

[谢良]

本人有兩個有關CrossTab（在PB中）的問題，請高手幫忙
　　1:如何得到動態CrossTab中的Columns.
2:動態CrossTab中有關Sort 的問題，在CrossTab的報表上要用某一 Column 進行Sort，但不用看到也不要在報表上出顯此Column 。請高手指點！！

例：類別　　排序碼　名稱　　　　　2005/01 　2005/02 　2005/03 ......2005/12 　合計
　　工資　　　10　　營--工資　　　　1000　　　1100　　　1200
　　　　　　　 10　　管--工資　　　　 1200 1250 1300
修理費　　20　　營--修理費　　　2000　　　3000　　　4000
　　　　　　　 20 管--修理費 4000 4500 6000

　　想要的結果:
　　類別　　　名稱　　　　　2005/01 　2005/02 　2005/03 ......2005/12 　合計
　　工資　　　 營--工資　　　　1000　　　1100　　　1200
　　　　　　　 管--工資　　　　 1200 1250 1300
修理費　 營--修理費　　　2000　　　3000　　　4000
　　　　　　　 管--修理費 4000 4500 6000

　　如果不用排序碼進行排序結果是（不想要的）：
　　類別　　　名稱　　　　　2005/01 　2005/02 　2005/03 ......2005/12 　合計
修理費　 營--修理費　　　2000　　　3000　　　4000
　　　　　　　 管--修理費 4000 4500 6000
　　工資　　　 營--工資　　　　1000　　　1100　　　1200
　　　　　　　 管--工資　　　　 1200 1250 1300
　　本人試過在SQL上進行Sort 對CrossTab不起作用。

[冷箫轻笛]

1.应该有以前的帖子，你可以搜索一下，可以实现
2.就不清楚了，以前做的都是把排序码直接加在名称上
例：類別　　　名稱　　　　　2005/01 　2005/02 　2005/03 ......2005/12 　合計
　　工資　　　10營--工資　　　　1000　　　1100　　　1200
　　　　　　　10管--工資　　　　 1200 1250 1300
修理費　　20營--修理費　　　2000　　　3000　　　4000
　　　　　　　20管--修理費 4000 4500 6000

另：你可以用SQL语句先进行查询，直接实现交叉表的效果，然后用一般的数据窗口就可以
附：邹老大的一段代码
-------------------------------------------------
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

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

根据指定的表名,纵横字段,统计字段,自动生成交叉表
并可根据需要生成纵横两个方向的合计

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

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

/*--调用示例

exec p_qry 'syscolumns','id','colid','colid','name like ''s%''',1,1
--*/

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

--规范条件
set @条件=case when @条件<>'' then ' where ('+@条件+')' else '' end

--判断横向字段是否大于纵向字段数目,如果是,则交换纵横字段
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+']
'+@条件+'
group by ['+@纵轴+']'+@sum3)
go
-------------------------------------------------

• 打赏
• 举报

回复 赞

[谢良]

把排序码直接加在名称上或是加在類別上，得出的排序順序是對的，但報表的要求就是不要看到排序碼。

• 打赏
• 举报

回复 赞

[谢良]

請對CrossTab有高深研究的高手出手，謝謝了。

• 打赏
• 举报

回复 赞