Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
15 дек 2024, 09:35

Помогите новичку потключить и настроить ШК

Автор oleg200411, 31 дек 2010, 13:09

0 Пользователей и 1 гость просматривают эту тему.

oleg200411

Конфа бухгалтерия торговля и склад 7.7
При пике сканера в карточке товара определяет и перезаписывает код как 0
при наборе в документе вместо соответствующего товара определяет любой другой которыому не задан штрих код


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

// ===============================
Процедура глУстановкаШтрихКода(Конт,Данные) Экспорт
// Разбор строки данных от сканера штрих кода - определение формата штрих-кода
Если ШтрихКодИмеетПрефикс=1 Тогда
Если Найти("MPJS",Лев(Данные,1))=0 Тогда
Предупреждение("Формат считанного штрих-кода не предназначен для товаров.");
Возврат;
Иначе
Данные=Сред(Данные,2,СтрДлина(Данные)-1);
КонецЕсли;
КонецЕсли;
// Запись полученного штрих-кода
Если ПустоеЗначение(Конт.ШтрихКод)=1 Тогда
Конт.ШтрихКод=Число(Данные);
Иначе
Если Вопрос("Штрих-код уже задан. Переписать?", 4 )=6 Тогда
Конт.ШтрихКод=Число(Данные);
КонецЕсли;
КонецЕсли;
КонецПроцедуры
               


Что делать?

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск