diff --git a/packagedef b/packagedef index 5d98f06..ce9bb32 100644 --- a/packagedef +++ b/packagedef @@ -1,5 +1,5 @@ Описание.Имя("cpdb") - .Версия("1.4.0") + .Версия("1.5.0") .ВерсияСреды("1.6.0") .ЗависитОт("logos") .ЗависитОт("1commands") @@ -9,6 +9,7 @@ .ЗависитОт("ParserFileV8i") .ЗависитОт("fs") .ЗависитОт("yadisk") + .ЗависитОт("json") // в библиотеке yadisk отсутствует зависимость .ЗависитОт("nextcloud-lib") .ЗависитОт("ClientSSH", "0.5.1") .ЗависитОт("deflator", "0.2.1") diff --git "a/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\222\320\276\321\201\321\201\321\202\320\260\320\275\320\276\320\262\320\270\321\202\321\214\320\230\320\267\320\240\320\265\320\267\320\265\321\200\320\262\320\275\320\276\320\271\320\232\320\276\320\277\320\270\320\270.os" "b/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\222\320\276\321\201\321\201\321\202\320\260\320\275\320\276\320\262\320\270\321\202\321\214\320\230\320\267\320\240\320\265\320\267\320\265\321\200\320\262\320\275\320\276\320\271\320\232\320\276\320\277\320\270\320\270.os" index 5ba9493..deac681 100644 --- "a/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\222\320\276\321\201\321\201\321\202\320\260\320\275\320\276\320\262\320\270\321\202\321\214\320\230\320\267\320\240\320\265\320\267\320\265\321\200\320\262\320\275\320\276\320\271\320\232\320\276\320\277\320\270\320\270.os" +++ "b/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\222\320\276\321\201\321\201\321\202\320\260\320\275\320\276\320\262\320\270\321\202\321\214\320\230\320\267\320\240\320\265\320\267\320\265\321\200\320\262\320\275\320\276\320\271\320\232\320\276\320\277\320\270\320\270.os" @@ -9,8 +9,6 @@ #Использовать "../../core" -Перем Лог; // - Объект - объект записи лога приложения - #Область СлужебныйПрограммныйИнтерфейс // Процедура - устанавливает описание команды @@ -152,17 +150,3 @@ КонецПроцедуры // ВыполнитьКоманду() #КонецОбласти // СлужебныйПрограммныйИнтерфейс - -#Область ОбработчикиСобытий - -// Процедура - обработчик события "ПриСозданииОбъекта" -// -// BSLLS:UnusedLocalMethod-off -Процедура ПриСозданииОбъекта() - - Лог = ПараметрыСистемы.Лог(); - -КонецПроцедуры // ПриСозданииОбъекта() -// BSLLS:UnusedLocalMethod-on - -#КонецОбласти // ОбработчикиСобытий diff --git "a/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\222\321\213\320\263\321\200\321\203\320\267\320\270\321\202\321\214\320\230\320\221\320\222\320\244\320\260\320\271\320\273.os" "b/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\222\321\213\320\263\321\200\321\203\320\267\320\270\321\202\321\214\320\230\320\221\320\222\320\244\320\260\320\271\320\273.os" index b353d86..3924d25 100644 --- "a/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\222\321\213\320\263\321\200\321\203\320\267\320\270\321\202\321\214\320\230\320\221\320\222\320\244\320\260\320\271\320\273.os" +++ "b/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\222\321\213\320\263\321\200\321\203\320\267\320\270\321\202\321\214\320\230\320\221\320\222\320\244\320\260\320\271\320\273.os" @@ -9,8 +9,6 @@ #Использовать "../../core" -Перем Лог; // - Объект - объект записи лога приложения - #Область СлужебныйПрограммныйИнтерфейс // Процедура - устанавливает описание команды @@ -80,17 +78,3 @@ КонецПроцедуры // ВыполнитьКоманду() #КонецОбласти // СлужебныйПрограммныйИнтерфейс - -#Область ОбработчикиСобытий - -// Процедура - обработчик события "ПриСозданииОбъекта" -// -// BSLLS:UnusedLocalMethod-off -Процедура ПриСозданииОбъекта() - - Лог = ПараметрыСистемы.Лог(); - -КонецПроцедуры // ПриСозданииОбъекта() -// BSLLS:UnusedLocalMethod-on - -#КонецОбласти // ОбработчикиСобытий diff --git "a/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\222\321\213\320\277\320\276\320\273\320\275\320\270\321\202\321\214\320\232\320\276\320\274\320\277\321\200\320\265\321\201\321\201\320\270\321\216\320\241\321\202\321\200\320\260\320\275\320\270\321\206.os" "b/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\222\321\213\320\277\320\276\320\273\320\275\320\270\321\202\321\214\320\232\320\276\320\274\320\277\321\200\320\265\321\201\321\201\320\270\321\216\320\241\321\202\321\200\320\260\320\275\320\270\321\206.os" index 4c28b38..8bdfb94 100644 --- "a/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\222\321\213\320\277\320\276\320\273\320\275\320\270\321\202\321\214\320\232\320\276\320\274\320\277\321\200\320\265\321\201\321\201\320\270\321\216\320\241\321\202\321\200\320\260\320\275\320\270\321\206.os" +++ "b/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\222\321\213\320\277\320\276\320\273\320\275\320\270\321\202\321\214\320\232\320\276\320\274\320\277\321\200\320\265\321\201\321\201\320\270\321\216\320\241\321\202\321\200\320\260\320\275\320\270\321\206.os" @@ -9,8 +9,6 @@ #Использовать "../../core" -Перем Лог; // - Объект - объект записи лога приложения - #Область СлужебныйПрограммныйИнтерфейс // Процедура - устанавливает описание команды @@ -77,17 +75,3 @@ КонецПроцедуры // ВыполнитьКоманду() #КонецОбласти // СлужебныйПрограммныйИнтерфейс - -#Область ОбработчикиСобытий - -// Процедура - обработчик события "ПриСозданииОбъекта" -// -// BSLLS:UnusedLocalMethod-off -Процедура ПриСозданииОбъекта() - - Лог = ПараметрыСистемы.Лог(); - -КонецПроцедуры // ПриСозданииОбъекта() -// BSLLS:UnusedLocalMethod-on - -#КонецОбласти // ОбработчикиСобытий diff --git "a/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\222\321\213\320\277\320\276\320\273\320\275\320\270\321\202\321\214\320\241\320\272\321\200\320\270\320\277\321\202\321\213.os" "b/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\222\321\213\320\277\320\276\320\273\320\275\320\270\321\202\321\214\320\241\320\272\321\200\320\270\320\277\321\202\321\213.os" index e1479f0..c36273a 100644 --- "a/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\222\321\213\320\277\320\276\320\273\320\275\320\270\321\202\321\214\320\241\320\272\321\200\320\270\320\277\321\202\321\213.os" +++ "b/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\222\321\213\320\277\320\276\320\273\320\275\320\270\321\202\321\214\320\241\320\272\321\200\320\270\320\277\321\202\321\213.os" @@ -9,8 +9,6 @@ #Использовать "../../core" -Перем Лог; // - Объект - объект записи лога приложения - #Область СлужебныйПрограммныйИнтерфейс // Процедура - устанавливает описание команды @@ -66,17 +64,3 @@ КонецПроцедуры // ВыполнитьКоманду() #КонецОбласти // СлужебныйПрограммныйИнтерфейс - -#Область ОбработчикиСобытий - -// Процедура - обработчик события "ПриСозданииОбъекта" -// -// BSLLS:UnusedLocalMethod-off -Процедура ПриСозданииОбъекта() - - Лог = ПараметрыСистемы.Лог(); - -КонецПроцедуры // ПриСозданииОбъекта() -// BSLLS:UnusedLocalMethod-on - -#КонецОбласти // ОбработчикиСобытий diff --git "a/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\232\320\276\320\277\320\270\321\200\320\276\320\262\320\260\321\202\321\214\320\244\320\260\320\271\320\273.os" "b/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\232\320\276\320\277\320\270\321\200\320\276\320\262\320\260\321\202\321\214\320\244\320\260\320\271\320\273.os" index 7155df7..d7098fd 100644 --- "a/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\232\320\276\320\277\320\270\321\200\320\276\320\262\320\260\321\202\321\214\320\244\320\260\320\271\320\273.os" +++ "b/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\232\320\276\320\277\320\270\321\200\320\276\320\262\320\260\321\202\321\214\320\244\320\260\320\271\320\273.os" @@ -9,8 +9,6 @@ #Использовать "../../core" -Перем Лог; // - Объект - объект записи лога приложения - #Область СлужебныйПрограммныйИнтерфейс // Процедура - устанавливает описание команды @@ -71,17 +69,3 @@ КонецПроцедуры // ВыполнитьКоманду() #КонецОбласти // СлужебныйПрограммныйИнтерфейс - -#Область ОбработчикиСобытий - -// Процедура - обработчик события "ПриСозданииОбъекта" -// -// BSLLS:UnusedLocalMethod-off -Процедура ПриСозданииОбъекта() - - Лог = ПараметрыСистемы.Лог(); - -КонецПроцедуры // ПриСозданииОбъекта() -// BSLLS:UnusedLocalMethod-on - -#КонецОбласти // ОбработчикиСобытий diff --git "a/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\236\321\202\320\272\320\273\321\216\321\207\320\270\321\202\321\214\320\236\321\202\320\245\321\200\320\260\320\275\320\270\320\273\320\270\321\211\320\260.os" "b/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\236\321\202\320\272\320\273\321\216\321\207\320\270\321\202\321\214\320\236\321\202\320\245\321\200\320\260\320\275\320\270\320\273\320\270\321\211\320\260.os" index b63c752..e8f4542 100644 --- "a/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\236\321\202\320\272\320\273\321\216\321\207\320\270\321\202\321\214\320\236\321\202\320\245\321\200\320\260\320\275\320\270\320\273\320\270\321\211\320\260.os" +++ "b/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\236\321\202\320\272\320\273\321\216\321\207\320\270\321\202\321\214\320\236\321\202\320\245\321\200\320\260\320\275\320\270\320\273\320\270\321\211\320\260.os" @@ -9,8 +9,6 @@ #Использовать "../../core" -Перем Лог; // - Объект - объект записи лога приложения - #Область СлужебныйПрограммныйИнтерфейс // Процедура - устанавливает описание команды @@ -79,17 +77,3 @@ КонецПроцедуры // ВыполнитьКоманду() #КонецОбласти // СлужебныйПрограммныйИнтерфейс - -#Область ОбработчикиСобытий - -// Процедура - обработчик события "ПриСозданииОбъекта" -// -// BSLLS:UnusedLocalMethod-off -Процедура ПриСозданииОбъекта() - - Лог = ПараметрыСистемы.Лог(); - -КонецПроцедуры // ПриСозданииОбъекта() -// BSLLS:UnusedLocalMethod-on - -#КонецОбласти // ОбработчикиСобытий diff --git "a/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\236\321\202\320\272\320\273\321\216\321\207\320\270\321\202\321\214\320\241\320\265\321\202\320\265\320\262\320\276\320\271\320\224\320\270\321\201\320\272.os" "b/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\236\321\202\320\272\320\273\321\216\321\207\320\270\321\202\321\214\320\241\320\265\321\202\320\265\320\262\320\276\320\271\320\224\320\270\321\201\320\272.os" index 505152d..268190b 100644 --- "a/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\236\321\202\320\272\320\273\321\216\321\207\320\270\321\202\321\214\320\241\320\265\321\202\320\265\320\262\320\276\320\271\320\224\320\270\321\201\320\272.os" +++ "b/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\236\321\202\320\272\320\273\321\216\321\207\320\270\321\202\321\214\320\241\320\265\321\202\320\265\320\262\320\276\320\271\320\224\320\270\321\201\320\272.os" @@ -9,8 +9,6 @@ #Использовать "../../core" -Перем Лог; // - Объект - объект записи лога приложения - #Область СлужебныйПрограммныйИнтерфейс // Процедура - устанавливает описание команды @@ -52,17 +50,3 @@ КонецПроцедуры // ВыполнитьКоманду() #КонецОбласти // СлужебныйПрограммныйИнтерфейс - -#Область ОбработчикиСобытий - -// Процедура - обработчик события "ПриСозданииОбъекта" -// -// BSLLS:UnusedLocalMethod-off -Процедура ПриСозданииОбъекта() - - Лог = ПараметрыСистемы.Лог(); - -КонецПроцедуры // ПриСозданииОбъекта() -// BSLLS:UnusedLocalMethod-on - -#КонецОбласти // ОбработчикиСобытий diff --git "a/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\236\321\207\320\270\321\201\321\202\320\270\321\202\321\214\320\233\320\276\320\272\320\260\320\273\321\214\320\275\321\213\320\271\320\232\321\215\321\210\320\230\320\221.os" "b/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\236\321\207\320\270\321\201\321\202\320\270\321\202\321\214\320\233\320\276\320\272\320\260\320\273\321\214\320\275\321\213\320\271\320\232\321\215\321\210\320\230\320\221.os" index 0d94474..2f3430c 100644 --- "a/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\236\321\207\320\270\321\201\321\202\320\270\321\202\321\214\320\233\320\276\320\272\320\260\320\273\321\214\320\275\321\213\320\271\320\232\321\215\321\210\320\230\320\221.os" +++ "b/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\236\321\207\320\270\321\201\321\202\320\270\321\202\321\214\320\233\320\276\320\272\320\260\320\273\321\214\320\275\321\213\320\271\320\232\321\215\321\210\320\230\320\221.os" @@ -9,8 +9,6 @@ #Использовать "../../core" -Перем Лог; // - Объект - объект записи лога приложения - #Область СлужебныйПрограммныйИнтерфейс // Процедура - устанавливает описание команды @@ -55,17 +53,3 @@ КонецПроцедуры // ВыполнитьКоманду() #КонецОбласти // СлужебныйПрограммныйИнтерфейс - -#Область ОбработчикиСобытий - -// Процедура - обработчик события "ПриСозданииОбъекта" -// -// BSLLS:UnusedLocalMethod-off -Процедура ПриСозданииОбъекта() - - Лог = ПараметрыСистемы.Лог(); - -КонецПроцедуры // ПриСозданииОбъекта() -// BSLLS:UnusedLocalMethod-on - -#КонецОбласти // ОбработчикиСобытий diff --git "a/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\237\320\276\320\264\320\272\320\273\321\216\321\207\320\270\321\202\321\214\320\232\320\245\321\200\320\260\320\275\320\270\320\273\320\270\321\211\321\203.os" "b/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\237\320\276\320\264\320\272\320\273\321\216\321\207\320\270\321\202\321\214\320\232\320\245\321\200\320\260\320\275\320\270\320\273\320\270\321\211\321\203.os" index 4ba6aac..55f691b 100644 --- "a/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\237\320\276\320\264\320\272\320\273\321\216\321\207\320\270\321\202\321\214\320\232\320\245\321\200\320\260\320\275\320\270\320\273\320\270\321\211\321\203.os" +++ "b/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\237\320\276\320\264\320\272\320\273\321\216\321\207\320\270\321\202\321\214\320\232\320\245\321\200\320\260\320\275\320\270\320\273\320\270\321\211\321\203.os" @@ -9,8 +9,6 @@ #Использовать "../../core" -Перем Лог; // - Объект - объект записи лога приложения - #Область СлужебныйПрограммныйИнтерфейс // Процедура - устанавливает описание команды @@ -105,17 +103,3 @@ КонецПроцедуры // ВыполнитьКоманду() #КонецОбласти // СлужебныйПрограммныйИнтерфейс - -#Область ОбработчикиСобытий - -// Процедура - обработчик события "ПриСозданииОбъекта" -// -// BSLLS:UnusedLocalMethod-off -Процедура ПриСозданииОбъекта() - - Лог = ПараметрыСистемы.Лог(); - -КонецПроцедуры // ПриСозданииОбъекта() -// BSLLS:UnusedLocalMethod-on - -#КонецОбласти // ОбработчикиСобытий diff --git "a/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\237\320\276\320\264\320\272\320\273\321\216\321\207\320\270\321\202\321\214\320\241\320\265\321\202\320\265\320\262\320\276\320\271\320\224\320\270\321\201\320\272.os" "b/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\237\320\276\320\264\320\272\320\273\321\216\321\207\320\270\321\202\321\214\320\241\320\265\321\202\320\265\320\262\320\276\320\271\320\224\320\270\321\201\320\272.os" index 9ff1a41..c48f361 100644 --- "a/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\237\320\276\320\264\320\272\320\273\321\216\321\207\320\270\321\202\321\214\320\241\320\265\321\202\320\265\320\262\320\276\320\271\320\224\320\270\321\201\320\272.os" +++ "b/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\237\320\276\320\264\320\272\320\273\321\216\321\207\320\270\321\202\321\214\320\241\320\265\321\202\320\265\320\262\320\276\320\271\320\224\320\270\321\201\320\272.os" @@ -9,8 +9,6 @@ #Использовать "../../core" -Перем Лог; // - Объект - объект записи лога приложения - #Область СлужебныйПрограммныйИнтерфейс // Процедура - устанавливает описание команды @@ -68,17 +66,3 @@ КонецПроцедуры // ВыполнитьКоманду() #КонецОбласти // СлужебныйПрограммныйИнтерфейс - -#Область ОбработчикиСобытий - -// Процедура - обработчик события "ПриСозданииОбъекта" -// -// BSLLS:UnusedLocalMethod-off -Процедура ПриСозданииОбъекта() - - Лог = ПараметрыСистемы.Лог(); - -КонецПроцедуры // ПриСозданииОбъекта() -// BSLLS:UnusedLocalMethod-on - -#КонецОбласти // ОбработчикиСобытий diff --git "a/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\237\320\276\320\273\321\203\321\207\320\270\321\202\321\214\320\244\320\260\320\271\320\273\320\230\320\267NextCloud.os" "b/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\237\320\276\320\273\321\203\321\207\320\270\321\202\321\214\320\244\320\260\320\271\320\273\320\230\320\267NextCloud.os" index 21d9980..f4e6e67 100644 --- "a/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\237\320\276\320\273\321\203\321\207\320\270\321\202\321\214\320\244\320\260\320\271\320\273\320\230\320\267NextCloud.os" +++ "b/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\237\320\276\320\273\321\203\321\207\320\270\321\202\321\214\320\244\320\260\320\271\320\273\320\230\320\267NextCloud.os" @@ -9,8 +9,6 @@ #Использовать "../../core" -Перем Лог; // - Объект - объект записи лога приложения - #Область СлужебныйПрограммныйИнтерфейс // Процедура - устанавливает описание команды @@ -97,17 +95,3 @@ КонецПроцедуры // ВыполнитьКоманду() #КонецОбласти // СлужебныйПрограммныйИнтерфейс - -#Область ОбработчикиСобытий - -// Процедура - обработчик события "ПриСозданииОбъекта" -// -// BSLLS:UnusedLocalMethod-off -Процедура ПриСозданииОбъекта() - - Лог = ПараметрыСистемы.Лог(); - -КонецПроцедуры // ПриСозданииОбъекта() -// BSLLS:UnusedLocalMethod-on - -#КонецОбласти // ОбработчикиСобытий diff --git "a/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\237\320\276\320\273\321\203\321\207\320\270\321\202\321\214\320\244\320\260\320\271\320\273\320\230\320\267\320\257\320\224\320\270\321\201\320\272\320\260.os" "b/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\237\320\276\320\273\321\203\321\207\320\270\321\202\321\214\320\244\320\260\320\271\320\273\320\230\320\267\320\257\320\224\320\270\321\201\320\272\320\260.os" index 6308bf7..9df18b1 100644 --- "a/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\237\320\276\320\273\321\203\321\207\320\270\321\202\321\214\320\244\320\260\320\271\320\273\320\230\320\267\320\257\320\224\320\270\321\201\320\272\320\260.os" +++ "b/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\237\320\276\320\273\321\203\321\207\320\270\321\202\321\214\320\244\320\260\320\271\320\273\320\230\320\267\320\257\320\224\320\270\321\201\320\272\320\260.os" @@ -9,8 +9,6 @@ #Использовать "../../core" -Перем Лог; // - Объект - объект записи лога приложения - #Область СлужебныйПрограммныйИнтерфейс // Процедура - устанавливает описание команды @@ -95,17 +93,3 @@ КонецПроцедуры // ВыполнитьКоманду() #КонецОбласти // СлужебныйПрограммныйИнтерфейс - -#Область ОбработчикиСобытий - -// Процедура - обработчик события "ПриСозданииОбъекта" -// -// BSLLS:UnusedLocalMethod-off -Процедура ПриСозданииОбъекта() - - Лог = ПараметрыСистемы.Лог(); - -КонецПроцедуры // ПриСозданииОбъекта() -// BSLLS:UnusedLocalMethod-on - -#КонецОбласти // ОбработчикиСобытий diff --git "a/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\237\320\276\320\273\321\203\321\207\320\270\321\202\321\214\320\244\320\260\320\271\320\273\320\241SFTP.os" "b/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\237\320\276\320\273\321\203\321\207\320\270\321\202\321\214\320\244\320\260\320\271\320\273\320\241SFTP.os" index 2ec890e..ebd598d 100644 --- "a/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\237\320\276\320\273\321\203\321\207\320\270\321\202\321\214\320\244\320\260\320\271\320\273\320\241SFTP.os" +++ "b/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\237\320\276\320\273\321\203\321\207\320\270\321\202\321\214\320\244\320\260\320\271\320\273\320\241SFTP.os" @@ -9,8 +9,6 @@ #Использовать "../../core" -Перем Лог; // - Объект - объект записи лога приложения - #Область СлужебныйПрограммныйИнтерфейс // Процедура - устанавливает описание команды @@ -98,17 +96,3 @@ КонецПроцедуры // ВыполнитьКоманду() #КонецОбласти // СлужебныйПрограммныйИнтерфейс - -#Область ОбработчикиСобытий - -// Процедура - обработчик события "ПриСозданииОбъекта" -// -// BSLLS:UnusedLocalMethod-off -Процедура ПриСозданииОбъекта() - - Лог = ПараметрыСистемы.Лог(); - -КонецПроцедуры // ПриСозданииОбъекта() -// BSLLS:UnusedLocalMethod-on - -#КонецОбласти // ОбработчикиСобытий diff --git "a/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\240\320\260\320\267\320\261\320\270\321\202\321\214\320\244\320\260\320\271\320\273\320\235\320\260\320\247\320\260\321\201\321\202\320\270.os" "b/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\240\320\260\320\267\320\261\320\270\321\202\321\214\320\244\320\260\320\271\320\273\320\235\320\260\320\247\320\260\321\201\321\202\320\270.os" index a85540d..224f862 100644 --- "a/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\240\320\260\320\267\320\261\320\270\321\202\321\214\320\244\320\260\320\271\320\273\320\235\320\260\320\247\320\260\321\201\321\202\320\270.os" +++ "b/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\240\320\260\320\267\320\261\320\270\321\202\321\214\320\244\320\260\320\271\320\273\320\235\320\260\320\247\320\260\321\201\321\202\320\270.os" @@ -11,8 +11,6 @@ #Использовать "../../core" -Перем Лог; // - Объект - объект записи лога приложения - #Область СлужебныйПрограммныйИнтерфейс // Процедура - устанавливает описание команды @@ -85,17 +83,3 @@ КонецПроцедуры // ВыполнитьКоманду() #КонецОбласти // СлужебныйПрограммныйИнтерфейс - -#Область ОбработчикиСобытий - -// Процедура - обработчик события "ПриСозданииОбъекта" -// -// BSLLS:UnusedLocalMethod-off -Процедура ПриСозданииОбъекта() - - Лог = ПараметрыСистемы.Лог(); - -КонецПроцедуры // ПриСозданииОбъекта() -// BSLLS:UnusedLocalMethod-on - -#КонецОбласти // ОбработчикиСобытий diff --git "a/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\241\320\276\320\265\320\264\320\270\320\275\320\270\321\202\321\214\320\247\320\260\321\201\321\202\320\270\320\222\320\244\320\260\320\271\320\273.os" "b/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\241\320\276\320\265\320\264\320\270\320\275\320\270\321\202\321\214\320\247\320\260\321\201\321\202\320\270\320\222\320\244\320\260\320\271\320\273.os" index c01da41..b7b4cc7 100644 --- "a/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\241\320\276\320\265\320\264\320\270\320\275\320\270\321\202\321\214\320\247\320\260\321\201\321\202\320\270\320\222\320\244\320\260\320\271\320\273.os" +++ "b/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\241\320\276\320\265\320\264\320\270\320\275\320\270\321\202\321\214\320\247\320\260\321\201\321\202\320\270\320\222\320\244\320\260\320\271\320\273.os" @@ -9,8 +9,6 @@ #Использовать "../../core" -Перем Лог; // - Объект - объект записи лога приложения - #Область СлужебныйПрограммныйИнтерфейс // Процедура - устанавливает описание команды @@ -70,17 +68,3 @@ КонецПроцедуры // ВыполнитьКоманду() #КонецОбласти // СлужебныйПрограммныйИнтерфейс - -#Область ОбработчикиСобытий - -// Процедура - обработчик события "ПриСозданииОбъекта" -// -// BSLLS:UnusedLocalMethod-off -Процедура ПриСозданииОбъекта() - - Лог = ПараметрыСистемы.Лог(); - -КонецПроцедуры // ПриСозданииОбъекта() -// BSLLS:UnusedLocalMethod-on - -#КонецОбласти // ОбработчикиСобытий diff --git "a/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\241\320\276\320\267\320\264\320\260\321\202\321\214\320\240\320\265\320\267\320\265\321\200\320\262\320\275\321\203\321\216\320\232\320\276\320\277\320\270\321\216.os" "b/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\241\320\276\320\267\320\264\320\260\321\202\321\214\320\240\320\265\320\267\320\265\321\200\320\262\320\275\321\203\321\216\320\232\320\276\320\277\320\270\321\216.os" index 74f0572..fc5e47d 100644 --- "a/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\241\320\276\320\267\320\264\320\260\321\202\321\214\320\240\320\265\320\267\320\265\321\200\320\262\320\275\321\203\321\216\320\232\320\276\320\277\320\270\321\216.os" +++ "b/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\241\320\276\320\267\320\264\320\260\321\202\321\214\320\240\320\265\320\267\320\265\321\200\320\262\320\275\321\203\321\216\320\232\320\276\320\277\320\270\321\216.os" @@ -9,8 +9,6 @@ #Использовать "../../core" -Перем Лог; // - Объект - объект записи лога приложения - #Область СлужебныйПрограммныйИнтерфейс // Процедура - устанавливает описание команды @@ -65,17 +63,3 @@ КонецПроцедуры // ВыполнитьКоманду() #КонецОбласти // СлужебныйПрограммныйИнтерфейс - -#Область ОбработчикиСобытий - -// Процедура - обработчик события "ПриСозданииОбъекта" -// -// BSLLS:UnusedLocalMethod-off -Процедура ПриСозданииОбъекта() - - Лог = ПараметрыСистемы.Лог(); - -КонецПроцедуры // ПриСозданииОбъекта() -// BSLLS:UnusedLocalMethod-on - -#КонецОбласти // ОбработчикиСобытий diff --git "a/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\241\320\276\320\267\320\264\320\260\321\202\321\214\320\241\320\265\321\200\320\262\320\265\321\200\320\275\321\203\321\216\320\230\320\221.os" "b/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\241\320\276\320\267\320\264\320\260\321\202\321\214\320\241\320\265\321\200\320\262\320\265\321\200\320\275\321\203\321\216\320\230\320\221.os" index 4e1b820..f13cc28 100644 --- "a/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\241\320\276\320\267\320\264\320\260\321\202\321\214\320\241\320\265\321\200\320\262\320\265\321\200\320\275\321\203\321\216\320\230\320\221.os" +++ "b/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\241\320\276\320\267\320\264\320\260\321\202\321\214\320\241\320\265\321\200\320\262\320\265\321\200\320\275\321\203\321\216\320\230\320\221.os" @@ -9,8 +9,6 @@ #Использовать "../../core" -Перем Лог; // - Объект - объект записи лога приложения - #Область СлужебныйПрограммныйИнтерфейс // Процедура - устанавливает описание команды @@ -89,7 +87,9 @@ .ТСтрока() .ВОкружении("CPDB_IB_CLUSTER_PWD"); - Команда.Опция("nl name-in-list nameinlist", "", "имя в списке баз пользователя (если не задано, то ИБ в список не добавляется)") + Команда.Опция("nl name-in-list nameinlist", + "", + "имя в списке баз пользователя (если не задано, то ИБ в список не добавляется)") .ТСтрока() .ВОкружении("CPDB_IB_NAME_IN_LIST"); @@ -155,17 +155,3 @@ КонецПроцедуры // ВыполнитьКоманду() #КонецОбласти // СлужебныйПрограммныйИнтерфейс - -#Область ОбработчикиСобытий - -// Процедура - обработчик события "ПриСозданииОбъекта" -// -// BSLLS:UnusedLocalMethod-off -Процедура ПриСозданииОбъекта() - - Лог = ПараметрыСистемы.Лог(); - -КонецПроцедуры // ПриСозданииОбъекта() -// BSLLS:UnusedLocalMethod-on - -#КонецОбласти // ОбработчикиСобытий diff --git "a/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\241\320\276\320\267\320\264\320\260\321\202\321\214\320\244\320\260\320\271\320\273\320\276\320\262\321\203\321\216\320\230\320\221.os" "b/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\241\320\276\320\267\320\264\320\260\321\202\321\214\320\244\320\260\320\271\320\273\320\276\320\262\321\203\321\216\320\230\320\221.os" index 65b42cf..3e37c12 100644 --- "a/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\241\320\276\320\267\320\264\320\260\321\202\321\214\320\244\320\260\320\271\320\273\320\276\320\262\321\203\321\216\320\230\320\221.os" +++ "b/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\241\320\276\320\267\320\264\320\260\321\202\321\214\320\244\320\260\320\271\320\273\320\276\320\262\321\203\321\216\320\230\320\221.os" @@ -9,8 +9,6 @@ #Использовать "../../core" -Перем Лог; // - Объект - объект записи лога приложения - #Область СлужебныйПрограммныйИнтерфейс // Процедура - устанавливает описание команды @@ -74,17 +72,3 @@ КонецПроцедуры // ВыполнитьКоманду() #КонецОбласти // СлужебныйПрограммныйИнтерфейс - -#Область ОбработчикиСобытий - -// Процедура - обработчик события "ПриСозданииОбъекта" -// -// BSLLS:UnusedLocalMethod-off -Процедура ПриСозданииОбъекта() - - Лог = ПараметрыСистемы.Лог(); - -КонецПроцедуры // ПриСозданииОбъекта() -// BSLLS:UnusedLocalMethod-on - -#КонецОбласти // ОбработчикиСобытий diff --git "a/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\247\321\202\320\265\320\275\320\270\320\265\320\236\320\277\321\206\320\270\320\271\320\232\320\276\320\274\320\260\320\275\320\264\321\213.os" "b/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\247\321\202\320\265\320\275\320\270\320\265\320\236\320\277\321\206\320\270\320\271\320\232\320\276\320\274\320\260\320\275\320\264\321\213.os" index 3d68bd6..2ba5888 100644 --- "a/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\247\321\202\320\265\320\275\320\270\320\265\320\236\320\277\321\206\320\270\320\271\320\232\320\276\320\274\320\260\320\275\320\264\321\213.os" +++ "b/src/cmd/\320\232\320\273\320\260\321\201\321\201\321\213/\320\247\321\202\320\265\320\275\320\270\320\265\320\236\320\277\321\206\320\270\320\271\320\232\320\276\320\274\320\260\320\275\320\264\321\213.os" @@ -216,9 +216,10 @@ НезаполненныеПараметрыКоманды = НезаполненныеПараметрыКоманды(ТекКоманда); Если ЗначениеЗаполнено(НезаполненныеПараметрыКоманды) Тогда - НезаполненныеПараметры.Добавить(СтрШаблон("Для команды ""%1"" не заполнены параметры %2", - ТекКоманда.ПолучитьИмяКоманды(), - СтрСоединить(НезаполненныеПараметрыКоманды, ", "))); + ТекстОшибки = СтрШаблон("Для команды ""%1"" не заполнены параметры %2", + ТекКоманда.ПолучитьИмяКоманды(), + СтрСоединить(НезаполненныеПараметрыКоманды, ", ")); + НезаполненныеПараметры.Добавить(ТекстОшибки); КонецЕсли; КонецЦикла; diff --git "a/src/core/\320\232\320\273\320\260\321\201\321\201\321\213/\320\237\320\276\320\264\320\272\320\273\321\216\321\207\320\265\320\275\320\270\320\265MSSQL.os" "b/src/core/\320\232\320\273\320\260\321\201\321\201\321\213/\320\237\320\276\320\264\320\272\320\273\321\216\321\207\320\265\320\275\320\270\320\265MSSQL.os" index 97f2574..09c050a 100644 --- "a/src/core/\320\232\320\273\320\260\321\201\321\201\321\213/\320\237\320\276\320\264\320\272\320\273\321\216\321\207\320\265\320\275\320\270\320\265MSSQL.os" +++ "b/src/core/\320\232\320\273\320\260\321\201\321\201\321\213/\320\237\320\276\320\264\320\272\320\273\321\216\321\207\320\265\320\275\320\270\320\265MSSQL.os" @@ -17,30 +17,55 @@ #Область ПрограммныйИнтерфейс +// Функция, возвращает адрес сервера СУБД +// +// Возвращаемое значение: +// Строка - адрес сервера СУБД +// Функция Сервер() Экспорт Возврат Сервер; КонецФункции // Сервер() +// Процедура, устанавливает адрес сервера СУБД +// +// Параметры: +// НовоеЗначение - Строка - новый адрес сервера СУБД +// Процедура УстановитьСервер(Знач НовоеЗначение) Экспорт Сервер = НовоеЗначение; КонецПроцедуры // УстановитьСервер() +// Функция, возвращает пользователя сервера СУБД +// +// Возвращаемое значение: +// Строка - пользователь сервера СУБД +// Функция Пользователь() Экспорт Возврат Пользователь; КонецФункции // Пользователь() +// Процедура, устанавливает пользователя сервера СУБД +// +// Параметры: +// НовоеЗначение - Строка - новый пользователь сервера СУБД +// Процедура УстановитьПользователь(Знач НовоеЗначение) Экспорт Пользователь = НовоеЗначение; КонецПроцедуры // УстановитьПользователь() +// Процедура, устанавливает пароль пользователя сервера СУБД +// +// Параметры: +// НовоеЗначение - Строка - новый пароль пользователь сервера СУБД +// Процедура УстановитьПароль(Знач НовоеЗначение) Экспорт Пароль = НовоеЗначение; @@ -208,6 +233,16 @@ РезультатЗапроса = СокрЛП(Сред(РезультатЗапроса, Поз + СтрДлина(Разделитель))); КонецЕсли; + ПоляОписания = "Имя + |Ид + |ИдСоздателя + |Статус1 + |Статус2 + |ДатаСоздания + |РежимСовместимости + |ФайлДанных"; + ПоляОписания = СтрРазделить(ПоляОписания, Символы.ПС, Ложь); + СписокБаз = Новый Соответствие(); Текст = Новый ТекстовыйДокумент(); @@ -215,46 +250,16 @@ Для й = 1 По Текст.КоличествоСтрок() Цикл - Если НЕ ЗначениеЗаполнено(Текст.ПолучитьСтроку(й)) Тогда + СтрокаРезультатаЗапроса = Текст.ПолучитьСтроку(й); + Если НЕ ЗначениеЗаполнено(СтрокаРезультатаЗапроса) Тогда Продолжить; КонецЕсли; - ОписаниеБазы = Новый Структура(); - ОписаниеБазы.Вставить("Имя" , 0); - ОписаниеБазы.Вставить("Ид" , 1); - ОписаниеБазы.Вставить("ИдСоздателя" , 2); - ОписаниеБазы.Вставить("Статус1" , 3); - ОписаниеБазы.Вставить("Статус2" , 4); - ОписаниеБазы.Вставить("ДатаСоздания" , 5); - ОписаниеБазы.Вставить("РежимСовместимости", 6); - ОписаниеБазы.Вставить("ФайлДанных" , 7); - - МассивЗначений = СтрРазделить(Текст.ПолучитьСтроку(й), "|"); + ОписаниеБазы = СтрокаРезультатаЗапросаВСтруктуру(СтрокаРезультатаЗапроса, ПоляОписания); Для Каждого ТекЭлемент Из ОписаниеБазы Цикл - Ключ = ТекЭлемент.Ключ; - Индекс = ТекЭлемент.Значение; - - Если Индекс >= МассивЗначений.Количество() Тогда - ОписаниеБазы[Ключ] = Неопределено; - Продолжить; - КонецЕсли; - - ОписаниеБазы[Ключ] = СокрЛП(МассивЗначений[Индекс]); - - Если Ключ = "ДатаСоздания" Тогда - ДатаИВремя = СтрРазделить(ОписаниеБазы[Ключ], " ", Ложь); - - ВремЧастиДаты = СтрРазделить(ДатаИВремя[0], "-", Ложь); - ВремЧастиВремени = СтрРазделить(ДатаИВремя[1], ".", Ложь); - ВремЧастиВремени = СтрРазделить(ВремЧастиВремени[0], ":", Ложь); - - ОписаниеБазы[Ключ] = Дата(Число(ВремЧастиДаты[0]), - Число(ВремЧастиДаты[1]), - Число(ВремЧастиДаты[2]), - Число(ВремЧастиВремени[0]), - Число(ВремЧастиВремени[1]), - Число(ВремЧастиВремени[2])); + Если ТекЭлемент.Ключ = "ДатаСоздания" Тогда + ОписаниеБазы[ТекЭлемент.Ключ] = ДатаИзСтроки(ТекЭлемент.Значение); КонецЕсли; КонецЦикла; @@ -396,6 +401,8 @@ КонецЕсли; ТекстЗапроса = СтрШаблон("""USE [master]; + | + |ALTER DATABASE [%1] SET SINGLE_USER WITH ROLLBACK IMMEDIATE; | |DROP DATABASE [%1]"" ", База); @@ -413,7 +420,77 @@ КонецПроцедуры // УдалитьБазу() -// Функция получает модель восстановления базы +// Процедура переводит базу данных в однопользовательский режим +// +// Параметры: +// База - Строка - имя базы данных +// ОшибкаЕслиНеСуществует - Строка - Истина - вызвать исключение если база не существует +// +Процедура УстановитьОднопользовательскийРежимБазы(База, ОшибкаЕслиНеСуществует = Истина) Экспорт + + Если НЕ БазаСуществует(База, ВариантыСообщенияОСуществованииБД().СообщатьОбОтсутствии) Тогда + Если ОшибкаЕслиНеСуществует Тогда + ТекстОшибки = СтрШаблон("База ""%1"" не обнаружена", База); + ВызватьИсключение ТекстОшибки; + Иначе + Возврат; + КонецЕсли; + КонецЕсли; + + ТекстЗапроса = СтрШаблон("""USE [master]; + | + |ALTER DATABASE [%1] SET SINGLE_USER WITH ROLLBACK IMMEDIATE"" ", + База); + + РезультатЗапроса = ""; + КодВозврата = ВыполнитьЗапросСУБД(ТекстЗапроса, РезультатЗапроса); + + Если НЕ КодВозврата = 0 Тогда + ТекстОшибки = СтрШаблон("Ошибка установки однопользовательского режима для базы ""%1"": %2%3", + База, + Символы.ПС, + РезультатЗапроса); + ВызватьИсключение ТекстОшибки; + КонецЕсли; + +КонецПроцедуры // УстановитьОднопользовательскийРежимБазы() + +// Процедура переводит базу данных в многопользовательский режим +// +// Параметры: +// База - Строка - имя базы данных +// ОшибкаЕслиНеСуществует - Строка - Истина - вызвать исключение если база не существует +// +Процедура УстановитьМногопользовательскийРежимБазы(База, ОшибкаЕслиНеСуществует = Истина) Экспорт + + Если НЕ БазаСуществует(База, ВариантыСообщенияОСуществованииБД().СообщатьОбОтсутствии) Тогда + Если ОшибкаЕслиНеСуществует Тогда + ТекстОшибки = СтрШаблон("База ""%1"" не обнаружена", База); + ВызватьИсключение ТекстОшибки; + Иначе + Возврат; + КонецЕсли; + КонецЕсли; + + ТекстЗапроса = СтрШаблон("""USE [master]; + | + |ALTER DATABASE [%1] SET MULTI_USER"" ", + База); + + РезультатЗапроса = ""; + КодВозврата = ВыполнитьЗапросСУБД(ТекстЗапроса, РезультатЗапроса); + + Если НЕ КодВозврата = 0 Тогда + ТекстОшибки = СтрШаблон("Ошибка установки многопользовательского режима для базы ""%1"": %2%3", + База, + Символы.ПС, + РезультатЗапроса); + ВызватьИсключение ТекстОшибки; + КонецЕсли; + +КонецПроцедуры // УстановитьМногопользовательскийРежимБазы() + +// Функция получает описание базы данных // // Параметры: // База - Строка - имя базы данных @@ -421,41 +498,107 @@ // Возвращаемое значение: // Строка - модель восстановления (FULL, SIMPLE, BULK_LOGGED) // -Функция ПолучитьМодельВосстановления(База) Экспорт +Функция ПолучитьОписаниеБазы(База) Экспорт БазаСуществует(База, ВариантыСообщенияОСуществованииБД().ИсключениеПриОтсутствии); ТекстЗапроса = СтрШаблон("""SET NOCOUNT ON; | |SELECT - | [recovery_model_desc] AS Recovery_model - |FROM sys.databases + | db.[name] AS Name, + | [database_id] AS Database_id, + | [physical_database_name] AS Physical_name, + | logins.[name] AS Login, + | [create_date] AS Create_date, + | [compatibility_level] AS Compatibility_level, + | [collation_name] AS Collation_name, + | [user_access_desc] AS User_access, + | [is_read_only] AS Read_only, + | [state_desc] AS State, + | [is_in_standby] AS Standby, + | [snapshot_isolation_state] AS Snapshot_isolation, + | [is_read_committed_snapshot_on] AS Read_committed_snapshot, + | [recovery_model_desc] AS Recovery_model, + | [is_auto_create_stats_on] AS Auto_create_stats, + | [is_auto_create_stats_incremental_on] AS Auto_create_stats_incremental, + | [is_auto_update_stats_on] AS Auto_update_stats, + | [is_auto_update_stats_async_on] AS Auto_update_stats_async, + | [is_fulltext_enabled] AS Fulltext, + | [is_encrypted] AS Encrypted + |FROM sys.databases AS db + |LEFT JOIN sys.syslogins AS logins + |ON db.owner_sid = logins.sid | - |WHERE name = '%1'; + |WHERE db.name = '%1'; | |SET NOCOUNT OFF;"" ", База); РезультатЗапроса = ""; - КодВозврата = ВыполнитьЗапросСУБД(ТекстЗапроса, РезультатЗапроса); + КодВозврата = ВыполнитьЗапросСУБД(ТекстЗапроса, РезультатЗапроса, "|", Истина); - Если КодВозврата = 0 Тогда - Разделитель = "---"; - Поз = СтрНайти(РезультатЗапроса, Разделитель, НаправлениеПоиска.FromEnd); - Если Поз > 0 Тогда - РезультатЗапроса = ВРег(СокрЛП(Сред(РезультатЗапроса, Поз + СтрДлина(Разделитель)))); - КонецЕсли; - Иначе - ТекстОшибки = СтрШаблон("Ошибка получения модели восстановления базы ""%1"": %2%3", + Если НЕ КодВозврата = 0 Тогда + ТекстОшибки = СтрШаблон("Ошибка получения описания базы ""%1"": %2%3", База, Символы.ПС, РезультатЗапроса); ВызватьИсключение ТекстОшибки; КонецЕсли; - Возврат РезультатЗапроса; + Разделитель = "---"; + Поз = СтрНайти(РезультатЗапроса, Разделитель, НаправлениеПоиска.FromEnd); + Если Поз > 0 Тогда + РезультатЗапроса = СокрЛП(Сред(РезультатЗапроса, Поз + СтрДлина(Разделитель))); + КонецЕсли; + + ПоляРезультата = "Имя + |Ид + |ФизическоеИмя + |Владелец + |ДатаСоздания + |РежимСовместимости + |ЯзыковыеУстановки + |РежимДоступа + |ТолькоДляЧтения + |Состояние + |РежимОжидания + |РежимИзоляцииСнимков + |РежимФиксированногоЧтенияСнимков + |МодельВосстановления + |АвтоСозданиеСтатистики + |АвтоСозданиеСтатистикиИнкрементально + |АвтоОбновлениеСтатистики + |АвтоОбновлениеСтатистикиАсинх + |ПолнотекстовыйПоиск + |Шифрование"; + ПоляРезультата = СтрРазделить(ПоляРезультата, Символы.ПС, Ложь); + + Текст = Новый ТекстовыйДокумент(); + Текст.УстановитьТекст(РезультатЗапроса); + СтрокаРезультатаЗапроса = Текст.ПолучитьСтроку(Текст.КоличествоСтрок()); -КонецФункции // ПолучитьМодельВосстановления() + Результат = СтрокаРезультатаЗапросаВСтруктуру(СтрокаРезультатаЗапроса, ПоляРезультата); + + Для Каждого ТекЭлемент Из Результат Цикл + Если ТекЭлемент.Ключ = "ДатаСоздания" Тогда + Результат[ТекЭлемент.Ключ] = ДатаИзСтроки(ТекЭлемент.Значение); + ИначеЕсли СтрНайти("ТолькоДляЧтения, + |РежимОжидания, + |РежимИзоляцииСнимков, + |РежимФиксированногоЧтенияСнимков, + |АвтоСозданиеСтатистики, + |АвтоСозданиеСтатистикиИнкрементально, + |АвтоОбновлениеСтатистики, + |АвтоОбновлениеСтатистикиАсинх, + |ПолнотекстовыйПоиск, + |Шифрование", ТекЭлемент.Ключ) > 0 Тогда + Результат[ТекЭлемент.Ключ] = (ТекЭлемент.Значение = "1"); + КонецЕсли; + КонецЦикла; + + Возврат Результат; + +КонецФункции // ПолучитьОписаниеБазы() // Процедура устанавливает модель восстановления базы // @@ -496,53 +639,6 @@ КонецПроцедуры // УстановитьМодельВосстановления() -// Функция изменяет владельца базы -// -// Параметры: -// База - Строка - имя базы данных -// -// Возвращаемое значение: -// Строка - имя текущего владельца базы -// -Функция ПолучитьВладельцаБазы(База) Экспорт - - БазаСуществует(База, ВариантыСообщенияОСуществованииБД().ИсключениеПриОтсутствии); - - ТекстЗапроса = СтрШаблон("""SET NOCOUNT ON; - | - |SELECT - | logins.name AS login - | - |FROM sys.databases AS databases - |LEFT JOIN sys.syslogins AS logins - |ON databases.owner_sid = logins.sid - | - |WHERE databases.name = '%1' - | - |SET NOCOUNT OFF;"" ", - База); - - РезультатЗапроса = ""; - КодВозврата = ВыполнитьЗапросСУБД(ТекстЗапроса, РезультатЗапроса); - - Если КодВозврата = 0 Тогда - Разделитель = "---"; - Поз = СтрНайти(РезультатЗапроса, Разделитель, НаправлениеПоиска.FromEnd); - Если Поз > 0 Тогда - РезультатЗапроса = СокрЛП(Сред(РезультатЗапроса, Поз + СтрДлина(Разделитель))); - КонецЕсли; - Иначе - ТекстОшибки = СтрШаблон("Ошибка получения владельца базы ""%1"": %2%3", - База, - Символы.ПС, - РезультатЗапроса); - ВызватьИсключение ТекстОшибки; - КонецЕсли; - - Возврат РезультатЗапроса; - -КонецФункции // ПолучитьВладельцаБазы() - // Процедура изменяет владельца базы // // Параметры: @@ -700,7 +796,7 @@ База, ПутьКРезервнойКопии); - РезультатЗапроса = ""; + РезультатЗапроса = ""; КодВозврата = ВыполнитьЗапросСУБД(ТекстЗапроса, РезультатЗапроса); Если НЕ КодВозврата = 0 Тогда @@ -1190,32 +1286,22 @@ РезультатЗапроса = СокрЛП(Сред(РезультатЗапроса, Поз + СтрДлина(Разделитель))); КонецЕсли; - Результат = Новый Структура(); - Результат.Вставить("РазмерБазы" , 1); - Результат.Вставить("Свободно" , 2); - Результат.Вставить("Зарезервировано" , 3); - Результат.Вставить("Данные" , 4); - Результат.Вставить("Индексы" , 5); - Результат.Вставить("НеИспользуется" , 6); - Результат.Вставить("ЖурналВсего" , 7); - Результат.Вставить("ЖурналИспользуется" , 8); + ПоляРезультата = "Имя + |РазмерБазы + |Свободно + |Зарезервировано + |Данные + |Индексы + |НеИспользуется + |ЖурналВсего + |ЖурналИспользуется"; + ПоляРезультата = СтрРазделить(ПоляРезультата, Символы.ПС, Ложь); Текст = Новый ТекстовыйДокумент(); Текст.УстановитьТекст(РезультатЗапроса); + СтрокаРезультатаЗапроса = Текст.ПолучитьСтроку(Текст.КоличествоСтрок()); - МассивЗначений = СтрРазделить(Текст.ПолучитьСтроку(Текст.КоличествоСтрок()), "|"); - - Для Каждого ТекЭлемент Из Результат Цикл - Ключ = ТекЭлемент.Ключ; - Индекс = ТекЭлемент.Значение; - - Если Индекс >= МассивЗначений.Количество() Тогда - Результат[Ключ] = Неопределено; - Продолжить; - КонецЕсли; - - Результат[Ключ] = СокрЛП(МассивЗначений[Индекс]); - КонецЦикла; + Результат = СтрокаРезультатаЗапросаВСтруктуру(СтрокаРезультатаЗапроса, ПоляРезультата); Возврат Результат; @@ -1409,38 +1495,26 @@ Текст = Новый ТекстовыйДокумент(); Текст.УстановитьТекст(РезультатЗапроса); + ПоляРезультата = "Таблица + |КоличествоСтрок + |ВсегоЗанято + |Используется + |НеИспользуется + |ОперацийЧтения + |ОперацийВыборки + |ОперацийСканирования + |ОперацийПоиска + |ОперацийЗаписи"; + ПоляРезультата = СтрРазделить(ПоляРезультата, Символы.ПС, Ложь); + Для й = 1 По Текст.КоличествоСтрок() Цикл - Если НЕ ЗначениеЗаполнено(Текст.ПолучитьСтроку(й)) Тогда + СтрокаРезультатаЗапроса = Текст.ПолучитьСтроку(й); + Если НЕ ЗначениеЗаполнено(СтрокаРезультатаЗапроса) Тогда Продолжить; КонецЕсли; - ПоказателиТаблицы = Новый Структура(); - ПоказателиТаблицы.Вставить("Таблица" , 0); - ПоказателиТаблицы.Вставить("КоличествоСтрок" , 1); - ПоказателиТаблицы.Вставить("ВсегоЗанято" , 2); - ПоказателиТаблицы.Вставить("Используется" , 3); - ПоказателиТаблицы.Вставить("НеИспользуется" , 4); - ПоказателиТаблицы.Вставить("ОперацийЧтения" , 5); - ПоказателиТаблицы.Вставить("ОперацийВыборки" , 6); - ПоказателиТаблицы.Вставить("ОперацийСканирования", 7); - ПоказателиТаблицы.Вставить("ОперацийПоиска" , 8); - ПоказателиТаблицы.Вставить("ОперацийЗаписи" , 9); - - МассивЗначений = СтрРазделить(Текст.ПолучитьСтроку(й), "|"); - - Для Каждого ТекЭлемент Из ПоказателиТаблицы Цикл - Ключ = ТекЭлемент.Ключ; - Индекс = ТекЭлемент.Значение; - - Если Индекс >= МассивЗначений.Количество() Тогда - ПоказателиТаблицы[Ключ] = Неопределено; - Продолжить; - КонецЕсли; - - ПоказателиТаблицы[Ключ] = СокрЛП(МассивЗначений[Индекс]); - - КонецЦикла; + ПоказателиТаблицы = СтрокаРезультатаЗапросаВСтруктуру(СтрокаРезультатаЗапроса, ПоляРезультата); ПоказателиТаблиц.Добавить(ПоказателиТаблицы); @@ -1886,7 +1960,7 @@ // // Параметры: // ТекстЗапроса - Строка - текст исполняемого запроса -// РезультатЗапроса - Строка - результат выполнения команду +// РезультатЗапроса - Строка - результат выполнения команды // Разделитель - Строка - символ - разделитель колонок результата // УбратьПробелы - Булево - Истина - будут убраны выравнивающие пробелы из результата // @@ -2019,6 +2093,37 @@ КонецФункции // ВыполнитьСкриптыЗапросСУБД() +// Функция преобразует текстовую строку результата запроса в структуру +// +// Параметры: +// СтрокаРезультатаЗапроса - Строка - текстовая строка результат запроса +// ПоляРезультата - Массив из Строка - массив имен колонок результата запроса +// Разделитель - Строка - символ - разделитель колонок результата +// +// Возвращаемое значение: +// Булево - Истина - команда выполнена успешно +// +Функция СтрокаРезультатаЗапросаВСтруктуру(СтрокаРезультатаЗапроса, ПоляРезультата, Разделитель = "|") Экспорт + + Результат = Новый Структура(); + + МассивЗначений = СтрРазделить(СтрокаРезультатаЗапроса, Разделитель); + + Для Индекс = 0 По ПоляРезультата.ВГраница() Цикл + Ключ = СокрЛП(ПоляРезультата[Индекс]); + + Если Индекс >= МассивЗначений.Количество() Тогда + Результат.Вставить(Ключ, Неопределено); + Продолжить; + КонецЕсли; + + Результат.Вставить(Ключ, СокрЛП(МассивЗначений[Индекс])); + КонецЦикла; + + Возврат Результат; + +КонецФункции // СтрокаРезультатаЗапросаВСтруктуру() + #КонецОбласти // ПрограммныйИнтерфейс #Область СлужебныеПроцедурыИФункции @@ -2166,6 +2271,33 @@ КонецПроцедуры // НормализоватьXML() +// ФункцияПроцедура - добавляет стандартный заголовок XML и корневой элемент +// +// Параметры: +// ДатаСтрокой - Строка - дата и время строкой +// +// Возвращаемое значение: +// Дата - преобразованная дата +// +Функция ДатаИзСтроки(ДатаСтрокой) + + ДатаИВремя = СтрРазделить(ДатаСтрокой, " ", Ложь); + + ВремЧастиДаты = СтрРазделить(ДатаИВремя[0], "-", Ложь); + ВремЧастиВремени = СтрРазделить(ДатаИВремя[1], ".", Ложь); + ВремЧастиВремени = СтрРазделить(ВремЧастиВремени[0], ":", Ложь); + + Результат = Дата(Число(ВремЧастиДаты[0]), + Число(ВремЧастиДаты[1]), + Число(ВремЧастиДаты[2]), + Число(ВремЧастиВремени[0]), + Число(ВремЧастиВремени[1]), + Число(ВремЧастиВремени[2])); + + Возврат Результат; + +КонецФункции // ДатаИзСтроки() + // Функция - возвращает части запроса SQL для отбора данных из таблицы Config // по списку идентификаторов (FileName) // diff --git "a/src/core/\320\232\320\273\320\260\321\201\321\201\321\213/\320\240\320\260\320\261\320\276\321\202\320\260\320\241\320\241\320\243\320\221\320\224.os" "b/src/core/\320\232\320\273\320\260\321\201\321\201\321\213/\320\240\320\260\320\261\320\276\321\202\320\260\320\241\320\241\320\243\320\221\320\224.os" index cb13592..ff8bafe 100644 --- "a/src/core/\320\232\320\273\320\260\321\201\321\201\321\213/\320\240\320\260\320\261\320\276\321\202\320\260\320\241\320\241\320\243\320\221\320\224.os" +++ "b/src/core/\320\232\320\273\320\260\321\201\321\201\321\213/\320\240\320\260\320\261\320\276\321\202\320\260\320\241\320\241\320\243\320\221\320\224.os" @@ -160,6 +160,56 @@ КонецПроцедуры // УдалитьБазуДанных() +// Процедура переводит базу данных в однопользовательский режим +// +// Параметры: +// База - Строка - имя базы +// +Процедура УстановитьОднопользовательскийРежимБазы(База) Экспорт + + Лог.Отладка("Начало перевода базы ""%1/%2"" в однопользовательский режим", ТекущийСервер, База); + + Попытка + ПодключениеКСУБД.УстановитьОднопользовательскийРежимБазы(База); + Исключение + ТекстОшибки = ПодробноеПредставлениеОшибки(ИнформацияОбОшибке()); + ТекстОшибки = СтрШаблон("Ошибка перевода базы данных ""%1/%2"" в однопользовательский режим:%3%4", + ТекущийСервер, + База, + Символы.ПС, + ТекстОшибки); + ВызватьИсключение ТекстОшибки; + КонецПопытки; + + Лог.Отладка("База данных ""%1/%2"" переведена в однопользовательский режим", ТекущийСервер, База); + +КонецПроцедуры // УстановитьОднопользовательскийРежимБазы() + +// Процедура переводит базу данных в многопользовательский режим +// +// Параметры: +// База - Строка - имя базы +// +Процедура УстановитьМногопользовательскийРежимБазы(База) Экспорт + + Лог.Отладка("Начало перевода базы ""%1/%2"" в многопользовательский режим", ТекущийСервер, База); + + Попытка + ПодключениеКСУБД.УстановитьМногопользовательскийРежимБазы(База); + Исключение + ТекстОшибки = ПодробноеПредставлениеОшибки(ИнформацияОбОшибке()); + ТекстОшибки = СтрШаблон("Ошибка перевода базы данных ""%1/%2"" в многопользовательский режим:%3%4", + ТекущийСервер, + База, + Символы.ПС, + ТекстОшибки); + ВызватьИсключение ТекстОшибки; + КонецПопытки; + + Лог.Отладка("База данных ""%1/%2"" переведена в многопользовательский режим", ТекущийСервер, База); + +КонецПроцедуры // УстановитьМногопользовательскийРежимБазы() + // Выполняет резервное копирование базы // // Параметры: @@ -235,33 +285,49 @@ КонецПроцедуры // ВыполнитьВосстановление() -// Получает текущего владельца базы +// Функция получает описание базы данных // // Параметры: // База - Строка - имя базы данных // // Возвращаемое значение: -// Строка - имя текущего владельца базы +// Структура - описание базы // -Функция ПолучитьВладельца(База) Экспорт +Функция ПолучитьОписание(База) Экспорт - Лог.Отладка("Начало получения владельца базы ""%1"":%2%3", База); + Лог.Отладка("Начало получения описания базы ""%1"":%2%3", База); Попытка - Результат = ПодключениеКСУБД.ПолучитьВладельцаБазы(База); + Результат = ПодключениеКСУБД.ПолучитьОписаниеБазы(База); Исключение ТекстОшибки = ПодробноеПредставлениеОшибки(ИнформацияОбОшибке()); - ТекстОшибки = СтрШаблон("Ошибка получения владельца базы ""%1"":%2%3", + ТекстОшибки = СтрШаблон("Ошибка получения описания базы ""%1"":%2%3", База, Символы.ПС, ТекстОшибки); ВызватьИсключение ТекстОшибки; КонецПопытки; - Лог.Отладка("Получен владелец ""%1"" базы ""%2""", Результат, База); + Лог.Отладка("Получено описание базы ""%1""", База); Возврат Результат; +КонецФункции // ПолучитьОписание() + +// Получает текущего владельца базы +// +// Параметры: +// База - Строка - имя базы данных +// +// Возвращаемое значение: +// Строка - имя текущего владельца базы +// +Функция ПолучитьВладельца(База) Экспорт + + ОписаниеБазы = ПолучитьОписание(База); + + Возврат ОписаниеБазы.Владелец; + КонецФункции // ПолучитьВладельца() // Устанавливает нового владельца базы @@ -304,22 +370,9 @@ // Функция ПолучитьМодельВосстановления(База) Экспорт - Лог.Отладка("Начало получения модели восстановления базы ""%1""", База); + ОписаниеБазы = ПолучитьОписание(База); - Попытка - Результат = ПодключениеКСУБД.ПолучитьМодельВосстановления(База); - Исключение - ТекстОшибки = ПодробноеПредставлениеОшибки(ИнформацияОбОшибке()); - ТекстОшибки = СтрШаблон("Ошибка получения модели восстановления базы ""%1"":%2%3", - База, - Символы.ПС, - ТекстОшибки); - ВызватьИсключение ТекстОшибки; - КонецПопытки; - - Лог.Отладка("Получена модель восстановления ""%1"" для базы ""%2""", Результат, База); - - Возврат Результат; + Возврат ВРег(ОписаниеБазы.МодельВосстановления); КонецФункции // ПолучитьМодельВосстановления() diff --git "a/src/core/\320\232\320\273\320\260\321\201\321\201\321\213/\320\241\321\202\321\200\321\203\320\272\321\202\321\203\321\200\320\260\320\245\321\200\320\260\320\275\320\265\320\275\320\270\321\217\320\230\320\221.os" "b/src/core/\320\232\320\273\320\260\321\201\321\201\321\213/\320\241\321\202\321\200\321\203\320\272\321\202\321\203\321\200\320\260\320\245\321\200\320\260\320\275\320\265\320\275\320\270\321\217\320\230\320\221.os" index bca55d6..cbe6845 100644 --- "a/src/core/\320\232\320\273\320\260\321\201\321\201\321\213/\320\241\321\202\321\200\321\203\320\272\321\202\321\203\321\200\320\260\320\245\321\200\320\260\320\275\320\265\320\275\320\270\321\217\320\230\320\221.os" +++ "b/src/core/\320\232\320\273\320\260\321\201\321\201\321\213/\320\241\321\202\321\200\321\203\320\272\321\202\321\203\321\200\320\260\320\245\321\200\320\260\320\275\320\265\320\275\320\270\321\217\320\230\320\221.os" @@ -306,8 +306,6 @@ Лог.Отладка("Получена информация о занимаемом месте для базы ""%1/%2""", ТекущийСервер, База); - СимволовРазмерности = 2; - Для Каждого ТекЭлемент Из Результат Цикл Если ЭтоЧисло(ТекЭлемент.Значение) Тогда @@ -517,9 +515,6 @@ // в переменной модуля "НазначенияОбъектовБазы" // и назначения табличных частей в переменной модуля "ПодчиненныеОбъектыБазы" // -// Возвращаемое значение: -// Соответствие - назначения объектов базы -// Процедура ЗаполнитьНазначенияОбъектовБазы() ИмяМакета = "НазначенияОбъектовБД1С.json"; diff --git "a/src/core/\320\234\320\276\320\264\321\203\320\273\320\270/\320\240\320\260\320\261\320\276\321\202\320\260\320\241\320\244\320\260\320\271\320\273\320\260\320\274\320\270.os" "b/src/core/\320\234\320\276\320\264\321\203\320\273\320\270/\320\240\320\260\320\261\320\276\321\202\320\260\320\241\320\244\320\260\320\271\320\273\320\260\320\274\320\270.os" index ca33a4e..2726f39 100644 --- "a/src/core/\320\234\320\276\320\264\321\203\320\273\320\270/\320\240\320\260\320\261\320\276\321\202\320\260\320\241\320\244\320\260\320\271\320\273\320\260\320\274\320\270.os" +++ "b/src/core/\320\234\320\276\320\264\321\203\320\273\320\270/\320\240\320\260\320\261\320\276\321\202\320\260\320\241\320\244\320\260\320\271\320\273\320\260\320\274\320\270.os" @@ -182,11 +182,11 @@ // УдалитьИсточник - Булево - Истина - после архивации исходный файл будет удален // Процедура ЗапаковатьВАрхив(Знач ПутьКФайлу, - Знач ИмяАрхива = Неопределено, - Знач ИмяСпискаФайлов = Неопределено, - Знач РазмерТома = Неопределено, - Знач СтепеньСжатия = 0, - Знач УдалитьИсточник = Ложь) Экспорт + Знач ИмяАрхива = Неопределено, + Знач ИмяСпискаФайлов = Неопределено, + Знач РазмерТома = Неопределено, + Знач СтепеньСжатия = 0, + Знач УдалитьИсточник = Ложь) Экспорт ПутьКФайлу = ФС.ПолныйПуть(ПутьКФайлу); diff --git a/tests/sql-tests.os b/tests/sql-tests.os index 2ce6a47..faea449 100644 --- a/tests/sql-tests.os +++ b/tests/sql-tests.os @@ -166,6 +166,67 @@ КонецПроцедуры // ТестДолжен_ПроверитьОшибкуСозданияБазыДанных() +&Тест +Процедура ТестДолжен_ПолучитьОписаниеБазы() Экспорт + + Лог.Информация("Тест: Получение описания базы данных на MS SQL Server"); + + ИмяБД = СтрШаблон("%1%2", ПрефиксИмениБД, 1); + + ФС.ОбеспечитьКаталог(КаталогВременныхДанных); + + РаботаССУБД.СоздатьБазуДанных(ИмяБД, , КаталогВременныхДанных); + + ТекстОшибки = СтрШаблон("Ошибка создания базы данных ""%1""", ИмяБД); + + Утверждения.ПроверитьИстину(РаботаССУБД.БазаСуществует(ИмяБД), ТекстОшибки); + + ТекстОшибки = СтрШаблон("Ошибка получения описания базы данных ""%1""", ИмяБД); + + ОписаниеБазы = РаботаССУБД.ПолучитьОписание(ИмяБД); + Утверждения.ПроверитьРавенство(ОписаниеБазы.Имя, ИмяБД, ТекстОшибки); + + РаботаССУБД.УдалитьБазуДанных(ИмяБД); + + УдалитьФайлы(КаталогВременныхДанных); + +КонецПроцедуры // ТестДолжен_ПолучитьОписаниеБазы() + +&Тест +Процедура ТестДолжен_ИзменитьРежимДоступаБазы() Экспорт + + Лог.Информация("Тест: Изменение режима доступа базы данных на MS SQL Server"); + + ИмяБД = СтрШаблон("%1%2", ПрефиксИмениБД, 1); + + ФС.ОбеспечитьКаталог(КаталогВременныхДанных); + + РаботаССУБД.СоздатьБазуДанных(ИмяБД, , КаталогВременныхДанных); + + ТекстОшибки = СтрШаблон("Ошибка создания базы данных ""%1""", ИмяБД); + + Утверждения.ПроверитьИстину(РаботаССУБД.БазаСуществует(ИмяБД), ТекстОшибки); + + РаботаССУБД.УстановитьОднопользовательскийРежимБазы(ИмяБД); + + ТекстОшибки = СтрШаблон("Ошибка установки однопользовательского режима базы данных ""%1""", ИмяБД); + + ОписаниеБазы = РаботаССУБД.ПолучитьОписание(ИмяБД); + Утверждения.ПроверитьРавенство(ОписаниеБазы.РежимДоступа, "SINGLE_USER", ТекстОшибки); + + РаботаССУБД.УстановитьМногопользовательскийРежимБазы(ИмяБД); + + ТекстОшибки = СтрШаблон("Ошибка установки многопользовательского режима базы данных ""%1""", ИмяБД); + + ОписаниеБазы = РаботаССУБД.ПолучитьОписание(ИмяБД); + Утверждения.ПроверитьРавенство(ОписаниеБазы.РежимДоступа, "MULTI_USER", ТекстОшибки); + + РаботаССУБД.УдалитьБазуДанных(ИмяБД); + + УдалитьФайлы(КаталогВременныхДанных); + +КонецПроцедуры // ТестДолжен_ИзменитьРежимДоступаБазы() + &Тест Процедура ТестДолжен_УдалитьБазуДанных() Экспорт