Печать этикеток в формате ZPL/EPL

Программирование Внешние компоненты и работа с оборудованием (ВК)

Конфигурации 1cv8 Платформа 1С v8.x (все механизмы)

0. Евгений _ (Johny_v) 37 12.12.13 13:19 Сейчас в теме

Компонента для печати на принтере этикеток, подключенном к компьютеру в сети.
Обработка для формирования этикеток в формате ZPL и EPL по шаблону (1С 8.2 / Обычная форма).

Перейти к публикации

Комментарии

Сохранить

1. mxm2 mxm2 (mxm2) 1080 18.12.13 08:51 Сейчас в теме

http://infostart.ru/public/196424/ для УФ. (имитация копирования файла по сетевому пути)

2. Евгений _ (Johny_v) 37 18.12.13 11:08 Сейчас в теме

Это не совсем то же самое. В вашем случае идет печать на сетевой принтер с сетевым интерфейсом Ethernet.
Моя библиотека печатает на принтеры подключенные через USB/COM/LPT к компьютеру. В том числе и по сети (Например с терминального сервера идет печать на принтеры клиентов).
С такими принтерами нет возможности просто скопировать на них файл с этикеткой или отправить его по FTP.
Там нужно отправлять данные в порт принтера, что и делает данная библиотека.
И еще один плюс библиотеки - это отправка на принтер строки. Нет необходимости создавать и записывать файл, можно сразу отправить текст этикетки на принтер.

3. mxm2 mxm2 (mxm2) 1080 18.12.13 22:14 Сейчас в теме

(2)

В вашем случае идет печать на сетевой принтер с сетевым интерфейсом Ethernet.

совсем не так: обработка http://infostart.ru/public/196424/ используется с принтером TSC TDP 225, подключенном к клиентскому компу через кабель USB, и настроенном как доступный по сети (вкладка Доступ). Печать возможна как с любого компа в сети, так и с терминального сервера по пути, указанному во вкладке Доступ принтера. Работает такая связка значительно быстрее чем через "родные" драйвера/компоненты (платные - не испытывались). Сама этикетка строится на том-же языке, что и у Вас, однако при этом не требует ни внешних компонент ни макетов.

4. Егор Titov (Titov222) 7 26.05.14 13:41 Сейчас в теме

Подскажите, пожалуйста, а где взять текст модуля СерверПечати?

5. Евгений _ (Johny_v) 37 26.05.14 14:05 Сейчас в теме

(4) Titov222,
СерверПечати - Это не модуль, а объект внешней библиотеки VKV8MEANS.dll
Создается следующим образом:

СерверПечати = Новый("AddIn.VKV8MEA");

6. Dmitry Vidmanov (etmarket) 384 28.12.14 16:50 Сейчас в теме

Поле агрегатного объекта не обнаружено (ОтправитьСтрокуДанныхНаПринтер)
Поле агрегатного объекта не обнаружено (SendRawDataStringToPrinter)
Поле агрегатного объекта не обнаружено (ОтправитьФайлДанныхНаПринтер)
Поле агрегатного объекта не обнаружено (SendRawDataFileToPrinter)
Поле агрегатного объекта не обнаружено (ФоноваяОтправкаФайлаДанныхНаПринтер)
Поле агрегатного объекта не обнаружено (BackgroundSendRawDataFileToPrinter)

Ваша библиотека из файла "Компонента печати этикеток на принтере" не содержит методов! Она вообще ничего не содержит! Я открывал её редактором ресурсов. Что за шарлотанство?

7. Евгений _ (Johny_v) 37 12.01.15 11:51 Сейчас в теме

Спасибо за выбор моей библиотеки. Она давно и успешно работает и не только у меня одного.
Никакого шарлотанства в ней нет. Просто нужно внимательнее читать описание:

ОтправитьСтрокуДанныхНаПринтер - Это имя функции которую необходимо вызвать.

Пример работы:

СерверПечати = Новый("AddIn.VKV8MEA");
СерверПечати.ОтправитьСтрокуДанныхНаПринтер("\\Comp\Zebra", "^XA");

Если у Вас возникнут проблемы с этой библиотекой, пишите, постараюсь помочь.

8. Dmitry Vidmanov (etmarket) 384 12.01.15 22:13 Сейчас в теме

(7) я всё внимательно прочитал. Создал объект "СерверПечати", аналогично приведенному примеру и вызвал его метод "ОтправитьСтрокуДанныхНаПринтер". И такого метода у объекта не существует! Как раз по причине, что я описал выше:

