Подсистема настройки отображения штрих-кода


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

Для упрощения реализован справочник для настройки отображения штрих-кода и процедура получения изображения по настройке.

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

Я всего лишь программист, поэтому поставляется "как есть" и способы использования и применение полностью на ваше усмотрение. Надеюсь, пригодится для основы.

 

UPD 2013/11/01

Версия для управляемых форм. Мелкие правки для удобства использования. Добавлен пример использования.

 

Как же все таки этим воспользоваться? Очень просто. Объедините три объекта приложенной конфигурации с вашей и в необходимых местах и печатных формах добавьте картинку. Код для вывода изображения штрих-кода картинки:

 

&НаСервере
Процедура УстановитьШтрихкод(Знач Штрихкод, Рисунок, ВнешняяКомпонента)

Если НЕ ЗначениеЗаполнено(Штрихкод) Тогда
Возврат;
КонецЕсли;

Справочники.ШаблоныШтрихкодов.УстановитьРисунокШтрихкода(Рисунок, Объект.ШаблонШтрихкода, ВнешняяКомпонента, Штрихкод);

КонецПроцедуры

&НаСервере
Процедура СформироватьСервер(ТабДок = Неопределено)

Если ТабДок = Неопределено Тогда
ТабДок = Новый ТабличныйДокумент;
КонецЕсли;
....

// шаблон искать по наименованию или где-то хранить в разрезе ПФ
Если ЗначениеЗаполнено(Объект.ШаблонШтрихкода)
Тогда

ВнешняяКомпонента = Неопределено;
Для Каждого Рисунок Из ТабДок.Рисунки Цикл
Если Найти(Рисунок.Имя, "Штрихкод") > 0 Тогда
Штрихкод = ""; // его надо хранить для печатной формы
УстановитьШтрихкод(Штрихкод, Рисунок, ВнешняяКомпонента);
КонецЕсли;
КонецЦикла;

КонецЕсли;


КонецПроцедуры// СформироватьРисунок()

 

5 Comments

  1. seermak

    Уже рисунки за стартмани пошли? Круто….

    Reply
  2. fuxic

    (1) извиняюсь 🙂

    Reply
  3. Vyacheslav56

    Будет ли работать в УНФ?

    Reply
  4. kovaleks78

    (3) Vyacheslav56, без доработки, как я понимаю — не будет.

    Reply
  5. fuxic

    (3) Интегрируется с помощью программиста. Квалификация не играет большой роли, в публикации и демо-базе приведен пример и описание.

    (4) Не будет. Но на основании этого можно встроить в систему механизм штрих-кодирования любых печатных форм в вашей учетной системе.

    Reply

Leave a Comment

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