Back to OIM Explorer

dbo.QBM_PColumnRename

Stored ProcedureSQL_STORED_PROCEDURESandbox DB

Stored Procedure.

Source: sandbox-db sys.sql_modules

Source size: 1.350 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

  • No direct source references extracted.

Complete Source

SQL62 lines
1CREATE PROCEDURE QBM_PColumnRename(2  @TableName varchar(30),3  @ColumnNameOld varchar(30),4  @ColumnNameNew varchar(30)5)6AS7BEGIN8  DECLARE @DebugSwitch int = 09  DECLARE @Cmd nvarchar(max)10  DECLARE @XUser nvarchar(64) = object_name(@@procid)11  DECLARE @Xdate datetime = getutcdate()12  SET XACT_ABORT OFF13  BEGIN TRY14    IF EXISTS(15      SELECT TOP 1 116      FROM QBM_VSchemaColumns c17      WHERE18        c.TABLE_NAME = @TableName AND c.COLUMN_NAME = @ColumnNameOld) AND NOT EXISTS(19    SELECT TOP 1 120    FROM QBM_VSchemaColumns c21    WHERE22      c.TABLE_NAME = @TableName AND c.COLUMN_NAME = @ColumnNameNew collate SQL_Latin1_General_CP1_CS_AS)23    BEGIN24      SELECT25        @Cmd = '26	exec sp_rename ''' + @TableName + '.' + @ColumnNameOld + ''', ''' + @ColumnNameNew + ''', ''column''27	'28      IF @DebugSwitch > 029      BEGIN30        print @cmd31      END32      EXEC sp_executesql @cmd33    END34    IF NOT EXISTS(35      SELECT TOP 1 136      FROM sys.tables t37      WHERE38        t.name = 'DialogColumn')39    BEGIN40      GOTO endLabel41    END42    UPDATE DialogColumn43    SET ColumnName = @ColumnNameNew,44    XDateUpdated = @Xdate,45    XUserUpdated = @XUser46    FROM DialogColumn c47    JOIN DialogTable t48      ON c.UID_DialogTable = t.UID_DialogTable49    WHERE50      c.ColumnName = @ColumnNameOld AND t.TableName = @TableName51  END TRY52  BEGIN CATCH53    EXEC QBM_PSessionErrorAdd DEFAULT54    DECLARE @Rethrow varchar(1000) = dbo.QBM_FGISessionErrorRethrow()55    RAISERROR(@Rethrow,56    18,57    1)58      WITH NOWAIT59  END CATCH60  endLabel:61  RETURN62END
Open raw exported source
SQL ยท Raw12 lines
1  create   procedure QBM_PColumnRename (@TableName varchar(30) , @ColumnNameOld varchar(30) , @ColumnNameNew varchar(30) ) as begin declare @DebugSwitch2 int = 0 declare @Cmd nvarchar(max) declare @XUser nvarchar(64) = object_name(@@procid) declare @Xdate datetime = getutcdate() SET XACT_ABORT OFF BEGIN3 TRY if exists (select top 1 1 from QBM_VSchemaColumns c where c.TABLE_NAME = @TableName and c.COLUMN_NAME = @ColumnNameOld ) and not exists (select top4 1 1 from QBM_VSchemaColumns c where c.TABLE_NAME = @TableName and c.COLUMN_NAME = @ColumnNameNew collate SQL_Latin1_General_CP1_CS_AS  ) begin select 5@Cmd = '6	exec sp_rename ''' + @TableName + '.' + @ColumnNameOld + ''', ''' + @ColumnNameNew + ''', ''column''7	' if @DebugSwitch > 0 begin print @cmd8 end exec sp_executesql @cmd end if not exists (select top 1 1 from sys.tables t where t.name = 'DialogColumn' ) begin goto endLabel end update DialogColumn9 set ColumnName = @ColumnNameNew  , XDateUpdated = @Xdate , XUserUpdated = @XUser from DialogColumn c join DialogTable t on c.UID_DialogTable = t.UID_DialogTable10 where c.ColumnName = @ColumnNameOld and t.TableName = @TableName END TRY BEGIN CATCH exec QBM_PSessionErrorAdd default declare @Rethrow varchar(1000) 11= dbo.QBM_FGISessionErrorRethrow() RAISERROR (@Rethrow, 18, 1) WITH NOWAIT END CATCH endLabel: return end 12