astakhovp/SSL
1
0 Fork 0
Code Issues Actions Packages Projects Releases Wiki Activity

3_0_1_274

Browse Source
This commit is contained in:
Компания 1С committed 2018-09-27 11:00:00 +03:00
1 parent 2870deb392
commit 165aaf6ed0
29 files changed
+587 -385
Download Patch File Download Diff File Expand all files Collapse all files

No files matched your search

SSL/src/Catalogs/СертификатыКлючейЭлектроннойПодписиИШифрования/Forms/ПодписаниеДанных/Module.bsl
+1 -1
View File
@@ -234,7 +234,7 @@
Если КлиентскиеПараметры.Свойство("УказанКонтекстДругойОперации") Тогда
СвойстваСертификата = ОбщиеВнутренниеДанные;
КлиентскиеПараметры.ОписаниеДанных.КонтекстОперации.ПродолжитьОткрытие(,, СвойстваСертификата);
КлиентскиеПараметры.ОписаниеДанных.КонтекстОперации.ПродолжитьОткрытие(Неопределено, Неопределено, СвойстваСертификата);
Если СвойстваСертификата.Сертификат = Сертификат Тогда
СвойстваПароля = СвойстваСертификата.СвойстваПароля;
КонецЕсли;
SSL/src/Catalogs/СертификатыКлючейЭлектроннойПодписиИШифрования/Forms/РасшифровкаДанных/Module.bsl
+1 -1
View File
@@ -264,7 +264,7 @@
Если КлиентскиеПараметры.Свойство("УказанКонтекстДругойОперации") Тогда
СвойстваСертификата = ОбщиеВнутренниеДанные;
КлиентскиеПараметры.ОписаниеДанных.КонтекстОперации.ПродолжитьОткрытие(,, СвойстваСертификата);
КлиентскиеПараметры.ОписаниеДанных.КонтекстОперации.ПродолжитьОткрытие(Неопределено, Неопределено, СвойстваСертификата);
Если СвойстваСертификата.Сертификат = Сертификат Тогда
СвойстваПароля = СвойстваСертификата.СвойстваПароля;
КонецЕсли;
SSL/src/CommonForms/РедактированиеТабличногоДокумента/Module.bsl
+9 -5
View File
@@ -41,13 +41,17 @@
ИмяДокумента = Параметры.ИмяДокумента;
КонецЕсли;
Элементы.ТабличныйДокумент.ОтображатьИменаСтрокИКолонок = ТабличныйДокумент.Макет;
Элементы.ТабличныйДокумент.ОтображатьИменаЯчеек = ТабличныйДокумент.Макет;
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
ОбщегоНазначенияКлиентСервер.УстановитьСвойствоЭлементаФормы(Элементы, "КоманднаяПанель", "Видимость", Ложь);
ОбщегоНазначенияКлиентСервер.УстановитьСвойствоЭлементаФормы(Элементы, "Предупреждение", "Видимость", Ложь);
ОбщегоНазначенияКлиентСервер.УстановитьСвойствоЭлементаФормы(Элементы, "КоманднаяПанель", "Видимость", Ложь);
ОбщегоНазначенияКлиентСервер.УстановитьСвойствоЭлементаФормы(Элементы, "Предупреждение", "Видимость", Ложь);
ОбщегоНазначенияКлиентСервер.УстановитьСвойствоЭлементаФормы(Элементы, "ТабличныйДокумент", "ОтображатьИменаСтрокИКолонок", Ложь);
ОбщегоНазначенияКлиентСервер.УстановитьСвойствоЭлементаФормы(Элементы, "ТабличныйДокумент", "ОтображатьИменаЯчеек", Ложь);
Иначе
Элементы.ТабличныйДокумент.ОтображатьИменаСтрокИКолонок = ТабличныйДокумент.Макет;
Элементы.ТабличныйДокумент.ОтображатьИменаЯчеек = ТабличныйДокумент.Макет;
КонецЕсли;
SSL/src/CommonForms/ФормаОтчета/Module.bsl
+13 -1
View File
@@ -1934,8 +1934,20 @@
Для Каждого ОписаниеСвязи Из Информация.ОтключаемыеСвязи Цикл
Связь = ОтключаемыеСвязи.Добавить();
ЗаполнитьЗначенияСвойств(Связь, ОписаниеСвязи);
Связь.ВедущийИдентификаторВФорме = ОписаниеСвязи.Ведущий.ИдентификаторЭлемента;
Связь.ВедущийИдентификаторВФорме = ОписаниеСвязи.Ведущий.ИдентификаторЭлемента;
Связь.ПодчиненныйИдентификаторВФорме = ОписаниеСвязи.Подчиненный.ИдентификаторЭлемента;
Если ОписаниеСвязи.Свойство("ВедущийТип")
И ТипЗнч(ОписаниеСвязи.ВедущийТип) = Тип("Тип") Тогда
Связь.ВедущийТип = Новый ОписаниеТипов(
ОбщегоНазначенияКлиентСервер.ЗначениеВМассиве(ОписаниеСвязи.ВедущийТип));
КонецЕсли;
Если ОписаниеСвязи.Свойство("ПодчиненныйТип")
И ТипЗнч(ОписаниеСвязи.ПодчиненныйТип) = Тип("Тип") Тогда
Связь.ПодчиненныйТип = Новый ОписаниеТипов(
ОбщегоНазначенияКлиентСервер.ЗначениеВМассиве(ОписаниеСвязи.ПодчиненныйТип));
КонецЕсли;
КонецЦикла;
КонецПроцедуры
SSL/src/CommonModules/АдресныйКлассификаторСлужебный/Module.bsl
+39 -24
View File
@@ -208,16 +208,16 @@
// Локальная проверка одного адреса.
//
Процедура УстановитьИдентификаторыАдреса(Адрес) Экспорт
Процедура УстановитьИдентификаторыАдреса(Адрес, Источник = "") Экспорт
ЗагруженныеАдресныеСведения = АдресныйКлассификаторПовтИсп.СведенияОЗагрузкеСубъектовРФ();
КодРегиона = АдресныйКлассификатор.КодРегионаПоНаименованию(СокрЛП(Адрес.Area + " " + Адрес.AreaType));
Если ТипЗнч(КодРегиона) = Тип("Число") Тогда
Если ЗагруженныеАдресныеСведения.Получить(КодРегиона) <> Неопределено
Если Источник <> "Сервис1С" И ЗагруженныеАдресныеСведения.Получить(КодРегиона) <> Неопределено
И ЗагруженныеАдресныеСведения.Получить(КодРегиона).ИспользоватьЗагруженные Тогда
УстановитьИдентификаторыАдресаПоЗагруженнымДанным(Адрес);
Иначе
ИначеЕсли ЗагруженныеАдресныеСведения.Получить("КлассификаторДоступен") = Истина Или Источник ="Сервис1С" Тогда
УстановитьИдентификаторыАдресаЧерезВебСервис(Адрес);
КонецЕсли;
@@ -236,7 +236,7 @@
И ЗагруженныеАдресныеСведения.Получить(КодРегиона).ИспользоватьЗагруженные Тогда
Адрес = РаспознатьАдресЗагруженныеДанные(ЧастиАдреса);
Иначе
Адрес = РаспознатьАдресВебСервис(ЧастиАдреса);
Адрес = РаспознатьАдресВебСервис(ЧастиАдреса, Представление);
КонецЕсли;
Если СтрСравнить(Адрес.addressType, АдресВСвободнойФорме()) = 0 Тогда
@@ -283,7 +283,7 @@
ЗагруженныеАдресныеСведения = АдресныйКлассификаторПовтИсп.СведенияОЗагрузкеСубъектовРФ();
Если ЗагруженныеАдресныеСведения["ИспользоватьЗагруженные"] Тогда
Если ЗагруженныеАдресныеСведения["ИспользоватьЗагруженные"] Или Уровень = 1 Тогда
ЗаполнитьАдресаДляИнтерактивногоВыбораВнутр(Результат, Родитель, Уровень, ТипАдреса, ДополнительныеПараметры);
КонецЕсли;
@@ -313,10 +313,11 @@
Возврат Результат;
КонецЕсли;
ИмяПоля = ?(ЭтоМуниципальныйАдрес(ТипАдреса), "munName", "name");
Для каждого СтрокаРезультатаВебСервис Из РезультатВебСервис.Данные Цикл
НоваяСтрока = Результат.Данные.Добавить();
НоваяСтрока.Идентификатор = ?(ЗначениеЗаполнено(СтрокаРезультатаВебСервис.id), СтрокаРезультатаВебСервис.id, СтрокаРезультатаВебСервис.munId);
НоваяСтрока.Представление = СтрокаРезультатаВебСервис.value;
НоваяСтрока.Идентификатор = СтрокаРезультатаВебСервис.id;
НоваяСтрока.Представление = СтрокаРезультатаВебСервис[ИмяПоля];
НоваяСтрока.РегионЗагружен = Ложь;
НоваяСтрока.Неактуален = Ложь;
КонецЦикла;
@@ -353,6 +354,10 @@
Возврат Результат;
КонецФункции
Функция ЭтоМуниципальныйАдрес(ТипАдреса)
Возврат СтрСравнить(ТипАдреса, "Муниципальный") = 0;
КонецФункции
// Возвращает данные классификатора поля выбора по уровню.
//
// Параметры:
@@ -439,9 +444,10 @@
ТекстGETЗапроса = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(СтрокаЗапроса, Строка(Уровень));
РезультатВебСервис = ВыполнитьЗапросЧерезВебСервис(ТекстGETЗапроса);
ИмяПоля = ?(ЭтоМуниципальныйАдрес(ТипАдреса), "munName", "name");
ИмяПоляИдентификатор = ?(ЭтоМуниципальныйАдрес(ТипАдреса), "munId", "id");
Для каждого СтрокаДанных Из РезультатВебСервис.Данные Цикл
ДанныеВыбора.Данные.Добавить(?(ЗначениеЗаполнено(СтрокаДанных.id), СтрокаДанных.id, СтрокаДанных.munId),
СтрокаДанных.value);
ДанныеВыбора.Данные.Добавить(СтрокаДанных[ИмяПоляИдентификатор], СтрокаДанных[ИмяПоля]);
КонецЦикла;
Если РезультатВебСервис.Отказ Тогда
@@ -491,7 +497,7 @@
ТолькоВебСервис = ДополнительныеПараметры.Свойство("ТолькоВебСервис") И ДополнительныеПараметры.ТолькоВебСервис;
ЗагруженныеАдресныеСведения = АдресныйКлассификаторПовтИсп.СведенияОЗагрузкеСубъектовРФ();
Если Не ТолькоВебСервис И ЗагруженныеАдресныеСведения["ИспользоватьЗагруженные"] Тогда
Если Не ТолькоВебСервис Тогда
ЗаполнитьСписокАвтоподбораЧастиАдресаВнутр(Результат, КешПредставлений, Текст, ДополнительныеПараметры, ЗагруженныеАдресныеСведения);
Если Результат.Количество() >= 20 Тогда
Возврат Результат;
@@ -808,11 +814,6 @@
РезультатПроверки.Вставить("Варианты", Новый Массив);
РезультатПроверки.Вставить("Ошибки", Новый Массив);
ОписаниеОшибки = Новый Структура("Ключ,Текст,Подсказка");
ОписаниеОшибки.Ключ = "";
ОписаниеОшибки.Текст = НСтр("ru='Для данного региона не загружены адресные сведения.'");
РезультатПроверки.Ошибки.Добавить(ОписаниеОшибки);
Результат.Данные.Добавить(РезультатПроверки);
КонецЦикла;
@@ -949,7 +950,7 @@
Если ПустаяСтрока(ИдентификаторАдресногоОбъекта) Тогда
Если Не ЗначениеЗаполнено(Адрес.ID) Тогда
УстановитьИдентификаторыАдреса(Адрес);
УстановитьИдентификаторыАдреса(Адрес, Источник);
КонецЕсли;
ИдентификаторАдресногоОбъекта = Адрес.ID;
КонецЕсли;
@@ -1568,7 +1569,7 @@
#Область СлужебныеПроцедурыИФункции
Функция РаспознатьАдресВебСервис(ЧастиАдреса)
Функция РаспознатьАдресВебСервис(ЧастиАдреса, Представление)
Адрес = ОписаниеНовойКонтактнойИнформации();
АдресДляПроверки = Новый Массив;
@@ -2120,6 +2121,9 @@
Запрос.УстановитьПараметр("Сокращение" + Строка(Счетчик), Адрес[УровеньАдреса + "Type"]);
КакиеУровниПроверять.Вставить(УровеньАдреса, Счетчик);
Счетчик = Счетчик + 1;
Если Счетчик = 6 Тогда
Прервать;
КонецЕсли;
КонецЕсли;
@@ -3315,6 +3319,10 @@
Для Каждого Строка Из РезультатЗапроса.Выгрузить() Цикл
Если ЗначениеЗаполнено(Строка.ПочтовыйИндекс) Тогда
Строка.Представление = Строка.Представление + " (" + Формат(Строка.ПочтовыйИндекс, "ЧГ=0") + ")";
КонецЕсли;
ЗаполнитьЗначенияСвойств(Данные.Добавить(), Строка);
КонецЦикла;
@@ -3632,6 +3640,10 @@
ТекстGETЗапроса = ТекстGETЗапроса + "&limit=" + Формат(Количество, "ЧГ=0");
КонецЕсли;
Если ДополнительныеПараметры.Свойство("Уровни") Тогда
ТекстGETЗапроса = ТекстGETЗапроса + "&levels=" + ДополнительныеПараметры.Уровни;
КонецЕсли;
РезультатВебСервис = ВыполнитьЗапросЧерезВебСервис(ТекстGETЗапроса);
Если РезультатВебСервис.Отказ Или РезультатВебСервис.Количество() = 0 Или РезультатВебСервис.Данные = Неопределено Тогда
Возврат;
@@ -3644,14 +3656,17 @@
КонецЕсли;
ПредставлениеТерриториальное = Данные.valueReversed;
ПредставлениеМуниципальное = Данные.munValueReversed;
ПредставлениеМуниципальное = Данные.munValueReversed;
ДанныеМуниципальный = АдресДляСохраненияВБазе(Данные);
Если ЗначениеЗаполнено(Данные.munId) И ЗначениеЗаполнено(ПредставлениеМуниципальное) Тогда
ДанныеМуниципальный = АдресДляСохраненияВБазе(Данные);
Сведения = СведенияОПодбираемомАдресе(ПредставлениеМуниципальное, Данные.id, Истина, Ложь, СтруктураВСтрокуJSON(ДанныеМуниципальный));
ДобавитьВариантАдреса(ВариантыАдреса, КешПредставлений, Сведения);
КонецЕсли;
Сведения = СведенияОПодбираемомАдресе(ПредставлениеМуниципальное, Данные.id, Истина, Ложь, СтруктураВСтрокуJSON(ДанныеМуниципальный));
ДобавитьВариантАдреса(ВариантыАдреса, КешПредставлений, Сведения);
Если СтрСравнить(ПредставлениеТерриториальное, ПредставлениеМуниципальное) <> 0 Тогда
Если ЗначениеЗаполнено(ПредставлениеТерриториальное) И (Не ЗначениеЗаполнено(Данные.munId)
Или СтрСравнить(ПредставлениеТерриториальное, ПредставлениеМуниципальное) <> 0) Тогда
ДанныеТерриториальный = АдресДляСохраненияВБазе(Данные, Ложь);
@@ -3781,7 +3796,7 @@
// Субъект должен быть всегда
Если ПустаяСтрока(Адрес.Area) Тогда
// Нет субъекта
ДобавитьОшибкуПроверкиАдресаПоКлассификатору(ОшибкиПроверки, "СубъектРФ", НСтр("ru = 'Не указан субъект РФ адреса'") );
ДобавитьОшибкуПроверкиАдресаПоКлассификатору(ОшибкиПроверки, "СубъектРФ", НСтр("ru = 'Не указан регион адреса'") );
Возврат Результат;
КонецЕсли;
SSL/src/CommonModules/Взаимодействия/Module.bsl
+41 -14
View File
@@ -350,7 +350,9 @@
////////////////////////////////////////////////////////////////////////////////
// Шаблоны сообщений.
Процедура СоздатьПисьмо(Сообщение, УчетнаяЗапись) Экспорт
Функция СоздатьПисьмо(Сообщение, УчетнаяЗапись) Экспорт
РезультатОтправкиПисьма = Новый Структура("Отправлено, ОписаниеОшибки", Ложь);
ПисьмоHTML = (Сообщение.ДополнительныеПараметры.ФорматПисьма = Перечисления.СпособыРедактированияЭлектронныхПисем.HTML);
@@ -472,21 +474,34 @@
Исключение
ОтменитьТранзакцию();
ТекстСообщения = НСтр("ru = 'Не удалось создать письмо : %Письмо% по причине: %Причина%'");
ТекстСообщения = СтрЗаменить(ТекстСообщения, "%Письмо%", Письмо);
ТекстСообщения = СтрЗаменить(ТекстСообщения, "%Причина%", ПодробноеПредставлениеОшибки(ИнформацияОбОшибке()));
ИнформацияОбОшибке = ИнформацияОбОшибке();
ШаблонТекстаСообщения = НСтр("ru = 'Не удалось сформировать письмо по причине:
|%1'");
ЗаписьЖурналаРегистрации(ОбновлениеИнформационнойБазы.СобытиеЖурналаРегистрации(),
УровеньЖурналаРегистрации.Ошибка,, Письмо, ТекстСообщения);
Возврат;
УровеньЖурналаРегистрации.Ошибка,, Письмо,
СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(ШаблонТекстаСообщения, ПодробноеПредставлениеОшибки(ИнформацияОбОшибке)));
РезультатОтправкиПисьма.ОписаниеОшибки = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(ШаблонТекстаСообщения, КраткоеПредставлениеОшибки(ИнформацияОбОшибке));
Возврат РезультатОтправкиПисьма;
КонецПопытки;
Попытка
ИдентификаторПисьма = ВыполнитьОтправкуПисьма(Письмо);
Исключение
ТекстСообщения = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(НСтр("ru = 'Ошибка при отправке письма %1'"),КраткоеПредставлениеОшибки(ИнформацияОбОшибке()));
ОбщегоНазначенияКлиентСервер.СообщитьПользователю(КраткоеПредставлениеОшибки(ИнформацияОбОшибке()));
Возврат;
ИнформацияОбОшибке = ИнформацияОбОшибке();
ШаблонТекстаСообщения = НСтр("ru = 'Не удалось отправить письмо по причине:
|%1'");
ЗаписьЖурналаРегистрации(ОбновлениеИнформационнойБазы.СобытиеЖурналаРегистрации(),
УровеньЖурналаРегистрации.Ошибка,, Письмо,
СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(ШаблонТекстаСообщения, ПодробноеПредставлениеОшибки(ИнформацияОбОшибке)));
РезультатОтправкиПисьма.ОписаниеОшибки = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(ШаблонТекстаСообщения, КраткоеПредставлениеОшибки(ИнформацияОбОшибке));
Возврат РезультатОтправкиПисьма;
КонецПопытки;
Если НЕ Письмо.УдалятьПослеОтправки Тогда
@@ -500,10 +515,19 @@
ВзаимодействияВызовСервера.УстановитьПапкуЭлектронногоПисьма(
Письмо.Ссылка, ОпределитьПапкуДляПисьма(Письмо.Ссылка));
Исключение
ТекстСообщения = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
НСтр("ru = 'Ошибка при записи письма после успешной отправки %1'"),
КраткоеПредставлениеОшибки(ИнформацияОбОшибке()));
ОбщегоНазначенияКлиентСервер.СообщитьПользователю(КраткоеПредставлениеОшибки(ИнформацияОбОшибке()));
ИнформацияОбОшибке = ИнформацияОбОшибке();
ШаблонТекстаСообщения = НСтр("ru = 'Не удалось сохранить письмо в программе после успешной отправки по причине:
|%1'");
ЗаписьЖурналаРегистрации(ОбновлениеИнформационнойБазы.СобытиеЖурналаРегистрации(),
УровеньЖурналаРегистрации.Ошибка,, Письмо,
СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(ШаблонТекстаСообщения, ПодробноеПредставлениеОшибки(ИнформацияОбОшибке)));
РезультатОтправкиПисьма.Отправлено = Истина;
РезультатОтправкиПисьма.ОписаниеОшибки = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(ШаблонТекстаСообщения, КраткоеПредставлениеОшибки(ИнформацияОбОшибке));
Возврат РезультатОтправкиПисьма;
КонецПопытки;
Иначе
@@ -513,7 +537,10 @@
КонецЕсли;
КонецПроцедуры
РезультатОтправкиПисьма.Отправлено = Истина;
Возврат РезультатОтправкиПисьма;
КонецФункции
Процедура СоздатьИОтправитьСообщениеSMS(Сообщение) Экспорт
SSL/src/CommonModules/ОбменДаннымиСервер/Module.bsl
+51 -27
View File
@@ -2895,6 +2895,7 @@
Обработчик.ЗапускатьИВПодчиненномУзлеРИБСФильтрами = Истина;
Обработчик.ПроцедураЗаполненияДанныхОбновления = "РегистрыСведений.УдалитьНастройкиТранспортаОбмена.ЗарегистрироватьДанныеКОбработкеДляПереходаНаНовуюВерсию";
Обработчик.ПроцедураПроверки = "ОбновлениеИнформационнойБазы.ДанныеОбновленыНаНовуюВерсиюПрограммы";
Обработчик.БлокируемыеОбъекты = "РегистрСведений.УдалитьНастройкиТранспортаОбмена,РегистрСведений.НастройкиТранспортаОбменаДанными";
Обработчик = Обработчики.Добавить();
Обработчик.Версия = "3.0.1.91";
@@ -2909,6 +2910,7 @@
Обработчик.ЗапускатьИВПодчиненномУзлеРИБСФильтрами = Истина;
Обработчик.ПроцедураЗаполненияДанныхОбновления = "РегистрыСведений.ОбщиеНастройкиУзловИнформационныхБаз.ЗарегистрироватьДанныеКОбработкеДляПереходаНаНовуюВерсию";
Обработчик.ПроцедураПроверки = "ОбновлениеИнформационнойБазы.ДанныеОбновленыНаНовуюВерсиюПрограммы";
Обработчик.БлокируемыеОбъекты = "РегистрСведений.ОбщиеНастройкиУзловИнформационныхБаз";
Обработчик = Обработчики.Добавить();
Обработчик.Версия = "3.0.1.91";
@@ -2923,6 +2925,7 @@
Обработчик.ЗапускатьИВПодчиненномУзлеРИБСФильтрами = Истина;
Обработчик.ПроцедураЗаполненияДанныхОбновления = "РегистрыСведений.НастройкиОбменаДаннымиXDTO.ЗарегистрироватьДанныеКОбработкеДляПереходаНаНовуюВерсию";
Обработчик.ПроцедураПроверки = "ОбновлениеИнформационнойБазы.ДанныеОбновленыНаНовуюВерсиюПрограммы";
Обработчик.БлокируемыеОбъекты = "РегистрСведений.НастройкиОбменаДаннымиXDTO";
КонецПроцедуры
@@ -3363,6 +3366,46 @@
КонецФункции
Процедура ВыполнитьОбновлениеНастроекОбмена(УзелИнформационнойБазы)
Если ОбменДаннымиПовтИсп.ЭтоУзелОбменаСообщениями(УзелИнформационнойБазы) Тогда
Возврат;
КонецЕсли;
НаборУдалитьНастройкиТранспортаОбмена = РегистрыСведений.УдалитьНастройкиТранспортаОбмена.СоздатьНаборЗаписей();
НаборУдалитьНастройкиТранспортаОбмена.Отбор.УзелИнформационнойБазы.Установить(УзелИнформационнойБазы);
НаборУдалитьНастройкиТранспортаОбмена.Прочитать();
СостояниеОбработки = ОбновлениеИнформационнойБазы.ОбъектОбработан(НаборУдалитьНастройкиТранспортаОбмена);
Если Не СостояниеОбработки.Обработан Тогда
РегистрыСведений.УдалитьНастройкиТранспортаОбмена.ПеренестиНастройкиТранспортаОбменаДаннымиКорреспондента(УзелИнформационнойБазы);
КонецЕсли;
НаборОбщиеНастройкиУзловИнформационныхБаз = РегистрыСведений.ОбщиеНастройкиУзловИнформационныхБаз.СоздатьНаборЗаписей();
НаборОбщиеНастройкиУзловИнформационныхБаз.Отбор.УзелИнформационнойБазы.Установить(УзелИнформационнойБазы);
НаборОбщиеНастройкиУзловИнформационныхБаз.Прочитать();
Если НаборОбщиеНастройкиУзловИнформационныхБаз.Количество() = 0 Тогда
РегистрыСведений.ОбщиеНастройкиУзловИнформационныхБаз.ОбновитьОбщиеНастройкиКорреспондента(УзелИнформационнойБазы);
Иначе
СостояниеОбработки = ОбновлениеИнформационнойБазы.ОбъектОбработан(НаборОбщиеНастройкиУзловИнформационныхБаз);
Если Не СостояниеОбработки.Обработан Тогда
РегистрыСведений.ОбщиеНастройкиУзловИнформационныхБаз.ОбновитьОбщиеНастройкиКорреспондента(УзелИнформационнойБазы);
КонецЕсли;
КонецЕсли;
Если ЭтоПланОбменаXDTO(УзелИнформационнойБазы) Тогда
НаборНастройкиОбменаДаннымиXDTO = РегистрыСведений.НастройкиОбменаДаннымиXDTO.СоздатьНаборЗаписей();
НаборНастройкиОбменаДаннымиXDTO.Отбор.УзелИнформационнойБазы.Установить(УзелИнформационнойБазы);
НаборНастройкиОбменаДаннымиXDTO.Прочитать();
Если НаборНастройкиОбменаДаннымиXDTO.Количество() = 0 Тогда
РегистрыСведений.НастройкиОбменаДаннымиXDTO.ОбновитьНастройкиОбменаДаннымиXDTOКорреспондента(УзелИнформационнойБазы);
КонецЕсли;
КонецЕсли;
КонецПроцедуры
#Область ОбновлениеИнформационнойБазы
// Устанавливает признак того, что для всех узлов планов обмена необходимо выполнить процедуру
@@ -4627,13 +4670,7 @@
КонецЕсли;
СостояниеОбработки = ОбновлениеИнформационнойБазы.ОбъектОбработан(ПараметрыОбмена.УзелИнформационнойБазы);
Если Не СостояниеОбработки.Обработан Тогда
РегистрыСведений.УдалитьНастройкиТранспортаОбмена.ПеренестиНастройкиТранспортаОбменаДаннымиКорреспондента(ПараметрыОбмена.УзелИнформационнойБазы);
РегистрыСведений.ОбщиеНастройкиУзловИнформационныхБаз.ОбновитьОбщиеНастройкиКорреспондента(ПараметрыОбмена.УзелИнформационнойБазы);
РегистрыСведений.НастройкиОбменаДаннымиXDTO.ОбновитьНастройкиОбменаДаннымиXDTOКорреспондента(ПараметрыОбмена.УзелИнформационнойБазы);
КонецЕсли;
ВыполнитьОбновлениеНастроекОбмена(ПараметрыОбмена.УзелИнформационнойБазы);
Если Не НастройкаСинхронизацииЗавершена(ПараметрыОбмена.УзелИнформационнойБазы) Тогда
@@ -12101,31 +12138,18 @@
ЗначенияРеквизитов = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(Корреспондент, ИменаРеквизитов);
ТолькоПолучение = Истина;
ВыгрузкаВручную = Ложь;
Для Каждого Реквизит Из ЗначенияРеквизитов Цикл
Если Реквизит.Значение = Перечисления.РежимыВыгрузкиОбъектовОбмена.ВыгружатьПриНеобходимости Тогда
Продолжить;
КонецЕсли;
Если Реквизит.Значение <> Перечисления.РежимыВыгрузкиОбъектовОбмена.НеВыгружать Тогда
ТолькоПолучение = Ложь;
КонецЕсли;
Если Реквизит.Значение = Перечисления.РежимыВыгрузкиОбъектовОбмена.ВыгружатьВручную Тогда
ВыгрузкаВручную = Истина;
Если Реквизит.Значение = Перечисления.РежимыВыгрузкиОбъектовОбмена.ВыгружатьВручную
Или Реквизит.Значение = Перечисления.РежимыВыгрузкиОбъектовОбмена.НеВыгружать Тогда
Результат = "ПолучениеИОтправка";
Прервать;
КонецЕсли;
КонецЦикла;
Если ТолькоПолучение Тогда
Результат = "ТолькоПолучение";
ИначеЕсли ВыгрузкаВручную Тогда
Результат = "ПолучениеИОтправка";
КонецЕсли;
Возврат Результат;
КонецФункции
SSL/src/CommonModules/ОбновлениеИнформационнойБазыБСП/Module.bsl
+1 -1
View File
@@ -32,7 +32,7 @@
Процедура ПриДобавленииПодсистемы(Описание) Экспорт
Описание.Имя = "СтандартныеПодсистемы";
Описание.Версия = "3.0.1.261";
Описание.Версия = "3.0.1.274";
Описание.РежимВыполненияОтложенныхОбработчиков = "Параллельно";
Описание.ПараллельноеОтложенноеОбновлениеСВерсии = "2.3.3.0";
SSL/src/CommonModules/ОбщегоНазначения/Module.bsl
+106 -74
View File
@@ -754,6 +754,7 @@
// Получает все места использования ссылок.
// Если какая-либо ссылка нигде не используется, то строк для нее в результирующей таблице не будет.
// При вызове в неразделенном сеансе не выявляет ссылок в разделенных областях.
//
// Параметры:
// НаборСсылок - Массив - Ссылки, для которых ищем места использования.
@@ -762,13 +763,14 @@
//
// Возвращаемое значение:
// ТаблицаЗначений - Состоит из колонок:
// * Ссылка - ЛюбаяСсылка - Ссылка, которая анализируется.
// * Данные - Произвольный - Данные, содержащие анализируемую ссылку.
// * Метаданные - ОбъектМетаданных - Метаданные найденных данных.
// * ПредставлениеДанных - Строка - Представление данных, содержащих анализируемую ссылку.
// * ТипСсылки - Тип - Тип анализируемой ссылки.
// * ВспомогательныеДанные - Булево - Истина, если данные используются анализируемой ссылкой как
// вспомогательными данными (ведущее измерение и т.п.).
// * Ссылка - ЛюбаяСсылка - Ссылка, которая анализируется.
// * Данные - Произвольный - Данные, содержащие анализируемую ссылку.
// * Метаданные - ОбъектМетаданных - Метаданные найденных данных.
// * ПредставлениеДанных - Строка - Представление данных, содержащих анализируемую ссылку.
// * ТипСсылки - Тип - Тип анализируемой ссылки.
// * ВспомогательныеДанные - Булево - Истина, если данные используются анализируемой ссылкой как
// вспомогательными данными (ведущее измерение или попали в исключение ПриДобавленииИсключенийПоискаСсылок).
// * ЭтоСлужебныеДанные - Булево - данные попали в исключение ПриДобавленииИсключенийПоискаСсылок
//
Функция МестаИспользования(Знач НаборСсылок, Знач АдресРезультата = "") Экспорт
@@ -778,10 +780,16 @@
МестаИспользования = НайтиПоСсылкам(НаборСсылок);
УстановитьПривилегированныйРежим(Ложь);
// МестаИспользования - ТаблицаЗначений - где:
// * Ссылка - ЛюбаяСсылка - Ссылка, которая анализируется.
// * Данные - Произвольный - Данные, содержащие анализируемую ссылку.
// * Метаданные - ОбъектМетаданных - Метаданные найденных данных.
МестаИспользования.Колонки.Добавить("ПредставлениеДанных", Новый ОписаниеТипов("Строка"));
МестаИспользования.Колонки.Добавить("ТипСсылки");
МестаИспользования.Колонки.Добавить("ИнформацияОМестеИспользования");
МестаИспользования.Колонки.Добавить("ВспомогательныеДанные", Новый ОписаниеТипов("Булево"));
МестаИспользования.Колонки.Добавить("ЭтоСлужебныеДанные", Новый ОписаниеТипов("Булево"));
МестаИспользования.Индексы.Добавить("Ссылка");
МестаИспользования.Индексы.Добавить("Данные");
@@ -789,7 +797,7 @@
МестаИспользования.Индексы.Добавить("Ссылка, ВспомогательныеДанные");
ТипКлючиЗаписей = ОписаниеТипаКлючиЗаписей();
ТипВсеСсылки = ОписаниеТипаВсеСсылки();
ТипВсеСсылки = ОписаниеТипаВсеСсылки();
МетаданныеПоследовательностей = Метаданные.Последовательности;
МетаданныеКонстант = Метаданные.Константы;
@@ -800,65 +808,47 @@
КэшИзмеренийРегистров = Новый Соответствие;
Для Каждого МестоИспользования Из МестаИспользования Цикл
МестоСсылка = МестоИспользования.Ссылка;
МестоДанные = МестоИспользования.Данные;
МестоМетаданные = МестоИспользования.Метаданные;
ТипДанных = ТипЗнч(МестоДанные);
ТипДанных = ТипЗнч(МестоИспользования.Данные);
ИсключениеПоиска = ИсключенияПоискаСсылок[МестоМетаданные];
ЭтоСлужебныеДанные = ЭтоСлужебныеДанные(МестоИспользования, ИсключенияПоискаСсылок);
ЭтоВспомогательныеДанные = ЭтоСлужебныеДанные;
Если ИсключениеПоиска = Неопределено Тогда
ЭтоВспомогательныеДанные = (МестоСсылка = МестоДанные);
Если МетаданныеДокументов.Содержит(МестоИспользования.Метаданные) Тогда
Представление = Строка(МестоИспользования.Данные);
ИначеЕсли ИсключениеПоиска = "*" Тогда
ЭтоВспомогательныеДанные = Истина;
ИначеЕсли МетаданныеКонстант.Содержит(МестоИспользования.Метаданные) Тогда
Представление = МестоИспользования.Метаданные.Представление() + " (" + НСтр("ru = 'константа'") + ")";
Иначе
ЭтоВспомогательныеДанные = Ложь;
Для Каждого ПутьКРеквизиту Из ИсключениеПоиска Цикл
Если ЗначениеРеквизитаПоПути(МестоДанные, ПутьКРеквизиту) = МестоСсылка Тогда
ЭтоВспомогательныеДанные = Истина;
Прервать;
КонецЕсли;
КонецЦикла;
КонецЕсли;
Если МетаданныеДокументов.Содержит(МестоМетаданные) Тогда
Представление = Строка(МестоДанные);
ИначеЕсли МетаданныеКонстант.Содержит(МестоМетаданные) Тогда
Представление = МестоМетаданные.Представление() + " (" + НСтр("ru = 'константа'") + ")";
ИначеЕсли МетаданныеПоследовательностей.Содержит(МестоМетаданные) Тогда
Представление = МестоМетаданные.Представление() + " (" + НСтр("ru = 'последовательность'") + ")";
ИначеЕсли МетаданныеПоследовательностей.Содержит(МестоИспользования.Метаданные) Тогда
Представление = МестоИспользования.Метаданные.Представление() + " (" + НСтр("ru = 'последовательность'") + ")";
ИначеЕсли ТипДанных = Неопределено Тогда
Представление = Строка(МестоДанные);
Представление = Строка(МестоИспользования.Данные);
ИначеЕсли ТипВсеСсылки.СодержитТип(ТипДанных) Тогда
МетаПредставлениеОбъекта = Новый Структура("ПредставлениеОбъекта");
ЗаполнитьЗначенияСвойств(МетаПредставлениеОбъекта, МестоМетаданные);
ЗаполнитьЗначенияСвойств(МетаПредставлениеОбъекта, МестоИспользования.Метаданные);
Если ПустаяСтрока(МетаПредставлениеОбъекта.ПредставлениеОбъекта) Тогда
МетаПредставление = МестоМетаданные.Представление();
МетаПредставление = МестоИспользования.Метаданные.Представление();
Иначе
МетаПредставление = МетаПредставлениеОбъекта.ПредставлениеОбъекта;
КонецЕсли;
Представление = Строка(МестоДанные);
Представление = Строка(МестоИспользования.Данные);
Если Не ПустаяСтрока(МетаПредставление) Тогда
Представление = Представление + " (" + МетаПредставление + ")";
КонецЕсли;
ИначеЕсли ТипКлючиЗаписей.СодержитТип(ТипДанных) Тогда
Представление = МестоМетаданные.ПредставлениеЗаписи;
Представление = МестоИспользования.Метаданные.ПредставлениеЗаписи;
Если ПустаяСтрока(Представление) Тогда
Представление = МестоМетаданные.Представление();
Представление = МестоИспользования.Метаданные.Представление();
КонецЕсли;
ОписаниеИзмерений = "";
Для Каждого КлючЗначение Из ОписаниеИзмеренийНабора(МестоМетаданные, КэшИзмеренийРегистров) Цикл
Значение = МестоДанные[КлючЗначение.Ключ];
Для Каждого КлючЗначение Из ОписаниеИзмеренийНабора(МестоИспользования.Метаданные, КэшИзмеренийРегистров) Цикл
Значение = МестоИспользования.Данные[КлючЗначение.Ключ];
Описание = КлючЗначение.Значение;
Если Значение = МестоСсылка Тогда
Если МестоИспользования.Ссылка = Значение Тогда
Если Описание.Ведущее Тогда
ЭтоВспомогательныеДанные = Истина;
КонецЕсли;
@@ -874,13 +864,14 @@
КонецЕсли;
Иначе
Представление = Строка(МестоДанные);
Представление = Строка(МестоИспользования.Данные);
КонецЕсли;
МестоИспользования.ПредставлениеДанных = Представление;
МестоИспользования.ПредставлениеДанных = Представление;
МестоИспользования.ВспомогательныеДанные = ЭтоВспомогательныеДанные;
МестоИспользования.ТипСсылки = ТипЗнч(МестоИспользования.Ссылка);
МестоИспользования.ЭтоСлужебныеДанные = ЭтоСлужебныеДанные;
МестоИспользования.ТипСсылки = ТипЗнч(МестоИспользования.Ссылка);
КонецЦикла;
Если Не ПустаяСтрока(АдресРезультата) Тогда
@@ -4342,6 +4333,9 @@
// Данные - Произвольный - Данные помещаемые в безопасное хранилище. Неопределенно - удаляет все данные.
// Для удаления данных по ключу следует использовать процедуру УдалитьДанныеИзБезопасногоХранилища.
// Ключ - Строка - Ключ сохраняемых настроек, по умолчанию "Пароль".
// Ключ должен соответствовать правилам, установленным для идентификаторов:
// * Первым символом ключа должна быть буква или символ подчеркивания (_).
// * Каждый из последующих символов может быть буквой, цифрой или символом подчеркивания (_).
//
// Пример:
// Процедура ПриЗаписиНаСервере(Отказ, ТекущийОбъект, ПараметрыЗаписи)
@@ -4360,7 +4354,7 @@
НСтр("ru = 'Недопустимое значение параметра %1 в %2.
|параметр должен содержать ссылку; передано значение: %3 (тип %4).'"),
"Владелец", "ОбщегоНазначения.ЗаписатьДанныеВБезопасноеХранилище", Владелец, ТипЗнч(Владелец)));
ЭтоОбластьДанных = РазделениеВключено() И ДоступноИспользованиеРазделенныхДанных();
Если ЭтоОбластьДанных Тогда
БезопасноеХранилищеДанных = РегистрыСведений.БезопасноеХранилищеДанныхОбластейДанных.СоздатьМенеджерЗаписи();
@@ -5794,7 +5788,7 @@
Результат.Вставить("Успех", Истина);
Для Каждого МестоИспользования Из Результат.МестаИспользования Цикл
Если МестоИспользования.ВспомогательныеДанные Тогда
Если МестоИспользования.ЭтоСлужебныеДанные Тогда
Продолжить; // Зависимые данные не обрабатываются.
КонецЕсли;
@@ -7496,31 +7490,6 @@
Возврат Информация;
КонецФункции
Функция ЗначениеРеквизитаПоПути(Знач Данные, Знач ПутьДанных)
Результат = Данные;
Имена = СтрРазделить(ПутьДанных, ".", Ложь);
Для Каждого ИмяРеквизита Из Имена Цикл
Тест = Новый Структура(ИмяРеквизита, Неопределено);
ЗаполнитьЗначенияСвойств(Тест, Результат);
Если Тест[ИмяРеквизита] = Неопределено Тогда
Тест[ИмяРеквизита] = -1;
ЗаполнитьЗначенияСвойств(Тест, Результат);
Если Тест[ИмяРеквизита] = Неопределено Тогда
ВызватьИсключение СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(НСтр("ru='Ошибка вычисления %1 для объекта %2. Реквизит %3 не найден'"),
ПутьДанных, Данные, ИмяРеквизита);
КонецЕсли;
КонецЕсли;
Результат = Тест[ИмяРеквизита];
Если Результат = Неопределено Тогда // Не можем дальше читать.
Возврат Неопределено;
КонецЕсли;
КонецЦикла;
Возврат Результат;
КонецФункции
////////////////////////////////////////////////////////////////////////////////
// Вспомогательные процедуры и функции.
@@ -7989,4 +7958,67 @@
КонецФункции
Функция ЭтоСлужебныеДанные(МестоИспользования, ИсключенияПоискаСсылок)
ИсключениеПоиска = ИсключенияПоискаСсылок[МестоИспользования.Метаданные];
// Данные может быть как ссылкой так и ключом записи регистра.
Если ИсключениеПоиска = Неопределено Тогда
Возврат (МестоИспользования.Ссылка = МестоИспользования.Данные); // Ссылку саму на себя исключаем.
ИначеЕсли ИсключениеПоиска = "*" Тогда
Возврат Истина; // Если указано исключить все - считаем все исключением.
Иначе
Для Каждого ПутьКРеквизиту Из ИсключениеПоиска Цикл
// Если указаны исключения.
// Относительный путь к реквизиту:
// "<ИмяРеквизитаИлиТЧ>[.<ИмяРеквизитаТЧ>]".
Если ЭтоСсылка(ТипЗнч(МестоИспользования.Данные)) Тогда
// Проверка есть ли по исключаемому пути в указанных данных проверяемая ссылка
ПолноеИмяОбъектаМетаданных = МестоИспользования.Метаданные.ПолноеИмя();
ТекстЗапроса =
"ВЫБРАТЬ
| ИСТИНА
|ИЗ
| &ПолноеИмяОбъектаМетаданных КАК Таблица
|ГДЕ
| &ПутьКРеквизиту = &ПроверяемаяСсылка
| И Таблица.Ссылка = &Ссылка";
ТекстЗапроса = СтрЗаменить(ТекстЗапроса, "&ПолноеИмяОбъектаМетаданных", ПолноеИмяОбъектаМетаданных);
ТекстЗапроса = СтрЗаменить(ТекстЗапроса, "&ПутьКРеквизиту", ПутьКРеквизиту);
Запрос = Новый Запрос;
Запрос.Текст = ТекстЗапроса;
Запрос.УстановитьПараметр("ПроверяемаяСсылка", МестоИспользования.Ссылка);
Запрос.УстановитьПараметр("Ссылка", МестоИспользования.Данные);
Результат = Запрос.Выполнить();
Если Не Результат.Пустой() Тогда
Возврат Истина;
КонецЕсли;
Иначе
БуферДанных = Новый Структура(ПутьКРеквизиту);
ЗаполнитьЗначенияСвойств(БуферДанных, МестоИспользования.Данные);
Если БуферДанных[ПутьКРеквизиту] = МестоИспользования.Ссылка Тогда
Возврат Истина;
КонецЕсли;
КонецЕсли;
КонецЦикла;
КонецЕсли;
Возврат Ложь;
КонецФункции
#КонецОбласти
SSL/src/CommonModules/РаботаСАдресами/Module.bsl
+9 -2
View File
@@ -1607,11 +1607,18 @@
КонецЕсли;
// Основные сведения
Результат.Вставить("Комментарий", Адрес.Comment);
Результат.Вставить("Индекс", Адрес.ZipCode);
Результат.Вставить("ТипАдреса", Адрес.AddressType);
Результат.Вставить("Страна", Адрес.Country);
Результат.Вставить("КодСтраны", Адрес.CountryCode);
Результат.Вставить("Комментарий", Адрес.Comment);
Если ЗначениеЗаполнено(Адрес.CountryCode) Тогда
Результат.Вставить("КодСтраны", Адрес.CountryCode);
Иначе
СведенияОСтране = УправлениеКонтактнойИнформацией.ДанныеСтраныМира(Неопределено, Адрес.Country);
Если СведенияОСтране <> Неопределено Тогда
Результат.Вставить("КодСтраны", СведенияОСтране.Код);
КонецЕсли;
КонецЕсли;
ЭтоНациональныйАдрес = ?(СтрСравнить(Адрес.Country, РаботаСАдресамиКлиентСервер.ОсновнаяСтрана().Наименование) = 0, Истина, Ложь);
КодРегиона = ?(ЭтоНациональныйАдрес, КодРегиона(Адрес["Area"] + " " +Адрес["AreaType"]), "");
SSL/src/CommonModules/РаботаСАдресамиКлиентСервер/Module.bsl
+1 -1
View File
@@ -642,7 +642,7 @@
Функция ПредставлениеУровняБезСокращения(ИмяУровня) Экспорт
Если ИмяУровня = "MunDistrict" ИЛИ ИмяУровня = "Settlement" Тогда
Если СтрСравнить(ИмяУровня, "MunDistrict") = 0 Или СтрСравнить(ИмяУровня, "Settlement") = 0 Тогда
Возврат Истина;
КонецЕсли;
SSL/src/CommonModules/РаботаСФайламиСлужебный/Module.bsl
+2 -2
View File
@@ -2685,9 +2685,9 @@
Обработчик.Идентификатор = Новый УникальныйИдентификатор("5137a43e-75aa-4a68-ba2f-525a3a646af8");
Обработчик.Процедура = "РегистрыСведений.СведенияОФайлах.ОбработатьДанныеДляПереходаНаНовуюВерсию";
Обработчик.РежимВыполнения = "Отложенно";
Обработчик.ЧитаемыеОбъекты = РегистрыСведений.СведенияОФайлах.ОбновляемыеОбъекты();
Обработчик.ЧитаемыеОбъекты = "Справочник.Файлы";
Обработчик.ИзменяемыеОбъекты = "РегистрСведений.СведенияОФайлах";
Обработчик.БлокируемыеОбъекты = РегистрыСведений.СведенияОФайлах.ОбновляемыеОбъекты();
Обработчик.БлокируемыеОбъекты = "Справочник.Файлы";
Обработчик.ОчередьОтложеннойОбработки = 4;
Обработчик.ПроцедураЗаполненияДанныхОбновления = "РегистрыСведений.СведенияОФайлах.ЗарегистрироватьДанныеКОбработкеДляПереходаНаНовуюВерсию";
Обработчик.ПроцедураПроверки = "ОбновлениеИнформационнойБазы.ДанныеОбновленыНаНовуюВерсиюПрограммы";
SSL/src/CommonModules/СтандартныеПодсистемыКлиентСервер/Module.bsl
+15 -1
View File
@@ -100,7 +100,21 @@
Число = Ячейка.Значение;
ИначеЕсли ЗначениеЗаполнено(Ячейка.Текст) Тогда
ОписаниеТипаЧисло = Новый ОписаниеТипов("Число");
Число = ОписаниеТипаЧисло.ПривестиЗначение(Ячейка.Текст);
ТекстЯчейки = Ячейка.Текст;
Если СтрНачинаетсяС(ТекстЯчейки, "(")
И СтрЗаканчиваетсяНа(ТекстЯчейки, ")") Тогда
ТекстЯчейки = СтрЗаменить(ТекстЯчейки, "(", "");
ТекстЯчейки = СтрЗаменить(ТекстЯчейки, ")", "");
Число = ОписаниеТипаЧисло.ПривестиЗначение(ТекстЯчейки);
Если Число > 0 Тогда
Число = -Число;
КонецЕсли;
Иначе
Число = ОписаниеТипаЧисло.ПривестиЗначение(ТекстЯчейки);
КонецЕсли;
Иначе
Продолжить;
КонецЕсли;
SSL/src/CommonModules/УправлениеДоступомСлужебный/Module.bsl
+38 -9
View File
@@ -13656,7 +13656,6 @@
КонецЦикла;
Если Не ЧтениеРазрешеноДляВсехГруппДоступа
И Не ИзменениеДобавлениеРазрешеноДляВсехГруппДоступа
Или ПараметрыОбновления.ЕстьЗависимыеСпискиБезЗаписиКлючейДоступа
И Не ПараметрыОбновления.ЧтениеРазрешеноДляВсехПользователей Тогда
@@ -16707,7 +16706,7 @@
Отбор = Новый Структура("ЕстьЗависимыеСпискиБезЗаписиКлючейДоступа", Истина);
Строки = ТаблицаСвойств.НайтиСтроки(Отбор);
Для Каждого Строка Из Строки Цикл
СпискиСЗаписьюКлючейДляЗависимыхСписковБезКлючей.Вставить(Строка.ПолноеИмя, Истина);
СпискиСЗаписьюКлючейДляЗависимыхСписковБезКлючей.Вставить(Строка.ПолноеИмя, Ложь);
КонецЦикла;
ДополнительныйКонтекст = Контекст.ДополнительныйКонтекст;
ДополнительныйКонтекст.СпискиСОтключеннымОграничениемЧтения = СпискиСОтключеннымОграничениемЧтения;
@@ -16761,6 +16760,10 @@
СвойстваСписка.Параметры =
ПараметрыОграниченияДляВидаПользователей(СвойстваСписка.ПолноеИмя, Контекст);
Если СпискиСЗаписьюКлючейДляЗависимыхСписковБезКлючей.Получить(СвойстваСписка.ПолноеИмя) = Ложь Тогда
СпискиСЗаписьюКлючейДляЗависимыхСписковБезКлючей.Вставить(СвойстваСписка.ПолноеИмя, Истина);
КонецЕсли;
ВедущиеСписки = СвойстваСписка.Параметры.ВедущиеСписки.ПоКлючамДоступа;
Если ВедущиеСписки.Количество() = СвойстваСписка.Ведущие.Количество() Тогда
Продолжить;
@@ -16842,8 +16845,10 @@
Если СвойстваСписка.Параметры.ОграничениеОтключено Тогда
СпискиСОтключеннымОграничением.Вставить(ПолноеИмя, Истина);
КонецЕсли;
УстановитьСвойствоОграничения(ПолноеИмя, "ЕстьЗависимыеСпискиБезЗаписиКлючейДоступа",
СвойстваСписка.Параметры.ЕстьЗависимыеСпискиБезЗаписиКлючейДоступа, Контекст);
Если СпискиСЗаписьюКлючейДляЗависимыхСписковБезКлючей.Получить(СвойстваСписка.ПолноеИмя) = Ложь Тогда
ОбновитьВерсиюПараметров = Истина;
СпискиСЗаписьюКлючейДляЗависимыхСписковБезКлючей.Вставить(СвойстваСписка.ПолноеИмя, Истина);
КонецЕсли;
УстановитьСвойствоОграничения(ПолноеИмя, "ИспользуемыеТипыЗначенийДоступа",
Новый ХранилищеЗначения(СвойстваСписка.Параметры.ИспользуемыеТипыЗначенийДоступа), Контекст);
@@ -17013,7 +17018,6 @@
Свойства.Вставить("ОграничениеВШаблонахЧерезКлючиДоступаПользователей", Ложь);
Свойства.Вставить("ОграничениеВШаблонахЧерезКлючиДоступаПользователейИГруппДоступа", Ложь);
Свойства.Вставить("ИспользуемыеТипыЗначенийДоступа", Неопределено);
Свойства.Вставить("ЕстьЗависимыеСпискиБезЗаписиКлючейДоступа", Ложь);
Если ДобавлятьВКоллекцию Тогда
Контекст.СвойстваОграниченияСписков.Вставить(ПолноеИмя, Свойства);
КонецЕсли;
@@ -17414,11 +17418,11 @@
// Опорные поля не требуется для ссылочных типов данных (всегда Ссылка).
ЗаполнитьНовоеОписаниеОпорныхПолей(Результат, Контекст);
Свойства = СвойстваОграниченияСписка(Контекст.Список, Контекст);
Если Свойства <> Неопределено Тогда
Если Контекст.СпискиСЗаписьюКлючейДляЗависимыхСписковБезКлючей <> Неопределено Тогда
Свойства = СвойстваОграниченияСписка(Контекст.Список, Контекст);
Результат.ИспользуетсяОграничениеПоВладельцу = Свойства.ПолеВладельца <> Неопределено;
Результат.РассчитыватьПраваПользователей = Свойства.РассчитыватьПраваПользователей;
Если Свойства.ЕстьЗависимыеСпискиБезЗаписиКлючейДоступа Тогда
Если Контекст.СпискиСЗаписьюКлючейДляЗависимыхСписковБезКлючей.Получить(Список) <> Неопределено Тогда
Результат.ЕстьЗависимыеСпискиБезЗаписиКлючейДоступа = Истина;
ОбъектМетаданных = Метаданные.НайтиПоПолномуИмени(Список);
Результат.ЧтениеРазрешеноДляВсехПользователей =
@@ -20235,7 +20239,7 @@
| И &УсловиеОтбора
|ИТОГИ ПО
| КлючДоступа";
Иначе
ИначеЕсли Не Контекст.ДляВнешнихПользователей Тогда
ТекстЗапроса =
"ВЫБРАТЬ
| ПраваНаКлючиДоступа.КлючДоступа КАК КлючДоступа,
@@ -20260,6 +20264,31 @@
| И &УсловиеОтбора
|ИТОГИ ПО
| КлючДоступа";
Иначе
ТекстЗапроса =
"ВЫБРАТЬ
| ПраваНаКлючиДоступа.КлючДоступа КАК КлючДоступа,
| ПраваНаКлючиДоступа.ГруппаДоступа КАК ВладелецПрав,
| ПраваНаКлючиДоступа.Изменение КАК Изменение
|ИЗ
| РегистрСведений.КлючиДоступаГруппДоступа КАК ПраваНаКлючиДоступа
|ГДЕ
| &УсловиеОтбора
|
|ОБЪЕДИНИТЬ ВСЕ
|
|ВЫБРАТЬ
| ПраваНаКлючиДоступа.КлючДоступа,
| ПраваНаКлючиДоступа.ВнешнийПользователь.Пользователь,
| ПраваНаКлючиДоступа.Изменение
|ИЗ
| РегистрСведений.КлючиДоступаВнешнихПользователей КАК ПраваНаКлючиДоступа
|ГДЕ
| ПраваНаКлючиДоступа.ЭтоПраваНабораГрупп = ЛОЖЬ
| И ЕСТЬNULL(ПраваНаКлючиДоступа.ВнешнийПользователь.Пользователь, ЗНАЧЕНИЕ(Справочник.Пользователи.ПустаяСсылка)) <> ЗНАЧЕНИЕ(Справочник.Пользователи.ПустаяСсылка)
| И &УсловиеОтбора
|ИТОГИ ПО
| КлючДоступа";
КонецЕсли;
ТекстЗапроса = СтрЗаменить(ТекстЗапроса, "&УсловиеОтбора",
SSL/src/CommonModules/УправлениеЭлектроннойПочтой/Module.bsl
+2 -2
View File
@@ -2659,8 +2659,8 @@
"ВЫБРАТЬ РАЗРЕШЕННЫЕ ПЕРВЫЕ 1
| УчетныеЗаписиЭлектроннойПочты.Ссылка КАК Ссылка
|ИЗ
| РегистрСведений.НастройкиУчетныхЗаписейЭлектроннойПочты КАК НастройкиУчетныхЗаписейЭлектроннойПочты
| ЛЕВОЕ СОЕДИНЕНИЕ Справочник.УчетныеЗаписиЭлектроннойПочты КАК УчетныеЗаписиЭлектроннойПочты
| Справочник.УчетныеЗаписиЭлектроннойПочты КАК УчетныеЗаписиЭлектроннойПочты
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.НастройкиУчетныхЗаписейЭлектроннойПочты КАК НастройкиУчетныхЗаписейЭлектроннойПочты
| ПО НастройкиУчетныхЗаписейЭлектроннойПочты.УчетнаяЗаписьЭлектроннойПочты = УчетныеЗаписиЭлектроннойПочты.Ссылка
|ГДЕ
| УчетныеЗаписиЭлектроннойПочты.ИспользоватьДляОтправки
SSL/src/CommonModules/ШаблоныСообщенийСлужебный/Module.bsl
+2 -2
View File
@@ -185,8 +185,8 @@
МодульВзаимодействия = ОбщегоНазначения.ОбщийМодуль("Взаимодействия");
Если МодульВзаимодействия.ИспользуетсяПочтовыйКлиент() Тогда
МодульВзаимодействия.СоздатьПисьмо(Сообщение, УчетнаяЗапись);
Результат.Отправлено = Истина;
РезультатОтправки = МодульВзаимодействия.СоздатьПисьмо(Сообщение, УчетнаяЗапись);
ЗаполнитьЗначенияСвойств(Результат, РезультатОтправки);
Возврат Результат;
КонецЕсли;
SSL/src/Configuration/Configuration.mdo
+10 -10
View File
@@ -1,17 +1,17 @@
<?xml version="1.0" encoding="UTF-8"?>
<mdclass:Configuration xmlns:mdclass="http://g5.1c.ru/v8/dt/metadata/mdclass" uuid="0acdf3c7-5394-41cb-a141-e11bf2c99fe7">
<mdclass:Configuration xmlns:mdclass="http://g5.1c.ru/v8/dt/metadata/mdclass" uuid="3d15bc95-fadb-43d7-8454-e316748347bd">
<name>БиблиотекаСтандартныхПодсистем</name>
<synonym>
<key>ru</key>
<value>Библиотека стандартных подсистем, редакция 3.0</value>
</synonym>
<containedObjects classId="9cd510cd-abfc-11d4-9434-004095e12fc7" objectId="48a80455-5e70-4848-89eb-0458ca4f841c"/>
<containedObjects classId="9fcd25a0-4822-11d4-9414-008048da11f9" objectId="2feb6c5f-8a29-4001-8b53-1865fa0a8ac4"/>
<containedObjects classId="e3687481-0a87-462c-a166-9f34594f9bba" objectId="019ecccc-1760-4521-ad0d-68f71aaac717"/>
<containedObjects classId="9de14907-ec23-4a07-96f0-85521cb6b53b" objectId="7b9c5943-4b0f-4cf5-99d2-201ae9db43e5"/>
<containedObjects classId="51f2d5d8-ea4d-4064-8892-82951750031e" objectId="50b50895-1e4e-430c-98a2-889997a25317"/>
<containedObjects classId="e68182ea-4237-4383-967f-90c1e3370bc7" objectId="e54bc794-5984-452a-bf04-4528525ef924"/>
<containedObjects classId="fb282519-d103-4dd3-bc12-cb271d631dfc" objectId="2eac86c1-10da-4517-8e97-b90a0cc22547"/>
<containedObjects classId="9cd510cd-abfc-11d4-9434-004095e12fc7" objectId="76aa36ee-4a2d-43b0-b3eb-dbc7b07ad55f"/>
<containedObjects classId="9fcd25a0-4822-11d4-9414-008048da11f9" objectId="24fe4caf-3d8f-46cb-82d0-caf36a28b2d7"/>
<containedObjects classId="e3687481-0a87-462c-a166-9f34594f9bba" objectId="16b0d05f-38fb-4477-bc3a-d0a304d1ba97"/>
<containedObjects classId="9de14907-ec23-4a07-96f0-85521cb6b53b" objectId="5b324a9f-3ec9-41cb-9db7-2e2a6c604451"/>
<containedObjects classId="51f2d5d8-ea4d-4064-8892-82951750031e" objectId="a5d86abc-1f3b-4522-b679-faa962d35a7f"/>
<containedObjects classId="e68182ea-4237-4383-967f-90c1e3370bc7" objectId="3dcfb8e1-00b2-4ac0-8ea0-d9a07f30f629"/>
<containedObjects classId="fb282519-d103-4dd3-bc12-cb271d631dfc" objectId="3ce303d5-db31-47cc-a27d-780d2c90bb53"/>
<defaultRunMode>ManagedApplication</defaultRunMode>
<usePurposes>PersonalComputer</usePurposes>
<scriptVariant>Russian</scriptVariant>
@@ -19,7 +19,7 @@
<defaultRoles>Role.АдминистраторСистемы</defaultRoles>
<defaultRoles>Role.ИнтерактивноеОткрытиеВнешнихОтчетовИОбработок</defaultRoles>
<vendor>Фирма &quot;1С&quot;</vendor>
<version>3.0.1.261</version>
<version>3.0.1.274</version>
<updateCatalogAddress>http://downloads.v8.1c.ru/tmplts/</updateCatalogAddress>
<includeHelpInContents>true</includeHelpInContents>
<usedMobileApplicationFunctionalities>
@@ -967,7 +967,7 @@
<xDTOPackages>XDTOPackage.EnterpriseData_1_3_8</xDTOPackages>
<xDTOPackages>XDTOPackage.EnterpriseData_1_4_4</xDTOPackages>
<xDTOPackages>XDTOPackage.EnterpriseData_1_5_2</xDTOPackages>
<xDTOPackages>XDTOPackage.EnterpriseData_1_6_1</xDTOPackages>
<xDTOPackages>XDTOPackage.EnterpriseData_1_6_2</xDTOPackages>
<xDTOPackages>XDTOPackage.EnterpriseDataExchange_1_0_1_1</xDTOPackages>
<xDTOPackages>XDTOPackage.ExchangeMessage</xDTOPackages>
<xDTOPackages>XDTOPackage.Patch</xDTOPackages>
SSL/src/Configuration/ParentConfigurations.bin
+1 -1
View File
@@ -1 +1 @@
{6,1,1,9cdaa067-6c3d-495b-bbbf-375b87300f45,1,bd9d44f9-b7f4-450e-b1ea-1752ca9db323,"3.0.1.261","Фирма ""1С""","БиблиотекаСтандартныхПодсистем",5875,1,0,0acdf3c7-5394-41cb-a141-e11bf2c99fe7,0acdf3c7-5394-41cb-a141-e11bf2c99fe7,1,0,db4a9ccb-9ef5-4b3c-8577-b6fe5db1b62e,db4a9ccb-9ef5-4b3c-8577-b6fe5db1b62e,1,0,9233322b-dfdb-4c66-91fe-1299292d40a5,9233322b-dfdb-4c66-91fe-1299292d40a5,1,0,7795348b-2f52-47f7-bf00-e11e5e795a43,7795348b-2f52-47f7-bf00-e11e5e795a43,1,0,0421b67e-ed26-491d-ab98-ec59002ed4ce,0421b67e-ed26-491d-ab98-ec59002ed4ce,1,0,bb47ced2-31f9-4870-8633-20b986e53ccc,bb47ced2-31f9-4870-8633-20b986e53ccc,1,0,7d8acec9-f5a9-411e-921c-446ed0dd3332,7d8acec9-f5a9-411e-921c-446ed0dd3332,1,0,739c01a9-1125-45ef-ab4e-8c73af4eeff0,739c01a9-1125-45ef-ab4e-8c73af4eeff0,1,0,cdbd26b1-9583-46e8-adf7-8cc705639892,cdbd26b1-9583-46e8-adf7-8cc705639892,1,0,c0e38c3e-7088-4e35-9d84-2d0ab9655402,c0e38c3e-7088-4e35-9d84-2d0ab9655402,1,0,1098786f-dd24-4cce-b212-be0cb5f01735,1098786f-dd24-4cce-b212-be0cb5f01735,1,0,3c0037f3-4422-4836-b116-8c72e32bdd55,3c0037f3-4422-4836-b116-8c72e32bdd55,1,0,6f7c6c31-206b-4010-bdad-1ad2e304f154,6f7c6c31-206b-4010-bdad-1ad2e304f154,1,0,a8659e53-8c6b-4b0c-9736-fe93a91e4d69,a8659e53-8c6b-4b0c-9736-fe93a91e4d69,1,0,fe9a1d1a-19c0-499f-8e1b-09cadabe882f,fe9a1d1a-19c0-499f-8e1b-09cadabe882f,1,0,5b68d479-7880-44de-84e3-7f578b43f0dc,5b68d479-7880-44de-84e3-7f578b43f0dc,1,0,bf9ca98c-5c95-4cfb-9181-8c1d847f9fbb,bf9ca98c-5c95-4cfb-9181-8c1d847f9fbb,1,0,b4629308-42de-4ce8-8591-cf0c2399a9a2,b4629308-42de-4ce8-8591-cf0c2399a9a2,1,0,c7e984ae-1dbb-4041-b18a-bfd0d63a002f,c7e984ae-1dbb-4041-b18a-bfd0d63a002f,1,0,bb0424b8-dfd1-4a27-bd66-9dea3ffc77c4,bb0424b8-dfd1-4a27-bd66-9dea3ffc77c4,1,0,a4ac0a50-ee39-4dc1-b84f-eec8fe485f03,a4ac0a50-ee39-4dc1-b84f-eec8fe485f03,1,0,1861ee4f-fd8c-4afa-8441-c074bf51f67e,1861ee4f-fd8c-4afa-8441-c074bf51f67e,1,0,de7ed8f7-3c02-47e0-aea8-4747ac68a5d5,de7ed8f7-3c02-47e0-aea8-4747ac68a5d5,1,0,b93b8760-6200-40ee-8bdc-875ba80a6155,b93b8760-6200-40ee-8bdc-875ba80a6155,1,0,c27472ee-879a-4746-9d21-122738ec80b7,c27472ee-879a-4746-9d21-122738ec80b7,1,0,e8b248d9-9049-456a-9c7d-7a0462cc67ab,e8b248d9-9049-456a-9c7d-7a0462cc67ab,1,0,d4562287-440d-4462-9de2-7097ccbf3764,d4562287-440d-4462-9de2-7097ccbf3764,1,0,ec797c75-02c5-4cf5-9dd4-26cd46c99519,ec797c75-02c5-4cf5-9dd4-26cd46c99519,1,0,6fccdf59-fc99-4a2b-a144-fffe438a147c,6fccdf59-fc99-4a2b-a144-fffe438a147c,1,0,af8bd73a-d8e8-487d-8f36-d835ab10ea3a,af8bd73a-d8e8-487d-8f36-d835ab10ea3a,1,0,08a413ff-bebd-42e5-8ff3-2115746a0844,08a413ff-bebd-42e5-8ff3-2115746a0844,1,0,da9b32e6-5b93-45a6-84b2-238d57541e18,da9b32e6-5b93-45a6-84b2-238d57541e18,1,0,e43d69c8-b284-47da-b236-611bc94a15b6,e43d69c8-b284-47da-b236-611bc94a15b6,1,0,31eeaa05-6c49-41fe-b840-1edbad4ccac7,31eeaa05-6c49-41fe-b840-1edbad4ccac7,1,0,842c8662-8f39-405e-9665-cbdabc116159,842c8662-8f39-405e-9665-cbdabc116159,1,0,fca4b033-02c4-4d61-9e51-87783c3cef1a,fca4b033-02c4-4d61-9e51-87783c3cef1a,1,0,396ef757-d7f6-411f-8c4c-1acb1106a009,396ef757-d7f6-411f-8c4c-1acb1106a009,1,0,839e29b1-a0d2-40fa-9f3e-46e66b943358,839e29b1-a0d2-40fa-9f3e-46e66b943358,1,0,c56d2cc7-630a-441b-b23f-ba78c34849bd,c56d2cc7-630a-441b-b23f-ba78c34849bd,1,0,9aecf4f5-46ed-4d1c-a584-cd028e467895,9aecf4f5-46ed-4d1c-a584-cd028e467895,1,0,21d92c2f-6c78-43ce-b1f4-59d7845b5a91,21d92c2f-6c78-43ce-b1f4-59d7845b5a91,1,0,a1c379be-43d3-4e02-83bb-d2e7de2d4ae3,a1c379be-43d3-4e02-83bb-d2e7de2d4ae3,1,0,a1f10624-22e9-4a04-b370-fd085bdd0f67,a1f10624-22e9-4a04-b370-fd085bdd0f67,1,0,2a4b10be-3cd7-4755-905f-7b4d02ff6a22,2a4b10be-3cd7-4755-905f-7b4d02ff6a22,1,0,3cffb795-2a28-4beb-92f4-5813f5994022,3cffb795-2a28-4beb-92f4-5813f5994022,1,0,3323ca68-1382-4710-a933-23fc56588935,3323ca68-1382-4710-a933-23fc56588935,1,0,d6b12775-3255-42b8-88b2-62684f873e7d,d6b12775-3255-42b8-88b2-62684f873e7d,1,0,cc23d903-ccc5-42f4-862f-5e7278c4e346,cc23d903-ccc5-42f4-862f-5e7278c4e346,1,0,98f033e0-fa40-46e0-b51a-87a066749a35,98f033e0-fa40-46e0-b51a-87a066749a35,1,0,e8b4cb2d-1180-4101-954a-4cb5464f198c,e8b4cb2d-1180-4101-954a-4cb5464f198c,1,0,a379287d-1ce8-460d-a503-910e728e28f1,a379287d-1ce8-460d-a503-910e728e28f1,1,0,f765c4ba-c677-42ac-8d0c-43bb485405b9,f765c4ba-c677-42ac-8d0c-43bb485405b9,1,0,83192b3e-e7a9-4595-8887-24cda84457a9,83192b3e-e7a9-4595-8887-24cda84457a9,1,0,2fd1287d-d96d-4480-baf7-8815ae5ffbfb,2fd1287d-d96d-4480-baf7-8815ae5ffbfb,1,0,c8a4c5da-bc88-4f6e-9787-1c22c2f41be7,c8a4c5da-bc88-4f6e-9787-1c22c2f41be7,1,0,08eeb8f1-944f-4450-83f6-ef20aaab7d86,08eeb8f1-944f-4450-83f6-ef20aaab7d86,1,0,d8c58e53-b7b9-4426-bdfa-d0816adf8cc1,d8c58e53-b7b9-4426-bdfa-d0816adf8cc1,1,0,8d77dd4a-e646-4105-8dcf-8ce8fc3da0b4,8d77dd4a-e646-4105-8dcf-8ce8fc3da0b4,1,0,2fd12dba-5311-4f31-949c-f6b15decc0cc,2fd12dba-5311-4f31-949c-f6b15decc0cc,1,0,d7cf3981-cf63-4a21-868b-8175a7704a8f,d7cf3981-cf63-4a21-868b-8175a7704a8f,1,0,35895e12-52b6-49a1-acdf-6d828a948af0,35895e12-52b6-49a1-acdf-6d828a948af0,1,0,0ae93712-74e8-41c7-8f2d-4dfc8983697d,0ae93712-74e8Line truncated
{6,1,1,090a9ef9-bb5d-416b-8dd6-664feabd7250,1,f458eb5b-d168-49a2-859e-fb757aa90710,"3.0.1.274","Фирма ""1С""","БиблиотекаСтандартныхПодсистем",5875,1,0,3d15bc95-fadb-43d7-8454-e316748347bd,3d15bc95-fadb-43d7-8454-e316748347bd,1,0,db4a9ccb-9ef5-4b3c-8577-b6fe5db1b62e,db4a9ccb-9ef5-4b3c-8577-b6fe5db1b62e,1,0,9233322b-dfdb-4c66-91fe-1299292d40a5,9233322b-dfdb-4c66-91fe-1299292d40a5,1,0,7795348b-2f52-47f7-bf00-e11e5e795a43,7795348b-2f52-47f7-bf00-e11e5e795a43,1,0,0421b67e-ed26-491d-ab98-ec59002ed4ce,0421b67e-ed26-491d-ab98-ec59002ed4ce,1,0,bb47ced2-31f9-4870-8633-20b986e53ccc,bb47ced2-31f9-4870-8633-20b986e53ccc,1,0,7d8acec9-f5a9-411e-921c-446ed0dd3332,7d8acec9-f5a9-411e-921c-446ed0dd3332,1,0,739c01a9-1125-45ef-ab4e-8c73af4eeff0,739c01a9-1125-45ef-ab4e-8c73af4eeff0,1,0,cdbd26b1-9583-46e8-adf7-8cc705639892,cdbd26b1-9583-46e8-adf7-8cc705639892,1,0,c0e38c3e-7088-4e35-9d84-2d0ab9655402,c0e38c3e-7088-4e35-9d84-2d0ab9655402,1,0,1098786f-dd24-4cce-b212-be0cb5f01735,1098786f-dd24-4cce-b212-be0cb5f01735,1,0,3c0037f3-4422-4836-b116-8c72e32bdd55,3c0037f3-4422-4836-b116-8c72e32bdd55,1,0,6f7c6c31-206b-4010-bdad-1ad2e304f154,6f7c6c31-206b-4010-bdad-1ad2e304f154,1,0,a8659e53-8c6b-4b0c-9736-fe93a91e4d69,a8659e53-8c6b-4b0c-9736-fe93a91e4d69,1,0,fe9a1d1a-19c0-499f-8e1b-09cadabe882f,fe9a1d1a-19c0-499f-8e1b-09cadabe882f,1,0,5b68d479-7880-44de-84e3-7f578b43f0dc,5b68d479-7880-44de-84e3-7f578b43f0dc,1,0,bf9ca98c-5c95-4cfb-9181-8c1d847f9fbb,bf9ca98c-5c95-4cfb-9181-8c1d847f9fbb,1,0,b4629308-42de-4ce8-8591-cf0c2399a9a2,b4629308-42de-4ce8-8591-cf0c2399a9a2,1,0,c7e984ae-1dbb-4041-b18a-bfd0d63a002f,c7e984ae-1dbb-4041-b18a-bfd0d63a002f,1,0,bb0424b8-dfd1-4a27-bd66-9dea3ffc77c4,bb0424b8-dfd1-4a27-bd66-9dea3ffc77c4,1,0,a4ac0a50-ee39-4dc1-b84f-eec8fe485f03,a4ac0a50-ee39-4dc1-b84f-eec8fe485f03,1,0,1861ee4f-fd8c-4afa-8441-c074bf51f67e,1861ee4f-fd8c-4afa-8441-c074bf51f67e,1,0,de7ed8f7-3c02-47e0-aea8-4747ac68a5d5,de7ed8f7-3c02-47e0-aea8-4747ac68a5d5,1,0,b93b8760-6200-40ee-8bdc-875ba80a6155,b93b8760-6200-40ee-8bdc-875ba80a6155,1,0,c27472ee-879a-4746-9d21-122738ec80b7,c27472ee-879a-4746-9d21-122738ec80b7,1,0,e8b248d9-9049-456a-9c7d-7a0462cc67ab,e8b248d9-9049-456a-9c7d-7a0462cc67ab,1,0,d4562287-440d-4462-9de2-7097ccbf3764,d4562287-440d-4462-9de2-7097ccbf3764,1,0,ec797c75-02c5-4cf5-9dd4-26cd46c99519,ec797c75-02c5-4cf5-9dd4-26cd46c99519,1,0,6fccdf59-fc99-4a2b-a144-fffe438a147c,6fccdf59-fc99-4a2b-a144-fffe438a147c,1,0,af8bd73a-d8e8-487d-8f36-d835ab10ea3a,af8bd73a-d8e8-487d-8f36-d835ab10ea3a,1,0,08a413ff-bebd-42e5-8ff3-2115746a0844,08a413ff-bebd-42e5-8ff3-2115746a0844,1,0,da9b32e6-5b93-45a6-84b2-238d57541e18,da9b32e6-5b93-45a6-84b2-238d57541e18,1,0,e43d69c8-b284-47da-b236-611bc94a15b6,e43d69c8-b284-47da-b236-611bc94a15b6,1,0,31eeaa05-6c49-41fe-b840-1edbad4ccac7,31eeaa05-6c49-41fe-b840-1edbad4ccac7,1,0,842c8662-8f39-405e-9665-cbdabc116159,842c8662-8f39-405e-9665-cbdabc116159,1,0,fca4b033-02c4-4d61-9e51-87783c3cef1a,fca4b033-02c4-4d61-9e51-87783c3cef1a,1,0,396ef757-d7f6-411f-8c4c-1acb1106a009,396ef757-d7f6-411f-8c4c-1acb1106a009,1,0,839e29b1-a0d2-40fa-9f3e-46e66b943358,839e29b1-a0d2-40fa-9f3e-46e66b943358,1,0,c56d2cc7-630a-441b-b23f-ba78c34849bd,c56d2cc7-630a-441b-b23f-ba78c34849bd,1,0,9aecf4f5-46ed-4d1c-a584-cd028e467895,9aecf4f5-46ed-4d1c-a584-cd028e467895,1,0,21d92c2f-6c78-43ce-b1f4-59d7845b5a91,21d92c2f-6c78-43ce-b1f4-59d7845b5a91,1,0,a1c379be-43d3-4e02-83bb-d2e7de2d4ae3,a1c379be-43d3-4e02-83bb-d2e7de2d4ae3,1,0,a1f10624-22e9-4a04-b370-fd085bdd0f67,a1f10624-22e9-4a04-b370-fd085bdd0f67,1,0,2a4b10be-3cd7-4755-905f-7b4d02ff6a22,2a4b10be-3cd7-4755-905f-7b4d02ff6a22,1,0,3cffb795-2a28-4beb-92f4-5813f5994022,3cffb795-2a28-4beb-92f4-5813f5994022,1,0,3323ca68-1382-4710-a933-23fc56588935,3323ca68-1382-4710-a933-23fc56588935,1,0,d6b12775-3255-42b8-88b2-62684f873e7d,d6b12775-3255-42b8-88b2-62684f873e7d,1,0,cc23d903-ccc5-42f4-862f-5e7278c4e346,cc23d903-ccc5-42f4-862f-5e7278c4e346,1,0,98f033e0-fa40-46e0-b51a-87a066749a35,98f033e0-fa40-46e0-b51a-87a066749a35,1,0,e8b4cb2d-1180-4101-954a-4cb5464f198c,e8b4cb2d-1180-4101-954a-4cb5464f198c,1,0,a379287d-1ce8-460d-a503-910e728e28f1,a379287d-1ce8-460d-a503-910e728e28f1,1,0,f765c4ba-c677-42ac-8d0c-43bb485405b9,f765c4ba-c677-42ac-8d0c-43bb485405b9,1,0,83192b3e-e7a9-4595-8887-24cda84457a9,83192b3e-e7a9-4595-8887-24cda84457a9,1,0,2fd1287d-d96d-4480-baf7-8815ae5ffbfb,2fd1287d-d96d-4480-baf7-8815ae5ffbfb,1,0,c8a4c5da-bc88-4f6e-9787-1c22c2f41be7,c8a4c5da-bc88-4f6e-9787-1c22c2f41be7,1,0,08eeb8f1-944f-4450-83f6-ef20aaab7d86,08eeb8f1-944f-4450-83f6-ef20aaab7d86,1,0,d8c58e53-b7b9-4426-bdfa-d0816adf8cc1,d8c58e53-b7b9-4426-bdfa-d0816adf8cc1,1,0,8d77dd4a-e646-4105-8dcf-8ce8fc3da0b4,8d77dd4a-e646-4105-8dcf-8ce8fc3da0b4,1,0,2fd12dba-5311-4f31-949c-f6b15decc0cc,2fd12dba-5311-4f31-949c-f6b15decc0cc,1,0,d7cf3981-cf63-4a21-868b-8175a7704a8f,d7cf3981-cf63-4a21-868b-8175a7704a8f,1,0,35895e12-52b6-49a1-acdf-6d828a948af0,35895e12-52b6-49a1-acdf-6d828a948af0,1,0,0ae93712-74e8-41c7-8f2d-4dfc8983697d,0ae93712-74e8Line truncated
SSL/src/DataProcessors/ЗагрузкаКурсовВалют/ManagerModule.bsl
+1 -1
View File
@@ -146,7 +146,7 @@
МодульРаботаВБезопасномРежиме.РазрешениеНаИспользованиеИнтернетРесурса(Протокол, Адрес, Порт, Описание));
Иначе
Протокол = "HTTPS";
Адрес = "bankregister.1c.ru";
Адрес = "currencyrates.1c.ru";
Порт = Неопределено;
Описание = НСтр("ru = 'Загрузка курсов валют с сайта 1С.'");
Разрешения.Добавить(
SSL/src/DataProcessors/ПомощникСозданияОбменаДанными/Forms/НастройкаПодключения/Module.bsl
+5 -3
View File
@@ -1391,8 +1391,8 @@
ПланыОбмена[ИмяПланаОбмена].ПустаяСсылка(), ИдентификаторНастройки);
Для Каждого ТекущийВидТранспорта Из ИспользуемыеТранспортыСообщенийОбмена Цикл
// В модели сервиса обмен через Интернет и Интернет-пассивное соединение
// поддерживается только для планов обмена XDTO.
// В модели сервиса поддерживается обмен только через "Интернет" и "Интернет-пассивное соединение"
// для планов обмена XDTO.
Если МодельСервиса Тогда
Если ТекущийВидТранспорта <> Перечисления.ВидыТранспортаСообщенийОбмена.WS
И ТекущийВидТранспорта <> Перечисления.ВидыТранспортаСообщенийОбмена.WSПассивныйРежим Тогда
@@ -1792,7 +1792,9 @@
Элементы.ВидПодключенияОбычныеКаналыСвязи.Видимость = ДоступныеВидыТранспорта.Свойство("FILE")
Или ДоступныеВидыТранспорта.Свойство("FTP")
Или ДоступныеВидыТранспорта.Свойство("EMAIL");
Элементы.ВидПодключенияПассивныйРежим.Видимость = ДоступныеВидыТранспорта.Свойство("WSПассивныйРежим");
Элементы.ВидПодключенияПассивныйРежим.Видимость = ДоступныеВидыТранспорта.Свойство("WSПассивныйРежим");
Элементы.ГруппаФайлНастройкиПассивныйРежим.Видимость = ДоступныеВидыТранспорта.Свойство("WSПассивныйРежим");
Элементы.ПанельСпособыНастройкиПодключения.ТекущаяСтраница = Элементы.СтраницаВидыПодключения;
ПриИзмененииВидПодключения();
SSL/src/DataProcessors/РасширенныйВводКонтактнойИнформации/Forms/ВводАдреса/Module.bsl
+84 -41
View File
@@ -37,7 +37,7 @@
ЕстьКлассификатор = СведенияОАдресномКлассификаторе["ИспользоватьЗагруженные"];
КлассификаторДоступен = СведенияОАдресномКлассификаторе["КлассификаторДоступен"];
ВебСервисИспользуется = КлассификаторДоступен;
АвтоподборДоступен = КлассификаторДоступен Или ЕстьКлассификатор;
АвтоподборДоступен = КлассификаторДоступен Или ЕстьКлассификатор;
ЕстьПравоЗагружатьКлассификатор = Обработки.РасширенныйВводКонтактнойИнформации.ЕстьВозможностьИзмененияАдресногоКлассификатора();
Параметры.Свойство("ВозвращатьСписокЗначений", ВозвращатьСписокЗначений);
@@ -256,6 +256,12 @@
&НаКлиенте
Процедура СтранаОбработкаВыбора(Элемент, ВыбранноеЗначение, СтандартнаяОбработка)
Если ТипЗнч(ВыбранноеЗначение) = Тип("Структура") И ВыбранноеЗначение.Свойство("Код") Тогда
НаселенныйПунктДетально.CountryCode = ВыбранноеЗначение.Код;
Иначе
НаселенныйПунктДетально.CountryCode = КодСтраны(ВыбранноеЗначение);
КонецЕсли;
УправлениеКонтактнойИнформациейКлиент.СтранаМираОбработкаВыбора(Элемент, ВыбранноеЗначение, СтандартнаяОбработка);
КонецПроцедуры
@@ -611,8 +617,8 @@
Если ЕстьПравоЗагружатьКлассификатор И ВыбранноеЗначение.ПредлагатьЗагрузкуКлассификатора = Истина Тогда
// Предлагаем загрузить классификатор.
ПредложениеЗагрузкиКлассификатора(
СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(НСтр("ru='Данные для ""%1"" не загружены.'"), ВыбранноеЗначение.Представление),
ВыбранноеЗначение.Представление);
СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(НСтр("ru='Данные для ""%1"" не загружены.'"), ВыбранноеЗначение.Представление),
ВыбранноеЗначение);
Иначе
НаселенныйПунктУстановитьПоляАдреса(НаселенныйПунктДетально, ВыбранноеЗначение);
КонецЕсли;
@@ -623,6 +629,30 @@
КонецПроцедуры
&НаКлиенте
Процедура НаселенныйПунктАвтоПодбор(Элемент, Текст, ДанныеВыбора, ПараметрыПолученияДанных, Ожидание, СтандартнаяОбработка)
ДанныеВыбора = Новый СписокЗначений;
ТекстДляАвтоПодбора = СокрЛП(Текст);
Если СтрДлина(ТекстДляАвтоПодбора) < 3 Тогда
// Нет вариантов, список пуст, стандартную обработку не надо трогать.
Возврат;
КонецЕсли;
Результат = СписокАвтоподбораНаселенногоПункта(ТекстДляАвтоПодбора);
Если Результат.Отказ Тогда
Возврат;
КонецЕсли;
ДанныеВыбора = Результат.Данные;
// Стандартную обработку отключаем, только если есть наши варианты.
Если ДанныеВыбора.Количество() > 0 Тогда
СтандартнаяОбработка = Ложь;
КонецЕсли;
КонецПроцедуры
&НаКлиенте
Процедура УлицаПриИзменении(Элемент)
@@ -645,34 +675,6 @@
КонецПроцедуры
&НаКлиенте
Процедура НаселенныйПунктАвтоПодбор(Элемент, Текст, ДанныеВыбора, ПараметрыПолученияДанных, Ожидание, СтандартнаяОбработка)
Если Не АвтоподборДоступен Тогда
Возврат;
КонецЕсли;
ДанныеВыбора = Новый СписокЗначений;
ТекстДляАвтоПодбора = СокрЛП(Текст);
Если СтрДлина(ТекстДляАвтоПодбора) < 3 Тогда
// Нет вариантов, список пуст, стандартную обработку не надо трогать.
Возврат;
КонецЕсли;
Результат = СписокАвтоподбораНаселенногоПункта(ТекстДляАвтоПодбора);
Если Результат.Отказ Тогда
Возврат;
КонецЕсли;
ДанныеВыбора = Результат.Данные;
// Стандартную обработку отключаем, только если есть наши варианты.
Если ДанныеВыбора.Количество() > 0 Тогда
СтандартнаяОбработка = Ложь;
КонецЕсли;
КонецПроцедуры
&НаКлиенте
Процедура УлицаНачалоВыбора(Элемент, ДанныеВыбора, СтандартнаяОбработка)
@@ -755,15 +757,21 @@
Возврат;
КонецЕсли;
ДополнительныеПараметры = Новый Структура;
ДополнительныеПараметры.Вставить("Идентификатор", ИдентификаторНаселенногоПункта);
ДополнительныеПараметры.Вставить("ТипАдреса", НаселенныйПунктДетально.AddressType);
ДополнительныеПараметры.Вставить("Уровень", 7);
Результат = СписокАвтоподбораУлицы(Текст, ДополнительныеПараметры);
Результат = ВариантыУлицПоТексту(Текст);
Если Результат.Отказ Тогда
Возврат;
КонецЕсли;
Если Результат.Данные.Количество() = 0 Тогда
АдаптацияИдентификатораНаселенногоПункта(ИдентификаторНаселенногоПункта);
Результат = ВариантыУлицПоТексту(Текст);
Если Результат.Отказ Тогда
Возврат;
КонецЕсли;
КонецЕсли;
ДанныеВыбора = Результат.Данные;
// Стандартную обработку отключаем, только если есть наши варианты.
@@ -1139,6 +1147,20 @@
#Область СлужебныеПроцедурыИФункции
&НаКлиенте
Функция ВариантыУлицПоТексту(Знач Текст)
ДополнительныеПараметры = Новый Структура;
ДополнительныеПараметры.Вставить("Идентификатор", ИдентификаторНаселенногоПункта);
ДополнительныеПараметры.Вставить("ТипАдреса", НаселенныйПунктДетально.AddressType);
ДополнительныеПараметры.Вставить("Уровень", 7);
Результат = СписокАвтоподбораУлицы(Текст, ДополнительныеПараметры);
Возврат Результат;
КонецФункции
&НаКлиенте
Процедура ФормаВыбораУлицПоИндексу(Знач Текст)
@@ -1634,7 +1656,16 @@
ДанныеВыбора = НаселенныйПунктДетально;
КонецЕсли;
Если ТипЗнч(ДанныеВыбора) = Тип("Структура") Тогда
Если ПустаяСтрока(ДанныеВыбора.countryCode) Тогда
СведенияОСтране = УправлениеКонтактнойИнформацией.ДанныеСтраныМира(Неопределено, ДанныеВыбора.Country);
Если СведенияОСтране <> Неопределено Тогда
ДанныеВыбора.countryCode = СведенияОСтране.Код;
КонецЕсли;
КонецЕсли;
Значение = УправлениеКонтактнойИнформациейСлужебный.СтруктураВСтрокуJSON(ДанныеВыбора);
КонтактнаяИнформация = УправлениеКонтактнойИнформациейСлужебный.КонтактнаяИнформацияИзJSONВXML(ДанныеВыбора, Контекст.ВидКонтактнойИнформации.Тип);
Иначе
@@ -1778,7 +1809,7 @@
Элементы.Улица.Заголовок = НСтр("ru='Улица'");
Элементы.ОКТМО.Видимость = ВидКонтактнойИнформации.УказыватьОКТМО;
ВебСервисИспользуется = КлассификаторДоступен;
АвтоподборДоступен = КлассификаторДоступен Или ЕстьКлассификатор;
АвтоподборДоступен = КлассификаторДоступен Или ЕстьКлассификатор;
ВидимостьСтроений = Истина;
Элементы.ГруппаДобавлениеСтроения.Видимость = Истина;
Элементы.ГруппаДобавлениеПомещения.Видимость = Истина;
@@ -2614,6 +2645,15 @@
КонецПроцедуры
&НаСервереБезКонтекста
Функция КодСтраны(Страна)
СведенияОбАдресе = УправлениеКонтактнойИнформацией.ДанныеСтраныМира(Неопределено, Строка(Страна));
Если СведенияОбАдресе <> Неопределено Тогда
Возврат СведенияОбАдресе.Код;
КонецЕсли;
Возврат 0;
КонецФункции
&НаСервере
Процедура УстановитьКлючИспользованияФормы()
@@ -2869,7 +2909,7 @@
&НаСервереБезКонтекста
Функция СписокАвтоподбораНаселенногоПункта(Текст)
ДополнительныеПараметры = Новый Структура("ТолькоВебСервис", Ложь);
ДополнительныеПараметры = Новый Структура("ТолькоВебСервис, Уровни", Ложь, "1,3,31,4,41,5,6,65");
Результат = Обработки.РасширенныйВводКонтактнойИнформации.СписокАвтоподбораНаселенногоПункта(Текст, ДополнительныеПараметры);
УправлениеКонтактнойИнформациейСлужебный.ФорматированиеРезультатовАвтоподбора(Результат.Данные, Текст);
Возврат Результат;
@@ -2937,17 +2977,20 @@
// Регион - Число, Строка - Код или название региона для загрузки.
//
&НаКлиенте
Процедура ПредложениеЗагрузкиКлассификатора(Знач Текст = "", Знач Регион = Неопределено)
Процедура ПредложениеЗагрузкиКлассификатора(Знач Текст = "", Знач ВыбранноеЗначение = Неопределено)
Если Не ОбщегоНазначенияКлиент.ПодсистемаСуществует("СтандартныеПодсистемы.АдресныйКлассификатор") Тогда
Возврат;
КонецЕсли;
Регион = ?(ВыбранноеЗначение <> Неопределено, ВыбранноеЗначение.Представление, "");
НеЗагружатьАдресныйКлассификатор = ПараметрыПриложения.Получить("АдресныйКлассификатор.НеЗагружатьКлассификатор");
Если НеЗагружатьАдресныйКлассификатор = Неопределено ИЛИ НеЗагружатьАдресныйКлассификатор = Ложь Тогда
ТипПараметраРегиона = ТипЗнч(Регион);
ПараметрыФормы = Новый Структура;
ПараметрыФормы = Новый Структура;
ПараметрыЗагрузки = Новый Структура;
ПараметрыЗагрузки.Вставить("ВыбранноеЗначение", ВыбранноеЗначение);
ПараметрыФормы.Вставить("ТекстПредупреждения", Текст);
Если ТипПараметраРегиона = Тип("Число") Тогда
SSL/src/InformationRegisters/АдресныеОбъекты/Forms/ЗагрузкаАдресногоКлассификатора/Form.form
+1 -1
View File
@@ -614,7 +614,7 @@
<titleLocation>Right</titleLocation>
<toolTip>
<key>ru</key>
<value>Загружать историю изменений адресных объектов</value>
<value>Загрузка истории переименования, переподчинения или исключения адресных сведений в адресном классификаторе. </value>
</toolTip>
<toolTipRepresentation>Button</toolTipRepresentation>
<extendedTooltip>
SSL/src/InformationRegisters/ВерсииОбъектов/ManagerModule.bsl
+14 -16
View File
@@ -370,6 +370,13 @@
ИмяТабличнойЧасти = ЭлементИзмененнаяТЧ.Ключ;
ВерсииТекущейТЧ = ЭлементИзмененнаяТЧ.Значение;
МетаданныеОбъекта = СсылкаНаОбъект.Метаданные();
ПредставлениеТабличнойЧасти = ИмяТабличнойЧасти;
ОписаниеТабличнойЧасти = ВерсионированиеОбъектов.МетаданныеТабличнойЧасти(МетаданныеОбъекта, ИмяТабличнойЧасти);
Если ОписаниеТабличнойЧасти <> Неопределено Тогда
ПредставлениеТабличнойЧасти = ОписаниеТабличнойЧасти.Представление();
КонецЕсли;
ТекущаяТабличнаяЧастьИзменилась = Ложь;
Для ТекСчетчикУникальныйИд = 1 По СчетчикУникальныйИд[ИмяТабличнойЧасти] Цикл
@@ -443,18 +450,9 @@
КонецЕсли;
// Блок для вывода шапки текущей обрабатываемой табличной части.
ОписаниеТабличнойЧасти = Неопределено;
МетаданныеОбъекта = СсылкаНаОбъект.Метаданные();
Если Не ТекущаяТабличнаяЧастьИзменилась Тогда
ТекущаяТабличнаяЧастьИзменилась = Истина;
ШаблонШапкаТекущейТЧ = ОбщийШаблон.ПолучитьОбласть("ШапкаТабличнойЧасти");
ПредставлениеТабличнойЧасти = ИмяТабличнойЧасти;
ОписаниеТабличнойЧасти = ВерсионированиеОбъектов.МетаданныеТабличнойЧасти(МетаданныеОбъекта, ИмяТабличнойЧасти);
Если ОписаниеТабличнойЧасти <> Неопределено Тогда
ПредставлениеТабличнойЧасти = ОписаниеТабличнойЧасти.Представление();
КонецЕсли;
ШаблонШапкаТекущейТЧ.Параметры.НаименованиеТабличнойЧасти = ПредставлениеТабличнойЧасти;
ТЧОтчета.Вывести(ШаблонШапкаТекущейТЧ);
ТЧОтчета.НачатьГруппуСтрок("ТабличнаяЧасть"+ИмяТабличнойЧасти);
@@ -481,17 +479,17 @@
Продолжить;
КонецЕсли;
ПредставлениеРеквизита = Колонка.Имя;
Если Не ПустаяСтрока(Колонка.Заголовок) Тогда
Если ЗначениеЗаполнено(Колонка.Заголовок) Тогда
ПредставлениеРеквизита = Колонка.Заголовок;
Иначе
Если ОписаниеТабличнойЧасти <> Неопределено Тогда
ОписаниеРеквизита = ВерсионированиеОбъектов.МетаданныеРеквизитаТабличнойЧасти(ОписаниеТабличнойЧасти, Колонка.Имя);
КонецЕсли;
Если ОписаниеРеквизита = Неопределено И Метаданные.ПланыСчетов.Содержит(МетаданныеОбъекта) Тогда
ОписаниеРеквизита = МетаданныеОбъекта.ПризнакиУчетаСубконто.Найти(Колонка.Имя);
КонецЕсли;
Если ОписаниеРеквизита <> Неопределено Тогда
ПредставлениеРеквизита = ОписаниеРеквизита.Представление();
Если ОписаниеРеквизита = Неопределено И Метаданные.ПланыСчетов.Содержит(МетаданныеОбъекта) Тогда
ОписаниеРеквизита = МетаданныеОбъекта.ПризнакиУчетаСубконто.Найти(Колонка.Имя);
КонецЕсли;
Если ОписаниеРеквизита <> Неопределено Тогда
ПредставлениеРеквизита = ОписаниеРеквизита.Представление();
КонецЕсли;
КонецЕсли;
КонецЕсли;
МассивЗаполнения.Добавить(ПредставлениеРеквизита);
SSL/src/InformationRegisters/СведенияОФайлах/ManagerModule.bsl
-16
View File
@@ -118,20 +118,4 @@
#КонецОбласти
#Область СлужебныеПроцедурыИФункции
Функция ОбновляемыеОбъекты() Экспорт
Объекты = Новый Массив;
Для Каждого ТипПрисоединенногоФайла Из Метаданные.ОпределяемыеТипы.ПрисоединенныйФайл.Тип.Типы() Цикл
Объекты.Добавить(Метаданные.НайтиПоТипу(ТипПрисоединенногоФайла).ПолноеИмя());
КонецЦикла;
Возврат СтрСоединить(Объекты, ", ");
КонецФункции
#КонецОбласти
#КонецЕсли
SSL/src/Roles/АдминистраторСистемы/Rights.rights
+87 -87
View File
@@ -178,93 +178,6 @@
<value>true</value>
</right>
</object>
<object>
<name>Configuration.БиблиотекаСтандартныхПодсистем</name>
<right>
<name>Administration</name>
<value>true</value>
</right>
<right>
<name>DataAdministration</name>
<value>true</value>
</right>
<right>
<name>UpdateDataBaseConfiguration</name>
<value>true</value>
</right>
<right>
<name>ExclusiveMode</name>
<value>true</value>
</right>
<right>
<name>ActiveUsers</name>
<value>true</value>
</right>
<right>
<name>EventLog</name>
<value>true</value>
</right>
<right>
<name>ThinClient</name>
<value>true</value>
</right>
<right>
<name>WebClient</name>
<value>true</value>
</right>
<right>
<name>ThickClient</name>
<value>true</value>
</right>
<right>
<name>ExternalConnection</name>
<value>true</value>
</right>
<right>
<name>Automation</name>
<value>true</value>
</right>
<right>
<name>TechnicalSpecialistMode</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeNormal</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeWorkplace</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeEmbeddedWorkplace</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeFullscreenWorkplace</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeKiosk</name>
<value>true</value>
</right>
<right>
<name>AnalyticsSystemClient</name>
<value>true</value>
</right>
<right>
<name>SaveUserData</name>
<value>true</value>
</right>
<right>
<name>ConfigurationExtensionsAdministration</name>
<value>true</value>
</right>
<right>
<name>Output</name>
<value>true</value>
</right>
</object>
<object>
<name>InformationRegister.ЗамерыКомментарииСтатистики</name>
<right>
@@ -1514,6 +1427,93 @@
<value>true</value>
</right>
</object>
<object>
<name>Configuration.БиблиотекаСтандартныхПодсистем</name>
<right>
<name>Administration</name>
<value>true</value>
</right>
<right>
<name>DataAdministration</name>
<value>true</value>
</right>
<right>
<name>UpdateDataBaseConfiguration</name>
<value>true</value>
</right>
<right>
<name>ExclusiveMode</name>
<value>true</value>
</right>
<right>
<name>ActiveUsers</name>
<value>true</value>
</right>
<right>
<name>EventLog</name>
<value>true</value>
</right>
<right>
<name>ThinClient</name>
<value>true</value>
</right>
<right>
<name>WebClient</name>
<value>true</value>
</right>
<right>
<name>ThickClient</name>
<value>true</value>
</right>
<right>
<name>ExternalConnection</name>
<value>true</value>
</right>
<right>
<name>Automation</name>
<value>true</value>
</right>
<right>
<name>TechnicalSpecialistMode</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeNormal</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeWorkplace</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeEmbeddedWorkplace</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeFullscreenWorkplace</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeKiosk</name>
<value>true</value>
</right>
<right>
<name>AnalyticsSystemClient</name>
<value>true</value>
</right>
<right>
<name>SaveUserData</name>
<value>true</value>
</right>
<right>
<name>ConfigurationExtensionsAdministration</name>
<value>true</value>
</right>
<right>
<name>Output</name>
<value>true</value>
</right>
</object>
<object>
<name>Catalog.СценарииОбменовДанными</name>
<right>
SSL/src/Roles/ПолныеПрава/Rights.rights
+39 -39
View File
@@ -281,45 +281,6 @@
<value>false</value>
</right>
</object>
<object>
<name>Configuration.БиблиотекаСтандартныхПодсистем</name>
<right>
<name>Administration</name>
<value>false</value>
</right>
<right>
<name>UpdateDataBaseConfiguration</name>
<value>false</value>
</right>
<right>
<name>ThickClient</name>
<value>false</value>
</right>
<right>
<name>ExternalConnection</name>
<value>false</value>
</right>
<right>
<name>Automation</name>
<value>false</value>
</right>
<right>
<name>TechnicalSpecialistMode</name>
<value>false</value>
</right>
<right>
<name>ConfigurationExtensionsAdministration</name>
<value>false</value>
</right>
<right>
<name>InteractiveOpenExtDataProcessors</name>
<value>false</value>
</right>
<right>
<name>InteractiveOpenExtReports</name>
<value>false</value>
</right>
</object>
<object>
<name>Catalog.ВариантыОтчетов</name>
<right>
@@ -1990,6 +1951,45 @@
<value>false</value>
</right>
</object>
<object>
<name>Configuration.БиблиотекаСтандартныхПодсистем</name>
<right>
<name>Administration</name>
<value>false</value>
</right>
<right>
<name>UpdateDataBaseConfiguration</name>
<value>false</value>
</right>
<right>
<name>ThickClient</name>
<value>false</value>
</right>
<right>
<name>ExternalConnection</name>
<value>false</value>
</right>
<right>
<name>Automation</name>
<value>false</value>
</right>
<right>
<name>TechnicalSpecialistMode</name>
<value>false</value>
</right>
<right>
<name>ConfigurationExtensionsAdministration</name>
<value>false</value>
</right>
<right>
<name>InteractiveOpenExtDataProcessors</name>
<value>false</value>
</right>
<right>
<name>InteractiveOpenExtReports</name>
<value>false</value>
</right>
</object>
<object>
<name>Document.НазначениеОпросов</name>
<right>
SSL/src/Subsystems/СтандартныеПодсистемы/Subsystems/ОбменДанными/ОбменДанными.mdo
+1 -1
View File
@@ -150,6 +150,6 @@
<content>WebService.Exchange_3_0_1_1</content>
<content>CommonPicture.СинхронизацияДанныхСостояниеСинхронизации</content>
<content>InformationRegister.НастройкиТранспортаОбменаДанными</content>
<content>XDTOPackage.EnterpriseData_1_6_1</content>
<content>XDTOPackage.EnterpriseData_1_6_2</content>
<parentSubsystem>Subsystem.СтандартныеПодсистемы</parentSubsystem>
</mdclass:Subsystem>
SSL/src/XDTOPackages/EnterpriseData_1_6_1/EnterpriseData_1_6_1.mdo → SSL/src/XDTOPackages/EnterpriseData_1_6_2/EnterpriseData_1_6_2.mdo
+2 -2
View File
@@ -1,9 +1,9 @@
<?xml version="1.0" encoding="UTF-8"?>
<mdclass:XDTOPackage xmlns:mdclass="http://g5.1c.ru/v8/dt/metadata/mdclass" uuid="48b57d1b-5246-4ce8-9e0f-e369e6add55c">
<name>EnterpriseData_1_6_1</name>
<name>EnterpriseData_1_6_2</name>
<synonym>
<key>ru</key>
<value>EnterpriseData 1.6.1</value>
<value>EnterpriseData 1.6.2</value>
</synonym>
<namespace>http://v8.1c.ru/edi/edi_stnd/EnterpriseData/1.6</namespace>
</mdclass:XDTOPackage>
SSL/src/XDTOPackages/EnterpriseData_1_6_1/Package.xdto → SSL/src/XDTOPackages/EnterpriseData_1_6_2/Package.xdto
+11
View File
@@ -1444,6 +1444,13 @@
<property xmlns:d3p1="http://v8.1c.ru/edi/edi_stnd/EnterpriseData/1.6" name="БанковскийСчетОрганизации" type="d3p1:КлючевыеСвойстваБанковскийСчет" lowerBound="0"/>
<property xmlns:d3p1="http://v8.1c.ru/edi/edi_stnd/EnterpriseData/1.6" name="ЭквайринговыйТерминал" type="d3p1:КлючевыеСвойстваЭквайринговыеТерминалы" lowerBound="0"/>
</objectType>
<objectType name="ОплатыККМ">
<property xmlns:d3p1="http://v8.1c.ru/edi/edi_stnd/EnterpriseData/1.6" name="Строка" type="d3p1:ОплатыККМ.Строка" lowerBound="0" upperBound="-1"/>
</objectType>
<objectType name="ОплатыККМ.Строка" open="true" sequenced="true">
<property xmlns:d3p1="http://v8.1c.ru/edi/edi_stnd/EnterpriseData/1.6" name="Сумма" type="d3p1:ТипСумма" nillable="false"/>
<property name="ТипОплаты" type="xs:string" lowerBound="0"/>
</objectType>
<objectType name="ПодарочныеСертификаты">
<property xmlns:d3p1="http://v8.1c.ru/edi/edi_stnd/EnterpriseData/1.6" name="Строка" type="d3p1:ПодарочныеСертификаты.Строка" lowerBound="0" upperBound="-1"/>
</objectType>
@@ -2938,6 +2945,7 @@
<property xmlns:d3p1="http://v8.1c.ru/edi/edi_stnd/EnterpriseData/1.6" name="ОсновнаяСпецификацияНоменклатуры" type="d3p1:КлючевыеСвойстваСпецификацииНоменклатуры" lowerBound="0"/>
<property xmlns:d3p1="http://v8.1c.ru/edi/edi_stnd/EnterpriseData/1.6" name="ЦеноваяГруппа" type="d3p1:КлючевыеСвойстваЦеновыеГруппы" lowerBound="0"/>
<property xmlns:d3p1="http://v8.1c.ru/edi/edi_stnd/EnterpriseData/1.6" name="ВидНоменклатуры" type="d3p1:КлючевыеСвойстваВидыНоменклатуры" lowerBound="0"/>
<property name="ПризнакПредметаРасчета" type="xs:string" lowerBound="0"/>
</objectType>
<objectType xmlns:d2p1="http://www.1c.ru/SSL/Exchange/Message" name="Справочник.НоменклатураГруппа" base="d2p1:Object" open="true" sequenced="true">
<property xmlns:d3p1="http://v8.1c.ru/edi/edi_stnd/EnterpriseData/1.6" name="КлючевыеСвойства" type="d3p1:КлючевыеСвойстваНоменклатураГруппа"/>
@@ -3808,6 +3816,7 @@
<property xmlns:d3p1="http://v8.1c.ru/edi/edi_stnd/EnterpriseData/1.6" name="ГруппаНастроекФинансовогоУчетаРасчетов" type="d3p1:КлючевыеСвойстваГруппаНастроекФинансовогоУчетаРасчетов" lowerBound="0"/>
<property xmlns:d3p1="http://v8.1c.ru/edi/edi_stnd/EnterpriseData/1.6" name="Товары" type="d3p1:Документ.ЗаказКлиента.Товары" lowerBound="0"/>
<property xmlns:d3p1="http://v8.1c.ru/edi/edi_stnd/EnterpriseData/1.6" name="Услуги" type="d3p1:Документ.ЗаказКлиента.Услуги" lowerBound="0"/>
<property xmlns:d3p1="http://v8.1c.ru/edi/edi_stnd/EnterpriseData/1.6" name="Оплаты" type="d3p1:ОплатыККМ" lowerBound="0"/>
<property xmlns:d3p1="http://v8.1c.ru/edi/edi_stnd/EnterpriseData/1.6" name="ДополнительныеРеквизиты" type="d3p1:ДополнительныеРеквизиты" lowerBound="0"/>
<property name="Комментарий" type="xs:string" lowerBound="0"/>
</objectType>
@@ -6317,6 +6326,8 @@
<property xmlns:d3p1="http://v8.1c.ru/edi/edi_stnd/EnterpriseData/1.6" name="ОплатаСертификатами" type="d3p1:ПодарочныеСертификаты" lowerBound="0"/>
<property xmlns:d3p1="http://v8.1c.ru/edi/edi_stnd/EnterpriseData/1.6" name="ПодарочныеСертификаты" type="d3p1:ПодарочныеСертификаты" lowerBound="0"/>
<property xmlns:d3p1="http://v8.1c.ru/edi/edi_stnd/EnterpriseData/1.6" name="ОплатаПлатежнымиКартамиПодарочныхСертификатов" type="d3p1:ОплатаПлатежнымиКартами" lowerBound="0"/>
<property xmlns:d3p1="http://v8.1c.ru/edi/edi_stnd/EnterpriseData/1.6" name="ОплатыККМ" type="d3p1:ОплатыККМ" lowerBound="0"/>
<property name="ПризнакСпособаРасчета" type="xs:string" lowerBound="0"/>
<property xmlns:d3p1="http://v8.1c.ru/edi/edi_stnd/EnterpriseData/1.6" name="ДополнительныеРеквизиты" type="d3p1:ДополнительныеРеквизиты" lowerBound="0"/>
</objectType>
<objectType name="Документ.ЧекККМ.Услуги">