Migration - Backup database with Read-Only and OffLine

DECLARE @name VARCHAR(50) -- database name  
DECLARE @path VARCHAR(256) -- path for backup files  
DECLARE @fileName VARCHAR(256) -- filename for backup  
DECLARE @fileDate VARCHAR(20) -- used for file name
DECLARE @strSQL NVARCHAR(200) -- used for file name
 
-- specify database backup directory
SET @path = '\\backupserver\BACKUPS_SQL\Migration\'  
 
-- specify filename format
SELECT @fileDate = CONVERT(VARCHAR(20),GETDATE(),112) 
 
DECLARE db_cursor CURSOR READ_ONLY FOR  
SELECT name 
FROM master.dbo.sysdatabases 
WHERE name not IN ('dba','master','model','msdb','tempdb')   -- not include these databases
 
OPEN db_cursor   
FETCH NEXT FROM db_cursor INTO @name   
 
WHILE @@FETCH_STATUS = 0   
BEGIN   
   SET @fileName = @path + @name + '_' + @fileDate + '.BAK'  
 
 
   Exec DBA..sp_DBA_KillDB @name
 
   Set @strSQL = 'ALTER DATABASE '+ @name +' SET READ_ONLY WITH NO_WAIT'
 
   EXECUTE sp_executesql @strSQL
 
   BACKUP DATABASE @name TO DISK = @fileName  
 
  Set @strSQL = 'ALTER DATABASE '+ @name +' SET OFFLINE WITH ROLLBACK IMMEDIATE'
 
   
    --ALTER DATABASE dba SET ONLINE 
 
   EXECUTE sp_executesql @strSQL
 
 
   FETCH NEXT FROM db_cursor INTO @name   
END   
 
 
CLOSE db_cursor   
DEALLOCATE db_cursorDECLARE @name VARCHAR(50) -- database name  
DECLARE @path VARCHAR(256) -- path for backup files  
DECLARE @fileName VARCHAR(256) -- filename for backup  
DECLARE @fileDate VARCHAR(20) -- used for file name
DECLARE @strSQL NVARCHAR(200) -- used for file name
 
-- specify database backup directory
SET @path = '\\backupserver\BACKUPS_SQL\Migration\'  
 
-- specify filename format
SELECT @fileDate = CONVERT(VARCHAR(20),GETDATE(),112) 
 
DECLARE db_cursor CURSOR READ_ONLY FOR  
SELECT name 
FROM master.dbo.sysdatabases 
WHERE name not IN ('dba','master','model','msdb','tempdb')   -- not include these databases
 
OPEN db_cursor   
FETCH NEXT FROM db_cursor INTO @name   
 
WHILE @@FETCH_STATUS = 0   
BEGIN   
   SET @fileName = @path + @name + '_' + @fileDate + '.BAK'  
 
 
   Exec DBA..sp_DBA_KillDB @name
 
   Set @strSQL = 'ALTER DATABASE '+ @name +' SET READ_ONLY WITH NO_WAIT'
 
   EXECUTE sp_executesql @strSQL
 
   BACKUP DATABASE @name TO DISK = @fileName  
 
  Set @strSQL = 'ALTER DATABASE '+ @name +' SET OFFLINE WITH ROLLBACK IMMEDIATE'
 
   
    --ALTER DATABASE dba SET ONLINE 
 
   EXECUTE sp_executesql @strSQL
 
 
   FETCH NEXT FROM db_cursor INTO @name   
END   
 
 
CLOSE db_cursor   
DEALLOCATE db_cursor