急!语句BUG在哪里?

3tzjq 2009-03-03 09:35:50
我要得到物料的类似的流水帐统计结果:
物料 日期 供应商 供应商型号 仓库 初存 入库 发料 退料 退货 报废 调入 调出 拆卸 结存
aa 2005-1-1 S01 S001 D01 100 50 10 0 0 0 0 0 0 140
aa 2005-1-2 S01 S001 D01 140 00 100 0 0 0 0 0 0 40
aa 2005-2-1 S01 S001 D01 40 500 200 0 0 10 0 0 5 325
aa 2005-1-1 S02 S002 D01 0 150 0 0 15 0 25 0 0 160
bb 2006-1-1 S01 S001 D01 100 50 10 0 0 0 0 0 0 140
bb 2006-2-1 S01 S001 D02 0 500 0 0 0 0 0 0 0 500
bb 2006-2-2 S01 S001 D02 500 100 300 0 0 0 0 0 0 300
bb 2006-2-5 S01 S001 D02 300 0 250 0 0 0 0 0 0 50
......
下面是测试环境:


IF EXISTS (SELECT name FROM sysobjects
WHERE name = 'MaterialBase')
DROP Table MaterialBase
GO
IF EXISTS (SELECT name FROM sysobjects
WHERE name = 'Stocks')
DROP Table Stocks
GO
IF EXISTS (SELECT name FROM sysobjects
WHERE name = 'tbm')
DROP Table tbm
GO
IF EXISTS (SELECT name FROM sysobjects
WHERE name = 'tb')
DROP Table tb
GO

IF EXISTS (SELECT name FROM sysobjects
WHERE name = 'trbm')
DROP Table trbm
GO
IF EXISTS (SELECT name FROM sysobjects
WHERE name = 'trb')
DROP Table trb
GO

IF EXISTS (SELECT name FROM sysobjects
WHERE name = 'trbm')
DROP Table trbm
GO
IF EXISTS (SELECT name FROM sysobjects
WHERE name = 'trb')
DROP Table trb
GO

IF EXISTS (SELECT name FROM sysobjects
WHERE name = 'tdbm')
DROP Table tdbm
GO
IF EXISTS (SELECT name FROM sysobjects
WHERE name = 'tdb')
DROP Table tdb
GO

CREATE TABLE MaterialBase(物料 varchar(10),描述 varchar(255))
INSERT MaterialBase SELECT 'aa','Test'
UNION ALL SELECT 'bb','0805,10K,+/-5%'
UNION ALL SELECT 'cc',NULL

CREATE TABLE Stocks(物料 varchar(10),供应商 varchar(15),供应商型号 varchar(50),仓库 varchar(10),结存 int)
INSERT Stocks SELECT 'aa','S01','S001','d01',100
INSERT Stocks SELECT 'aa','S01','S001','d02',50
UNION ALL SELECT 'bb','S02','S0021','d01',80
UNION ALL SELECT 'cc','S02','S0021','d01',50

--明细账单据
CREATE TABLE tbm(单号 varchar(15)PRIMARY KEY,仓库 varchar(10),日期 datetime)

INSERT tbm SELECT 'D01','d01','2005-1-1'
UNION ALL SELECT 'D02','d02','2005-2-2'
UNION ALL SELECT 'D03','d01','2005-2-7'
UNION ALL SELECT 'D04','d01','2005-1-8'
UNION ALL SELECT 'D05','d01','2005-3-8'
UNION ALL SELECT 'D06','d01','2006-2-5'

--明细账数据
CREATE TABLE tb(
ID int IDENTITY PRIMARY KEY,
单号 varchar(15), --单号
物料 varchar(10), --物料编号
供应商 varchar(15),
供应商型号 varchar(50),
数量 int, --交易数量
Flag tinyint) --交易标志,0代表入库,1代表发料,2代表退料,3代表退货,4代表报废,这样可以有效区分退货(-)

INSERT tb SELECT 'D01','aa','S01','S001',50,0
UNION ALL SELECT 'D01','aa','S01','S001',90,0
UNION ALL SELECT 'D01','aa','S01','S001',55 ,1
UNION ALL SELECT 'D02','aa','S01','S001',10,2
UNION ALL SELECT 'D02','aa','S01','S001',5 ,4
UNION ALL SELECT 'D02','aa','S01','S001',200,0
UNION ALL SELECT 'D02','aa','S01','S001',90 ,3
UNION ALL SELECT 'D02','bb','S02','S0021',95 ,0
UNION ALL SELECT 'D03','bb','S02','S0021',65 ,1
UNION ALL SELECT 'D03','bb','S02','S0021',15,0
UNION ALL SELECT 'D03','bb','S02','S0021',20,3
UNION ALL SELECT 'D03','bb','S02','S0021',10,0
UNION ALL SELECT 'D04','cc','S02','S0021',40,0
UNION ALL SELECT 'D05','cc','S02','S0021',25,1
UNION ALL SELECT 'D05','cc','S02','S0021',25,3
UNION ALL SELECT 'D06','cc','S02','S0021',5,2
UNION ALL SELECT 'D06','cc','S02','S0021',3,4

