Если код <> 0 Тогда //Проверка результата генерации штрихкода
Сообщить(строка(код) + " - " + barcode.ErrorDescription);
Возврат Неопределено;
КонецЕсли;
рис = ОбластьДанных.Рисунки.D1;
рис.РазмерКартинки = РазмерКартинки.Пропорционально;
рис.Линия = Новый Линия(ТипЛинииРисункаТабличногоДокумента.НетЛинии); //Вокруг штрихкода не должно быть рамки
рис.Картинка = Новый Картинка(ИмяФайла);//Загрузка картинки со штрихкодом
//Указывается то же имя файла, что и в SavePicture
//ТабДок.Вывести(Область);
УдалитьФайлы(ИмяФайла);//Стереть временный файл с картинкой