gifts2017

Применение штрих-кода в 7.7 УСН и ОСН для учета документов

Опубликовал Денис Гуров (Denis1c) в раздел Администрирование - Поиск данных

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

Опишу порядок выполнения операций:

  1. Для документа, учет которого хотим производить делаем внешнюю печатную форму(или используем существующую встроенную, кому как нравится), в которую добавляем компонент для печати штрих-кода. Для этого можно просто скопировать его например из ТИС и вставить в ваш макет. В строке формул для данного объекта пишем "[ИмяВашейТаблицы].ТекущийОбъект.Text=ГлФормированиеИдентификатораДокумента([ВашДокумент.ТекущийДокумент()])" для примера приведу строку Таб_акт.ТекущийОбъект.Text=ГлФормированиеИдентификатораДокумента(Акт.ТекущийДокумент()) !!! Очень важно использовать метод ТекущийДокумент()

  2. В глобальный модуль добавляем Функцию, ГлФормированиеИдентификатораДокумента(_значение),  текст которой находится в прикрепленном файле. ФункцияПечатиШтрихКода.txt

  3. Регистрируем библиотеку Barcode.ocx - лучше будет если вы ее положите в папку BIN

Штрих-коды мы теперь печатать умеем, осталось научиться их считывать, для этого:

  1. Регистрируем библиотеку Scaner1C.dll;

  2. Подключаем к компьютеру сканер штрих-кода и производим его настройки. (должен работать в режиме COM или эмуляция COM)

  3. Для того, чтобы считать штрих-код с документа в режиме Предприятие открываем внешнюю обработку Barcode.ert, нажимаем кнопку "Подключить Сканер" и можем считывать штрих-код.

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

P.S. Доработка была произведена по принципу внесения наименьших изменений в конфигурацию. При обновлении потребуется учитывать только добавленную функцию в глобальном модуле.

Все комментарии, вопросы и пожелания с радостью будут приняты к сведению, публикация первая, поэтому буду стараться исправлять огрехи.

P.P.S. Если кто знает как обойтись вообще без внесения изменений в конфигурацию, буду признателен за информацию.


Скачать файлы

Наименование Файл Версия Размер Кол. Скачив.
Обработки и текст функции
.rar 31,17Kb
31.08.14
135
.rar 31,17Kb 135 Скачать
Библиотеки
.rar 148,75Kb
31.08.14
33
.rar 148,75Kb 33 Скачать

См. также

Подписаться Добавить вознаграждение

Комментарии

1. Дмитрий Литовченко (kompas-dm) 29.11.10 10:40
(0) С почином. Такая технология имеет право быть.
2. Александр Рытов (Арчибальд) 29.11.10 11:06
Решал и я именно такую задачу, правда, для документов конкретного вида http://infostart.ru/public/19400/ Правда, в конфигурацию мне лезть не потребовалось. Обработку чтения в модальном режиме запускаем, насильственно держим в фокусе текстовое окно ввода штрих-кода - и можно пользоваться сканером "в разрыв клавиатуры", без библиотеки Scaner1C.dll :D
3. Денис Гуров (Denis1c) 29.11.10 11:17
Хочу заметить, что в данном случае у вас может быть несколько ИБ документы конечно печатаются каждый из своей базы, а вот прием вы можете осуществлять любых документов, находясь в данный момент в любой базе, т.о. отпадает необходимость переключаться между ними.
4. Денис Гуров (Denis1c) 29.11.10 11:29
(2) Печатать на уже готовых документах не догадался бы :idea:
5. Александр Рытов (Арчибальд) 29.11.10 11:48
(4) У нас ситуация: мы печатаем бланки накладных и продаем их нашим поставщикам как бланки (строгой) отчетности. В год несколько десятков тысяч этих бланков, причем надо следить, чтобы поставшики бланками не менялись и не подделывали...
6. Денис Гуров (Denis1c) 29.11.10 18:15
В обработке печати реестра была ошибка,
добавил строку
ИД = Сред(ИД,9);
7. Денис Гуров (Denis1c) 30.11.10 01:56
Советую всем использовать старые версии драйвера Атол, т.к. новые работают по умолчанию в демо режиме, и их нужно покупать.
8. Денис Гуров (Denis1c) 30.11.10 11:53
Не забываем плюсовать господа
Иваныч; +1 Ответить
10. Андрей (anc2002) 13.01.12 17:35
Спасибо автору за неплохую реализацию нашей проблемы без большой правки кода. Чуть допилили под себя - работает уже полгода
11. Николай Соболевский (snip) 13.01.12 17:44
Спасибо за обработку.
В свое время было тоже необходимо сделать учет.
Сейчас используем УСБ сканеры в купе со старой Атоловской обработкой.
Новая работает в демо режиме с задержкой 10 сек.
Под 8-ку пришлось в торговле переписывать обработку сканера - так как в новом драйвере Атола
и соответственно в новой торговле добавлена еще чуствительность сканера :)
видимо что бы старый драйвер перестала работать..... все денег хотят :)
12. Иваныч Иванов (Иваныч) 29.12.12 09:07
Данную идею реализовать у себя вынашивал очень долго. Оказалось что уже есть готовое решение. Обязательно скачаю и приспособлю себе. Плюс уже поставил. Спасибо огромное
Для написания сообщения необходимо авторизоваться
Прикрепить файл
Дополнительные параметры ответа