一个很复杂SQL存储过程的编写

1. IF EXISTS (SELECT * FROM sysobjects WHERE type = 'P' AND name = 'RoleMenu_ADD')
2.     BEGIN
3.         PRINT 'Dropping Procedure RoleMenu_ADD'
4.         DROP  Procedure  RoleMenu_ADD
5.     END
7. GO
9. PRINT 'Creating Procedure RoleMenu_ADD'
10. GO
12. CREATE Procedure RoleMenu_ADD
13.     /* Param List */
14.     @RoleID int ,
15.     @MenuID varchar(5000) 
16. AS
17. begin
18.     
19.   --declare @RoleID int, @MenuID varchar(5000)
20.   --set @MenuID=',12,13,14,15' 
21.   --set @RoleID=5
22.   create table #allid(allid int)
23.     --select * from #allID
24.   create table #familyTree(theid int)
25.   declare @ids varchar(4000),@str varchar(4000)
26.   set @ids=@MenuID--得到ID字符串
28.   set @str=@ids
29.   set @str=left(@str,len(@str)-1)
30.   set @str = replace(@str, ',', '''a union all select ''')
31.   exec ('insert #Familytree(theid) select '''+@str+'''')
33.   DECLARE @id int,@id2 int,@id3 int
35.   DECLARE mycursor2 CURSOR FOR
36.   select theid from #Familytree
37.        OPEN mycursor2
38.        FETCH NEXT FROM mycursor2
39.        INTO @id
40.        WHILE @@FETCH_STATUS = 0
41.        BEGIN
44.   select @id2=MenuParentId from adminMenu where AMID=@id     
45.   insert #allid(allid) select @id
46. --select * from adminMenu
48.   while @id2>0
49.   begin
50.   insert #allid(allid) select @id2
51.   Select @id3=MenuParentId from adminMenu where AMID = @id2
52.   set @id2=@id3
53.   continue
54.   end 
56.     
57.        FETCH NEXT FROM mycursor2
58.        INTO @id
59.        END
60.        CLOSE mycursor2
61.   DEALLOCATE mycursor2
63.   drop table #FamilyTree
65.   DECLARE @allidstr varchar(4000),@id1 int
66.   set @allidstr=''
67.   DECLARE mycursor1 CURSOR FOR
68.   select distinct(allid) from #allid order by allid
69.        OPEN mycursor1
70.        FETCH NEXT FROM mycursor1
71.        INTO @id1
72.        WHILE @@FETCH_STATUS = 0
73.        BEGIN
75.        set @allidstr=@allidstr+convert(varchar(10),@id1)+','
77.        FETCH NEXT FROM mycursor1
78.        INTO @id1
79.        END
80.        CLOSE mycursor1
81.   DEALLOCATE mycursor1
83.     drop table #allid
84.     
85. create table #table2
86.     (
87.          theID int
88.     )
89.     --select * from #table2
90.     declare @str22 varchar(5000)
91.     set @str22=@allidstr
92.     --set @str=left(@str,len(@str)-1)
93.     set @str22 = replace(@str22, ',', '''a union all select ''')
94.     exec ('insert #table2(theid) select '''+@str22+'''')
95.     
96.     BEGIN TRANSACTION--开始事务
97.     DECLARE @errorSun INT --定义错误计数器
98.     SET @errorSun=0 --没错为0
100.     DECLARE @id111 int
101.     --set @allidstr=''
102.     DECLARE mycursor111 CURSOR FOR
103.         select distinct(theID) from #table2 order by theID
104.         OPEN mycursor111
105.         FETCH NEXT FROM mycursor111
106.         INTO @id111
107.         WHILE @@FETCH_STATUS = 0
108.         BEGIN
110.        --set @allidstr=@allidstr+convert(varchar(10),@id1)+','
111.        insert into roleMenu values(@RoleID,@id111)
112.        SET @errorSun=@errorSun+@@ERROR --累计是否有错
113.        
114.        FETCH NEXT FROM mycursor111
115.        INTO @id111
116.        END
117.        CLOSE mycursor111
118.        DEALLOCATE mycursor111
119.     
120.     IF @errorSun<>0
121.     BEGIN
122.         --PRINT '有错误，回滚'
123.         ROLLBACK TRANSACTION--事务回滚语句
124.     END
125.         ELSE
126.     BEGIN
127.         --PRINT '成功，提交'
128.         COMMIT TRANSACTION--事务提交语句
129.     END
130.     --select * from #table2
131.     drop table #table2
132.     end
133.     
136. GO