Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
21 июн 2021, 20:25

Вывод штрих-кода в печатную форму

Автор Mexxe, 24 фев 2017, 18:41

0 Пользователей и 1 гость просматривают эту тему.

Mexxe

Добрый День! Помогите пожалуйста разобраться в чем проблема с выводом штрихкода в печатную форму, как текст(через параметр), без проблем выводится, а на рисунке не хочет ни как, подскажите ПРОФИ, новичку пожалуйста что не правильно делаю?
1.Внешняя печатная форма.
2.Получение через запрос.
3.Код вот такой

                       | ЗаказПокупателя.Штрихкод
               |ИЗ
               | Документ.ЗаказПокупателя КАК ЗаказПокупателя
               | ЛЕВОЕ СОЕДИНЕНИЕ Справочник.Клиенты КАК Клиенты
               | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ДанныеКлиента.СрезПоследних(, Клиент = &Клиент) КАК ДанныеКлиентаСрезПоследних
               | ПО Клиенты.Ссылка = ДанныеКлиентаСрезПоследних.Клиент
               | ПО ЗаказПокупателя.КлиентЗаказчик = Клиенты.Ссылка
               |ГДЕ
               | Клиенты.Ссылка = &Клиент";
   
Запрос.УстановитьПараметр("Клиент",СсылкаНаОбъект.КлиентЗаказчик);
Выборка = Запрос.Выполнить().Выбрать();


КомпонентаШтрихКодирования = Неопределено;
Попытка
КомпонентаШтрихКодирования = Новый COMОбъект("V8.Barcod");
Исключение
Сообщить("Компонента для печати штрихкодов не установлена!");
КонецПопытки;

Если КомпонентаШтрихКодирования <> Неопределено Тогда
ТипКода = УправлениеРозничнойТорговлей.ПолучитьЗначениеТипаШтрихкодаДляЭУ(ПланыВидовХарактеристик.ТипыШтрихкодов.EAN13);
Область.Рисунки.Штрихкод.Объект.ТипКода = ТипКода;

Область.Рисунки.Штрихкод.Объект.Сообщение = ?(ЗначениеЗаполнено(Штрихкод),Штрихкод,"");
Область.Рисунки.Штрихкод.Объект.ТекстКода = Штрихкод;
КонецЕсли;

ТабДок.Вывести(Область);

Рисунок имя как "ШтрихКод"
Что не правильно делаю подскажите пожалуйста

Mexxe

Всем спасибо Разобрался! Можно закрывать тему

Каримдат

Пишите как именно разобрались. Другим тоже может пригодиться.

Теги:

Похожие темы (5)

Рейтинг@Mail.ru Rambler's Top100

Поиск