Back to OIM Explorer

dbo.TSB_ZUNSAccountBInUNSGroupB

Stored ProcedureSQL_STORED_PROCEDURESandbox DB

Stored Procedure.

Source: sandbox-db sys.sql_modules

Source size: 2.963 characters

Interpretation

Database routine. Review parameters, called procedures, DBQueue inserts, and QBM_PJobCreate helper calls before assuming side effects.

Relations

No extracted relations.

Typed Edges

references source dbo.QBM_PMNTableInsert source text reference
references source dbo.QBM_PMNTableOriginUpdate source text reference
references source dbo.QBM_PSessionErrorAdd source text reference
references source dbo.TSB_PUNSAccountBInUNSGroupB_K source text reference

References

Referenced By

Complete Source

1CREATE PROCEDURE TSB_ZUNSAccountBInUNSGroupB(2  @SlotNumber int3)4AS5BEGIN6  DECLARE @DBQueueCurrent_A QBM_YDBQueueCurrent7  DECLARE @Anzahl_Current int8  DECLARE @DBQueueCurrent_G QBM_YDBQueueCurrent9  DECLARE @Anzahl_GroupContainsUserList int10  DECLARE @DBQueueCurrent_U QBM_YDBQueueCurrent11  DECLARE @Anzahl_UserContainsGroupList int = 012  DECLARE @CountDeltaQantity int13  DECLARE @CountDeltaOrigin int14  SET XACT_ABORT OFF15  BEGIN TRY16    INSERT INTO @DBQueueCurrent_A(UID_DialogDBQueue,17    UID_Parameter,18    UID_SubParameter,19    GenProcID)20    SELECT21      UID_DialogDBQueue,22      UID_Parameter,23      UID_SubParameter,24      GenProcID25    FROM QBMDBQueueCurrent cu26      WITH(readpast)27    WHERE28      cu.SlotNumber = @SlotNumber29    SELECT @Anzahl_Current = @@ROWCOUNT30    IF @Anzahl_Current = 031    BEGIN32      GOTO EndLabel33    END34    INSERT INTO @DBQueueCurrent_G(UID_DialogDBQueue,35    UID_Parameter,36    UID_SubParameter,37    GenProcID)38    SELECT39      UID_DialogDBQueue,40      UID_Parameter,41      UID_SubParameter,42      GenProcID43    FROM @DBQueueCurrent_A cu44    JOIN UNSAccountB u45      ON cu.UID_Parameter = u.UID_UNSAccountB46    JOIN UNSRootB r47      ON u.UID_UNSRootB = r.UID_UNSRootB48    WHERE49      r.UserContainsGroupList & 0x01 = 0 AND r.GroupUsageMask & 0x01 > 050    SELECT @Anzahl_GroupContainsUserList = @@rowcount51    IF @Anzahl_GroupContainsUserList < @Anzahl_Current52    BEGIN53      INSERT INTO @DBQueueCurrent_U(UID_DialogDBQueue,54      UID_Parameter,55      UID_SubParameter,56      GenProcID)57      SELECT58        UID_DialogDBQueue,59        UID_Parameter,60        UID_SubParameter,61        GenProcID62      FROM @DBQueueCurrent_A cu63      JOIN UNSAccountB u64        ON cu.UID_Parameter = u.UID_UNSAccountB65      JOIN UNSRootB r66        ON u.UID_UNSRootB = r.UID_UNSRootB67      WHERE68        r.UserContainsGroupList & 0x01 > 0 AND r.GroupUsageMask & 0x01 > 069      SELECT @Anzahl_UserContainsGroupList = @@rowcount70    END71    IF @Anzahl_GroupContainsUserList > 072    BEGIN73      EXEC TSB_PUNSAccountBInUNSGroupB_K @DBQueueCurrent_G,74        @Slotnumber,75        @UserHasGroupList = 0,76        @CountDeltaQantity = @CountDeltaQantity OUTPUT,77        @CountDeltaOrigin = @CountDeltaOrigin OUTPUT78      IF @CountDeltaOrigin > 079      BEGIN80        EXEC QBM_PMNTableOriginUpdate 'UNSAccountBInUNSGroupB',81        'UID_UNSAccountB',82        'UID_UNSGroupB'83      END84      IF @CountDeltaQantity > 085      BEGIN86        EXEC QBM_PMNTableInsert 'UNSAccountBInUNSGroupB',87        'UID_UNSAccountB',88        'UID_UNSGroupB',89          @TargetIsView = 0,90          @FKTableNameElement = 'UNSAccountB',91          @FKColumnNameElement = 'UID_UNSAccountB'92      END93    END94    IF @Anzahl_UserContainsGroupList > 095    BEGIN96      EXEC TSB_PUNSAccountBInUNSGroupB_K @DBQueueCurrent_U,97        @Slotnumber,98        @UserHasGroupList = 1,99        @CountDeltaQantity = @CountDeltaQantity OUTPUT,100        @CountDeltaOrigin = @CountDeltaOrigin OUTPUT101      IF @CountDeltaOrigin > 0102      BEGIN103        EXEC QBM_PMNTableOriginUpdate 'UNSAccountBHasUNSGroupB',104        'UID_UNSAccountB',105        'UID_UNSGroupB'106      END107      IF @CountDeltaQantity > 0108      BEGIN109        EXEC QBM_PMNTableInsert 'UNSAccountBHasUNSGroupB',110        'UID_UNSAccountB',111        'UID_UNSGroupB',112          @TargetIsView = 0,113          @FKTableNameElement = 'UNSGroupB',114          @FKColumnNameElement = 'UID_UNSGroupB'115      END116    END117  END TRY118  BEGIN CATCH119    EXEC QBM_PSessionErrorAdd DEFAULT120    RAISERROR('',121    18,122    1)123      WITH NOWAIT124  END CATCH125  endLabel:126END

