Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Jump to bottom

Добавлен параметр указания расширения #373

Open
wants to merge 1 commit into
base: develop
Choose a base branch
from
Open

Добавлен параметр указания расширения #373

Show file tree
Hide file tree
Changes from all commits
Commits
Show all changes
1 commit
Select commit
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
2 changes: 1 addition & 1 deletion packagedef
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -54,7 +54,7 @@
.ЗависитОт("1bdd", "1.7.0")
.ЗависитОт("fs", "1.0.0")
.ЗависитОт("ParserFileV8i", "0.0.5")
.ЗависитОт("v8storage", "0.6.5")
.ЗависитОт("v8storage", "0.9.1")
.ЗависитОт("v8unpack", "1.0.1")
.ЗависитОт("opm", "0.14.4")

Expand Down
8 changes: 6 additions & 2 deletions src/Классы/КомандаОтключитьсяОтХранилища.os
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -30,7 +30,9 @@

ОписаниеКоманды = Парсер.ОписаниеКоманды(ИмяКоманды,
ТекстОписания);


Парсер.ДобавитьИменованныйПараметрКоманды(ОписаниеКоманды, "--extension", "Имя расширения");

Парсер.ДобавитьКоманду(ОписаниеКоманды);

КонецПроцедуры // ЗарегистрироватьКоманду
Expand Down Expand Up @@ -60,9 +62,11 @@
ПараметрыКоманды["--v8version"], ПараметрыКоманды["--uccode"],
ДанныеПодключения.КодЯзыка
);

ИмяРасширения = ПараметрыКоманды["--extension"];

Попытка
МенеджерКонфигуратора.ОтключитьсяОтХранилища();
МенеджерКонфигуратора.ОтключитьсяОтХранилища(ИмяРасширения);
Исключение
МенеджерКонфигуратора.Деструктор();
ВызватьИсключение ПодробноеПредставлениеОшибки(ИнформацияОбОшибке());
Expand Down
6 changes: 5 additions & 1 deletion src/Классы/КомандаПодключитьсяКХранилищу.os
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -31,6 +31,8 @@
| (возможно указание как файлового пути, так и пути через http или tcp)");
Парсер.ДобавитьПозиционныйПараметрКоманды(ОписаниеКоманды, "Логин", "Логин пользователя хранилища 1С");
Парсер.ДобавитьПозиционныйПараметрКоманды(ОписаниеКоманды, "Пароль", "Пароль пользователя хранилища 1С");

Парсер.ДобавитьИменованныйПараметрКоманды(ОписаниеКоманды, "--extension", "Имя расширения");

Парсер.ДобавитьПараметрФлагКоманды(ОписаниеКоманды, "--BindAlreadyBindedUser",
" Флаг игнорирования наличия уже у пользователя уже подключенной базы данных.");
Expand Down Expand Up @@ -67,12 +69,14 @@

ИгнорироватьНаличиеПодключеннойБД = ПараметрыКоманды["--BindAlreadyBindedUser"];
ЗаменитьКонфигурациюБД = Не ПараметрыКоманды["--NotReplaceCfg"];
ИмяРасширения = ПараметрыКоманды["--extension"];

Попытка
МенеджерКонфигуратора.ПодключитьсяКХранилищу(
ПараметрыКоманды["ПутьПодключаемогоХранилища"], ПараметрыКоманды["Логин"],
ПараметрыКоманды["Пароль"],
ИгнорироватьНаличиеПодключеннойБД, ЗаменитьКонфигурациюБД);
ИгнорироватьНаличиеПодключеннойБД, ЗаменитьКонфигурациюБД,
ИмяРасширения);
Исключение
МенеджерКонфигуратора.Деструктор();
ВызватьИсключение ПодробноеПредставлениеОшибки(ИнформацияОбОшибке());
Expand Down
32 changes: 17 additions & 15 deletions src/Классы/МенеджерКонфигуратора.os
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -633,7 +633,8 @@
//
Процедура ПодключитьсяКХранилищу(Знач ПутьХранилища, Знач Логин, Знач Пароль,
Знач ИгнорироватьНаличиеПодключеннойБД = Ложь,
Знач ЗаменитьКонфигурациюБД = Истина) Экспорт
Знач ЗаменитьКонфигурациюБД = Истина,
Знач ИмяРасширения = "") Экспорт

Лог.Информация("Выполняю подключение к хранилищу конфигурации");

Expand All @@ -650,6 +651,10 @@
ХранилищеКонфигурации.УстановитьУправлениеКонфигуратором(УправлениеКонфигуратором);
ХранилищеКонфигурации.УстановитьПараметрыАвторизации(Логин, Пароль);

Если ЗначениеЗаполнено(ИмяРасширения) Тогда
ХранилищеКонфигурации.УстановитьРасширениеХранилища(ИмяРасширения);
КонецЕсли;

ХранилищеКонфигурации.УстановитьПутьКХранилищу(ПутьХранилища);

Попытка
Expand All @@ -668,34 +673,31 @@
// Отлючить конфигурацию от хранилища
//
// Параметры:
// ИмяРасширения - Строка - Имя расширения
// ДополнительныеКлючиЗапуска (необязательно) - Строка - дополнительные ключи запуска Конфигуратора
//
Процедура ОтключитьсяОтХранилища(Знач ДополнительныеКлючиЗапуска = "") Экспорт
Процедура ОтключитьсяОтХранилища(Знач ИмяРасширения = "", Знач ДополнительныеКлючиЗапуска = "") Экспорт

ТекущаяПроцедура = "ОтключитьсяОтХранилища";
Лог.Информация("Выполняю отключение от хранилища конфигурации");

Параметры = УправлениеКонфигуратором.ПолучитьПараметрыЗапуска();

Параметры.Добавить("/ConfigurationRepositoryUnbindCfg");
Параметры.Добавить("-force");
ХранилищеКонфигурации = Новый МенеджерХранилищаКонфигурации();
ХранилищеКонфигурации.УстановитьУправлениеКонфигуратором(УправлениеКонфигуратором);

Если Не ПустаяСтрока(ДополнительныеКлючиЗапуска) Тогда
Параметры.Добавить(ДополнительныеКлючиЗапуска);
Если ЗначениеЗаполнено(ИмяРасширения) Тогда
ХранилищеКонфигурации.УстановитьРасширениеХранилища(ИмяРасширения);
КонецЕсли;

Попытка
УправлениеКонфигуратором.ВыполнитьКоманду(Параметры);
Текст = УправлениеКонфигуратором.ВыводКоманды();
Если Не ПустаяСтрока(Текст) Тогда
Лог.Информация(Текст);
КонецЕсли;
ХранилищеКонфигурации.ОтключитьсяОтХранилища();

Лог.Информация("Отключение конфигурации от хранилища завершено");
Исключение
Сообщение = ПодробноеПредставлениеОшибки(ИнформацияОбОшибке());
Лог.Ошибка(УправлениеКонфигуратором.ВыводКоманды());
ВызватьИсключение ТекущаяПроцедура;
КонецПопытки;
ВызватьИсключение ТекущаяПроцедура + "
|" + Сообщение;
КонецПопытки;

КонецПроцедуры

Expand Down