procinsertintodonghao.sql

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

Alter Proc procInsertIntoDongHao
            @XiaoQuName varchar(20),
            @DongHao varchar(10),
            @LeiAllNum varchar(10),
            @LeiUpNum varchar(10),
            @LeiDownNum varchar(20),
            @UserNumEveryLei varchar(10),
            @GongEllect varchar(10),
            @YuAllow varchar(20),
            @YuAllowCode varchar(20),
            @JiaoFangDate datetime,

             
            @OldXiaoQuName varchar(20),
            @OldDongHao varchar(10),
            
            @Way varchar(4),
            @Ellect varchar(20) output
As

     Declare @a int
     Declare @b int
     Declare @c int
if @Way='添加'
     Begin
              --查找是否有相同的记录
              Select @a=count(*) from DongHao where 小区名称=@XiaoQuName and 幢号=@DongHao
                     if @a=0   --没有存在当前要加入的数据
                            Begin
                               --加入新的数据
                                                      select @b=count(*) from XiaoQu where 小区名称=@XiaoQuName
                                                      if @b=0 --没有这个小区
                                                      Select @Ellect='不存在你输入的小区！'
                                                      if @b<>0 --存在小区                         
                                                      Begin  
                                                                 --查找是否有土地编号存在
                                                                 Select @c=count(*) from TuDiShiYong where 土地编号=@LeiDownNum
                                                                          if @c=0  --没有存在当前的土地编号
                                                                          Select @Ellect='不存在的土地编号！'
                                                                          if @c<>0
                                                                          Begin 
                                                                              Insert into DongHao(小区名称,幢号,楼层数,地上层数,土地编号,每层户数,完工状态,预售批准机关,预售许可证,交房日期)values(@XiaoQuName,@DongHao,@LeiAllNum,@LeiUpNum,@LeiDownNum,@UserNumEveryLei,@GongEllect,@YuAllow,@YuAllowCode,@JiaoFangDate)
                                                                              Select @Ellect='添加成功'
                                                                          End
                                                      End
                            End


    
                     if @a<>0  --存在当前要加入的数据
                           Select @Ellect='本小区的幢号已有'      
     End


if @Way='删除'
     Begin
             Select @a=count(*) from DongHao where 小区名称=@XiaoQuName and 幢号=@DongHao
                     if @a=0  --没有当前的幢号存在
                         Select @Ellect='不存在当前幢号'
                     if @a<>0 --存在当前记录

                         Begin
                         begin tran 
                         Delete From DongHao where 小区名称=@XiaoQuName and 幢号=@DongHao
                         Delete from ShiHao where 小区名称=@XiaoQuName and 幢号=@DongHao
                         Select @Ellect='删除成功' 
                         commit tran
                         End

     End


if @Way='修改'
     Begin
                          
                     if @XiaoQuName<>@OldXiaoQuName or @DongHao<>@OldDongHao         --修改了 小区名称 或是幢号
                               Begin     
                               --查找是否有相同记录
                               Select @a=count(*) from DongHao where 小区名称=@XiaoQuName and 幢号=@DongHao                               
                                           if @a=0  --没有相同记录 修改
                                            Begin
                                                     select @b=count(*) from XiaoQu where 小区名称=@XiaoQuName
                                                      if @b=0 --没有这个小区
                                                      Select @Ellect='不存在你输入的小区！'
                                                      if @b<>0 --存在小区                         
                                                      Begin  
                                                                          Select @c=count(*) from TuDiShiYong where 土地编号=@LeiDownNum
                                                                          if @c=0  --没有存在当前的土地编号
                                                                          Select @Ellect='不存在的土地编号！'
                                                                          if @c<>0
                                                                          Begin 
                                                                                begin tran
                                                                                Update DongHao set 小区名称=@XiaoQuName,幢号=@DongHao,楼层数=@LeiAllNum,地上层数=@LeiUpNum,土地编号=@LeiDownNum,每层户数=@UserNumEveryLei,完工状态=@GongEllect,预售批准机关=@YuAllow,预售许可证=@YuAllowCode,交房日期=@JiaoFangDate where 小区名称=@OldXiaoQuName and 幢号=@OldDongHao
                                                                                Update ShiHao set 小区名称=@XiaoQuName,幢号=@DongHao where 小区名称=@OldXiaoQuName and 幢号=@OldDongHao
                                                                                Select @Ellect='修改成功' 
                                                                                Commit tran
                                                                          End
                                                      End
                                            End
                                          if @a<>0 --有相同记录
                                            Select @Ellect='幢号已有'
                               End  

                      if @XiaoQuName=@OldXiaoQuName and @DongHao=@OldDongHao       --没有修改 小区名称 或是幢号
                                            Begin
                                                      select @b=count(*) from XiaoQu where 小区名称=@XiaoQuName
                                                      if @b=0 --没有这个小区
                                                      Select @Ellect='不存在你输入的小区！'
                                                      if @b<>0 --存在小区                         
                                                      Begin  
                                                                          Select @c=count(*) from TuDiShiYong where 土地编号=@LeiDownNum
                                                                          if @c=0  --没有存在当前的土地编号
                                                                          Select @Ellect='不存在的土地编号！'
                                                                          if @c<>0
                                                                          Begin 
                                                                                  Update DongHao set 小区名称=@XiaoQuName,幢号=@DongHao,楼层数=@LeiAllNum,地上层数=@LeiUpNum,土地编号=@LeiDownNum,每层户数=@UserNumEveryLei,完工状态=@GongEllect,预售批准机关=@YuAllow,预售许可证=@YuAllowCode,交房日期=@JiaoFangDate where 小区名称=@OldXiaoQuName and 幢号=@OldDongHao
                                                                                  Select @Ellect='修改成功' 
                                                                          End
                                                      End
                                            End
     End

Go