--调拨单据
CREATE TABLE trbm(单号 varchar(15)PRIMARY KEY,调入仓库 varchar(10),调出仓库 varchar(10),日期 datetime)
INSERT trbm SELECT 'T01','d01','d02','2005-2-1'
UNION ALL SELECT 'T02','d01','d02','2006-2-15'

--调拨明细账数据
CREATE TABLE trb(
ID int IDENTITY PRIMARY KEY,
单号 varchar(15), --单号
物料 varchar(10), --物料编号
供应商 varchar(15),
供应商型号 varchar(50),
数量 int) --交易数量

INSERT trb SELECT 'T01','aa','S01','S001',15
UNION ALL SELECT 'T01','bb','S02','S0021',55
UNION ALL SELECT 'T02','aa','S01','S001',5
UNION ALL SELECT 'T02','aa','S021','S0021',10
UNION ALL SELECT 'T02','bb','S01','S001',15
UNION ALL SELECT 'T02','bb','S02','S0021',20

--拆卸单据
CREATE TABLE tdbm(单号 varchar(15)PRIMARY KEY,日期 datetime)
INSERT tdbm SELECT 'PD01','2005-2-1'
UNION ALL SELECT 'PD02','2006-3-10'

--拆卸明细账数据
CREATE TABLE tdb(
ID int IDENTITY PRIMARY KEY,
单号 varchar(15), --单号
物料 varchar(10), --物料编号
仓库 varchar(10), --仓库
拆卸入库 bit, --是否将数据退回到仓库
供应商 varchar(15),
供应商型号 varchar(50),
数量 int) --交易数量

INSERT tdb SELECT 'PD01','aa','d01',0,'S01','S001',8
UNION ALL SELECT 'PD01','aa','d02',1,'S01','S001',18
UNION ALL SELECT 'PD01','bb','d01',1,'S02','S0021',5
...全文
115 17 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
17 条回复
切换为时间正序
请发表友善的回复…
发表回复
claro 2009-03-03
  • 打赏
  • 举报
回复
帮顶
Roc_Lee很辛苦啊。致敬!
Roc_Lee 2009-03-03
  • 打赏
  • 举报
回复
ok了。楼主看看是不是这个
Roc_Lee 2009-03-03
  • 打赏
  • 举报
回复

--查询时间段定义
DECLARE @dt1 smalldatetime,@dt2 smalldatetime
SELECT @dt1='2005-1-1',@dt2='2006-3-10'

--查询
--期初库存年月及计算期初数的开始时间)
DECLARE @dt smalldatetime
SELECT @dt=DATEADD(Day,1-Day(@dt1),@dt1)