Ваша библиотека из файла "Компонента печати этикеток на принтере" не содержит методов! Она вообще ничего не содержит! Я открывал её редактором ресурсов. Что за шарлотанство?

Поэтому никакого недопонимания нет. Просто вы предлагаете людям за 1 СМ скачать "пустышку", которая ничего не делает!

9. Евгений _ (Johny_v) 37 13.01.15 10:06 Сейчас в теме

(8) На какой версии 1С Вы хотите работать с моей компонентой?

10. Dmitry Vidmanov (etmarket) 384 13.01.15 21:51 Сейчас в теме

(9) не имеет значение, какой версией 1С пользоваться при создании объекта из библиотеки, хоть в приложении из Visual Studio, если для объекта отсутствует код методов. Не пудрите людям мозги!

11. Евгений _ (Johny_v) 37 14.01.15 08:03 Сейчас в теме

(10) Разница есть. Моя компонента построена по технологии Native API, которая поддерживается 1С, начиная с версии 1С Предприятия 8. Поэтому в 1С 7.7 она работать не будет. А вот на 8.3 я ее не тестировал, постараюсь проверить в ближайшее время.

Компоненту здесь выкладывал по просьбе людей, которые ей тоже успешно пользуются.
Вы первый человек, у которого возникла такая проблема с ней.
Если Вам очень хочется что-то доказать, то прежде чем писать что это пустышка, попробуйте для начала запустить ее на платформе версии 8.2 для которой она разрабатывалась.

12. Евгений _ (Johny_v) 37 14.01.15 08:29 Сейчас в теме

Перезалил архив с компонентой, в которой точно все работает

13. Андрей Леоненко (LeoAndrey) 03.02.15 13:45 Сейчас в теме

Печатаю этикетки на ZPL из 1c таким незамысловатым способом:
Текст = Новый ЗаписьТекста(Путь,КодировкаТекста.OEM);
Текст.Записать(Шаблон);
Текст.Закрыть();

Где:
- Путь- куда отправляем текстовый код ZPL: порт принтера, сетевой путь или имя файла.
- КодировкаТекста.OEM - у меня работает с кодировкой текста ОЕМ.
- Шаблон - собственно текст программы на ZPL.

14. Саня Кошев (drat9) 01.07.16 10:44 Сейчас в теме

(13) LeoAndrey, у меня сетевой принтер, никак не отправляет на него (нету доступа), приведите пример путь сетевой адрес+ порт + имя файла

15. Andrey (kentavr27) 77 24.10.16 19:05 Сейчас в теме

Не могу не согласиться с одним из "ораторов"... Что-то здесь не то...

{Форма.Форма.Форма(31)}: Метод объекта не обнаружен (ОтправитьСтрокуДанныхНаПринтер)
Результат = СерверПечати.ОтправитьСтрокуДанныхНаПринтер(ИмяПринтера, ЭтикеткаТовара);

В реестре присутствует (зарегилась)
win XP, Тонкий клиент, 1С 8.3. В обычном приложении результат такой же...
Клиентский код:

	ЭтикеткаТовара = "^XA
	|^FO20,25
	|^A@N,10,9,^FDНаименование товара^FS
	|^FO20,49
	|^A@N,10,9,^FDАрт.123456789^FS
	|^FO20,73
	|^A@N,10,9,^FDПроизводитель:Фабрика^FS
	|^FO20,97
	|^FO50,187
	|^BY4^BEN,70,Y,N 
	|^FD4909500671160^FS
	|^XZ";
	
	//СерверПечати = Новый ("AddIn.VKV8MEA");
	СерверПечати = Новый COMОбъект("AddIn.VKV8MEA");
	ИмяПринтера = "\\192.168.20.253\TSC_TDP-245";
	Результат = СерверПечати.ОтправитьСтрокуДанныхНаПринтер(ИмяПринтера, ЭтикеткаТовара);
	Если НЕ Результат Тогда
		Сообщить("Ошибка печати этикетки");
	КонецЕсли;

Показать

На любой из приведенных методов -- ругается. Так все же, где собака порылась?

16. Евгений _ (Johny_v) 37 25.10.16 08:04 Сейчас в теме

(15) kentavr27,
Добрый день. Какая конфигурация?
Какой тип переменной СервисПечати?

17. Евгений _ (Johny_v) 37 25.10.16 12:07 Сейчас в теме

