dbo.ADS_TUBaseTreeHasADSGroup

1CREATE trigger ADS_TUBaseTreeHasADSGroup2  ON BaseTreeHasADSGroup FOR3UPDATE NOT FOR Replication4AS5BEGIN6  DECLARE @ChangedOrg QBM_YSingleGUID7  BEGIN TRY8    IF EXISTS(9      SELECT TOP 1 110      FROM inserted)11    GOTO start12    IF EXISTS(13      SELECT TOP 1 114      FROM deleted)15    GOTO start16    RETURN start:17    DECLARE @GenProcID varchar(38)18    SELECT @GenProcID = dbo.QBM_FGISessionContext('')19    IF20    UPDATE(XOrigin) OR21    UPDATE(XIsInEffect)22    BEGIN23      DECLARE @DBQueueElements_01 QBM_YDBQueueRaw24      INSERT INTO @DBQueueElements_01(object,25      subobject,26      genprocid)27      SELECT28        x.uid,29        NULL,30        @GenProcID31      FROM(32      SELECT33        DISTINCT a.UID_Org AS uid34      FROM BaseTreeHasADSGroup a35      JOIN deleted d36        ON a.XObjectKey = d.XObjectKey37      WHERE38        (dbo.QBM_FGIXOriginChanged_Effect(d.XOrigin, a.XOrigin, d.XIsInEffect, a.XIsInEffect) = 1 OR dbo.QER_FCVXOriginToInheritInfo(d.XOrigin) <>39      dbo.QER_FCVXOriginToInheritInfo(a.XOrigin))) AS x40      EXEC QBM_PDBQueueInsert_Bulk 'ADS-K-BaseTreeHasObject',41        @DBQueueElements_0142      INSERT INTO @ChangedOrg(UID_SingleGuid)43      SELECT44        DISTINCT d.UID_Org AS uid45      FROM BaseTreeHasADSGroup a46      JOIN deleted d47        ON a.XObjectKey = d.XObjectKey48      WHERE49        dbo.QBM_FGIXOriginChanged_Effect(d.XOrigin,50      a.XOrigin,51      d.XIsInEffect,52      a.XIsInEffect) = 153      IF @@ROWCOUNT > 054      BEGIN55        DECLARE @DBQueueElements_02 QBM_YDBQueueRaw56        INSERT INTO @DBQueueElements_02(object,57        subobject,58        genprocid)59        SELECT60          x.uid,61          'ADS-K-OrgHasADSGroup',62          @GenProcID63        FROM(64        SELECT c.UID_SingleGuid AS uid65        FROM @ChangedOrg c) AS x66        EXEC QBM_PDBQueueInsert_Bulk 'QER-K-AllChildrenOfOrg',67          @DBQueueElements_0268        DECLARE @DBQueueElements_03 QBM_YDBQueueRaw69        INSERT INTO @DBQueueElements_03(object,70        subobject,71        genprocid)72        SELECT73          x.uid,74          NULL,75          @GenProcID76        FROM(77        SELECT b.UID_Org AS uid78        FROM @ChangedOrg c79        JOIN BaseTree b80          ON c.UID_SingleGuid = b.UID_Org81        WHERE82          b.ITShopInfo = 'BO') AS x83        EXEC QBM_PDBQueueInsert_Bulk 'QER-K-OrgAutoChild',84          @DBQueueElements_0385        DECLARE @DBQueueElements_04 QBM_YDBQueueRaw86        INSERT INTO @DBQueueElements_04(object,87        subobject,88        genprocid)89        SELECT90          x.uid,91          NULL,92          @GenProcID93        FROM(94        SELECT ADS.UID_ADSAccount AS uid95        FROM @ChangedOrg c96        JOIN PersoninBaseTree pio97          ON c.UID_SingleGuid = pio.UID_Org AND pio.XOrigin > 098        JOIN ADSaccount ADS99          ON ADS.UID_Person = pio.UID_Person AND ADS.IsGroupAccount = 1100        UNION101        SELECT ADS.UID_ADSAccount AS uid102        FROM @ChangedOrg c103        JOIN HelperPersonOrg hpo104          ON c.UID_SingleGuid = hpo.UID_Org105        JOIN ADSaccount ADS106          ON ADS.UID_Person = hpo.UID_Person AND ADS.IsGroupAccount = 1) AS x107        EXEC QBM_PDBQueueInsert_Bulk 'ADS-K-ADSAccountInADSGroup',108          @DBQueueElements_04109        DECLARE @DBQueueElements_05 QBM_YDBQueueRaw110        INSERT INTO @DBQueueElements_05(object,111        subobject,112        genprocid)113        SELECT114          x.uid,115          NULL,116          @GenProcID117        FROM(118        SELECT ADS.UID_ADSContact AS uid119        FROM @ChangedOrg c120        JOIN PersoninBaseTree pio121          ON c.UID_SingleGuid = pio.UID_Org AND pio.XOrigin > 0122        JOIN ADSContact ADS123          ON ADS.UID_Person = pio.UID_Person AND ADS.IsGroupAccount = 1124        UNION125        SELECT ADS.UID_ADSContact AS uid126        FROM @ChangedOrg c127        JOIN HelperPersonOrg hpo128          ON c.UID_SingleGuid = hpo.UID_Org129        JOIN ADSContact ADS130          ON ADS.UID_Person = hpo.UID_Person AND ADS.IsGroupAccount = 1) AS x131        EXEC QBM_PDBQueueInsert_Bulk 'ADS-K-ADSContactInADSGroup',132          @DBQueueElements_05133        IF '1' = dbo.QBM_FGIConfigparmValue('TargetSystem\ADS\HardwareInGroupFromOrg')134        BEGIN135          DECLARE @DBQueueElements_06 QBM_YDBQueueRaw136          INSERT INTO @DBQueueElements_06(object,137          subobject,138          genprocid)139          SELECT140            x.uid,141            NULL,142            @GenProcID143          FROM(144          SELECT m.UID_ADSMachine AS uid145          FROM @ChangedOrg c146          JOIN WorkDeskinBaseTree pio147            ON c.UID_SingleGuid = pio.UID_Org AND pio.XOrigin > 0148          JOIN Hardware ADS149            ON ADS.uid_WorkDesk = pio.uid_WorkDesk150          JOIN ADSMachine m151            ON ADS.UID_Hardware = m.UID_Hardware152          UNION153          SELECT m.UID_ADSMachine AS uid154          FROM @ChangedOrg c155          JOIN HelperWorkDeskOrg hpo156            ON c.UID_SingleGuid = hpo.UID_Org157          JOIN Hardware ADS158            ON ADS.uid_WorkDesk = hpo.uid_WorkDesk159          JOIN ADSMachine m160            ON ADS.UID_Hardware = m.UID_Hardware161          UNION162          SELECT m.UID_ADSMachine AS uid163          FROM @ChangedOrg c164          JOIN HardwareinBaseTree pio165            ON c.UID_SingleGuid = pio.UID_Org AND pio.XOrigin > 0166          JOIN Hardware ADS167            ON pio.uid_Hardware = ADS.uid_Hardware168          JOIN ADSMachine m169            ON ADS.UID_Hardware = m.uid_Hardware170          UNION171          SELECT m.UID_ADSMachine AS uid172          FROM @ChangedOrg c173          JOIN HelperHardwareOrg hpo174            ON c.UID_SingleGuid = hpo.UID_Org175          JOIN Hardware ADS176            ON hpo.uid_Hardware = ADS.uid_Hardware177          JOIN ADSMachine m178            ON ADS.UID_Hardware = m.uid_Hardware) AS x179          EXEC QBM_PDBQueueInsert_Bulk 'ADS-K-ADSMachineInADSGroup',180            @DBQueueElements_06181        END182      END183    END184  END TRY185  BEGIN CATCH186    EXEC QBM_PSessionErrorAdd DEFAULT187    RAISERROR('',188    18,189    1)190      WITH NOWAIT191  END CATCH192  ende:193  RETURN194END