proc_+Ԧ

本系统为企业进存销管理系统

if exists(select name from sysobjects where name='proc_库存转移' and type ='p')
drop proc proc_库存转移
GO
create proc proc_库存转移

@物料编码 VARCHAR(30),
@从货位 VARCHAR(10),
@到货位 VARCHAR(10),
@从仓库  VARCHAR(10),
@到仓库  VARCHAR(10),
@批号 VARCHAR(15),
@数量 NUMERIC,
@as_ren CHAR(1) OUTPUT--'0'--->成功;'1'--->从货位和从仓库不存在;'2'--->到货位和到仓库不存在;
AS
BEGIN
DECLARE @li_count integer
select @li_count=count(*) from 物料与货位对照表 WHERE 物料编码=@物料编码 AND 货位编码=@从货位 AND 仓库编码=@从仓库
if isnull(@li_count,0)=0
begin
select @as_ren='1'
return
end
select @li_count=count(*) from 物料与货位对照表 WHERE 物料编码=@物料编码 AND  货位编码=@到货位 and 仓库编码=@到仓库
if isnull(@li_count,0)=0
begin
select @as_ren='2'
return
end
select @li_count=count(*) from 物料与货位对照表 WHERE 物料编码=@物料编码 AND  货位编码=@到货位 and 仓库编码=@到仓库
if isnull(@li_count,0)>0
begin
update 物料与货位对照表 set 货位存量=货位存量-@数量  WHERE  物料编码=@物料编码 AND 货位编码=@从货位 AND 仓库编码=@从仓库
update 物料与货位对照表 set 货位存量=货位存量+@数量  WHERE  物料编码=@物料编码 AND 货位编码=@到货位 AND 仓库编码=@到仓库
select @as_ren='0'
END 
END