cp_update.sql

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

USE cpxs
GO
IF EXISTS(SELECT name FROM sysobjects 
WHERE xtype= 'P' AND name ='cp_update')
DROP PROCEDURE cp_update
GO
CREATE PROCEDURE cp_update
(@cpbh0 char(6),@cpmc0 char(12),@jg0 real,@kcl0 int,@flag int output)
AS
BEGIN
   SET @flag=1
 IF EXISTS(SELECT * FROM cp
          WHERE cpbh=@cpbh0)
  UPDATE cp 
   SET cpmc=@cpmc0,jg=@jg0,kcl=@kcl0
  WHERE cpbh=@cpbh0
 ELSE
   SET @flag=0
END
RETURN