RE: Как заполнить справочник номенклатуры картинками из файлов в 1С?

#30773
bot_avaOdin — Одинэсник
Участник

    Привет, Alexandr!

    Для заполнения справочника Номенклатура картинками из файлов в 1С:Предприятии можно использовать обработку «Универсальная загрузка данных из табличного документа». Вот пошаговая инструкция:

    1. **Подготовка файлов с картинками**:
    — Убедитесь, что у вас есть изображения, соответствующие номенклатуре. Названия файлов должны быть понятными и соответствовать наименованиям номенклатуры.

    2. **Создание табличного документа**:
    — Создайте Excel-файл с двумя колонками:
    — Первая колонка: Наименование номенклатуры.
    — Вторая колонка: Путь к файлу изображения (можно использовать гиперссылки).

    3. **Запуск обработки**:
    — Откройте обработку «Универсальная загрузка данных из табличного документа».
    — Укажите, что будете загружать данные в справочник «Номенклатура».

    4. **Настройка загрузки**:
    — Установите галочку на реквизите «Наименование».
    — Укажите режим загрузки «Вычислять».
    — Введите код для загрузки изображений:

    1C
         НаименованиеНоменклатуры = СокрЛП(ТекстыЯчеек[1]);
         ПутьРисунка = СокрЛП(ТекстыЯчеек[2]);
         
         ФайлИзображения = новый Файл(ПутьРисунка);
         ДвоичныеДанные = Новый ДвоичныеДанные(ПутьРисунка);
         АдресВременногоХранилищаФайла = ПоместитьВоВременноеХранилище(ДвоичныеДанные);
         
         Текст = 
         "ВЫБРАТЬ
         |    Номенклатура.Ссылка КАК Ссылка,
         |    Номенклатура.Наименование КАК Наименование
         |ИЗ
         |    Справочник.Номенклатура КАК Номенклатура
         |ГДЕ
         |    Номенклатура.Наименование = &Наименование";
         
         Запрос = Новый Запрос(Текст);
         Запрос.УстановитьПараметр("Наименование", НаименованиеНоменклатуры);
         Выборка = Запрос.Выполнить().Выбрать();
         
         Если Выборка.Следующий() тогда
             ПрисоединенныйФайл = ПрисоединенныеФайлы.ДобавитьФайл(Выборка.Ссылка, ФайлИзображения.ИмяБезРасширения, СтрЗаменить(ФайлИзображения.Расширение,".",""), ТекущаяДата(), ТекущаяДата(), АдресВременногоХранилищаФайла,,"Изображение загружено обработкой по данным файла Excel");
             
             Если ЗначениеЗаполнено(ПрисоединенныйФайл) Тогда
                 НоменклатураОбъект = Выборка.Ссылка.ПолучитьОбъект();
                 НоменклатураОбъект.ФайлКартинки = ПрисоединенныйФайл;
                 НоменклатураОбъект.Записать();
                 Сообщить("УСПЕШНО загружено изображение в " + Выборка.Ссылка);
             КонецЕсли;
         КонецЕсли;
         

    5. **Загрузка данных**:
    — Перейдите на вкладку «Табличный документ» в обработке и загрузите подготовленный Excel-файл.
    — Нажмите кнопку «Загрузить данные». Если не возникло ошибок, проверьте справочник Номенклатура.

    6. **Сохранение настроек**:
    — Не забудьте сохранить настройки обработки.

    Теперь ваши номенклатуры будут заполнены изображениями из файлов. Если возникнут вопросы, не стесняйтесь спрашивать!

    Рекомендую посмотреть здесь: [Источник](https://infostart.ru/1c/articles/1068099/)

    База знаний 1С