gifts2017

Перенос файлов из томов в информационную базу для 1С Документооборот

Опубликовал С К (kraynev-navi) в раздел Администрирование - Системное

Изменение способа хранения вложений (из файлов в БД) и копирование всей информации

После года работы с конфигурацией было принято политическое решение перенести накопленные гигабайты внутрь БД. Поиском нашлись лишь стандартные входящие в поставку Документооборота обработки ПереносФайловВТома_ХХХ.epf.
По фразе "смена способа хранения файлов" ничего ценного найдено не было. При простом переключении в настройках варианта хранения переноса файлов из одного места в другое не происходит. Пришлось писать свою обработку.

К счастью в Документообороте хранение организовано просто без заморочек. Задействованы лишь несколько объектов: справочник ВерсииФайлов, регистр сведений ХранимыеФайлыВерсий и перечисление ТипыХраненияФайлов.

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

	// идем по все элементам справочника ВерсииФайлов 	
Запрос = Новый Запрос; Запрос.Текст = "ВЫБРАТЬ
                | ВерсииФайлов.Ссылка,
                | ВерсииФайлов.ПутьКФайлу,
                | ВерсииФайлов.Размер,
                | ВерсииФайлов.Том.ПолныйПутьWindows Как ПолныйПутьWindows
                |ИЗ
                | Справочник.ВерсииФайлов КАК ВерсииФайлов
                |УПОРЯДОЧИТЬ ПО
                | ВерсииФайлов.ДатаСоздания"
; РезультатЗапроса = Запрос.Выполнить(); ВДЗ = РезультатЗапроса.Выбрать(); Пока ВДЗ.Следующий() Цикл Если ВДЗ.ПутьКФайлу="" Тогда
                       
Продолжить;
                КонецЕсли; ПолныйПуть = ВДЗ.ПолныйПутьWindows+ВДЗ.ПутьКФайлу; Попытка
Файл = Новый ДвоичныеДанные(ПолныйПуть); ХЗ = Новый ХранилищеЗначения(Файл); Исключение
Сообщить(ВДЗ.ПутьКФайлу + " считывание и помещение в ХЗ породило ошибку: "+ОписаниеОшибки()); Продолжить; КонецПопытки; // обновим запись РС
Попытка
 
        МенеджерЗаписи = РегистрыСведений.ХранимыеФайлыВерсий.СоздатьМенеджерЗаписи(); МенеджерЗаписи.ВерсияФайла = ВДЗ.Ссылка; МенеджерЗаписи.ХранимыйФайл = ХЗ; МенеджерЗаписи.Записать(Истина); Исключение
Сообщить(ВДЗ.Ссылка + " попытка записи в РС не удалась: "+ОписаниеОшибки()); Продолжить; КонецПопытки; // обновили Об = ВДЗ.Ссылка.ПолучитьОбъект(); Об.ПутьКФайлу = ""; Об.ТипХраненияФайла = Перечисления.ТипыХраненияФайлов.ВИнформационнойБазе; Об.Том = Справочники.ТомаХраненияФайлов.ПустаяСсылка(); Об.Записать(); КонецЦикла;


Перед выполнением обработки нужно в настройках документооборота убрать галку "Хранить файлы в томах на диске" (Настройки программы - Файлы).

На время выполнения обработки на всякий случай запретил сеансы и регламентные задания, выгнал всех из базы. Объем 2.2Гб переносился около 15 минут. Из 3500+ файлов не перенеслось три (физически отсутствовали файлы на диске по неизвестной пока причине). Но на целостность и работоспособность Документооборота они не влияют.
После успешного переноса файловое хранилище больше не потребуется, можно снести или убрать в архив.

p.s. В приложении готовая обработка по описанному алгоритму, сдобренная кнопочками и рюшечками.

Скачать файлы

Наименование Файл Версия Размер Кол. Скачив.
ПереносИзТомовВБазу
.epf 6,89Kb
04.02.14
44
.epf 6,89Kb 44 Скачать

См. также

PowerTools от 1 000
Подписаться Добавить вознаграждение

Комментарии

