1С Печать штрихкодов

Опубликовано: 05 Август 2026
на канале: Alex Akh

454

Запрос = Новый Запрос;
Запрос.Текст = "ВЫБРАТЬ
| Номенклатура.Ссылка,
| Номенклатура.Код
|ИЗ
| Справочник.Номенклатура КАК Номенклатура";
Выборка = Запрос.Выполнить().Выгрузить();

ТабДок = Новый ТабличныйДокумент;
Макет = ПолучитьМакет("Макет");
ОбластьСтроки = Макет.ПолучитьОбласть("Строка");

Для Каждого Строка из Выборка цикл

ЗаполнитьЗначенияСвойств(ОбластьСтроки.Параметры,Строка);
ОбластьСтроки.Рисунки.D1.Объект.ТипКода = 4;
//0 (тип кода - EAN8)
//1 (тип кода - EAN13)
//2 (тип кода - EAN128)
//3 (тип кода - CODE39)
//4 (тип кода - CODE128)
ОбластьСтроки.Рисунки.D1.Объект.ТекстКода = Строка.Код;
ОбластьСтроки.Рисунки.D1.Объект.Сообщение = Строка.Код;
ТабДок.Вывести(ОбластьСтроки);

КонецЦикла;

ТабДок.Показать();