xss_delete.sql

vbsql做的销售管理课程设计样本不完全仅为范例

USE cpxs
GO
IF EXISTS(SELECT name FROM sysobjects 
WHERE xtype= 'P' AND name ='xss_delete')
DROP PROCEDURE xss_delete
GO
CREATE PROCEDURE xss_delete
(@xsbh0 char(6),@flag int output)
AS
BEGIN
   SET @flag=1
 IF EXISTS(SELECT * FROM xss
          WHERE xsbh=@xsbh0)
 DELETE xss 
   WHERE xsbh=@xsbh0
 ELSE
   SET @flag=0
END
RETURN