dbo.ADS_TIADSContactInADSGroup

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