Книга знаний

1С:Предприятие

Преобразование строки в штрихкод Code128 с адаптивным способом смены подсистемы кодирования.

Обработка, на вход даем строку, на выходе получаем строку, которую вставляем куда нужно (форма, отчет), назначая шрифт Barcode.ttf. Отличия - адаптивный способ смены подсистемы кодирования.Автор статьи:
Последняя редакция №1 от 03.11.06
URL: http://kb.mista.ru/article.php?id=404

Ключевые слова: штрихкод, Code128


КонецФункции

Процедура ПриОткрытии()
   Форма.Параметр = БарКод(СокрЛП(Форма.Параметр),6);
   Форма.Закрыть();
КонецПроцедуры    

АскиБар =                                      
//     0  1  2  3  4  5  6  7  8  9  10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29
   "155515551449485845458494854548584944056416452065425461560506542164524212245605641254614650"+ //29
   "11919191108980988109881889018890898001:0928120290:18212211829021281:0122209281:01218290:10"+ //59
   "2305<0;0004=0<540=4<1<05<4105<0=441<4=0<14<50=4050<320=04830047407443074434470344704740113"+ //89
   "13131100;0838030380;0308380023032203302";//102

ВыхТ = СоздатьОбъект("ТаблицаЗначений");
ВыхТ.НоваяКолонка("А",,,,"Аск",4); //Аски код
[/1С]

Описание | Рубрикатор | Поиск | ТелепатБот | Захваченные статьи | Установки | Форум
© Станислав Митичкин (Волшебник), 2005-2025 | Mista.ru

Яндекс.Метрика