Выгрузка - загрузка изображений из справочника "Хранилище дополнительной информации" 1С 8.1

09.04.15

Интеграция - Файловый обмен (TXT, XML, DBF), FTP

"Управление торговлей", редакция 10.2 + производство 1.0
Столкнулся с тем, что пользователи продолжительное время загружали изображения в BMP. В результате база сильно раздута. Написана обработка, выгружающая Изображения в одном из выбранных форматов (из справочника "ХранилищеДополнительнойИнформации") в папку на жесткий диск. Имена файлов преобразуются в "УникальныйИдентификатор" элемента справочника. Далее сторонней программой (я использовал фотошоп с написанным скриптом автоматизации) файлы конвертировались в JPG. По такому же принципу ("УникальныйИдентификатор") Изображения загружались обратно в базу.  

Файлы

ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.

Наименование Скачано Купить файл
СохранитьЗагрузитьИЗО.epf
.epf 9,30Kb ver:v2
24 1 850 руб. Купить

Подписка PRO — скачивайте любые файлы со скидкой до 85% из Базы знаний

Оформите подписку на компанию для решения рабочих задач

Оформить подписку и скачать решение со скидкой

В обработке можно выбрать количество выгружаемых изображений за раз (чтобы не "затормаживать" базу на продолжительное время)

Также Вы можете выбрать формат и расширение для выгружаемых / загружаемых изображений и каталоги.

-----------------------------------------------

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

Выборку из справочника быстрее, конечно, делать запросом.

 

 

 