Open raw exported source

1     create   procedure TSB_ZUNSAccountBInUNSGroupB (@SlotNumber int) AS begin declare @DBQueueCurrent_A QBM_YDBQueueCurrent declare @Anzahl_Current2 int declare @DBQueueCurrent_G QBM_YDBQueueCurrent declare @Anzahl_GroupContainsUserList int declare @DBQueueCurrent_U QBM_YDBQueueCurrent declare @Anzahl_UserContainsGroupList3 int = 0 declare @CountDeltaQantity int declare @CountDeltaOrigin int SET XACT_ABORT OFF BEGIN TRY insert into @DBQueueCurrent_A(UID_DialogDBQueue, UID_Parameter4, UID_SubParameter, GenProcID) select UID_DialogDBQueue, UID_Parameter, UID_SubParameter, GenProcID from QBMDBQueueCurrent cu with (readpast) where cu.SlotNumber5 = @SlotNumber select @Anzahl_Current = @@ROWCOUNT if @Anzahl_Current = 0 begin goto EndLabel end insert into @DBQueueCurrent_G(UID_DialogDBQueue, UID_Parameter6, UID_SubParameter, GenProcID) select UID_DialogDBQueue, UID_Parameter, UID_SubParameter, GenProcID from @DBQueueCurrent_A cu join UNSAccountB u on cu.UID_Parameter7 = u.UID_UNSAccountB join UNSRootB r on u.UID_UNSRootB = r.UID_UNSRootB where r.UserContainsGroupList & 0x01 = 0 and r.GroupUsageMask 8& 0x01 > 0 select @Anzahl_GroupContainsUserList = @@rowcount if @Anzahl_GroupContainsUserList < @Anzahl_Current begin  insert into @DBQueueCurrent_U9(UID_DialogDBQueue, UID_Parameter, UID_SubParameter, GenProcID) select UID_DialogDBQueue, UID_Parameter, UID_SubParameter, GenProcID from @DBQueueCurrent_A10 cu join UNSAccountB u on cu.UID_Parameter = u.UID_UNSAccountB join UNSRootB r on u.UID_UNSRootB = r.UID_UNSRootB where r.UserContainsGroupList & 0x0111 > 0 and r.GroupUsageMask & 0x01 > 0 select @Anzahl_UserContainsGroupList = @@rowcount end  if @Anzahl_GroupContainsUserList > 0 begin12 exec TSB_PUNSAccountBInUNSGroupB_K @DBQueueCurrent_G , @Slotnumber , @UserHasGroupList = 0 , @CountDeltaQantity = @CountDeltaQantity output , @CountDeltaOrigin13 = @CountDeltaOrigin output  if @CountDeltaOrigin > 0 begin exec QBM_PMNTableOriginUpdate 'UNSAccountBInUNSGroupB', 'UID_UNSAccountB', 'UID_UNSGroupB'14 end if @CountDeltaQantity > 0 begin exec QBM_PMNTableInsert 'UNSAccountBInUNSGroupB', 'UID_UNSAccountB', 'UID_UNSGroupB', @TargetIsView = 0 , @FKTableNameElement15 = 'UNSAccountB' , @FKColumnNameElement = 'UID_UNSAccountB' end end  if @Anzahl_UserContainsGroupList > 0 begin exec TSB_PUNSAccountBInUNSGroupB_K @DBQueueCurrent_U16 , @Slotnumber , @UserHasGroupList = 1 , @CountDeltaQantity = @CountDeltaQantity output , @CountDeltaOrigin = @CountDeltaOrigin output  if @CountDeltaOrigin17 > 0 begin exec QBM_PMNTableOriginUpdate 'UNSAccountBHasUNSGroupB', 'UID_UNSAccountB', 'UID_UNSGroupB' end if @CountDeltaQantity > 0 begin exec QBM_PMNTableInsert18 'UNSAccountBHasUNSGroupB', 'UID_UNSAccountB', 'UID_UNSGroupB', @TargetIsView = 0 , @FKTableNameElement = 'UNSGroupB' , @FKColumnNameElement =19 'UID_UNSGroupB' end end  END TRY BEGIN CATCH exec QBM_PSessionErrorAdd default RAISERROR ('', 18, 1) WITH NOWAIT END CATCH endLabel: end 20