dbo.TSB_TIUNSAccountBHasUNSGroupB3

1CREATE trigger TSB_TIUNSAccountBHasUNSGroupB32  ON UNSAccountBHasUNSGroupB3 FOR3INSERT NOT FOR Replication4AS5BEGIN6  DECLARE @QBM_BitPatternXOrigin_Direct int = dbo.QBM_FGIBitPatternXOrigin('|Direct|',7  0)8  DECLARE @QBM_BitPatternXOrigin_Inherit_inv int = dbo.QBM_FGIBitPatternXOrigin('|Inherit|',9  1)10  BEGIN TRY11    IF EXISTS(12      SELECT TOP 1 113      FROM inserted)14    GOTO start15    RETURN start:16    DECLARE @GenProcID varchar(38)17    SELECT @GenProcID = dbo.QBM_FGISessionContext('')18    IF EXISTS(19      SELECT TOP 1 120      FROM inserted i21      JOIN UNSAccountB u22        ON i.UID_UNSAccountB = u.UID_UNSAccountB23      JOIN UNSRootB r24        ON u.UID_UNSRootB = r.UID_UNSRootB25      WHERE26        r.UserContainsGroupList & 0x08 = 0)27    BEGIN28      RAISERROR('#LDS#Assignment is not permitted due to the Value of UNSRootB.UserContainsGroupList.|',29      18,30      2)31        WITH nowait32    END33    IF EXISTS(34      SELECT TOP 1 135      FROM inserted i36      JOIN UNSGroupB3 elem37        ON i.uid_UNSGroupB3 = elem.uid_UNSGroupB338      WHERE39        dbo.QER_FGIITShopFlagCombineValid(i.XObjectKey, NULL, NULL, elem.XObjectKey, elem.IsForITShop, elem.IsITShopOnly) = 0 AND i.XOrigin & @QBM_BitPatternXOrigin_Direct40    > 0 AND dbo.QBM_FGISessionContext('Fullsync') = '')41    BEGIN42      RAISERROR('#LDS#Assignment is not permitted due to the combination of IT Shop flags.|',43      18,44      2)45        WITH nowait46    END47    IF EXISTS(48      SELECT TOP 1 149      FROM inserted i50      JOIN UNSGroupB3 g51        ON i.UID_UNSGroupB3 = g.UID_UNSGroupB352      JOIN UNSAccountB u53        ON i.UID_UNSAccountB = u.UID_UNSAccountB54      JOIN UNSRootB ru55        ON u.UID_UNSRootB = ru.UID_UNSRootB56      JOIN DPRNameSpace ns57        ON ru.UID_DPRNameSpace = ns.UID_DPRNameSpace58      JOIN UNSRootB rg59        ON g.UID_UNSRootB = rg.UID_UNSRootB60      WHERE61        0 = CASE62    WHEN u.UID_UNSRootB = g.UID_UNSRootB THEN63    164    WHEN ns.IsExtendedInheritance = 0 THEN65    066    WHEN ns.IsExtendedInheritance = 1 AND ns.UID_DPRNameSpace = rg.UID_DPRNameSpace THEN67    168    ELSE 069    END)70    BEGIN71      RAISERROR('#LDS#Assignment is not permitted due to the configuration of related UNSRoots.|',72      18,73      2)74        WITH nowait75    END76    DECLARE @DBQueueElements_01 QBM_YDBQueueRaw77    INSERT INTO @DBQueueElements_01(object,78    subobject,79    genprocid)80    SELECT81      x.uid,82      NULL,83      @GenProcID84    FROM(85    SELECT86      DISTINCT i.UID_UNSAccountB AS uid87    FROM inserted i88    WHERE89      i.XOrigin & @QBM_BitPatternXOrigin_Inherit_inv > 0) AS x90    EXEC QBM_PDBQueueInsert_Bulk 'TSB-K-UNSAccountBInUNSGroupB3',91      @DBQueueElements_0192    IF 'UNSGroupB3' = 'UNSGroupB'93    BEGIN94      IF EXISTS(95        SELECT TOP 1 196        FROM UNSItemB)97      BEGIN98        DECLARE @DBQueueElements_02 QBM_YDBQueueRaw99        INSERT INTO @DBQueueElements_02(object,100        subobject,101        genprocid)102        SELECT103          x.uid,104          NULL,105          @GenProcID106        FROM(107        SELECT108          DISTINCT i.UID_UNSAccountB AS uid109        FROM inserted i110        WHERE111          i.XIsInEffect = 1 AND EXISTS(112        SELECT TOP 1 1113        FROM UNSItemB b114        JOIN UNSAccountB acc115          ON b.UID_UNSRootB = acc.UID_UNSRootB AND acc.UID_UNSAccountB = i.UID_UNSAccountB)) AS x116        EXEC QBM_PDBQueueInsert_Bulk 'TSB-K-UNSAccountBHasUNSItemB',117          @DBQueueElements_02118      END119    END120    DECLARE @DBQueueElements_03 QBM_YDBQueueRaw121    INSERT INTO @DBQueueElements_03(object,122    subobject,123    genprocid)124    SELECT125      x.uid,126      NULL,127      @GenProcID128    FROM(129    SELECT130      DISTINCT u.UID_Person AS uid131    FROM inserted i132    JOIN UNSAccountB u133      ON i.UID_UNSAccountB = u.UID_UNSAccountB134    WHERE135      u.UID_Person > ' ' AND i.XIsInEffect = 1) AS x136    EXEC QBM_PDBQueueInsert_Bulk 'TSB-K-PersonHasObject',137      @DBQueueElements_03138    IF '1' = dbo.QBM_FGIConfigparmValue('QER\ComplianceCheck\IncludeTSBPersonUsesAccount')139    BEGIN140      DECLARE @DBQueueElements_PersonUsesAccount QBM_YDBQueueRaw141      INSERT INTO @DBQueueElements_PersonUsesAccount(object,142      subobject,143      genprocid)144      SELECT145        x.uid,146        NULL,147        @GenProcID148      FROM(149      SELECT150        DISTINCT t.uid_person AS uid151      FROM inserted i152      JOIN UNSAccountB u153        ON i.UID_UNSAccountB = u.UID_UNSAccountB154      JOIN TSBPersonUsesAccount t155        ON u.XObjectKey = t.ObjectKeyAccount156      WHERE157        i.XIsInEffect = 1) AS x158      EXEC QBM_PDBQueueInsert_Bulk 'TSB-K-PersonHasObject',159        @DBQueueElements_PersonUsesAccount160    END161  END TRY162  BEGIN CATCH163    EXEC QBM_PSessionErrorAdd DEFAULT164    RAISERROR('',165    18,166    1)167      WITH NOWAIT168  END CATCH169  ende:170  RETURN171END