Alter proc procInsertIntoZhuanZou
            @BianHao varchar(20),
            @Biaozhuen varchar(10),
            @DiMian varchar(100),
            @WaterRoom varchar(100),
            @DoorWindow varchar(100),
            @OutJiang varchar(100),
            @InJiang varchar(100),
            @TianPeng varchar(100),
            @ChuFang varchar(100),
            @TelGuang varchar(100),
            @TVGuang varchar(100),
            @MeiQiGuang varchar(100),
            @BeiZhu varchar(100), 
            @OldBianHao varchar(20),
            @Way varchar(4),
            @Ellect varchar(20) output
As
       Declare @a int
if @Way='添加'
      Begin
           --查找是否有相同的記錄
           Select @a=count(*) from ZhuangXuo where 編號=@BianHao
                    if @a=0   -- 表明沒有相同的記錄
                              --添加
                              Begin
                              Insert into ZhuangXuo(編號,裝修標準,地面,衛生間,門窗,外墻,內墻,天棚,廚房,電話管線,電視管線,煤氣管線,備注)values(@BianHao,@Biaozhuen,@DiMian,@WaterRoom,@DoorWindow,@OutJiang,@InJiang,@TianPeng,@ChuFang,@TelGuang,@TVGuang,@MeiQiGuang,@BeiZhu)
                              Select @Ellect='添加成功'
                              End

                    if @a<>0
                              Select @Ellect='當前記錄已有' 
            
      End

if @Way='刪除'
      Begin
           Select @a=count(*) from ZhuangXuo where 編號=@BianHao
                    if @a<>0   -- 表明沒有相同的記錄
                              --添加
                              Begin
                              Delete from ZhuangXuo where 編號=@BianHao
                              Select @Ellect='刪除成功'
                              End

                    if @a=0
                              Select @Ellect='沒有當前記錄' 
                 
      End

if @Way='修改'
      Begin
                   if @BianHao<>@OldBianHao   --修改了編號 
                             Begin 
                                     --先查找是否存在修改后的數據
                                     Select @a=count(*) from ZhuangXuo where 編號=@BianHao
                                               if @a=0 --沒有當前記錄
                                                       --修改
                                                       Begin 
                                                       Update ZhuangXuo set 編號=@BianHao,裝修標準=@Biaozhuen,地面=@DiMian,衛生間=@WaterRoom,門窗=@DoorWindow,外墻=@OutJiang,內墻=@InJiang,天棚=@TianPeng,廚房=@ChuFang,電話管線=@TelGuang,電視管線=@TVGuang,煤氣管線=@MeiQiGuang,備注=@BeiZhu where 編號=@OldBianHao
                                                       Select @Ellect='修改成功'
                                                       End 
                                               
                                               if @a<>0
                                                       Select @Ellect='這個編號已有'

                             End

                   if @BianHao=@OldBianHao   --沒有修改編號 
                             Begin 
                              Update ZhuangXuo set 裝修標準=@Biaozhuen,地面=@DiMian,衛生間=@WaterRoom,門窗=@DoorWindow,外墻=@OutJiang,內墻=@InJiang,天棚=@TianPeng,廚房=@ChuFang,電話管線=@TelGuang,電視管線=@TVGuang,煤氣管線=@MeiQiGuang,備注=@BeiZhu where 編號=@BianHao
                              Select @Ellect='修改成功'
                             End
 
      End  
Go