Драйвер для "клавиатурного" сканера штрихкодов. На встроенном языке 1С…




Принцип обмена данными из 1С с сайтом (на MySQL) и выдачи (публикации) этих данных по запросу.
PHP-Скрипт автоматической загрузки данных из файла данных в формате CSV в базу данных сайта работающего на WordPress.

В продолжение моей темы: 1С:Альфа-Авто Автосалон Автосервис: обмен с сайтом.
С помощью данного скрипта можно загружать в автоматическом режиме, по расписанию, данные сервисных книжек (ремонтов авто) из 1С:Альфа-Авто Автосалон Автосервис.
Также можно загружать данные в ручном режиме: для этого делается скрытая страница, где размещается специальная кнопка.
Комментарии размещенные внутри скрипта разъяснят логику и порядок действия.
Комментарии с "/////    echo" использовались для отладки.
Дополнительно создана таблица для журналирования результатов загрузки данных.
Скрипт включает в себя защиту от SQL инъекций (думаю безопасность соблюдена в полной мере).
В кратце:
1. Пишется скрипт, который запускает этот.
2. Создается регламентное задание в WordPress, по которому запускается скрипт из п.1. 
3. Этот скрипт осуществляет проверку на существование файла обмена в папке.
4. Если данные не новые, загрузка не производится.
5. Если данные новые, очищается таблица сервисных книжек.
6. Загружаются новые данные.

Собственно сам скрипт:

<?php // Полная загрузка сервисных книжек, создан 2024-01-05 12:44:55

global $wpdb2;
global $failure;
global $file_hist;

/////  echo '<H2><b>Старт загрузки</b></H2><br>';

$failure=FALSE;
//подключаемся к базе
$wpdb2 = include_once 'connection.php'; ; // подключаемся к MySQL
// если не удалось подключиться, и нужно оборвать PHP с сообщением об этой ошибке
if (!empty($wpdb2->error))
{
/////   echo '<H2><b>Ошибка подключения к БД, завершение.</b></H2><br>';
$failure=TRUE;
wp_die( $wpdb2->error );
}

$m_size_file=0;
$m_mtime_file=0;
$m_comment='';
/////проверка существования файлов выгрузки из 1С
////файл выгрузки сервисных книжек
$file_hist = ABSPATH.'/_1c_alfa_exchange/AA_hist.csv';
if (!file_exists($file_hist))
{
/////   echo '<H2><b>Файл обмена с сервисными книжками не существует.</b></H2><br>';
$m_comment='Файл обмена с сервисными книжками не существует';
$failure=TRUE;
}

/////инициируем таблицу лога
/////если не существует файла то возврат и ничего не делаем
if ($failure){
///включает защиту от SQL инъекций и данные можно передавать как есть, например: $_GET['foo']
/////   echo '<H2><b>Попытка вставить запись в лог таблицу</b></H2><br>';
$insert_fail_zapros=$wpdb2->insert('vin_logs', array('time_stamp'=>time(),'last_mtime_upload'=>$m_mtime_file,'last_size_upload'=>$m_size_file,'comment'=>$m_comment));
wp_die();
/////    echo '<H2><b>Возврат в начало.</b></H2><br>';
return $failure;
}
/////проверка лога загрузки, что бы не загружать тоже самое
$masiv_data_file=stat($file_hist);   ////передаем в массив свойство файла
$m_size_file=$masiv_data_file[7];    ////получаем размер файла
$m_mtime_file=$masiv_data_file[9];   ////получаем дату модификации файла
////создаем запрос на получение последней удачной загрузки
////выбираем по штампу времени создания (редактирования) файла загрузки AA_hist.csv, $m_mtime_file

/////   echo '<H2><b>Размер файла: '.$m_size_file.'</b></H2><br>';
/////   echo '<H2><b>Штамп времени файла: '.$m_mtime_file.'</b></H2><br>';
/////   echo '<H2><b>Формирование запроса на выборку из лога</b></H2><br>';
////препарируем запрос
$text_zaprosa=$wpdb2->prepare("SELECT * FROM `vin_logs` WHERE `last_mtime_upload` = %s", $m_mtime_file);
$results=$wpdb2->get_results($text_zaprosa);

