SQL. Опять переезд баз 1С

13.03.23

–

Автоматизируем переезд файлов баз данных 1С внутри SQL сервера с диска на диск средствами SQL.

Скачать исходный код

	Наименование	Файл	Версия	Размер
	Сказать "Спасибо" & скачать скрипт .sql 2,47Kb 2	.sql		2,47Kb	2	Скачать

Админы сообщили радостную весть - "Закуплены диски для модернизации дисковой системы SQL сервера, переносите все базы на один диск".

Прошлый переезд SQL баз был устроен с помощью симбиоза 1С + SQL скрипты. На этот раз задача звучала немного иначе, и трогать кластер 1С не было надобности.

Требовалось все базы 1С расположенные на диске G перенести на диск D, к имеющимся 120 шт, чтобы потом Админы модернизировали дисковую систему SQL сервера и мы завершили задуманное - разделить файлы баз данных и логов по разным физическим дискам.

Смотрим на папку диска G - итить-колотить, 139 баз 1С переносить на другой диск. "Сто тридцать девять, Карл!" Руками ? Да ну на...

Беремся за изучение команд SQL скрипта, тем более что "Секлет * фром оттуда" нам уже знакомо, этож почти язык запросов в нашей родной 1С.

Вопщем, как говорится в одном древнем мультфильме "Лучше день потерять, потом за 5 минут долететь", пишем SQL скрипт и переносим все 139 баз одним кликом. Ну не нажимать же 139 раз Отсоединить\Присоединить базу, тем более что еще и надо угадать какую переносить, а какая уже на диске D.

Скрипт для переноса баз c диска G:\SQL\ в папку на диск D:\SQL_Base\

SQL cкрипт

DECLARE @Database NVARCHAR(255)   
DECLARE @DBName NVARCHAR(255) 
DECLARE @DBLogName NVARCHAR(255)
DECLARE @SQLString NVARCHAR(4000)
DECLARE @NewDBName NVARCHAR(255) 
DECLARE @NewLogName NVARCHAR(255)


SELECT 
B_Name.database_id,
Case 
	When B_Name.type = 0  Then B_Name.physical_name
End as DBase,
Case 
	When t_name.type = 1  Then t_Name.physical_name
End as LogBase  
INTO #work_Base
from master.sys.master_files as B_Name 

left join
  master.sys.master_files as t_Name 
	on B_Name.database_id = t_Name.database_id
Where B_Name.database_id >4 and B_Name.state = 0 
and B_Name.physical_name like 'G:\SQL\%' and B_Name.type = 0 and t_Name.type = 1