(15) kentavr27,
Для управляемых форм необходимо сначала подключить внешнюю компоненту, а потом уже создавать объект.

 ЭтикеткаТовара = "^XA
    |^FO20,25
    |^A@N,10,9,^FDНаименование товара^FS
    |^FO20,49
    |^A@N,10,9,^FDАрт.123456789^FS
    |^FO20,73
    |^A@N,10,9,^FDПроизводитель:Фабрика^FS
    |^FO20,97
    |^FO50,187
    |^BY4^BEN,70,Y,N 
    |^FD4909500671160^FS
    |^XZ";
	
	Если НЕ ПодключитьВнешнююКомпоненту("AddIn.VKV8MEA") Тогда
		Сообщить("Компонента печати этикеток не загружена");
	КонецЕсли;
	
    СерверПечати = Новый("AddIn.VKV8MEA");
    ИмяПринтера = "\\10.10.10.234\Zebra1";
    Результат = СерверПечати.ОтправитьСтрокуДанныхНаПринтер(ИмяПринтера, ЭтикеткаТовара);
    Если НЕ Результат Тогда
        Сообщить("Ошибка печати этикетки");
    КонецЕсли;

Показать

18. Антон Иванов (modelmarat) 21.02.17 07:01 Сейчас в теме

Евгений, у меня 1с предприятие 8.3 принтер godex g330, язык EZPL, отсылаю корректную строку - принтер молчит, отсылаю некорректную, принтер печатает "File not found". По всем проверкам обработка проходит успешно и в конце функция "ОтправитьСтрокуДанныхНаПринтер" выдаёт истину. Есть ли в коде компоненты какие-то модули, работоспособность которых зависит от языка принтера? Подойдёт ли она для моего принтера с языком EZPL? Я досконально не сравнивал, но есть подозрение, что это микс ZPL и EPL.

19. Евгений _ (Johny_v) 37 21.02.17 10:44 Сейчас в теме

Добрый день.
Компонента просто отправляет переданные данные в порт принтера и ее работа не должна зависеть от языка программирования. Если метод ОтправитьСтрокуДанныхНаПринтер вернул Истина, то значит данные отправлены на принтер. Если принтер ничего не делает, то скорее всего не подходит формат этикетки или он ждет команды завершения этикетки аналог XZ. Попробуйте сформировать текст этикетки в программе Qlabel и отправить его. Если не поможет, то нужно изучать документацию.

20. Антон Иванов (modelmarat) 21.02.17 11:16 Сейчас в теме

Я разобрался в чём загвоздка, 1C отправляет в метод ОтправитьСтрокуДанныхНаПринтер данные в формате windows 1251, а мой принтер по умолчанию принимает данные в формате UTF-8, если воспользоваться методом ОтправитьФайлДанныхНаПринтер, а файл предварительно сохранить в кодировке UTF-8 то всё получается. Однако мне интересно отправлять данные непосредственно с программы, не сохраняя их в файл. Как можно это реализовать?

21. Андрей Леоненко (LeoAndrey) 21.02.17 13:38 Сейчас в теме

Отправляю на печать таким способом:

Текст = Новый ЗаписьТекста(\\komp1\Zebra, КодировкаТекста.OEM);
	Текст.Записать(Шаблон);
	Текст.Закрыть();

,где принтер расшареный по сети \\komp1\Zebra
Шаблон - текст программы на ZPL.

22. Андрей Леоненко (LeoAndrey) 21.02.17 13:39 Сейчас в теме

Опечатка: принтер конечно в кавычках: "\\komp1\Zebra"

23. Андрей Леоненко (LeoAndrey) 21.02.17 13:46 Сейчас в теме

Еще как вариант можно с командной строки командой copy.

24. Евгений _ (Johny_v) 37 21.02.17 15:03 Сейчас в теме

Посмотрю вечером в исходниках. Может там что-то есть с кодировкой.

25. Александр Астраханцев (userAstra) 09.01.18 13:36 Сейчас в теме

Здравствуйте!
Работает ли компонента с "1С:Предприятие 8.3 (8.3.10.2667)"?
И в принципе не важно какой принтер?
мы хотим принтер Brady подцепить к 1С - там то же свой язык

26. Евгений _ (Johny_v) 37 09.01.18 14:06 Сейчас в теме

На этой платформе будет работать. Принтер должен поддерживать языки программирования EPL/ZPL или другие.
По принтерам Brady я не нашел информацию о поддерживаемых языках, поэтому компонента может быть бесполезной для Вас.
Уточните какие языки программирования поддерживает Ваш принтер.

27. Александр Астраханцев (userAstra) 09.01.18 14:57 Сейчас в теме

Язык называется - TSPL.
Да мы макеты делаем посылаем на порт вручную - все нормально - печатает.
Вопрос встал по автоматизации - подключение BRADY к 1С.

