dbo.LDP_TILDAPGroupExclusion

1    create   trigger LDP_TILDAPGroupExclusion on LDAPGroupExclusion  for Insert not for Replication as begin  declare @exclusions QBM_YParameterList
2 BEGIN TRY if exists (select top 1 1 from inserted) goto start return start:  declare @GenProcID varchar(38) select @GenProcID = dbo.QBM_FGISessionContext
3('') if dbo.QBM_FGIConfigparmValue('QER\Structures\Inherite\GroupExclusion') = '' begin raiserror( '#LDS#Cannot make a definition because exclusion is not enabled by config parm.|'
4, 18, 2) with nowait end insert into @exclusions (Parameter1, Parameter2) select UID_LDAPGroupHigher, UID_LDAPGroupLower from inserted exec QER_PExclusionCheckCircular
5 @TargetTable = 'LDAPGroupExclusion' , @HigherColumn = 'UID_LDAPGroupHigher' , @LowerColumn = 'UID_LDAPGroupLower' , @exclusions = @exclusions  if exists
6 (select top 1 1 from LDAPGroup t join inserted i on t.uid_LDAPGroup = i.uid_LDAPGroupLower and t.IsDynamicGroup = 1 ) or exists (select top 1 1 from LDAPGroup
7 t join inserted i on t.uid_LDAPGroup = i.uid_LDAPGroupHigher and t.IsDynamicGroup = 1 ) begin  raiserror('#LDS#Cannot make assignment because dynamic groups are involved.|'
8, 18, 1) with nowait end  declare @DBQueueElements_01 QBM_YDBQueueRaw insert into @DBQueueElements_01 (object, subobject, genprocid) select x.uid, null
9, @GenProcID from ( select uig.uid_LDAPAccount as uid from ( select UID_LDAPGroupLower as UID_LDAPGroup from inserted union select UID_LDAPGroupHigher 
10from inserted ) as y  join LDAPGroupCollection coll on y.UID_LDAPGroup = coll.UID_LDAPGroupParent join LDAPAccountInLDAPGroup uig on coll.UID_LDAPGroupChild
11 = uig.uid_LDAPGroup and uig.XOrigin > 0  ) as x exec QBM_PDBQueueInsert_Bulk 'LDP-K-LDAPAccountInLDAPGroup', @DBQueueElements_01  declare @DBQueueElements_02
12 QBM_YDBQueueRaw insert into @DBQueueElements_02 (object, subobject, genprocid) select x.uid, null, @GenProcID from ( select uig.uid_LDPMachine as uid 
13from ( select UID_LDAPGroupLower as UID_LDAPGroup from inserted union select UID_LDAPGroupHigher from inserted ) as y  join LDAPGroupCollection coll on
14 y.UID_LDAPGroup = coll.UID_LDAPGroupParent join LDPMachineInLDAPGroup uig on coll.UID_LDAPGroupChild = uig.uid_LDAPGroup and uig.XOrigin > 0  ) as x exec
15 QBM_PDBQueueInsert_Bulk 'LDP-K-LDPMachineInLDAPGroup', @DBQueueElements_02  declare @DBQueueElements_03 QBM_YDBQueueRaw insert into @DBQueueElements_03
16 (object, subobject, genprocid) select x.uid, null, @GenProcID from ( select g.UID_Org as uid from ( select UID_LDAPGroupLower as UID_LDAPGroup from inserted
17 union select UID_LDAPGroupHigher from inserted ) as y join BaseTreeHasLDAPGroup g on y.UID_LDAPGroup = g.UID_LDAPGroup ) as x exec QBM_PDBQueueInsert_Bulk
18 'LDP-K-OrgHasLDAPGroup', @DBQueueElements_03 END TRY BEGIN CATCH exec QBM_PSessionErrorAdd default RAISERROR ('', 18, 1) WITH NOWAIT END CATCH ende: return
19 end 
20