dbo.TSB_TUUNSAccountBInUNSGroupB

1CREATE trigger TSB_TUUNSAccountBInUNSGroupB2  ON UNSAccountBInUNSGroupB FOR3UPDATE NOT FOR Replication4AS5BEGIN6  DECLARE @GenProcID varchar(38)7  DECLARE @XUser nvarchar(64)8  DECLARE @QBM_BitPatternXMarkedForDel_OutStanding int = dbo.QBM_FGIBitPatternXMarkedForDel('|OutStanding|',9  0)10  BEGIN TRY11    IF EXISTS(12      SELECT TOP 1 113      FROM inserted)14    GOTO start15    IF EXISTS(16      SELECT TOP 1 117      FROM deleted)18    GOTO start19    RETURN start:20    SELECT @GenProcID = dbo.QBM_FGISessionContext('')21    SELECT @XUser = dbo.QBM_FGISessionContext('XUser')22    IF23    UPDATE(XOrigin) OR24    UPDATE(XIsInEffect)25    BEGIN26      IF EXISTS(27        SELECT TOP 1 128        FROM deleted d29        JOIN UNSAccountBInUNSGroupB dd30          ON d.XObjectKey = dd.XObjectKey31        JOIN UNSGroupB g32          ON d.UID_UNSGroupB = g.UID_UNSGroupB33        WHERE34          g.HasReadOnlyMemberships = 1 AND d.XOrigin <> dd.XOrigin AND dbo.QBM_FGISessionContext('Fullsync') = '' AND EXISTS(35      SELECT TOP 1 136      FROM UNSAccountB a37      WHERE38        a.UID_UNSAccountB = d.UID_UNSAccountB AND a.XMarkedForDeletion & @QBM_BitPatternXMarkedForDel_OutStanding = 0))39      BEGIN40        RAISERROR('#LDS#Cannot update {0} because it is assignment to group with read only memberships.|UNSAccountBInUNSGroupB|',41        18,42        2)43          WITH nowait44      END45      DECLARE @DBQueueElements_01 QBM_YDBQueueRaw46      INSERT INTO @DBQueueElements_01(object,47      subobject,48      genprocid)49      SELECT50        x.uid,51        NULL,52        @GenProcID53      FROM(54      SELECT55        DISTINCT d.UID_UNSAccountB AS uid56      FROM deleted d57      JOIN UNSAccountBInUNSGroupB dd58        ON d.XObjectKey = dd.XObjectKey59      WHERE60        dbo.QBM_FGIXOriginChanged_Except2(d.XOrigin, dd.XOrigin) = 1 OR(d.XIsInEffect <> dd.XIsInEffect AND dbo.QBM_FGISessionContext('Fullsync'61      ) > ' ')) AS x62      EXEC QBM_PDBQueueInsert_Bulk 'TSB-K-UNSAccountBInUNSGroupB',63        @DBQueueElements_0164    END65    IF66    UPDATE(XIsInEffect) OR67    UPDATE(XOrigin)68    BEGIN69      DECLARE @DBQueueElements_02 QBM_YDBQueueRaw70      INSERT INTO @DBQueueElements_02(object,71      subobject,72      genprocid)73      SELECT74        x.uid,75        NULL,76        @GenProcID77      FROM(78      SELECT79        DISTINCT x.UID_Person AS uid80      FROM UNSAccountBInUNSGroupB a81      JOIN deleted d82        ON a.XObjectKey = d.XObjectKey83      JOIN UNSAccountB x84        ON a.UID_UNSAccountB = x.UID_UNSAccountB85      WHERE86        x.UID_Person > ' ' AND(dbo.QBM_FGIXOriginChanged_Effect(d.XOrigin, a.XOrigin, d.XIsInEffect, a.XIsInEffect) = 1 OR dbo.QER_FCVXOriginToInheritInfo87      (d.XOrigin) <> dbo.QER_FCVXOriginToInheritInfo(a.XOrigin))) AS x88      EXEC QBM_PDBQueueInsert_Bulk 'TSB-K-PersonHasObject',89        @DBQueueElements_0290      IF '1' = dbo.QBM_FGIConfigparmValue('QER\ComplianceCheck\IncludeTSBPersonUsesAccount')91      BEGIN92        DECLARE @DBQueueElements_PersonUsesAccount QBM_YDBQueueRaw93        INSERT INTO @DBQueueElements_PersonUsesAccount(object,94        subobject,95        genprocid)96        SELECT97          x.uid,98          NULL,99          @GenProcID100        FROM(101        SELECT102          DISTINCT t.uid_person AS uid103        FROM UNSAccountBInUNSGroupB aig104        JOIN deleted d105          ON aig.XObjectKey = d.XObjectKey106        JOIN UNSAccountB a107          ON aig.UID_UNSAccountB = a.UID_UNSAccountB108        JOIN TSBPersonUsesAccount t109          ON a.XObjectKey = t.ObjectKeyAccount110        WHERE111          (dbo.QBM_FGIXOriginChanged_Effect(d.XOrigin, aig.XOrigin, d.XIsInEffect, aig.XIsInEffect) = 1 OR dbo.QER_FCVXOriginToInheritInfo(d.XOrigin112        ) <> dbo.QER_FCVXOriginToInheritInfo(aig.XOrigin))) AS x113        EXEC QBM_PDBQueueInsert_Bulk 'TSB-K-PersonHasObject',114          @DBQueueElements_PersonUsesAccount115      END116      IF 'UNSGroupB' = 'UNSGroupB'117      BEGIN118        IF EXISTS(119          SELECT TOP 1 1120          FROM UNSItemB)121        BEGIN122          DECLARE @DBQueueElements_03 QBM_YDBQueueRaw123          INSERT INTO @DBQueueElements_03(object,124          subobject,125          genprocid)126          SELECT127            x.uid,128            NULL,129            @GenProcID130          FROM(131          SELECT132            DISTINCT d.UID_UNSAccountB AS uid133          FROM UNSAccountBInUNSGroupB a134          JOIN deleted d135            ON a.XObjectKey = d.XObjectKey AND dbo.QBM_FGIXOriginChanged_Effect(d.XOrigin, a.XOrigin, d.XIsInEffect,136          a.XIsInEffect) = 1137          WHERE138            EXISTS(139          SELECT TOP 1 1140          FROM UNSAccountB acc141          JOIN UNSItemB b142            ON acc.UID_UNSRootB = b.UID_UNSRootB AND acc.UID_UNSAccountB = a.UID_UNSAccountB)) AS x143          EXEC QBM_PDBQueueInsert_Bulk 'TSB-K-UNSAccountBHasUNSItemB',144            @DBQueueElements_03145        END146      END147    END148  END TRY149  BEGIN CATCH150    EXEC QBM_PSessionErrorAdd DEFAULT151    RAISERROR('',152    18,153    1)154      WITH NOWAIT155  END CATCH156  ende:157  RETURN158END