Процедура СохранитьИзоНажатие()

    ВыборкаИзо = Справочники.ХранилищеДополнительнойИнформации.Выбрать();

    Пока ВыборкаИзо.Следующий() Цикл

       Если ВыборкаИзо.ВидДанных = Перечисления.ВидыДополнительнойИнформацииОбъектов.Изображение Тогда

       ЗапКартинка = Новый Картинка();
       ЗапКартинка = ВыборкаИзо.Хранилище.Получить();

       ФорматК = ЗапКартинка.Формат();

          Если ФорматК = ФорматКартинки.BMP Тогда

        
          ИмяК = Новый УникальныйИдентификатор;
          ИмяК = ВыборкаИзо.Ссылка.УникальныйИдентификатор();


          Попытка

           ЗапКартинка.Записать("C:\" + ИмяК + "." + ФорматК);
         
          Исключение
           Предупреждение("Ошибка при записи файла" + ВыборкаИзо.Наименование);

          КонецПопытки;

          КонецЕсли;

       КонецЕсли;

    КонецЦикла;



КонецПроцедуры

 


Процедура ЗагрузитьИзоНажатие()

    ФайлыИзо = НайтиФайлы("C:\", "*.jpg");

    Для Каждого ЭлементМассива Из ФайлыИзо Цикл

        УИН = Новый УникальныйИдентификатор(ЭлементМассива.ИмяБезРасширения);
        СсылкаХДИ = Справочники.ХранилищеДополнительнойИнформации.ПолучитьСсылку(УИН);

        ХДИ = СсылкаХДИ.ПолучитьОбъект();

        НКартинка = Новый Картинка (ЭлементМассива.ПолноеИмя, Ложь);
        ХДИ.Хранилище = Новый ХранилищеЗначения(НКартинка, Новый СжатиеДанных());
        ХДИ.Записать();

    КонецЦикла;

КонецПроцедуры


Вступайте в нашу телеграмм-группу Инфостарт

ХранилищеДополнительнойИнформации Загрузка изображений Выгрузка изображений Изображения Картинки

См. также

SALE! 10%

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Системный администратор Программист 1С v8.3 1С:Розница 2 1С:Управление нашей фирмой 1.6 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 1С:Розница 3.0 Россия Платные (руб)

Правила в универсальном формате обмена для ERP 2.5, КА 2.5, УТ 11.5, БП 3.0, Розница, УНФ, для последних версий конфигураций. Ссылки на другие конфигурации в описании публикации. Правила совместимы со всеми другими версиями конфигураций новыми и старыми, поддерживающими обмен и синхронизацию в формате EnterpriseData. Не требуется синхронного обновления правил после обновления другой конфигурации, участвующей в обмене. Типовой обмен через планы обмена кнопкой Синхронизация вручную или автоматически по расписанию, или вручную обработкой.

29040 руб.

12.06.2017    154382    909    304    

468

SALE! 10%

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Системный администратор Программист 1С v8.3 1С:Комплексная автоматизация 1.х 1С:Управление производственным предприятием 1С:Бухгалтерия 3.0 Россия Бухгалтерский учет Платные (руб)

Перенос данных из 1С:Управление производственным предприятием 1.3 в 1С:Бухгалтерия предприятия 3.0 с помощью правил обмена | Можно выполнить переход с УПП на БП 3 или запускать выгрузку данных за выбранный период времени | Переносятся документы, начальные остатки и вся справочная информация | Есть фильтр по организации и множество других параметров выгрузки | Поддерживается несколько сценариев работы: как первичный полный перенос, так и перенос только новых документов | Перенос данных возможен в "1С: Бухгалтерия 3.0" версии ПРОФ, КОРП или базовую | Переход с "1С: УПП1.3" / "1С:КА 1.1" на "1С:БП3.0" с помощью правил конвертации будет максимально комфортным! | Можно бесплатно проверить перенос на вашем сервере!

52967 47670 руб.

25.02.2015    178761    333    279    

399

SALE! 10%

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Программист 1С v8.3 1С:ERP Управление предприятием 2 1С:Комплексная автоматизация 2.х 1С:Зарплата и Управление Персоналом 3.x Россия Бухгалтерский учет Управленческий учет Платные (руб)

Перенос данных из ERP в ЗУП 3 | из КА 2 в ЗУП | Готовые правила конвертации данных (КД 2) для переноса остатков, документов с движениями и справочной информации 3 | Есть перенос начальной задолженности по зарплате и начальной штатной расстановки на выбранную дату | Обороты за прошлые годы (данные для расчета среднего) переносятся свернуто в документ "Перенос данных" | Есть фильтр по организациям | Документы за текущий период переносятся сразу с движениями, поэтому не потребуется делать перерасчеты | Перенос можно проверить перед покупкой, обращайтесь!

58422 52580 руб.

03.12.2020    42611    123    76    

116

SALE! 10%

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Программист 1С v8.3 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Россия Платные (руб)

Перенос данных из ERP в БП 3 | из КА 2 в БП 3 | из УТ 11 в БП 3 | из ЕРП в БП 3 | Сэкономьте время - используйте готовое решение для перехода! | Перенос разработан в формате КД 2 (правила конвертации данных) | Переносятся все возможные виды документов, начальных остатков и нормативно-справочная информация| Можно опционально выгружать каждую пару "номенклатура+характеристика" как отдельную номенклатуру | Есть выгрузка настроек счетов учета и зарплатных данных из ERP / КА 2 | Можно проверить на вашем сервере перед покупкой

61356 55220 руб.

15.04.2019    79724    214    165    

153

SALE! 10%

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Системный администратор Программист 1С v8.3 1С:Управление производственным предприятием 1С:Бухгалтерия 3.0 Россия Бухгалтерский учет Управленческий учет Платные (руб)

Перенос данных из 1С:Управление производственным предприятием 1.3 в 1С:Бухгалтерия предприятия 3.0 с помощью правил обмена. Переносятся остатки, документы (обороты за период), справочная информация. Правила проверены на конфигурациях УПП 1.3 (1.3.255.x) и БП 3.0 (3.0.183.x). Правила подходят для версии ПРОФ и КОРП.

38000 34200 руб.

15.12.2021    30383    219    58    

162

SALE! 10%

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Программист 1С v8.3 Сложные периодические расчеты 1С:Комплексная автоматизация 1.х 1С:Управление производственным предприятием 1С:Зарплата и Управление Персоналом 3.x Россия Бухгалтерский учет Платные (руб)

Правила переноса кадровых и расчетных данных и справочной информации из "1С:УПП1.3" или "1С:КА 1.1" в "1С:ЗУП 3.1 | Разработан в формате КД 2 (правила конвертации данных) | При выгрузке есть фильтр по организациям | Обновляется при выходе новых релизов 1С | Развитие алгоритмов | Расчетные документы переносятся в документ "Перенос данных" | Создаются документы "Начальная штатная расстановка" и "Начальная задолженность по зарплате", переносятся кадровые документы

61356 55220 руб.

29.10.2018    59751    69    122    

68

Операции по ВЭД Файловый обмен (TXT, XML, DBF), FTP Программист Бухгалтер 1С v8.3 Бухгалтерский учет 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 Россия Бухгалтерский учет Платные (руб)

Федеральная таможенная служба России давно поддерживает унифицированный формат электронных документов для обмена с информационными системами предприятий. xmlns="urn:customs.ru:Information:ExchangeDocuments:". Структура, утвержденная комиссией Таможенного союза. Осталось только сделать загрузку в 1С из этого формата. На выходе - два документа ГТД по импорту и Поступление (акты, накладные) Обработка актуализирована на начало 2025 года

4800 руб.

09.08.2016    89765    338    378    

94

Загрузка и выгрузка в Excel Логистика, склад и ТМЦ Ценообразование, анализ цен Файловый обмен (TXT, XML, DBF), FTP Бухгалтер Пользователь 1С v8.3 1С:Бухгалтерия 2.0 1С:Управление торговлей 10 1С:Розница 2 1С:Управление нашей фирмой 1.6 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 1С:Розница 3.0 Платные (руб)

Эволюция не стоит на месте - новая удобная версия функциональной обработки для Вашего бизнеса! Что же Вы получаете? Удобный и интуитивно понятный интерфейс с 3-мя этапами работы. 2 режима - автоматический и ручной. Чтение XLSX, XLSM, CSV, XML/YML форматов без офиса, на любом сервере! Визуальное связывание колонок файла и реквизитов простым перетаскиванием колонок. Создание или обновление номенклатуры с иерархией, характеристик, доп. реквизитов, упаковок, загрузка практически неограниченного количества картинок на одну номенклатуру (с возможностью загрузки в несколько потоков одновременно), с хранением в томах или в базе. Загрузка номенклатуры поставщиков или поиск по их данным номенклатуры. Загрузка доп. реквизитов в характеристики. Загрузка штрихкодов с генерацией новых. Создание элементов справочников и ПВХ "на лету" для выбранных реквизитов. (Обновление от 17.11.2025, версия 9.13 - 10.5)

19200 руб.

20.11.2015    168860    419    389    

538
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. dj_serega 395 09.04.15 23:06 Сейчас в теме
1. А почему нет выбора каталога? (если диска D нет)
2. Сохраняем: BMP
Если ФорматК = ФорматКартинки.BMP Тогда
Загружаем:
ФайлыИзо = НайтиФайлы("D:\Temp_izo\1\", "*.jpg");
2. chastliviy 10 10.04.15 08:59 Сейчас в теме
Выложил сам принцип, потому что не нашел похожего в интернете. Для создания своего каталога, воспользуйтесь: СоздатьКаталог(ИмяКаталога).
3. dj_serega 395 10.04.15 11:03 Сейчас в теме
(2) так сделайте рабочий вариант без принципов. и тогда люди потянутся.
1. Выбор каталога.
2. Выбор типов файлов.
Это необходимый минимум.
4. Fox-trot 166 10.04.15 21:45 Сейчас в теме
Пока ВыборкаИзо.Следующий()=1 Цикл

впечатлен 8-0
5. spotegg 15.05.20 12:24 Сейчас в теме
А если пользователи загружали PDF, а не только картинки, то сменив код:
Если ФорматК = ФорматКартинки.BMP Тогда
на
Если ФорматК = ФорматКартинки.PDF Тогда

будет работать выгрузка?

тоже самое для выгрузки:
ФайлыИзо = НайтиФайлы("C:\", "*.pdf");


Или так не сработает?
Для отправки сообщения требуется регистрация/авторизация