<?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='\
Я вот не очень понял. Компоненты для интеграции — это автор разработал, или они уже штатно идут?
Сергей, эти компоненты идут штатно в комплекте с дистрибутивом MyChat Server, бесплатно. Разработаны авторами мессенджера.
(2) Спасибо за информацию!
(3) Serega-artem, пожалуйста, обращайтесь на форум поддержки, если что.
(4) лично я считаю, что интегрировать что-то типа MyChat жуткий моветон. Есть куча решений по чатам в самой 1С, как на уровне событий, так и совсем других. А глобально, наиболее удобно и перспективно использовать внешние сервисы, например telegramm с внятным API и кросс-платформенными клиентами. На форуме есть несколько примеров организации ботов, организовать чат на порядок проще. Причем никаких внеших компонент, исключительно http.
(5) eskor, возражу. Чаты на основе самой 1С это жуткое УГ. В силу того, что платформа для этого не предназначена. Прежде, чем делать какие-то выводы, рекомендую хотя бы попробовать.
Далее, чаты на основе Telegram это здорово, но ему нужен Интернет, а MyChat — это сервер внутри вашей сети. Если вы добровольно согласны сливать внутреннюю информацию компании на чужие сервера непонятно куда — это ваше право. Лично я на такое не готов. Как и множество наших клиентов.
Пример в студию, покажите, насколько это проще, в отличие от того примера, что я привел.
(6) да не вопрос. Вот готовый пример от автора
И насчет безопасности не перебарщивайте. Принципиально то — кто инициирует соединение и какие порты при этом используются. Впрочем это тема отдельного разговора, достаточно того, что telegramm можно встроить в 1С без танцев с бубном, и безопасность при этом не пострадает.
(7) eskor, платформа, не у всех 8.3 !
(7) eskor, наверное, вы пошутили насчёт простоты 🙂 Там кода на три порядка больше, я специально зашёл и посмотрел. Уже не говоря про версию 8.3. Идём дальше, нужен бот. А получатели должны подписаться на этого бота. В статье, что я написал, речь идёт о корпоративном чате, с Windows. У людей десктопы. Вы предлагаете всем установить Telegram.
Хотелось бы. Но использование своего мессенджер-сервера — принципиальная вещь. При чём тут порты и кто инициирует соединение? Я говорю о том, что вы предлагаете конфиденциальную коммерческую информацию сливать на сервера Телеграма в Интернет. Это несерьёзно и недопустимо для бизнеса. Хотя, возможно, каким-то компаниям и наплевать на это.
100% согласен с вами.
Если вам нужны оперативные уведомления — то нужно отправлять СМС.
(5) eskor, Гораздо лучше — это рассылка СМС со СВОЕГО шлюза. своим работникам, или кому еще пожелаете.
Чаты, телеграммы — это все зло …
(10) enzain, SMS это здорово, но стоит денег. Каждая. Как минимум вам нужен шлюз и тарифный пакет для отправки сообщений. И в SMS вы запихнёте максимум 70 русских символов. Это очень мало. Мало того, посмотреть архив СМС, сделать поиск по нему. А как ответить в чат?… Ну вы поняли ход мысли 🙂 И да, никаких гарантий насчёт получения.
Наша компания делала такой шлюз на основе Siemens MC35i, всё работало, но не бесплатно.
P.S. Забыл про бонус. Оператор связи и все интересующиеся будут знать про все ваши телодвижения в бухгалтерии. Привет Яровой :):)
Вообще-то правы все! Я бы совместил идеи. SMS — для сотрудников работающих в «полях», и чат для «офисного планктона».
Типа SMS: Вася! Обнови 1С:Бухгалтерию ООО «Василёк»
Чат: Марья Ивановна! Платеж не прошел на сумму бла бла бла для организации бла бла ссылка, документ ссылка …
(13) slauter77, да, это хороший вариант, когда до сотрудника никак не достучаться и интернета у него нет. SMS — единственный способ прислать хоть какое-то сообщение.
У нас для подобного решения и оповещений используется свой jabber сервер с глобальным ростером единным для всех.
(15) dreamadv, покажите своё решение, если не жалко, может, у него есть какие-то сильные стороны, которых мы, возможно, не заметили.
Автору, большой респект за публикацию!!!! Давно подыскивал чат , такой что бы была возможность поженить его с 1С. Почта -не оперативно , СМС — тоже не совсем то, так как в сообщении есть ссылка объект 1С .
Кое что находил из бесплатного , но из за заморочек в настройке проект так и не взлетел. А тут утром наткнулся на статью , а в обед уже первые 15 человек , радовались оперативностью оповещения. Пару недель понаблюдаю и если все будет Ок , будем брать коммерческую версию.Из минусов немного тормозит диалог передачи файлов , а так все ГУД.
(17) bas_nsk, Пожалуйста, пользуйтесь на здоровье. Андрей, насчёт диалога передачи файлов — лучше написать в , там выясним, что конкретно не так и как это полечить.
в одном из новейших релизов БУДЕТ чат от самой 1С +видеозвонки. Уже видел демонстрацию. Правда не известно когда он выйдет.
(19) rasswet, где об этом можно почитать? И, я так понимаю, всем, кто его захочет, придётся за новый релиз заплатить. Они не говорят, сколько?
(19) rasswet, В новом релизе чего? Платформы? Там только чата нехватает с видеозвонками.
В новой версии MyChat (5.24+) добавлена возможность размещения для всех пользователей сети и с обязательным требованием прочтения на любое количество пользователей.
И там и там можно указать дату актуальности сообщения.
P.S. Надо скачать свежую версию библиотеки mychatvk.dll с официального сайта.
Этот ваш MyChat работает только под виндой?
Решение конечно имеет право на жизнь, но я бы смотрел в сторону открытых систем.
Тот же Jabber (XMPP), реализаций найти можно уйму на этом сайте, клиенты есть под все ОС в том числе и мобильные и веб, сервера Jabber тоже есть под различные ОС и поднять свой собственный не составит труда.
Ну и собственно сама 1С уже выпустила продукт «1С:Предприятие — Сервер взаимодействия», можно как собственный сервер поднять так и пользоваться облачным от 1С, чат уже есть из коробки 1С начиная с версии 8.3.10.2168:
(23)
Александр, MyChat работает под Windows/Linux/MacOS/Android/WEB. Сервер — только под Windows.
Насчёт Jabber и 1С — я рекомендую вам самому развернуть эти системы и сравнить функционал и стоимость с MyChat, а уже потом давать комментарии, владея конкретными цифрами и функционалом.
Открытые системы — это здорово, но, к сожалению, очень сложно и часто работает далеко не всё. Когда дело доходит до реальных задач, нужны восьмигранные напильники с алмазным напылением, и то не всегда помогает 🙂 Говорю не просто так, есть приличный опыт работы с OpenFire/ejabberd. Серьёзные же коммерческие системы стоят уйму денег. Например, Skype for business. MyChat между ними посредине. В любом случае, для начала попробуйте бесплатную версию, чтобы сложить своё собственное мнение. До 20 человек онлайн — бесплатно, без ограничения по времени использования.
Насчёт решения от 1С. Да, в статусе беты, наверное, допилят до какого-то уровня со временем. Функционал слабенький, системные требования — весьма серьёзные, без 1С — не работает. Работает через WebSockets. То есть внутри что-то типа Electron или WebKit (обрезанный Chrome, ниже Windows 7/Vista работать не будет). Вы серьёзно считаете, что для компании на 200-300 человек нужно закупать лицензии на 1С на все рабочие места, чтобы общаться в корпоративном чате? Во сколько это обойдётся?
(24) Насчёт Jabber и 1С, неоднократно разворачивал и использую. Например наиболее активно используется корпоративный чат на коробке Битрикс24 там свой Jabber (XMPP) сервер, есть интеграция с 1С с Jabber (вполне себе без сторонних компонент), все отлично работает, про какие напильники идет речь?
Туда же в Битрикс заведены открытые линии, так что менеджеры из единого чата могут общаться с клиентами через Telegram, Viber, VK, Facebook и пр.
MyChat безусловно молодцы что сделали библиотеку для интеграции, функционал действительно достаточно широк и выходит за рамки корпоративного чата, я даже проголосовал за публикацию в знак одобрения и поддержки.
Но справедливости ради надо заметить что это не единственное достойное решение.
(25) Понятно, что не единственное. Когда я говорил о Jabber серверах, я имел в виду не готовое решение от 1С, а отдельный ejabberd или openfire сервер, с ними, собственно, и хлебнули радостей 🙂
(27) П.С. Насчет оптимальности кода и прочее — это не та ветка ).
Есть проверка работы на платформе 8,2 в клиент серверном варианте, почему спрашиваю, потому что уже наступал на эти грабли с библиотеками API / COM и т.п.
(29) Совместимость есть, , но на 8.2 должно работать точно так же.
Автор безусловно молодец, спасибо за наводку, но к этому чату очень много вопросов, не тянет он на корпоративный чат, очень много косяков обнаружил наш сисадмин, писал им в поддержку несколько раз ответы «порадовали»))) создание msi пакетов за денежку, поддержки универсальных путей: //server100500/files — увы нет 🙁 ну не хотим мы файлы, передаваемые пользователями хранить у них на компе, хотим все хранить на серверах
(31) MSI пакет есть, берите и пользуйтесь. Вы что-то явно путаете. А не хотите файлы у клиентов хранить — ну не передавайте их напрямую, проблем-то. Заливайте штучно, они ж на сервере хранятся 🙂 Перетащили мышкой в окно и бросили, что проще может быть?
(32) Про то что есть MSI согласен, не верно выразился, прошу извинить, есть функция такая создание своего msi пакета, так вот там можно создавать пакет, но он не корректно работает, хотя создается…
На счет заливать файлы, ошибка 🙁
[ERROR] Ошибка #0234: ошибка заливки файла на сервер (URL «https://192.168.0.1:80/uploading/», #10091, «Network subsystem is unusable»)
(33) Если вы про Distrib Maker — то там нет MSI вообще, только EXE. А про сетевую ошибку — это у вас файрвол или касперский на сервере хулиганит, не даёт залить файл по https. Вы на форуме поддержки спрашивали про это?
«корпоративный чат» — это когда много пользователей) а цены на лицензии этой программы просто «конские»( 100 человек — 4000 баксов, 300 человек (количество пользователей для нашего предприятия) — 15000 баксов. Уж лучше самим сделать, на регистрах сведений, на порядок дешевле получается, ИМХО
(35) Макс, у вас нелады с математикой. Лицензия на 100 человек стоит 400 долларов, а не 4 тысячи. На порядок промахнулись.
(36) Моё упущение))) Посмотрел на сайте, там они хотят ввести количество лицензий кратное 10. После надписи «Укажите, сколько подключений вам необходимо:» я в поле ввёл необходимое количество, и совсем не смотрел на какие-то арифметические действия. Ввел количество, посмотрел на цену))) Не внятно этот момент на сайте прописан, или надпись поменять, или принцип ввода количества
То есть, цены уже не конские ? :):)
(38) за 300 лицензий 1200 баксов? На такое начальство может и согласится) Беру свои слова обратно)
А Может кто приведет код как оповещать о новых задачах в документообороте в чат? (фактически дублирование сообщений внутри программы, но только когда программа не запущена.
сообщение типа такого: вам назначена задача — ознакомление и ссылка ….
(40) Вам надо событие отловить в самом 1С, что новая задача назначена. А что отправлять в чат — это уже дело техники.
(41) вот и хотелось бы чтобы все увдедомления окном (см. скрин) перехватывались и передавались в мессенжер причем любой .. или даже самописный агент…который бы сидел в трее и автозагрузке и выдавал сообщения при выключенной программе.. (смысл то всего ..это оповестить о событии как можно раньше…чтобы сэкономить время на обработку задания)
1с реализовало обсуждения через сервер взаимодействия…но настолько криво и неумело… (сообщения можно посылать только из программы.. и вручную…хотя направление правильное ..
(42) как перехватить в самом 1С — я не знаю, не специалист в этом вопросе. Но когда перехватите — то отправить эти сообщения в MyChat в конференцию или личкой — пара пустяков, .
вот именно кто даст решение на пальцах как это сделать…очень актуально!
можно наверно как то реализовать оповещение через сервер взаимодействия…
например что то в виде этого…
ИдентификаторОбсуждения = СистемаВзаимодействия.ПолучитьОбсуждение(ИмяКомпьютера + ИдентификаторПользователя + «Сообщить»);
Сообщение = СистемаВзаимодействия.СоздатьСообщение(ИдентификаторОбсуждения);
Сообщение.Текст = «Зарегистрирован новый документ!»;
Сообщение.Записать();
у кого какие мысли?
Итак, продолжу свои скромные заметки.
Второй вариант отправки сообщений из 1С в MyChat — через REST-запросы. Этот вариант не зависит от разрядности платформы 1С:Предприятие. Вот мой примерчик:
Показать
(45) выглядит неплохо. А есть в 1С какой-то встроенный механизм для работы с JSON, чтобы руками его не лепить?
(46) да, надо время найти да добить по-человечески
Вариант с REST через метод POST. Параметры собираются в объект типа Структура, затем преобразуются в JSON (его можно скормить сразу готовый) и передаются на сервер:
Показать
(48) А без сохранения в файл можно сделать? Сделали JSON -> отправили запрос.
(49) да, примерно так:
Сервер = «192.168.1.223»; Порт = 8081; Ресурс = «/API/?data=»; СтрокаJSON = «{«»cmd»»:»»0002″»,»»UserFrom»»:»»0″»,»»UserTo»»:»»3″»,»»Msg»»:»»Hellomsg»»,»»APIStype»»:»»mydata»»,»»ServerKey»»:»»*****»»}»; Попытка HTTP = Новый HTTPСоединение(Сервер,Порт,,,,30); HTTPЗапрос = Новый HTTPЗапрос(Ресурс); HTTPЗапрос.Заголовки.Вставить(«Content-type», «application/x-www-form-urlencoded»); HTTPЗапрос.УстановитьТелоИзСтроки(СтрокаJSON, КодировкаТекста.UTF8, ИспользованиеByteOrderMark.НеИспользовать); Результат = HTTP.ОтправитьДляОбработки(HTTPЗапрос); //Если Результат.КодСостояния <> 200 Тогда … Исключение Сообщить(«Ошибка при отправке запроса: » + ОписаниеОшибки()); КонецПопытки;Показать
(49) добил, наконец, через средства, появившиеся в версии 8.3.6 и позволяющие преобразовывать без лишних телодвижений:
Показать
(49) упростил код:
Показать
(53) Спасибо за хороший пример, включили его в .
Поразительно, столько шума за два года и никто не обратил внимание на то, что в главе «2. Какой чат взять?» не рассматривается причин взять этот чат. Словно бы действительно это единственный чат, который может во внешнее API. А ведь причин объективно нет. API сейчас у любого современного чата, полно свободного ПО с открытым кодом для организации корпоративных мессенджеров. Народ не торчит у компов и корпоративный — это прежде всего который из программы присылает пуш-уведомление на телефон.
Да и фиг бы с тем что реклама, но ребята, если я создаю чат, в который из 1С буду отправлять сообщения, я ведь хочу иметь возможность ещё и прочитать эти сообщения в программе 1С, а у вас только отправка в Intergation API описана.
У вас есть возможность через апи зарегистрировать пользователя, перенести пользователя из общего чата в группу. Но откуда возьмется группа нигде не сказано! И почему любой человек может переносить в группу людей, или там какие-то права настраиваются на группе или что там происходит? Почему это -то не описали во внешнем Апи, или к вашему мессенджеру надо ещё брать комплект администраторов этого мессенджера? так ведь они тоже денег стоят.
Половина документации просто пустые разделы, зачем-то втюхан глоссарий с кучей слов в алфавитном порядке и несколько из них даже описаны. Вероятно какие-то сложные термины про Rest,сервера, протоколы обмена? Нет, там указано объяснение слов «Админка», «Мессадж», «Онлайн», «Чат».
В документации на консоль кони пляшут(смотреть скрины)
Создается устойчивое впечатление, что функционал настолько печален, что потребовалось сделать как можно больше пустых и бесполезных разделов, чтобы покупатель запутался, заблудился и не увидел этой пустоты.
Возможно, во времена Фидонета это было актуально и весело, но вы вроде как продаете лицензии на ПО, написанное в течение 15 лет на паскале, за неплохие деньги в 2019ом году. Ну за 15 лет можно было сделать к ней нормальную документацию или там действительно описывать нечего?
(55) Куча вопросов ни о чем. Документация огромна и постоянно обновляется. Задайте конкретный вопрос — ответим. Не нравится MyChat — не юзайте его, никто не заставляет. Клиенты есть под Windows, Android, macOS, Linux и WEB.
Ок, как?
(56) В плане «как»? обратиться к апи и по неким фильтрам(id пользователей, группы пользователей, idчатов, период времени) получить сообщения.
А что неконкретного и «ни о чем» в моем посте?
Я вроде достаточно конкретно указала, что судя по документации в программе очень ограниченный функционал, нет описания как добиться базовых вещей. Рекламируемое в этой публикации API не дает возможности полностью контролировать чаты из 1С — следовательно после того как один раз программу настроят к ней ещё надо будет штатного администратора чатов, который будет в этой программе постоянно сидеть и раздавать права, создавать группы — ещё вложения в программу, постоянные вложения.
Проект за 15 лет не развился в серьезное ПО, но денюжки сосет. Документация не информативная, много пустых разделов, зачем то развлекательные разделы включены, у части разделов не коррелируют название и наполнение.
Это совсем не выглядит как «Документация огромна и постоянно обновляется», скорее как любительская разработка бывшего фидошника или дипломная работа на заочном факультете.
(57) Благодарю за пояснение насчёт контроля сообщений из 1С. Вы имеете право на собственное мнение. Но должны понимать, что то, что вы хотите читать логи либо получать историю сообщений удаленно из другой системы — просто не существует. Не существует, потому что мы этого не делали, такой задачи не стояло. Если вам это реально нужно — оплачиваете и мы сделаем.
Снова ваше личное мнение. .
Не надо ничего настраивать, все работает сразу «из коробки». Можете вообще не распихивать пользователей по группам прав, они автоматически назначаются. Напишите, что конкретно вы хотите сделать — я отвечу, предметно. Лучше на официальном форуме, конечно, но можно и здесь, если вам удобнее.
(53)
Некоторые символы сообщения перед отправкой нужно заменить, иначе оно не отправится:
(59) Сообщение о замене символов написал ошибочно, не нужно заменять, т.к. при формировании строки JSON через объект ЗаписьJSON символы преобразуются автоматически. Я собирал строку вручную, поэтому у меня и возникла проблема с символами.
Коллеги, удалите вышеприведенный код (сообщение 59), если добавляли.