proc_

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

IF EXISTS (SELECT NAME FROM SYSOBJECTS WHERE NAME='PROC_改变采购单行状态' AND TYPE='P')
DROP PROC PROC_改变采购单行状态
GO
CREATE PROC PROC_改变采购单行状态
@PO INT,
@源行状态 CHAR(1),
@到行状态 CHAR(1),
@AS_REN CHAR(1) OUTPUT---'0'-->成功;'1'---源行状态不存在;'2'---目标行状态存在;
AS
BEGIN
DECLARE @LI_COUNT INTEGER
SELECT @LI_COUNT=COUNT(*) FROM 采购订单明细表 WHERE 状态=@源行状态 AND 采购单号=@PO
IF ISNULL(@LI_COUNT,0)=0
BEGIN
SELECT @AS_REN='1'
RETURN
END
SELECT @LI_COUNT=COUNT(*) FROM 采购订单明细表 WHERE 状态=@到行状态  AND 采购单号=@PO
IF ISNULL(@LI_COUNT,0)>0
BEGIN
SELECT @AS_REN='2'
RETURN
END
SELECT @LI_COUNT=COUNT(*) FROM 采购订单明细表 WHERE 状态=@到行状态  AND 采购单号=@PO
IF ISNULL(@LI_COUNT,0)=0
BEGIN
UPDATE  采购订单明细表 SET 状态=@到行状态  WHERE 状态=@源行状态  AND 采购单号=@PO
SELECT @AS_REN='0'
END
END