--查询期初库存
SELECT
物料=isnull(isnull(isnull(ISNULL(a.物料,b.物料),c.物料),d.物料),e.物料),
日期=ISNULL(b.日期,@dt1),
供应商=isnull(isnull(isnull(ISNULL(a.供应商,b.供应商),c.供应商),d.供应商),e.供应商),
供应商型号=isnull(isnull(isnull(ISNULL(a.供应商型号,b.供应商型号),c.供应商),d.供应商),e.供应商),
仓库=ISNULL(ISNULL(a.仓库,b.仓库),0),
初存=ISNULL(a.结存,0)+ISNULL(b.初存,0) + ISNULL(c.初存,0)+ISNULL(d.初存,0)+ISNULL(e.初存,0) ,
入库=ISNULL(b.[入库],0),
发料=ISNULL(b.[发料],0),
退料=ISNULL(b.[退料],0),
退货=ISNULL(b.[退货],0),
报废=ISNULL(b.[报废],0),
调入=ISNULL(c.[调入],0),
调出=ISNULL(d.[调出],0),
拆卸=ISNULL(e.[拆卸],0),
结存=ISNULL(a.结存,0)+ISNULL(b.初存,0)+ISNULL(b.末存,0)+ISNULL(c.初存,0)+ISNULL(c.末存,0)+ISNULL(d.初存,0)+ISNULL(d.末存,0)+ISNULL(e.初存,0)+ISNULL(e.末存,0)
FROM(SELECT 物料,供应商,供应商型号,仓库,结存 FROM Stocks)a --期初数
-------------------------------------------------
FULL JOIN(
SELECT
td.物料,
tm.日期,
td.供应商,
td.供应商型号,
tm.仓库,
初存=(SELECT SUM(CASE WHEN Flag=0 OR Flag=2 THEN tb.数量 ELSE -tb.数量 END)
FROM tb,tbm WHERE tbm.日期>=@dt AND tbm.日期<MIN(tm.日期) AND tb.单号 = tbm.单号 AND tb.物料=td.物料 And tb.供应商 = td.供应商 And tb.供应商型号 = td.供应商型号),
入库=SUM(CASE WHEN Flag=0 THEN 数量 END),
发料=SUM(CASE WHEN Flag=1 THEN 数量 END),
退料=SUM(CASE WHEN Flag=2 THEN 数量 END),
退货=SUM(CASE WHEN Flag=3 THEN 数量 END),
报废=SUM(CASE WHEN Flag=4 THEN 数量 END),
末存=SUM(CASE WHEN Flag=0 OR Flag=2 THEN 数量 ELSE -数量 END)
FROM tb td,tbm tm
WHERE tm.日期>=@dt1 AND tm.日期<DATEADD(Day,1,@dt2) And tm.单号 = td.单号
GROUP BY tm.日期,td.物料,td.供应商,td.供应商型号,tm.仓库
)b ON a.物料=b.物料 And a.供应商 = b.供应商 And a.供应商型号 = b.供应商型号 And a.仓库 = b.仓库 --0代表入库,1代表发料,2代表退料,3代表退货,4代表报废
-------------------------------------------------
FULL JOIN(
SELECT
td.物料,
tm.日期,
td.供应商,
td.供应商型号,
tm.调入仓库 AS 仓库,
初存=(SELECT SUM(trb.数量)
FROM trb,trbm WHERE trbm.日期>=@dt AND trbm.日期<MIN(tm.日期) AND trb.单号 = trbm.单号 AND trb.物料=td.物料 And trb.供应商 = td.供应商 And trb.供应商型号 = td.供应商型号),
调入=SUM(td.数量),
末存=SUM(td.数量)
FROM trb td,trbm tm
WHERE tm.日期>=@dt1 AND tm.日期<DATEADD(Day,1,@dt2) And tm.单号 = td.单号
GROUP BY tm.日期,td.物料,td.供应商,td.供应商型号,tm.调入仓库
)c ON a.物料=c.物料 And a.供应商 = c.供应商 And a.供应商型号 = c.供应商型号 And a.仓库 = c.仓库
-------------------------------------------------
FULL JOIN(
SELECT
td.物料,
tm.日期,
td.供应商,
td.供应商型号,
tm.调出仓库 AS 仓库,
初存=(SELECT SUM(-trb.数量)
FROM trb,trbm WHERE trbm.日期>=@dt AND trbm.日期<MIN(tm.日期) AND trb.单号 = trbm.单号 AND trb.物料=td.物料 And trb.供应商 = td.供应商 And trb.供应商型号 = td.供应商型号),
调出=SUM(td.数量),
末存=SUM(-td.数量)
FROM trb td,trbm tm
WHERE tm.日期>=@dt1 AND tm.日期<DATEADD(Day,1,@dt2) And tm.单号 = td.单号
GROUP BY tm.日期,td.物料,td.供应商,td.供应商型号,tm.调出仓库
)d ON a.物料=d.物料 And a.供应商 = d.供应商 And a.供应商型号 = d.供应商型号 And a.仓库 = d.仓库
-------------------------------------------------
FULL JOIN(
SELECT
td.物料,
tm.日期,
td.供应商,
td.供应商型号,
td.仓库,
初存=(SELECT SUM(-tdb.数量)
FROM tdb,tdbm WHERE tdbm.日期>=@dt AND tdbm.日期<MIN(tm.日期) AND tdb.单号 = tdbm.单号 AND tdb.物料=td.物料 And tdb.供应商 = td.供应商 And tdb.供应商型号 = td.供应商型号 And tdb.拆卸入库 = 1),
拆卸=SUM(td.数量),
末存=SUM(-td.数量)
FROM tdb td,tdbm tm
WHERE tm.日期>=@dt1 AND tm.日期<DATEADD(Day,1,@dt2) And tm.单号 = td.单号 And td.拆卸入库 = 1
GROUP BY tm.日期,td.物料,td.供应商,td.供应商型号,td.仓库
)e ON a.物料=e.物料 And a.供应商 = e.供应商 And a.供应商型号 = e.供应商型号 And a.仓库 = e.仓库
ORDER BY 物料,供应商,供应商型号


