1
0
mirror of https://github.com/Bayselonarrend/OpenIntegrations.git synced 2025-08-10 22:41:43 +02:00
This commit is contained in:
Anton Titovets
2025-01-12 19:05:26 +03:00
parent a305595a37
commit 42adf8db89
5 changed files with 6190 additions and 6166 deletions

File diff suppressed because it is too large Load Diff

View File

@@ -2236,8 +2236,9 @@
ПараметрыТеста = Новый Структура; ПараметрыТеста = Новый Структура;
База = ПолучитьИмяВременногоФайла("sqlite"); База = ПолучитьИмяВременногоФайла("sqlite");
OPI_ПолучениеДанныхТестов.ЗаписатьПараметр("SQLite_DB", База);
OPI_Инструменты.ДобавитьПоле("SQLite_DB", База, "Строка", ПараметрыТеста); Соединиение = OPI_SQLite.ОткрытьСоединение(База);
ПараметрыТеста.Вставить("SQLite_DB", Соединиение);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Picture", ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Picture", ПараметрыТеста);
@@ -2251,6 +2252,19 @@
SQLite_УдалитьТаблицу(ПараметрыТеста); SQLite_УдалитьТаблицу(ПараметрыТеста);
SQLite_ПолучитьСтруктуруФильтраЗаписей(ПараметрыТеста); SQLite_ПолучитьСтруктуруФильтраЗаписей(ПараметрыТеста);
OPI_ПолучениеДанныхТестов.ЗаписатьПараметр("SQLite_DB", База);
OPI_Инструменты.ДобавитьПоле("SQLite_DB", База, "Строка", ПараметрыТеста);
SQLite_СоздатьТаблицу(ПараметрыТеста);
SQLite_ДобавитьЗаписи(ПараметрыТеста);
SQLite_ПолучитьЗаписи(ПараметрыТеста);
SQLite_ОбновитьЗаписи(ПараметрыТеста);
SQLite_УдалитьЗаписи(ПараметрыТеста);
SQLite_ПолучитьИнформациюОТаблице(ПараметрыТеста);
SQLite_ОчиститьТаблицу(ПараметрыТеста);
SQLite_УдалитьТаблицу(ПараметрыТеста);
SQLite_ПолучитьСтруктуруФильтраЗаписей(ПараметрыТеста);
Попытка Попытка
УдалитьФайлы(База); УдалитьФайлы(База);
Исключение Исключение
@@ -16550,6 +16564,8 @@
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Проверка, "Проверка", "SQLite"); OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Проверка, "Проверка", "SQLite");
OPI_ПолучениеДанныхТестов.Проверка_Массив(Проверка["data"], 0); OPI_ПолучениеДанныхТестов.Проверка_Массив(Проверка["data"], 0);
OPI_SQLite.УдалитьТаблицу("test1", База);
КонецПроцедуры КонецПроцедуры
Процедура SQLite_ОчиститьТаблицу(ПараметрыФункции) Процедура SQLite_ОчиститьТаблицу(ПараметрыФункции)

View File

@@ -98,25 +98,22 @@
Для Каждого Запись Из МассивДанных Цикл Для Каждого Запись Из МассивДанных Цикл
Если Ошибка И Транзакция Тогда
Откат = Модуль.ВыполнитьЗапросSQL("ROLLBACK", , , Соединение);
СчетчикУспешных = 0;
СтруктураРезультата.Вставить("rollback", Откат);
Прервать;
КонецЕсли;
Счетчик = Счетчик + 1; Счетчик = Счетчик + 1;
Ошибка = Ложь; Ошибка = Ложь;
Попытка Попытка
OPI_ПреобразованиеТипов.ПолучитьКоллекциюКлючИЗначение(Запись, ОшибкаКоллекции); OPI_ПреобразованиеТипов.ПолучитьКоллекциюКлючИЗначение(Запись, ОшибкаКоллекции);
Исключение Исключение
МассивОшибок.Добавить(Новый Структура("row,error", Счетчик, ОшибкаКоллекции)); МассивОшибок.Добавить(Новый Структура("row,error", Счетчик, ОшибкаКоллекции));
Ошибка = Истина; Ошибка = Истина;
Продолжить;
Если Транзакция Тогда
Прервать;
Иначе
Продолжить;
КонецЕсли;
КонецПопытки; КонецПопытки;
Результат = ДобавитьЗапись(Модуль, Таблица, Запись, Соединение); Результат = ДобавитьЗапись(Модуль, Таблица, Запись, Соединение);
@@ -134,10 +131,21 @@
КонецЦикла; КонецЦикла;
Если Транзакция И Не Ошибка Тогда Если Транзакция Тогда
Завершение = Модуль.ВыполнитьЗапросSQL("COMMIT", , , Соединение); Если Ошибка Тогда
СтруктураРезультата.Вставить("commit", Завершение);
Откат = Модуль.ВыполнитьЗапросSQL("ROLLBACK", , , Соединение);
СчетчикУспешных = 0;
СтруктураРезультата.Вставить("rollback", Откат);
Иначе
Завершение = Модуль.ВыполнитьЗапросSQL("COMMIT", , , Соединение);
СтруктураРезультата.Вставить("commit", Завершение);
КонецЕсли;
КонецЕсли; КонецЕсли;

View File

@@ -2237,8 +2237,8 @@
База = ПолучитьИмяВременногоФайла("sqlite"); База = ПолучитьИмяВременногоФайла("sqlite");
Соединиение = OPI_SQLite.ОткрытьСоединение(База); Соединение = OPI_SQLite.ОткрытьСоединение(База);
ПараметрыТеста.Вставить("SQLite_DB", Соединиение); ПараметрыТеста.Вставить("SQLite_DB", Соединение);
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Picture", ПараметрыТеста); OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("Picture", ПараметрыТеста);