Заказы на доработку 1С (сервис удаленной работы)

Хранилище

База знаний
Неназначенных незавершенных заказов: 2
Бесплатные отчеты, обработки, конфигурации, внешние компоненты для 1С Статьи, описание работы, методики по работе с 1С

Здравствуйте, гость ( Войти | Зарегистрироваться )




>  Печать штрихкода
zimelya
Отправлено: 03.07.18, 3:51


Молчаливый
*

Группа: Пользователи
Сообщений: 2
Регистрация: 15.03.17
Пользователь №: 54988


andr_andrey @ Вчера, 20:04 * ,

Спасибо добрый человек, в жизни бы не додумался что оно именно так работает.
Синтаксис помощник меня ввел в заблуждение что рисунки отбирает только через макет.рисунки. и тд.
  Форум: Программирование в 1С Предприятие 8.3 · Просмотр сообщения: #143061 · Ответов: 2 · Просмотров: 3954
 

>  Печать штрихкода
zimelya
Отправлено: 02.07.18, 15:50


Молчаливый
*

Группа: Пользователи
Сообщений: 2
Регистрация: 15.03.17
Пользователь №: 54988


Добрый день! Прошу помощи, обыскал все интернеты и пусто.
Суть проблемы, в обработке делаю печать этикетки и рисунок штрихкода никак не изменяется, выводится стандартный(Скрин прилагается)

1с 8.3.8 1635
Розница 1.0 (1.0.11.1)

Процедура ОсновныеДействияФормыОсновныеДействияФормыВыполнить(Кнопка)
    Макет = Обработки.тест.ПолучитьМакет("Макет");
    ОбластьМакет = Макет.ПолучитьОбласть("Обл");
    ОбластьМакет.Параметры.Пар = "Текст";    
    
    Код = ПланыВидовХарактеристик.ТипыШтрихкодов.EAN13;
    ТипКода = ПолучитьЗначениеТипаШтрихкодаДляЭУ(Код);    
    ПредставлениеШтрихкода = "";
    КодШтрихкода = "110000123456";
    
    Если ТипКода > -1 Тогда
        Для Каждого Рисунок Из Макет.Рисунки Цикл
            Если Рисунок.ТипРисунка = ТипРисункаТабличногоДокумента.Объект
                       И ТипЗнч(Рисунок.Объект) = Тип("ActiveX") Тогда
                        
                        //предположим что этот рисунок - штрихкод
                        Попытка
                            Рисунок.Объект.ТипКода   = ТипКода;
                            Рисунок.Объект.Сообщение = ?(ПустаяСтрока(ПредставлениеШтрихкода),
                                                         КодШтрихкода,
                                                         ПредставлениеШтрихкода);
                        Исключение
                        КонецПопытки;
            КонецЕсли;
        КонецЦикла;
                
    КонецЕсли;
    
    Таб = Новый ТабличныйДокумент;
    Таб.Вывести(ОбластьМакет);
    Таб.Показать();
    
    
КонецПроцедуры


  Форум: Программирование в 1С Предприятие 8.3 · Просмотр сообщения: #143042 · Ответов: 2 · Просмотров: 3954
 


Новые сообщения  Открытая тема (есть новые ответы)
Опрос  Опрос (есть новые голоса)
Нет новых сообщений  Открытая тема (нет новых ответов)
Нет новых голосов  Опрос (нет новых голосов)
Популярная тема  Горячая тема (есть новые ответы)
Закрыта  Закрытая тема
Нет новых  Горячая тема (нет новых ответов) Перемещена  Тема перемещена
 

RSS Текстовая версия Сейчас: 24.04.24, 21:47
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!