mirror of
https://github.com/salexdv/mysql_1c.git
synced 2024-12-04 09:42:40 +02:00
Первый коммит
This commit is contained in:
salexdv
parent
2f5848760e
commit
9a406c3cef
140
README.md
140
README.md
@ -1,2 +1,140 @@
|
||||
# mysql_1c
|
||||
«Класс» для упрощения работы с MySQL из 1С. Позволяет просто выполнять любые виды запросов и получать данные в виде таблицы значений.
|
||||
«Класс» для упрощения работы с MySQL из 1С в Windows.
|
||||
Позволяет просто выполнять любые виды запросов и получать данные в виде таблицы значений.
|
||||
|
||||
## Пример получения данных
|
||||
```bsl
|
||||
// Подключение к базе данных
|
||||
ИмяODBC = "local_base";
|
||||
ИмяБазы = "base_name";
|
||||
ИмяПользователя = "base_name_user";
|
||||
Пароль = "*******";
|
||||
|
||||
MySQL = Обработки.MySQL.Создать();
|
||||
MySQL.Инициализация(ИмяODBC, ИмяБазы, ИмяПользователя, Пароль);
|
||||
|
||||
Если НЕ MySQL.УстановитьСоединение(Ложь) Тогда
|
||||
Сообщить(MySQL.ОписаниеОшибки);
|
||||
Возврат Ложь;
|
||||
КонецЕсли;
|
||||
// Получение таблицы значений и работа с ней
|
||||
Запрос =
|
||||
"SELECT order_id,
|
||||
| order_date,
|
||||
| order_summ,
|
||||
| order_customer
|
||||
|FROM tamble_orders
|
||||
|WHERE order_loaded=""N""";
|
||||
|
||||
ТаблицаЗаказов = MySQL.ПолучитьТаблицуЗначенийПоЗапросу(Запрос);
|
||||
|
||||
Если ТаблицаЗаказов = Неопределено Тогда
|
||||
Сообщить(MySQL.ОписаниеОшибки);
|
||||
Возврат Ложь;
|
||||
КонецЕсли;
|
||||
|
||||
Если ТаблицаЗаказов.Количество() = 0 Тогда
|
||||
Сообщить("На сайте нет новых заказов для загрузки.");
|
||||
Иначе
|
||||
Для Каждого СтрокаТЗ ИЗ ТаблицаЗаказов Цикл
|
||||
НомерЗаказа = СтрокаТЗ.order_id;
|
||||
Покупатель = СтрокаТЗ.order_customer;
|
||||
КонецЦикла;
|
||||
КонецЕсли;
|
||||
```
|
||||
|
||||
## Пример записи данных
|
||||
```bsl
|
||||
// Добавление новых записей в таблицу базы MySQL
|
||||
// Одиночная запись
|
||||
// Соответствие со значениями полей для новой записи таблицы
|
||||
Товар = Новый Соответствие();
|
||||
Товар["product_id"] = "158742";
|
||||
Товар["product_name"] = "1С Управление торговлей 10.3";
|
||||
Товар["product_price"] = 12000;
|
||||
|
||||
// Построение запроса
|
||||
MySQL.СоздатьЗапрос("INSERT", "table_products", Товар);
|
||||
// Выполнение
|
||||
Если НЕ MySQL.ВыполнитьЗапрос() Тогда
|
||||
Сообщить(MySQL.ОписаниеОшибки);
|
||||
Возврат Ложь;
|
||||
КонецЕсли;
|
||||
|
||||
// Несколько записей
|
||||
// Массив в который вставляются соответстия
|
||||
НовыеТовары = Новый Массив();
|
||||
|
||||
Товар = Новый Соответствие();
|
||||
Товар["product_id"] = "158742";
|
||||
Товар["product_name"] = "1С Управление торговлей, редакция 10.3";
|
||||
Товар["product_price"] = 12000;
|
||||
НовыеТовары.Добавить(Товар);
|
||||
|
||||
Товар = Новый Соответствие();
|
||||
Товар["product_id"] = "158743";
|
||||
Товар["product_name"] = "1С Управление торговлей, редакция 11";
|
||||
Товар["product_price"] = 12500;
|
||||
НовыеТовары.Добавить(Товар);
|
||||
|
||||
MySQL.СоздатьЗапрос("INSERT", "table_products", НовыеТовары);
|
||||
Если НЕ MySQL.ВыполнитьЗапрос() Тогда
|
||||
Сообщить(MySQL.ОписаниеОшибки);
|
||||
Возврат Ложь;
|
||||
КонецЕсли;
|
||||
// Обновление полей записи
|
||||
// Соответствие с новыми значениями полей
|
||||
Товар = Новый Соответствие();
|
||||
Товар["product_price"] = 13000;
|
||||
Товар["product_rest"] = 10;
|
||||
|
||||
// В четвертом параметре можно указать условие, по которым осуществляется поиск записей для обновления
|
||||
MySQL.СоздатьЗапрос("UPDATE", "table_products", Товар, "WHERE product_id='158742'");
|
||||
Если НЕ MySQL.ВыполнитьЗапрос() Тогда
|
||||
Сообщить(MySQL.ОписаниеОшибки);
|
||||
Возврат Ложь;
|
||||
Иначе
|
||||
Сообщить("Обновлено товаров: " + MySQL.КоличествоИзменныхЗаписей);
|
||||
КонецЕсли;
|
||||
// Выполнение произвольного запроса
|
||||
Запрос = "DELETE FROM table_products WHERE product_id='158742'";
|
||||
|
||||
Если НЕ MySQL.ВыполнитьЗапрос(Запрос) Тогда
|
||||
Сообщить(MySQL.ОписаниеОшибки);
|
||||
Возврат Ложь;
|
||||
КонецЕсли;
|
||||
```
|
||||
|
||||
Есть возможность разбить INSERT запрос с несколькими записями на подзапросы, чтобы не вставлять за раз много значений. Например, при добавлении в таблицу более 1000 записей, можно сделать это 10-ю запросами по 100 записей в каждом. Для этого достаточно вызвать код:
|
||||
|
||||
```bsl
|
||||
MySQL.ЭлементовВЗапросе = 100;
|
||||
```
|
||||
|
||||
После этого все массивные INSERTы будут делаться по 100 записей за раз.
|
||||
Полный текст запроса можно получить так:
|
||||
|
||||
```bsl
|
||||
MySQL.СоздатьЗапрос("INSERT", "table_products", НовыеТовары);
|
||||
Сообщить(MySQL.ТекстЗапроса());
|
||||
```
|
||||
|
||||
В случае, когда прямой доступ к MySQL запрещен, можно воспользоваться ssh-туннелем. Для этого в обработке есть настройки для запуска Putty.
|
||||
|
||||
```bsl
|
||||
MySQL.ИспользоватьPutty = Истина;
|
||||
MySQL.Putty = "c:\Program Files\PuTTY\putty.exe"; // Путь к программе Putty (Kitty)
|
||||
MySQL.User_put = "ssh_user"; // Имя пользователя для установки ssh-соединения
|
||||
MySQL.Pass_put = "******"; // Пароль
|
||||
MySQL.Name_put = "session_name"; // Имя сохраненной сесии Putty с настройками соединения
|
||||
```
|
||||
|
||||
### Основные методы:
|
||||
* **Инициализация** - Первоначальная инициализация для сохранения параметров ODBC
|
||||
* **ВыполнитьТестовоеПодключение** - Тестирование соединения
|
||||
* **СоздатьЗапрос** - Создает INSERT/UPDATE/REPLACE/DELETE запросы на основе переданных параметров
|
||||
* **ВыполнитьЗапрос** - Выполнение переданного или построенного запроса
|
||||
* **ПолучитьТаблицуЗначенийПоЗапросу** - Выполняет запрос через Recordset и заполняет таблицу значений полученными данными
|
||||
* **ПолучитьМассивЗначенийПоЗапросу** - Выполняет запрос через Recordset и заполняет массив значений полученными данными
|
||||
* **ДобавитьЗапрос** - Добавляет текст запроса для выполнения в пакетном режиме
|
||||
* **ЗакрытьСоединение** - Закрывает существующее подключение к базе MySQL
|
||||
788
src/MySQL/ObjectModule.bsl
Normal file
788
src/MySQL/ObjectModule.bsl
Normal file
@ -0,0 +1,788 @@
|
||||
Перем мСоединение;
|
||||
Перем мЗапись;
|
||||
Перем мКоманда;
|
||||
Перем мТекстЗапроса;
|
||||
Перем мМассивЗначений;
|
||||
|
||||
// Функция возвращает строку, используемую для подключения к базе MySQL
|
||||
//
|
||||
Функция ПолучитьСтрокуСоединения()
|
||||
|
||||
СтрокаСоединения = "DSN=" + СокрЛП(ODBC) + ";";
|
||||
СтрокаСоединения = СтрокаСоединения + "Database=" + СокрЛП(DB) + ";";
|
||||
СтрокаСоединения = СтрокаСоединения + "Uid=" + СокрЛП(User) + ";";
|
||||
СтрокаСоединения = СтрокаСоединения + "Pwd=" + СокрЛП(Pass) + ";";
|
||||
|
||||
Возврат СтрокаСоединения;
|
||||
|
||||
КонецФункции
|
||||
|
||||
// Функцяи создает и возвращает подключение к базе MySQL
|
||||
//
|
||||
Функция УстановитьСоединение(ТестовоеПодключение = Ложь, ВыводитьОшибку = Истина) Экспорт
|
||||
|
||||
ОписаниеОшибки = "";
|
||||
|
||||
ЗапуститьPuTTY();
|
||||
|
||||
мСоединение = Новый COMОбъект("ADODB.Connection");
|
||||
Попытка
|
||||
мСоединение.Open(ПолучитьСтрокуСоединения());
|
||||
Исключение
|
||||
ОписаниеОшибки = ОписаниеОшибки + ОписаниеОшибки() + Символы.ПС;
|
||||
Если ВыводитьОшибку Тогда
|
||||
Сообщить(ОписаниеОшибки);
|
||||
КонецЕсли;
|
||||
мСоединение = Неопределено;
|
||||
КонецПопытки;
|
||||
|
||||
Если НЕ ТестовоеПодключение Тогда
|
||||
СоздатьОбработчикЗаписей();
|
||||
СоздатьОбработчикКоманд();
|
||||
КонецЕсли;
|
||||
|
||||
Возврат (мСоединение <> Неопределено);
|
||||
|
||||
КонецФункции
|
||||
|
||||
// Процедура закрывает существующее подключение к базе MySQL
|
||||
//
|
||||
Процедура ЗакрытьСоединение() Экспорт
|
||||
|
||||
ОписаниеОшибки = "";
|
||||
|
||||
Если мСоединение <> Неопределено Тогда
|
||||
ЗакрытьОбработчикЗаписей();
|
||||
ЗакрытьОбработчикКоманд();
|
||||
мСоединение.Close();
|
||||
мСоединение = Неопределено;
|
||||
КонецЕсли;
|
||||
|
||||
ЗавершитьPuTTY();
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
// Функция выполняет простые запросы (INSERT, DELETE, UPDATE)
|
||||
// в базе MySQL
|
||||
//
|
||||
Функция ВыполнитьПростойЗапрос(ТекстЗапроса)
|
||||
|
||||
КоличествоИзменныхЗаписей = 0;
|
||||
|
||||
ОписаниеОшибки = "";
|
||||
|
||||
мКоманда.CommandText = ТекстЗапроса;
|
||||
мКоманда.CommandType = 1;
|
||||
|
||||
Попытка
|
||||
мКоманда.Execute(КоличествоИзменныхЗаписей);
|
||||
Исключение
|
||||
ОписаниеОшибки = "Не удалось выполнить запрос: " + ОписаниеОшибки();
|
||||
Возврат Ложь;
|
||||
КонецПопытки;
|
||||
|
||||
Возврат Истина;
|
||||
|
||||
КонецФункции
|
||||
|
||||
// Выполнение переданного или построенного запроса
|
||||
//
|
||||
Функция ВыполнитьЗапрос(ТекстЗапроса = Неопределено) Экспорт
|
||||
|
||||
ОписаниеОшибки = "";
|
||||
|
||||
Если ТекстЗапроса = Неопределено Тогда
|
||||
|
||||
Если мМассивЗначений.Количество() = 0 Тогда
|
||||
|
||||
Возврат ВыполнитьПростойЗапрос(мТекстЗапроса);
|
||||
|
||||
Иначе
|
||||
|
||||
Для Каждого ЗначенияЗапроса ИЗ мМассивЗначений Цикл
|
||||
|
||||
Если НЕ ВыполнитьПростойЗапрос(СтрЗаменить(мТекстЗапроса, "&VALUES", ЗначенияЗапроса)) Тогда
|
||||
Возврат Ложь;
|
||||
КонецЕсли;
|
||||
|
||||
КонецЦикла;
|
||||
|
||||
Возврат Истина;
|
||||
|
||||
КонецЕсли;
|
||||
|
||||
Иначе
|
||||
|
||||
Возврат ВыполнитьПростойЗапрос(ТекстЗапроса);
|
||||
|
||||
КонецЕсли;
|
||||
|
||||
КонецФункции
|
||||
|
||||
// Возвращает список полей для запросов INSERT и REPLACE
|
||||
// в формате Поле1,Поле2,ПолеN
|
||||
//
|
||||
Функция ПолучитьТекстПолейЗапроса(ЗначенияПолей)
|
||||
|
||||
Текст = "";
|
||||
|
||||
Поля = ЗначенияПолей;
|
||||
Если ТипЗнч(Поля) = Тип("Массив") Тогда
|
||||
Поля = ЗначенияПолей[0];
|
||||
ИначеЕсли ТипЗнч(Поля) = Тип("ТаблицаЗначений") Тогда
|
||||
Колонки = Новый Соответствие();
|
||||
Для Каждого Колонка ИЗ Поля.Колонки Цикл
|
||||
Колонки[Колонка.Имя] = Истина;
|
||||
КонецЦикла;
|
||||
Поля = Колонки;
|
||||
КонецЕсли;
|
||||
|
||||
Для Каждого Обход ИЗ Поля Цикл
|
||||
Текст = Текст + Обход.Ключ + ",";
|
||||
КонецЦикла;
|
||||
|
||||
Возврат Лев(Текст, СтрДлина(Текст) - 1);
|
||||
|
||||
КонецФункции
|
||||
|
||||
// Возвращает текст для UPDATE запроса с именами и значениями полей в виде
|
||||
// ИмяПоля1=ЗначениеПоля1,ИмяПоля2=ЗначениеПоля2
|
||||
//
|
||||
Функция ПолучитьТекстДляЗапросаОбновления(ЗначенияПолей)
|
||||
|
||||
Текст = "";
|
||||
|
||||
НомерПоля = 0;
|
||||
|
||||
Для Каждого Обход ИЗ ЗначенияПолей Цикл
|
||||
|
||||
НомерПоля = НомерПоля + 1;
|
||||
|
||||
Текст = Текст + Обход.Ключ + "='" + Обход.Значение + "'";
|
||||
|
||||
Если НомерПоля < ЗначенияПолей.Количество() Тогда
|
||||
Текст = Текст + "," + Символы.ПС;
|
||||
КонецЕсли;
|
||||
|
||||
КонецЦикла;
|
||||
|
||||
Возврат Текст;
|
||||
|
||||
КонецФункции
|
||||
|
||||
// Заполняет массив со значениями полей для запросов INSERT и REPLACE
|
||||
// Массив хранит значения в виде (ЗначенияПоля1,ЗначенияПоля2,ЗначенияПоляN),
|
||||
// (ЗначенияПоля1,ЗначенияПоля2,ЗначенияПоляN), (ЗначенияПоля1,ЗначенияПоля2,ЗначенияПоляN)
|
||||
// В массив значения записываются в количестве ЭлементовВОдномЗапросе
|
||||
//
|
||||
Функция ПодготовитьЗначенияЗапроса(ЗначенияПолей, ЭлементовВОдномЗапросе)
|
||||
|
||||
Значения = ЗначенияПолей;
|
||||
|
||||
Если ТипЗнч(Значения) <> Тип("ТаблицаЗначений") Тогда
|
||||
|
||||
Если ТипЗнч(Значения) = Тип("Соответствие") Тогда
|
||||
Значения = Новый Массив();
|
||||
Значения.Добавить(ЗначенияПолей);
|
||||
КонецЕсли;
|
||||
|
||||
Текст = "";
|
||||
НомерЗначения = 0;
|
||||
ВсегоЗначений = Значения.Количество();
|
||||
|
||||
Для Каждого Значение ИЗ Значения Цикл
|
||||
|
||||
НомерЗначения = НомерЗначения + 1;
|
||||
|
||||
Текст = Текст + "(";
|
||||
|
||||
ТекстЗначений = "";
|
||||
Для Каждого Обход ИЗ Значение Цикл
|
||||
ТекстЗначений = ТекстЗначений + "'" + Обход.Значение + "',";
|
||||
КонецЦикла;
|
||||
|
||||
Текст = Текст + Лев(ТекстЗначений, СтрДлина(ТекстЗначений) - 1) + ")";
|
||||
|
||||
Если ЭлементовВОдномЗапросе > 0 И НомерЗначения % ЭлементовВОдномЗапросе = 0 Тогда
|
||||
мМассивЗначений.Добавить(Текст);
|
||||
Текст = "";
|
||||
КонецЕсли;
|
||||
|
||||
Если НомерЗначения < ВсегоЗначений И ЗначениеЗаполнено(Текст) Тогда
|
||||
Текст = Текст + "," + Символы.ПС;
|
||||
КонецЕсли;
|
||||
|
||||
КонецЦикла;
|
||||
|
||||
Иначе
|
||||
|
||||
Колонки = Новый Соответствие();
|
||||
|
||||
Для Каждого Колонка ИЗ Значения.Колонки Цикл
|
||||
Колонки[Колонка.Имя] = Истина
|
||||
КонецЦикла;
|
||||
|
||||
Текст = "";
|
||||
НомерЗначения = 0;
|
||||
ВсегоЗначений = Значения.Количество();
|
||||
|
||||
Для Каждого Значение ИЗ Значения Цикл
|
||||
|
||||
НомерЗначения = НомерЗначения + 1;
|
||||
|
||||
Текст = Текст + "(";
|
||||
|
||||
ТекстЗначений = "";
|
||||
Для Каждого Колонка ИЗ Колонки Цикл
|
||||
ТекстЗначений = ТекстЗначений + "'" + Значение[Колонка.Ключ] + "',";
|
||||
КонецЦикла;
|
||||
|
||||
Текст = Текст + Лев(ТекстЗначений, СтрДлина(ТекстЗначений) - 1) + ")";
|
||||
|
||||
Если ЭлементовВОдномЗапросе > 0 И НомерЗначения % ЭлементовВОдномЗапросе = 0 Тогда
|
||||
мМассивЗначений.Добавить(Текст);
|
||||
Текст = "";
|
||||
КонецЕсли;
|
||||
|
||||
Если НомерЗначения < ВсегоЗначений И ЗначениеЗаполнено(Текст) Тогда
|
||||
Текст = Текст + "," + Символы.ПС;
|
||||
КонецЕсли;
|
||||
|
||||
КонецЦикла;
|
||||
|
||||
КонецЕсли;
|
||||
|
||||
Если ЗначениеЗаполнено(Текст) Тогда
|
||||
мМассивЗначений.Добавить(Текст);
|
||||
КонецЕсли;
|
||||
|
||||
КонецФункции
|
||||
|
||||
// Возвращает текст запроса, созданного функцией СоздатьЗапрос
|
||||
//
|
||||
Функция ТекстЗапроса() Экспорт
|
||||
|
||||
Если мМассивЗначений.Количество() = 0 Тогда
|
||||
|
||||
Возврат мТекстЗапроса;
|
||||
|
||||
Иначе
|
||||
|
||||
ТекстЗначений = "";
|
||||
НомерЗначения = 0;
|
||||
|
||||
Для Каждого Значения ИЗ мМассивЗначений Цикл
|
||||
|
||||
НомерЗначения = НомерЗначения + 1;
|
||||
ТекстЗначений = ТекстЗначений + Значения;
|
||||
|
||||
Если НомерЗначения < мМассивЗначений.Количество() Тогда
|
||||
ТекстЗначений = ТекстЗначений + "," + Символы.ПС;
|
||||
КонецЕсли;
|
||||
|
||||
КонецЦикла;
|
||||
|
||||
Возврат СтрЗаменить(мТекстЗапроса, "&VALUES", ТекстЗначений);
|
||||
|
||||
КонецЕсли;
|
||||
|
||||
КонецФункции
|
||||
|
||||
// Создает текст запроса INSERT, REPLACE, UPDATE на основе переданных
|
||||
// параметров
|
||||
//
|
||||
Функция СоздатьЗапрос(ТипЗапроса = "INSERT", ИмяТаблицы, ЗначенияПолей, Условие = "", ЭлементовВОдномЗапросе = 0) Экспорт
|
||||
|
||||
ОписаниеОшибки = "";
|
||||
|
||||
мМассивЗначений = Новый Массив();
|
||||
|
||||
Если ЭлементовВОдномЗапросе = 0 Тогда
|
||||
ЭлементовВОдномЗапросе = ЭлементовВЗапросе;
|
||||
КонецЕсли;
|
||||
|
||||
ТипЗапроса = СокрЛП(ВРЕГ(ТипЗапроса));
|
||||
ИмяТаблицы = СокрЛП(ИмяТаблицы);
|
||||
|
||||
Если НЕ ЗначениеЗаполнено(ИмяТаблицы) Тогда
|
||||
ОписаниеОшибки = "Не указано имя таблицы";
|
||||
Возврат Ложь;
|
||||
КонецЕсли;
|
||||
|
||||
Если ТипЗапроса <> "DELETE" Тогда
|
||||
|
||||
Если НЕ ЗначениеЗаполнено(ЗначенияПолей) Тогда
|
||||
ОписаниеОшибки = "Не заданы значения полей";
|
||||
Возврат Ложь;
|
||||
КонецЕсли;
|
||||
|
||||
Если ТипЗнч(ЗначенияПолей) <> Тип("Соответствие")
|
||||
И ТипЗнч(ЗначенияПолей) <> Тип("Структура")
|
||||
И ТипЗнч(ЗначенияПолей) <> Тип("Массив")
|
||||
И ТипЗнч(ЗначенияПолей) <> Тип("ТаблицаЗначений") Тогда
|
||||
ОписаниеОшибки = "Значения полей имеют неверный тип";
|
||||
Возврат Ложь;
|
||||
КонецЕсли;
|
||||
|
||||
Если ТипЗапроса = "UPDATE" И (ТипЗнч(ЗначенияПолей) <> Тип("Соответствие") И ТипЗнч(ЗначенияПолей) <> Тип("Структура")) Тогда
|
||||
ОписаниеОшибки = "Для данного типа запроса в качестве значений полей можно передавать только соответствие или структуру";
|
||||
Возврат Ложь;
|
||||
КонецЕсли;
|
||||
|
||||
Если ЗначенияПолей.Количество() = 0 Тогда
|
||||
ОписаниеОшибки = "Передан пустой список полей";
|
||||
Возврат Ложь;
|
||||
КонецЕсли;
|
||||
|
||||
КонецЕсли;
|
||||
|
||||
Если ТипЗапроса = "INSERT" ИЛИ ТипЗапроса = "REPLACE" Тогда
|
||||
|
||||
мТекстЗапроса = ТипЗапроса + " INTO " + ИмяТаблицы + Символы.ПС;
|
||||
мТекстЗапроса = мТекстЗапроса + "(" + ПолучитьТекстПолейЗапроса(ЗначенияПолей) + ")" + Символы.ПС;
|
||||
мТекстЗапроса = мТекстЗапроса + " VALUES &VALUES" + Символы.ПС;
|
||||
|
||||
ПодготовитьЗначенияЗапроса(ЗначенияПолей, ЭлементовВОдномЗапросе);
|
||||
|
||||
ИначеЕсли ТипЗапроса = "UPDATE" Тогда
|
||||
|
||||
мТекстЗапроса = "UPDATE " + ИмяТаблицы + " SET " + Символы.ПС;
|
||||
мТекстЗапроса = мТекстЗапроса + ПолучитьТекстДляЗапросаОбновления(ЗначенияПолей);
|
||||
|
||||
ИначеЕсли ТипЗапроса = "DELETE" Тогда
|
||||
|
||||
мТекстЗапроса = "DELETE FROM " + ИмяТаблицы;
|
||||
|
||||
Иначе
|
||||
|
||||
ОписаниеОшибки = "Неизвестный тип запроса";
|
||||
Возврат Ложь;
|
||||
|
||||
КонецЕсли;
|
||||
|
||||
Если ТипЗапроса = "UPDATE" ИЛИ ТипЗапроса = "DELETE" Тогда
|
||||
|
||||
Если ЗначениеЗаполнено(Условие) Тогда
|
||||
мТекстЗапроса = мТекстЗапроса + Символы.ПС + Условие;
|
||||
КонецЕсли;
|
||||
|
||||
КонецЕсли;
|
||||
|
||||
Возврат Истина;
|
||||
|
||||
КонецФункции
|
||||
|
||||
// Добавляет текст запроса для выполнения в пакетном режиме
|
||||
//
|
||||
Функция ДобавитьЗапрос(Запрос) Экспорт
|
||||
|
||||
ТекстЗапроса = СокрЛП(Запрос);
|
||||
|
||||
Если Прав(ТекстЗапроса, 1) <> ";" Тогда
|
||||
ТекстЗапроса = ТекстЗапроса + ";";
|
||||
КонецЕсли;
|
||||
|
||||
Если ЗначениеЗаполнено(мТекстЗапроса) Тогда
|
||||
мТекстЗапроса = мТекстЗапроса + Символы.ПС;
|
||||
КонецЕсли;
|
||||
|
||||
мТекстЗапроса = мТекстЗапроса + ТекстЗапроса;
|
||||
|
||||
КонецФункции
|
||||
|
||||
// Функция выполняет запрос через Recordset и заполняет таблицу
|
||||
// значений полученными данными
|
||||
//
|
||||
Функция ПолучитьТаблицуЗначенийПоЗапросу(ТекстЗапроса) Экспорт
|
||||
|
||||
ОписаниеОшибки = "";
|
||||
|
||||
ТаблицаЗначений = Неопределено;
|
||||
|
||||
Если мЗапись <> Неопределено Тогда
|
||||
|
||||
Попытка
|
||||
мЗапись.Open(ТекстЗапроса);
|
||||
Исключение
|
||||
ОписаниеОшибки = ОписаниеОшибки();
|
||||
Возврат Неопределено
|
||||
КонецПопытки;
|
||||
|
||||
ТаблицаЗначений = Новый ТаблицаЗначений();
|
||||
|
||||
ИменаПолей = Новый Массив();
|
||||
Для Каждого Field ИЗ мЗапись.Fields Цикл
|
||||
ИменаПолей.Добавить(Field.Name);
|
||||
ТаблицаЗначений.Колонки.Добавить(Field.Name);
|
||||
КонецЦикла;
|
||||
|
||||
Если мЗапись.EOF() И мЗапись.BOF() Тогда
|
||||
// Нет записей в запросе
|
||||
Иначе
|
||||
|
||||
Попытка
|
||||
|
||||
// Считываем информацию из выборки
|
||||
мЗапись.MoveFirst();
|
||||
|
||||
Пока НЕ мЗапись.EOF() Цикл
|
||||
|
||||
СтрокаТЗ = ТаблицаЗначений.Добавить();
|
||||
Для Каждого Поле ИЗ ИменаПолей Цикл
|
||||
СтрокаТЗ[Поле] = мЗапись.Fields.Item(Поле).Value;
|
||||
КонецЦикла;
|
||||
|
||||
мЗапись.MoveNext();
|
||||
|
||||
КонецЦикла;
|
||||
|
||||
Исключение
|
||||
|
||||
ОписаниеОшибки = ОписаниеОшибки();
|
||||
ТаблицаЗначений = Неопределено
|
||||
|
||||
КонецПопытки;
|
||||
|
||||
КонецЕсли;
|
||||
|
||||
ЗакрытьОбработчикЗаписей();
|
||||
|
||||
Иначе
|
||||
|
||||
ОписаниеОшибки = "Невозможно выполнить запрос т.к. нет активного соединения";
|
||||
|
||||
КонецЕсли;
|
||||
|
||||
Возврат ТаблицаЗначений;
|
||||
|
||||
КонецФункции
|
||||
|
||||
// Функция выполняет запрос через Recordset и заполняет массив
|
||||
// значений полученными данными
|
||||
//
|
||||
Функция ПолучитьМассивЗначенийПоЗапросу(ТекстЗапроса, ИмяПоля = Неопределено) Экспорт
|
||||
|
||||
ОписаниеОшибки = "";
|
||||
|
||||
МассивЗначений = Неопределено;
|
||||
|
||||
Если мЗапись <> Неопределено Тогда
|
||||
|
||||
Попытка
|
||||
мЗапись.Open(ТекстЗапроса);
|
||||
Исключение
|
||||
ОписаниеОшибки = ОписаниеОшибки();
|
||||
Возврат Неопределено
|
||||
КонецПопытки;
|
||||
|
||||
МассивЗначений = Новый Массив();
|
||||
|
||||
Если мЗапись.EOF() И мЗапись.BOF() Тогда
|
||||
// Нет записей в запросе
|
||||
Иначе
|
||||
|
||||
Попытка
|
||||
|
||||
// Считываем информацию из выборки
|
||||
мЗапись.MoveFirst();
|
||||
|
||||
Пока НЕ мЗапись.EOF() Цикл
|
||||
Поле = ?(ИмяПоля = Неопределено, 0, ИмяПоля);
|
||||
МассивЗначений.Добавить(мЗапись.Fields.Item(Поле).Value);
|
||||
мЗапись.MoveNext();
|
||||
КонецЦикла;
|
||||
|
||||
Исключение
|
||||
|
||||
ОписаниеОшибки = ОписаниеОшибки();
|
||||
МассивЗначений = Неопределено
|
||||
|
||||
КонецПопытки;
|
||||
|
||||
КонецЕсли;
|
||||
|
||||
ЗакрытьОбработчикЗаписей();
|
||||
|
||||
Иначе
|
||||
|
||||
ОписаниеОшибки = "Невозможно выполнить запрос т.к. нет активного соединения";
|
||||
|
||||
КонецЕсли;
|
||||
|
||||
Возврат МассивЗначений;
|
||||
|
||||
КонецФункции
|
||||
|
||||
Функция СоздатьЗаписьТаблицыПоСтруктуре(СтруктураДанных) Экспорт
|
||||
|
||||
Ошибка = Ложь;
|
||||
|
||||
ИмяТаблицы = Неопределено;
|
||||
|
||||
СтруктураДанных.Свойство("ИмяТаблицы", ИмяТаблицы);
|
||||
|
||||
Если ЗначениеЗаполнено(ИмяТаблицы) Тогда
|
||||
|
||||
Record = New COMОбъект("ADODB.RecordSet");
|
||||
|
||||
Попытка
|
||||
|
||||
Record.Open(ИмяТаблицы, мСоединение, 0, 4, 2);
|
||||
Record.AddNew();
|
||||
|
||||
Для Каждого Обход ИЗ СтруктураДанных Цикл
|
||||
|
||||
Если Обход.Ключ <> "ИмяТаблицы" Тогда
|
||||
|
||||
ЗначениеПоля = Обход.Значение;
|
||||
|
||||
Если ТипЗнч(ЗначениеПоля) = Тип("ДвоичныеДанные") Тогда
|
||||
|
||||
ВремФайл = ПолучитьИмяВременногоФайла("bin");
|
||||
ЗначениеПоля.Записать(ВремФайл);
|
||||
|
||||
Stream = Новый COMОбъект("ADODB.Stream");
|
||||
Stream.Type = 1; // Bynary data
|
||||
Stream.Open();
|
||||
|
||||
Попытка
|
||||
Stream.LoadFromFile(ВремФайл);
|
||||
Исключение
|
||||
Ошибка = Истина;
|
||||
ОписаниеОшибки = "Не получить двоичные данные для записи:" + Символы.ПС + ОписаниеОшибки();
|
||||
КонецПопытки;
|
||||
|
||||
Если НЕ Ошибка Тогда
|
||||
Record.Fields(Обход.Ключ).Value = Stream.Read();
|
||||
Stream.Close();
|
||||
КонецЕсли;
|
||||
|
||||
Stream = Неопределено;
|
||||
|
||||
ИначеЕсли ТипЗнч(ЗначениеПоля) <> Тип("Число") Тогда
|
||||
|
||||
Record.Fields(Обход.Ключ).Value = Строка(ЗначениеПоля);
|
||||
|
||||
Иначе
|
||||
|
||||
Record.Fields(Обход.Ключ).Value = ЗначениеПоля;
|
||||
|
||||
КонецЕсли;
|
||||
|
||||
КонецЕсли;
|
||||
|
||||
КонецЦикла;
|
||||
|
||||
Record.UpdateBatch();
|
||||
Record.Close();
|
||||
|
||||
Исключение
|
||||
|
||||
ОписаниеОшибки = ОписаниеОшибки();
|
||||
Ошибка = Истина;
|
||||
|
||||
КонецПопытки;
|
||||
|
||||
Иначе
|
||||
|
||||
ОписаниеОшибки = "Не задано имя таблицы";
|
||||
Ошибка = Истина;
|
||||
|
||||
КонецЕсли;
|
||||
|
||||
Возврат НЕ Ошибка;
|
||||
|
||||
КонецФункции
|
||||
|
||||
// Функция выполняет проверку соединения с базой MySQL
|
||||
// Возвращает Истина в случае успешного соединения
|
||||
// Ложь - если соединение не было установлено
|
||||
//
|
||||
Функция ВыполнитьТестовоеПодключение(ВыводитьОшибку = Истина) Экспорт
|
||||
|
||||
ОписаниеОшибки = "";
|
||||
|
||||
ПодключениеСоздано = УстановитьСоединение(ВыводитьОшибку);
|
||||
|
||||
ЗакрытьСоединение();
|
||||
|
||||
Возврат ПодключениеСоздано;
|
||||
|
||||
КонецФункции
|
||||
|
||||
// Функция возвращает объект "ADODB.Recordset",
|
||||
// связанный с текущим соединением
|
||||
//
|
||||
Функция ПолучитьОбработчикЗаписей()
|
||||
|
||||
Если мСоединение <> Неопределено Тогда
|
||||
Recordset = Новый COMОбъект("ADODB.Recordset");
|
||||
Recordset.ActiveConnection = мСоединение;
|
||||
Возврат Recordset;
|
||||
Иначе
|
||||
Возврат Неопределено;
|
||||
КонецЕсли;
|
||||
|
||||
КонецФункции
|
||||
|
||||
// Создает глобальный объект "ADODB.Recordset",
|
||||
// связанный с текущим соединением
|
||||
//
|
||||
Функция СоздатьОбработчикЗаписей()
|
||||
|
||||
мЗапись = ПолучитьОбработчикЗаписей();
|
||||
|
||||
КонецФункции
|
||||
|
||||
// Закрывает объект "ADODB.Recordset"
|
||||
//
|
||||
Функция ЗакрытьОбработчикЗаписей()
|
||||
|
||||
Попытка
|
||||
мЗапись.Close();
|
||||
Исключение
|
||||
КонецПопытки;
|
||||
|
||||
КонецФункции
|
||||
|
||||
// Функция возвращает объект "ADODB.Command",
|
||||
// связанный с текущим соединением
|
||||
//
|
||||
Функция ПолучитьОбработчикКоманд()
|
||||
|
||||
Если мСоединение <> Неопределено Тогда
|
||||
Command = Новый COMОбъект("ADODB.Command");
|
||||
Command.ActiveConnection = мСоединение;
|
||||
Возврат Command;
|
||||
Иначе
|
||||
Возврат Неопределено;
|
||||
КонецЕсли;
|
||||
|
||||
КонецФункции
|
||||
|
||||
// Создает глобальный объект "ADODB.Command",
|
||||
// связанный с текущим соединением
|
||||
//
|
||||
Функция СоздатьОбработчикКоманд()
|
||||
|
||||
мКоманда = ПолучитьОбработчикКоманд();
|
||||
|
||||
КонецФункции
|
||||
|
||||
// Закрывает объект "ADODB.Command"
|
||||
//
|
||||
Функция ЗакрытьОбработчикКоманд()
|
||||
|
||||
мКоманда = Неопределено;
|
||||
|
||||
КонецФункции
|
||||
|
||||
// Проверка реквизитов перед подключением
|
||||
//
|
||||
Функция РеквизитыСоединенияЗаполнены() Экспорт
|
||||
|
||||
ОписаниеОшибки = "";
|
||||
|
||||
Если НЕ ЗначениеЗаполнено(ODBC) Тогда
|
||||
ОписаниеОшибки = "Не указано имя источника ODBC";
|
||||
Возврат Ложь;
|
||||
КонецЕсли;
|
||||
|
||||
Если НЕ ЗначениеЗаполнено(DB) Тогда
|
||||
ОписаниеОшибки = "Не указано имя базы данных";
|
||||
Возврат Ложь;
|
||||
КонецЕсли;
|
||||
|
||||
Если НЕ ЗначениеЗаполнено(User) Тогда
|
||||
ОписаниеОшибки = "Не указано имя пользователя";
|
||||
Возврат Ложь;
|
||||
КонецЕсли;
|
||||
|
||||
Если НЕ ЗначениеЗаполнено(Pass) Тогда
|
||||
ОписаниеОшибки = "Не указан пароль пользователя";
|
||||
//Возврат Ложь;
|
||||
КонецЕсли;
|
||||
|
||||
Если ИспользоватьPutty Тогда
|
||||
|
||||
Если НЕ ЗначениеЗаполнено(Putty) Тогда
|
||||
ОписаниеОшибки = "Не указан путь к программе plink";
|
||||
Возврат Ложь;
|
||||
КонецЕсли;
|
||||
|
||||
Если НЕ ЗначениеЗаполнено(Name_put) Тогда
|
||||
ОписаниеОшибки = "Не указано имя настройки PuTTY";
|
||||
Возврат Ложь;
|
||||
КонецЕсли;
|
||||
|
||||
Если НЕ ЗначениеЗаполнено(User_put) Тогда
|
||||
ОписаниеОшибки = "Не указано имя пользователя PuTTY";
|
||||
Возврат Ложь;
|
||||
КонецЕсли;
|
||||
|
||||
Если НЕ ЗначениеЗаполнено(Pass_put) Тогда
|
||||
ОписаниеОшибки = "Не указано пароль пользователя PuTTY";
|
||||
Возврат Ложь;
|
||||
КонецЕсли;
|
||||
|
||||
КонецЕсли;
|
||||
|
||||
Возврат Истина;
|
||||
|
||||
КонецФункции
|
||||
|
||||
// Запуск putty
|
||||
//
|
||||
Процедура ЗапуститьPuTTY()
|
||||
|
||||
Если ИспользоватьPutty Тогда
|
||||
|
||||
Если Задержка_put = 0 Тогда
|
||||
Задержка_put = 5;
|
||||
КонецЕсли;
|
||||
|
||||
ЗапуститьПриложение(Putty + " -load " + Name_put + " -l " + User_put + " -pw " + Pass_put);
|
||||
|
||||
ТекДата = ТекущаяДата();
|
||||
Пока ТекущаяДата() - ТекДата < Задержка_put Цикл
|
||||
КонецЦикла;
|
||||
|
||||
КонецЕсли;
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
// Закрытие putty
|
||||
//
|
||||
Процедура ЗавершитьPuTTY()
|
||||
|
||||
Если ИспользоватьPutty Тогда
|
||||
ЗапуститьПриложение("taskkill /IM plink.exe");
|
||||
КонецЕсли;
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
// Установка параметров соединения
|
||||
//
|
||||
Процедура Инициализация(ИмяODBC, ИмяБазы, ИмяПользователя, Пароль) Экспорт
|
||||
|
||||
ОписаниеОшибки = "";
|
||||
мМассивЗначений = Новый Массив();
|
||||
мТекстЗапроса = "";
|
||||
|
||||
ODBC = СокрЛП(ИмяODBC);
|
||||
DB = СокрЛП(ИмяБазы);
|
||||
User = СокрЛП(ИмяПользователя);
|
||||
Pass = СокрЛП(Пароль);
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
// Очищает текст запроса
|
||||
//
|
||||
Процедура ОчиститьТекстЗапроса() Экспорт
|
||||
|
||||
мТекстЗапроса = "";
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
мМассивЗначений = Новый Массив();
|
||||
мТекстЗапроса = "";
|
||||
1
src/MySQL/maps.txt
Normal file
1
src/MySQL/maps.txt
Normal file
@ -0,0 +1 @@
|
||||
|
||||
7
src/MySQL/renames.txt
Normal file
7
src/MySQL/renames.txt
Normal file
@ -0,0 +1,7 @@
|
||||
02c0fdaf-dc46-418d-8473-8e8995a21409-->und\02c0fdaf-dc46-418d-8473-8e8995a21409
|
||||
2eca2134-e84c-47c6-92de-38ec8adca96e.0\info-->und\2eca2134-e84c-47c6-92de-38ec8adca96e.0\info
|
||||
2eca2134-e84c-47c6-92de-38ec8adca96e.0\text-->ObjectModule.bsl
|
||||
copyinfo-->und\copyinfo
|
||||
root-->und\root
|
||||
version-->und\version
|
||||
versions-->und\versions
|
||||
291
src/MySQL/und/02c0fdaf-dc46-418d-8473-8e8995a21409
Normal file
291
src/MySQL/und/02c0fdaf-dc46-418d-8473-8e8995a21409
Normal file
@ -0,0 +1,291 @@
|
||||
{1,
|
||||
{02c0fdaf-dc46-418d-8473-8e8995a21409},1,
|
||||
{c3831ec8-d8d5-4f93-8a22-f9bfae07327f,
|
||||
{1,
|
||||
{4,0bc46fda-064b-4d30-bb35-46e4b6be1a28,b65468d6-edc4-46e8-b3ee-6c6ce4221770,
|
||||
{0,
|
||||
{0,
|
||||
{0,0,2eca2134-e84c-47c6-92de-38ec8adca96e},"MySQL",
|
||||
{1,"ru","My SQL"},""}
|
||||
},00000000-0000-0000-0000-000000000000,"",00000000-0000-0000-0000-000000000000},4,
|
||||
{2bcef0d1-0981-11d6-b9b8-0050bae0a95d,0},
|
||||
{3daea016-69b7-4ed4-9453-127911372fe6,0},
|
||||
{d5b0e5ed-256d-401c-9c36-f630cafd8a62,0},
|
||||
{ec6bb5e5-b7a8-4d75-bec9-658107a699cf,13,
|
||||
{
|
||||
{0,
|
||||
{25,
|
||||
{2,
|
||||
{0,
|
||||
{0,0,855bf9d9-26d1-4750-a3da-8afdcbaa7ba7},"ODBC",
|
||||
{1,"ru","Имя источника ODBC"},""},
|
||||
{"Pattern",
|
||||
{"S",50,1}
|
||||
}
|
||||
},0,
|
||||
{0},
|
||||
{0},0,"",0,
|
||||
{"U"},
|
||||
{"U"},0,00000000-0000-0000-0000-000000000000,2,0,
|
||||
{5004,0},
|
||||
{3,0,0},
|
||||
{0,0},0,
|
||||
{0},
|
||||
{"S",""},0}
|
||||
},0},
|
||||
{
|
||||
{0,
|
||||
{25,
|
||||
{2,
|
||||
{0,
|
||||
{0,0,9dd26e26-d7b6-4e39-b6ea-2eed8fae714c},"DB",
|
||||
{1,"ru","Имя базы данных"},""},
|
||||
{"Pattern",
|
||||
{"S",50,1}
|
||||
}
|
||||
},0,
|
||||
{0},
|
||||
{0},0,"",0,
|
||||
{"U"},
|
||||
{"U"},0,00000000-0000-0000-0000-000000000000,2,0,
|
||||
{5004,0},
|
||||
{3,0,0},
|
||||
{0,0},0,
|
||||
{0},
|
||||
{"S",""},0}
|
||||
},0},
|
||||
{
|
||||
{0,
|
||||
{25,
|
||||
{2,
|
||||
{0,
|
||||
{0,0,2c2e9942-3321-4f7b-b41c-a41ba5a98625},"User",
|
||||
{1,"ru","Имя пользователя"},""},
|
||||
{"Pattern",
|
||||
{"S",50,1}
|
||||
}
|
||||
},0,
|
||||
{0},
|
||||
{0},0,"",0,
|
||||
{"U"},
|
||||
{"U"},0,00000000-0000-0000-0000-000000000000,2,0,
|
||||
{5004,0},
|
||||
{3,0,0},
|
||||
{0,0},0,
|
||||
{0},
|
||||
{"S",""},0}
|
||||
},0},
|
||||
{
|
||||
{0,
|
||||
{25,
|
||||
{2,
|
||||
{0,
|
||||
{0,0,812f3e70-5004-4381-8cd6-e2ccf8b5055f},"Pass",
|
||||
{1,"ru","Пароль"},""},
|
||||
{"Pattern",
|
||||
{"S",50,1}
|
||||
}
|
||||
},0,
|
||||
{0},
|
||||
{0},0,"",0,
|
||||
{"U"},
|
||||
{"U"},0,00000000-0000-0000-0000-000000000000,2,0,
|
||||
{5004,0},
|
||||
{3,0,0},
|
||||
{0,0},0,
|
||||
{0},
|
||||
{"S",""},0}
|
||||
},0},
|
||||
{
|
||||
{0,
|
||||
{25,
|
||||
{2,
|
||||
{0,
|
||||
{0,0,9c17d9a4-bc82-4b93-9559-0e469aafe164},"Putty",
|
||||
{1,"ru","Putty"},""},
|
||||
{"Pattern",
|
||||
{"S"}
|
||||
}
|
||||
},0,
|
||||
{0},
|
||||
{0},0,"",0,
|
||||
{"U"},
|
||||
{"U"},0,00000000-0000-0000-0000-000000000000,2,0,
|
||||
{5004,0},
|
||||
{3,0,0},
|
||||
{0,0},0,
|
||||
{0},
|
||||
{"S",""},0}
|
||||
},0},
|
||||
{
|
||||
{0,
|
||||
{25,
|
||||
{2,
|
||||
{0,
|
||||
{0,0,146e43ce-eeb5-444b-9620-ea958d51586a},"User_put",
|
||||
{1,"ru","User put"},""},
|
||||
{"Pattern",
|
||||
{"S",50,1}
|
||||
}
|
||||
},0,
|
||||
{0},
|
||||
{0},0,"",0,
|
||||
{"U"},
|
||||
{"U"},0,00000000-0000-0000-0000-000000000000,2,0,
|
||||
{5004,0},
|
||||
{3,0,0},
|
||||
{0,0},0,
|
||||
{0},
|
||||
{"S",""},0}
|
||||
},0},
|
||||
{
|
||||
{0,
|
||||
{25,
|
||||
{2,
|
||||
{0,
|
||||
{0,0,73a436cc-79f9-448d-a065-cda2a4858f9c},"Pass_put",
|
||||
{1,"ru","Pass put"},""},
|
||||
{"Pattern",
|
||||
{"S",50,1}
|
||||
}
|
||||
},0,
|
||||
{0},
|
||||
{0},0,"",0,
|
||||
{"U"},
|
||||
{"U"},0,00000000-0000-0000-0000-000000000000,2,0,
|
||||
{5004,0},
|
||||
{3,0,0},
|
||||
{0,0},0,
|
||||
{0},
|
||||
{"S",""},0}
|
||||
},0},
|
||||
{
|
||||
{0,
|
||||
{25,
|
||||
{2,
|
||||
{0,
|
||||
{0,0,8d1272f7-8edc-461a-af40-5ea882808d9a},"ИспользоватьPutty",
|
||||
{1,"ru","Использовать putty"},""},
|
||||
{"Pattern",
|
||||
{"B"}
|
||||
}
|
||||
},0,
|
||||
{0},
|
||||
{0},0,"",0,
|
||||
{"U"},
|
||||
{"U"},0,00000000-0000-0000-0000-000000000000,2,0,
|
||||
{5004,0},
|
||||
{3,0,0},
|
||||
{0,0},0,
|
||||
{0},
|
||||
{"S",""},0}
|
||||
},0},
|
||||
{
|
||||
{0,
|
||||
{25,
|
||||
{2,
|
||||
{0,
|
||||
{0,0,07471886-c2ce-4419-a477-990425a9c0b5},"Name_put",
|
||||
{1,"ru","Name put"},""},
|
||||
{"Pattern",
|
||||
{"S",50,1}
|
||||
}
|
||||
},0,
|
||||
{0},
|
||||
{0},0,"",0,
|
||||
{"U"},
|
||||
{"U"},0,00000000-0000-0000-0000-000000000000,2,0,
|
||||
{5004,0},
|
||||
{3,0,0},
|
||||
{0,0},0,
|
||||
{0},
|
||||
{"S",""},0}
|
||||
},0},
|
||||
{
|
||||
{0,
|
||||
{25,
|
||||
{2,
|
||||
{0,
|
||||
{0,0,e60689c5-c914-4047-8742-e3a9cb75ea21},"Задержка_put",
|
||||
{1,"ru","Задержка put"},""},
|
||||
{"Pattern",
|
||||
{"N",2,0,1}
|
||||
}
|
||||
},0,
|
||||
{0},
|
||||
{0},0,"",0,
|
||||
{"U"},
|
||||
{"U"},0,00000000-0000-0000-0000-000000000000,2,0,
|
||||
{5004,0},
|
||||
{3,0,0},
|
||||
{0,0},0,
|
||||
{0},
|
||||
{"S",""},0}
|
||||
},0},
|
||||
{
|
||||
{0,
|
||||
{25,
|
||||
{2,
|
||||
{0,
|
||||
{0,0,5ae1319d-4b65-4e9a-b293-117937b409bd},"ОписаниеОшибки",
|
||||
{1,"ru","Описание ошибки"},""},
|
||||
{"Pattern",
|
||||
{"S"}
|
||||
}
|
||||
},0,
|
||||
{0},
|
||||
{0},0,"",0,
|
||||
{"U"},
|
||||
{"U"},0,00000000-0000-0000-0000-000000000000,2,0,
|
||||
{5004,0},
|
||||
{3,0,0},
|
||||
{0,0},0,
|
||||
{0},
|
||||
{"S",""},0}
|
||||
},0},
|
||||
{
|
||||
{0,
|
||||
{25,
|
||||
{2,
|
||||
{0,
|
||||
{0,0,f3fbe5ab-e349-4420-acff-092e9a54cee7},"ЭлементовВЗапросе",
|
||||
{1,"ru","Элементов в запросе"},""},
|
||||
{"Pattern",
|
||||
{"N",5,0,1}
|
||||
}
|
||||
},0,
|
||||
{0},
|
||||
{0},0,"",0,
|
||||
{"U"},
|
||||
{"U"},0,00000000-0000-0000-0000-000000000000,2,0,
|
||||
{5004,0},
|
||||
{3,0,0},
|
||||
{0,0},0,
|
||||
{0},
|
||||
{"S",""},0}
|
||||
},0},
|
||||
{
|
||||
{0,
|
||||
{25,
|
||||
{2,
|
||||
{0,
|
||||
{0,0,6c552ca2-6b18-4c1b-800e-c99171053e7f},"КоличествоИзменныхЗаписей",
|
||||
{1,"ru","Количество изменных записей"},""},
|
||||
{"Pattern",
|
||||
{"N",10,0,0}
|
||||
}
|
||||
},0,
|
||||
{0},
|
||||
{0},0,"",0,
|
||||
{"U"},
|
||||
{"U"},0,00000000-0000-0000-0000-000000000000,2,0,
|
||||
{5004,0},
|
||||
{3,0,0},
|
||||
{0,0},0,
|
||||
{0},
|
||||
{"S",""},0}
|
||||
},0}
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
@ -0,0 +1 @@
|
||||
{3,1,0,"",0}
|
||||
7
src/MySQL/und/copyinfo
Normal file
7
src/MySQL/und/copyinfo
Normal file
@ -0,0 +1,7 @@
|
||||
{4,
|
||||
{0},
|
||||
{0},
|
||||
{0},
|
||||
{0,0},
|
||||
{0}
|
||||
}
|
||||
1
src/MySQL/und/root
Normal file
1
src/MySQL/und/root
Normal file
@ -0,0 +1 @@
|
||||
{2,02c0fdaf-dc46-418d-8473-8e8995a21409,}
|
||||
3
src/MySQL/und/version
Normal file
3
src/MySQL/und/version
Normal file
@ -0,0 +1,3 @@
|
||||
{
|
||||
{216,0}
|
||||
}
|
||||
1
src/MySQL/und/versions
Normal file
1
src/MySQL/und/versions
Normal file
@ -0,0 +1 @@
|
||||
{1,7,"02c0fdaf-dc46-418d-8473-8e8995a21409",fd5ec58e-6ca0-42d7-aed4-eadabcda8925,"root",90379935-d3b5-40a1-b764-747314843385,"",0af3b619-528c-481e-80a5-9e023d7bec2c,"2eca2134-e84c-47c6-92de-38ec8adca96e.0",55e4eecd-b131-4425-a54c-0fc46f459fe0,"copyinfo",3470c372-75a6-484c-a87a-7ee754d5abb0,"versions",efeb2d2b-9c26-406c-bc34-344e9887c4cc,"version",b11151a7-b255-497f-a7ba-68694effec0c}
|
||||
Loading…
Reference in New Issue
Block a user