Back to OIM Explorer

dbo.RPS_ROrgHasRPSReport

Stored ProcedureSQL_STORED_PROCEDURESandbox DB

Stored Procedure.

Source: sandbox-db sys.sql_modules

Source size: 1.783 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_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.QER_PSlotResetOnInvalidRoot_L source text reference

References

Referenced By

  • No direct source references extracted.

Complete Source

SQL82 lines
1CREATE PROCEDURE RPS_ROrgHasRPSReport(2  @SlotNumber int3)4AS5BEGIN6  DECLARE @ObjectKeysToCheck_Projection QBM_YParameterList7  DECLARE @ObjectKeysToCheck_Jobrunning QBM_YParameterList8  DECLARE @MyName nvarchar(64) = object_name(@@procid)9  DECLARE @UID_BasetreeAssignToUse varchar(38) = 'RPS-AsgnBT-RPSReport'10  DECLARE @DBQueueCurrent QBM_YDBQueueCurrent11  DECLARE @resetted int12  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    'BaseTree',32    'UID_Org',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    EXEC @resetted = QER_PSlotResetOnInvalidRoot_L @DBQueueCurrent,47      @UID_BasetreeAssignToUse,48      @SlotNumber49    IF @resetted > 050    BEGIN51      DELETE @DBQueueCurrent52      FROM @DBQueueCurrent v53      LEFT54      OUTER55      JOIN QBMDBQueueCurrent cu56        WITH(readpast)57        ON v.UID_DialogDBQueue = cu.UID_DialogDBQueue AND cu.SlotNumber = @SlotNumber58      WHERE59        cu.UID_DialogDBQueue IS NULL60    END61    INSERT INTO @ObjectKeysToCheck_Jobrunning(Parameter1,62    Parameter2)63    SELECT64      cu.UID_Parameter,65      x.XObjectKey66    FROM @DBQueueCurrent cu67    JOIN BaseTree x68      ON cu.UID_Parameter = x.UID_Org69    EXEC @resetted = QBM_PSlotResetWhileJobRun_L @DBQueueCurrent,70      @@PROCID,71      @ObjectKeysToCheck_Jobrunning,72      @SlotNumber = @SlotNumber73  END TRY74  BEGIN CATCH75    EXEC QBM_PSessionErrorAdd DEFAULT76    RAISERROR('',77    18,78    1)79      WITH NOWAIT80  END CATCH81  endLabel:82END
Open raw exported source
SQL ยท Raw13 lines
1create   procedure RPS_ROrgHasRPSReport (@SlotNumber int) AS begin declare @ObjectKeysToCheck_Projection QBM_YParameterList declare @ObjectKeysToCheck_Jobrunning2 QBM_YParameterList declare @MyName nvarchar(64) = object_name(@@procid) declare @UID_BasetreeAssignToUse varchar(38) = 'RPS-AsgnBT-RPSReport' declare 3@DBQueueCurrent QBM_YDBQueueCurrent declare @resetted int BEGIN TRY insert into @DBQueueCurrent(UID_DialogDBQueue, UID_Parameter, UID_SubParameter, GenProcID4) select UID_DialogDBQueue, UID_Parameter, UID_SubParameter, GenProcID from QBMDBQueueCurrent cu with (readpast) where cu.SlotNumber = @SlotNumber if @@rowcount5 = 0 begin goto EndLabel end  exec @resetted = QBM_PSlotResetOnMissingItem_L @DBQueueCurrent, 'BaseTree', 'UID_Org', @SlotNumber if @resetted > 0 begin6 delete  @DBQueueCurrent from @DBQueueCurrent v left outer join QBMDBQueueCurrent cu with (readpast) on v.UID_DialogDBQueue = cu.UID_DialogDBQueue and 7cu.SlotNumber = @SlotNumber where cu.UID_DialogDBQueue is null end exec @resetted = QER_PSlotResetOnInvalidRoot_L @DBQueueCurrent, @UID_BasetreeAssignToUse8, @SlotNumber if @resetted > 0 begin delete  @DBQueueCurrent from @DBQueueCurrent v left outer join QBMDBQueueCurrent cu with (readpast) on v.UID_DialogDBQueue9 = cu.UID_DialogDBQueue and cu.SlotNumber = @SlotNumber where cu.UID_DialogDBQueue is null end  insert into @ObjectKeysToCheck_Jobrunning(Parameter1, Parameter210) select cu.UID_Parameter, x.XObjectKey from @DBQueueCurrent cu join BaseTree x on cu.UID_Parameter = x.UID_Org exec @resetted = QBM_PSlotResetWhileJobRun_L11 @DBQueueCurrent, @@PROCID, @ObjectKeysToCheck_Jobrunning, @SlotNumber = @SlotNumber  END TRY BEGIN CATCH exec QBM_PSessionErrorAdd default RAISERROR (12'', 18, 1) WITH NOWAIT END CATCH endLabel: end 13