Back to OIM Explorer

dbo.QBM_PDBQueueAgentInfoSet

Stored ProcedureSQL_STORED_PROCEDURESandbox DB

Stored Procedure.

Source: sandbox-db sys.sql_modules

Source size: 780 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_PSessionErrorAdd source text reference

References

Referenced By

Complete Source

SQL47 lines
1CREATE PROCEDURE QBM_PDBQueueAgentInfoSet(2  @Ident_QBMDBQueueAgent nvarchar(128),3  @IsReset BIT = 04)5AS6BEGIN7  DECLARE @spid int8  SET XACT_ABORT OFF9  BEGIN TRY10    IF @IsReset = 011    BEGIN12      SELECT @spid = @@spid13    END14    ELSE15    BEGIN16      SELECT @spid = 017    END18    IF NOT EXISTS(19      SELECT TOP 1 120      FROM QBMDBQueueAgent21      WHERE22        Ident_QBMDBQueueAgent = @Ident_QBMDBQueueAgent)23    BEGIN24      INSERT INTO QBMDBQueueAgent(Ident_QBMDBQueueAgent,25      ServerProcess)26      VALUES(@Ident_QBMDBQueueAgent,27      @spid)28    END29    ELSE30    BEGIN31      UPDATE QBMDBQueueAgent32      SET ServerProcess = @spid33      WHERE34        Ident_QBMDBQueueAgent = @Ident_QBMDBQueueAgent35    END36  END TRY37  BEGIN CATCH38    EXEC QBM_PSessionErrorAdd DEFAULT39    DECLARE @Rethrow varchar(1000) = dbo.QBM_FGISessionErrorRethrow()40    RAISERROR(@Rethrow,41    18,42    1)43      WITH NOWAIT44  END CATCH45  ende:46  RETURN47END
Open raw exported source
SQL · Raw7 lines
1  create   procedure QBM_PDBQueueAgentInfoSet (@Ident_QBMDBQueueAgent nvarchar(128) , @IsReset bit = 0  ) as begin declare @spid int SET XACT_ABORT2 OFF BEGIN TRY if @IsReset = 0 begin select @spid = @@spid end else begin select @spid = 0 end if not exists (select top 1 1 from QBMDBQueueAgent where3 Ident_QBMDBQueueAgent = @Ident_QBMDBQueueAgent) begin insert into QBMDBQueueAgent (Ident_QBMDBQueueAgent, ServerProcess) values (@Ident_QBMDBQueueAgent4, @spid) end else begin update QBMDBQueueAgent set ServerProcess = @spid where Ident_QBMDBQueueAgent = @Ident_QBMDBQueueAgent end END TRY BEGIN CATCH exec5 QBM_PSessionErrorAdd default declare @Rethrow varchar(1000) = dbo.QBM_FGISessionErrorRethrow() RAISERROR (@Rethrow, 18, 1) WITH NOWAIT END CATCH ende:6  return end 7