Принципиально нет ведь разницы, что на порт принтера посылать через вашу компоненту, лишь бы принтер сам понимал?

30. Евгений _ (Johny_v) 37 09.01.18 17:02 Сейчас в теме

(27)
Компоненте без разницы какой текст отправлять в порт принтера. Будет работать с любым языком.
Просто если язык не поддерживается, то принтер не будет реагировать на команды или реагировать не должным образом.
А вообще есть уже новая версия обработки, нормальная. Только все руки не доходят выложить ее.

28. Александр Астраханцев (userAstra) 09.01.18 15:18 Сейчас в теме

И еще вопрос по правам использования вашей компоненты.

Если мы заплатим абонентскую плату и скачаем ваши компоненты - можем свободно использовать их в своих проектах?

29. Евгений _ (Johny_v) 37 09.01.18 16:59 Сейчас в теме

Да, используйте где хотите. Буду рад если она Вам поможет.

31. Александр Астраханцев (userAstra) 11.01.18 15:45 Сейчас в теме

Работаю с "1С:Предприятие 8.3 (8.3.10.2667)"
Вызов метода "ОтправитьСтрокуДанныхНаПринтер" вызывает ошибку, см. ниже

{Отчет.ТестПечатиЭтикеток.Форма.Форма.Форма(81)}: Ошибка при вызове метода контекста
Результат = ОбъектПечати.ОтправитьСтрокуДанныхНаПринтер(ИмяПринтера, ЭтикеткаТовара);
по причине: Использование синхронных методов на клиенте запрещено!

32. Александр Астраханцев (userAstra) 12.01.18 15:35 Сейчас в теме

Разобрался
в свойствах конфигурации в категории "Совместимость" все настраивается

33. Евгений _ (Johny_v) 37 12.01.18 21:07 Сейчас в теме

Да, нужно поменять "Свойства конфигурации -> Совместимость -> Режим использования синхронных вызовов"

34. Александр Астраханцев (userAstra) 15.01.18 08:28 Сейчас в теме

Здравствуйте!

Работаю с "1С:Предприятие 8.3 (8.3.10.2667)" . Используется термотрансферный принтер Brady. Язык принтера -TSPL.

Метод ОтправитьСтрокуДанныхНаПринтер возвращает false.
Это означает что компонента не видит принтер?

Код для посылки на печать:

