• 博客园logo
  • 会员
  • 众包
  • 新闻
  • 博问
  • 闪存
  • 赞助商
  • HarmonyOS
  • Chat2DB
    • 搜索
      所有博客
    • 搜索
      当前博客
  • 写随笔 我的博客 短消息 简洁模式
    用户头像
    我的博客 我的园子 账号设置 会员中心 简洁模式 ... 退出登录
    注册 登录
巴黎一场雨季
博客园    首页    新随笔    联系   管理    订阅  订阅

SQL用先进先出存储过程求出库数量

 1 create table t( 
 2 id int identity(1,1), name varchar(50),--商品名称 
 3 j int,        --入库数量 
 4 c int,        --出库数量 
 5 jdate datetime --入库时间 
 6 ) 
 7 insert into t(name,j,c,jdate) select  'A',100,0,'2007-12-01' 
 8 insert into t(name,j,c,jdate) select  'A',200,0,'2008-01-07' 
 9 insert into t(name,j,c,jdate) select  'B',320,0,'2007-12-21' 
10 insert into t(name,j,c,jdate) select  'A',100,0,'2008-01-15' 
11 insert into t(name,j,c,jdate) select  'B',90,0,'2008-02-03' 
12 insert into t(name,j,c,jdate) select  'A',460,0,'2008-02-01' 
13 insert into t(name,j,c,jdate) select  'A',510,0,'2008-03-01' 
14 go
create proc wsp 
@name varchar(50),--商品名称 
@cost int         --销售量 
as 
--先得出该货物的库存是否够 
declare @spare float --剩余库存 
select @spare=sum(j)-sum(c) from t where name=@name 
if(@spare>=@cost)                         
   begin 
    --根据入库日期采用先进先出原则对货物的库存进行处理  
     update t set c=                                                                                                                      
     case when (select @cost-isnull(sum(j),0)+isnull(sum(c),0) from t where name=@name and jdate<=a.jdate and j!=c)>=0 
     then a.j 
     else                        
        case when (select @cost-isnull(sum(j),0)+isnull(sum(c),0) from t where name=@name and jdate<a.jdate and j!=c)<0 
        then 0 
        else (select @cost-isnull(sum(j),0)+isnull(sum(c),0)+a.c from t where name=@name and jdate<a.jdate and j!=c) 
        end 
     end 
     from t a where name=@name and j!=c 
   end 
else 
    raiserror('库存不足',16,1)    
    return 
go
exec wsp @name='A',@cost=100 

 

.Net程序员
posted @ 2016-10-22 16:38  巴黎一场雨季  阅读(947)  评论(0)    收藏  举报
刷新页面返回顶部
博客园  ©  2004-2025
浙公网安备 33010602011771号 浙ICP备2021040463号-3