Roc_Lee 2009-03-03
  • 打赏
  • 举报
回复


初存=(SELECT SUM(trb.数量)
FROM trb,trbm WHERE
trb.单号 = trbm.单号
AND trbm.日期>=@dt AND trbm.日期<min(tm.日期)
AND trb.物料=td.物料
And trb.供应商 = td.供应商
And trb.供应商型号 = td.供应商型号),

这里出问题了。
正在研究业务逻辑。晕死了
halo!
htl258_Tony 2009-03-03
  • 打赏
  • 举报
回复
很多人在参与,我帮顶了
Roc_Lee 2009-03-03
  • 打赏
  • 举报
回复
问题出在full join c表那里。还在研究
Roc_Lee 2009-03-03
  • 打赏
  • 举报
回复
原语句有错,聚合或其他 SET 操作消除了空值,修改后能不出错误,不过,明细不是楼主要的。先贴代码。接着改

--查询时间段定义
DECLARE @dt1 smalldatetime,@dt2 smalldatetime
SELECT @dt1='2005-1-1',@dt2='2006-3-10'

--查询
--期初库存年月及计算期初数的开始时间)
DECLARE @dt smalldatetime
SELECT @dt=DATEADD(Day,1-Day(@dt1),@dt1)

--查询期初库存
SELECT
物料=ISNULL(ISNULL(a.物料,b.物料),0),
日期=ISNULL(b.日期,@dt1),
供应商=ISNULL(ISNULL(a.供应商,b.供应商),0),
供应商型号=ISNULL(ISNULL(a.供应商型号,b.供应商型号),0),
仓库=ISNULL(ISNULL(a.仓库,b.仓库),0),
初存=ISNULL(a.结存,0)+ISNULL(b.初存,0) + ISNULL(c.初存,0)+ISNULL(d.初存,0)+ISNULL(e.初存,0) ,
入库=ISNULL(b.[入库],0),
发料=ISNULL(b.[发料],0),
退料=ISNULL(b.[退料],0),
退货=ISNULL(b.[退货],0),
报废=ISNULL(b.[报废],0),
调入=ISNULL(c.[调入],0),
调出=ISNULL(d.[调出],0),
拆卸=ISNULL(e.[拆卸],0),
结存=ISNULL(a.结存,0)+ISNULL(b.初存,0)+ISNULL(b.末存,0)+ISNULL(c.初存,0)+ISNULL(c.末存,0)+ISNULL(d.初存,0)+ISNULL(d.末存,0)+ISNULL(e.初存,0)+ISNULL(e.末存,0)
FROM(SELECT 物料,供应商,供应商型号,仓库,结存 FROM Stocks)a --期初数
-------------------------------------------------
FULL JOIN(
SELECT
td.物料,
tm.日期,
td.供应商,
td.供应商型号,
tm.仓库,
初存=(SELECT SUM(CASE WHEN Flag=0 OR Flag=2 THEN tb.数量 ELSE -tb.数量 END)
FROM tb,tbm WHERE tbm.日期>=@dt AND tbm.日期<MIN(tm.日期) AND tb.单号 = tbm.单号 AND tb.物料=td.物料 And tb.供应商 = td.供应商 And tb.供应商型号 = td.供应商型号),
入库=SUM(CASE WHEN Flag=0 THEN 数量 END),
发料=SUM(CASE WHEN Flag=1 THEN 数量 END),
退料=SUM(CASE WHEN Flag=2 THEN 数量 END),
退货=SUM(CASE WHEN Flag=3 THEN 数量 END),
报废=SUM(CASE WHEN Flag=4 THEN 数量 END),
末存=SUM(CASE WHEN Flag=0 OR Flag=2 THEN 数量 ELSE -数量 END)
FROM tb td,tbm tm
WHERE tm.日期>=@dt1 AND tm.日期<DATEADD(Day,1,@dt2) And tm.单号 = td.单号
GROUP BY tm.日期,td.物料,td.供应商,td.供应商型号,tm.仓库
)b ON a.物料=b.物料 And a.供应商 = b.供应商 And a.供应商型号 = b.供应商型号 And a.仓库 = b.仓库 --0代表入库,1代表发料,2代表退料,3代表退货,4代表报废
-------------------------------------------------
FULL JOIN(
SELECT
td.物料,
tm.日期,
td.供应商,
td.供应商型号,
tm.调入仓库 AS 仓库,
初存=(SELECT SUM(trb.数量)
FROM trb,trbm WHERE trbm.日期>=@dt AND trbm.日期<MIN(tm.日期) AND trb.单号 = trbm.单号 AND trb.物料=td.物料 And trb.供应商 = td.供应商 And trb.供应商型号 = td.供应商型号),
调入=SUM(td.数量),
末存=SUM(td.数量)
FROM trb td,trbm tm
WHERE tm.日期>=@dt1 AND tm.日期<DATEADD(Day,1,@dt2) And tm.单号 = td.单号
GROUP BY tm.日期,td.物料,td.供应商,td.供应商型号,tm.调入仓库
)c ON a.物料=c.物料 And a.供应商 = c.供应商 And a.供应商型号 = c.供应商型号 And a.仓库 = c.仓库
-------------------------------------------------
FULL JOIN(
SELECT
td.物料,
tm.日期,
td.供应商,
td.供应商型号,
tm.调出仓库 AS 仓库,
初存=(SELECT SUM(-trb.数量)
FROM trb,trbm WHERE trbm.日期>=@dt AND trbm.日期<MIN(tm.日期) AND trb.单号 = trbm.单号 AND trb.物料=td.物料 And trb.供应商 = td.供应商 And trb.供应商型号 = td.供应商型号),
调出=SUM(td.数量),
末存=SUM(-td.数量)
FROM trb td,trbm tm
WHERE tm.日期>=@dt1 AND tm.日期<DATEADD(Day,1,@dt2) And tm.单号 = td.单号
GROUP BY tm.日期,td.物料,td.供应商,td.供应商型号,tm.调出仓库
)d ON a.物料=d.物料 And a.供应商 = d.供应商 And a.供应商型号 = d.供应商型号 And a.仓库 = d.仓库
-------------------------------------------------
FULL JOIN(
SELECT
td.物料,
tm.日期,
td.供应商,
td.供应商型号,
td.仓库,
初存=(SELECT SUM(-tdb.数量)
FROM tdb,tdbm WHERE tdbm.日期>=@dt AND tdbm.日期<MIN(tm.日期) AND tdb.单号 = tdbm.单号 AND tdb.物料=td.物料 And tdb.供应商 = td.供应商 And tdb.供应商型号 = td.供应商型号 And tdb.拆卸入库 = 1),
拆卸=SUM(td.数量),
末存=SUM(-td.数量)
FROM tdb td,tdbm tm
WHERE tm.日期>=@dt1 AND tm.日期<DATEADD(Day,1,@dt2) And tm.单号 = td.单号 And td.拆卸入库 = 1
GROUP BY tm.日期,td.物料,td.供应商,td.供应商型号,td.仓库
)e ON a.物料=e.物料 And a.供应商 = e.供应商 And a.供应商型号 = e.供应商型号 And a.仓库 = e.仓库
ORDER BY 物料,供应商,供应商型号

