Back to OIM Explorer

dbo.QBM_ZBufferTProcessTablePU

Stored ProcedureSQL_STORED_PROCEDURESandbox DB

Stored Procedure.

Source: sandbox-db sys.sql_modules

Source size: 897 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_PBufferT_ProcessTable source text reference
  • references source dbo.QBM_PJournal source text reference
  • references source dbo.QBM_PSessionErrorAdd source text reference
  • references source dbo.QBM_ZBufferTProcessTable source text reference

References

Referenced By

  • No direct source references extracted.

Complete Source

SQL49 lines
1CREATE PROCEDURE QBM_ZBufferTProcessTablePU(2  @SlotNumberDummy int,3  @TableName varchar(38),4  @uid_Module varchar(38),5  @GenProcID varchar(38)6)7AS8BEGIN9  DECLARE @ModuleName varchar(3)10  DECLARE @Message nvarchar(2000)11  DECLARE @DebugLevel varchar(1) = 'E'12  BEGIN TRY13    SELECT @ModuleName =14    LEFT(@uid_module,15    3)16    IF EXISTS(17      SELECT TOP 1 118      FROM dialogtable t19      WITH(readpast)20    JOIN dialogColumn c21      WITH(readpast)22      ON t.uid_dialogTable = c.uid_dialogtable23    WHERE24      c.ColumnName = 'XObjectKey')25    BEGIN26      EXEC QBM_PBufferT_ProcessTable @modulename,27        @TableName,28        @PurgeMode = 129    END30    ELSE31    BEGIN32      SELECT33        @Message = 'Task QBM-K-BufferTProcessTablePU found for table without XObjectKey ' + @ModuleName + ':' + @TableName34      EXEC QBM_PJournal @Message,35        @@PROCID,36      'E',37        @DebugLevel38    END39  END TRY40  BEGIN CATCH41    EXEC QBM_PSessionErrorAdd DEFAULT42    RAISERROR('',43    18,44    1)45      WITH NOWAIT46  END CATCH47  ende:48  RETURN49END
Open raw exported source
SQL ยท Raw7 lines
1   create   procedure QBM_ZBufferTProcessTablePU (@SlotNumberDummy int  , @TableName varchar(38) , @uid_Module varchar(38) , @GenProcID varchar(382) ) AS begin declare @ModuleName varchar(3) declare @Message nvarchar(2000) declare @DebugLevel varchar(1) = 'E' BEGIN TRY select @ModuleName = LEFT(@uid_module3, 3)          if exists (select top 1 1 from dialogtable t with (readpast) join dialogColumn c with (readpast) on t.uid_dialogTable = c.uid_dialogtable4 where c.ColumnName = 'XObjectKey' ) begin exec QBM_PBufferT_ProcessTable @modulename, @TableName , @PurgeMode = 1 end else begin select @Message = 'Task QBM-K-BufferTProcessTablePU found for table without XObjectKey '5 + @ModuleName + ':' + @TableName exec QBM_PJournal @Message, @@PROCID, 'E', @DebugLevel end   END TRY BEGIN CATCH exec QBM_PSessionErrorAdd default RAISERROR6 ('', 18, 1) WITH NOWAIT END CATCH ende: return end 7