SET QUOTED_IDENTIFIER ON  SET ANSI_NULLS ON  GO  create procedure sys.sp_dbcmptlevel -- 1997/04/15  @dbname sysname = NULL,  -- database name to change  @new_cmptlevel tinyint = NULL OUTPUT -- the new compatibility level to change to  as  set nocount on   declare @exec_stmt nvarchar(max)  declare @returncode int  declare @comptlevel float(8)  declare @dbid int  -- dbid of the database  declare @dbsid varbinary(85) -- id of the owner of the database  declare @orig_cmptlevel tinyint -- original compatibility level  declare @input_cmptlevel tinyint -- compatibility level passed in by user  ,@cmptlvl80 tinyint -- compatibility to SQL Server Version 8.0  ,@cmptlvl90 tinyint -- compatibility to SQL Server Version 9.0  ,@cmptlvl100 tinyint -- compatibility to SQL Server Version 10.0  select @cmptlvl80 = 80,  @cmptlvl90 = 90,  @cmptlvl100 = 100   -- SP MUST BE CALLED AT ADHOC LEVEL --  if (@@nestlevel > 1)  begin  raiserror(15432,-1,-1,'sys.sp_dbcmptlevel')  return (1)  end   -- If no @dbname given, just list the valid compatibility level values.  if @dbname is null  begin  raiserror (15048, -1, -1, @cmptlvl80, @cmptlvl90, @cmptlvl100)  return (0)  end   -- Verify the database name and get info  select @dbid = dbid, @dbsid = sid ,@orig_cmptlevel = cmptlevel  from master.dbo.sysdatabases  where name = @dbname   -- If @dbname not found, say so and list the databases.  if @dbid is null  begin  raiserror(15010,-1,-1,@dbname)  print ' '  select name as 'Available databases:'  from master.dbo.sysdatabases  return (1)  end   -- Now save the input compatibility level and initialize the return clevel  -- to be the current clevel  select @input_cmptlevel = @new_cmptlevel  select @new_cmptlevel = @orig_cmptlevel   -- If no clevel was supplied, display and output current level.  if @input_cmptlevel is null  begin  raiserror(15054, -1, -1, @orig_cmptlevel)  return(0)  end   -- If invalid clevel given, print usage and return error code  -- 'usage: sp_dbcmptlevel [dbname [, compatibilitylevel]]'  if @input_cmptlevel not in (@cmptlvl80, @cmptlvl90, @cmptlvl100)  begin  raiserror(15416, -1, -1)  print ' '  raiserror (15048, -1, -1, @cmptlvl80, @cmptlvl90, @cmptlvl100)  return (1)  end   -- Only the SA or the dbo of @dbname can execute the update part  -- of this procedure sys.so check.  if (not (is_srvrolemember('sysadmin') = 1)) and suser_sid() <> @dbsid  -- ALSO ALLOW db_owner ONLY IF DB REQUESTED IS CURRENT DB  and (@dbid <> db_id() or is_member('db_owner') <> 1)  begin  raiserror(15418,-1,-1)  return (1)  end   -- If we're in a transaction, disallow this since it might make recovery impossible.  set implicit_transactions off  if @@trancount > 0  begin  raiserror(15002,-1,-1,'sys.sp_dbcmptlevel')  return (1)  end   set @exec_stmt = 'ALTER DATABASE ' + quotename(@dbname, '[') + ' SET COMPATIBILITY_LEVEL = ' + cast(@input_cmptlevel as nvarchar(128))   -- Note: database @dbname may not exist anymore  exec(@exec_stmt)   select @new_cmptlevel = @input_cmptlevel   return (0) -- sp_dbcmptlevel  GO  

sp_dbcmptlevel [ [ @dbname = ] name ]  [ , [ @new_cmptlevel = ] version ]