3tzjq 2009-03-03
  • 打赏
  • 举报
回复
如:源代码,UI,库存数据表结构...
Roc_Lee 2009-03-03
  • 打赏
  • 举报
回复
想要什么结果呢?
3tzjq 2009-03-03
  • 打赏
  • 举报
回复
欢迎大家测试并代出问题,解决后我将把整个模块分享给大家.
3tzjq 2009-03-03
  • 打赏
  • 举报
回复
[Quote=引用 2 楼 dawugui 的回复:]
行列转换?
[/Quote]

不是的,是统计不同表的库存出入.用于月结和物料库存流水账.
3tzjq 2009-03-03
  • 打赏
  • 举报
回复
要的不是行列转换,谢谢!
我这段代码是根据老大"邹建"提供的改的.
dawugui 2009-03-03
  • 打赏
  • 举报
回复
七八个表?够累,友情帮顶了.

行列转换参考:


/*
标题:普通行列转换(version 2.0)
作者:爱新觉罗.毓华(十八年风雨,守得冰山雪莲花开)
时间:2008-03-09
地点:广东深圳
说明:普通行列转换(version 1.0)仅针对sql server 2000提供静态和动态写法,version 2.0增加sql server 2005的有关写法。

问题:假设有张学生成绩表(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) 语文,
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')

---------------------------------

/*
问题:在上述结果的基础上加平均分,总分,得到如下结果:
姓名 语文 数学 物理 平均分 总分
---- ---- ---- ---- ------ ----
李四 74 84 94 84.00 252
张三 74 83 93 83.33 250
*/

