procinsertintokehu.sql

来自「扬州升瑞售楼系统2000扬州升瑞售楼系统2000扬州升瑞售楼系统2000扬州升瑞」· SQL 代码 · 共 48 行

Alter proc procInsertIntoKeHu
            @Name varchar(20),
            @SheFenZhen varchar(18),
            @Tel  varchar(20),
            @TelShou varchar(20),
            @DanWei varchar(50),
            @Adder varchar(50),
            @YouBian varchar(6),
            @TelDanWei varchar(20),
            @YeWuYuan varchar(20),

            @OldName varchar(20),
            @Way varchar(4),
            @Ellect varchar(20) output
As
  Declare @a int         
if @Way='添加'
   Begin
        --先查找是否有相同的记录
        Select @a=count(*) from KeHuMember where 姓名=@Name
            if @a=0 --表示没有当前客户
            Begin
            --添加新的客户
            Insert into KehuMember(姓名,身份证,电话号码,手机号码,联系地址,邮编,单位,单位电话,业务员) values(@Name,@SheFenZhen,@Tel,@TelShou,@Adder,@YouBian,@DanWei,@TelDanWei,@YeWuYuan)
            Select @Ellect='添加成功'
            End

            if @a<>0 
            Select @Ellect='当前客户已有'

   End

if @Way='修改'
   Begin
            update KehuMember set 姓名=@Name,身份证=@SheFenZhen,电话号码=@Tel,手机号码=@TelShou,联系地址=@Adder,邮编=@YouBian,单位=@DanWei,单位电话=@TelDanWei,业务员=@YeWuYuan where 姓名=@OldName
            Select @Ellect='修改成功'
   End

if @Way='删除'
   Begin
           Delete from KeHuMember where 姓名=@name
           Select @Ellect='删除成功'
   End 
Go