Back to OIM Explorer

dbo.QBM_PJobHistoryShrink

Stored ProcedureSQL_STORED_PROCEDURESandbox DB

Stored Procedure.

Source: sandbox-db sys.sql_modules

Source size: 740 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_FGISessionErrorRethrow source text reference
  • references source dbo.QBM_PDialogProcessGetShrinkDef source text reference
  • references source dbo.QBM_PF84975544A6AEABC94405E1_a source text reference
  • references source dbo.QBM_PSessionErrorAdd source text reference

References

Referenced By

Complete Source

SQL38 lines
1CREATE PROCEDURE QBM_PJobHistoryShrink(2  @KeyPattern varchar(25) = '%'3)4AS5BEGIN6  DECLARE @GrenzDatum datetime7  DECLARE @ReadyForDeleteOrExport int8  DECLARE @BlockSize int = 1000009  DECLARE @lauf int10  SET XACT_ABORT OFF11  BEGIN TRY12    EXEC QBM_PDialogProcessGetShrinkDef 'JobHistory',13      @ReadyForDeleteOrExport OUTPUT,14      @GrenzDatum OUTPUT15    IF @ReadyForDeleteOrExport = 016    BEGIN17      GOTO EndLabel18    END19    SELECT @lauf = 120    WHILE @lauf > 021    BEGIN22      EXEC @lauf = QBM_PF84975544A6AEABC94405E1_a @Blocksize,23        @ReadyForDeleteOrExport,24        @KeyPattern,25        @GrenzDatum26    END27  END TRY28  BEGIN CATCH29    EXEC QBM_PSessionErrorAdd DEFAULT30    DECLARE @Rethrow varchar(1000) = dbo.QBM_FGISessionErrorRethrow()31    RAISERROR(@Rethrow,32    18,33    1)34      WITH NOWAIT35  END CATCH36  EndLabel:37  RETURN38END
Open raw exported source
SQL ยท Raw6 lines
1create   procedure QBM_PJobHistoryShrink (@KeyPattern varchar(25) = '%'  ) as begin declare @GrenzDatum datetime declare @ReadyForDeleteOrExport2 int declare @BlockSize int = 100000 declare @lauf int SET XACT_ABORT OFF BEGIN TRY exec QBM_PDialogProcessGetShrinkDef 'JobHistory', @ReadyForDeleteOrExport3 output, @GrenzDatum output if @ReadyForDeleteOrExport = 0  begin goto EndLabel end  select @lauf = 1 while @lauf > 0 begin exec @lauf = QBM_PF84975544A6AEABC94405E1_a4 @Blocksize, @ReadyForDeleteOrExport, @KeyPattern, @GrenzDatum end     END TRY BEGIN CATCH exec QBM_PSessionErrorAdd default declare @Rethrow varchar(10005) = dbo.QBM_FGISessionErrorRethrow() RAISERROR (@Rethrow, 18, 1) WITH NOWAIT END CATCH EndLabel: return end 6