Back to OIM Explorer

dbo.QBM_PObjectExistsInDatabase

Stored ProcedureSQL_STORED_PROCEDURESandbox DB

Stored Procedure.

Source: sandbox-db sys.sql_modules

Source size: 1.097 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_FCVObjectkeyToElement source text reference
  • references source dbo.QBM_FGIColumnExists source text reference
  • references source dbo.QBM_FGISessionErrorRethrow source text reference
  • references source dbo.QBM_FGITableName source text reference
  • references source dbo.QBM_PSessionErrorAdd source text reference

Complete Source

SQL50 lines
1CREATE PROCEDURE QBM_PObjectExistsInDatabase(2  @Objectkey varchar(138)3)4AS5BEGIN6  DECLARE @erg int7  DECLARE @SQLCmd nvarchar(2000)8  DECLARE @TableName varchar(32)9  DECLARE @TableNameBase varchar(32)10  DECLARE @XOriginExists int11  SET XACT_ABORT OFF12  BEGIN TRY13    SELECT @erg = 014    SELECT15      @TableName = dbo.QBM_FCVObjectkeyToElement('TableName',16      @Objectkey)17    SELECT TOP 1 @TableNameBase = dbo.QBM_FGITableName(UID_DialogTableBase)18    FROM dialogTable19    WHERE20      TableName = @TableName21    IF isnull(@TableNameBase,22    '') = ''23    BEGIN24      SELECT @TableNameBase = @TableName25    END26    SELECT27      @XOriginExists = dbo.QBM_FGIColumnExists(@TableNameBase,28      'XOrigin')29    SELECT30      @SQLCmd = N 'select 1 where exists (select top 1 1 from ' + @TableNameBase + ' where XObjectKey = ''' + @Objectkey + '''31	' + CASE32      WHEN @XOriginExists = 1 THEN33      ' and XOrigin > 0 '34    ELSE ''35    END + ' )'36    EXEC sp_executeSQL @SQLCmd37    SELECT @erg = @@rowcount38  END TRY39  BEGIN CATCH40    EXEC QBM_PSessionErrorAdd DEFAULT,41      @SQLCmd42    DECLARE @Rethrow varchar(1000) = dbo.QBM_FGISessionErrorRethrow()43    RAISERROR(@Rethrow,44    18,45    1)46      WITH NOWAIT47  END CATCH48  ende:49  RETURN(@erg)50END
Open raw exported source
SQL ยท Raw9 lines
1  create   procedure QBM_PObjectExistsInDatabase (@Objectkey varchar(138) ) as begin declare @erg int declare @SQLCmd nvarchar(2000) declare @TableName2 varchar(32)  declare @TableNameBase varchar(32)  declare @XOriginExists int SET XACT_ABORT OFF BEGIN TRY select @erg = 0 select @TableName = dbo.QBM_FCVObjectkeyToElement3('TableName', @Objectkey) select top 1 @TableNameBase = dbo.QBM_FGITableName(UID_DialogTableBase) from dialogTable where TableName = @TableName  if isnull4(@TableNameBase, '') = '' begin select @TableNameBase = @TableName end select @XOriginExists = dbo.QBM_FGIColumnExists(@TableNameBase, 'XOrigin') select5 @SQLCmd = N'select 1 where exists (select top 1 1 from ' + @TableNameBase + ' where XObjectKey = ''' + @Objectkey + '''6	' + case when @XOriginExists7 = 1 then ' and XOrigin > 0 ' else '' end + ' )' exec sp_executeSQL @SQLCmd select @erg = @@rowcount  END TRY BEGIN CATCH exec QBM_PSessionErrorAdd default8, @SQLCmd declare @Rethrow varchar(1000) = dbo.QBM_FGISessionErrorRethrow() RAISERROR (@Rethrow, 18, 1) WITH NOWAIT END CATCH ende: return(@erg) end 9