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

09.04.15

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

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

Файлы

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

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

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

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

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

Вы можете заказать платную доработку или адаптацию этой разработки под вашу конфигурацию на «Бирже заказов».

  • 0% комиссии — оплата напрямую исполнителю;
  • Исполнители любого масштаба — от отдельных специалистов до команд под проект;
  • Прямой обмен контактами между заказчиком и исполнителем;
  • Безопасная сделка — при необходимости;
  • Рейтинги, кейсы и прозрачная система откликов.

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

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

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

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

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

 

 

 

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

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

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

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

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

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

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

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


          Попытка

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

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

          КонецЕсли;

       КонецЕсли;

    КонецЦикла;



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

 


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

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

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

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

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

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

    КонецЦикла;

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


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

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

См. также

SALE! 10%

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

Переносите справочную информацию, остатки и документы из УПП 1.3 в Бухгалтерию 3.0 с помощью готовых правил. Переносится более 50 видов документов. Простой интерфейс и понятные настройки.

42000 37800 руб.

15.12.2021    34154    259    64    

194

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Системный администратор Программист 1С:Предприятие 8 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. Не требуется синхронного обновления правил после обновления другой конфигурации, участвующей в обмене. Типовой обмен через планы обмена кнопкой Синхронизация вручную или автоматически по расписанию, или вручную обработкой.

27633 руб.

12.06.2017    160682    966    317    

482

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Системный администратор Программист 1С:Предприятие 8 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" с помощью правил конвертации будет максимально комфортным! | Можно бесплатно проверить перенос на вашем сервере!

50050 руб.

25.02.2015    188201    359    289    

418

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

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

50600 руб.

21.05.2019    58036    81    131    

73

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

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

58000 руб.

15.04.2019    83994    225    175    

161

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

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

58000 руб.

29.10.2018    62762    82    132    

81

Внешние источники данных Кадровый учет Файловый обмен (TXT, XML, DBF), FTP Перенос данных 1C Программист 1С:Предприятие 8 1С:Зарплата и кадры государственного учреждения 3 Государственные, бюджетные структуры Россия Бухгалтерский учет Бюджетный учет Платные (руб)

Обработка позволяет перенести кадровую информацию и данные по заработной плате, фактическим удержаниям, НДФЛ, вычетам, страховым взносам из базы Парус 10 учреждений (далее Парус) в конфигурацию 1С:Зарплата и кадры государственного учреждения ред. 3 (далее 1С) и начать с ней работать с любого месяца года.

85400 руб.

05.10.2022    13427    15    8    

16
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. dj_serega 396 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 396 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");


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