![]() |
![]() |
![]() |
|
штрих код на чеке при печати | ☑ | ||
---|---|---|---|---|
0
dimogen
20.04.12
✎
12:34
|
Подскажите, как можно осуществить печать штрих кода на чеке. Есть обработка, которая печает чек, и как в нее засунуть штрих код? делаю на платформе 8.1, конфига торговля стройматериалами.
Вставил в обработку эту: Функция глСформироватьEAN13(ШК) Экспорт // Функция вычисляет контрольный символ кода EAN13 // дополняет им переданный параметр и возвращает сформированный EAN13 ШК=СокрЛП(ШК); ШК=Лев(ШК,12); ШК=глСтрокаПривести(ШК,"0",12,1); ШК=Число(ШК); Четн = 0; Нечетн = 0; Для Индекс=1 По 6 Цикл Четн=Четн+Сред(ШК,2*Индекс,1); КонецЦикла; Четн=Четн*3; Для Индекс=1 По 6 Цикл Нечетн=Нечетн+Сред(ШК,2*Индекс-1,1); КонецЦикла; КонтЦифра=(Четн+Нечетн)/10-Цел((Четн+Нечетн)/10); КонтЦифра=10-Цел(КонтЦифра*10); Если КонтЦифра=10 Тогда КонтЦифра=0; КонецЕсли; Возврат Число(Строка(ШК)+Строка(КонтЦифра)); КонецФункции Затем: Процедура СформироватьШтрихКод(ШК) //Формирование внутреннего шрих кода Перем Префикс; Если ШК=0 Тогда // если штрихкод уже задан, то сначала нужно уточнить, // а действительно ли нужно формировать Если Вопрос("Штирх-код задан. Сформировать новый?",4)<>6 Тогда Возврат; КонецЕсли; КонецЕсли; Префикс = "20"; ШК=глСформироватьEAN13(Строка(Префикс)+глСтрокаПривести(Строка(Документы.ЧекККМ.НомерЧека),"0",6,1) + глСтрокаПривести(Строка(Документы.ЧекККМ.ДатаЧека),"0",4,1)); КонецПроцедуры // СформироватьШтрихКод и где печается первая строка добавил(отмечено плюсами): Если КопияЧека Тогда ПечатьСтроки("НА СКЛАД",ШиринаСтроки/3,Истина); ++++ПечатьСтроки(ШК, -ШиринаСтроки/3 + ШиринаСтроки, Истина);+++ КонецЕсли; Что делаю не так? пробую печатать на термопринтере люк хан. драйвер баркод поставил + шрифты |
|||
1
Apokalipsec
21.04.12
✎
13:00
|
Ну ты сам объект штрихкод добавил на макет?)
|
|||
2
dimogen
22.04.12
✎
23:45
|
он без макета, штрих кода заливается в текстовый файл...вот я думаю что это вообще возможно в txt загнать штрих код?
|
|||
3
Torquader
23.04.12
✎
01:07
|
Если он печатается на принтере чеков или фискальном регистраторе-то есть специальные команды для печати штрих-кода.
Для принтера чеков используется Esc-последовательность,а для фискального регистратора - специальная команда драйвера. Только не все ФР и принтеры умеют печатать штрих-коды. |
|||
4
Trance_1C
23.04.12
✎
04:39
|
(0)Ставь зЁбру.
|
|||
5
dimogen
23.04.12
✎
09:08
|
(3) спс...буду разбираться
|
|||
6
mikecool
23.04.12
✎
09:09
|
(2) загнать туда последовательность символов, которые печатаются в штрихкоде
|
|||
7
dimogen
23.04.12
✎
11:36
|
(6) а можете подсказать где про это почитать? чтоб загнать эти символы...я нашел esc-pos команды для принтера, понять не могу как их в тхт загнать
|
|||
8
2S
23.04.12
✎
11:37
|
в качестве фронта что? фронтол умеет это делать красиво...
|
|||
9
dimogen
23.04.12
✎
12:07
|
lewoo lkt200, у него тоже есть поддержка печати штрих кодов.
|
|||
10
dimogen
04.05.12
✎
12:22
|
может у кого есть пример как именно эти esc pos команды через 1с запустить?
|
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |