dbo.TSB_TIBaseTreeHasUNSGroupB3

1CREATE trigger TSB_TIBaseTreeHasUNSGroupB32  ON BaseTreeHasUNSGroupB3 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    DECLARE @AssignCheckValues QBM_YparameterList19    INSERT INTO @AssignCheckValues(Parameter1,20    Parameter2)21    SELECT22      i.UID_Org,23      i.XOrigin24    FROM inserted i25    EXEC QER_PAssignmentCheckValid 'TSB-AsgnBT-UNSGroupB3',26      @AssignCheckValues,27      @GenProcID28    IF EXISTS(29      SELECT TOP 1 130      FROM inserted i31      JOIN BaseTree dest32        ON i.uid_Org = dest.uid_Org33      JOIN UNSGroupB3 elem34        ON i.uid_UNSGroupB3 = elem.uid_UNSGroupB335      WHERE36        dbo.QER_FGIITShopFlagCombineValid(dest.XObjectKey, NULL, NULL, elem.XObjectKey, elem.IsForITShop,37    elem.IsITShopOnly) = 0 AND i.XOrigin & @QBM_BitPatternXOrigin_Direct > 0)38    BEGIN39      RAISERROR('#LDS#Assignment is not permitted due to the combination of IT Shop flags.|',40      18,41      2)42        WITH nowait43    END44    DECLARE @DBQueueElements_01 QBM_YDBQueueRaw45    INSERT INTO @DBQueueElements_01(object,46    subobject,47    genprocid)48    SELECT49      x.uid,50      'TSB-K-OrgHasUNSGroupB3',51      @GenProcID52    FROM(53    SELECT54      DISTINCT d.uid_org AS uid55    FROM inserted d56    WHERE57      d.XOrigin & @QBM_BitPatternXOrigin_Inherit_inv > 0) AS x58    EXEC QBM_PDBQueueInsert_Bulk 'QER-K-AllChildrenOfOrg',59      @DBQueueElements_0160    DECLARE @DBQueueElements_02 QBM_YDBQueueRaw61    INSERT INTO @DBQueueElements_02(object,62    subobject,63    genprocid)64    SELECT65      x.uid,66      NULL,67      @GenProcID68    FROM(69    SELECT70      DISTINCT b.uid_org AS uid71    FROM inserted d72    JOIN BaseTree b73      ON d.uid_org = b.uid_org74    WHERE75      b.ITShopInfo = 'BO' AND d.XIsInEffect = 1) AS x76    EXEC QBM_PDBQueueInsert_Bulk 'QER-K-OrgAutoChild',77      @DBQueueElements_0278    DECLARE @DBQueueElements_03 QBM_YDBQueueRaw79    INSERT INTO @DBQueueElements_03(object,80    subobject,81    genprocid)82    SELECT83      x.uid,84      NULL,85      @GenProcID86    FROM(87    SELECT88      DISTINCT UNS.UID_UNSAccountB AS uid89    FROM inserted i90    JOIN(91    SELECT92      pio.uid_person, pio.uid_org93    FROM personinBaseTree pio94    WHERE95      pio.XOrigin > 096    UNION all97    SELECT98      uid_person, uid_org99    FROM helperPersonOrg) hpo100      ON hpo.uid_org = i.uid_org101    JOIN UNSAccountB UNS102      ON UNS.uid_person = hpo.uid_person AND UNS.IsGroupAccount_UNSGroupB3 = 1103    WHERE104      i.XIsInEffect = 1) AS x105    EXEC QBM_PDBQueueInsert_Bulk 'TSB-K-UNSAccountBInUNSGroupB3',106      @DBQueueElements_03107    DECLARE @DBQueueElements_04 QBM_YDBQueueRaw108    INSERT INTO @DBQueueElements_04(object,109    subobject,110    genprocid)111    SELECT112      x.uid,113      NULL,114      @GenProcID115    FROM(116    SELECT117      DISTINCT i.uid_org AS uid118    FROM inserted i119    WHERE120      i.XIsInEffect = 1) AS x121    EXEC QBM_PDBQueueInsert_Bulk 'TSB-K-BaseTreeHasObject',122      @DBQueueElements_04123  END TRY124  BEGIN CATCH125    EXEC QBM_PSessionErrorAdd DEFAULT126    RAISERROR('',127    18,128    1)129      WITH NOWAIT130  END CATCH131  ende:132  RETURN133END