Печать этикеток со штрихкодом

Обработка для печати этикеток со штрих кодом.

Много видел обработок для печати этикеток и штрих кодов отдельно, но вот чтобы все в одном не нашел. Пришлось взять за основу готовую форму печати этикеток и «подрисовать» штрих код. Макеты ценников просьба редактировать самим по своему желанию. Если у кого возникают трудности пишите, расскажу как.

Обработка работает только в конфигурации Управление торговлей редакции 10.3. Работа в других конфигурациях не гарантируется.

Добавил обработки для печати ценников из документов Поступления, Перемещения, Переоценки.

1. Первую, саму обработку по печати ценников добавляем как внешнюю обработку и называем «Печать ценников» (именно так и никак иначе, по другому не будет работать)

2. Добавляем остальные 3 обработки как внешние печатные формы и прикрепляем их к соответствующим документам.

В итоге, у вас в указанных документах при нажатии на кнопку «Печать» появится новая строчка «Печать ценников из …..» (смотря как назовете ВПФ) при нажатии на которую откроется обработка по печати ценников с заполненной табличной частью и количеством из вызванного документа.

Всем удачи! 😉

20 Comments

  1. pose

    Ругается :

    {ВнешняяОбработка.ПечатьЦенников(95)}: Ошибка при установке значения атрибута контекста (Текст): {(8, 2)}: Поле не найдено «НаСкладе.Количество»

    <<?>>НаСкладе.Количество КАК Количество

    ПостроительОтчета.Текст = ТекстЗапроса;

    Reply
  2. 1C8

    Конфа УТ или УПП? В УПП не работает, надо переписывать немного

    Reply
  3. igor_gk

    (2) А в чем она тогда работает? Хоть написал бы… Хотя странно — на скрине — как раз УТ

    Reply
  4. 1C8

    а я и не говорил что в УТ она не работает, как раз для УТ она и написана. Что у всех та же ошибка вылетает?

    Reply
  5. grafit

    надо так:

    СтруктураКурса = ОбщегоНазначения.ПолучитьКурсВалюты(Валюта, РабочаяДата);

    //СтруктураКурса = МодульВалютногоУчета.ПолучитьКурсВалюты(Валюта, РабочаяДата);

    далее:

    //НаСкладе.Количество КАК Количество

    Reply
  6. 1C8

    Господа! Скачайте и установите себе компоненту 1C:Печать Штрихкодов, и будет вам счастье…

    P.S. Компоненту приложил.

    Reply
  7. flintm

    Обработка классная! +. Только она не понимает штрихкоды, кроме EAN13. Что надо сделать, чтобы она понимала все типы штрихкодов или, хотя бы, ещё EAN8?

    Reply
  8. Душелов

    (6) Выкладывать материалы с диска ИТС запрещено политикой 1С.

    Reply
  9. 1C8

    (6) Ради бога….я как лучше хотел.

    Reply
  10. 1C8

    (7) Надо дописывать

    Reply
  11. 1C8

    Посмотрел на скорую руку. В модуле обработки ищешь строку(их там три таких, меняешь во всех трех)

    ОбластьЦенника.Рисунки.Штрихкод1.Объект.ТипКода = 1; //EAN13

    Где 1 — это код типа штрихкода. 2 — помоему будет code39, в общем поэксперементируй.

    И еще в процедуре ЗаполнениеШтрихкода() ищи строки

    Стр.ТипШтрихкода = ПланыВидовХарактеристик.ТипыШтрихкодов.EAN13

    они почти рядом. Ну тут я думаю все понятно, в конце вместо EAN13 меняешь на какой тебе надо.

    Еще если надо то поменять нужно в модуле формы в процедуре НовыйШтрихкод(Кнопка) и функции КнопкаЗаполнениеШтрихкода(Кнопка) то же самое.

    Reply
  12. nindza

    То ли файл битый, но не открывается в 1С УТ 8.1 😮

    Reply
  13. Maels

    все открывается (если ругается на версию — попробуй через конфигуратор сконвертить), единственное было бы оч.удобно настраивать кол-во ценников и этикеток на 1 странице перед выводом печати.

    сам так и не победил в коде модуля (тока начал разбираться во всех этих шалобухах и знаний пока оч.мало), т.к. надо печатать на принтере этикеток.

    а в целом все нормально и удобно мне как пользователю.

    Reply
  14. seandr

    Обработка очень полезная.. добавив функионал формирования ШК на поступление при отсутствии такового. Добавил пересчет единиц измерения с подстановкой для них установленных ШК.

    Reply
  15. SGordon1

    У меня почему то тоже в старой торговле не заъотело совсем работать . То ли файл битый, но не открывается в 1С УТ 8.1

    Reply
  16. Maels

    Пользуюсь, правда не в полном объеме.

    все приходится ручками заполнять, т.к. не предусмотрена установка кол-ва ценников на странице (у меня принтер этикеток), настраиваемость их размеров под распространенные форматы самих этикеток.

    ручками в коде методом тыка добился что бы печатал только 1 ценник на 1 этикетке, но по всей видимости что то в логике нарушил и теперь кол-во ценников надо в ручную указывать при нажатии кнопочка печать.

    Идеально конечно что бы обработка могла подцепляться к типовым документам для автоматической распечатки.

    по сути два таких документа у меня в УТ — приходный ордер или поступление товаров.

    А вообще спасибо огромное — даже так это сильно лучше чем ничего, т.к. требования ужесточаются и все большую информацию надо умещать на ценниках, а штатными средствами 1с это почти не реализуемо без специальных навыков и знаний. а политика 1с в этом отношении тоже улыбает — за немало денег покупаешь полупродукт и за большие деньги допиливаешь до минимального функционала. именно поэтому поддержку продлевать не вижу смысла — проще заплатить специалисту за доработки и чаще самому прикручивать что то тебе нужное.

    Reply
  17. mrdc

    Не работает. 1С:Предприятие 8.2 (8.2.14.540), «Управление торговлей для Казахстана», редакция 2.2, локализация для Казахстана: «1С-Рейтинг», «1С-Сапа» (2.2.10.10)

    {ВнешняяОбработка.ПечатьЦенников.МодульОбъекта(142,19)}: Переменная не определена (Ценообразование)
    ЗапросПоЦенам = <<?>>Ценообразование.СформироватьЗапросПоЦенамРасчитываемые(Товары.ВыгрузитьКолонку(«Номенклатура»),ТипЦен,РабочаяДата);
    {ВнешняяОбработка.ПечатьЦенников.МодульОбъекта(148,19)}: Переменная не определена (Ценообразование)
    ЗапросПоЦенам = <<?>>Ценообразование.СформироватьЗапросПоЦенам(СтруктураЗначений,
    {ВнешняяОбработка.ПечатьЦенников.МодульОбъекта(192,11)}: Переменная не определена (Ценообразование)
    Цена = <<?>>ЦеноОбразование.ОкруглитьЦену(Цена, ТипЦен.ПорядокОкругления, ТипЦен.ОкруглятьВБольшуюСторону);
    {ВнешняяОбработка.ПечатьЦенников.МодульОбъекта(193,11)}: Переменная не определена (Ценообразование)
    Цена = <<?>>Ценообразование.ПересчитатьЦенуПриИзмененииВалюты(Цена, НайденнаяСтрока.ВалютаЦены, Валюта, Курс, Кратность);
    {ВнешняяОбработка.ПечатьЦенников.МодульОбъекта(535,18)}: Переменная не определена (Ценообразование)
    ЗапросПоЦенам = <<?>>Ценообразование.СформироватьЗапросПоЦенам(СтруктураЗначений,
    {ВнешняяОбработка.ПечатьЦенников.МодульОбъекта(578,11)}: Переменная не определена (Ценообразование)
    Цена = <<?>>Ценообразование.ОкруглитьЦену(Цена, ТипЦен.ПорядокОкругления, ТипЦен.ОкруглятьВБольшуюСторону);
    {ВнешняяОбработка.ПечатьЦенников.МодульОбъекта(579,11)}: Переменная не определена (Ценообразование)
    Цена = <<?>>Ценообразование.ПересчитатьЦенуПриИзмененииВалюты(Цена, НайденнаяСтрока.ВалютаЦены, Валюта, Курс, Кратность);
    {ВнешняяОбработка.ПечатьЦенников.МодульОбъекта(160,19)}: Переменная не определена (МодульВалютногоУчета)
    СтруктураКурса = <<?>>МодульВалютногоУчета.ПолучитьКурсВалюты(Валюта, РабочаяДата);
    {ВнешняяОбработка.ПечатьЦенников.МодульОбъекта(546,19)}: Переменная не определена (МодульВалютногоУчета)
    СтруктураКурса = <<?>>МодульВалютногоУчета.ПолучитьКурсВалюты(Валюта, РабочаяДата);

    Показать

    Reply
  18. Sean1s

    На УПП не работает.

    Reply
  19. Alexey55

    Спасибо! очень вовремя!)

    Reply
  20. 33m2

    Вопрос: А на 8.2? 8.3?

    Reply

Leave a Comment

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