dbo.TSB_TUUNSRootB

1create   trigger TSB_TUUNSRootB on UNSRootB  for Update not for Replication as begin  declare @Parameter nvarchar(1000) BEGIN TRY if exists (select
2 top 1 1 from inserted) goto start if exists (select top 1 1 from deleted) goto start return start: declare @GenProcID varchar(38) select @GenProcID = 
3dbo.QBM_FGISessionContext('') if update(UserContainsGroupList) begin  if (exists (select top 1 1 from deleted d join UNSRootB r on d.UID_UNSRootB = r.UID_UNSRootB
4 join UNSAccountB a on a.UID_UNSRootB = r.UID_UNSRootB join UNSGroupB g on a.UID_UNSRootB = r.UID_UNSRootB left outer join UNSAccountBInUNSGroupB uig on
5 a.UID_UNSAccountB = uig.UID_UNSAccountB and g.UID_UNSGroupB = uig.UID_UNSGroupB left outer join UNSAccountBHasUNSGroupB uhg on a.UID_UNSAccountB = uhg.UID_UNSAccountB
6 and g.UID_UNSGroupB = uhg.UID_UNSGroupB where d.UserContainsGroupList & 0x01 <> r.UserContainsGroupList & 0x01 and ( uig.UID_UNSAccountB > ' ' or uhg.UID_UNSAccountB
7 > ' ' ) ) )  or (exists (select top 1 1 from deleted d join UNSRootB r on d.UID_UNSRootB = r.UID_UNSRootB join UNSAccountB a on a.UID_UNSRootB = r.UID_UNSRootB
8 join UNSGroupB1 g on a.UID_UNSRootB = r.UID_UNSRootB left outer join UNSAccountBInUNSGroupB1 uig on a.UID_UNSAccountB = uig.UID_UNSAccountB and g.UID_UNSGroupB1
9 = uig.UID_UNSGroupB1 left outer join UNSAccountBHasUNSGroupB1 uhg on a.UID_UNSAccountB = uhg.UID_UNSAccountB and g.UID_UNSGroupB1 = uhg.UID_UNSGroupB1
10 where d.UserContainsGroupList & 0x02 <> r.UserContainsGroupList & 0x02 and ( uig.UID_UNSAccountB > ' ' or uhg.UID_UNSAccountB > ' ' ) ) ) or (exists (select
11 top 1 1 from deleted d join UNSRootB r on d.UID_UNSRootB = r.UID_UNSRootB join UNSAccountB a on a.UID_UNSRootB = r.UID_UNSRootB join UNSGroupB2 g on a.UID_UNSRootB
12 = r.UID_UNSRootB left outer join UNSAccountBInUNSGroupB2 uig on a.UID_UNSAccountB = uig.UID_UNSAccountB and g.UID_UNSGroupB2 = uig.UID_UNSGroupB2 left
13 outer join UNSAccountBHasUNSGroupB2 uhg on a.UID_UNSAccountB = uhg.UID_UNSAccountB and g.UID_UNSGroupB2 = uhg.UID_UNSGroupB2 where d.UserContainsGroupList
14 & 0x04 <> r.UserContainsGroupList & 0x04 and ( uig.UID_UNSAccountB > ' ' or uhg.UID_UNSAccountB > ' ' ) ) ) or (exists (select top 1 1 from deleted d 
15join UNSRootB r on d.UID_UNSRootB = r.UID_UNSRootB join UNSAccountB a on a.UID_UNSRootB = r.UID_UNSRootB join UNSGroupB3 g on a.UID_UNSRootB = r.UID_UNSRootB
16 left outer join UNSAccountBInUNSGroupB3 uig on a.UID_UNSAccountB = uig.UID_UNSAccountB and g.UID_UNSGroupB3 = uig.UID_UNSGroupB3 left outer join UNSAccountBHasUNSGroupB3
17 uhg on a.UID_UNSAccountB = uhg.UID_UNSAccountB and g.UID_UNSGroupB3 = uhg.UID_UNSGroupB3 where d.UserContainsGroupList & 0x08 <> r.UserContainsGroupList
18 & 0x08 and ( uig.UID_UNSAccountB > ' ' or uhg.UID_UNSAccountB > ' ' ) ) ) begin raiserror('#LDS#Change of {0} not allowed because of existing data.|UserContainsGroupList|'
19, 18, 1) with nowait end end if update(GroupUsageMask) begin if ( (exists (select top 1 1 from deleted d join UNSRootB r on d.UID_UNSRootB = r.UID_UNSRootB
20 join UNSGroupB g on r.UID_UNSRootB = g.UID_UNSRootB where d.GroupUsageMask & 0x01 > 0 and r.GroupUsageMask & 0x01 = 0 ) ) or (exists (select top 1 1 from
21 deleted d join UNSRootB r on d.UID_UNSRootB = r.UID_UNSRootB join UNSGroupB1 g on r.UID_UNSRootB = g.UID_UNSRootB where d.GroupUsageMask & 0x02 > 0 and
22 r.GroupUsageMask & 0x02 = 0 ) ) or (exists (select top 1 1 from deleted d join UNSRootB r on d.UID_UNSRootB = r.UID_UNSRootB join UNSGroupB2 g on r.UID_UNSRootB
23 = g.UID_UNSRootB where d.GroupUsageMask & 0x04 > 0 and r.GroupUsageMask & 0x04 = 0 ) ) or (exists (select top 1 1 from deleted d join UNSRootB r on d.UID_UNSRootB
24 = r.UID_UNSRootB join UNSGroupB3 g on r.UID_UNSRootB = g.UID_UNSRootB where d.GroupUsageMask & 0x08 > 0 and r.GroupUsageMask & 0x08 = 0 ) ) ) begin raiserror
25('#LDS#Change of {0} not allowed because of existing data.|GroupUsageMask|', 18, 1) with nowait end end if update(uid_AERoleOwner) begin declare @RecalcParameter_01
26 QBM_YCursorBuffer insert into @RecalcParameter_01 (UID1, ObjectKey1, Ident1) select 'TSB-PWODecisionRule-TO', i.XObjectKey, 'I' from inserted i union 
27all select 'QER-PWODecisionRule-OX', i.XObjectKey, 'I'  from inserted i exec QER_PITShopHelperFill_Recalc @RecalcParameter_01, @GenprocID end  if update
28(uid_AERoleOwner) begin declare @DBQueueElements_02 QBM_YDBQueueRaw insert into @DBQueueElements_02 (object, subobject, genprocid) select x.uid, null, 
29@GenProcID from ( select d.UID_UNSRootB as uid from deleted d ) as x exec QBM_PDBQueueInsert_Bulk 'TSB-K-BaseTreeOwnsObject', @DBQueueElements_02 end END
30 TRY BEGIN CATCH exec QBM_PSessionErrorAdd default RAISERROR ('', 18, 1) WITH NOWAIT END CATCH ende: return end 
31