dbo.ADS_TIADSMachineInADSGroup

1    create   trigger ADS_TIADSMachineInADSGroup on ADSMachineInADSGroup  for Insert not for Replication as begin  declare @GenProcID varchar(38)
2 declare @XUser nvarchar(64) declare @QBM_BitPatternXOrigin_Direct int = dbo.QBM_FGIBitPatternXOrigin('|Direct|', 0) declare @QBM_BitPatternXOrigin_Inherit_inv
3 int = dbo.QBM_FGIBitPatternXOrigin('|Inherit|', 1)  BEGIN TRY if exists (select top 1 1 from inserted) goto start return start: select @GenProcID = dbo.QBM_FGISessionContext
4('') select @XUser = dbo.QBM_FGISessionContext('XUser')  if exists (select top 1 1 from inserted i   join ADSGroup elem on i.uid_ADSGroup = elem.uid_ADSGroup
5 where dbo.QER_FGIITShopFlagCombineValid (i.XObjectKey, null, null, elem.XObjectKey, elem.IsForITShop, elem.IsITShopOnly) = 0  and i.XOrigin & @QBM_BitPatternXOrigin_Direct
6 > 0 and dbo.QBM_FGISessionContext ('Fullsync') = '' ) begin  raiserror ('#LDS#Assignment is not permitted due to the combination of IT Shop flags.|', 
718, 2) with nowait end  if exists (select top 1 1 from inserted i join ADSGroup g on i.UID_ADSGroup = g.UID_ADSGroup and 1 = g.HasReadOnlyMemberships and
8 dbo.QBM_FGISessionContext ('Fullsync') = '' ) begin raiserror( '#LDS#Cannot add {0} because assignment to groups with read only memberships are not permitted.|ADSMachineInADSGroup|'
9, 18, 2) with nowait end   declare @DBQueueElements_01 QBM_YDBQueueRaw insert into @DBQueueElements_01 (object, subobject, genprocid) select x.uid, null
10, @GenProcID from ( select distinct i.UID_ADSMachine as uid from inserted i   where i.XOrigin & @QBM_BitPatternXOrigin_Inherit_inv > 0 ) as x exec QBM_PDBQueueInsert_Bulk
11 'ADS-K-ADSMachineInADSGroup', @DBQueueElements_01 END TRY BEGIN CATCH exec QBM_PSessionErrorAdd default RAISERROR ('', 18, 1) WITH NOWAIT END CATCH ende:
12 return end 
13