Попытка
		ОбъектПечати = Новый("AddIn.VKV8MEA");
	Исключение
		Сообщить("Ошибка создания объекта печати: " + ОписаниеОшибки());
		Возврат;
	КонецПопытки;

	 ИмяПринтера="\\192.168.0.40\Brady";	
        ЭтикеткаТовара="SIZE 50 mm, 40 mm
        |GAP 3 mm,0 mm
        |DIRECTION 0
        |CLS
        |TEXT 25,125, ""3"",0,1,1, ""Проверка""
        |BARCODE 25,205,""EAN13"",100,1,0,4,2, ""1234567890123""
        |PRINT 1,1";

	Результат = ОбъектПечати.ОтправитьСтрокуДанныхНаПринтер(ИмяПринтера, ЭтикеткаТовара);	
	Если НЕ Результат Тогда //Этикетка не отправлена на печать
		Сообщить("Ошибка печати этикетки";
	КонецЕсли;

Показать

35. Александр Астраханцев (userAstra) 15.01.18 08:40 Сейчас в теме

Метод ОтправитьФайлДанныхНаПринтер то же самое выдает.

Но команда через CMD работает
copy C:\1CVKV8\bred.txt \\192.168.0.40\Brady

38. Евгений _ (Johny_v) 37 15.01.18 11:40 Сейчас в теме

(34)

Метод ОтправитьСтрокуДанныхНаПринтер возвращает false.
Это означает что компонента не видит принтер?

Означает что компонента не может отправить данные в порт принтера. Причин много может быть. Неправильно указан адрес принтера, Нет доступа - Попробуйте открыть общий доступ к принтеру. Если отправка идет на сетевой принтер, попробуйте добавить его в системе в Принтеры с родным драйвером и отправлять на него как //Имя локального компьютера/Имя принтера, хотя должно и по сетевому адресу все работать.

36. Александр Астраханцев (userAstra) 15.01.18 08:41 Сейчас в теме

Работаю правда под XP
Может в этом дело?

37. Александр Астраханцев (userAstra) 15.01.18 08:56 Сейчас в теме

Вы все таки под 1C 8.3 тестировали?

39. Евгений _ (Johny_v) 37 15.01.18 11:41 Сейчас в теме

(37) Сейчас сами работаем на 1С:Предприятие 8.3 (8.3.10.2561). Правда на обычных формах. Все работает отлично.

40. Евгений _ (Johny_v) 37 15.01.18 11:42 Сейчас в теме

(36) На XP тоже работала.

Оставьте свое сообщение

E-mail:

Разделы
Программирование Общие вопросы программирования (Dev) Интеграция и обмен данными, конвертация данных (Обмен) Мобильная разработка (MobileDev) Групповая разработка Тестирование ПО (Testing) Библиотека стандартных подсистем (БСП) Внешние компоненты и работа с оборудованием (ВК) Инструменты разработчика (Tools)
Администрирование Общие вопросы администрирования (Admin) Обновление конфигураций (UpdateCF) Производительность и оптимизация (HighLoad) Сервер, сеть, оборудование (Hardware) Системное программное обеспечение (Software) Настройка СУБД (DB) Сервисные утилиты администрирования (Utils)
Учет и отчетность Общие вопросы по учету (Учет) Бухгалтерский учет и налоги (БУ) Зарплата и кадровый учет (Зарплата) Управление финансами и бюджетирование (Финансы) Производственный учет (MRP) Документооборот Взаимоотношения с клиентами и продажи (CRM) Торговый учет, опт и розница (Торговля) Автотранспорт (TMS) МСФО, ВЭД Учет в бюджетных организациях (Госбюджет) Складской учет и логистика (WMS)
Управление Общие вопросы управления Управление проектами Личная эффективность Стратегия и тактика переговоров Управление ИТ-службой Управление персоналом Юридические вопросы
Сообщество О жизни О сайте
Обсуждение Вебинары Видео Новости Публикации
Платформа
Платформа 1С v8.x (все механизмы) Анализ и прогнозирование (v8::DataMining ) Бизнес-процессы (v8::Бизнес-процессы) Бухгалтерский учет (v8::БУ) Запросы (v8::Запросы) Мобильная платформа (v8::Mobile) Оперативный учет (v8::ОУ) План видов характеристик (v8::ПВХ) Система компоновки данных (v8::СКД ) Сложные периодические расчеты (v8::СПР) Управление блокировками (v8::blocking) Управление правами (v8::Права) Управляемые формы (v8::УФ)
Платформа 1С v7.7 (все механизмы) Бухгалтерский учет 7.7 (v77::БУ) Оперативный учет 7.7 (v77::ОУ) Расчет 7.7 (v77::Расчет) OpenConf (openconf)
Конфигурации
Конфигурации 1cv8 1С:CRM ПРОФ, КОРП (1С:CRM) 1С:ERP Управление предприятием 2 (ERP2) 1С:Бухгалтерия 1.6 (БП1.6) 1С:Бухгалтерия 2.0 (БП2.0) 1С:Бухгалтерия 3.0 (БП3.0) 1С:Бухгалтерия автономного учреждения (БАУ) 1С:Бухгалтерия государственного учреждения (БГУ) 1С:Документооборот (ДО) 1С:Зарплата и кадры бюджетного учреждения (ЗКБУ) 1С:Зарплата и кадры государственного учреждения 3.0 (ЗКГУ3.0) 1С:Зарплата и Управление Персоналом 2.5 (ЗУП2.5) 1С:Зарплата и Управление Персоналом 3.x (ЗУП3.x) 1С:Комплексная автоматизация 1.х (КА1) 1С:Комплексная автоматизация 2.х (КА2) 1С:Конвертация данных (КД) 1С:Консолидация (Консолидация) 1С:Розница (Розница) 1С:Управление ветеринарными сертификатами (1С:УВС) 1С:Управление нашей фирмой (УНФ) 1С:Управление производственным предприятием (УПП1) 1С:Управление торговлей 10 (УТ10) 1С:Управление торговлей 11 (УТ11) 1С:Управление холдингом (УХ)
Конфигурации 1cv7 1С:Бухгалтерия 7.7 (1С7:Бух) 1С:Бухгалтерия для бюджетных учреждений 7.7 (1С7:ББУ) 1С:Бюджет муниципального образования 7.7 (1С7:БМО) 1С:Зарплата и кадры 7.7 (1С7:ЗиК) 1С:Комплексная 7.7 (1С7:Комплекс) 1С:Производство+Услуги+Бухгалтерия (1С7:ПУБ) 1С:Торговля и склад 7.7 (1С7:ТиС) 1С:Упрощенное налогообложение 7.7 (1С7:УСН)