if ($results)
{   foreach ( $results as $r)
{
////если штамп времени и размер файла совпадают, возврат
if (($r->last_mtime_upload==$m_mtime_file) && ($r->last_size_upload==$m_size_file))
{////echo '<H2><b>Возврат в начало, т.к. найдена запись в логе.</b></H2><br>';
$insert_fail_zapros=$wpdb2->insert('vin_logs', array('time_stamp'=>time(),'last_mtime_upload'=>$m_mtime_file,'last_size_upload'=>$m_size_file,'comment'=>'Загрузка отменена, новых данных нет, т.к. найдена запись в логе.'));
wp_die();
return $failure;
}
}
}
////если данные новые, пишем в лог запись о начале загрузки
/////echo '<H2><b>Попытка вставить запись о начале загрузки в лог таблицу</b></H2><br>';
$insert_fail_zapros=$wpdb2->insert('vin_logs', array('time_stamp'=>time(),'last_mtime_upload'=>0, 'last_size_upload'=>$m_size_file, 'comment'=>'Начало загрузки'));

////очищаем таблицу
$clear_tbl_zap=$wpdb2->prepare("TRUNCATE TABLE %s", 'vin_history');
$clear_tbl_zap_repl=str_replace("'","`",$clear_tbl_zap);
$results=$wpdb2->query($clear_tbl_zap_repl);
/////   echo '<H2><b>Очистка таблицы сервисных книжек</b></H2><br>';
if (empty($results))
{
/////   echo '<H2><b>Ошибка очистки таблицы книжек, завершение.</b></H2><br>';
//// если очистка не удалась, возврат
$failure=TRUE;
wp_die();
return $failure;
}

////загружаем данные
$table='vin_history';         // Имя таблицы для импорта
//$file_hist Имя CSV файла, откуда берется информация     // (путь от корня web-сервера)
$delim=';';          // Разделитель полей в CSV файле
$enclosed='"';      // Кавычки для содержимого полей
$escaped='\

