В прошлой теме //infostart.ru/public/307641/ выкладывал "труды" по интеграции УПП с системой электронной проходной Perco. Данные записывал напрямую в базу данный электронной проходной , затем передавал в апаратуру но ничего не работало.
Все дело в том , что после очередного обновления разработчики Perco добавили несколько таблиц, в которые так же надо писать данные. Поэтому код, который представлен был в прошлой статье, не приносил желаемого результата.
Читал в комментариях где то здесь, что работа через SDK модуль очень нудная, и процедуры отрабатывают долго. Изучил мануал и решил попробовать. Все оказалось очень даже красиво и просто. Выдача карты доступа занимает порядка 2-3 секунд. Так же удаляются карты и изменяются права.
Делюсь наработками.
Принцип системы достаточно прост. Вы подключаете dll -ку SDK ,заполняете XML файлик определенного формата, вызываете процедуру и в качестве параметра передаете этот XML.
1. Подключение DLL - Открываете командную строку под администратором и пишите regsvr32 "Полный путь до dll". Например
regsvr32 "C:\123.dll"
2. Подключаетесь к DLL через 1С .
Попытка
Соединение = Новый COMОбъект("Perco_s20_SDK.ExchangeMain");
Исключение
Предупреждение("ОШИБКА: Не удалось установить COM соединение с ПО PERCo-S-20. Возможная причина: Отсутствует или не зарегистрирована библиотека ""PERCo_S20_1C.dll"". См. описание ПО ""Perco-S-20""",10);
КонецПопытки;
3. Формируете XML файлик. В качестве примера покажу как делал файл для Добавление Сотрудника с картой и изменения сотрудника.
СоздатьXMLОбъект(БД,mode) Экспорт
Попытка
id_internal = ПолучитьИдСотрудника(БД);
ЛЛ = Сокрлп(id_internal);
id_internal = УбратьПробелы(ЛЛ);
subdiv_id_external = ПолучитьИДПодразделение(БД);
//Должность
ЛЛ = Сокрлп(Должность_.ИД);
ИДДолжности = УбратьПробелы(ЛЛ);
appoint_id_external = ИДДолжности;
//
//Карта
ЛЛ = Сокрлп(Номер);
Л_номер = УбратьПробелы(ЛЛ);
лл= Сокрлп(Семейство);
л_Семейство = УбратьПробелы(ЛЛ);
identifier = ПолучитьНомерКарты(бд);
shablon_id_internal = ПолучитьИдШаблонаДоступа(бд);
КолДней = 365;
КолДнейДобавить = КолДней*24*60*60;
ДатаБезВремени_1 = Формат(ДатаБезВремени,"ДЛФ=Д");
ДатаБезВремени_2 = Формат(ДатаБезВремени+КолДнейДобавить,"ДЛФ=Д");
ТекущаяДата = Формат(ТекущаяДата(),"ДЛФ=Д");
//
XML_DOM = Новый COMОбъект("Microsoft.XMLDOM");
Header = XML_DOM.createProcessingInstruction("xml", "version=""1.0"" encoding=""UTF-8"" standalone=""yes""");
XML_DOM.appendChild(Header);
Elem = XML_DOM.createElement("documentrequest");
Elem.setAttribute("type", "staff");
//Elem.setAttribute("mode", "withdraw_one_card_selected_employ");
NodeRoot = XML_DOM.appendChild(Elem);
Elem = XML_DOM.createElement("login");
Elem.setAttribute("loginname", "ADMIN");
NodeRoot = NodeRoot.appendChild(Elem);
Elem = XML_DOM.createElement("workmode");
Elem.setAttribute("mode", Сокрлп(mode));
NodeRoot = NodeRoot.appendChild(Elem);
Elem = XML_DOM.createElement("staff");
NodeRoot = NodeRoot.appendChild(Elem);
Elem.setAttribute("photo", ""); //фотография путь
Elem.setAttribute("date_begin", Формат(ДатаБезВремени,"ДЛФ=Д")); // Дата приема
Elem.setAttribute("graph_id_internal", "0"); // -//- график работы
//Elem.setAttribute("appoint_id_internal",""); // значение Внутреннего ключевого поля Должность
//Elem.setAttribute("subdiv_id_internal",""); // Значение внутреннего ключевого поля подразделение
Elem.setAttribute("graph_id_external", ""); // -//- график работы
Elem.setAttribute("appoint_id_internal", Сокрлп(appoint_id_external)); // значение внешнего ключевого поля Должность
Elem.setAttribute("subdiv_id_internal", Сокрлп(subdiv_id_external)); // Значение внешнего ключевого поля подразделение
Elem.setAttribute("id_internal", Сокрлп(id_internal)); // -//- график работы
Elem.setAttribute("tabl_id", Сокрлп(ТабельныйНомер)); //Табельный номер
Elem.setAttribute("middle_name", Сокрлп(Отчество)); //Отчество
Elem.setAttribute("first_name", Сокрлп(Имя)); // Фамилия
Elem.setAttribute("last_name", Сокрлп(Фамилия)); // Фамилия
Elem.setAttribute("id_external",""); // ID сотрудника в STAFF
//Доступы
Elem = XML_DOM.createElement("identifiers");
NodeRoot = NodeRoot.appendChild(Elem);
Elem = XML_DOM.createElement("identifier");
NodeRoot = NodeRoot.appendChild(Elem);
Elem.setAttribute("shablon_id_internal",shablon_id_internal ); //Ид шаблона доступов
Elem.setAttribute("prohibit", "false"); //Запред на использование карты
Elem.setAttribute("date_end_action", ДатаБезВремени_2); // дата окончания
Elem.setAttribute("date_begin_action",ДатаБезВремени_1); // дата начала действия карты
Elem.setAttribute("identifier",identifier ); // Значение идентификатора
Elem.setAttribute("type_identifier", "family_number"); // Тим идентификатора
//
XML_DOM.save("\\Путь\" + "ИмяФайла.xml");
Исключение
Сообщить("Не удалось создать XML объект.");
XML_DOM=Неопределено;
КонецПопытки;
Возврат XML_DOM;
КонецФункции
Данные для заполнения берем из базы perco через простые SQL запросы. Как подключить описано в предыдущей статье.
5. после заполнения файла подключаемся через SDK к базе и предаем данные.
Процедура SDK(БД)
//Обновляем данные или создаем нового сотрудника
Обновление = ПроверкаСотрудника(БД);
Если Обновление = 1 тогда
mode ="update";
Иначе
mode = "append";
КонецЕсли;
Если Обновление <> 3 тогда
ОбъектХМЛ = СоздатьXMLОбъект(БД,mode);
Попытка
Соединение = Новый COMОбъект("Perco_s20_SDK.ExchangeMain");
Исключение
Предупреждение("ОШИБКА: Не удалось установить COM соединение с ПО PERCo-S-20. Возможная причина: Отсутствует или не зарегистрирована библиотека ""PERCo_S20_1C.dll"". См. описание ПО ""Perco-S-20""",10);
КонецПопытки;
Если Соединение.SetConnect(Сокрлп("ip_адрес_сервера_системы_perco"),Сокрлп("211"),Сокрлп("admin"),Сокрлп("Пароль"))<> 0 тогда
Сообщить("Соединение с сервером системы не установлено!!!");
Иначе
Соединение.SendData(ОбъектХМЛ);
КонецЕсли;
Соединение.Disconnect();
Соединение = Неопределено;
КонецЕсли;
КонецПроцедуры
6. передаем данные в аппаратуру по той же системе. Формируем XML и передаем его через процедуру.
ОбъектХМЛ_1 = СоздатьXMLОбъектПрименение();
Попытка
Соединение = Новый COMОбъект("Perco_s20_SDK.ExchangeMain");
Исключение
Предупреждение("ОШИБКА: Не удалось установить COM соединение с ПО PERCo-S-20. Возможная причина: Отсутствует или не зарегистрирована библиотека ""PERCo_S20_1C.dll"". См. описание ПО ""Perco-S-20""",10);
КонецПопытки;
Если Соединение.SetConnect(Сокрлп("АдресСервера"),Сокрлп("211"),Сокрлп("admin"),Сокрлп("ПарольАдмина"))<> 0 тогда
Сообщить("Соединение с сервером системы не установлено!!!");
Иначе
Соединение.ExecuteAccessCardsAction(ОбъектХМЛ_1);
КонецЕсли;
Соединение.Disconnect();
Соединение = Неопределено;
формат файла XML для передачи карт в апаратуру описан в мануале. Я использовал "Передать Все Изменения" .
Так же для удобства я в УПП сделал справочник "Должности Perco" в который загрузил Все ID должностей в базе перки и Наименования. Чтобы процесс выбора должности занимал меньше времени.
Все работает, все проверено. Если будут вопросы - обращайтесь.