1. Александр Удалов (higs) 05.02.14 06:58
Здорово! Полезный механизм. Были мысли поступить с хранением файлов также.
Однако, у нас не за год 2 гига, а за месяц после начала работы уже гиг файлов. С одной стороны, бекап скульной базы все вытерпит, с другой, эти файлы и так лежат в рейдовом массиве.
Но возможность все же вернуть в базу - очень хорошо! Спасибо!
2. С К (kraynev-navi) 05.02.14 10:13
Один из доводов в пользу переезда в ИБ - все в одном месте. Тем более опыт с хранением внутри базы у нас положительный: на другой конфе в день +100 мегов и все нормально работает.
3. Андрей Киреев (FractonKireyev) 05.02.14 13:29
Я достаточно давно нечто подобное делал. На практике целостность хранения внутри БД выше, чем в томах на диске, если-бы изначально всё хранилось в БД - то не было-бы 3-х потерянных файлов...
Единственный совет, который хочется дать по поводу данного модуля - документы лучше хранить в сжатом виде. Т.е. в тексте модуля написать:

ХЗ = Новый ХранилищеЗначения(Файл, Новый СжатиеДанных( 9 ) );
// 9 - это максимальное сжатие. которое поддерживает платформа

Это никак не повлияет на выделение текста и индексирование (в документообороте это происходит при записи файла в БД), а вот размер базы сократится существенно. На быстродействие в процессе работы это так-же практически не влияет.
4. С К (kraynev-navi) 05.02.14 17:57
(3) Попробовал на тестовой базе вашу идею с максимальным сжатием. Занимаемый объем уменьшился на 8%. Быстродействие не измерял.
5. Илья Часовский (ChasovskiH) 30.09.14 09:15
После переноса файлов в БД База работает медленнее((((
6. Илья Часовский (ChasovskiH) 30.09.14 09:16
А есть ли в этой обработке возможность переноса файлов наоборот из БД в тома???
7. С К (kraynev-navi) 30.09.14 12:44
(6) В данной обработке нет. Но, если мне не изменяет память что-то было в комплект поставки самого ДО. Сейчас нет под рукой данной конфигурации, проверить не могу.
8. С К (kraynev-navi) 30.09.14 12:46
(5) На сколько медленнее? По ощущениям? :) Большая база?
10. Илья Часовский (ChasovskiH) 16.10.14 11:43
(8) kraynev-navi, заметно медленнее "тормозит по страшному" база 80 Гб Лучше хранить файлы отдельно.ну это из моего опыта
11. Илья Часовский (ChasovskiH) 16.10.14 11:48
(9) ansh15, а к чему мне эта статья? Я исхожу из своего опыта в работе с Документооборотом1с
12. Илья Часовский (ChasovskiH) 16.10.14 11:53
Если говорить проще, Лучше когда в базе хранятся прямые ссылки на файлы в томах. Т.е. при открытии файла не переворачивается вся база в поисках нужного, а открывает его по прямой ссылке.Если же все файлы хранятся в базе, при обращении к файлу система начинает его искать так как ссылки то прямой нет.!!!Как считаете при каком способе хранения база быстрей работать будет???
13. Андрей (ansh15) 16.10.14 13:44
(11) Там ответ на ваш вопрос.
14. Stas Bobkov (stas1kbob) 11.09.15 12:39
не работает в документообороте 2.0
15. Вася Пупкин (vasa444) 04.07.16 11:11
kraynev-navi хочу обсудить с вами работу свяжитесь со мной пожалуйста по почте sergeykmk2@yandex.ru
16. Алексей Мануйлов (Cybersant) 09.08.16 17:36
Подойдёт ли обработка для бухгалтерии 3.0?
17. С К (kraynev-navi) 10.08.16 13:25
(16) Увы, БП3 с файлами у нас нет, проверить не могу.
18. С К (kraynev-navi) 10.08.16 13:27
(14) Да. Когда обработка писалась ДО 2.0 в проекте не было )))
19. Алексей Мануйлов (Cybersant) 11.08.16 14:01
(17) kraynev-navi,
можно попросить поделитесь обработкой, прислав на почту? Как раз смогу потестировать
20. Алексей Мануйлов (Cybersant) 15.08.16 13:22
Протестировал с БП, ред. 3.0; увы, не работает(
Для написания сообщения необходимо авторизоваться
Прикрепить файл
Дополнительные параметры ответа