--SQL SERVER 2000 静态SQL。
select 姓名 姓名,
max(case 课程 when '语文' then 分数 else 0 end) 语文,
max(case 课程 when '数学' then 分数 else 0 end) 数学,
max(case 课程 when '物理' then 分数 else 0 end) 物理,
cast(avg(分数*1.0) as decimal(18,2)) 平均分,
sum(分数) 总分
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 + ' , cast(avg(分数*1.0) as decimal(18,2)) 平均分 , sum(分数) 总分 from tb group by 姓名'
exec(@sql)

--SQL SERVER 2005 静态SQL。
select m.* , n.平均分 , n.总分 from
(select * from (select * from tb) a pivot (max(分数) for 课程 in (语文,数学,物理)) b) m,
(select 姓名 , cast(avg(分数*1.0) as decimal(18,2)) 平均分 , sum(分数) 总分 from tb group by 姓名) n
where m.姓名 = n.姓名

--SQL SERVER 2005 动态SQL。
declare @sql varchar(8000)
select @sql = isnull(@sql + ',' , '') + 课程 from tb group by 课程
exec ('select m.* , n.平均分 , n.总分 from
(select * from (select * from tb) a pivot (max(分数) for 课程 in (' + @sql + ')) b) m ,
(select 姓名 , cast(avg(分数*1.0) as decimal(18,2)) 平均分 , sum(分数) 总分 from tb group by 姓名) n
where m.姓名 = n.姓名')

drop table tb

------------------
------------------

/*
问题:如果上述两表互相换一下:即表结构和数据为:
姓名 语文 数学 物理
张三 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。

--------------------
/*
问题:在上述的结果上加个平均分,总分,得到如下结果:
姓名 课程 分数
---- ------ ------
李四 语文 74.00
李四 数学 84.00
李四 物理 94.00
李四 平均分 84.00
李四 总分 252.00
张三 语文 74.00
张三 数学 83.00
张三 物理 93.00
张三 平均分 83.33
张三 总分 250.00
------------------
*/

select * from
(
select 姓名 as 姓名 , 课程 = '语文' , 分数 = 语文 from tb
union all
select 姓名 as 姓名 , 课程 = '数学' , 分数 = 数学 from tb
union all
select 姓名 as 姓名 , 课程 = '物理' , 分数 = 物理 from tb
union all
select 姓名 as 姓名 , 课程 = '平均分' , 分数 = cast((语文 + 数学 + 物理)*1.0/3 as decimal(18,2)) from tb
union all
select 姓名 as 姓名 , 课程 = '总分' , 分数 = 语文 + 数学 + 物理 from tb
) t
order by 姓名 , case 课程 when '语文' then 1 when '数学' then 2 when '物理' then 3 when '平均分' then 4 when '总分' then 5 end

drop table tb
dawugui 2009-03-03
  • 打赏
  • 举报
回复
行列转换?
3tzjq 2009-03-03
  • 打赏
  • 举报
回复

现在调试出来的结果有空行(调入,调出部分有问题),初存和结存不正确.

SQL:


--查询时间段定义
DECLARE @dt1 smalldatetime,@dt2 smalldatetime
SELECT @dt1='2005-1-1',@dt2='2006-3-10'

--查询
--期初库存年月及计算期初数的开始时间)
DECLARE @dt smalldatetime
SELECT @dt=DATEADD(Day,1-Day(@dt1),@dt1)

