proc_+

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

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


SELECT @AS_REN='0'
END
END