-- Отберем базы для выполнения операций
DECLARE DatabaseCursor CURSOR  FOR  
(
SELECT 
	t_Name.name as DatabaseName,
	--t_Name.database_id as database_id,
	Se.DBase,
	Se.LogBase
 
 FROM master.sys.databases  as t_Name 
  Right join   
  #work_Base as SE on t_Name.database_id = SE.database_id 
  WHERE t_Name.database_id > 4
  AND t_Name.state = 0 
)
-- Цикл по всем базам, попавшим в выборку
OPEN DatabaseCursor  
FETCH NEXT FROM DatabaseCursor INTO @Database, @DBName, @DBLogName    
WHILE @@FETCH_STATUS = 0  
BEGIN
   BEGIN TRY   
 
		SET @SQLString = 'USE [master]; ALTER DATABASE [' + @Database + '] SET  SINGLE_USER WITH ROLLBACK IMMEDIATE; USE [master]; EXEC master.dbo.sp_detach_db @dbname = N''' + @Database + ''';'     
		--PRINT @SQLString
		Exec (@SQLString)

		Set @NewDBName = 'D:\SQL_Base\' + @Database + '.mdf'
		Set @NewLogName = 'D:\SQL_Base\' + @Database + '_log.ldf'

		--Копируем Базу данных
		SET @SQLString = 'copy '+ @DBName +' '+@NewDBName
		--PRINT @SQLString
		Exec xp_cmdshell @SQLString
		--Копируем Лог базы
		SET @SQLString = 'copy '+ @DBLogName +' '+@NewLogName
		--PRINT @SQLString
		Exec xp_cmdshell @SQLString			


	 
		SET @SQLString = 'USE [master]; CREATE DATABASE [' + @Database + '] ON ( FILENAME = N'''+@NewDBName+''' ),( FILENAME = N'''+@NewLogName+''' ) FOR ATTACH '
		--PRINT @SQLString
		Exec (@SQLString)

		PRINT 'База ' + @Database +' успешно перенесена' 
      END TRY
      BEGIN CATCH
	 
      PRINT '---'
         PRINT @SQLString
         PRINT ERROR_MESSAGE() 
         PRINT '---'
	-- Удаление временной таблицы
		DROP TABLE #work_Base;
      END CATCH

   FETCH NEXT FROM DatabaseCursor INTO @Database,@DBName, @DBLogName   
END  
CLOSE DatabaseCursor   
DEALLOCATE DatabaseCursor


  -- Удаление временной таблицы
DROP TABLE #work_Base;
GO

–

См. также

Нестандартное решение пересчета итогов

Администрирование СУБД Платформа 1С v8.3 Бесплатно (free)

Статья для тех, кто столкнулся с необходимостью пересчета итогов для "больших таблиц" и нет возможности поставить на паузу ИБ для проведения работ.

25.04.2024 472 virustam 27

Идентификация пользователя не выполнена

Администрирование СУБД Платформа 1С v8.3 1С:Бухгалтерия 3.0 Россия Бесплатно (free)

Иногда в конфигурации 1С:Бухгалтерский учет v3.0 возникает ситуация, когда программа всем пользователям выдает предупреждение, что авторизация не выполнена и работа программы будет завершена. Данная инструкция позволяет решить возникшую проблему.

24.04.2024 241 Yan_Malyakov 0

Устранение ошибки выполнения скрипта "Создать сервис RAGENT" в ЦКК

Администрирование СУБД Платформа 1С v8.3 Конфигурации 1cv8 Россия Бесплатно (free)

В статье показано, как устранить ошибку выполнения скрипта "Создать сервис RAGENT" в системах 1С:Центр контроля качества или в 1С:Центр автоматизации. Будет полезна администраторам ЦКК и ЦА, которые только начали знакомство с этими системами.

18.04.2024 346 artemusII 0

Долгая реструктуризация, замеры времени и очистка Ветис. Розница 2.3

HighLoad оптимизация Администрирование СУБД Платформа 1С v8.3 1С:Розница 2 Розничная и сетевая торговля (FMCG) Россия Бесплатно (free)

При подготовке к обновлению возникли проблемы на стадии тестирования и исправления базы данных, также при создании файлов РИБ для магазинов.

16.04.2024 357 xKaskadx 4

Установка и получение лицензии на базовую конфигурацию 1С на Mac OS

Администрирование СУБД Платформа 1С v8.3 Бесплатно (free)

Установить купленную базовую конфигурацию 1С и получить лицензию на MAC OS не так просто, как кажется на первый взгляд и как хотелось бы. Официально в системных требованиях на базовую конфигурации 1С пишет всякие виндовсы и пару-тройку линуксов. МакОс там нет. В статье расскажу, как все-таки поставить на Мак базовую конфигурацию 1С.

11.04.2024 390 pahmutov 0

Установка тонкого клиента 1С на Rasbian (Raspberry Pi 5)

Администрирование СУБД Платформа 1С v8.3 Бесплатно (free)

После приобретения Raspberry Pi 5 решил проверить, есть ли возможность использования устройства для организации тонкого клиента. В результате столкнулся с особенностью установки 1С: Предприятие 8.3.23 на Raspbian, решением которой я хочу поделиться с сообществом.

07.04.2024 728 Bessome 4

Порционный шринк базы

Администрирование СУБД Бесплатно (free)

Скрипт позволяет высвобождать место в операционную систему, занятое файлом базы MS SQL в итерациях с заданным количеством мегабайт

28.03.2024 1327 Garilia 3

Создаем сценарии обслуживания SQL в Центре Контроля Качества 1С (Центр Администрирования)

Администрирование СУБД Платформа 1С v8.3 Бесплатно (free)

Данная статья научит вас, как создавать скрипты обслуживания MS SQL для Центра Контроля Качества (ЦКК) или Центра Администрирования (ЦА).

20.03.2024 797 Silenser 0

Комментарии

Подписаться на ответы Инфостарт бот

Свернуть все

1. tchee 19 14.03.23 13:21 Сейчас в теме

С ужасом представил себе сколько времени займет такой переезд баз хотя бы гигов в пятьсот каждая и что потом придется с регламентами обслуживания в скуле делать....
Нде уж.

2. VPanin56 537 14.03.23 14:01 Сейчас в теме

Мои 139 баз весили 450 Гб в сумме, у нас в основном типовушки БП и ЗУП.
И самая большая база весит около 12-14 Гб.

Регламент обслуживания это моя давнишняя боль. 250 баз перестроить индексы и обновить статистику типовыми механизмами обслуживания SQL не может. Дефрагментация индексов из построителя длилась 2-3 суток и была прибита, т.к. начала тормозить сервак в понедельник утром.
В ходе изучения материалов по этой теме нашел пару публикаций интересных скриптов и подхода к этому вопросу, написал (из двух один ) нужный мне по алгоритму SQL скрипт и разделил на 3 потока все базы по выполнению перестроения индексов , теперь успевают раз в неделю за ночь перестроить индексы сильно дефрагментированные и обновить статистику.
По личным наблюдениям\ощущениям ( без замеров) как будто немного поживее стали работать базы.

Может соберусь с силами и поделюсь таким механизмом перестроения индексов.