--查询期初库存
SELECT
物料=ISNULL(a.物料,b.物料),
日期=ISNULL(b.日期,@dt1),
供应商=ISNULL(a.供应商,b.供应商),
供应商型号=ISNULL(a.供应商型号,b.供应商型号),
仓库=ISNULL(a.仓库,b.仓库),
初存=ISNULL(a.结存,0)+ISNULL(b.初存,0) + ISNULL(c.初存,0)+ISNULL(d.初存,0)+ISNULL(e.初存,0) ,
入库=ISNULL(b.[入库],0),
发料=ISNULL(b.[发料],0),
退料=ISNULL(b.[退料],0),
退货=ISNULL(b.[退货],0),
报废=ISNULL(b.[报废],0),
调入=ISNULL(c.[调入],0),
调出=ISNULL(d.[调出],0),
拆卸=ISNULL(e.[拆卸],0),
结存=ISNULL(a.结存,0)+ISNULL(b.初存,0)+ISNULL(b.末存,0)+ISNULL(c.初存,0)+ISNULL(c.末存,0)+ISNULL(d.初存,0)+ISNULL(d.末存,0)+ISNULL(e.初存,0)+ISNULL(e.末存,0)
FROM(SELECT 物料,供应商,供应商型号,仓库,结存 FROM Stocks)a --期初数
-------------------------------------------------
FULL JOIN(
SELECT
td.物料,
tm.日期,
td.供应商,
td.供应商型号,
tm.仓库,
初存=(SELECT SUM(CASE WHEN Flag=0 OR Flag=2 THEN tb.数量 ELSE -tb.数量 END)
FROM tb,tbm WHERE tbm.日期>=@dt AND tbm.日期<MIN(tm.日期) AND tb.单号 = tbm.单号 AND tb.物料=td.物料 And tb.供应商 = td.供应商 And tb.供应商型号 = td.供应商型号),
入库=SUM(CASE WHEN Flag=0 THEN 数量 END),
发料=SUM(CASE WHEN Flag=1 THEN 数量 END),
退料=SUM(CASE WHEN Flag=2 THEN 数量 END),
退货=SUM(CASE WHEN Flag=3 THEN 数量 END),
报废=SUM(CASE WHEN Flag=4 THEN 数量 END),
末存=SUM(CASE WHEN Flag=0 OR Flag=2 THEN 数量 ELSE -数量 END)
FROM tb td,tbm tm
WHERE tm.日期>=@dt1 AND tm.日期<DATEADD(Day,1,@dt2) And tm.单号 = td.单号
GROUP BY tm.日期,td.物料,td.供应商,td.供应商型号,tm.仓库
)b ON a.物料=b.物料 And a.供应商 = b.供应商 And a.供应商型号 = b.供应商型号 And a.仓库 = b.仓库 --0代表入库,1代表发料,2代表退料,3代表退货,4代表报废
-------------------------------------------------
FULL JOIN(
SELECT
td.物料,
tm.日期,
td.供应商,
td.供应商型号,
tm.调入仓库 AS 仓库,
初存=(SELECT SUM(trb.数量)
FROM trb,trbm WHERE trbm.日期>=@dt AND trbm.日期<MIN(tm.日期) AND trb.单号 = trbm.单号 AND trb.物料=td.物料 And trb.供应商 = td.供应商 And trb.供应商型号 = td.供应商型号),
调入=SUM(td.数量),
末存=SUM(td.数量)
FROM trb td,trbm tm
WHERE tm.日期>=@dt1 AND tm.日期<DATEADD(Day,1,@dt2) And tm.单号 = td.单号
GROUP BY tm.日期,td.物料,td.供应商,td.供应商型号,tm.调入仓库
)c ON a.物料=c.物料 And a.供应商 = c.供应商 And a.供应商型号 = c.供应商型号 And a.仓库 = c.仓库
-------------------------------------------------
FULL JOIN(
SELECT
td.物料,
tm.日期,
td.供应商,
td.供应商型号,
tm.调出仓库 AS 仓库,
初存=(SELECT SUM(-trb.数量)
FROM trb,trbm WHERE trbm.日期>=@dt AND trbm.日期<MIN(tm.日期) AND trb.单号 = trbm.单号 AND trb.物料=td.物料 And trb.供应商 = td.供应商 And trb.供应商型号 = td.供应商型号),
调出=SUM(td.数量),
末存=SUM(-td.数量)
FROM trb td,trbm tm
WHERE tm.日期>=@dt1 AND tm.日期<DATEADD(Day,1,@dt2) And tm.单号 = td.单号
GROUP BY tm.日期,td.物料,td.供应商,td.供应商型号,tm.调出仓库
)d ON a.物料=d.物料 And a.供应商 = d.供应商 And a.供应商型号 = d.供应商型号 And a.仓库 = d.仓库
-------------------------------------------------
FULL JOIN(
SELECT
td.物料,
tm.日期,
td.供应商,
td.供应商型号,
td.仓库,
初存=(SELECT SUM(-tdb.数量)
FROM tdb,tdbm WHERE tdbm.日期>=@dt AND tdbm.日期<MIN(tm.日期) AND tdb.单号 = tdbm.单号 AND tdb.物料=td.物料 And tdb.供应商 = td.供应商 And tdb.供应商型号 = td.供应商型号 And tdb.拆卸入库 = 1),
拆卸=SUM(td.数量),
末存=SUM(-td.数量)
FROM tdb td,tdbm tm
WHERE tm.日期>=@dt1 AND tm.日期<DATEADD(Day,1,@dt2) And tm.单号 = td.单号 And td.拆卸入库 = 1
GROUP BY tm.日期,td.物料,td.供应商,td.供应商型号,td.仓库
)e ON a.物料=e.物料 And a.供应商 = e.供应商 And a.供应商型号 = e.供应商型号 And a.仓库 = e.仓库
ORDER BY 物料,供应商,供应商型号


3tzjq 2009-03-03
  • 打赏
  • 举报
