库存明细帐处理示例

时　间:2018-06-07 23:45:06
作　者:萤火虫   ID：66752  城市：大理
摘　要:库存明细帐处理示例，sql 2005运行正常
正　文:

Create TABLE tb(
ID int PRIMARY KEY identity(1,1),
Item varchar(10),  --产品编号
Quantity int,      --交易数量
Flag bit,          --交易标志,1代表入库,0代表出库,这样可以有效区分退货(负数)
Date datetime)     --交易日期
insert into tb values ('aa',100,1,'2005-1-1')
insert into tb values ('aa',90 ,1,'2005-2-1')
insert into tb values ('aa',55 ,0,'2005-2-1')
insert into tb values ('aa',-10,1,'2005-2-2')
insert into tb values ('aa',-5 ,0,'2005-2-3')
insert into tb values ('aa',200,1,'2005-2-2')
insert into tb values ('aa',90 ,1,'2005-2-1')
insert into tb values ('bb',95 ,1,'2005-2-2')
insert into tb values ('bb',65 ,0,'2005-2-3')
insert into tb values ('bb',-15,1,'2005-2-5')
insert into tb values ('bb',-20,0,'2005-2-5')
insert into tb values ('bb',100,1,'2005-2-7')
insert into tb values ('cc',100,1,'2005-1-7')


--查询时间段定义
DECLARE @dt1 datetime,@dt2 datetime
Select @dt1='2005-2-1',@dt2='2005-2-10'


--查询
--统计时间段内无发生额的数据(如果这个不是查询需要的,去掉这段查询)
Select Item,
Date=CONVERT(char(10),@dt1,120),
Opening=SUM(CASE WHEN Flag=1 THEN Quantity ELSE -Quantity END),
[IN]=0,
[IN_Retrun]=0,
[OUT]=0,
[OUT_Return]=0,
Balance=SUM(CASE WHEN Flag=1 THEN Quantity ELSE -Quantity END)
FROM tb a
Where Date<@dt1 AND NOT EXISTS(
Select * FROM tb Where Item=a.Item AND Date>@dt1 AND Date<DATEADD(Day,1,@dt2))
GROUP BY Item
UNION ALL
--指定时间段内有交易发生的数据
Select Item,
Date=CONVERT(char(10),Date,120),
Opening=ISNULL((Select SUM(CASE WHEN Flag=1 THEN Quantity ELSE -Quantity END)
FROM tb Where Item=a.Item AND Date<MIN(a.Date)),0),
[IN]=ISNULL(SUM(CASE WHEN Flag=1 AND Quantity>0 THEN Quantity END),0),
[IN_Retrun]=ISNULL(SUM(CASE WHEN Flag=1 AND Quantity<0 THEN -Quantity END),0),
[OUT]=ISNULL(SUM(CASE WHEN Flag=0 AND Quantity>0 THEN Quantity END),0),
[OUT_Return]=ISNULL(SUM(CASE WHEN Flag=0 AND Quantity<0 THEN -Quantity END),0),
Balance=ISNULL((Select SUM(CASE WHEN Flag=1 THEN Quantity ELSE -Quantity END)
FROM tb Where Item=a.Item AND Date<=MAX(a.Date)),0)
FROM tb a
Where Date>=@dt1 AND Date<DATEADD(Day,1,@dt2)
GROUP BY CONVERT(char(10),Date,120),Item
orDER BY Item,Date
/*--结果
Item    Date       Opening    IN     IN_Retrun   OUT   OUT_Return   Balance 
---------- ---------------- -------------- ----------- ---------------- ----------- ------------------- ----------- 
aa     2005-02-01   100      180     0           55      0            225
aa     2005-02-02   225      200     10          0       0            415
aa     2005-02-03   415      0       0           0       5            420
bb     2005-02-02   0        95      0           0       0            95
bb     2005-02-03   95       0       0           65      0            30
bb     2005-02-05   30       0       15          0       20           35
bb     2005-02-07   35       100     0           0       0            135
cc     2005-02-01   100       0      0           0       0            100
--*/


Access软件网官方交流QQ群 (群号:54525238) 　　　　　　Access源码网店