procinsertintoxiaoqu.sql

扬州升瑞售楼系统2000扬州升瑞售楼系统2000扬州升瑞售楼系统2000扬州升瑞售楼系统2000扬州升瑞售楼系统2000

Alter proc procInsertIntoXiaoQu
       @XiaoQuName varchar(20),
       @QuYu varchar(50),
       @Adder varchar(50),
       @Text varchar(8000),
       @OldXiaoQuName varchar(20), 
       @Way varchar(10),--Way=添加，删除，修改
       @BackWord varchar(12) Output
       --功能：对小区的添加，删除，修改
As

Declare @CountNum  int,@CountNumOne int
select @Backword='wrong'
       
        
if rtrim(@Way)='添加'  --对小区的新数据的添加
   Begin
        --查找有没有相同名称的小区存在
        select @CountNum=count(*) from XiaoQu where 小区名称=@XiaoQuName
               if @CountNum=0  --没有相同的名称存在，可以加入
                      begin
                      insert into XiaoQu(小区名称,区域,地址,简介) values(@XiaoQuName,@QuYu,@Adder,@Text)
                      Select @BackWord='添加成功'   
                      end
                if @CountNum<>0  --有相同的名称
                      Select @BackWord='小区已存在'
   End

if rtrim(@Way)='删除'  --对小区的删除
   Begin
        select @CountNum=count(*) from XiaoQu where 小区名称=@XiaoQuName
               if @CountNum=0  --没有这个小区
                     Begin
                     Select @BackWord='小区不存在'
                     End    
               if @CountNum<>0 --有小区
                     Begin
                     begin tran
                     delete from XiaoQu where 小区名称=@XiaoQuName
                     --同时也删除本小区的别的表中的数据

  
                     delete from TuDiShiYong where  小区名称=@XiaoQuName
                     delete from FangXing where  小区名称=@XiaoQuName
                     delete from DongHao where  小区名称=@XiaoQuName
                     delete from ShiHao where  小区名称=@XiaoQuName
                     delete from CarRoom where  小区名称=@XiaoQuName

                     commit tran
                     Select @BackWord='删除成功'
                     End 
   End     

if rtrim(@Way)='修改' --对小区的修改
   Begin
          

           Select @CountNum=count(*) from XiaoQu where 小区名称=@OldXiaoQuName
               if @CountNum=0  --没有这个小区
                     Begin
                     Select @BackWord='小区不存在'
                     End
               if @CountNum<>0 --有小区
                     Begin
                                  if @OldXiaoQuName<>@XiaoQuName       --修改了小区名称 
                                              Begin
                                                 Select @CountNumOne=count(*) from XiaoQu where 小区名称=@XiaoQuName
                                                 if @CountNumOne=1 
                                                 Select @BackWord='小区已有'                                             
                                                 if @countNumOne=0          
                                                            Begin   
                                                            
                                                            begin tran
                                                            Update XiaoQu set 小区名称=@XiaoQuName,区域=@QuYu,地址=@Adder,简介=@Text where 小区名称=@OldXiaoQuName
                                                            Update TuDiShiYong set 小区名称=@XiaoQuName where 小区名称=@OldXiaoQuName
                                                            Update FangXing set 小区名称=@XiaoQuName where 小区名称=@OldXiaoQuName
                                                            Update DongHao set 小区名称=@XiaoQuName where 小区名称=@OldXiaoQuName
                                                            Update ShiHao set 小区名称=@XiaoQuName where 小区名称=@OldXiaoQuName
                                                            Update CarRoom set 小区名称=@XiaoQuName where 小区名称=@OldXiaoQuName

                                                            Select @BackWord='修改成功'
                                                            commit tran

                                                            End  
                                              End


                                  if @OldXiaoQuName=@XiaoQuName       --修改了小区名称 
                                              Begin 
                                                            update XiaoQu set 小区名称=@XiaoQuName,区域=@QuYu,地址=@Adder,简介=@Text where 小区名称=@OldXiaoQuName
                                                            Select @BackWord='修改成功'
                                                   
                                              End
                      End
   End
--修改了小区名称后，相对的别的表中的小区名称,也要同时修改
Go