dbo.TSB_ZUNSAccountBInUNSGroupB2

1     create   procedure TSB_ZUNSAccountBInUNSGroupB2 (@SlotNumber int) AS begin declare @DBQueueCurrent_A QBM_YDBQueueCurrent declare @Anzahl_Current
2 int declare @DBQueueCurrent_G QBM_YDBQueueCurrent declare @Anzahl_GroupContainsUserList int declare @DBQueueCurrent_U QBM_YDBQueueCurrent declare @Anzahl_UserContainsGroupList
3 int = 0 declare @CountDeltaQantity int declare @CountDeltaOrigin int SET XACT_ABORT OFF BEGIN TRY insert into @DBQueueCurrent_A(UID_DialogDBQueue, UID_Parameter
4, UID_SubParameter, GenProcID) select UID_DialogDBQueue, UID_Parameter, UID_SubParameter, GenProcID from QBMDBQueueCurrent cu with (readpast) where cu.SlotNumber
5 = @SlotNumber select @Anzahl_Current = @@ROWCOUNT if @Anzahl_Current = 0 begin goto EndLabel end insert into @DBQueueCurrent_G(UID_DialogDBQueue, UID_Parameter
6, UID_SubParameter, GenProcID) select UID_DialogDBQueue, UID_Parameter, UID_SubParameter, GenProcID from @DBQueueCurrent_A cu join UNSAccountB u on cu.UID_Parameter
7 = u.UID_UNSAccountB join UNSRootB r on u.UID_UNSRootB = r.UID_UNSRootB where r.UserContainsGroupList & 0x04 = 0 and r.GroupUsageMask 
8& 0x04 > 0 select @Anzahl_GroupContainsUserList = @@rowcount if @Anzahl_GroupContainsUserList < @Anzahl_Current begin  insert into @DBQueueCurrent_U
9(UID_DialogDBQueue, UID_Parameter, UID_SubParameter, GenProcID) select UID_DialogDBQueue, UID_Parameter, UID_SubParameter, GenProcID from @DBQueueCurrent_A
10 cu join UNSAccountB u on cu.UID_Parameter = u.UID_UNSAccountB join UNSRootB r on u.UID_UNSRootB = r.UID_UNSRootB where r.UserContainsGroupList & 0x04
11 > 0 and r.GroupUsageMask & 0x04 > 0 select @Anzahl_UserContainsGroupList = @@rowcount end  if @Anzahl_GroupContainsUserList > 0 begin
12 exec TSB_PUNSAccountBInUNSGroupB2_K @DBQueueCurrent_G , @Slotnumber , @UserHasGroupList = 0 , @CountDeltaQantity = @CountDeltaQantity output , @CountDeltaOrigin
13 = @CountDeltaOrigin output  if @CountDeltaOrigin > 0 begin exec QBM_PMNTableOriginUpdate 'UNSAccountBInUNSGroupB2', 'UID_UNSAccountB', 'UID_UNSGroupB2'
14 end if @CountDeltaQantity > 0 begin exec QBM_PMNTableInsert 'UNSAccountBInUNSGroupB2', 'UID_UNSAccountB', 'UID_UNSGroupB2', @TargetIsView = 0 , @FKTableNameElement
15 = 'UNSAccountB' , @FKColumnNameElement = 'UID_UNSAccountB' end end  if @Anzahl_UserContainsGroupList > 0 begin exec TSB_PUNSAccountBInUNSGroupB2_K @DBQueueCurrent_U
16 , @Slotnumber , @UserHasGroupList = 1 , @CountDeltaQantity = @CountDeltaQantity output , @CountDeltaOrigin = @CountDeltaOrigin output  if @CountDeltaOrigin
17 > 0 begin exec QBM_PMNTableOriginUpdate 'UNSAccountBHasUNSGroupB2', 'UID_UNSAccountB', 'UID_UNSGroupB2' end if @CountDeltaQantity > 0 begin exec QBM_PMNTableInsert
18 'UNSAccountBHasUNSGroupB2', 'UID_UNSAccountB', 'UID_UNSGroupB2', @TargetIsView = 0 , @FKTableNameElement = 'UNSGroupB2' , @FKColumnNameElement =
19 'UID_UNSGroupB2' end end  END TRY BEGIN CATCH exec QBM_PSessionErrorAdd default RAISERROR ('', 18, 1) WITH NOWAIT END CATCH endLabel: end 
20