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
--查询时间段定义
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 物料,供应商,供应商型号
/*
标题：普通行列转换(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
--查询时间段定义
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 物料,供应商,供应商型号
初存=(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.供应商型号),
--查询时间段定义
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 物料,供应商,供应商型号