32 Comments

  1. ACE$

    но в вайне не работает…

    Reply
  2. Noy

    (1) Я, конечно, законченный виндузятник, но вайн пару раз видел:

    если работает формекс + нормально работает клава, то должен и «драйвер» работать.

    В чем именно затык?

    Reply
  3. Skif46

    Э… А с каких это пор атоловский драйвер стал платным?

    На крайняк кто мешает пользовать бесплатную версию?

    Reply
  4. Noy

    (3) честно говоря я наверное не совсем в курсе. сам не пользуюсь, а на форумах часто говорится, что драйвер стал платным.

    а тут решил внедрить штрихкодирование документов — понадобился такой функционал. вот и делюсь нароботками

    Reply
  5. ACE$

    (2) затык с вижалбасиковскими скриптами. Ежели их не использовать, то — да, все прекрасно работает 🙂 Здесь скрипт используется только для распаковки формекса, насколько я понял.

    (3) платные с версии 6.6 вроде как (рекомендованные для 1с8). Я у себя ставил последнюю бесплатную + переделывал обработку обслуживания. В пробной версии драйверов сделана задержка на срабатывание, порядка 10 сек. Т.е. в пробном варианте использовать драйвер невозможно.

    Reply
  6. Арчибальд

    Эк, завернул 😀

    Вообще-то, в самописной конфе все можно сделать гораздо проще, например, как в Читателе из http://infostart.ru/public/19400/ . Однако здесь функционал имеет дополнительные привлекательные стороны:

    — блокируется имитация сканера ручным вводом

    — не надо лезть в код при смене модели сканера

    — если в конфе есть обработка внешнего события от сканера, то в код вообще лезть не надо

    — отработано многие (возможно, все?) глюки («неприличные» коды символов) сканеров, отравляющие жизнь одноэсникам при использовании как АТОЛовских драйверов, так и 1Сных.

    — и еще много, что мне понравилось…

    Автор в очередной раз продемонстрировал высокий профессионализм.

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

    Reply
  7. Noy

    (5) именно так — сам «дравер» из нестандартных средств использует только формекс и одну недокументированную функцию.

    Reply
  8. Noy

    (6) Спасибо за обзор и лестный отзыв. 🙂

    А с определением суффикса/префикса сканера — классная идея. Обязательно допишу.

    Reply
  9. Noy

    (6) уже сделано! 😉

    Reply
  10. Арчибальд

    (9) Возьми с полки пирожок 😀

    Плюсить негде 🙁

    Reply
  11. Noy

    (10) Кстати, можешь себе в Грузовую проходную этот «драйвер» добавить. Там же используется KCY-125-USB — должно как раз подойти.

    Reply
  12. Арчибальд

    Так она уже работает (сдана в эксплуатацию), значит, трогать не надо 🙂

    Я ж потому и писал со знаньем дела, что сам поковырялся с бездрайверным сканированием 😉

    Мне больше крови попортил бездрайверный СОМ-ридер http://infostart.ru/public/69762/

    Reply
  13. Арчибальд

    Между прочим, этот «драйвер» годится для ридеров смарт-карт 😀

    Reply
  14. Abadonna
    для ридеров смарт-карт

    По русски говори… да…! 😀

    © х/ф Гений

    Reply
  15. Арчибальд

    Но панталоны, фрак, дискета —

    Всех этих слов на русском нету 😮

    PS Средний рейтинг проголосовавших = 518 😎

    Reply
  16. Noy

    (15)

    PS Средний рейтинг проголосовавших = 518 smile8-)

    Это что значит?

    Reply
  17. Арчибальд

    (16) Плюсует, кто понимает. Остальные не прониклись 🙁

    Reply
  18. Noy

    О! теперь понял.

    приятно 🙂

    Reply
  19. DjSpike

    Мне такая вещь очень нужна для 1с8…..

    Reply
  20. Angeros

    А как насчет 8?

    Reply
  21. Noy

    (19),(20) С восьмеркой не работаю… но если в восьмерке есть возможность перехватывать нажатие клавиш (и блокировать) то легко переписывается — на 99% процедура будет такая же.

    Reply
  22. Арчибальд

    (21) Пытались мы как-то заказать даже не универсальное, а хоть какое-нибудь подключение «клавиатурного» сканера к восьмерочному аналогу конфигурации http://infostart.ru/public/21434/ . Разработчик конфы не потянул.

    Reply
  23. ZLENKO

    Для 8-ки есть замечательный драйвер http://www.atol.ru/support/programs/

    Правда с некоторого времени драйвер сканера штрихкода стал платным, но если хорошо поискать в инете — можно найти «старую» бесплатную версию.

    Reply
  24. Арчибальд

    (23) Да глючит старый драйвер на новых сканерах. Вернее, требует танцев с бубнами. В том и ценность этой разработки.

    Reply
  25. ZLENKO

    (24) На каких таких «новых» сканерах ? В чем проявляются «глюки» ? Что то я пока не замечал проблем на метролоджиках.

    Reply
  26. Арчибальд

    (25) Метролоджики обкатаны, я тоже проблем не встречал. Однако ж на форумах вопросы — встречал многократно.

    Reply
  27. As-sa

    Вот у меня например 1 машина(ноут без HDD)с VTWare + как раз Metrologic — и выясняется что для них драйвер который пробрасывает порт в режиме USB->Serial для VTWare то ли не написан, то ли не включен в дистрибутив. И что, из-за одной машины я буду вникать в тонкости с этими драйверами и обновлениями VT — да я уже и забыл как все это настраивал!Заодно решается проблема с клавиатурными сканерами — если они не дай бог когда появятся. А так да — метролоджики очень удобные и отказоустойчивые штуки. В общем, для извращенцев типа меня. Плюсую.

    Reply
  28. Кабыр

    В инете черным по белому: Сканер штрих-кода в разрыв клавиатуры с 1С — НЕ РАБОТАЕТ !!!! А благодаря этой обработке я за пару часов «привязал», кстати, новый сканер Metrologic «Voyager», который ни через COM, ни с USB не запускался, к 1С 7.7 ТИС. Позитив +++ ! Спасибо.

    Reply
  29. vkr

    Очень интересно!!! В свое время я тоже замаялся и с Атоловскими, и с Сигуловскими драйверами ТО… 🙂

    Reply
  30. simply1

    жаль что нельзя использовать для 8-ки

    Reply
  31. kozorez

    замечательная вещь! не нужно мучаться с АТОЛОМ в терминале

    Reply
  32. Octopus

    Работает на ура, но поскольку дров для сканера нет, конфа ругается при попытке выполнить для сканера всякие DeleteEvent() и т.д. Ну это поправимо. Проверял в терминале на Server2008 R2.

    Reply

Leave a Comment

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