Back to OIM Explorer

dbo.TSB_RUNSAccountBInUNSGroupB2

Stored ProcedureSQL_STORED_PROCEDURESandbox DB

Stored Procedure.

Source: sandbox-db sys.sql_modules

Source size: 2.078 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.DPR_FGIProjectionRootRunning source text reference
  • references source dbo.DPR_PSlotResetWhileProj_L source text reference
  • references source dbo.QBM_PSessionErrorAdd source text reference
  • references source dbo.QBM_PSlotResetOnMissingItem_L source text reference
  • references source dbo.QBM_PSlotResetWhileJobRun_L source text reference
  • references source dbo.TSB_RUNSAccountBInUNSGroupB source text reference

Complete Source

SQL96 lines
1CREATE PROCEDURE TSB_RUNSAccountBInUNSGroupB2(2  @SlotNumber int3)4AS5BEGIN6  DECLARE @ObjectKeysToCheck_Projection QBM_YParameterList7  DECLARE @ObjectKeysToCheck_Jobrunning QBM_YParameterList8  DECLARE @MyName nvarchar(64) = object_name(@@procid)9  DECLARE @DBQueueCurrent QBM_YDBQueueCurrent10  DECLARE @resetted int11  SET XACT_ABORT OFF12  BEGIN TRY13    INSERT INTO @DBQueueCurrent(UID_DialogDBQueue,14    UID_Parameter,15    UID_SubParameter,16    GenProcID)17    SELECT18      UID_DialogDBQueue,19      UID_Parameter,20      UID_SubParameter,21      GenProcID22    FROM QBMDBQueueCurrent cu23      WITH(readpast)24    WHERE25      cu.SlotNumber = @SlotNumber26    IF @@rowcount = 027    BEGIN28      GOTO EndLabel29    END30    EXEC @resetted = QBM_PSlotResetOnMissingItem_L @DBQueueCurrent,31    'UNSAccountB',32    'uid_UNSAccountB',33      @SlotNumber34    IF @resetted > 035    BEGIN36      DELETE @DBQueueCurrent37      FROM @DBQueueCurrent v38      LEFT39      OUTER40      JOIN QBMDBQueueCurrent cu41        WITH(readpast)42        ON v.UID_DialogDBQueue = cu.UID_DialogDBQueue AND cu.SlotNumber = @SlotNumber43      WHERE44        cu.UID_DialogDBQueue IS NULL45    END46    IF 1 = dbo.DPR_FGIProjectionRootRunning('UnsRootB')47    BEGIN48      INSERT INTO @ObjectKeysToCheck_Projection(Parameter1,49      Parameter2)50      SELECT51        cu.UID_Parameter,52        ro.XObjectKey53      FROM @DBQueueCurrent cu54      JOIN UNSAccountB x55        ON cu.UID_Parameter = x.UID_UNSAccountB56      JOIN UNSRootB ro57        ON x.UID_UNSRootB = ro.UID_UNSRootB58      EXEC @resetted = DPR_PSlotResetWhileProj_L @DBQueueCurrent,59        @ObjectKeysToCheck_Projection,60        @MyName,61        @SlotNumber62      IF @resetted > 063      BEGIN64        DELETE @DBQueueCurrent65        FROM @DBQueueCurrent v66        LEFT67        OUTER68        JOIN QBMDBQueueCurrent cu69          WITH(readpast)70          ON v.UID_DialogDBQueue = cu.UID_DialogDBQueue AND cu.SlotNumber = @SlotNumber71        WHERE72          cu.UID_DialogDBQueue IS NULL73      END74    END75    INSERT INTO @ObjectKeysToCheck_Jobrunning(Parameter1,76    Parameter2)77    SELECT78      cu.UID_Parameter,79      x.XObjectKey80    FROM @DBQueueCurrent cu81    JOIN UNSAccountB x82      ON cu.UID_Parameter = x.UID_UNSAccountB83    EXEC @resetted = QBM_PSlotResetWhileJobRun_L @DBQueueCurrent,84      @@PROCID,85      @ObjectKeysToCheck_Jobrunning,86      @SlotNumber = @SlotNumber87  END TRY88  BEGIN CATCH89    EXEC QBM_PSessionErrorAdd DEFAULT90    RAISERROR('',91    18,92    1)93      WITH NOWAIT94  END CATCH95  endLabel:96END
Open raw exported source
SQL ยท Raw14 lines
1create   procedure TSB_RUNSAccountBInUNSGroupB2 (@SlotNumber int) AS begin declare @ObjectKeysToCheck_Projection QBM_YParameterList declare @ObjectKeysToCheck_Jobrunning2 QBM_YParameterList declare @MyName nvarchar(64) = object_name(@@procid) declare @DBQueueCurrent QBM_YDBQueueCurrent declare @resetted int SET XACT_ABORT3 OFF BEGIN TRY insert into @DBQueueCurrent(UID_DialogDBQueue, UID_Parameter, UID_SubParameter, GenProcID) select UID_DialogDBQueue, UID_Parameter, UID_SubParameter4, GenProcID from QBMDBQueueCurrent cu with (readpast) where cu.SlotNumber = @SlotNumber if @@rowcount = 0 begin goto EndLabel end  exec @resetted = QBM_PSlotResetOnMissingItem_L5 @DBQueueCurrent, 'UNSAccountB', 'uid_UNSAccountB', @SlotNumber if @resetted > 0 begin delete  @DBQueueCurrent from @DBQueueCurrent v left outer join QBMDBQueueCurrent6 cu with (readpast) on v.UID_DialogDBQueue = cu.UID_DialogDBQueue and cu.SlotNumber = @SlotNumber where cu.UID_DialogDBQueue is null end if 1 = dbo.DPR_FGIProjectionRootRunning7 ('UnsRootB') begin insert into @ObjectKeysToCheck_Projection(Parameter1, Parameter2) select cu.UID_Parameter, ro.XObjectKey from @DBQueueCurrent cu join8 UNSAccountB x on cu.UID_Parameter = x.UID_UNSAccountB join UNSRootB ro on x.UID_UNSRootB = ro.UID_UNSRootB exec @resetted = DPR_PSlotResetWhileProj_L 9@DBQueueCurrent, @ObjectKeysToCheck_Projection, @MyName, @SlotNumber if @resetted > 0 begin delete  @DBQueueCurrent from @DBQueueCurrent v left outer join10 QBMDBQueueCurrent cu with (readpast) on v.UID_DialogDBQueue = cu.UID_DialogDBQueue and cu.SlotNumber = @SlotNumber where cu.UID_DialogDBQueue is null 11end end  insert into @ObjectKeysToCheck_Jobrunning(Parameter1, Parameter2) select cu.UID_Parameter, x.XObjectKey from @DBQueueCurrent cu join UNSAccountB12 x on cu.UID_Parameter = x.UID_UNSAccountB exec @resetted = QBM_PSlotResetWhileJobRun_L @DBQueueCurrent, @@PROCID, @ObjectKeysToCheck_Jobrunning, @SlotNumber13 = @SlotNumber  END TRY BEGIN CATCH exec QBM_PSessionErrorAdd default RAISERROR ('', 18, 1) WITH NOWAIT END CATCH endLabel: end 14