Добавление произвольной картинки (факсимиле, виза, подпись и т.д.) в шаблон документа (Microsoft Word doc., docx.) для конфигурации 1С: Документооборот 2.1 с минимальными изменениями в конфигурации

28.02.17

Разработка - Работа с интерфейсом

В данном примере представлен небольшой сниппет для добавления картинок (подписи, визы, факсимиле) к шаблону документа (Microsoft Word doc., docx.) в системе 1С: Документооборот 2, используя типовую функцию вставки штрихкода.

Внимание! Эта публикация предназначена для начинающих разработчиков/программистов как пример использования типовых процедур и функций входящих в БСП.

В данном примере приведенный фрагмент кода добавлен в процедуру 

 ПослеЗаписиНаСервере()

после блока, в котором выполняется типовая вставка штрихкода и автоматическое заполнение шаблонов. Картинка забирается из справочника "Файлы" по привязке к конкретному пользователю, который является отвественным лицом на текущую дату для организации, указанной в документе (в данном примере  - ВнутреннийДокумент).

Непосредственно код:

Если Приемник.ВладелецФайла.Шаблон.ВидДокумента = Справочники.ВидыВнутреннихДокументов.НайтиПоНаименованию("Распоряжение") ИЛИ
    Приемник.ВладелецФайла.Шаблон.ВидДокумента = Справочники.ВидыВнутреннихДокументов.НайтиПоНаименованию("Приказ по общей деятельности предприятия") Тогда
    ДанныеОШтрихкоде = ШтрихкодированиеСервер.ПолучитьДанныеДляВставкиШтрихкодаВОбъект(Приемник);
    МассивСвойств = Новый Массив;
    МассивСвойств.Добавить(ПланыВидовХарактеристик.ДополнительныеРеквизитыИСведения.НайтиПоНаименованию("Файл подписи"));
    ОтветственноеЛицо = РаботаСОрганизациями.ПолучитьОтветственноеЛицо("Руководитель", Объект.Организация, ТекущаяДата());
    Если ЗначениеЗаполнено(ОтветственноеЛицо) Тогда
        Результат = УправлениеСвойствами.ПолучитьЗначенияСвойств(ОтветственноеЛицо, Истина, Ложь,МассивСвойств);
        Если Результат.Количество() > 0 Тогда
            ДвоичныеДанныеКартинки = РаботаСФайламиВызовСервера.ПолучитьДвоичныеДанныеФайла(Результат[0].Значение.Ссылка);
            Попытка 
                ШтрихкодированиеКлиентСервер.ВставитьШтрихкодВместоТэга(Приемник.Ссылка,
                "ВставитьИзображениеПодписи", 
                Ложь, 
                ДвоичныеДанныеКартинки, 
                ДанныеОШтрихкоде.ДвоичныеДанныеФайла,
                ДанныеОШтрихкоде.Расширение,
                ДанныеОШтрихкоде.ФайлРедактируется,
                ДанныеОШтрихкоде.ИзменениеФайловMSWordТолькоНаСервере,
                10);
            Исключение
            КонецПопытки;		
        КонецЕсли;
    КонецЕсли;
КонецЕсли;

Фрагмент представлен как есть, без рефакторинга. Если кому-то захочется оформить через свою функцию в общем модуле, пожалуйста.

Логика:

  1. Сначала проверяем условие, для каких видов документов будет выполняться данный код
  2. Получаем пользователя, который является действующим ответственным лицом для указанной в документе организации
  3. Получаем значение дополнительного реквизита с  наименованием "Файл подпись" у найденного пользователя
  4. Вставляем полученную картинку, применяя типовую функцию ВставитьШтрихкодВместоТэга()

P.S.: Последний параметр функции ВставитьШтрихкодВместоТэга определяет высоту картинки.

Документооборот картинка факсимиле попдись doc docx

См. также

Работа с интерфейсом Программист Платформа 1С v8.3 Конфигурации 1cv8 1С:ERP Управление предприятием 2 Платные (руб)

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

2400 руб.

29.06.2020    17678    24    6    

38

Работа с интерфейсом Программист Платформа 1С v8.3 Бесплатно (free)

Пример простого и симпатичного прогресс-бара в динамическом списке, без картинок, используя редактирование запроса.

27.05.2024    5467    smielka    37    

96

Работа с интерфейсом Платформа 1С v8.3 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Зарплата и Управление Персоналом 3.x 1С:Управление нашей фирмой 3.0 Бесплатно (free)

Добавьте новогоднего настроения! Расширение создает декорацию в виде гирлянды на некоторых формах объектов.

27.12.2023    12512    789    elcoan    47    

110

Инструментарий разработчика Работа с интерфейсом Программист Платформа 1С v8.3 Конфигурации 1cv8 Абонемент ($m)

Подходит для создания web-страниц для замены управляемых форм 1С, красивых отчетов, интерфейса мобильного приложения на платформе 1С и для простых страниц веб-сайтов.

2 стартмани

10.04.2023    10697    158    acces969    31    

120

Работа с интерфейсом Программист Платформа 1С v8.3 Конфигурации 1cv8 Абонемент ($m)

"MVC плохо применима в 1С" - познакомьтесь с моделью состояния и, возможно, ваше мнение поменяется! Представленное решение является эволюционным развитием идеи реализации MVC для 1С. В новой версии добавлены DSL для описания модели состояния, а также параметризация свойств параметров и элементов формы.

1 стартмани

05.07.2022    4630    kalyaka    6    

32

Работа с интерфейсом Платформа 1С v8.3 Платные (руб)

Подсистема условного оформления элементов форм (далее подсистема) предназначена для настройки оформления элементов форм (видимость, доступность, цвет фона, цвет текста и прочее) в пользовательском режиме 1С. Также подсистему возможно использовать для ограничения доступа к реквизитам формы для определенных пользователей (или групп пользователей).

6000 руб.

18.01.2022    9388    1    2    

6
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. surem 20.12.18 09:44 Сейчас в теме
Спасибо большое за статью. У меня возникает неизвестная ошибка. Отключила макросы с уведомлением. Когда открываю файл без 1С, то все нормально. Через 1С возникает опять неизвестная ошибка.
Прикрепленные файлы:
2. ikalmykia 06.03.20 14:11 Сейчас в теме
Подскажите, где найти функцию ВставитьШтрихкодВместоТэга? в какой конфигурации взяли?
3. molethe 30.08.22 10:41 Сейчас в теме
(2)
ВставитьШтрихкодВместоТэга


В заголовке же указано, что это конфигурация 1С: Документооборот 2. От себя добавлю, что данная функция есть только в версии КОРП.
4. Kontakt 109 01.03.23 07:53 Сейчас в теме
>>P.S.: Последний параметр функции ВставитьШтрихкодВместоТэга определяет высоту картинки.

Как определить высоту изображения? значение по умолчанию сильно растягивает или сжимает .
5. sksoft007 17.03.24 07:51 Сейчас в теме
(4) я опытным путем определил и вставил конечную цифру (40 получилось)
6. sksoft007 17.03.24 07:56 Сейчас в теме
Автор, спасибо большое за статью! Очень помогла! Делал задачу по выводу qr кода в шаблон документа (1С Документооборот 3.0 КОРП). Код один к одному использовать не получилось, но идею взял у Автора.
Оставьте свое сообщение