回复
还是不正确----相同日期的统计有重复项!
初结应等于上一日期的结存.
结存应等于: 本次初存 + 入库 – 发料 + 退料 – 退货 – 报废 + 调入 – 调出 + 拆卸
所有结果应像下面:
2005-01-08 S02 S0021 d01 50 40 0 0 0 0 0 0 0 90
2005-03-08 S02 S0021 d01 90 0 25 0 25 0 0 0 0 40
2006-02-05 S02 S0021 d01 40 0 0 5 0 3 0 0 0 42
2006-02-08 S02 S0021 d01 42 0 50 0 0 0 0 0 5 97
2006-02-10 S02 S0021 d01 97 40 10 0 0 0 0 0 0 127
2006-02-15 S02 S0021 d01 127 10 0 20 0 0 0 5 0 102
3tzjq 2009-03-03
  • 打赏
  • 举报
回复
[Quote=引用 14 楼 Roc_Lee 的回复:]
ok了。楼主看看是不是这个
[/Quote]

谢谢!我去试试
这是一款结合白盒跟黑盒的半自动化代码安全审计系统。 该版本只支持PHP,近期会加上ASPX、ASP、JSP的代码审计功能,并且实现4套规则的配置,另外还会加上自定义审计的扩展名,方便灵活审计不同脚本代码。 由于一直都比较忙,所有写的时候比较,有很多代码还有很大的优化空间,在以后的日子我会慢慢来优化,也欢迎大家一起来优化。 修改本源码请保留最终版权Seay。 BUG反馈+规则共享+插件共享,请发送到邮箱root@cnseay.com,我会集成在下一个版本。 历史版本: 2013年7月15日 Seay源代码审计系统2.0 1.增加mysql执行监控,可以监控自定义断点后执行的所有SQL语句,方便调试SQL注入 2.更换在线升级,安装好之后下次更新可以直接在线升级,无需重新安装 3.更换皮肤,去除图片优化程序速度 4.更换mysql管理系统为HeidiSql 2013年6月18日 Seay源代码审计系统1.1 1.审计规则禁用 2.审计进度显示 3.优化正则调试、编码转换输入框 4.优化信息泄露插件扫描模式 5.修复代码查看处的一个bug 2013年6月8日 Seay源代码审计系统1.0 开发新功能: 1.高精确度自动白盒审计 2.代码高亮 3.函数查询 4.代码调试 5.函数/变量定位 6.审计报告 7.自定义规则 8.自定义编辑器 9.mysql数据库管理 10.黑盒敏感信息泄露一键审计 11.正则调试 12.多种字符编码转换 13.临时记录(可保存) 14.编辑保存文件 15.自动升级检测 16.POST数据包提交 17.自定义插件扩展功能 18.英汉互译
Seay源代码审计系统v2.0源码 源码描述: 这是一款结合白盒跟黑盒的半自动化代码安全审计系统。 该版本只支持PHP,近期会加上ASPX、ASP、JSP的代码审计功能,并且实现4套规则的配置,另外还会加上自定义审计的扩展名,方便灵活审计不同脚本代码。 由于一直都比较忙,所有写的时候比较,有很多代码还有很大的优化空间,在以后的日子我会慢慢来优化,也欢迎大家一起来优化。 修改本源码请保留最终版权Seay。 BUG反馈+规则共享+插件共享,请发送到邮箱root@cnseay.com,我会集成在下一个版本。 历史版本: 2013年7月15日 Seay源代码审计系统2.0 1.增加mysql执行监控,可以监控自定义断点后执行的所有SQL语句,方便调试SQL注入 2.更换在线升级,安装好之后下次更新可以直接在线升级,无需重新安装 3.更换皮肤,去除图片优化程序速度 4.更换mysql管理系统为HeidiSql 2013年6月18日 Seay源代码审计系统1.1 1.审计规则禁用 2.审计进度显示 3.优化正则调试、编码转换输入框 4.优化信息泄露插件扫描模式 5.修复代码查看处的一个bug 2013年6月8日 Seay源代码审计系统1.0 开发新功能: 1.高精确度自动白盒审计 2.代码高亮 3.函数查询 4.代码调试 5.函数/变量定位 6.审计报告 7.自定义规则 8.自定义编辑器 9.mysql数据库管理 10.黑盒敏感信息泄露一键审计 11.正则调试 12.多种字符编码转换 13.临时记录(可保存) 14.编辑保存文件 15.自动升级检测 16.POST数据包提交 17.自定义插件扩展功能 18.英汉互译

22,300

社区成员

发帖
与我相关
我的任务
社区描述
MS-SQL Server 疑难问题
社区管理员
  • 疑难问题社区
  • 尘觉
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