3_0_1_240

This commit is contained in:
Компания 1С committed 2018-08-17 13:11:00 +03:00
1 parent 27fe290aea
commit 85f0ddf04f
174 files changed
+9933 -2488

No files matched your search

@@ -14,7 +14,7 @@
ПодключаемыеКоманды.ПриСозданииНаСервере(ЭтотОбъект);
// Конец СтандартныеПодсистемы.ПодключаемыеКоманды
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
ПоложениеКоманднойПанели = ПоложениеКоманднойПанелиФормы.Авто;
@@ -703,6 +703,10 @@
<event>Drag</event>
<name>ГруппыВнешнихПользователейПеретаскивание</name>
</handlers>
<handlers>
<event>OnChange</event>
<name>ГруппыВнешнихПользователейПриИзменении</name>
</handlers>
<searchStringAddition>
<name>ГруппыВнешнихПользователейСтрокаПоиска</name>
<id>170</id>
@@ -1123,6 +1127,10 @@
<event>BeforeRowChange</event>
<name>ВнешниеПользователиСписокПередНачаломИзменения</name>
</handlers>
<handlers>
<event>OnChange</event>
<name>ВнешниеПользователиСписокПриИзменении</name>
</handlers>
<searchStringAddition>
<name>ВнешниеПользователиСписокСтрокаПоиска</name>
<id>179</id>
@@ -248,6 +248,13 @@
#Область ОбработчикиСобытийЭлементовТаблицыФормыГруппыВнешнихПользователей
&НаКлиенте
Процедура ГруппыВнешнихПользователейПриИзменении(Элемент)
СписокПриИзмененииНаСервере();
КонецПроцедуры
&НаКлиенте
Процедура ГруппыВнешнихПользователейПриАктивизацииСтроки(Элемент)
@@ -406,6 +413,13 @@
#Область ОбработчикиСобытийЭлементовТаблицыФормыВнешниеПользователи
&НаКлиенте
Процедура ВнешниеПользователиСписокПриИзменении(Элемент)
СписокПриИзмененииНаСервере();
КонецПроцедуры
&НаКлиенте
Процедура ВнешниеПользователиСписокПриАктивизацииСтроки(Элемент)
@@ -1093,6 +1107,13 @@
КонецПроцедуры
&НаСервереБезКонтекста
Процедура СписокПриИзмененииНаСервере()
ПользователиСлужебный.ПослеИзмененияПользователяИлиГруппыПользователейВФорме();
КонецПроцедуры
////////////////////////////////////////////////////////////////////////////////
// Перетаскивание пользователей.
@@ -355,6 +355,8 @@
ОбщаяНастройкаФормы(ТекущийОбъект, , ПараметрыЗаписи);
ПользователиСлужебный.ПослеИзмененияПользователяИлиГруппыПользователейВФорме();
КонецПроцедуры
&НаКлиенте
@@ -203,6 +203,10 @@
<horizontalAlign>Left</horizontalAlign>
<autoFill>true</autoFill>
</autoCommandBar>
<handlers>
<event>OnChange</event>
<name>СписокПриИзменении</name>
</handlers>
<searchStringAddition>
<name>СписокСтрокаПоиска</name>
<id>21</id>
@@ -39,6 +39,17 @@
#КонецОбласти
#Область ОбработчикиСобытийЭлементовТаблицыФормыСписок
&НаКлиенте
Процедура СписокПриИзменении(Элемент)
СписокПриИзмененииНаСервере();
КонецПроцедуры
#КонецОбласти
#Область СлужебныеПроцедурыИФункции
&НаСервере
@@ -66,4 +77,11 @@
КонецПроцедуры
&НаСервереБезКонтекста
Процедура СписокПриИзмененииНаСервере()
ПользователиСлужебный.ПослеИзмененияПользователяИлиГруппыПользователейВФорме();
КонецПроцедуры
#КонецОбласти
@@ -125,7 +125,11 @@
&НаСервере
Процедура ПослеЗаписиНаСервере(ТекущийОбъект, ПараметрыЗаписи)
ЗаполнитьСтатусПользователей();
ПользователиСлужебный.ПослеИзмененияПользователяИлиГруппыПользователейВФорме();
КонецПроцедуры
&НаКлиенте
@@ -423,6 +423,10 @@
<event>BeforeRowChange</event>
<name>СписокПередНачаломИзменения</name>
</handlers>
<handlers>
<event>OnChange</event>
<name>СписокПриИзменении</name>
</handlers>
<searchStringAddition>
<name>СписокСтрокаПоиска</name>
<id>44</id>
@@ -89,6 +89,13 @@
#Область ОбработчикиСобытийЭлементовТаблицыФормыСписок
&НаКлиенте
Процедура СписокПриИзменении(Элемент)
СписокПриИзмененииНаСервере();
КонецПроцедуры
&НаКлиенте
Процедура СписокПриАктивизацииСтроки(Элемент)
@@ -202,4 +209,11 @@
КонецПроцедуры
&НаСервереБезКонтекста
Процедура СписокПриИзмененииНаСервере()
УправлениеДоступомСлужебный.ПослеИзмененияНастроекПравВФорме();
КонецПроцедуры
#КонецОбласти
@@ -222,6 +222,8 @@
ОбновитьКартинкуКомментария(Элементы.СтраницаКомментарий, Объект.Комментарий);
УправлениеДоступомСлужебный.ПослеИзмененияНастроекПравВФорме();
КонецПроцедуры
&НаКлиенте
@@ -650,6 +650,10 @@
РегистрыСведений.ЗначенияГруппДоступа.ОбновитьДанныеРегистра(ИзмененныеГруппыДоступа);
КонецЕсли;
Если УправлениеДоступомСлужебный.ОграничиватьДоступНаУровнеЗаписейУниверсально() Тогда
УправлениеДоступомСлужебный.ЗапланироватьОбновлениеНаборовГруппДоступа();
КонецЕсли;
ЗарегистрироватьСсылки("ГруппыДоступа", Null);
КонецПроцедуры
@@ -694,10 +698,36 @@
КонецЕсли;
КонецЕсли;
Если ПользователиДляОбновления.Количество() > 0 Тогда
ЗарегистрироватьСсылки("ГруппыПользователей",
ПользователиСлужебный.СсылкаОбъекта(ЭлементДанных));
КонецЕсли;
ЗарегистрироватьСсылки("Пользователи", ПользователиДляОбновления);
КонецПроцедуры
// Только для внутреннего использования.
Процедура ОбновитьВспомогательныеДанныеГруппПользователейИзмененныхПриЗагрузке() Экспорт
Если ОбщегоНазначения.РазделениеВключено() Тогда
// Изменения групп доступа в АРМ заблокированы и не загружаются в область данных.
Возврат;
КонецЕсли;
ИзмененныеГруппыПользователей = ЗарегистрированныеСсылки("ГруппыПользователей");
Если ИзмененныеГруппыПользователей.Количество() = 0 Тогда
Возврат;
КонецЕсли;
Если УправлениеДоступомСлужебный.ОграничиватьДоступНаУровнеЗаписейУниверсально() Тогда
УправлениеДоступомСлужебный.ЗапланироватьОбновлениеНаборовГруппДоступа();
КонецЕсли;
ЗарегистрироватьСсылки("ГруппыПользователей", Null);
КонецПроцедуры
// Только для внутреннего использования.
Процедура ЗарегистрироватьПользователяИзмененногоПриЗагрузке(ЭлементДанных) Экспорт
@@ -724,6 +754,11 @@
Возврат;
КонецЕсли;
ЗарегистрироватьСсылки("ГруппыПользователей",
?(ТипЗнч(ЭлементДанных.Ссылка) = Тип("СправочникСсылка.Пользователи"),
Справочники.ГруппыПользователей.ВсеПользователи,
Справочники.ГруппыВнешнихПользователей.ВсеВнешниеПользователи));
ЗарегистрироватьСсылки("Пользователи", Пользователь);
КонецПроцедуры
@@ -749,6 +784,10 @@
УправлениеДоступом.ОбновитьРолиПользователей(ИзмененныеПользователи);
КонецЕсли;
Если УправлениеДоступомСлужебный.ОграничиватьДоступНаУровнеЗаписейУниверсально() Тогда
УправлениеДоступомСлужебный.ЗапланироватьОбновлениеНаборовГруппДоступа();
КонецЕсли;
ЗарегистрироватьСсылки("Пользователи", Null);
КонецПроцедуры
@@ -876,6 +915,10 @@
ДопустимыеТипы = Новый ОписаниеТипов("СправочникСсылка.ГруппыДоступа");
ИмяПараметраРаботыПрограммы = "СтандартныеПодсистемы.УправлениеДоступом.ГруппыДоступаИзмененныеПриЗагрузке";
ИначеЕсли ВидСсылок = "ГруппыПользователей" Тогда
ДопустимыеТипы = Новый ОписаниеТипов("СправочникСсылка.ГруппыПользователей,СправочникСсылка.ГруппыВнешнихПользователей");
ИмяПараметраРаботыПрограммы = "СтандартныеПодсистемы.УправлениеДоступом.ГруппыПользователейИзмененныеПриЗагрузке";
ИначеЕсли ВидСсылок = "Пользователи" Тогда
ДопустимыеТипы = Новый ОписаниеТипов("СправочникСсылка.Пользователи,СправочникСсылка.ВнешниеПользователи");
ИмяПараметраРаботыПрограммы = "СтандартныеПодсистемы.УправлениеДоступом.ПользователиИзмененныеПриЗагрузке";
@@ -140,12 +140,17 @@
Справочники.ПрофилиГруппДоступа.ОбновитьВспомогательныеДанныеПрофилейИзмененныхПриЗагрузке();
Справочники.ГруппыДоступа.ОбновитьВспомогательныеДанныеГруппДоступаИзмененныхПриЗагрузке();
Справочники.ГруппыДоступа.ОбновитьВспомогательныеДанныеГруппПользователейИзмененныхПриЗагрузке();
Справочники.ГруппыДоступа.ОбновитьРолиПользователейИзмененныхПриЗагрузке();
Если УправлениеДоступомСлужебный.ОграничиватьДоступНаУровнеЗаписейУниверсально() Тогда
ТипыИзмененныхУчастников = ТипыИзмененныхУчастников(Пользователи, СтарыеЗначения.Пользователи);
УправлениеДоступомСлужебный.ЗапланироватьОбновлениеНаборовГруппДоступа(
ТипыИзмененныхУчастников.Пользователи, ТипыИзмененныхУчастников.ВнешниеПользователи);
Если Не ПометкаУдаления Тогда
УправлениеДоступомСлужебный.ЗапланироватьОбновлениеДоступаПриИзмененииУчастниковГруппыДоступа(Ссылка,
Пользователи, СтарыеЗначения.Пользователи);
ТипыИзмененныхУчастников);
КонецЕсли;
Если ПометкаУдаления <> СтарыеЗначения.ПометкаУдаления Тогда
УправлениеДоступомСлужебный.ОбновитьГруппыДоступаРазрешенногоКлючаДоступа(Ссылка);
@@ -167,6 +172,40 @@
#Область СлужебныеПроцедурыИФункции
Функция ТипыИзмененныхУчастников(НовыеУчастники, СтарыеУчастники)
ТипыИзмененныхУчастников = Новый Структура;
ТипыИзмененныхУчастников.Вставить("Пользователи", Ложь);
ТипыИзмененныхУчастников.Вставить("ВнешниеПользователи", Ложь);
ВсеУчастники = НовыеУчастники.Выгрузить(, "Пользователь");
ВсеУчастники.Колонки.Добавить("ВидИзмененияСтроки", Новый ОписаниеТипов("Число"));
ВсеУчастники.ЗаполнитьЗначения(1, "ВидИзмененияСтроки");
Выборка = СтарыеУчастники.Выбрать();
Пока Выборка.Следующий() Цикл
НоваяСтрока = ВсеУчастники.Добавить();
НоваяСтрока.Пользователь = Выборка.Пользователь;
НоваяСтрока.ВидИзмененияСтроки = -1;
КонецЦикла;
ВсеУчастники.Свернуть("Пользователь", "ВидИзмененияСтроки");
Для Каждого Строка Из ВсеУчастники Цикл
Если Строка.ВидИзмененияСтроки = 0 Тогда
Продолжить;
КонецЕсли;
Если ТипЗнч(Строка.Пользователь) = Тип("СправочникСсылка.Пользователи")
Или ТипЗнч(Строка.Пользователь) = Тип("СправочникСсылка.ГруппыПользователей") Тогда
ТипыИзмененныхУчастников.Пользователи = Истина;
КонецЕсли;
Если ТипЗнч(Строка.Пользователь) = Тип("СправочникСсылка.ВнешниеПользователи")
Или ТипЗнч(Строка.Пользователь) = Тип("СправочникСсылка.ГруппыВнешнихПользователей") Тогда
ТипыИзмененныхУчастников.ВнешниеПользователи = Истина;
КонецЕсли;
КонецЦикла;
Возврат ТипыИзмененныхУчастников;
КонецФункции
Процедура ОбновитьРолиПользователейПриИзмененииГруппыДоступа()
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.РаботаВМоделиСервиса") Тогда
@@ -207,6 +207,10 @@
<horizontalAlign>Left</horizontalAlign>
<autoFill>true</autoFill>
</autoCommandBar>
<handlers>
<event>OnChange</event>
<name>СписокПриИзменении</name>
</handlers>
<searchStringAddition>
<name>СписокСтрокаПоиска</name>
<id>21</id>
@@ -41,6 +41,17 @@
#КонецОбласти
#Область ОбработчикиСобытийЭлементовТаблицыФормыСписок
&НаКлиенте
Процедура СписокПриИзменении(Элемент)
СписокПриИзмененииНаСервере();
КонецПроцедуры
#КонецОбласти
#Область СлужебныеПроцедурыИФункции
&НаСервере
@@ -68,4 +79,11 @@
КонецПроцедуры
&НаСервереБезКонтекста
Процедура СписокПриИзмененииНаСервере()
ПользователиСлужебный.ПослеИзмененияПользователяИлиГруппыПользователейВФорме();
КонецПроцедуры
#КонецОбласти
@@ -31,16 +31,20 @@
КонецПроцедуры
&НаСервере
Процедура ПослеЗаписиНаСервере(ТекущийОбъект, ПараметрыЗаписи)
ЗаполнитьСтатусПользователей();
ПользователиСлужебный.ПослеИзмененияПользователяИлиГруппыПользователейВФорме();
КонецПроцедуры
&НаКлиенте
Процедура ПослеЗаписи(ПараметрыЗаписи)
Оповестить("Запись_ГруппыПользователей", Новый Структура, Объект.Ссылка);
КонецПроцедуры
&НаСервере
Процедура ПослеЗаписиНаСервере(ТекущийОбъект, ПараметрыЗаписи)
ЗаполнитьСтатусПользователей();
КонецПроцедуры
#КонецОбласти
#Область ОбработчикиСобытийЭлементовШапкиФормы
@@ -10,7 +10,7 @@
ЗаполнитьТаблицы();
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
ПоложениеКоманднойПанели = ПоложениеКоманднойПанелиФормы.Авто;
@@ -39,7 +39,7 @@
КонецЕсли;
КонецЦикла;
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
ПоложениеКоманднойПанели = ПоложениеКоманднойПанелиФормы.Авто;
@@ -89,10 +89,12 @@
КонецЕсли;
ПрофилиИспользуются = Не ИспользуютсяПрофилиБезопасности;
Если ПравоДоступа("ИнтерактивнаяПометкаУдаления", Метаданные.Справочники.ДополнительныеОтчетыИОбработки) Тогда
Элементы.ИзменитьПометкуУдаленияБезПрофилей.Видимость = Не ПрофилиИспользуются;
Элементы.ИзменитьПометкуУдаленияБезПрофилейМеню.Видимость = Не ПрофилиИспользуются;
КонецЕсли;
ОбщегоНазначенияКлиентСервер.УстановитьСвойствоЭлементаФормы(Элементы, "ИзменитьПометкуУдаленияБезПрофилей",
"Видимость", Не ПрофилиИспользуются);
ОбщегоНазначенияКлиентСервер.УстановитьСвойствоЭлементаФормы(Элементы, "ИзменитьПометкуУдаленияБезПрофилейМеню",
"Видимость", Не ПрофилиИспользуются);
Элементы.ИзменитьПометкуУдаленияСПрофилями.Видимость = ПрофилиИспользуются;
Элементы.ИзменитьПометкуУдаленияСПрофилямиМеню.Видимость = ПрофилиИспользуются;
@@ -109,7 +111,7 @@
Элементы.ГруппаПояснениеСервис.Видимость = ОбщегоНазначения.РазделениеВключено();
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
ПоложениеКоманднойПанели = ПоложениеКоманднойПанелиФормы.Авто;
@@ -46,7 +46,7 @@
ПриИзмененииСвойства();
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
Элементы.Переместить(Элементы.ОсновныеКоманды, Элементы.ФормаКоманднаяПанель);
Элементы.Переместить(Элементы.ДополнительныеКоманды, Элементы.ФормаКоманднаяПанель);
@@ -29,7 +29,7 @@
ПриИзмененииСвойства();
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
Элементы.Переместить(Элементы.ОсновныеКоманды, Элементы.ФормаКоманднаяПанель);
Элементы.Переместить(Элементы.ДополнительныеКоманды, Элементы.ФормаКоманднаяПанель);
@@ -18,7 +18,7 @@
ЕстьГрупповоеИзменениеРеквизитов = ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.ГрупповоеИзменениеОбъектов");
Элементы.СписокИзменитьВыделенные.Видимость = ЕстьГрупповоеИзменениеРеквизитов И МожноРедактировать;
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
ПоложениеКоманднойПанели = ПоложениеКоманднойПанелиФормы.Авто;
@@ -26,7 +26,7 @@
ПереключитьВидимостьНедействующихБанков(Ложь);
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
ОбщегоНазначенияКлиентСервер.УстановитьСвойствоЭлементаФормы(Элементы, "ФормаСоздать", "ТолькоВоВсехДействиях", Истина);
ОбщегоНазначенияКлиентСервер.УстановитьСвойствоЭлементаФормы(Элементы, "ФормаСоздатьГруппу", "ТолькоВоВсехДействиях", Истина);
@@ -24,7 +24,7 @@
ТолькоПросмотр = Истина;
КонецЕсли;
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
Для каждого ЭлементФормы Из Элементы.КоманднаяПанель.ПодчиненныеЭлементы Цикл
@@ -0,0 +1,25 @@
<?xml version="1.0" encoding="UTF-8"?>
<Settings xmlns="http://v8.1c.ru/8.1/data-composition-system/settings" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xs="http://www.w3.org/2001/XMLSchema" xmlns:v8="http://v8.1c.ru/8.1/data/core" xmlns:v8ui="http://v8.1c.ru/8.1/data/ui" xmlns:pal="http://v8.1c.ru/8.1/data/ui/colors/palette" xmlns:style="http://v8.1c.ru/8.1/data/ui/style" xmlns:sys="http://v8.1c.ru/8.1/data/ui/fonts/system" xmlns:web="http://v8.1c.ru/8.1/data/ui/colors/web" xmlns:win="http://v8.1c.ru/8.1/data/ui/colors/windows" xmlns:dcscor="http://v8.1c.ru/8.1/data-composition-system/core">
<filter>
<viewMode>Normal</viewMode>
<userSettingID>dfcece9d-5077-440b-b6b3-45a5cb4538eb</userSettingID>
</filter>
<order>
<item xsi:type="OrderItemField">
<field>ПорядокПоТипу</field>
<orderType>Asc</orderType>
</item>
<item xsi:type="OrderItemField">
<field>Наименование</field>
<orderType>Asc</orderType>
</item>
<viewMode>Normal</viewMode>
<userSettingID>88619765-ccb3-46c6-ac52-38e9c992ebd4</userSettingID>
</order>
<conditionalAppearance>
<viewMode>Normal</viewMode>
<userSettingID>b75fecce-942b-4aed-abc9-e6a02e460fb3</userSettingID>
</conditionalAppearance>
<itemsViewMode>Normal</itemsViewMode>
<itemsUserSettingID>911b6018-f537-43e8-a417-da56b22f9aec</itemsUserSettingID>
</Settings>
@@ -0,0 +1,577 @@
<?xml version="1.0" encoding="UTF-8"?>
<form:Form xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:core="http://g5.1c.ru/v8/dt/mcore" xmlns:form="http://g5.1c.ru/v8/dt/form">
<items xsi:type="form:FormGroup">
<name>ГруппаПользовательскихНастроек</name>
<id>1</id>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<title>
<key>ru</key>
<value>Группа пользовательских настроек</value>
</title>
<verticalStretch>false</verticalStretch>
<extendedTooltip>
<name>ГруппаПользовательскихНастроекРасширеннаяПодсказка</name>
<id>2</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<type>UsualGroup</type>
<extInfo xsi:type="form:UsualGroupExtInfo">
<group>Vertical</group>
<behavior>Auto</behavior>
<representation>WeakSeparation</representation>
<showLeftMargin>true</showLeftMargin>
<united>true</united>
<throughAlign>Auto</throughAlign>
<currentRowUse>Auto</currentRowUse>
</extInfo>
</items>
<items xsi:type="form:FormGroup">
<name>КомандыФормы</name>
<id>19</id>
<items xsi:type="form:Button">
<name>ФормаВключитьВозможностьРедактирования</name>
<id>30</id>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<extendedTooltip>
<name>ФормаВключитьВозможностьРедактированияExtendedTooltip</name>
<id>31</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<commandName>Form.Command.ВключитьВозможностьРедактирования</commandName>
<buttonImportance>Normal</buttonImportance>
<representation>Auto</representation>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<placementArea>UserCmds</placementArea>
<representationInContextMenu>Auto</representationInContextMenu>
<locationInCommandBar>InAdditionalSubmenu</locationInCommandBar>
</items>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<title>
<key>ru</key>
<value>Команды формы</value>
</title>
<extendedTooltip>
<name>КомандыФормыРасширеннаяПодсказка</name>
<id>20</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<type>CommandBar</type>
<extInfo xsi:type="form:CommandBarExtInfo">
<horizontalAlign>Left</horizontalAlign>
<commandSource>Form</commandSource>
</extInfo>
</items>
<items xsi:type="form:Table">
<name>Список</name>
<id>3</id>
<title>
<key>ru</key>
<value>Наборы групп доступа</value>
</title>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<dataPath xsi:type="form:DataPath">
<segments>Список</segments>
</dataPath>
<defaultItem>true</defaultItem>
<titleLocation>None</titleLocation>
<toolTip>
<key>ru</key>
<value>Тип элементов набора (Группы доступа, Группы пользователей, Группы внешних пользователей, Пользователи, Внешние пользователи)</value>
</toolTip>
<items xsi:type="form:FormField">
<name>Наименование</name>
<id>16</id>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<dataPath xsi:type="form:DataPath">
<segments>Список.Наименование</segments>
</dataPath>
<defaultItem>true</defaultItem>
<extendedTooltip>
<name>НаименованиеРасширеннаяПодсказка</name>
<id>18</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<contextMenu>
<name>НаименованиеКонтекстноеМеню</name>
<id>17</id>
<autoFill>true</autoFill>
</contextMenu>
<type>LabelField</type>
<editMode>Enter</editMode>
<showInHeader>true</showInHeader>
<headerHorizontalAlign>Left</headerHorizontalAlign>
<showInFooter>true</showInFooter>
<extInfo xsi:type="form:LabelFieldExtInfo">
<width>40</width>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
</extInfo>
</items>
<items xsi:type="form:FormField">
<name>ДляВнешнихПользователей</name>
<id>37</id>
<title>
<key>ru</key>
<value>ВП</value>
</title>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<dataPath xsi:type="form:DataPath">
<segments>Список.ДляВнешнихПользователей</segments>
</dataPath>
<extendedTooltip>
<name>ДляВнешнихПользователейРасширеннаяПодсказка</name>
<id>39</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<contextMenu>
<name>ДляВнешнихПользователейКонтекстноеМеню</name>
<id>38</id>
<autoFill>true</autoFill>
</contextMenu>
<type>CheckBoxField</type>
<editMode>Enter</editMode>
<showInHeader>true</showInHeader>
<headerHorizontalAlign>Left</headerHorizontalAlign>
<showInFooter>true</showInFooter>
<extInfo xsi:type="form:CheckBoxFieldExtInfo"/>
</items>
<items xsi:type="form:FormField">
<name>ТипЭлементов</name>
<id>24</id>
<title>
<key>ru</key>
<value>Тип элементов</value>
</title>
<visible>true</visible>
<enabled>true</enabled>
<userVisible/>
<dataPath xsi:type="form:DataPath">
<segments>Список.ТипЭлементов</segments>
</dataPath>
<extendedTooltip>
<name>ТипЭлементовРасширеннаяПодсказка</name>
<id>26</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<contextMenu>
<name>ТипЭлементовКонтекстноеМеню</name>
<id>25</id>
<autoFill>true</autoFill>
</contextMenu>
<type>LabelField</type>
<editMode>Enter</editMode>
<showInHeader>true</showInHeader>
<headerHorizontalAlign>Left</headerHorizontalAlign>
<showInFooter>true</showInFooter>
<extInfo xsi:type="form:LabelFieldExtInfo">
<width>10</width>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
</extInfo>
</items>
<items xsi:type="form:FormField">
<name>НеИспользуетсяС</name>
<id>27</id>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<dataPath xsi:type="form:DataPath">
<segments>Список.НеИспользуетсяС</segments>
</dataPath>
<extendedTooltip>
<name>НеИспользуетсяСРасширеннаяПодсказка</name>
<id>29</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<contextMenu>
<name>НеИспользуетсяСКонтекстноеМеню</name>
<id>28</id>
<autoFill>true</autoFill>
</contextMenu>
<type>LabelField</type>
<editMode>Enter</editMode>
<showInHeader>true</showInHeader>
<headerHorizontalAlign>Left</headerHorizontalAlign>
<showInFooter>true</showInFooter>
<extInfo xsi:type="form:LabelFieldExtInfo">
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
</extInfo>
</items>
<items xsi:type="form:FormField">
<name>КоличествоГруппВНаборе</name>
<id>34</id>
<title>
<key>ru</key>
<value>Групп</value>
</title>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<dataPath xsi:type="form:DataPath">
<segments>Список.КоличествоГруппВНаборе</segments>
</dataPath>
<toolTip>
<key>ru</key>
<value>Количество групп в наборе</value>
</toolTip>
<extendedTooltip>
<name>КоличествоГруппВНабореРасширеннаяПодсказка</name>
<id>36</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<contextMenu>
<name>КоличествоГруппВНабореКонтекстноеМеню</name>
<id>35</id>
<autoFill>true</autoFill>
</contextMenu>
<type>LabelField</type>
<editMode>Enter</editMode>
<showInHeader>true</showInHeader>
<headerHorizontalAlign>Left</headerHorizontalAlign>
<showInFooter>true</showInFooter>
<extInfo xsi:type="form:LabelFieldExtInfo">
<width>3</width>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
</extInfo>
</items>
<items xsi:type="form:FormField">
<name>Ссылка</name>
<id>21</id>
<visible>true</visible>
<enabled>true</enabled>
<userVisible/>
<dataPath xsi:type="form:DataPath">
<segments>Список.Ссылка</segments>
</dataPath>
<extendedTooltip>
<name>СсылкаРасширеннаяПодсказка</name>
<id>23</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<contextMenu>
<name>СсылкаКонтекстноеМеню</name>
<id>22</id>
<autoFill>true</autoFill>
</contextMenu>
<type>LabelField</type>
<editMode>Enter</editMode>
<showInHeader>true</showInHeader>
<headerHorizontalAlign>Left</headerHorizontalAlign>
<showInFooter>true</showInFooter>
<extInfo xsi:type="form:LabelFieldExtInfo">
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
</extInfo>
</items>
<commandBarLocation>None</commandBarLocation>
<autoCommandBar>
<name>СписокКоманднаяПанель</name>
<id>5</id>
<horizontalAlign>Left</horizontalAlign>
</autoCommandBar>
<searchStringAddition>
<name>СписокСтрокаПоиска</name>
<id>7</id>
<extendedTooltip>
<name>СписокСтрокаПоискаРасширеннаяПодсказка</name>
<id>9</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<contextMenu>
<name>СписокСтрокаПоискаКонтекстноеМеню</name>
<id>8</id>
<autoFill>true</autoFill>
</contextMenu>
<source>Список</source>
<extInfo xsi:type="form:SearchStringAdditionExtInfo">
<autoMaxWidth>true</autoMaxWidth>
</extInfo>
</searchStringAddition>
<viewStatusAddition>
<name>СписокСостояниеПросмотра</name>
<id>10</id>
<extendedTooltip>
<name>СписокСостояниеПросмотраРасширеннаяПодсказка</name>
<id>12</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<contextMenu>
<name>СписокСостояниеПросмотраКонтекстноеМеню</name>
<id>11</id>
<autoFill>true</autoFill>
</contextMenu>
<type>ViewStatusAddition</type>
<source>Список</source>
<extInfo xsi:type="form:ViewStatusAdditionExtInfo">
<autoMaxWidth>true</autoMaxWidth>
</extInfo>
</viewStatusAddition>
<searchControlAddition>
<name>СписокУправлениеПоиском</name>
<id>13</id>
<extendedTooltip>
<name>СписокУправлениеПоискомРасширеннаяПодсказка</name>
<id>15</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<contextMenu>
<name>СписокУправлениеПоискомКонтекстноеМеню</name>
<id>14</id>
<autoFill>true</autoFill>
</contextMenu>
<type>SearchControlAddition</type>
<source>Список</source>
<extInfo xsi:type="form:SearchControlAdditionExtInfo">
<autoMaxWidth>true</autoMaxWidth>
</extInfo>
</searchControlAddition>
<extendedTooltip>
<name>СписокРасширеннаяПодсказка</name>
<id>6</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<contextMenu>
<name>СписокКонтекстноеМеню</name>
<id>4</id>
<autoFill>true</autoFill>
</contextMenu>
<changeRowSet>true</changeRowSet>
<changeRowOrder>true</changeRowOrder>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<autoMaxRowsCount>true</autoMaxRowsCount>
<choiceMode>true</choiceMode>
<selectionMode>MultiRow</selectionMode>
<header>true</header>
<headerHeight>1</headerHeight>
<footerHeight>1</footerHeight>
<horizontalScrollBar>AutoUse</horizontalScrollBar>
<verticalScrollBar>AutoUse</verticalScrollBar>
<horizontalLines>true</horizontalLines>
<verticalLines>true</verticalLines>
<searchOnInput>Auto</searchOnInput>
<initialListView>Auto</initialListView>
<initialTreeView>ExpandTopLevel</initialTreeView>
<horizontalStretch>true</horizontalStretch>
<verticalStretch>true</verticalStretch>
<enableStartDrag>true</enableStartDrag>
<rowPictureDataPath xsi:type="form:DataPath">
<segments>Список.DefaultPicture</segments>
</rowPictureDataPath>
<autoMaxCardHeight>true</autoMaxCardHeight>
<extInfo xsi:type="form:DynamicListTableExtInfo">
<autoRefreshPeriod>60</autoRefreshPeriod>
<period>
<startDate>0001-01-01T00:00:00</startDate>
<endDate>0001-01-01T00:00:00</endDate>
</period>
<topLevelParent xsi:type="core:UndefinedValue"/>
<showRoot>true</showRoot>
<allowGettingCurrentRowURL>true</allowGettingCurrentRowURL>
<userSettingsGroup>ГруппаПользовательскихНастроек</userSettingsGroup>
</extInfo>
</items>
<autoCommandBar>
<name>ФормаКоманднаяПанель</name>
<id>-1</id>
<horizontalAlign>Left</horizontalAlign>
</autoCommandBar>
<handlers>
<event>OnCreateAtServer</event>
<name>ПриСозданииНаСервере</name>
</handlers>
<windowOpeningMode>DontBlock</windowOpeningMode>
<saveWindowSettings>true</saveWindowSettings>
<autoTitle>true</autoTitle>
<autoUrl>true</autoUrl>
<group>Vertical</group>
<autoFillCheck>true</autoFillCheck>
<allowFormCustomize>true</allowFormCustomize>
<enabled>true</enabled>
<showTitle>auto</showTitle>
<showCloseButton>true</showCloseButton>
<attributes>
<name>Список</name>
<id>1</id>
<valueType>
<types>DynamicList</types>
</valueType>
<view>
<common>true</common>
</view>
<edit>
<common>true</common>
</edit>
<notDefaultUseAlwaysAttributes xsi:type="form:DataPath">
<segments>Список.Ссылка</segments>
</notDefaultUseAlwaysAttributes>
<main>true</main>
<extInfo xsi:type="form:DynamicListExtInfo">
<queryText>ВЫБРАТЬ
СправочникНаборыГруппДоступа.Ссылка КАК Ссылка,
СправочникНаборыГруппДоступа.ПометкаУдаления КАК ПометкаУдаления,
СправочникНаборыГруппДоступа.Наименование КАК Наименование,
СправочникНаборыГруппДоступа.ДляВнешнихПользователей КАК ДляВнешнихПользователей,
СправочникНаборыГруппДоступа.ТипЭлементовНабора КАК ТипЭлементовНабора,
ТИПЗНАЧЕНИЯ(СправочникНаборыГруппДоступа.ТипЭлементовНабора) КАК ТипЭлементов,
СправочникНаборыГруппДоступа.НеИспользуетсяС КАК НеИспользуетсяС,
СправочникНаборыГруппДоступа.Пользователь КАК Пользователь,
ЕСТЬNULL(КоличествоГруппВНаборах.Количество, 0) КАК КоличествоГруппВНаборе,
ВЫБОР
КОГДА ТИПЗНАЧЕНИЯ(СправочникНаборыГруппДоступа.ТипЭлементовНабора) = ТИП(Справочник.ГруппыДоступа)
ТОГДА 1
КОГДА ТИПЗНАЧЕНИЯ(СправочникНаборыГруппДоступа.ТипЭлементовНабора) = ТИП(Справочник.ГруппыПользователей)
ТОГДА 2
КОГДА ТИПЗНАЧЕНИЯ(СправочникНаборыГруппДоступа.ТипЭлементовНабора) = ТИП(Справочник.Пользователи)
ТОГДА 3
КОГДА ТИПЗНАЧЕНИЯ(СправочникНаборыГруппДоступа.ТипЭлементовНабора) = ТИП(Справочник.ГруппыВнешнихПользователей)
ТОГДА 4
КОГДА ТИПЗНАЧЕНИЯ(СправочникНаборыГруппДоступа.ТипЭлементовНабора) = ТИП(Справочник.ВнешниеПользователи)
ТОГДА 5
ИНАЧЕ 0
КОНЕЦ КАК ПорядокПоТипу,
СправочникНаборыГруппДоступа.Предопределенный КАК Предопределенный,
СправочникНаборыГруппДоступа.ИмяПредопределенныхДанных КАК ИмяПредопределенныхДанных
ИЗ
Справочник.НаборыГруппДоступа КАК СправочникНаборыГруппДоступа
ЛЕВОЕ СОЕДИНЕНИЕ (ВЫБРАТЬ
Группы.Ссылка КАК Набор,
КОЛИЧЕСТВО(Группы.Ссылка) КАК Количество
ИЗ
Справочник.НаборыГруппДоступа.Группы КАК Группы
СГРУППИРОВАТЬ ПО
Группы.Ссылка) КАК КоличествоГруппВНаборах
ПО (КоличествоГруппВНаборах.Набор = СправочникНаборыГруппДоступа.Ссылка)</queryText>
<mainTable>Catalog.НаборыГруппДоступа</mainTable>
<dynamicDataRead>true</dynamicDataRead>
<autoFillAvailableFields>true</autoFillAvailableFields>
<customQuery>true</customQuery>
<autoSaveUserSettings>true</autoSaveUserSettings>
<getInvisibleFieldPresentations>true</getInvisibleFieldPresentations>
</extInfo>
</attributes>
<formCommands>
<name>ВключитьВозможностьРедактирования</name>
<title>
<key>ru</key>
<value>Включить возможность редактирования</value>
</title>
<id>1</id>
<toolTip>
<key>ru</key>
<value>Включить возможность редактирования только для целей поиска неисправности (требуется углубленное понимание работы механизма)</value>
</toolTip>
<use>
<common>true</common>
</use>
<action xsi:type="form:FormCommandHandlerContainer">
<handler>
<name>ВключитьВозможностьРедактирования</name>
</handler>
</action>
<currentRowUse>DontUse</currentRowUse>
<selectedRowsUse>Auto</selectedRowsUse>
</formCommands>
<commandInterface>
<navigationPanel/>
<commandBar/>
</commandInterface>
<extInfo xsi:type="form:DynamicListFormExtInfo"/>
</form:Form>
@@ -0,0 +1,32 @@
#Область ОбработчикиСобытийФормы
&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
Если Параметры.Свойство("АвтоТест") Тогда // Возврат при получении формы для анализа.
Возврат;
КонецЕсли;
ТолькоПросмотр = Истина;
Если Параметры.РежимВыбора Тогда
СтандартныеПодсистемыСервер.УстановитьКлючНазначенияФормы(ЭтотОбъект, "ВыборПодбор");
РежимОткрытияОкна = РежимОткрытияОкнаФормы.БлокироватьОкноВладельца;
Иначе
Элементы.Список.РежимВыбора = Ложь;
КонецЕсли;
КонецПроцедуры
#КонецОбласти
#Область ОбработчикиКомандФормы
&НаКлиенте
Процедура ВключитьВозможностьРедактирования(Команда)
ТолькоПросмотр = Ложь;
КонецПроцедуры
#КонецОбласти
@@ -0,0 +1,803 @@
<?xml version="1.0" encoding="UTF-8"?>
<form:Form xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:core="http://g5.1c.ru/v8/dt/mcore" xmlns:form="http://g5.1c.ru/v8/dt/form">
<items xsi:type="form:FormField">
<name>Наименование</name>
<id>1</id>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<dataPath xsi:type="form:DataPath">
<segments>Объект.Description</segments>
</dataPath>
<extendedTooltip>
<name>НаименованиеРасширеннаяПодсказка</name>
<id>3</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<contextMenu>
<name>НаименованиеКонтекстноеМеню</name>
<id>2</id>
<autoFill>true</autoFill>
</contextMenu>
<type>InputField</type>
<editMode>Auto</editMode>
<showInHeader>true</showInHeader>
<headerHorizontalAlign>Left</headerHorizontalAlign>
<showInFooter>true</showInFooter>
<extInfo xsi:type="form:InputFieldExtInfo">
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<wrap>true</wrap>
<chooseType>true</chooseType>
<typeDomainEnabled>true</typeDomainEnabled>
<textEdit>true</textEdit>
<textSize>Normal</textSize>
</extInfo>
</items>
<items xsi:type="form:FormGroup">
<name>ГоризонтальнаяГруппа</name>
<id>55</id>
<items xsi:type="form:FormField">
<name>НеИспользуетсяС</name>
<id>4</id>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<dataPath xsi:type="form:DataPath">
<segments>Объект.НеИспользуетсяС</segments>
</dataPath>
<extendedTooltip>
<name>НеИспользуетсяСРасширеннаяПодсказка</name>
<id>6</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<contextMenu>
<name>НеИспользуетсяСКонтекстноеМеню</name>
<id>5</id>
<autoFill>true</autoFill>
</contextMenu>
<type>CheckBoxField</type>
<editMode>Auto</editMode>
<showInHeader>true</showInHeader>
<headerHorizontalAlign>Left</headerHorizontalAlign>
<showInFooter>true</showInFooter>
<extInfo xsi:type="form:CheckBoxFieldExtInfo"/>
</items>
<items xsi:type="form:FormField">
<name>ДляВнешнихПользователей</name>
<id>52</id>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<dataPath xsi:type="form:DataPath">
<segments>Объект.ДляВнешнихПользователей</segments>
</dataPath>
<titleLocation>Right</titleLocation>
<extendedTooltip>
<name>ДляВнешнихПользователейРасширеннаяПодсказка</name>
<id>54</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<contextMenu>
<name>ДляВнешнихПользователейКонтекстноеМеню</name>
<id>53</id>
<autoFill>true</autoFill>
</contextMenu>
<type>CheckBoxField</type>
<editMode>Enter</editMode>
<showInHeader>true</showInHeader>
<headerHorizontalAlign>Left</headerHorizontalAlign>
<showInFooter>true</showInFooter>
<extInfo xsi:type="form:CheckBoxFieldExtInfo"/>
</items>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<title>
<key>ru</key>
<value>Горизонтальная группа</value>
</title>
<extendedTooltip>
<name>ГоризонтальнаяГруппаРасширеннаяПодсказка</name>
<id>56</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<type>UsualGroup</type>
<extInfo xsi:type="form:UsualGroupExtInfo">
<group>HorizontalIfPossible</group>
<behavior>Auto</behavior>
<showLeftMargin>true</showLeftMargin>
<united>true</united>
<throughAlign>Auto</throughAlign>
<currentRowUse>Auto</currentRowUse>
</extInfo>
</items>
<items xsi:type="form:FormField">
<name>ТипЭлементовНабора</name>
<id>10</id>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<dataPath xsi:type="form:DataPath">
<segments>Объект.ТипЭлементовНабора</segments>
</dataPath>
<handlers>
<event>OnChange</event>
<name>ТипЭлементовНабораПриИзменении</name>
</handlers>
<extendedTooltip>
<name>ТипЭлементовНабораРасширеннаяПодсказка</name>
<id>12</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<contextMenu>
<name>ТипЭлементовНабораКонтекстноеМеню</name>
<id>11</id>
<autoFill>true</autoFill>
</contextMenu>
<type>InputField</type>
<editMode>Auto</editMode>
<showInHeader>true</showInHeader>
<headerHorizontalAlign>Left</headerHorizontalAlign>
<showInFooter>true</showInFooter>
<extInfo xsi:type="form:InputFieldExtInfo">
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<wrap>true</wrap>
<dropListButton>false</dropListButton>
<choiceButtonRepresentation>ShowInInputField</choiceButtonRepresentation>
<openButton>false</openButton>
<createButton>false</createButton>
<listChoiceMode>true</listChoiceMode>
<chooseType>true</chooseType>
<typeDomainEnabled>true</typeDomainEnabled>
<textEdit>true</textEdit>
<textSize>Normal</textSize>
</extInfo>
</items>
<items xsi:type="form:FormGroup">
<name>РеквизитыНаборов</name>
<id>34</id>
<items xsi:type="form:FormGroup">
<name>РеквизитыНабораГрупп</name>
<id>36</id>
<items xsi:type="form:Table">
<name>Группы</name>
<id>13</id>
<title>
<key>ru</key>
<value>Группы</value>
</title>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<dataPath xsi:type="form:DataPath">
<segments>Объект.Группы</segments>
</dataPath>
<titleLocation>None</titleLocation>
<items xsi:type="form:FormField">
<name>ГруппыНомерСтроки</name>
<id>26</id>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<dataPath xsi:type="form:DataPath">
<segments>Объект.Группы.LineNumber</segments>
</dataPath>
<extendedTooltip>
<name>ГруппыНомерСтрокиРасширеннаяПодсказка</name>
<id>28</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<contextMenu>
<name>ГруппыНомерСтрокиКонтекстноеМеню</name>
<id>27</id>
<autoFill>true</autoFill>
</contextMenu>
<type>LabelField</type>
<editMode>Auto</editMode>
<showInHeader>true</showInHeader>
<headerHorizontalAlign>Left</headerHorizontalAlign>
<showInFooter>true</showInFooter>
<extInfo xsi:type="form:LabelFieldExtInfo">
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
</extInfo>
</items>
<items xsi:type="form:FormField">
<name>ГруппыГруппа</name>
<id>29</id>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<dataPath xsi:type="form:DataPath">
<segments>Объект.Группы.Группа</segments>
</dataPath>
<extendedTooltip>
<name>ГруппыГруппаРасширеннаяПодсказка</name>
<id>31</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<contextMenu>
<name>ГруппыГруппаКонтекстноеМеню</name>
<id>30</id>
<autoFill>true</autoFill>
</contextMenu>
<type>InputField</type>
<editMode>Auto</editMode>
<showInHeader>true</showInHeader>
<headerHorizontalAlign>Left</headerHorizontalAlign>
<showInFooter>true</showInFooter>
<extInfo xsi:type="form:InputFieldExtInfo">
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<wrap>true</wrap>
<chooseType>true</chooseType>
<typeDomainEnabled>true</typeDomainEnabled>
<textEdit>true</textEdit>
<textSize>Normal</textSize>
</extInfo>
</items>
<autoCommandBar>
<name>ГруппыКоманднаяПанель</name>
<id>15</id>
<horizontalAlign>Left</horizontalAlign>
<autoFill>true</autoFill>
</autoCommandBar>
<searchStringAddition>
<name>ГруппыСтрокаПоиска</name>
<id>17</id>
<extendedTooltip>
<name>ГруппыСтрокаПоискаРасширеннаяПодсказка</name>
<id>19</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<contextMenu>
<name>ГруппыСтрокаПоискаКонтекстноеМеню</name>
<id>18</id>
<autoFill>true</autoFill>
</contextMenu>
<source>Группы</source>
<extInfo xsi:type="form:SearchStringAdditionExtInfo">
<autoMaxWidth>true</autoMaxWidth>
</extInfo>
</searchStringAddition>
<viewStatusAddition>
<name>ГруппыСостояниеПросмотра</name>
<id>20</id>
<extendedTooltip>
<name>ГруппыСостояниеПросмотраРасширеннаяПодсказка</name>
<id>22</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<contextMenu>
<name>ГруппыСостояниеПросмотраКонтекстноеМеню</name>
<id>21</id>
<autoFill>true</autoFill>
</contextMenu>
<type>ViewStatusAddition</type>
<source>Группы</source>
<extInfo xsi:type="form:ViewStatusAdditionExtInfo">
<autoMaxWidth>true</autoMaxWidth>
</extInfo>
</viewStatusAddition>
<searchControlAddition>
<name>ГруппыУправлениеПоиском</name>
<id>23</id>
<extendedTooltip>
<name>ГруппыУправлениеПоискомРасширеннаяПодсказка</name>
<id>25</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<contextMenu>
<name>ГруппыУправлениеПоискомКонтекстноеМеню</name>
<id>24</id>
<autoFill>true</autoFill>
</contextMenu>
<type>SearchControlAddition</type>
<source>Группы</source>
<extInfo xsi:type="form:SearchControlAdditionExtInfo">
<autoMaxWidth>true</autoMaxWidth>
</extInfo>
</searchControlAddition>
<extendedTooltip>
<name>ГруппыРасширеннаяПодсказка</name>
<id>16</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<contextMenu>
<name>ГруппыКонтекстноеМеню</name>
<id>14</id>
<autoFill>true</autoFill>
</contextMenu>
<changeRowSet>true</changeRowSet>
<changeRowOrder>true</changeRowOrder>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<autoMaxRowsCount>true</autoMaxRowsCount>
<selectionMode>MultiRow</selectionMode>
<header>true</header>
<headerHeight>1</headerHeight>
<footerHeight>1</footerHeight>
<horizontalScrollBar>AutoUse</horizontalScrollBar>
<verticalScrollBar>AutoUse</verticalScrollBar>
<horizontalLines>true</horizontalLines>
<verticalLines>true</verticalLines>
<useAlternationRowColorBWA>false</useAlternationRowColorBWA>
<autoInsertNewRow>true</autoInsertNewRow>
<searchOnInput>Auto</searchOnInput>
<initialListView>Auto</initialListView>
<horizontalStretch>true</horizontalStretch>
<verticalStretch>true</verticalStretch>
<enableStartDrag>true</enableStartDrag>
<enableDrag>true</enableDrag>
<autoMaxCardHeight>true</autoMaxCardHeight>
<rowFilter xsi:type="core:UndefinedValue"/>
</items>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<title>
<key>ru</key>
<value>Реквизиты набора групп</value>
</title>
<extendedTooltip>
<name>РеквизитыНабораГруппРасширеннаяПодсказка</name>
<id>37</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<type>Page</type>
<extInfo xsi:type="form:PageGroupExtInfo">
<group>Vertical</group>
<showTitle>auto</showTitle>
<scrollOnCompress>false</scrollOnCompress>
</extInfo>
</items>
<items xsi:type="form:FormGroup">
<name>РеквизитыНабораИзОдногоПользователя</name>
<id>38</id>
<items xsi:type="form:FormField">
<name>Пользователь</name>
<id>7</id>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<dataPath xsi:type="form:DataPath">
<segments>Объект.Пользователь</segments>
</dataPath>
<extendedTooltip>
<name>ПользовательРасширеннаяПодсказка</name>
<id>9</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<contextMenu>
<name>ПользовательКонтекстноеМеню</name>
<id>8</id>
<autoFill>true</autoFill>
</contextMenu>
<type>InputField</type>
<editMode>Auto</editMode>
<showInHeader>true</showInHeader>
<headerHorizontalAlign>Left</headerHorizontalAlign>
<showInFooter>true</showInFooter>
<extInfo xsi:type="form:InputFieldExtInfo">
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<wrap>true</wrap>
<chooseType>true</chooseType>
<typeDomainEnabled>true</typeDomainEnabled>
<textEdit>true</textEdit>
<textSize>Normal</textSize>
</extInfo>
</items>
<items xsi:type="form:FormField">
<name>РазрешенныйНаборГруппДоступа</name>
<id>40</id>
<title>
<key>ru</key>
<value>Разрешенный набор
групп доступа</value>
</title>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<dataPath xsi:type="form:DataPath">
<segments>Объект.РазрешенныйНаборГруппДоступа</segments>
</dataPath>
<extendedTooltip>
<name>РазрешенныйНаборГруппДоступаРасширеннаяПодсказка</name>
<id>42</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<contextMenu>
<name>РазрешенныйНаборГруппДоступаКонтекстноеМеню</name>
<id>41</id>
<autoFill>true</autoFill>
</contextMenu>
<type>InputField</type>
<editMode>Enter</editMode>
<showInHeader>true</showInHeader>
<headerHorizontalAlign>Left</headerHorizontalAlign>
<showInFooter>true</showInFooter>
<extInfo xsi:type="form:InputFieldExtInfo">
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<wrap>true</wrap>
<chooseType>true</chooseType>
<typeDomainEnabled>true</typeDomainEnabled>
<textEdit>true</textEdit>
<textSize>Normal</textSize>
</extInfo>
</items>
<items xsi:type="form:FormField">
<name>РазрешенныйНаборГруппПользователей</name>
<id>43</id>
<title>
<key>ru</key>
<value>Разрешенный набор
групп пользователей</value>
</title>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<dataPath xsi:type="form:DataPath">
<segments>Объект.РазрешенныйНаборГруппПользователей</segments>
</dataPath>
<extendedTooltip>
<name>РазрешенныйНаборГруппПользователейРасширеннаяПодсказка</name>
<id>45</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<contextMenu>
<name>РазрешенныйНаборГруппПользователейКонтекстноеМеню</name>
<id>44</id>
<autoFill>true</autoFill>
</contextMenu>
<type>InputField</type>
<editMode>Enter</editMode>
<showInHeader>true</showInHeader>
<headerHorizontalAlign>Left</headerHorizontalAlign>
<showInFooter>true</showInFooter>
<extInfo xsi:type="form:InputFieldExtInfo">
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<wrap>true</wrap>
<chooseType>true</chooseType>
<typeDomainEnabled>true</typeDomainEnabled>
<textEdit>true</textEdit>
<textSize>Normal</textSize>
</extInfo>
</items>
<items xsi:type="form:FormField">
<name>НовыйНаборГруппДоступа</name>
<id>46</id>
<title>
<key>ru</key>
<value>Новый набор
групп доступа</value>
</title>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<dataPath xsi:type="form:DataPath">
<segments>Объект.НовыйНаборГруппДоступа</segments>
</dataPath>
<extendedTooltip>
<name>НовыйНаборГруппДоступаРасширеннаяПодсказка</name>
<id>48</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<contextMenu>
<name>НовыйНаборГруппДоступаКонтекстноеМеню</name>
<id>47</id>
<autoFill>true</autoFill>
</contextMenu>
<type>InputField</type>
<editMode>Enter</editMode>
<showInHeader>true</showInHeader>
<headerHorizontalAlign>Left</headerHorizontalAlign>
<showInFooter>true</showInFooter>
<extInfo xsi:type="form:InputFieldExtInfo">
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<wrap>true</wrap>
<chooseType>true</chooseType>
<typeDomainEnabled>true</typeDomainEnabled>
<textEdit>true</textEdit>
<textSize>Normal</textSize>
</extInfo>
</items>
<items xsi:type="form:FormField">
<name>НовыйНаборГруппПользователей</name>
<id>49</id>
<title>
<key>ru</key>
<value>Новый набор
групп пользователей</value>
</title>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<dataPath xsi:type="form:DataPath">
<segments>Объект.НовыйНаборГруппПользователей</segments>
</dataPath>
<extendedTooltip>
<name>НовыйНаборГруппПользователейРасширеннаяПодсказка</name>
<id>51</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<contextMenu>
<name>НовыйНаборГруппПользователейКонтекстноеМеню</name>
<id>50</id>
<autoFill>true</autoFill>
</contextMenu>
<type>InputField</type>
<editMode>Enter</editMode>
<showInHeader>true</showInHeader>
<headerHorizontalAlign>Left</headerHorizontalAlign>
<showInFooter>true</showInFooter>
<extInfo xsi:type="form:InputFieldExtInfo">
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<wrap>true</wrap>
<chooseType>true</chooseType>
<typeDomainEnabled>true</typeDomainEnabled>
<textEdit>true</textEdit>
<textSize>Normal</textSize>
</extInfo>
</items>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<title>
<key>ru</key>
<value>Реквизиты набора из одного пользователя</value>
</title>
<extendedTooltip>
<name>РеквизитыНабораИзОдногоПользователяРасширеннаяПодсказка</name>
<id>39</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<type>Page</type>
<extInfo xsi:type="form:PageGroupExtInfo">
<group>Vertical</group>
<verticalSpacing>Double</verticalSpacing>
<showTitle>auto</showTitle>
<scrollOnCompress>false</scrollOnCompress>
</extInfo>
</items>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<title>
<key>ru</key>
<value>Реквизиты наборов</value>
</title>
<extendedTooltip>
<name>РеквизитыНаборовРасширеннаяПодсказка</name>
<id>35</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<type>Pages</type>
<extInfo xsi:type="form:PagesGroupExtInfo">
<pagesRepresentation>TabsOnTop</pagesRepresentation>
<currentRowUse>Auto</currentRowUse>
</extInfo>
</items>
<autoCommandBar>
<name>ФормаКоманднаяПанель</name>
<id>-1</id>
<items xsi:type="form:Button">
<name>ФормаВключитьВозможностьРедактирования</name>
<id>32</id>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<extendedTooltip>
<name>ФормаВключитьВозможностьРедактированияExtendedTooltip</name>
<id>33</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<commandName>Form.Command.ВключитьВозможностьРедактирования</commandName>
<buttonImportance>Normal</buttonImportance>
<representation>Auto</representation>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<placementArea>UserCmds</placementArea>
<representationInContextMenu>Auto</representationInContextMenu>
<locationInCommandBar>InAdditionalSubmenu</locationInCommandBar>
</items>
<horizontalAlign>Left</horizontalAlign>
<autoFill>true</autoFill>
</autoCommandBar>
<handlers>
<event>OnCreateAtServer</event>
<name>ПриСозданииНаСервере</name>
</handlers>
<windowOpeningMode>LockOwner</windowOpeningMode>
<saveWindowSettings>true</saveWindowSettings>
<autoTitle>true</autoTitle>
<autoUrl>true</autoUrl>
<group>Vertical</group>
<autoFillCheck>true</autoFillCheck>
<allowFormCustomize>true</allowFormCustomize>
<enabled>true</enabled>
<showTitle>auto</showTitle>
<showCloseButton>true</showCloseButton>
<attributes>
<name>Объект</name>
<id>1</id>
<valueType>
<types>CatalogObject.НаборыГруппДоступа</types>
</valueType>
<view>
<common>true</common>
</view>
<edit>
<common>true</common>
</edit>
<main>true</main>
<savedData>true</savedData>
</attributes>
<formCommands>
<name>ВключитьВозможностьРедактирования</name>
<title>
<key>ru</key>
<value>Включить возможность редактирования</value>
</title>
<id>1</id>
<toolTip>
<key>ru</key>
<value>Включить возможность редактирования только для целей поиска неисправности (требуется углубленное понимание работы механизма)</value>
</toolTip>
<use>
<common>true</common>
</use>
<action xsi:type="form:FormCommandHandlerContainer">
<handler>
<name>ВключитьВозможностьРедактирования</name>
</handler>
</action>
<currentRowUse>DontUse</currentRowUse>
<selectedRowsUse>Auto</selectedRowsUse>
</formCommands>
<commandInterface>
<navigationPanel/>
<commandBar/>
</commandInterface>
<extInfo xsi:type="form:CatalogFormExtInfo"/>
</form:Form>
@@ -0,0 +1,78 @@
#Область ОбработчикиСобытийФормы
&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
Если Параметры.Свойство("АвтоТест") Тогда // Возврат при получении формы для анализа.
Возврат;
КонецЕсли;
ТолькоПросмотр = Истина;
СписокВыбора = Элементы.ТипЭлементовНабора.СписокВыбора;
ДобавитьЭлементСписка(СписокВыбора, "ГруппыДоступа");
ДобавитьЭлементСписка(СписокВыбора, "ГруппыПользователей");
ДобавитьЭлементСписка(СписокВыбора, "Пользователи");
ДобавитьЭлементСписка(СписокВыбора, "ГруппыВнешнихПользователей");
ДобавитьЭлементСписка(СписокВыбора, "ВнешниеПользователи");
УстановитьСтраницуРеквизитовПоТипу(ЭтотОбъект);
КонецПроцедуры
#КонецОбласти
#Область ОбработчикиСобытийЭлементовШапкиФормы
&НаКлиенте
Процедура ТипЭлементовНабораПриИзменении(Элемент)
УстановитьСтраницуРеквизитовПоТипу(ЭтотОбъект);
Объект.Группы.Очистить();
КонецПроцедуры
#КонецОбласти
#Область ОбработчикиКомандФормы
&НаКлиенте
Процедура ВключитьВозможностьРедактирования(Команда)
ТолькоПросмотр = Ложь;
ПоказатьПредупреждение(,
НСтр("ru = 'Набор групп доступа не следует изменять, так как он сопоставлен с разными ключами доступа.
|Чтобы исправить нестандартную проблему следует удалить набор групп доступа или
|связь с ним в регистрах и выполнить процедуру обновления доступа.'"));
КонецПроцедуры
#КонецОбласти
#Область СлужебныеПроцедурыИФункции
&НаСервере
Процедура ДобавитьЭлементСписка(СписокВыбора, ИмяСправочника)
ПустойИдентификатор = Новый УникальныйИдентификатор("00000000-0000-0000-0000-000000000000");
СписокВыбора.Добавить(Справочники[ИмяСправочника].ПолучитьСсылку(ПустойИдентификатор),
Метаданные.Справочники[ИмяСправочника].Представление());
КонецПроцедуры
&НаКлиентеНаСервереБезКонтекста
Процедура УстановитьСтраницуРеквизитовПоТипу(Форма)
Если ТипЗнч(Форма.Объект.ТипЭлементовНабора) = Тип("СправочникСсылка.Пользователи")
Или ТипЗнч(Форма.Объект.ТипЭлементовНабора) = Тип("СправочникСсылка.ВнешниеПользователи") Тогда
Форма.Элементы.РеквизитыНаборов.ТекущаяСтраница = Форма.Элементы.РеквизитыНабораИзОдногоПользователя;
Иначе
Форма.Элементы.РеквизитыНаборов.ТекущаяСтраница = Форма.Элементы.РеквизитыНабораГрупп;
КонецЕсли;
КонецПроцедуры
#КонецОбласти
Whitespace-only changes.
Whitespace-only changes.
@@ -0,0 +1,408 @@
<?xml version="1.0" encoding="UTF-8"?>
<mdclass:Catalog xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:core="http://g5.1c.ru/v8/dt/mcore" xmlns:mdclass="http://g5.1c.ru/v8/dt/metadata/mdclass" uuid="d903569d-911d-4277-a26f-afe2bf67eb09">
<producedTypes>
<objectType typeId="5d31ecc3-05b7-4b3e-bfff-0ff0352835ad" valueTypeId="984c8c71-420b-47f7-9c0a-35a7d9c89502"/>
<refType typeId="576e5f64-705d-45e5-8bdf-7df60320a6de" valueTypeId="b36c482c-f8af-44c8-98a2-77768da09852"/>
<selectionType typeId="040924de-ea12-4c24-a844-b654bc597c24" valueTypeId="beb3c402-2cb3-4c00-8d8d-23dd099a1e3d"/>
<listType typeId="3435d145-9082-4364-bf0e-80131e1c7277" valueTypeId="34066630-edc9-45d7-a708-d78cea6ee265"/>
<managerType typeId="15882e1e-5b7a-455a-9f3c-ac76aa22849e" valueTypeId="030e0e0c-de82-4373-90fd-1bdb181c7e13"/>
</producedTypes>
<name>НаборыГруппДоступа</name>
<synonym>
<key>ru</key>
<value>Наборы групп доступа</value>
</synonym>
<inputByString>Catalog.НаборыГруппДоступа.StandardAttribute.Description</inputByString>
<fullTextSearchOnInputByString>DontUse</fullTextSearchOnInputByString>
<standardAttributes>
<dataHistory>Use</dataHistory>
<name>PredefinedDataName</name>
<fillValue xsi:type="core:UndefinedValue"/>
<fullTextSearch>Use</fullTextSearch>
<minValue xsi:type="core:UndefinedValue"/>
<maxValue xsi:type="core:UndefinedValue"/>
</standardAttributes>
<standardAttributes>
<dataHistory>Use</dataHistory>
<name>Predefined</name>
<fillValue xsi:type="core:UndefinedValue"/>
<fullTextSearch>Use</fullTextSearch>
<minValue xsi:type="core:UndefinedValue"/>
<maxValue xsi:type="core:UndefinedValue"/>
</standardAttributes>
<standardAttributes>
<dataHistory>Use</dataHistory>
<name>Ref</name>
<fillValue xsi:type="core:UndefinedValue"/>
<fullTextSearch>Use</fullTextSearch>
<minValue xsi:type="core:UndefinedValue"/>
<maxValue xsi:type="core:UndefinedValue"/>
</standardAttributes>
<standardAttributes>
<dataHistory>Use</dataHistory>
<name>DeletionMark</name>
<fillValue xsi:type="core:UndefinedValue"/>
<fullTextSearch>Use</fullTextSearch>
<minValue xsi:type="core:UndefinedValue"/>
<maxValue xsi:type="core:UndefinedValue"/>
</standardAttributes>
<standardAttributes>
<dataHistory>Use</dataHistory>
<name>IsFolder</name>
<fillValue xsi:type="core:UndefinedValue"/>
<fullTextSearch>Use</fullTextSearch>
<minValue xsi:type="core:UndefinedValue"/>
<maxValue xsi:type="core:UndefinedValue"/>
</standardAttributes>
<standardAttributes>
<dataHistory>Use</dataHistory>
<name>Owner</name>
<fillFromFillingValue>true</fillFromFillingValue>
<fillValue xsi:type="core:UndefinedValue"/>
<fillChecking>ShowError</fillChecking>
<fullTextSearch>Use</fullTextSearch>
<minValue xsi:type="core:UndefinedValue"/>
<maxValue xsi:type="core:UndefinedValue"/>
</standardAttributes>
<standardAttributes>
<dataHistory>Use</dataHistory>
<name>Parent</name>
<fillFromFillingValue>true</fillFromFillingValue>
<fillValue xsi:type="core:UndefinedValue"/>
<fullTextSearch>Use</fullTextSearch>
<minValue xsi:type="core:UndefinedValue"/>
<maxValue xsi:type="core:UndefinedValue"/>
</standardAttributes>
<standardAttributes>
<dataHistory>Use</dataHistory>
<name>Description</name>
<fillValue xsi:type="core:UndefinedValue"/>
<fillChecking>ShowError</fillChecking>
<fullTextSearch>Use</fullTextSearch>
<minValue xsi:type="core:UndefinedValue"/>
<maxValue xsi:type="core:UndefinedValue"/>
</standardAttributes>
<standardAttributes>
<dataHistory>Use</dataHistory>
<name>Code</name>
<fillValue xsi:type="core:UndefinedValue"/>
<fullTextSearch>Use</fullTextSearch>
<minValue xsi:type="core:UndefinedValue"/>
<maxValue xsi:type="core:UndefinedValue"/>
</standardAttributes>
<createOnInput>DontUse</createOnInput>
<dataLockControlMode>Managed</dataLockControlMode>
<objectPresentation>
<key>ru</key>
<value>Набор групп доступа</value>
</objectPresentation>
<explanation>
<key>ru</key>
<value>Технологический справочник, который используется для объединения 2 вариантов по 3 группы элементов:
а) наборы групп доступа, наборы групп пользователей, пользователи;
б) наборы групп доступа, наборы групп внешних пользователей, внешние пользователи.</value>
</explanation>
<levelCount>2</levelCount>
<foldersOnTop>true</foldersOnTop>
<descriptionLength>80</descriptionLength>
<codeType>String</codeType>
<codeAllowedLength>Variable</codeAllowedLength>
<defaultPresentation>AsDescription</defaultPresentation>
<editType>InDialog</editType>
<choiceMode>BothWays</choiceMode>
<defaultObjectForm>Catalog.НаборыГруппДоступа.Form.ФормаЭлемента</defaultObjectForm>
<defaultListForm>Catalog.НаборыГруппДоступа.Form.ФормаСписка</defaultListForm>
<defaultChoiceForm>Catalog.НаборыГруппДоступа.Form.ФормаСписка</defaultChoiceForm>
<attributes uuid="b5ac7de5-565f-4637-b267-dde3637e336b">
<name>ДляВнешнихПользователей</name>
<synonym>
<key>ru</key>
<value>Для внешних пользователей</value>
</synonym>
<type>
<types>Boolean</types>
</type>
<toolTip>
<key>ru</key>
<value>Набор для внешних пользователей</value>
</toolTip>
<minValue xsi:type="core:UndefinedValue"/>
<maxValue xsi:type="core:UndefinedValue"/>
<fillValue xsi:type="core:UndefinedValue"/>
<indexing>Index</indexing>
<fullTextSearch>Use</fullTextSearch>
<dataHistory>Use</dataHistory>
</attributes>
<attributes uuid="d4a6ab09-259f-4476-834c-a2b57cdeac05">
<name>ТипЭлементовНабора</name>
<synonym>
<key>ru</key>
<value>Тип элементов набора</value>
</synonym>
<type>
<types>CatalogRef.ГруппыДоступа</types>
<types>CatalogRef.ВнешниеПользователи</types>
<types>CatalogRef.ГруппыВнешнихПользователей</types>
<types>CatalogRef.ГруппыПользователей</types>
<types>CatalogRef.Пользователи</types>
</type>
<toolTip>
<key>ru</key>
<value>Тип элементов набора (представлен пустой ссылкой справочников Группы доступа, Группы пользователей, Группы внешних пользователей, Пользователи, Внешние пользователи)</value>
</toolTip>
<minValue xsi:type="core:UndefinedValue"/>
<maxValue xsi:type="core:UndefinedValue"/>
<fillValue xsi:type="core:ReferenceValue">
<value>Catalog.ГруппыДоступа.EmptyRef</value>
</fillValue>
<indexing>Index</indexing>
<fullTextSearch>Use</fullTextSearch>
<dataHistory>Use</dataHistory>
</attributes>
<attributes uuid="8c9636c3-0a84-4575-b4c7-6d8bb588e1b0">
<name>НеИспользуетсяС</name>
<synonym>
<key>ru</key>
<value>Не используется с</value>
</synonym>
<type>
<types>Date</types>
<dateQualifiers/>
</type>
<toolTip>
<key>ru</key>
<value>Когда заполнено, тогда набор не используется ни одним из пользователей
по текущим настройкам, но еще может использоваться в параметрах сеансов.
Через сутки неиспользуемый набор удаляется.</value>
</toolTip>
<minValue xsi:type="core:UndefinedValue"/>
<maxValue xsi:type="core:UndefinedValue"/>
<fillValue xsi:type="core:UndefinedValue"/>
<indexing>Index</indexing>
<fullTextSearch>Use</fullTextSearch>
<dataHistory>Use</dataHistory>
</attributes>
<attributes uuid="76e03401-7c07-4037-a464-d7377852de1d">
<name>Пользователь</name>
<synonym>
<key>ru</key>
<value>Пользователь</value>
</synonym>
<type>
<types>CatalogRef.ВнешниеПользователи</types>
<types>CatalogRef.Пользователи</types>
</type>
<toolTip>
<key>ru</key>
<value>Пользователь или внешний пользователь набора из одного элемента (устранение составного типа в измерении регистра)</value>
</toolTip>
<minValue xsi:type="core:UndefinedValue"/>
<maxValue xsi:type="core:UndefinedValue"/>
<choiceParameterLinks>
<name>ТипЭлементовНабора</name>
<field>Catalog.НаборыГруппДоступа.Attribute.ТипЭлементовНабора</field>
</choiceParameterLinks>
<linkByType>
<field>Catalog.НаборыГруппДоступа.Attribute.ТипЭлементовНабора</field>
</linkByType>
<fillValue xsi:type="core:UndefinedValue"/>
<indexing>Index</indexing>
<fullTextSearch>Use</fullTextSearch>
<dataHistory>Use</dataHistory>
</attributes>
<attributes uuid="dc8239e8-fddf-411e-b51a-4230b63236cd">
<name>РазрешенныйНаборГруппДоступа</name>
<synonym>
<key>ru</key>
<value>Разрешенный набор групп доступа</value>
</synonym>
<type>
<types>CatalogRef.НаборыГруппДоступа</types>
</type>
<toolTip>
<key>ru</key>
<value>Когда свойство Пользователь заполнено означает разрешенный набор групп доступа этого пользователя</value>
</toolTip>
<minValue xsi:type="core:UndefinedValue"/>
<maxValue xsi:type="core:UndefinedValue"/>
<choiceParameterLinks>
<name>Отбор.ТипЭлементовНабора</name>
<field>Catalog.НаборыГруппДоступа.Attribute.ТипЭлементовНабора</field>
</choiceParameterLinks>
<choiceParameters>
<name>Отбор.ТипЭлементовНабора</name>
<value xsi:type="core:ReferenceValue">
<value>Catalog.ГруппыДоступа.EmptyRef</value>
</value>
</choiceParameters>
<fillValue xsi:type="core:UndefinedValue"/>
<indexing>Index</indexing>
<fullTextSearch>Use</fullTextSearch>
<dataHistory>Use</dataHistory>
</attributes>
<attributes uuid="3b861376-2864-4de8-ba59-2a2835d7eaf6">
<name>РазрешенныйНаборГруппПользователей</name>
<synonym>
<key>ru</key>
<value>Разрешенный набор групп пользователей</value>
</synonym>
<type>
<types>CatalogRef.НаборыГруппДоступа</types>
</type>
<toolTip>
<key>ru</key>
<value>Когда свойство Пользователь заполнено означает разрешенный набор групп пользователей этого пользователя</value>
</toolTip>
<minValue xsi:type="core:UndefinedValue"/>
<maxValue xsi:type="core:UndefinedValue"/>
<choiceParameterLinks>
<name>Отбор.ТипЭлементовНабора</name>
<field>Catalog.НаборыГруппДоступа.Attribute.ТипЭлементовНабора</field>
</choiceParameterLinks>
<choiceParameters>
<name>Отбор.ТипЭлементовНабора</name>
<value xsi:type="core:FixedArrayValue">
<values xsi:type="core:ReferenceValue">
<value>Catalog.ГруппыПользователей.EmptyRef</value>
</values>
<values xsi:type="core:ReferenceValue">
<value>Catalog.ГруппыВнешнихПользователей.EmptyRef</value>
</values>
</value>
</choiceParameters>
<fillValue xsi:type="core:UndefinedValue"/>
<indexing>Index</indexing>
<fullTextSearch>Use</fullTextSearch>
<dataHistory>Use</dataHistory>
</attributes>
<attributes uuid="02910dcd-9e66-4239-a421-8067faf59577">
<name>НовыйНаборГруппДоступа</name>
<synonym>
<key>ru</key>
<value>Новый набор групп доступа</value>
</synonym>
<type>
<types>CatalogRef.НаборыГруппДоступа</types>
</type>
<toolTip>
<key>ru</key>
<value>Когда свойство Пользователь заполнено означает новый набор групп доступа, который станет разрешенным набором этого пользователя после обновления регистров</value>
</toolTip>
<minValue xsi:type="core:UndefinedValue"/>
<maxValue xsi:type="core:UndefinedValue"/>
<choiceParameterLinks>
<name>Отбор.ТипЭлементовНабора</name>
<field>Catalog.НаборыГруппДоступа.Attribute.ТипЭлементовНабора</field>
</choiceParameterLinks>
<choiceParameters>
<name>Отбор.ТипЭлементовНабора</name>
<value xsi:type="core:ReferenceValue">
<value>Catalog.ГруппыДоступа.EmptyRef</value>
</value>
</choiceParameters>
<fillValue xsi:type="core:UndefinedValue"/>
<indexing>Index</indexing>
<fullTextSearch>Use</fullTextSearch>
<dataHistory>Use</dataHistory>
</attributes>
<attributes uuid="76d5a67f-bb11-4937-a66d-cdce28165562">
<name>НовыйНаборГруппПользователей</name>
<synonym>
<key>ru</key>
<value>Новый набор групп пользователей</value>
</synonym>
<type>
<types>CatalogRef.НаборыГруппДоступа</types>
</type>
<toolTip>
<key>ru</key>
<value>Когда свойство Пользователь заполнено означает новый набор групп пользователей, который станет разрешенным набором этого пользователя после обновления регистров</value>
</toolTip>
<minValue xsi:type="core:UndefinedValue"/>
<maxValue xsi:type="core:UndefinedValue"/>
<choiceParameterLinks>
<name>Отбор.ТипЭлементовНабора</name>
<field>Catalog.НаборыГруппДоступа.Attribute.ТипЭлементовНабора</field>
</choiceParameterLinks>
<choiceParameters>
<name>Отбор.ТипЭлементовНабора</name>
<value xsi:type="core:FixedArrayValue">
<values xsi:type="core:ReferenceValue">
<value>Catalog.ГруппыПользователей.EmptyRef</value>
</values>
<values xsi:type="core:ReferenceValue">
<value>Catalog.ГруппыВнешнихПользователей.EmptyRef</value>
</values>
</value>
</choiceParameters>
<fillValue xsi:type="core:UndefinedValue"/>
<indexing>Index</indexing>
<fullTextSearch>Use</fullTextSearch>
<dataHistory>Use</dataHistory>
</attributes>
<tabularSections uuid="b99a23a5-bfbf-46ec-8268-ff89afdfc63a">
<producedTypes>
<objectType typeId="d382879e-97b9-4406-98d1-38ab1d25a945" valueTypeId="7c28b991-992a-44b7-820e-38538e856c3c"/>
<rowType typeId="a7df3a56-3a1f-4b9c-91dc-55723f72160d" valueTypeId="54688589-bfa8-4ac8-ae10-31a81665ce3d"/>
</producedTypes>
<name>Группы</name>
<synonym>
<key>ru</key>
<value>Группы</value>
</synonym>
<standardAttributes>
<dataHistory>Use</dataHistory>
<name>LineNumber</name>
<fillValue xsi:type="core:UndefinedValue"/>
<fullTextSearch>Use</fullTextSearch>
<minValue xsi:type="core:UndefinedValue"/>
<maxValue xsi:type="core:UndefinedValue"/>
</standardAttributes>
<attributes uuid="cdb93924-62ce-4268-9915-e6c67c1b9cb8">
<name>Группа</name>
<synonym>
<key>ru</key>
<value>Группа</value>
</synonym>
<type>
<types>CatalogRef.ГруппыДоступа</types>
<types>CatalogRef.ГруппыВнешнихПользователей</types>
<types>CatalogRef.ГруппыПользователей</types>
</type>
<toolTip>
<key>ru</key>
<value>Группа доступа или группа пользователей или группа внешних пользователей, входящая в состав набора</value>
</toolTip>
<minValue xsi:type="core:UndefinedValue"/>
<maxValue xsi:type="core:UndefinedValue"/>
<choiceParameterLinks>
<name>ТипЭлементовНабора</name>
<field>Catalog.НаборыГруппДоступа.Attribute.ТипЭлементовНабора</field>
</choiceParameterLinks>
<linkByType>
<field>Catalog.НаборыГруппДоступа.Attribute.ТипЭлементовНабора</field>
</linkByType>
<dataHistory>Use</dataHistory>
<indexing>Index</indexing>
<fullTextSearch>Use</fullTextSearch>
</attributes>
</tabularSections>
<forms uuid="1139b6c7-7b55-45b4-98cf-ccac3bfaaa6c">
<name>ФормаСписка</name>
<synonym>
<key>ru</key>
<value>Форма списка</value>
</synonym>
<usePurposes>PersonalComputer</usePurposes>
<usePurposes>MobileDevice</usePurposes>
</forms>
<forms uuid="33c39990-f4fc-4629-83ba-b43b05a40ca6">
<name>ФормаЭлемента</name>
<synonym>
<key>ru</key>
<value>Форма элемента</value>
</synonym>
<usePurposes>PersonalComputer</usePurposes>
<usePurposes>MobileDevice</usePurposes>
</forms>
</mdclass:Catalog>
@@ -32,7 +32,7 @@
Элементы.ПоискИУдалениеДублей.Видимость = Ложь;
КонецЕсли;
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
Элементы.Переместить(Элементы.КоманднаяПанельФормы, Элементы.КоманднаяПанельФормыМобильныйКлиент);
@@ -12,7 +12,7 @@
Элементы.Список.ТекущаяСтрока = Параметры.ТекущаяПапка;
КонецЕсли;
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
Для каждого ЭлементФормы Из Элементы.КоманднаяПанель.ПодчиненныеЭлементы Цикл
@@ -5,7 +5,7 @@
Элементы.Срок.Подсказка = Метаданные.РегистрыСведений.СведенияОПользователях.Ресурсы.СрокДействия.Подсказка;
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
ПоложениеКоманднойПанели = ПоложениеКоманднойПанелиФормы.Авто;
@@ -26,7 +26,7 @@
ЗаполнитьПользователейИБ();
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
ПоложениеКоманднойПанели = ПоложениеКоманднойПанелиФормы.Авто;
@@ -617,6 +617,10 @@
<event>Drag</event>
<name>ГруппыПользователейПеретаскивание</name>
</handlers>
<handlers>
<event>OnChange</event>
<name>ГруппыПользователейПриИзменении</name>
</handlers>
<searchStringAddition>
<name>ГруппыПользователейСтрокаПоиска</name>
<id>165</id>
@@ -1036,6 +1040,10 @@
<event>BeforeRowChange</event>
<name>ПользователиСписокПередНачаломИзменения</name>
</handlers>
<handlers>
<event>OnChange</event>
<name>ПользователиСписокПриИзменении</name>
</handlers>
<searchStringAddition>
<name>ПользователиСписокСтрокаПоиска</name>
<id>174</id>
@@ -254,6 +254,13 @@
#Область ОбработчикиСобытийЭлементовТаблицыФормыГруппыПользователей
&НаКлиенте
Процедура ГруппыПользователейПриИзменении(Элемент)
СписокПриИзмененииНаСервере();
КонецПроцедуры
&НаКлиенте
Процедура ГруппыПользователейПриАктивизацииСтроки(Элемент)
@@ -399,6 +406,13 @@
#Область ОбработчикиСобытийЭлементовТаблицыФормыПользователиСписок
&НаКлиенте
Процедура ПользователиСписокПриИзменении(Элемент)
СписокПриИзмененииНаСервере();
КонецПроцедуры
&НаКлиенте
Процедура ПользователиСписокПриАктивизацииСтроки(Элемент)
@@ -1057,4 +1071,11 @@
КонецПроцедуры
&НаСервереБезКонтекста
Процедура СписокПриИзмененииНаСервере()
ПользователиСлужебный.ПослеИзмененияПользователяИлиГруппыПользователейВФорме();
КонецПроцедуры
#КонецОбласти
@@ -164,7 +164,7 @@
Элементы.ПотребоватьСменуПароляПриВходе.РасширеннаяПодсказка.Заголовок =
ПользователиСлужебный.ПодсказкаПотребоватьСменуПароляПриВходе(Ложь);
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
ОбщегоНазначенияКлиентСервер.УстановитьСвойствоЭлементаФормы(Элементы, "ФормаЗаписатьИЗакрыть", "Картинка", БиблиотекаКартинок.ЗаписатьИЗакрыть);
ОбщегоНазначенияКлиентСервер.УстановитьСвойствоЭлементаФормы(Элементы, "ФормаЗаписатьИЗакрыть", "Отображение", ОтображениеКнопки.Картинка);
@@ -375,6 +375,8 @@
ОбновитьСпособИзмененияEMailВСервисе();
ПользователиСлужебный.ПослеИзмененияПользователяИлиГруппыПользователейВФорме();
КонецПроцедуры
&НаКлиенте
@@ -23,7 +23,7 @@
Элементы.Создать.Вид = ВидГруппыФормы.ГруппаКнопок;
КонецЕсли;
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
Элементы.Переместить(Элементы.КоманднаяПанель, Элементы.ФормаКоманднаяПанель);
@@ -582,6 +582,10 @@
<horizontalAlign>Left</horizontalAlign>
<autoFill>true</autoFill>
</autoCommandBar>
<handlers>
<event>OnChange</event>
<name>СписокПриИзменении</name>
</handlers>
<searchStringAddition>
<name>СписокСтрокаПоиска</name>
<id>24</id>
@@ -85,6 +85,17 @@
#КонецОбласти
#Область ОбработчикиСобытийЭлементовТаблицыФормыСписок
&НаКлиенте
Процедура СписокПриИзменении(Элемент)
СписокПриИзмененииНаСервере();
КонецПроцедуры
#КонецОбласти
#Область ОбработчикиКомандФормы
&НаКлиенте
@@ -153,4 +164,11 @@
КонецПроцедуры
#КонецОбласти
&НаСервереБезКонтекста
Процедура СписокПриИзмененииНаСервере()
УправлениеДоступомСлужебный.ПослеИзмененияНастроекПравВФорме();
КонецПроцедуры
#КонецОбласти
@@ -144,6 +144,8 @@
УстановитьДоступностьОписанияИВосстановленияПоставляемогоПрофиля(ТекущийОбъект);
УправлениеДоступомСлужебный.ПослеИзмененияНастроекПравВФорме();
КонецПроцедуры
&НаКлиенте
@@ -665,6 +665,11 @@
НедоступныеРолиПоНазначению.Вставить(НазначениеПрофиля, НедоступныеРоли);
КонецЕсли;
Если ОписаниеПрофиля.Роли.Найти(Неопределено, "Роль") <> Неопределено Тогда
НесовместимыеПрофили.Добавить(ОписаниеПрофиля.Ссылка);
Продолжить;
КонецЕсли;
ОписаниеРолей = Справочники.ИдентификаторыОбъектовМетаданных.ОбъектыМетаданныхПоИдентификаторам(
ОписаниеПрофиля.Роли.ВыгрузитьКолонку("Роль"), Истина);
@@ -1107,6 +1112,19 @@
СвойстваПрофилей = Новый Соответствие;
ОписанияПрофилейМассив = Новый Массив;
Для Каждого ОписаниеПрофиля Из ОписанияПрофилей Цикл
// Идентификатор профиля.
Если Не ЗначениеЗаполнено(ОписаниеПрофиля.Идентификатор) Тогда
ВызватьИсключение ЗаголовокОшибки + СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
НСтр("ru = 'В описании профиля ""%1"" не заполнено свойство Идентификатор.'"),
?(ЗначениеЗаполнено(ОписаниеПрофиля.Имя), ОписаниеПрофиля.Имя, ОписаниеПрофиля.Наименование));
ИначеЕсли Не СтроковыеФункцииКлиентСервер.ЭтоУникальныйИдентификатор(ОписаниеПрофиля.Идентификатор) Тогда
ВызватьИсключение ЗаголовокОшибки + СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
НСтр("ru = 'В описании профиля ""%1"" указан некорректный идентификатор: ""%2"".'"),
?(ЗначениеЗаполнено(ОписаниеПрофиля.Имя), ОписаниеПрофиля.Имя, ОписаниеПрофиля.Наименование),
ОписаниеПрофиля.Идентификатор);
КонецЕсли;
// Назначение профиля.
Если ОписаниеПрофиля.Назначение.Количество() = 0 Тогда
ОписаниеПрофиля.Назначение.Добавить(Тип("СправочникСсылка.Пользователи"));
@@ -19,7 +19,7 @@
КонецЕсли;
ВидимостьДоступность(ЭтотОбъект);
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
ОбщегоНазначенияКлиентСервер.УстановитьСвойствоЭлементаФормы(Элементы, "ФормаОК", "Картинка", БиблиотекаКартинок.ЗаписатьИЗакрыть);
@@ -27,7 +27,7 @@
Элементы.ВставитьИзБуфераОбмена.Видимость = Ложь;
КонецЕсли;
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
Элементы.Переместить(Элементы.ГруппаКоманднаяПанель, Элементы.ФормаКоманднаяПанель);
@@ -76,7 +76,7 @@
Элементы.СобытияРассылки.Видимость = Ложь;
КонецЕсли;
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
Элементы.Переместить(Элементы.КоманднаяПанель, Элементы.ФормаКоманднаяПанель);
@@ -232,7 +232,7 @@
Строка.НеОтправлятьПустой = Не Строка.ОтправлятьЕслиПустой;
КонецЦикла;
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
ОбщегоНазначенияКлиентСервер.УстановитьСвойствоЭлементаФормы(Элементы, "КомандаЗаписатьИЗакрыть", "Отображение", ОтображениеКнопки.Картинка);
ОбщегоНазначенияКлиентСервер.УстановитьСвойствоЭлементаФормы(Элементы, "КомандаЗаписатьИЗакрыть", "Картинка", БиблиотекаКартинок.ЗаписатьИЗакрыть);
@@ -1706,6 +1706,14 @@
&НаКлиенте
Процедура ПредпросмотрШаблона(Команда)
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
ПоказатьПредупреждение(, НСтр("ru ='Предварительный просмотр шаблона доступен в толстом, тонком или ВЕБ-клиенте.'"));
Возврат;
КонецЕсли;
ДобавитьШаблон();
Если ТекущийЭлемент = Элементы.ТекстПисьмаФорматированныйДокумент Тогда
@@ -47,7 +47,7 @@
Элементы.КлассификаторИзменить.Видимость = ЕстьПравоРедактироватьСтраны;
Элементы.Классификатор.ТолькоПросмотр = НЕ ЕстьПравоРедактироватьСтраны;
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
ПоложениеКоманднойПанели = ПоложениеКоманднойПанелиФормы.Авто;
@@ -61,7 +61,7 @@
КонецЕсли;
КонецЕсли;
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
ПоложениеКоманднойПанели = ПоложениеКоманднойПанелиФормы.Авто;
@@ -9,7 +9,7 @@
КонецЕсли;
Элементы.ПеренестиВсеФайлыВТома.Видимость = ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.РаботаСФайлами");
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
Элементы.Переместить(Элементы.КоманднаяПанель, Элементы.ФормаКоманднаяПанель);
@@ -42,7 +42,7 @@
Элементы.ПолныйПутьLinux.АвтоОтметкаНезаполненного = Истина;
КонецЕсли;
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
ОбщегоНазначенияКлиентСервер.УстановитьСвойствоЭлементаФормы(Элементы, "ФормаЗаписатьИЗакрыть", "Картинка", БиблиотекаКартинок.ЗаписатьИЗакрыть);
ОбщегоНазначенияКлиентСервер.УстановитьСвойствоЭлементаФормы(Элементы, "ФормаЗаписатьИЗакрыть", "Отображение", ОтображениеКнопки.Картинка);
@@ -42,7 +42,7 @@
ОбновитьПолныйПуть();
ОбновитьПояснениеОблачногоСервиса(Объект.Ссылка);
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
ОбщегоНазначенияКлиентСервер.УстановитьСвойствоЭлементаФормы(Элементы, "ФормаЗаписатьИЗакрыть", "Отображение", ОтображениеКнопки.Картинка);
ОбщегоНазначенияКлиентСервер.УстановитьСвойствоЭлементаФормы(Элементы, "ФормаОткрытьФайлДляПросмотра", "Отображение", ОтображениеКнопки.Картинка);
@@ -10,7 +10,7 @@
Предмет = Параметры.Предмет;
ДобавитьЭлементыФормыПараметровШаблона(Параметры.Шаблон);
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
Элементы.Переместить(Элементы.ГруппаКоманднаяПанельФормы, Элементы.ФормаКоманднаяПанель);
Элементы.ГруппаКоманднаяПанельФормы.Вид = ВидГруппыФормы.ГруппаКнопок;
@@ -33,7 +33,7 @@
ПредставлениеПараметра = Параметры.ПредставлениеПараметра;
ТипПараметра = Параметры.ОписаниеТипа;
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
Элементы.Переместить(Элементы.ГруппаКоманднаяПанельФормы, Элементы.ФормаКоманднаяПанель);
@@ -40,7 +40,7 @@
ЗаполнитьСписокДоступныхШаблонов();
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
ОбщегоНазначенияКлиентСервер.УстановитьСвойствоЭлементаФормы(Элементы, "ПредпросмотрОбычныйТекст", "ПоложениеЗаголовка", ПоложениеЗаголовкаЭлементаФормы.Авто);
ОбщегоНазначенияКлиентСервер.УстановитьСвойствоЭлементаФормы(Элементы, "ПредпросмотрФорматированныйДокумент", "ПоложениеЗаголовка", ПоложениеЗаголовкаЭлементаФормы.Авто);
@@ -25,7 +25,7 @@
Элементы.ФормаПоказыватьКонтекстныеШаблоны.Видимость = Пользователи.ЭтоПолноправныйПользователь();
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
Элементы.Переместить(Элементы.ГруппаКоманднаяПанельСписка, Элементы.ФормаКоманднаяПанель);
Элементы.ГруппаКоманднаяПанельСписка.Вид = ВидГруппыФормы.ГруппаКнопок;
@@ -61,7 +61,7 @@
Элементы.Назначение.Видимость = Ложь;
КонецЕсли;
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
ОбщегоНазначенияКлиентСервер.УстановитьСвойствоЭлементаФормы(Элементы, "ГруппаПараметры", "ОтображатьЗаголовок", Истина);
@@ -651,7 +651,7 @@
ПараметрыПисьма.Вставить("Копии", Копии);
КонецЕсли;
Если СкрытыеКопии.Количество() > 0 Тогда
ПараметрыПисьма.Вставить("СлепыеКопии", СкрытыеКопии);
ПараметрыПисьма.Вставить("СкрытыеКопии", СкрытыеКопии);
КонецЕсли;
СписокПолучателей = ОбщегоНазначенияКлиентСервер.АдресаЭлектроннойПочтыИзСтроки(АдресОтвета);
@@ -27,13 +27,20 @@
Результат = Новый Структура("Данные");
СтруктураОписанияОшибкиПоставщика(Результат);
// Веб сервис 1С, может быть на обслуживании.
Возврат Результат; // не подключен
// В модели сервиса веб-сервис доступен всегда.
Если Не ЗаполненыДанныеАутентификацииПользователяИнтернетПоддержки() Тогда
Возврат Результат; // ИПП не подключена.
КонецЕсли;
Попытка
ЗаполнитьВерсиюПоставщикаДанныхСервис1С(Результат);
Исключение
СтруктураОписанияОшибкиПоставщика(Результат, ИнформацияОбОшибке());
ЗаписьЖурналаРегистрации(СобытиеЖурналаРегистрации(), УровеньЖурналаРегистрации.Ошибка,,,
Результат.ПодробноеПредставлениеОшибки);
// Веб сервис 1С, может быть на обслуживании.
СтруктураОписанияОшибкиПоставщика(Результат, ИнформацияОбОшибке());
ЗаписьЖурналаРегистрации(СобытиеЖурналаРегистрации(), УровеньЖурналаРегистрации.Ошибка,,,
Результат.ПодробноеПредставлениеОшибки);
КонецПопытки;
Возврат Результат;
@@ -390,7 +397,7 @@
ПреобразоватьВводАдреса(СтрокаПоиска);
КонецЕсли;
Если ЗагруженныеАдресныеСведения["ИспользоватьЗагруженные"] Тогда
Если ЗагруженныеАдресныеСведения["ИспользоватьЗагруженные"] Или Уровень = 1 Тогда
ДополнительныеПараметры = Новый Структура("СтрокаПоиска", СтрокаПоиска);
ЗаполнитьАдресаДляИнтерактивногоВыбораВнутр(Результат, Родитель, Уровень, ТипАдреса, ДополнительныеПараметры);
@@ -772,7 +779,25 @@
КонецПопытки;
КонецЦикла;
Иначе
Для каждого АдресаДляПроверки Из МестоПроверки.ВебСервис Цикл
РезультатПроверки = Новый Структура();
РезультатПроверки.Вставить("id", "");
РезультатПроверки.Вставить("АдресПроверен", Ложь);
РезультатПроверки.Вставить("Варианты", Новый Массив);
РезультатПроверки.Вставить("Ошибки", Новый Массив);
ОписаниеОшибки = Новый Структура("Ключ,Текст,Подсказка");
ОписаниеОшибки.Ключ = "";
ОписаниеОшибки.Текст = НСтр("ru='Для данного региона не загружены адресные сведения.'");
РезультатПроверки.Ошибки.Добавить(ОписаниеОшибки);
Результат.Данные.Добавить(РезультатПроверки);
КонецЦикла;
КонецЕсли;
Возврат Результат;
@@ -966,32 +991,36 @@
// Получаем код КЛАДР из веб-сервиса.
Если ЗагруженныеАдресныеСведения["КлассификаторДоступен"] Или Источник = "Сервис1С" Тогда
ТекстGETЗапроса = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку("selectByCode?code=%1&codeType=ID",
Строка(ИдентификаторАдресногоОбъекта));
РезультатВебСервис = ВыполнитьЗапросЧерезВебСервис(ТекстGETЗапроса);
Если НЕ РезультатВебСервис.Отказ И РезультатВебСервис.Данные.Количество() > 0 Тогда
Если ЗначениеЗаполнено(ИдентификаторАдресногоОбъекта) Тогда
Сведения = РезультатВебСервис.Данные[0];
Если Не КодКЛАДРЗаполнены Тогда
Результат.КодыАдреса.КодКЛАДР = Сведения.codeKLADR;
СформироватьКодыКЛАДР(Результат.КодыАдреса.КодКЛАДР, Адрес, Результат.КодыКЛАДР);
КонецЕсли;
ТекстGETЗапроса = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку("selectByCode?code=%1&codeType=ID",
Строка(ИдентификаторАдресногоОбъекта));
Если Не ОсновныеКодыЗаполнены Тогда
РезультатВебСервис = ВыполнитьЗапросЧерезВебСервис(ТекстGETЗапроса);
Если НЕ РезультатВебСервис.Отказ И РезультатВебСервис.Данные.Количество() > 0 Тогда
Результат.КодыАдреса.Идентификатор = Сведения.Id;
Результат.КодыАдреса.КодКЛАДР = Формат(Сведения.codeKLADR,"ЧГ=0");
Результат.КодыАдреса.ОКАТО = Формат(Сведения.okato,"ЧГ=0");
Результат.КодыАдреса.ОКТМО = Формат(Сведения.oktmo,"ЧГ=0");
Результат.КодыАдреса.КодИФНСФЛ = Формат(Сведения.ifnsFlCode,"ЧГ=0");
Результат.КодыАдреса.КодИФНСЮЛ = Формат(Сведения.ifnsUlCode,"ЧГ=0");
Результат.КодыАдреса.КодУчасткаИФНСФЛ = Формат(Сведения.ifnsFlAreaCode,"ЧГ=0");
Результат.КодыАдреса.КодУчасткаИФНСЮЛ = Формат(Сведения.ifnsUlAreaCode,"ЧГ=0");
Сведения = РезультатВебСервис.Данные[0];
Если Не КодКЛАДРЗаполнены Тогда
Результат.КодыАдреса.КодКЛАДР = Сведения.codeKLADR;
СформироватьКодыКЛАДР(Результат.КодыАдреса.КодКЛАДР, Адрес, Результат.КодыКЛАДР);
КонецЕсли;
Если Не ОсновныеКодыЗаполнены Тогда
Результат.КодыАдреса.Идентификатор = Сведения.Id;
Результат.КодыАдреса.КодКЛАДР = Формат(Сведения.codeKLADR,"ЧГ=0");
Результат.КодыАдреса.ОКАТО = Формат(Сведения.okato,"ЧГ=0");
Результат.КодыАдреса.ОКТМО = Формат(Сведения.oktmo,"ЧГ=0");
Результат.КодыАдреса.КодИФНСФЛ = Формат(Сведения.ifnsFlCode,"ЧГ=0");
Результат.КодыАдреса.КодИФНСЮЛ = Формат(Сведения.ifnsUlCode,"ЧГ=0");
Результат.КодыАдреса.КодУчасткаИФНСФЛ = Формат(Сведения.ifnsFlAreaCode,"ЧГ=0");
Результат.КодыАдреса.КодУчасткаИФНСЮЛ = Формат(Сведения.ifnsUlAreaCode,"ЧГ=0");
КонецЕсли;
КонецЕсли;
КонецЕсли;
КонецЕсли;
@@ -1478,12 +1507,12 @@
Разделы.Добавить(Подсистема);
КонецЕсли;
// 1. Необходимость актуализировать адресный классификатор - в старом классификаторе больше нет записей о регионах.
УстаревшийКлассификатор = ЗаполненныеРегионыУстаревшегоКлассификатора();
// 1. Необходимость актуализировать адресный классификатор - в классификаторе нет записей о регионах.
ПоследнееОбновление = ОписаниеПоследнейЗагрузки();
Для Каждого Раздел Из Разделы Цикл
Дело = ТекущиеДела.Добавить();
Дело.Идентификатор = "АктуализацияАдресногоКлассификатора";
Дело.ЕстьДела = УстаревшийКлассификатор;
Дело.ЕстьДела = Не ЗначениеЗаполнено(ПоследнееОбновление.ДатаПоследнейЗагрузки);
Дело.Важное = Истина;
Дело.СкрыватьВНастройках = Истина;
Дело.Владелец = Раздел;
@@ -1491,7 +1520,7 @@
Дело.Количество = 0;
Дело.Подсказка = НСтр("ru = 'Автоподбор и проверка корректности адресов временно недоступны.'");
Дело.ПараметрыФормы = Новый Структура;
Дело.Форма = "РегистрСведений.АдресныеОбъекты.Форма.АктуализацияУстаревшегоКлассификатора";
Дело.Форма = "РегистрСведений.АдресныеОбъекты.Форма.ЗагрузкаАдресногоКлассификатора";
Если Дело.ЕстьДела = Истина Тогда
Возврат;
КонецЕсли;
@@ -1958,6 +1987,8 @@
//
Процедура УстановитьИдентификаторыАдресаПоЗагруженнымДанным(Адрес)
ЭтоМуниципальныйАдрес = АдресныйКлассификаторКлиентСервер.ЭтоМуниципальныйАдрес(Адрес.AddressType);
Запрос = Новый Запрос();
Запрос.Текст = "ВЫБРАТЬ ПЕРВЫЕ 20
@@ -2052,7 +2083,7 @@
| ПО ДомаЗданияСтроения.АдресныйОбъект = АдресныеОбъекты.Идентификатор
|";
Если АдресныйКлассификаторКлиентСервер.ЭтоМуниципальныйАдрес(Адрес.AddressType) Тогда
Если ЭтоМуниципальныйАдрес Тогда
Запрос.Текст = СтрЗаменить(Запрос.Текст, ".РодительскийИдентификатор", ".МуниципальныйРодительскийИдентификатор");
КонецЕсли;
@@ -2112,6 +2143,21 @@
Возврат;
КонецЕсли;
// Восстанавливаем недостающие адресные сведения
ДанныеАдреса = Новый Структура();
ДанныеАдреса.Вставить("Идентификатор", ИдентификаторАдресногоОбъекта);
ДанныеАдреса.Вставить("Муниципальный", ЭтоМуниципальныйАдрес);
Результат = АктуальныеАдресныеСведения(ДанныеАдреса);
Если Не Результат.Отказ Тогда
Если ЭтоМуниципальныйАдрес Тогда
ЗаполнитьЗначенияСвойств(Адрес, Результат.Данные, "district,districtType,districtId,city,cityType,cityId");
Иначе
ЗаполнитьЗначенияСвойств(Адрес, Результат.Данные, "munDistrict,munDistrictType,munDistrictId,settlement,settlementType,settlementId");
КонецЕсли;
КонецЕсли;
// Проверяем дома
СведенияОДоме = СведенияОДоме();
@@ -3275,8 +3321,12 @@
ДанныеДляЗапроса = Новый Структура("requests", ДанныеЗапроса);
ИдентификаторЗапроса = Строка(Новый УникальныйИдентификатор);
JSONСтрока = СтруктураВСтрокуJSON(ДанныеДляЗапроса);
HTTPЗапрос.Заголовки.Вставить("Content-Type", "application/json");
HTTPЗапрос.УстановитьТелоИзСтроки(СтруктураВСтрокуJSON(ДанныеДляЗапроса));
HTTPЗапрос.Заголовки.Вставить("X-1C-Request-UID", ИдентификаторЗапроса);
HTTPЗапрос.УстановитьТелоИзСтроки(JSONСтрока);
Попытка
РезультатПроверки = Сервис.ОтправитьДляОбработки(HTTPЗапрос);
@@ -3290,19 +3340,25 @@
Результат.Отказ = Ложь;
АдресПроверен = Ложь;
ПолученныеДанные = РезультатПроверки.ПолучитьТелоКакСтроку("UTF-8");
Данные = Новый Массив;
Если РезультатПроверки.КодСостояния = 200 Тогда
ПолученныеДанные = РезультатПроверки.ПолучитьТелоКакСтроку("UTF-8");
Данные = СтрокаJSONВСтруктуру(ПолученныеДанные);
АдресПроверен = Истина;
Иначе
ТекстОшибки = НСтр("ru='При получении данных из веб-сервиса возникли проблемы. Сервер вернул код %1. %2'");
Результат.ПодробноеПредставлениеОшибки = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(ТекстОшибки, РезультатПроверки.КодСостояния, ПолученныеДанные);
Результат.КраткоеПредставлениеОшибки = НСтр("ru='При получении данных из веб-сервиса возникли проблемы.'");
Результат.Отказ = Истина;
ОбработатьОшибкуОбращенияКВебСервису(Результат, РезультатПроверки, НСтр("ru='Ошибка при проверке адреса через веб-сервис:'"), HTTPЗапрос.АдресРесурса + " X-1C-Request-UID:" + ИдентификаторЗапроса);
КраткоеПредставлениеОшибки = НСтр("ru = 'Проверка адреса не доступна по причине:
|- не подключена интернет-поддержка пользователей;
|- неполадки у интернет-провайдера;
|- подключение к серверу блокирует межсетевой экран,
| антивирусная программа или другое программное обеспечение;
|- веб-сервис отключен или на техническом обслуживании.'");
Результат.КраткоеПредставлениеОшибки = КраткоеПредставлениеОшибки;
Возврат;
КонецЕсли;
@@ -4199,14 +4255,14 @@
Функция СтруктураКодовАдреса()
Коды = Новый Структура();
Коды.Вставить("КодКЛАДР");
Коды.Вставить("Идентификатор");
Коды.Вставить("ОКАТО");
Коды.Вставить("ОКТМО");
Коды.Вставить("КодИФНСФЛ");
Коды.Вставить("КодИФНСЮЛ");
Коды.Вставить("КодУчасткаИФНСФЛ");
Коды.Вставить("КодУчасткаИФНСЮЛ");
Коды.Вставить("КодКЛАДР", "");
Коды.Вставить("Идентификатор", "");
Коды.Вставить("ОКАТО", "");
Коды.Вставить("ОКТМО", "");
Коды.Вставить("КодИФНСФЛ", "");
Коды.Вставить("КодИФНСЮЛ", "");
Коды.Вставить("КодУчасткаИФНСФЛ", "");
Коды.Вставить("КодУчасткаИФНСЮЛ", "");
Возврат Коды;
КонецФункции
@@ -4226,6 +4282,17 @@
КонецФункции
Функция ЗаполненыДанныеАутентификацииПользователяИнтернетПоддержки() Экспорт
Если ОбщегоНазначения.ПодсистемаСуществует("ИнтернетПоддержкаПользователей") Тогда
МодульИнтернетПоддержкаПользователей = ОбщегоНазначения.ОбщийМодуль("ИнтернетПоддержкаПользователей");
Возврат МодульИнтернетПоддержкаПользователей.ЗаполненыДанныеАутентификацииПользователяИнтернетПоддержки();
КонецЕсли;
Возврат Ложь;
КонецФункции
Процедура ДобавитьОшибкуПроверкиАдресаПоКлассификатору(ВсеОшибки, Ключ, Текст, Подсказка = Неопределено)
Ошибка = Новый Структура("Ключ, Текст, Подсказка", Ключ, Текст, Подсказка);
@@ -4524,22 +4591,6 @@
#Область ПереносУстаревшегоКлассификатора
Функция ЗаполненныеРегионыУстаревшегоКлассификатора()
Если ПравоДоступа("Изменение", Метаданные.РегистрыСведений.АдресныеОбъекты) Тогда
УстановитьПривилегированныйРежим(Истина);
Если ПустаяСтрока(Константы.ИсточникДанныхАдресногоКлассификатора.Получить()) Тогда
Возврат Истина;
КонецЕсли;
КонецЕсли;
Возврат Ложь;
КонецФункции
// Проверяет есть ли хоть одна запись КЛАДР (исключая записи о регионах) требующая переноса.
//
Функция УстаревшийКлассификаторСодержитСведения()
@@ -5874,7 +5925,12 @@
Процедура ОбработатьОшибкуОбращенияКВебСервису(Результат, Знач Ответ, ИнформацияОбОшибке, ТекстURL)
ПредставлениеОшибки = ПодробноеПредставлениеОшибки(ИнформацияОбОшибке);
Если ТипЗнч(ИнформацияОбОшибке) = Тип("Строка") Тогда
ПредставлениеОшибки = ИнформацияОбОшибке;
Иначе
ПредставлениеОшибки = ПодробноеПредставлениеОшибки(ИнформацияОбОшибке);
КонецЕсли;
Если ПустаяСтрока(ПредставлениеОшибки) Тогда
ПредставлениеОшибки = НСтр("ru = 'Веб-сервис для работы с адресами не доступен по причине:
|- не подключена интернет-поддержка пользователей;
@@ -5887,15 +5943,15 @@
Результат.ПодробноеПредставлениеОшибки = ПредставлениеОшибки;
Результат.Отказ = Истина;
ШаблонТекстОтветаСервера = НСтр("ru='При выполнении запроса: %1
|сервер вернул HTTP Код: %2
|с текстом: %3
|%4'");
ШаблонТекстОтветаСервера = НСтр("ru='%1
|Техническая информация. При запросе: %2
|сервер вернул HTTP status code: %3
|с текстом: %4'");
ОтветОтСервера = Ответ.ПолучитьТелоКакСтроку("UTF-8");
ТекстОшибки = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(ШаблонТекстОтветаСервера,
ТекстURL, Ответ.КодСостояния, ОтветОтСервера, Результат.ПодробноеПредставлениеОшибки);
Результат.ПодробноеПредставлениеОшибки, ТекстURL, Ответ.КодСостояния, ОтветОтСервера, );
ЗаписьЖурналаРегистрации(СобытиеЖурналаРегистрации(), УровеньЖурналаРегистрации.Ошибка,,, ТекстОшибки);
@@ -1670,6 +1670,18 @@
КонецПроцедуры
// Доопределяет действия, необходимые после изменения пользователя, группы пользователей,
// внешнего пользователя или группы внешних пользователей в форме списка или форме элемента.
//
Процедура ПослеИзмененияПользователяИлиГруппыВФорме() Экспорт
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.УправлениеДоступом") Тогда
МодульУправлениеДоступомСлужебный = ОбщегоНазначения.ОбщийМодуль("УправлениеДоступомСлужебный");
МодульУправлениеДоступомСлужебный.ПослеИзмененияПользователяИлиГруппыВФорме();
КонецЕсли;
КонецПроцедуры
#КонецОбласти
#Область ПрофилиБезопасности
@@ -2298,6 +2310,11 @@
МодульЗаметкиПользователяСлужебный.ПриЗаполненииСписковСОграничениемДоступа(Списки);
КонецЕсли;
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.КонтрольВеденияУчета") Тогда
МодульКонтрольВеденияУчетаСлужебный = ОбщегоНазначения.ОбщийМодуль("КонтрольВеденияУчетаСлужебный");
МодульКонтрольВеденияУчетаСлужебный.ПриЗаполненииСписковСОграничениемДоступа(Списки);
КонецЕсли;
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.НапоминанияПользователя") Тогда
МодульНапоминанияПользователяСлужебный = ОбщегоНазначения.ОбщийМодуль("НапоминанияПользователяСлужебный");
МодульНапоминанияПользователяСлужебный.ПриЗаполненииСписковСОграничениемДоступа(Списки);
@@ -44,6 +44,7 @@
КонецПроцедуры
// См. ТекущиеДелаПереопределяемый.ПриОпределенииОбработчиковТекущихДел.
Процедура ПриЗаполненииСпискаТекущихДел(ТекущиеДела) Экспорт
Если Не ПодсистемаДоступна() Тогда
@@ -86,6 +87,13 @@
КонецПроцедуры
// См. УправлениеДоступомПереопределяемый.ПриЗаполненииСписковСОграничениемДоступа.
Процедура ПриЗаполненииСписковСОграничениемДоступа(Списки) Экспорт
Списки.Вставить(Метаданные.РегистрыСведений.РезультатыПроверкиУчета, Истина);
КонецПроцедуры
// Обновляет состав системных проверок ведения учета при изменении конфигурации.
//
// Параметры:
@@ -2222,25 +2222,24 @@
НомерПринятого = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(КомпонентыОбмена.УзелКорреспондента, "НомерПринятого");
Если НомерПринятого >= КомпонентыОбмена.НомерВходящегоСообщения Тогда
// Номер сообщения меньше либо равен ранее принятому.
КомпонентыОбмена.СостояниеОбменаДанными.РезультатВыполненияОбмена =
Перечисления.РезультатыВыполненияОбмена.Предупреждение_СообщениеОбменаБылоРанееПринято;
ЗаписатьВПротоколВыполнения(КомпонентыОбмена, 174,,,,, Истина);
Прервать;
КомпонентыОбмена.ТолькоНастройкиXDTO = Истина;
Иначе
// Добавляем публичные идентификаторы для ссылочных объектов, о получении которых отчитался узел-корреспондент.
ДобавитьВыгруженныеОбъектыВРегистрПубличныеИдентификаторы(КомпонентыОбмена);
// Удаляем регистрацию изменений, о получении которых отчитался узел-корреспондент.
ПланыОбмена.УдалитьРегистрациюИзменений(КомпонентыОбмена.УзелКорреспондента, КомпонентыОбмена.НомерСообщенияПолученногоКорреспондентом);
// Снимаем признак начальной выгрузки данных.
РегистрыСведений.ОбщиеНастройкиУзловИнформационныхБаз.СнятьПризнакНачальнойВыгрузкиДанных(
КомпонентыОбмена.УзелКорреспондента, КомпонентыОбмена.НомерСообщенияПолученногоКорреспондентом);
КонецЕсли;
// Добавляем публичные идентификаторы для ссылочных объектов, о получении которых отчитался узел-корреспондент.
ДобавитьВыгруженныеОбъектыВРегистрПубличныеИдентификаторы(КомпонентыОбмена);
// Удаляем регистрацию изменений, о получении которых отчитался узел-корреспондент.
ПланыОбмена.УдалитьРегистрациюИзменений(КомпонентыОбмена.УзелКорреспондента, КомпонентыОбмена.НомерСообщенияПолученногоКорреспондентом);
// Снимаем признак начальной выгрузки данных.
РегистрыСведений.ОбщиеНастройкиУзловИнформационныхБаз.СнятьПризнакНачальнойВыгрузкиДанных(
КомпонентыОбмена.УзелКорреспондента, КомпонентыОбмена.НомерСообщенияПолученногоКорреспондентом);
КонецЕсли;
КонецЕсли;
@@ -2182,7 +2182,7 @@
ИмяПланаОбмена = ОбменДаннымиПовтИсп.ПолучитьИмяПланаОбмена(УзелОбмена);
КодУзла = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(ПланыОбмена[ИмяПланаОбмена].ЭтотУзел(), "Код");
КодУзла = СокрЛП(ОбщегоНазначения.ЗначениеРеквизитаОбъекта(ПланыОбмена[ИмяПланаОбмена].ЭтотУзел(), "Код"));
Если ОбменДаннымиПовтИсп.ЭтоУзелРазделенногоОбменаДаннымиБСП(УзелОбмена) Тогда
ПрефиксыУзла = РегистрыСведений.ОбщиеНастройкиУзловИнформационныхБаз.ПрефиксыУзла(УзелОбмена);
@@ -2201,7 +2201,7 @@
Функция ИдентификаторУзлаКорреспондентаДляОбмена(УзелОбмена) Экспорт
КодУзла = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(УзелОбмена, "Код");
КодУзла = СокрЛП(ОбщегоНазначения.ЗначениеРеквизитаОбъекта(УзелОбмена, "Код"));
Если ОбменДаннымиПовтИсп.ЭтоУзелРазделенногоОбменаДаннымиБСП(УзелОбмена) Тогда
ПрефиксыУзла = РегистрыСведений.ОбщиеНастройкиУзловИнформационныхБаз.ПрефиксыУзла(УзелОбмена);
@@ -32,7 +32,7 @@
Процедура ПриДобавленииПодсистемы(Описание) Экспорт
Описание.Имя = "СтандартныеПодсистемы";
Описание.Версия = "3.0.1.231";
Описание.Версия = "3.0.1.240";
Описание.РежимВыполненияОтложенныхОбработчиков = "Параллельно";
Описание.ПараллельноеОтложенноеОбновлениеСВерсии = "2.3.3.0";
@@ -781,6 +781,10 @@
// См. СтандартныеПодсистемыВызовСервера.ПриВыполненииСтандартныхПериодическихПроверокНаСервере.
Процедура ПриВыполненииСтандартныхПериодическихПроверокНаСервере(Параметры) Экспорт
Если Не ОбщегоНазначения.ДоступноИспользованиеРазделенныхДанных() Тогда
Возврат;
КонецЕсли;
// Проверка, что срок действия учетной записи истек и нужно завершить работу.
УстановитьПривилегированныйРежим(Истина);
@@ -3041,6 +3045,13 @@
КонецПроцедуры
// Только для внутреннего использования.
Процедура ПослеИзмененияПользователяИлиГруппыПользователейВФорме() Экспорт
ИнтеграцияПодсистемБСП.ПослеИзмененияПользователяИлиГруппыВФорме();
КонецПроцедуры
////////////////////////////////////////////////////////////////////////////////
// Процедуры и функции работы с внешними пользователями.
@@ -3103,7 +3114,7 @@
ВнешнийПользователь, Истина, ТекущиеУчастникиИзменений, ТекущиеИзмененныеГруппы);
ОбновитьСоставыГруппПоТипамОбъектовАвторизации(
, ВнешнийПользователь, ТекущиеУчастникиИзменений, ТекущиеИзмененныеГруппы);
Неопределено, ВнешнийПользователь, ТекущиеУчастникиИзменений, ТекущиеИзмененныеГруппы);
Иначе
ВсеОбъектыАвторизации = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(ГруппаВнешнихПользователей,
@@ -73,18 +73,24 @@
// Возвращает сведения об адресах в виде структуру частей адреса и кодов КЛАДР.
//
// Параметры:
// Адреса - Массив - XDTO объекты или строки XML соответствующие XDTO пакету Адрес.
// ДополнительныеПараметры - Структура - Параметры контактной информации:
// * БезПредставлений - Булево - Если Истина, то поле представления адреса будет отсутствовать.
// Адреса - Строка - адрес во внутреннем формате JSON или в XML, соответствующем XDTO пакету Адрес.
// - ОбъектXDTO - XDTO объект, соответствующий XDTO пакету Адрес.
// ДополнительныеПараметры - Структура - для уточнения возвращаемого значения:
// * БезПредставлений - Булево - Если Истина, то поле Представление будет отсутствовать. По умолчанию, Ложь.
// * КодыАдреса - Булево - Если Истина, то результат содержит поля ИдентификаторАдресногоОбъекта, ИдентификаторДома
// и структура с кодами адреса(идентификаторы, ОКТМО, ОКАТО и др).
// Подробнее см. в возвращаемом значении структуры Идентификаторы и ДополнительныеКоды. По умолчанию, Ложь.
// Если в адресе отсутствуют идентификаторы и в программу не загружены идентификаторы адресных объектов адреса,
// то получение идентификаторов может инициировать http запрос к веб-сервису 1С orgaddress.
// * КодыКЛАДР - Булево - Если Истина, то возвращается структура КодыКЛАДР. По умолчанию, Ложь.
// Если в адресе отсутствуют коды и в программу не загружены адресные объекты адреса,
// Получение кодов может инициировать http запрос к веб-сервису 1С orgaddress.
// * КодыАдреса - Булево - Если Истина, то возвращается структура с кодами адреса(идентификаторы, ОКТМО, ОКАТО и др).
// Подробнее см. в возвращаемом значении структуры Идентификаторы и ДополнительныеКоды. По умолчанию, Истина.
// Получение идентификаторов может инициировать http запрос к веб-сервису 1С orgaddress.
// * ПолныеНаименованияСокращений - Булево - Если Истина, то возвращает полное наименование адресных объектов.
// * ПолныеНаименованияСокращений - Булево - Если Истина, то возвращается полное наименование адресных объектов.
// * НаименованиеВключаетСокращение - Булево - Если Истина, то поля содержат сокращениям в наименованиях адресных объектов.
// * ПроверитьАдрес - Булево - Если Истина, то адрес будет проверен на соответствие ФИАС.
// Проверка адреса может инициировать http запрос к веб-сервису 1С orgaddress.
// * ПроверитьАдрес - Булево - Если Истина, то адрес будет проверен на соответствие ФИАС. По умолчанию, Ложь.
// Если в программу не загружены проверяемые адресные объекты,
// то проверка адреса может инициировать http запрос к веб-сервису 1С orgaddress.
//
// Возвращаемое значение:
// Массив - Содержит массив структур, содержимое структуры см. описание функции СведенияОбАдресе.
//
@@ -99,15 +105,19 @@
// - ОбъектXDTO - XDTO объект, соответствующий XDTO пакету Адрес.
// ДополнительныеПараметры - Структура - для уточнения возвращаемого значения:
// * БезПредставлений - Булево - Если Истина, то поле Представление будет отсутствовать. По умолчанию, Ложь.
// * КодыАдреса - Булево - Если Истина, то результат содержит поля ИдентификаторАдресногоОбъекта, ИдентификаторДома
// и структура с кодами адреса(Идентификаторы, ДополнительныеКоды, КодыКЛАДР).
// Подробнее см. в возвращаемом значении структуры Идентификаторы и ДополнительныеКоды. По умолчанию, Ложь.
// Если в адресе отсутствуют идентификаторы и в программу не загружены идентификаторы адресных объектов адреса,
// то получение идентификаторов может инициировать http запрос к веб-сервису 1С orgaddress.
// * КодыКЛАДР - Булево - Если Истина, то возвращается структура КодыКЛАДР. По умолчанию, Ложь.
// Если в адресе отсутствуют коды и в программу не загружены адресные объекты адреса,
// Получение кодов может инициировать http запрос к веб-сервису 1С orgaddress.
// * КодыАдреса - Булево - Если Истина, то возвращается структура с кодами адреса(идентификаторы, ОКТМО, ОКАТО и др).
// Подробнее см. в возвращаемом значении структуры Идентификаторы и ДополнительныеКоды. По умолчанию, Истина.
// Получение идентификаторов может инициировать http запрос к веб-сервису 1С orgaddress.
// * ПолныеНаименованияСокращений - Булево - Если Истина, то возвращается полное наименование адресных объектов.
// * НаименованиеВключаетСокращение - Булево - Если Истина, то поля содержат сокращениям в наименованиях адресных объектов.
// * ПроверитьАдрес - Булево - Если Истина, то адрес будет проверен на соответствие ФИАС.
// Проверка адреса может инициировать http запрос к веб-сервису 1С orgaddress.
// * ПроверитьАдрес - Булево - Если Истина, то адрес будет проверен на соответствие ФИАС. По умолчанию, Ложь.
// Если в программу не загружены проверяемые адресные объекты,
// то проверка адреса может инициировать http запрос к веб-сервису 1С orgaddress.
//
// Возвращаемое значение:
// Структура - сведения об адресе:
@@ -152,21 +162,20 @@
// * Комментарий - Строка - комментарий об адресе.
// * ИдентификаторАдресногоОбъекта - УникальныйИдентификатор - Идентификационный код последнего адресного объекта
// в иерархи адреса. Например, для адреса: Москва г., Дмитровское ш., д.9 это
// будет идентификатор улицы.
// будет идентификатор улицы.
// Поле отсутствует, если дополнительный параметр КодыАдреса равен Ложь.
// * ИдентификаторДома - УникальныйИдентификатор - Идентификационный код дома(строения) адресного объекта.
// Поле отсутствует, если дополнительный параметр КодыАдреса равен Ложь.
// * Идентификаторы - Структура - Идентификаторы адресных объектов адреса, если установлен параметр КодыАдреса.
// Поле отсутствует, если дополнительный параметр КодыАдреса равен Ложь.
// ** РегионИдентификатор - УникальныйИдентификатор - идентификатор региона.
// ** РайонИдентификатор - УникальныйИдентификатор - идентификатор района.
// ** МуниципальныйРайонИдентификатор - УникальныйИдентификатор - идентификатор муниципального района.
// ** ГородИдентификатор - УникальныйИдентификатор - идентификатор города.
// ** ПоселениеИдентификатор - УникальныйИдентификатор - идентификатор поселения.
// ** ВнутригородскойРайонИдентификатор - УникальныйИдентификатор - идентификатор внутригородского района.
// ** ТерриторияИдентификатор - УникальныйИдентификатор - идентификатор территории.
// ** ТерриторияИдентификатор - УникальныйИдентификатор - идентификатор территории.
// ** УлицаИдентификатор - УникальныйИдентификатор - идентификатор улица.
// * Идентификаторы - Структура - Идентификаторы адресных объектов адреса, если установлен параметр КодыАдреса или КодыКЛАДР.
// Поле отсутствует, если дополнительный параметр КодыАдреса или КодыКЛАДР равен Ложь.
// ** Регион - УникальныйИдентификатор - идентификатор региона.
// ** Район - УникальныйИдентификатор - идентификатор района.
// ** МуниципальныйРайон - УникальныйИдентификатор - идентификатор муниципального района.
// ** Город - УникальныйИдентификатор - идентификатор города.
// ** Поселение - УникальныйИдентификатор - идентификатор поселения.
// ** ВнутригородскойРайон - УникальныйИдентификатор - идентификатор внутригородского района.
// ** Территория - УникальныйИдентификатор - идентификатор территории.
// ** Улица - УникальныйИдентификатор - идентификатор улица.
// * КодыКЛАДР - Структура - Коды КЛАДР, если установлен параметр КодыКЛАДР в Истина.
// ** Регион - Строка - Код КЛАДР региона.
// ** Район - Строка - Код КЛАДР район.
@@ -200,7 +209,7 @@
Возврат УправлениеКонтактнойИнформациейСлужебный.ПроверитьАдрес(Адрес, ПараметрыПроверки);
КонецФункции
// Преобразует структуру описывающую адрес во внутренний формат хранения контактной информации JSON.
// Преобразует структуру, описывающую адрес, во внутренний формат хранения контактной информации JSON.
//
// Параметры:
// ПоляАдреса - Структура - Адрес с разбивкой по полям. Список полей см. РаботаСАдресамиКлиентСервер.ПоляАдреса.
@@ -269,67 +278,71 @@
Результат.HouseType = ПоляАдреса.Здание.ТипЗдания;
Результат.HouseNumber = ПоляАдреса.Здание.Номер;
Если ТипЗнч(ПоляАдреса.Идентификаторы.РегионИдентификатор) = ТипУникальныйИдентификатор
И ЗначениеЗаполнено(ПоляАдреса.Идентификаторы.РегионИдентификатор) Тогда
Результат.AreaID = Строка(ПоляАдреса.Идентификаторы.РегионИдентификатор);
Результат.ID = Результат.AreaID;
Если ПоляАдреса.Свойство("Идентификаторы") Тогда
Если ТипЗнч(ПоляАдреса.Идентификаторы.РегионИдентификатор) = ТипУникальныйИдентификатор
И ЗначениеЗаполнено(ПоляАдреса.Идентификаторы.РегионИдентификатор) Тогда
Результат.AreaID = Строка(ПоляАдреса.Идентификаторы.РегионИдентификатор);
Результат.ID = Результат.AreaID;
КонецЕсли;
Если ТипЗнч(ПоляАдреса.Идентификаторы.РайонИдентификатор) = ТипУникальныйИдентификатор
И ЗначениеЗаполнено(ПоляАдреса.Идентификаторы.РайонИдентификатор) Тогда
Результат.DistrictID = Строка(ПоляАдреса.Идентификаторы.РайонИдентификатор);
Результат.ID = Результат.DistrictID;
КонецЕсли;
Если ТипЗнч(ПоляАдреса.Идентификаторы.ГородИдентификатор) = ТипУникальныйИдентификатор
И ЗначениеЗаполнено(ПоляАдреса.Идентификаторы.ГородИдентификатор) Тогда
Результат.CityID = Строка(ПоляАдреса.Идентификаторы.ГородИдентификатор);
Результат.ID = Результат.CityID;
КонецЕсли;
Если ТипЗнч(ПоляАдреса.Идентификаторы.МуниципальныйРайонИдентификатор) = ТипУникальныйИдентификатор
И ЗначениеЗаполнено(ПоляАдреса.Идентификаторы.МуниципальныйРайонИдентификатор) Тогда
Результат.MunDistrictID = Строка(ПоляАдреса.Идентификаторы.МуниципальныйРайонИдентификатор);
Результат.ID = Результат.MunDistrictID;
КонецЕсли;
Если ТипЗнч(ПоляАдреса.Идентификаторы.ПоселениеИдентификатор) = ТипУникальныйИдентификатор
И ЗначениеЗаполнено(ПоляАдреса.Идентификаторы.ПоселениеИдентификатор) Тогда
Результат.SettlementID = Строка(ПоляАдреса.Идентификаторы.ПоселениеИдентификатор);
Результат.ID = Результат.SettlementID;
КонецЕсли;
Если ТипЗнч(ПоляАдреса.Идентификаторы.ВнутригородскойРайонИдентификатор) = ТипУникальныйИдентификатор
И ЗначениеЗаполнено(ПоляАдреса.Идентификаторы.ВнутригородскойРайонИдентификатор) Тогда
Результат.CityDistrictID = Строка(ПоляАдреса.Идентификаторы.ВнутригородскойРайонИдентификатор);
Результат.ID = Результат.CityDistrictID;
КонецЕсли;
Если ТипЗнч(ПоляАдреса.Идентификаторы.НаселенныйПунктИдентификатор) = ТипУникальныйИдентификатор
И ЗначениеЗаполнено(ПоляАдреса.Идентификаторы.НаселенныйПунктИдентификатор) Тогда
Результат.LocalityID = Строка(ПоляАдреса.Идентификаторы.НаселенныйПунктИдентификатор);
Результат.ID = Результат.LocalityID;
КонецЕсли;
Если ТипЗнч(ПоляАдреса.Идентификаторы.ТерриторияИдентификатор) = ТипУникальныйИдентификатор
И ЗначениеЗаполнено(ПоляАдреса.Идентификаторы.ТерриторияИдентификатор) Тогда
Результат.TerritoryID = Строка(ПоляАдреса.Идентификаторы.ТерриторияИдентификатор);
Результат.ID = Результат.TerritoryID;
КонецЕсли;
Если ТипЗнч(ПоляАдреса.Идентификаторы.УлицаИдентификатор) = ТипУникальныйИдентификатор
И ЗначениеЗаполнено(ПоляАдреса.Идентификаторы.УлицаИдентификатор) Тогда
Результат.StreetID = Строка(ПоляАдреса.Идентификаторы.УлицаИдентификатор);
Результат.ID = Результат.StreetID;
КонецЕсли;
КонецЕсли;
Если ТипЗнч(ПоляАдреса.Идентификаторы.РайонИдентификатор) = ТипУникальныйИдентификатор
И ЗначениеЗаполнено(ПоляАдреса.Идентификаторы.РайонИдентификатор) Тогда
Результат.DistrictID = Строка(ПоляАдреса.Идентификаторы.РайонИдентификатор);
Результат.ID = Результат.DistrictID;
КонецЕсли;
Если ТипЗнч(ПоляАдреса.Идентификаторы.ГородИдентификатор) = ТипУникальныйИдентификатор
И ЗначениеЗаполнено(ПоляАдреса.Идентификаторы.ГородИдентификатор) Тогда
Результат.CityID = Строка(ПоляАдреса.Идентификаторы.ГородИдентификатор);
Результат.ID = Результат.CityID;
КонецЕсли;
Если ТипЗнч(ПоляАдреса.Идентификаторы.МуниципальныйРайонИдентификатор) = ТипУникальныйИдентификатор
И ЗначениеЗаполнено(ПоляАдреса.Идентификаторы.МуниципальныйРайонИдентификатор) Тогда
Результат.MunDistrictID = Строка(ПоляАдреса.Идентификаторы.МуниципальныйРайонИдентификатор);
Результат.ID = Результат.MunDistrictID;
КонецЕсли;
Если ТипЗнч(ПоляАдреса.Идентификаторы.ПоселениеИдентификатор) = ТипУникальныйИдентификатор
И ЗначениеЗаполнено(ПоляАдреса.Идентификаторы.ПоселениеИдентификатор) Тогда
Результат.SettlementID = Строка(ПоляАдреса.Идентификаторы.ПоселениеИдентификатор);
Результат.ID = Результат.SettlementID;
КонецЕсли;
Если ТипЗнч(ПоляАдреса.Идентификаторы.ВнутригородскойРайонИдентификатор) = ТипУникальныйИдентификатор
И ЗначениеЗаполнено(ПоляАдреса.Идентификаторы.ВнутригородскойРайонИдентификатор) Тогда
Результат.CityDistrictID = Строка(ПоляАдреса.Идентификаторы.ВнутригородскойРайонИдентификатор);
Результат.ID = Результат.CityDistrictID;
КонецЕсли;
Если ТипЗнч(ПоляАдреса.Идентификаторы.НаселенныйПунктИдентификатор) = ТипУникальныйИдентификатор
И ЗначениеЗаполнено(ПоляАдреса.Идентификаторы.НаселенныйПунктИдентификатор) Тогда
Результат.LocalityID = Строка(ПоляАдреса.Идентификаторы.НаселенныйПунктИдентификатор);
Результат.ID = Результат.LocalityID;
КонецЕсли;
Если ТипЗнч(ПоляАдреса.Идентификаторы.ТерриторияИдентификатор) = ТипУникальныйИдентификатор
И ЗначениеЗаполнено(ПоляАдреса.Идентификаторы.ТерриторияИдентификатор) Тогда
Результат.TerritoryID = Строка(ПоляАдреса.Идентификаторы.ТерриторияИдентификатор);
Результат.ID = Результат.TerritoryID;
КонецЕсли;
Если ТипЗнч(ПоляАдреса.Идентификаторы.УлицаИдентификатор) = ТипУникальныйИдентификатор
И ЗначениеЗаполнено(ПоляАдреса.Идентификаторы.УлицаИдентификатор) Тогда
Результат.StreetID = Строка(ПоляАдреса.Идентификаторы.УлицаИдентификатор);
Результат.ID = Результат.StreetID;
КонецЕсли;
Если ТипЗнч(ПоляАдреса.ИдентификаторДома) = ТипУникальныйИдентификатор
Если ПоляАдреса.Свойство("ИдентификаторДома")
И ТипЗнч(ПоляАдреса.ИдентификаторДома) = ТипУникальныйИдентификатор
И ЗначениеЗаполнено(ПоляАдреса.ИдентификаторДома) Тогда
Результат.HouseID = Строка(ПоляАдреса.ИдентификаторДома);
Результат.ID = Результат.HouseID;
КонецЕсли;
Если ТипЗнч(ПоляАдреса.ИдентификаторАдресногоОбъекта) = ТипУникальныйИдентификатор
Если ПоляАдреса.Свойство("ИдентификаторАдресногоОбъекта")
И ТипЗнч(ПоляАдреса.ИдентификаторАдресногоОбъекта) = ТипУникальныйИдентификатор
И ЗначениеЗаполнено(ПоляАдреса.ИдентификаторАдресногоОбъекта) Тогда
Результат.ID = Строка(ПоляАдреса.ИдентификаторАдресногоОбъекта);
КонецЕсли;
@@ -343,33 +356,27 @@
КонецЦикла;
// Заполнение кода КЛАДР последнего в иерархии адресного объекта.
Если Не ПустаяСтрока(ПоляАдреса.КодыКЛАДР.Улица) Тогда
Результат.CodeKLADR = ПоляАдреса.КодыКЛАДР.Улица;
ИначеЕсли Не ПустаяСтрока(ПоляАдреса.КодыКЛАДР.НаселенныйПункт) Тогда
Результат.CodeKLADR = ПоляАдреса.КодыКЛАДР.НаселенныйПункт;
ИначеЕсли Не ПустаяСтрока(ПоляАдреса.КодыКЛАДР.Город) Тогда
Результат.CodeKLADR = ПоляАдреса.КодыКЛАДР.Город;
ИначеЕсли Не ПустаяСтрока(ПоляАдреса.КодыКЛАДР.Район) Тогда
Результат.CodeKLADR = ПоляАдреса.КодыКЛАДР.Район;
ИначеЕсли Не ПустаяСтрока(ПоляАдреса.КодыКЛАДР.Регион) Тогда
Результат.CodeKLADR = ПоляАдреса.КодыКЛАДР.Регион;
Если ПоляАдреса.Свойство("КодыКЛАДР") Тогда
Если Не ПустаяСтрока(ПоляАдреса.КодыКЛАДР.Улица) Тогда
Результат.CodeKLADR = ПоляАдреса.КодыКЛАДР.Улица;
ИначеЕсли Не ПустаяСтрока(ПоляАдреса.КодыКЛАДР.НаселенныйПункт) Тогда
Результат.CodeKLADR = ПоляАдреса.КодыКЛАДР.НаселенныйПункт;
ИначеЕсли Не ПустаяСтрока(ПоляАдреса.КодыКЛАДР.Город) Тогда
Результат.CodeKLADR = ПоляАдреса.КодыКЛАДР.Город;
ИначеЕсли Не ПустаяСтрока(ПоляАдреса.КодыКЛАДР.Район) Тогда
Результат.CodeKLADR = ПоляАдреса.КодыКЛАДР.Район;
ИначеЕсли Не ПустаяСтрока(ПоляАдреса.КодыКЛАДР.Регион) Тогда
Результат.CodeKLADR = ПоляАдреса.КодыКЛАДР.Регион;
КонецЕсли;
КонецЕсли;
Результат.OKTMO = ПоляАдреса.ДополнительныеКоды.ОКТМО;
Результат.OKATO = ПоляАдреса.ДополнительныеКоды.ОКАТО;
Результат.IFNSFLCode = ПоляАдреса.ДополнительныеКоды.КодИФНСФЛ;
Результат.IFNSULCode = ПоляАдреса.ДополнительныеКоды.КодИФНСЮЛ;
Результат.IFNSFLAreaCode = ПоляАдреса.ДополнительныеКоды.КодУчасткаИФНСФЛ;
Результат.IFNSULAreaCode = ПоляАдреса.ДополнительныеКоды.КодУчасткаИФНСЮЛ;
Если ПустаяСтрока(Результат.ID) Тогда
// Если в адресе не заполнены идентификаторы, тогда заполнить их.
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.АдресныйКлассификатор") Тогда
МодульАдресныйКлассификаторСлужебный = ОбщегоНазначения.ОбщийМодуль("АдресныйКлассификаторСлужебный");
МодульАдресныйКлассификаторСлужебный.УстановитьИдентификаторыАдреса(Результат);
КонецЕсли;
Если ПоляАдреса.Свойство("ДополнительныеКоды") Тогда
Результат.OKTMO = ПоляАдреса.ДополнительныеКоды.ОКТМО;
Результат.OKATO = ПоляАдреса.ДополнительныеКоды.ОКАТО;
Результат.IFNSFLCode = ПоляАдреса.ДополнительныеКоды.КодИФНСФЛ;
Результат.IFNSULCode = ПоляАдреса.ДополнительныеКоды.КодИФНСЮЛ;
Результат.IFNSFLAreaCode = ПоляАдреса.ДополнительныеКоды.КодУчасткаИФНСФЛ;
Результат.IFNSULAreaCode = ПоляАдреса.ДополнительныеКоды.КодУчасткаИФНСЮЛ;
КонецЕсли;
Если Не ЗначениеЗаполнено(Результат.Value) Тогда
@@ -1244,11 +1251,13 @@
КонецФункции
Функция АккомодацияСтруктурыАдреса(Данные) Экспорт
Функция ПодготовитьАдресДляВвода(Данные) Экспорт
Если Данные.Свойство("id") И ПустаяСтрока(Данные.id) И ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.АдресныйКлассификатор") Тогда
МодульАдресныйКлассификаторСлужебный = ОбщегоНазначения.ОбщийМодуль("АдресныйКлассификаторСлужебный");
МодульАдресныйКлассификаторСлужебный.УстановитьИдентификаторыАдреса(Данные);
КонецЕсли;
НаселенныйПунктДетально = РаботаСАдресамиКлиентСервер.ОписаниеНовойКонтактнойИнформации(ПредопределенноеЗначение("Перечисление.ТипыКонтактнойИнформации.Адрес"));
@@ -1565,7 +1574,7 @@
Параметры.Вставить("ПолноеНаименованиеСокращений", Ложь);
Параметры.Вставить("ПроверитьАдрес", Ложь);
Параметры.Вставить("ВключатьСтрануВПредставление", Ложь);
Параметры.Вставить("КодыАдреса", Истина);
Параметры.Вставить("КодыАдреса", Ложь);
Если ТипЗнч(ДополнительныеПараметры) = Тип("Структура") Тогда
@@ -1585,7 +1594,7 @@
Адрес = УправлениеКонтактнойИнформациейСлужебный.СтрокаJSONВСтруктуру(АдресСтрокой);
Если Параметры.КодыАдреса И ПустаяСтрока(Адрес.ID) Тогда
Если ПустаяСтрока(Адрес.ID) И (Параметры.КодыАдреса Или Параметры.КодыКЛАДР) Тогда
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.АдресныйКлассификатор") Тогда
МодульАдресныйКлассификаторСлужебный = ОбщегоНазначения.ОбщийМодуль("АдресныйКлассификаторСлужебный");
@@ -1624,7 +1633,7 @@
СоответствиеУровней.Вставить("territory", Новый Структура("Имя, Уровень", "Территория", 65));
СоответствиеУровней.Вставить("street", Новый Структура("Имя, Уровень", "Улица", 7));
Если Параметры.КодыАдреса Тогда
Если Параметры.КодыАдреса Или Параметры.КодыКЛАДР Тогда
Идентификаторы = Новый Структура();
Результат.Вставить("Идентификаторы", Идентификаторы);
КонецЕсли;
@@ -1643,8 +1652,9 @@
Результат.Вставить(ЧастьАдреса.Значение.Имя + "Сокращение", Сокращение);
СоответствиеСокращений.Вставить(ЧастьАдреса.Значение.Уровень, Сокращение);
Если Параметры.КодыАдреса Тогда
Если Параметры.КодыАдреса Или Параметры.КодыКЛАДР Тогда
Идентификаторы.Вставить(ЧастьАдреса.Значение.Имя + "Идентификатор", ИдентификаторТекущегоУровня);
Идентификаторы.Вставить(ЧастьАдреса.Значение.Имя, ИдентификаторТекущегоУровня);
КонецЕсли;
УровеньИдентификатора = ?(ЧастьАдреса.Значение.Уровень < 10, ЧастьАдреса.Значение.Уровень * 10, ЧастьАдреса.Значение.Уровень);
@@ -1702,12 +1712,8 @@
МодульАдресныйКлассификаторСлужебный = ОбщегоНазначения.ОбщийМодуль("АдресныйКлассификаторСлужебный");
Если Параметры.КодыКЛАДР Или Параметры.КодыАдреса Тогда
ДополнительныеКоды = МодульАдресныйКлассификаторСлужебный.КодыАдресаИКодыКЛАДР(Адрес, ИдентификаторАдресногоОбъекта);
Если Параметры.КодыАдреса Тогда
Результат.Вставить("ДополнительныеКоды", ДополнительныеКоды.КодыАдреса);
КонецЕсли;
Если Параметры.КодыКЛАДР Тогда
Результат.Вставить("КодыКЛАДР", ДополнительныеКоды.КодыКЛАДР);
КонецЕсли;
Результат.Вставить("ДополнительныеКоды", ДополнительныеКоды.КодыАдреса);
Результат.Вставить("КодыКЛАДР", ДополнительныеКоды.КодыКЛАДР);
КонецЕсли;
Иначе
ЗаполнитьКодыАдреса(Результат, Адрес);
@@ -832,6 +832,7 @@
Результат.Вставить("КраткоеПредставлениеОшибки", "");
Результат.Вставить("Отказ", Ложь);
Результат.Вставить("Уровень", 0);
Результат.Вставить("Муниципальный", Неопределено);
Возврат Результат;
КонецФункции
@@ -3221,11 +3221,13 @@
КонецЕсли;
ДвоичныеДанные = ЭлементДанных.ФайлХранилище.Получить();
Если ТипХраненияФайлов() = Перечисления.ТипыХраненияФайлов.ВТомахНаДиске Тогда
// По обмену пришел элемент с хранением в базе - но в базе приемнике принято хранить в томах.
// Из служебного реквизита файл размещаем на томе и меняем ТипХраненияФайла на ВТомахНаДиске.
Если ОбщегоНазначения.ЕстьРеквизитОбъекта("ВладелецФайла", Метаданные.НайтиПоТипу(ТипЗнч(ЭлементДанных))) Тогда
ТипМетаданных = Метаданные.НайтиПоТипу(ТипЗнч(ЭлементДанных));
Если ОбщегоНазначения.ЕстьРеквизитОбъекта("ВладелецФайла", ТипМетаданных) Тогда
// Это справочник файлов.
НомерВерсии = "";
Иначе
@@ -3233,18 +3235,35 @@
НомерВерсии = ЭлементДанных.НомерВерсии;
КонецЕсли;
СведенияОФайле = ДобавитьФайлВТом(ЭлементДанных.ФайлХранилище.Получить(),
ЭлементДанных.ДатаМодификацииУниверсальная, ЭлементДанных.Наименование, ЭлементДанных.Расширение,
НомерВерсии, ПутьКФайлуПриПолученииСодержитПризнакЗашифрован(ЭлементДанных));
ЭлементДанных.Том = СведенияОФайле.Том;
ЭлементДанных.ПутьКФайлу = СведенияОФайле.ПутьКФайлу;
Если ДвоичныеДанные = Неопределено Тогда
ЭлементДанных.Том = Неопределено;
ЭлементДанных.ПутьКФайлу = Неопределено;
ТекстОшибки = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
НСтр("ru = 'Не удалось добавить файл ""%1"" ни в один из томов, т.к. он отсутствует.
|Возможно, файл удален антивирусной программой.
|Обратитесь к администратору.'"),
ЭлементДанных.Наименование + "." + ЭлементДанных.Расширение);
ЗаписьЖурналаРегистрации(НСтр("ru = 'Файлы.Добавление файла в том'", ОбщегоНазначенияКлиентСервер.КодОсновногоЯзыка()),
УровеньЖурналаРегистрации.Ошибка, ТипМетаданных, ЭлементДанных.Ссылка, ТекстОшибки);
Иначе
СведенияОФайле = ДобавитьФайлВТом(ДвоичныеДанные,
ЭлементДанных.ДатаМодификацииУниверсальная, ЭлементДанных.Наименование, ЭлементДанных.Расширение,
НомерВерсии, ПутьКФайлуПриПолученииСодержитПризнакЗашифрован(ЭлементДанных));
ЭлементДанных.Том = СведенияОФайле.Том;
ЭлементДанных.ПутьКФайлу = СведенияОФайле.ПутьКФайлу;
КонецЕсли;
ЭлементДанных.ТипХраненияФайла = Перечисления.ТипыХраненияФайлов.ВТомахНаДиске;
ЭлементДанных.ФайлХранилище = Новый ХранилищеЗначения(Неопределено);
Иначе
ДвоичныеДанные = ЭлементДанных.ФайлХранилище.Получить();
Если ТипЗнч(ДвоичныеДанные) = Тип("ДвоичныеДанные") Тогда
ЭлементДанных.ДополнительныеСвойства.Вставить("ДвоичныеДанныеФайла", ДвоичныеДанные);
КонецЕсли;
File diff suppressed because it is too large. Load diff
@@ -571,6 +571,46 @@
КонецФункции
Функция РазрешенныйПустойНаборГруппДоступа() Экспорт
УстановитьОтключениеБезопасногоРежима(Истина);
УстановитьПривилегированныйРежим(Истина);
Ссылка = Справочники.НаборыГруппДоступа.ПолучитьСсылку(
Новый УникальныйИдентификатор("b5bc5b29-a11d-11e8-8787-b06ebfbf08c7"));
СсылкаВБазеДанных = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Ссылка, "Ссылка");
Если Не ЗначениеЗаполнено(СсылкаВБазеДанных) Тогда
РазрешенныйПустойНабор = Справочники.НаборыГруппДоступа.СоздатьЭлемент();
РазрешенныйПустойНабор.УстановитьСсылкуНового(Ссылка);
РазрешенныйПустойНабор.Наименование = НСтр("ru = 'Разрешенный пустой набор групп доступа'");
РазрешенныйПустойНабор.ТипЭлементовНабора = Справочники.ГруппыДоступа.ПустаяСсылка();
Блокировка = Новый БлокировкаДанных;
ЭлементБлокировки = Блокировка.Добавить("Справочник.НаборыГруппДоступа");
ЭлементБлокировки.УстановитьЗначение("Ссылка", Ссылка);
НачатьТранзакцию();
Попытка
Блокировка.Заблокировать();
СсылкаВБазеДанных = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Ссылка, "Ссылка");
Если Не ЗначениеЗаполнено(СсылкаВБазеДанных) Тогда
РазрешенныйПустойНабор.Записать();
КонецЕсли;
ЗафиксироватьТранзакцию();
Исключение
ОтменитьТранзакцию();
ВызватьИсключение;
КонецПопытки;
КонецЕсли;
УстановитьПривилегированныйРежим(Ложь);
УстановитьОтключениеБезопасногоРежима(Ложь);
Возврат Ссылка;
КонецФункции
Функция РазмерностьКлючаДоступа() Экспорт
МетаданныеКлюча = Метаданные.Справочники.КлючиДоступа;
@@ -763,6 +803,31 @@
КонецФункции
Функция ПоследняяПроверкаВерсииРазрешенныхНаборов() Экспорт
Возврат Новый Структура("Дата", '00010101');
КонецФункции
Функция ИменаРолейБазовыеПрава(ДляВнешнихПользователей) Экспорт
ИменаРолей = Новый Массив;
Для Каждого Роль Из Метаданные.Роли Цикл
ИмяРоли = Роль.Имя;
Если Не СтрНачинаетсяС(ВРег(ИмяРоли), ВРег("БазовыеПрава")) Тогда
Продолжить;
КонецЕсли;
РольДляВнешнихПользователей = СтрНачинаетсяС(ВРег(ИмяРоли), ВРег("БазовыеПраваВнешнихПользователей"));
Если РольДляВнешнихПользователей = ДляВнешнихПользователей Тогда
ИменаРолей.Добавить(ИмяРоли);
КонецЕсли;
КонецЦикла;
Возврат ИменаРолей;
КонецФункции
#КонецОбласти
////////////////////////////////////////////////////////////////////////////////
@@ -334,19 +334,19 @@
КонецЦикла;
СтрокаКонтактнойИнформации = КонтактнаяИнформация.Добавить();
Иначе
Если ЭтоКонтактнаяИнформацияВXML Тогда
СтрокаКонтактнойИнформации = Объект.КонтактнаяИнформация.Найти(ЗначениеИлиПредставление, "ЗначенияПолей");
ИначеЕсли ЭтоКонтактнаяИнформацияВJSON Тогда
СтрокаКонтактнойИнформации = Объект.КонтактнаяИнформация.Найти(ЗначениеИлиПредставление, "Значение");
Иначе
СтрокаКонтактнойИнформации = Объект.КонтактнаяИнформация.Найти(ЗначениеИлиПредставление, "Представление");
КонецЕсли;
Если СтрокаКонтактнойИнформации = Неопределено Тогда
Если ЗапрещенВводНесколькихЗначений(ВидКонтактнойИнформации, КонтактнаяИнформация, Дата) Тогда
Возврат;
Если ЗапрещенВводНесколькихЗначений(ВидКонтактнойИнформации, КонтактнаяИнформация, Дата) Тогда
Если ЭтоКонтактнаяИнформацияВXML Тогда
СтрокаКонтактнойИнформации = Объект.КонтактнаяИнформация.Найти(ЗначениеИлиПредставление, "ЗначенияПолей");
ИначеЕсли ЭтоКонтактнаяИнформацияВJSON Тогда
СтрокаКонтактнойИнформации = Объект.КонтактнаяИнформация.Найти(ЗначениеИлиПредставление, "Значение");
Иначе
СтрокаКонтактнойИнформации = Объект.КонтактнаяИнформация.Найти(ЗначениеИлиПредставление, "Представление");
КонецЕсли;
Если СтрокаКонтактнойИнформации <> Неопределено Тогда
Возврат; // Допускается только одно значение этого вида контактной информации.
КонецЕсли;
СтрокаКонтактнойИнформации = КонтактнаяИнформация.Добавить();
КонецЕсли;
СтрокаКонтактнойИнформации = КонтактнаяИнформация.Добавить();
КонецЕсли;
СтрокаКонтактнойИнформации.Значение = Значение;
@@ -604,9 +604,7 @@
Возврат КонтактнаяИнформация;
КонецЕсли;
КонтактнаяИнформацияПоПолям = УправлениеКонтактнойИнформациейСлужебный.КонтактнаяИнформацияВСтруктуруJSON(КонтактнаяИнформация, ОжидаемыйВид);
КонтактнаяИнформацияПоПолям = УправлениеКонтактнойИнформациейСлужебный.КонтактнаяИнформацияВСтруктуруJSON(КонтактнаяИнформация, ОжидаемыйВид,, Ложь);
Возврат УправлениеКонтактнойИнформациейСлужебный.СтруктураВСтрокуJSON(КонтактнаяИнформацияПоПолям);
КонецФункции
@@ -4671,10 +4669,14 @@
Форма.Модифицированность = Истина;
КонецЕсли;
Если ПустаяСтрока(СтрокаКИ.Представление) И ЗначениеЗаполнено(СтрокаКИ.Значение) Тогда
СтрокаКИ.Представление = ПредставлениеКонтактнойИнформации(СтрокаКИ.Значение);
Иначе
СтрокаКИ.Комментарий = КомментарийКонтактнойИнформации(СтрокаКИ.Значение);
Если ПустаяСтрока(СтрокаКИ.Представление) Тогда
СтрокаКИ.Представление = ПредставлениеКонтактнойИнформации(СтрокаКИ.Значение);
КонецЕсли;
КонецЕсли;
КонецПроцедуры
@@ -5074,34 +5076,34 @@
СтрокаКонтактнойИнформации.ДействуетС = СтрокаКонтактнойИнформацииОбъекта.Дата;
КонецЕсли;
ОбъектКонтактнойИнформации = УправлениеКонтактнойИнформациейСлужебный.СтрокаJSONВСтруктуру(СтрокаКонтактнойИнформации.Значение);
ЗаполнитьТехническиеПоляКонтактнойИнформации(СтрокаКонтактнойИнформации, ОбъектКонтактнойИнформации, СтрокаКонтактнойИнформацииОбъекта.Тип);
Если ЗначениеЗаполнено(СтрокаКонтактнойИнформации.Значение) Тогда
ОбъектКонтактнойИнформации = УправлениеКонтактнойИнформациейСлужебный.СтрокаJSONВСтруктуру(СтрокаКонтактнойИнформации.Значение);
ЗаполнитьТехническиеПоляКонтактнойИнформации(СтрокаКонтактнойИнформации, ОбъектКонтактнойИнформации, СтрокаКонтактнойИнформацииОбъекта.Тип);
КонецЕсли;
КонецПроцедуры
Процедура ВосстановитьПустыеЗначениеПредставление(СтрокаКонтактнойИнформации)
Если ПустаяСтрока(СтрокаКонтактнойИнформации.Тип) Тогда
Если ПустаяСтрока(СтрокаКонтактнойИнформации.Тип) Тогда
СтрокаКонтактнойИнформации.Тип = УправлениеКонтактнойИнформациейСлужебныйПовтИсп.ТипВидаКонтактнойИнформации(
СтрокаКонтактнойИнформации.Вид);
КонецЕсли;
// ЗначенияПолей может отсутствовать в строке контактной информации
СведенияПолей = Новый Структура("ЗначенияПолей", Неопределено);
ЗаполнитьЗначенияСвойств(СведенияПолей, СтрокаКонтактнойИнформации);
ЕстьЗначенияПолей = (СведенияПолей.ЗначенияПолей <> Неопределено);
ПустоеПредставление = ПустаяСтрока(СтрокаКонтактнойИнформации.Представление);
ПустоеЗначение = ПустаяСтрока(СтрокаКонтактнойИнформации.Значение);
ПустоеЗначение = ПустаяСтрока(СтрокаКонтактнойИнформации.Значение);
ПустыеЗначенияПолей = ?(ЕстьЗначенияПолей, ПустаяСтрока(СведенияПолей.ЗначенияПолей), Истина);
ЗначенияПолей = Новый Структура("Значение", Неопределено);
ЗаполнитьЗначенияСвойств(ЗначенияПолей, СтрокаКонтактнойИнформации);
ЕстьЗначенияПолей = (ТипЗнч(ЗначенияПолей.Значение) = Тип("Строка"));
ПустыеЗначенияПолей = ЕстьЗначенияПолей И ПустаяСтрока(ЗначенияПолей.Значение);
ВсеПоляПустые = ПустоеПредставление И ПустоеЗначение И ПустыеЗначенияПолей;
ВсеПоляЗаполнены = Не ПустоеПредставление И Не ПустоеЗначение И НЕ ПустыеЗначенияПолей;
Если ЕстьЗначенияПолей Тогда
Если ПустоеПредставление И ПустоеЗначение И ПустыеЗначенияПолей Тогда
Возврат;
КонецЕсли;
Иначе
Если ПустоеПредставление И ПустоеЗначение Тогда
Возврат;
КонецЕсли;
Если ВсеПоляПустые Или ВсеПоляЗаполнены Тогда
Возврат;
КонецЕсли;
Если ПустоеПредставление Тогда
@@ -5109,41 +5111,41 @@
ФорматКонтактнойИнформации = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(СтрокаКонтактнойИнформации.Вид,
"Тип, ВключатьСтрануВПредставление, ПроверятьПоФИАС");
ФорматКонтактнойИнформации.Вставить("ФорматАдреса", "ФИАС");
ИсточникЗначений = ?(ПустыеЗначенияПолей, СтрокаКонтактнойИнформации.Значение, СтрокаКонтактнойИнформации.ЗначенияПолей);
СтрокаКонтактнойИнформации.Представление = УправлениеКонтактнойИнформациейСлужебный.ПредставлениеКонтактнойИнформации(
СтрокаКонтактнойИнформации.Значение, ФорматКонтактнойИнформации);
ИсточникЗначений, ФорматКонтактнойИнформации);
КонецЕсли;
Если ПустоеЗначение Тогда
Если ЕстьЗначенияПолей И ПустыеЗначенияПолей Тогда
Если Не ПустоеПредставление И ПустыеЗначенияПолей Тогда
АдресПоПолям = УправлениеКонтактнойИнформациейСлужебный.КонтактнаяИнформацияПоПредставлению(
СтрокаКонтактнойИнформации.Представление, СтрокаКонтактнойИнформации.Тип);
СтрокаКонтактнойИнформации.Значение = УправлениеКонтактнойИнформациейСлужебный.СтруктураВСтрокуJSON(АдресПоПолям);
СтрокаКонтактнойИнформации.Значение = УправлениеКонтактнойИнформациейСлужебный.КонтактнаяИнформацияИзJSONВXML(
СтрокаКонтактнойИнформации.Значение, СтрокаКонтактнойИнформации.Тип);
ИначеЕсли ЕстьЗначенияПолей Тогда
Если ЕстьЗначенияПолей Тогда
СтрокаКонтактнойИнформации.ЗначенияПолей = УправлениеКонтактнойИнформациейСлужебный.КонтактнаяИнформацияИзJSONВXML(
СтрокаКонтактнойИнформации.Значение, СтрокаКонтактнойИнформации.Тип);
КонецЕсли;
СтрокаКонтактнойИнформации.Значение = КонтактнаяИнформацияВJSON(СтрокаКонтактнойИнформации.Значение,
ИначеЕсли Не ПустыеЗначенияПолей Тогда
СтрокаКонтактнойИнформации.Значение = КонтактнаяИнформацияВJSON(СтрокаКонтактнойИнформации.ЗначенияПолей,
СтрокаКонтактнойИнформации.Тип);
Иначе
АдресПоПолям = УправлениеКонтактнойИнформациейСлужебный.КонтактнаяИнформацияПоПредставлению(
СтрокаКонтактнойИнформации.Представление, СтрокаКонтактнойИнформации.Тип);
СтрокаКонтактнойИнформации.Значение = УправлениеКонтактнойИнформациейСлужебный.СтруктураВСтрокуJSON(АдресПоПолям);
КонецЕсли;
ИначеЕсли ЕстьЗначенияПолей И ПустыеЗначенияПолей Тогда
ИначеЕсли ПустыеЗначенияПолей И ЕстьЗначенияПолей Тогда
КонтактнаяИнформацияXDTO = УправлениеКонтактнойИнформациейСлужебный.КонтактнаяИнформацияXDTOПоПредставлению(
СтрокаКонтактнойИнформации.ЗначенияПолей = КонтактнаяИнформацияВXML(СтрокаКонтактнойИнформации.Значение,
СтрокаКонтактнойИнформации.Представление, СтрокаКонтактнойИнформации.Вид);
СтрокаКонтактнойИнформации.Значение = УправлениеКонтактнойИнформациейСлужебный.КонтактнаяИнформацияXDTOВXML(
КонтактнаяИнформацияXDTO);
КонецЕсли;
КонецПроцедуры
// Приводит код страны к единому виду - строка длиной три символа.
@@ -22,13 +22,7 @@
МодульАдресныйКлассификаторСлужебный = ОбщегоНазначения.ОбщийМодуль("АдресныйКлассификаторСлужебный");
СведенияОДоступностиАдресныхСведений = МодульАдресныйКлассификаторСлужебный.СведенияОДоступностиАдресныхСведений();
Результат.Вставить("ИспользоватьЗагруженные", СведенияОДоступностиАдресныхСведений.Получить("ИспользоватьЗагруженные"));
Если Не ОбщегоНазначения.РазделениеВключено() Тогда
Результат.Вставить("КлассификаторДоступен", СведенияОДоступностиАдресныхСведений.Получить("КлассификаторДоступен"));
КонецЕсли;
Возврат Результат;
Возврат СведенияОДоступностиАдресныхСведений;
КонецФункции
@@ -233,7 +233,7 @@
Попытка
Если ПротоколПодключения = ПротоколИнтернетПочты.IMAP
И Не СерверИсходящейПочтыНеТребуетДополнительнойОтправкиПоIMAP(ВыборкаПисьма.СерверИсходящейПочты) Тогда
И Не СерверИсходящейПочтыНеТребуетДополнительнойОтправкиПоIMAP(Профиль.АдресСервераSMTP) Тогда
Взаимодействия.ВыполнитьОтправкуПисьма(ПисьмоОбъект, Соединение, ПараметрыПисьма, "IMAP");
ИдентификаторСообщенияОтправкаIMAP = ПараметрыПисьма.ИдентификаторСообщения;
КонецЕсли;
+16 -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="8b523cc9-b443-4704-a73a-0229a7132b59">
<mdclass:Configuration xmlns:mdclass="http://g5.1c.ru/v8/dt/metadata/mdclass" uuid="2af3a013-a4bc-4293-9ef5-30796855e2d2">
<name>БиблиотекаСтандартныхПодсистем</name>
<synonym>
<key>ru</key>
<value>Библиотека стандартных подсистем, редакция 3.0</value>
</synonym>
<containedObjects classId="9cd510cd-abfc-11d4-9434-004095e12fc7" objectId="ca1011d3-bdb0-42ed-a4b8-25a9a808d94f"/>
<containedObjects classId="9fcd25a0-4822-11d4-9414-008048da11f9" objectId="e461f107-afda-445e-a130-3467f4506e73"/>
<containedObjects classId="e3687481-0a87-462c-a166-9f34594f9bba" objectId="e8ac1d7c-80c7-4ecd-9b6f-43311cfb48ef"/>
<containedObjects classId="9de14907-ec23-4a07-96f0-85521cb6b53b" objectId="79af1aad-92fd-4b4e-b288-f770f4c4ada9"/>
<containedObjects classId="51f2d5d8-ea4d-4064-8892-82951750031e" objectId="b42f3f11-2bef-4d8f-a1f5-b8ffcfc33f50"/>
<containedObjects classId="e68182ea-4237-4383-967f-90c1e3370bc7" objectId="77970f5a-37f9-4f5b-a0a0-3fce475bc0a9"/>
<containedObjects classId="fb282519-d103-4dd3-bc12-cb271d631dfc" objectId="8fc273a5-d6bb-4382-ad62-f9c758aa2380"/>
<containedObjects classId="9cd510cd-abfc-11d4-9434-004095e12fc7" objectId="ff48067b-3e7b-4c33-8634-7cfe7ed28fb7"/>
<containedObjects classId="9fcd25a0-4822-11d4-9414-008048da11f9" objectId="47a4921a-9212-4428-b8d7-b01bf4ad4ae9"/>
<containedObjects classId="e3687481-0a87-462c-a166-9f34594f9bba" objectId="2b1bce57-08a8-4c7e-b3a3-0e5ad9018dc9"/>
<containedObjects classId="9de14907-ec23-4a07-96f0-85521cb6b53b" objectId="0ebc6942-0aa6-480d-8b00-3c5c27ceb959"/>
<containedObjects classId="51f2d5d8-ea4d-4064-8892-82951750031e" objectId="a9492e52-990b-4cc9-8a20-0ba3fc27e6c8"/>
<containedObjects classId="e68182ea-4237-4383-967f-90c1e3370bc7" objectId="49135ce3-1ad0-4364-ba80-0df6f50b344a"/>
<containedObjects classId="fb282519-d103-4dd3-bc12-cb271d631dfc" objectId="81e4d15e-0eb2-4e32-887a-6c570aa367d6"/>
<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.231</version>
<version>3.0.1.240</version>
<updateCatalogAddress>http://downloads.v8.1c.ru/tmplts/</updateCatalogAddress>
<includeHelpInContents>true</includeHelpInContents>
<usedMobileApplicationFunctionalities>
@@ -415,7 +415,6 @@
<sessionParameters>SessionParameter.ВсеВидыДоступаКромеСпециальных</sessionParameters>
<sessionParameters>SessionParameter.ВыполняетсяЗаписьОбъекта</sessionParameters>
<sessionParameters>SessionParameter.ВыполняетсяОбновлениеИБ</sessionParameters>
<sessionParameters>SessionParameter.ГруппыДоступаАвторизованногоПользователя</sessionParameters>
<sessionParameters>SessionParameter.ДатаОбновленияПовторноИспользуемыхЗначенийМРО</sessionParameters>
<sessionParameters>SessionParameter.ДействующиеДатыЗапретаИзменения</sessionParameters>
<sessionParameters>SessionParameter.ИдентификаторыТаблицСОтдельнымиНастройкамиПрав</sessionParameters>
@@ -440,6 +439,10 @@
<sessionParameters>SessionParameter.ПриоритетныеДанныеОбмена</sessionParameters>
<sessionParameters>SessionParameter.ПропуститьПроверкуЗапретаИзменения</sessionParameters>
<sessionParameters>SessionParameter.РаботаСВнешнимиРесурсамиЗаблокирована</sessionParameters>
<sessionParameters>SessionParameter.РазрешенныйНаборГруппДоступа</sessionParameters>
<sessionParameters>SessionParameter.РазрешенныйНаборГруппПользователей</sessionParameters>
<sessionParameters>SessionParameter.РазрешенныйПользователь</sessionParameters>
<sessionParameters>SessionParameter.РазрешенныйПустойНаборГруппДоступа</sessionParameters>
<sessionParameters>SessionParameter.РежимЗагрузкиСообщенияОбменаДаннымиПередЗапуском</sessionParameters>
<sessionParameters>SessionParameter.СпискиСОграничениемЧерезКлючиДоступаГруппДоступа</sessionParameters>
<sessionParameters>SessionParameter.СпискиСОграничениемЧерезКлючиДоступаПользователей</sessionParameters>
@@ -1513,6 +1516,7 @@
<catalogs>Catalog.КлассификаторБанков</catalogs>
<catalogs>Catalog.КлючевыеОперации</catalogs>
<catalogs>Catalog.КлючиДоступа</catalogs>
<catalogs>Catalog.НаборыГруппДоступа</catalogs>
<catalogs>Catalog.НаборыДополнительныхРеквизитовИСведений</catalogs>
<catalogs>Catalog.ОбщиеВнешниеКомпоненты</catalogs>
<catalogs>Catalog.ОчередьЗаданий</catalogs>
@@ -1766,6 +1770,8 @@
<informationRegisters>InformationRegister.КлючиДоступаГруппДоступа</informationRegisters>
<informationRegisters>InformationRegister.КлючиДоступаКОбъектам</informationRegisters>
<informationRegisters>InformationRegister.КлючиДоступаКРегистрам</informationRegisters>
<informationRegisters>InformationRegister.КлючиДоступаКРегиструРезультатыПроверкиУчета</informationRegisters>
<informationRegisters>InformationRegister.КлючиДоступаНаборовГруппДоступа</informationRegisters>
<informationRegisters>InformationRegister.КлючиДоступаПользователей</informationRegisters>
<informationRegisters>InformationRegister.КодировкиФайлов</informationRegisters>
<informationRegisters>InformationRegister.КомментарииОперацииСтатистики</informationRegisters>
@@ -1 +1 @@
{6,1,1,5c7784cd-4426-4a63-a0d6-528aa7488e7a,1,f6ca036b-93cd-4ed0-834b-37fb452505ed,"3.0.1.231","Фирма ""1С""","БиблиотекаСтандартныхПодсистем",5842,1,0,8b523cc9-b443-4704-a73a-0229a7132b59,8b523cc9-b443-4704-a73a-0229a7132b59,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,d83e425b-35fd-4c8c-9729-7b857cd47a31,1,595280a3-22b5-47f7-b403-507b7e2400c4,"3.0.1.240","Фирма ""1С""","БиблиотекаСтандартныхПодсистем",5875,1,0,2af3a013-a4bc-4293-9ef5-30796855e2d2,2af3a013-a4bc-4293-9ef5-30796855e2d2,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
@@ -53,11 +53,11 @@
НаселенныйПунктДетально.AddressType = УправлениеКонтактнойИнформациейКлиентСервер.АдресВСвободнойФорме();
ИначеЕсли УправлениеКонтактнойИнформациейКлиентСервер.ЭтоКонтактнаяИнформацияВJSON(ЗначенияПолей) Тогда
ДанныеАдреса = УправлениеКонтактнойИнформациейСлужебный.СтрокаJSONВСтруктуру(ЗначенияПолей);
НаселенныйПунктДетально = АккомодацияСтруктурыАдреса(ДанныеАдреса);
НаселенныйПунктДетально = ПодготовитьАдресДляВвода(ДанныеАдреса);
Иначе
XDTOКонтактная = ИзвлечьСтарыйФорматАдреса(ЗначенияПолей, ТипКонтактнойИнформации);
ДанныеАдреса = УправлениеКонтактнойИнформациейСлужебный.КонтактнаяИнформацияВСтруктуруJSON(XDTOКонтактная, ТипКонтактнойИнформации);
НаселенныйПунктДетально = АккомодацияСтруктурыАдреса(ДанныеАдреса);
НаселенныйПунктДетально = ПодготовитьАдресДляВвода(ДанныеАдреса);
КонецЕсли;
УстановитьЗначениеРеквизитовПоКонтактнойИнформации(ЭтотОбъект, НаселенныйПунктДетально);
@@ -849,7 +849,7 @@
КонецФункции
&НаСервере
Функция АккомодацияСтруктурыАдреса(Данные)
Функция ПодготовитьАдресДляВвода(Данные)
НаселенныйПунктДетально = УправлениеКонтактнойИнформациейКлиентСервер.ОписаниеНовойКонтактнойИнформации(ПредопределенноеЗначение("Перечисление.ТипыКонтактнойИнформации.Адрес"));
ЗаполнитьЗначенияСвойств(НаселенныйПунктДетально, Данные);
@@ -98,7 +98,7 @@
КонецЕсли;
КонецЕсли;
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
ПоложениеКоманднойПанели = ПоложениеКоманднойПанелиФормы.Авто;
@@ -56,6 +56,11 @@
ОбменДаннымиXDTOСервер.ИнициализироватьТаблицыПравилОбмена(КомпонентыОбмена);
Если КомпонентыОбмена.ЭтоОбменЧерезПланОбмена Тогда
ОбменДаннымиXDTOСервер.ЗаполнитьСтруктуруНастроекXDTO(КомпонентыОбмена);
ОбменДаннымиXDTOСервер.ЗаполнитьПоддерживаемыеОбъектыXDTO(КомпонентыОбмена);
КонецЕсли;
Возврат КомпонентыОбмена;
КонецФункции
@@ -104,7 +104,7 @@
// Взводится в значение Истина, если нужно, чтобы формирование журнала регистрации проходило не в фоне.
ЗапускатьНеВФоне = Параметры.ЗапускатьНеВФоне;
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
ОбщегоНазначенияКлиентСервер.УстановитьСвойствоЭлементаФормы(Элементы, "Критичность", "ПоложениеЗаголовка", ПоложениеЗаголовкаЭлементаФормы.Нет);
ОбщегоНазначенияКлиентСервер.УстановитьСвойствоЭлементаФормы(Элементы, "Критичность", "КнопкаВыбора", Истина);
@@ -21,7 +21,7 @@
УстановитьИзмененияВИнтерфейсе();
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
ОбщегоНазначенияКлиентСервер.УстановитьСвойствоЭлементаФормы(Элементы, "ВариантЗагрузки", "ВидПереключателя", ВидПереключателя.Переключатель);
ОбщегоНазначенияКлиентСервер.УстановитьСвойствоЭлементаФормы(Элементы, "ФормаКнопкаОтмена", "Видимость", Ложь);
@@ -11,7 +11,7 @@
// Заполнение списка календарей.
ЗакрыватьПриВыборе = Ложь;
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
ОбщегоНазначенияКлиентСервер.УстановитьСвойствоЭлементаФормы(Элементы, "Выбрать", "Видимость", Ложь);
ОбщегоНазначенияКлиентСервер.УстановитьСвойствоЭлементаФормы(Элементы, "ГруппаПоиск", "Отображение", ОтображениеГруппыКнопок.Компактное);
@@ -15,7 +15,7 @@
КоличествоПоказываемыхСобытий = 200;
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
ОбщегоНазначенияКлиентСервер.УстановитьСвойствоЭлементаФормы(Элементы, "ГруппаПросмотрЗарегистрированныхСобытий", "ОтображатьЗаголовок", Ложь);
@@ -607,12 +607,12 @@
ОбменДаннымиXDTOСервер.ОбновитьНастройкиXDTOКорреспондента(КомпонентыОбмена);
ОбменДаннымиXDTOСервер.ОбновитьПрефиксКорреспондента(КомпонентыОбмена);
Если ИнициализироватьТаблицыПравил Тогда
Если Не КомпонентыОбмена.ТолькоНастройкиXDTO
И ИнициализироватьТаблицыПравил Тогда
ОбменДаннымиXDTOСервер.ИнициализироватьТаблицыПравилОбмена(КомпонентыОбмена);
ОбменДаннымиXDTOСервер.ЗаполнитьСтруктуруНастроекXDTO(КомпонентыОбмена);
ОбменДаннымиXDTOСервер.ЗаполнитьПоддерживаемыеОбъектыXDTO(КомпонентыОбмена);
КонецЕсли;
ОбменДаннымиXDTOСервер.ЗаполнитьПоддерживаемыеОбъектыXDTO(КомпонентыОбмена);
КонецЕсли;
Если КомпонентыОбмена.ТолькоНастройкиXDTO Тогда
@@ -14,7 +14,7 @@
Возврат;
КонецЕсли;
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
Отказ = Истина;
ВызватьИсключение НСтр("ru = 'Для корректной работы необходим режим толстого, тонкого или ВЕБ-клиента.'");
@@ -14,7 +14,7 @@
Возврат;
КонецЕсли;
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
Отказ = Истина;
ВызватьИсключение НСтр("ru = 'Для корректной работы необходим режим толстого, тонкого или ВЕБ-клиента.'");
@@ -463,7 +463,6 @@
<toolTipRepresentation>ShowBottom</toolTipRepresentation>
<representationInContextMenu>Auto</representationInContextMenu>
</items>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
@@ -23,8 +23,7 @@
ВидимостьГруппыКоманды = Истина;
Если ОбщегоНазначения.ПодсистемаСуществует("ИнтернетПоддержкаПользователей") Тогда
МодульИнтернетПоддержкаПользователей = ОбщегоНазначения.ОбщийМодуль("ИнтернетПоддержкаПользователей");
Элементы.ГруппаАдресныйКлассификаторПраваяКолонка.Видимость =
НЕ МодульИнтернетПоддержкаПользователей.ЗаполненыДанныеАутентификацииПользователяИнтернетПоддержки();
Элементы.ГруппаАдресныйКлассификаторПраваяКолонка.Видимость = Ложь;
Иначе
ВидимостьГруппыНастройки = Ложь;
@@ -174,12 +173,6 @@
&НаКлиенте
Процедура ОбработкаОповещения(ИмяСобытия, Параметр, Источник)
Если ИмяСобытия = "ИнтернетПоддержкаПодключена" Тогда
Элементы.ГруппаАдресныйКлассификаторПраваяКолонка.Видимость = Ложь;
ИначеЕсли ИмяСобытия = "ИнтернетПоддержкаОтключена" Тогда
Элементы.ГруппаАдресныйКлассификаторПраваяКолонка.Видимость = Истина;
КонецЕсли;
Если ИмяСобытия = "ОчищенАдресныйКлассификатор" Или ИмяСобытия = "ЗагруженАдресныйКлассификатор" Тогда
Элементы.РегистрСведенийАдресныеОбъектыОчиститьАдресныйКлассификатор.Доступность = (Параметр = Истина);
КонецЕсли;
@@ -37,7 +37,7 @@
Список.Параметры.УстановитьЗначениеПараметра("Владелец", Параметры.Файл);
ВладелецВерсии = Параметры.Файл;
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
Элементы.ФормаОткрытьВерсию.Картинка = БиблиотекаКартинок.Лупа;
Элементы.ФормаОткрытьВерсию.Отображение = ОтображениеКнопки.Картинка;
@@ -61,7 +61,7 @@
Элементы.Кодировка.Видимость = Ложь;
КонецЕсли;
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
ОбщегоНазначенияКлиентСервер.УстановитьСвойствоЭлементаФормы(Элементы, "СтандартнаяЗаписатьИЗакрыть", "Отображение", ОтображениеКнопки.Картинка);
@@ -20,7 +20,7 @@
РасширениеДляЗашифрованныхФайлов = "p7m";
КонецЕсли;
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
ОбщегоНазначенияКлиентСервер.УстановитьСвойствоЭлементаФормы(Элементы, "СохранятьСРасшифровкой", "ВидПереключателя", ВидПереключателя.Переключатель);
ОбщегоНазначенияКлиентСервер.УстановитьСвойствоЭлементаФормы(Элементы, "ФормаСохранитьФайл", "Отображение", ОтображениеКнопки.Картинка);
@@ -33,7 +33,7 @@
РаботаСФайламиПереопределяемый.ПриСозданииФормыЭлементаФайлов(ЭтотОбъект);
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
ОбщегоНазначенияКлиентСервер.УстановитьСвойствоЭлементаФормы(Элементы, "ФормаСтандартнаяЗаписатьИЗакрыть", "Отображение", ОтображениеКнопки.Картинка);
ОбщегоНазначенияКлиентСервер.УстановитьСвойствоЭлементаФормы(Элементы, "ФормаОткрытьФайлДляПросмотра", "Отображение", ОтображениеКнопки.Картинка);
@@ -9,7 +9,7 @@
БольшеНеСпрашивать = Ложь;
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
Элементы.КакОткрывать.Заголовок = НСтр("ru ='Режим открытия файла'");
Элементы.КакОткрывать.ПоложениеЗаголовка = ПоложениеЗаголовкаЭлементаФормы.Верх;
@@ -640,6 +640,122 @@
<currentRowUse>Auto</currentRowUse>
</extInfo>
</items>
<items xsi:type="form:FormGroup">
<name>ГруппаИнформация</name>
<id>542</id>
<items xsi:type="form:Decoration">
<name>Предупреждение</name>
<id>544</id>
<title>
<key>ru</key>
<value>Предупреждение</value>
</title>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<extendedTooltip>
<name>ПредупреждениеРасширеннаяПодсказка</name>
<id>546</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<contextMenu>
<name>ПредупреждениеКонтекстноеМеню</name>
<id>545</id>
<autoFill>true</autoFill>
</contextMenu>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:PictureDecorationExtInfo">
<picture xsi:type="core:PictureRef">
<picture>CommonPicture.Предупреждение</picture>
</picture>
</extInfo>
</items>
<items xsi:type="form:Decoration">
<name>ИнформацияОЗагрузкеАдресныеСведений</name>
<id>539</id>
<title>
<key>ru</key>
<value>Для автоподбора и проверки адресов необходимо загрузить адресные сведения. &lt;link load>Загрузить
&lt;/></value>
</title>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<extendedTooltip>
<name>ИнформацияОЗагрузкеАдресныеСведенийРасширеннаяПодсказка</name>
<id>541</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<contextMenu>
<name>ИнформацияОЗагрузкеАдресныеСведенийКонтекстноеМеню</name>
<id>540</id>
<autoFill>true</autoFill>
</contextMenu>
<formatted>true</formatted>
<type>Label</type>
<autoMaxHeight>true</autoMaxHeight>
<horizontalStretch>true</horizontalStretch>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<handlers>
<event>URLProcessing</event>
<name>ИнформацияОЗагрузкеАдресныеСведенийОбработкаНавигационнойСсылки</name>
</handlers>
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</items>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<title>
<key>ru</key>
<value>Группа информация</value>
</title>
<toolTip>
<key>ru</key>
<value>Группа информация</value>
</toolTip>
<horizontalStretch>true</horizontalStretch>
<extendedTooltip>
<name>ГруппаИнформацияРасширеннаяПодсказка</name>
<id>543</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<type>UsualGroup</type>
<extInfo xsi:type="form:UsualGroupExtInfo">
<group>AlwaysHorizontal</group>
<verticalAlign>Center</verticalAlign>
<behavior>Auto</behavior>
<showLeftMargin>true</showLeftMargin>
<united>true</united>
<backColor xsi:type="core:ColorRef">
<color>Style.ЦветФонаПредупреждения</color>
</backColor>
<throughAlign>Auto</throughAlign>
<currentRowUse>Auto</currentRowUse>
</extInfo>
</items>
<items xsi:type="form:FormGroup">
<name>ГруппаИсторическийАдрес</name>
<id>358</id>
@@ -4466,10 +4582,10 @@
</edit>
</attributes>
<attributes>
<name>ПредлагатьАвтоподбор</name>
<name>АвтоподборДоступен</name>
<title>
<key>ru</key>
<value>Предлагать автоподбор</value>
<value>Автоподбор доступен</value>
</title>
<id>56</id>
<valueType>
@@ -37,12 +37,8 @@
ЕстьКлассификатор = СведенияОАдресномКлассификаторе["ИспользоватьЗагруженные"];
КлассификаторДоступен = СведенияОАдресномКлассификаторе["КлассификаторДоступен"];
ВебСервисИспользуется = КлассификаторДоступен;
ПредлагатьАвтоподбор = КлассификаторДоступен Или ЕстьКлассификатор;
Если Не ПредлагатьАвтоподбор Тогда
Элементы.АдресныйКлассификаторУстарел.Видимость = Истина;
КонецЕсли;
МожноЗагружатьКлассификатор = Обработки.РасширенныйВводКонтактнойИнформации.ЕстьВозможностьИзмененияАдресногоКлассификатора();
АвтоподборДоступен = КлассификаторДоступен Или ЕстьКлассификатор;
ЕстьПравоЗагружатьКлассификатор = Обработки.РасширенныйВводКонтактнойИнформации.ЕстьВозможностьИзмененияАдресногоКлассификатора();
Параметры.Свойство("ВозвращатьСписокЗначений", ВозвращатьСписокЗначений);
@@ -65,11 +61,11 @@
НаселенныйПунктДетально.AddressType = РаботаСАдресамиКлиентСервер.МуниципальныйАдрес();
ИначеЕсли УправлениеКонтактнойИнформациейКлиентСервер.ЭтоКонтактнаяИнформацияВJSON(ЗначенияПолей) Тогда
ДанныеАдреса = УправлениеКонтактнойИнформациейСлужебный.СтрокаJSONВСтруктуру(ЗначенияПолей);
НаселенныйПунктДетально = РаботаСАдресами.АккомодацияСтруктурыАдреса(ДанныеАдреса);
НаселенныйПунктДетально = РаботаСАдресами.ПодготовитьАдресДляВвода(ДанныеАдреса);
Иначе
XDTOКонтактная = ИзвлечьСтарыйФорматАдреса(ЗначенияПолей, ТипКонтактнойИнформации);
ДанныеАдреса = УправлениеКонтактнойИнформациейСлужебный.КонтактнаяИнформацияВСтруктуруJSON(XDTOКонтактная, ТипКонтактнойИнформации);
НаселенныйПунктДетально = РаботаСАдресами.АккомодацияСтруктурыАдреса(ДанныеАдреса);
НаселенныйПунктДетально = РаботаСАдресами.ПодготовитьАдресДляВвода(ДанныеАдреса);
КонецЕсли;
Если МеждународныйФорматАдреса И Не УправлениеКонтактнойИнформациейКлиентСервер.ЭтоАдресВСвободнойФорме(НаселенныйПунктДетально.AddressType) Тогда
@@ -131,12 +127,22 @@
ОпределитьОтображениеЭлементовНаФорме();
Если КлассификаторДоступен Тогда
Элементы.ГруппаИнформация.Видимость = Ложь;
Иначе
Элементы.ГруппаИнформация.Видимость = Не АдресныеСведенияКлассификатораЗагружены(НаименованиеРегиона(НаселенныйПунктДетально));
КонецЕсли;
Если Не ЕстьПравоЗагружатьКлассификатор Тогда
Элементы.ИнформацияОЗагрузкеАдресныеСведений.Заголовок = НСтр("ru='Для автоподбора и проверки адресов обратитесь к администратору для загрузки адресных сведений.'");
Элементы.ЗагрузитьКлассификатор.Видимость = Ложь;
КонецЕсли;
ДоступностьКлассификатора = Неопределено;
УстановитьКлючИспользованияФормы();
СформироватьМенюДобавленияСтроенийИПомещений();
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
ПоложениеКоманднойПанели = ПоложениеКоманднойПанелиФормы.Верх;
@@ -184,11 +190,20 @@
&НаКлиенте
Процедура ОбработкаОповещения(ИмяСобытия, Параметр, Источник)
Если ИмяСобытия = "АдресныйКлассификаторАктуализирован" ИЛИ ИмяСобытия = "ЗагруженАдресныйКлассификатор" Тогда
Если ЕстьКлассификатор И СведенияОРегионе(НаселенныйПунктДетально.Area + " " + НаселенныйПунктДетально.AreaType).Загружен = Истина Тогда
Элементы.ГруппаОписаниеНедоступностиСервера.ТекущаяСтраница = Элементы.СервисДоступен;
АдресныеСведенияЗагружены = АдресныеСведенияКлассификатораЗагружены(НаименованиеРегиона(НаселенныйПунктДетально));
Если КлассификаторДоступен Или АдресныеСведенияЗагружены Тогда
Элементы.ГруппаИнформация.Видимость = Ложь;
АвтоподборДоступен = Истина;
Элементы.ПроверитьЗаполнениеАдреса.Доступность = Истина;
Иначе
Элементы.ГруппаИнформация.Видимость = Истина;
КонецЕсли;
КонецЕсли;
КонецПроцедуры
#КонецОбласти
@@ -626,7 +641,7 @@
&НаКлиенте
Процедура НаселенныйПунктАвтоПодбор(Элемент, Текст, ДанныеВыбора, ПараметрыПолученияДанных, Ожидание, СтандартнаяОбработка)
Если Не ПредлагатьАвтоподбор Тогда
Если Не АвтоподборДоступен Тогда
Возврат;
КонецЕсли;
@@ -720,7 +735,7 @@
&НаКлиенте
Процедура УлицаАвтоПодбор(Элемент, Текст, ДанныеВыбора, Ожидание, СтандартнаяОбработка)
Если Не ПредлагатьАвтоподбор Тогда
Если Не АвтоподборДоступен Тогда
Возврат;
КонецЕсли;
@@ -773,7 +788,7 @@
&НаКлиенте
Процедура ДомАвтоПодбор(Элемент, Текст, ДанныеВыбора, ПараметрыПолученияДанных, Ожидание, СтандартнаяОбработка)
Если Не ПредлагатьАвтоподбор Тогда
Если Не АвтоподборДоступен Тогда
Возврат;
КонецЕсли;
@@ -906,6 +921,15 @@
&НаКлиенте
Процедура ЗагрузитьКлассификатор(Команда)
ОткрытьФормуЗагрузкиКлассификатора();
КонецПроцедуры
&НаКлиенте
Процедура ОткрытьФормуЗагрузкиКлассификатора()
Перем ДополнительныеПараметры, СведенияОРегионе;
ДополнительныеПараметры = Новый Структура();
Если ТипЗнч(НаселенныйПунктДетально) = Тип("Структура") И НаселенныйПунктДетально.Свойство("Area") Тогда
@@ -914,6 +938,7 @@
КонецЕсли;
ЗагрузитьАдресныйКлассификатор(ДополнительныеПараметры);
КонецПроцедуры
&НаКлиенте
@@ -1111,7 +1136,7 @@
Модифицированность = Истина;
Индекс = Текст;
Если ПредлагатьАвтоподбор Тогда
Если АвтоподборДоступен Тогда
ПараметрыФормы = Новый Структура;
ПараметрыФормы.Вставить("Индекс", СокрЛП(Текст));
ПараметрыФормы.Вставить("ВыборАдресаПоПочтовомуИндексу", Истина);
@@ -1165,13 +1190,16 @@
Процедура ПереопределитьТипаАдресаПоСтране(Страна, НаселенныйПунктДетально)
Если РаботаСАдресамиКлиентСервер.ЭтоОсновнаяСтрана(Страна) Тогда
НаселенныйПунктДетально.AddressType = РаботаСАдресамиКлиентСервер.МуниципальныйАдрес();
Если СтрСравнить(НаселенныйПунктДетально.AddressType, УправлениеКонтактнойИнформациейКлиентСервер.АдресЕАЭС()) = 0
Или СтрСравнить(НаселенныйПунктДетально.AddressType, УправлениеКонтактнойИнформациейКлиентСервер.ИностранныйАдрес()) = 0 Тогда
НаселенныйПунктДетально.AddressType = РаботаСАдресамиКлиентСервер.МуниципальныйАдрес();
КонецЕсли;
ИначеЕсли ЭтоСтранаУчастникЕАЭС(Страна) Тогда
НаселенныйПунктДетально.AddressType = УправлениеКонтактнойИнформациейКлиентСервер.АдресЕАЭС();
Иначе
НаселенныйПунктДетально.AddressType = УправлениеКонтактнойИнформациейКлиентСервер.ИностранныйАдрес();
КонецЕсли;
КонецПроцедуры
&НаКлиенте
@@ -1651,6 +1679,35 @@
КонецПроцедуры
&НаКлиентеНаСервереБезКонтекста
Функция НаименованиеРегиона(НаселенныйПункт)
Возврат СокрЛП(НаселенныйПункт.area + " " + НаселенныйПункт.areaType);
КонецФункции
&НаСервереБезКонтекста
Функция АдресныеСведенияКлассификатораЗагружены(НаименованиеРегиона)
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.АдресныйКлассификатор") Тогда
МодульАдресныйКлассификатор = ОбщегоНазначения.ОбщийМодуль("АдресныйКлассификатор");
КодРегиона = МодульАдресныйКлассификатор.КодРегионаПоНаименованию(НаименованиеРегиона);
СведенияОАдресномКлассификаторе = УправлениеКонтактнойИнформациейСлужебныйПовтИсп.СведенияОДоступностиАдресногоКлассификатора();
СведенияОРегиона = СведенияОАдресномКлассификаторе.Получить(КодРегиона);
Если ТипЗнч(СведенияОРегиона) = Тип("Структура") Тогда
Возврат СведенияОРегиона.ИспользоватьЗагруженные;
Иначе
Возврат СведенияОАдресномКлассификаторе.Получить("ИспользоватьЗагруженные");
КонецЕсли;
КонецЕсли;
Возврат Истина;
КонецФункции
&НаСервереБезКонтекста
Функция ЗаполнитьСписокКонтактнойИнформации(ВидКонтактнойИнформации, КонтактнаяИнформацияОписаниеДополнительныхРеквизитов)
@@ -1705,7 +1762,7 @@
Элементы.Улица.Заголовок = НСтр("ru='Улица'");
Элементы.ОКТМО.Видимость = ВидКонтактнойИнформации.УказыватьОКТМО;
ВебСервисИспользуется = КлассификаторДоступен;
ПредлагатьАвтоподбор = КлассификаторДоступен Или ЕстьКлассификатор;
АвтоподборДоступен = КлассификаторДоступен Или ЕстьКлассификатор;
ВидимостьСтроений = Истина;
Элементы.ГруппаДобавлениеСтроения.Видимость = Истина;
Элементы.ГруппаДобавлениеПомещения.Видимость = Истина;
@@ -1736,7 +1793,7 @@
Элементы.ОКТМО.Видимость = Ложь;
Элементы.ПроверитьЗаполнениеАдреса.Доступность = Ложь;
ВебСервисИспользуется = Ложь;
ПредлагатьАвтоподбор = Ложь;
АвтоподборДоступен = Ложь;
Элементы.НаселенныйПункт.ПодсказкаВвода = "";
Элементы.Улица.ПодсказкаВвода = "";
@@ -1746,7 +1803,7 @@
Элементы.Улица.МногострочныйРежим = НЕ ЭтоНациональныйАдрес;
Элементы.ГруппаСтроенияИИнформация.Видимость = ВидимостьСтроений;
Элементы.Улица.КнопкаВыбора = ЭтоНациональныйАдрес;
Элементы.ПроверитьЗаполнениеАдреса.Доступность = ЭтоНациональныйАдрес;
Элементы.ПроверитьЗаполнениеАдреса.Доступность = ЭтоНациональныйАдрес И АвтоподборДоступен;
Элементы.ЗаполнитьПоПочтовомуИндексу.Доступность = ЭтоНациональныйАдрес;
Элементы.МуниципальноеДеление.Доступность = ЭтоНациональныйАдрес;
Элементы.АдминистративноТерриториальноеДеление.Доступность = ЭтоНациональныйАдрес;
@@ -3144,4 +3201,13 @@
КонецПроцедуры
&НаКлиенте
Процедура ИнформацияОЗагрузкеАдресныеСведенийОбработкаНавигационнойСсылки(Элемент, НавигационнаяСсылкаФорматированнойСтроки, СтандартнаяОбработка)
СтандартнаяОбработка = Ложь;
Если НавигационнаяСсылкаФорматированнойСтроки = "load" Тогда
ОткрытьФормуЗагрузкиКлассификатора();
КонецЕсли;
КонецПроцедуры
#КонецОбласти
@@ -42,7 +42,7 @@
ВариантыАдреса.Загрузить(ДанныеКлассификатора.Данные);
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
ПоложениеКоманднойПанели = ПоложениеКоманднойПанелиФормы.Авто;
@@ -76,7 +76,7 @@
Элементы.ВариантыАдреса.ТекущаяСтрока = Кандидаты[0].ПолучитьИдентификатор();
КонецЕсли;
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
ПоложениеКоманднойПанели = ПоложениеКоманднойПанелиФормы.Авто;
@@ -167,6 +167,8 @@
КонецЕсли;
КонецЕсли;
Результат.Муниципальный = РаботаСАдресамиКлиентСервер.ЭтоМуниципальныйАдрес(ТипАдреса);
ОповеститьОВыборе(Результат);
КонецПроцедуры
@@ -31,7 +31,7 @@
Элементы.СписокДомов.ТекущаяСтрока = Строки[0].ПолучитьИдентификатор();
КонецЕсли;
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
ОбщегоНазначенияКлиентСервер.УстановитьСвойствоЭлементаФормы(Элементы, "ФормаВыбрать", "Видимость", Ложь);
@@ -43,7 +43,7 @@
ВариантыАдреса.Загрузить(ДанныеКлассификатора.Данные);
НаселенныйПунктДетально = Параметры.НаселенныйПунктДетально;
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
Элементы.Переместить(Элементы.ВариантыАдресаНайти, Элементы.ФормаКоманднаяПанель);
Элементы.Переместить(Элементы.ВариантыАдресаОтменитьПоиск, Элементы.ФормаКоманднаяПанель);
@@ -38,21 +38,51 @@
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</items>
<items xsi:type="form:FormField">
<name>НапоминатьОЗагрузке</name>
<id>4</id>
<items xsi:type="form:FormGroup">
<name>Группа1</name>
<id>11</id>
<items xsi:type="form:FormField">
<name>НапоминатьОЗагрузке</name>
<id>4</id>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<dataPath xsi:type="form:DataPath">
<segments>НеНапоминатьОЗагрузке</segments>
</dataPath>
<titleLocation>Right</titleLocation>
<extendedTooltip>
<name>НапоминатьОЗагрузкеРасширеннаяПодсказка</name>
<id>6</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<contextMenu>
<name>НапоминатьОЗагрузкеКонтекстноеМеню</name>
<id>5</id>
<autoFill>true</autoFill>
</contextMenu>
<type>CheckBoxField</type>
<editMode>Enter</editMode>
<showInHeader>true</showInHeader>
<headerHorizontalAlign>Left</headerHorizontalAlign>
<showInFooter>true</showInFooter>
<extInfo xsi:type="form:CheckBoxFieldExtInfo"/>
</items>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<dataPath xsi:type="form:DataPath">
<segments>НеНапоминатьОЗагрузке</segments>
</dataPath>
<titleLocation>Right</titleLocation>
<extendedTooltip>
<name>НапоминатьОЗагрузкеРасширеннаяПодсказка</name>
<id>6</id>
<name>Группа1РасширеннаяПодсказка</name>
<id>12</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
@@ -60,17 +90,16 @@
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<contextMenu>
<name>НапоминатьОЗагрузкеКонтекстноеМеню</name>
<id>5</id>
<autoFill>true</autoFill>
</contextMenu>
<type>CheckBoxField</type>
<editMode>Enter</editMode>
<showInHeader>true</showInHeader>
<headerHorizontalAlign>Left</headerHorizontalAlign>
<showInFooter>true</showInFooter>
<extInfo xsi:type="form:CheckBoxFieldExtInfo"/>
<type>UsualGroup</type>
<extInfo xsi:type="form:UsualGroupExtInfo">
<group>HorizontalIfPossible</group>
<behavior>Auto</behavior>
<representation>NormalSeparation</representation>
<showLeftMargin>true</showLeftMargin>
<united>true</united>
<throughAlign>Auto</throughAlign>
<currentRowUse>Auto</currentRowUse>
</extInfo>
</items>
<commandBarLocation>Bottom</commandBarLocation>
<showCommandBar>true</showCommandBar>
@@ -105,15 +134,19 @@
<representationInContextMenu>Auto</representationInContextMenu>
</items>
<items xsi:type="form:Button">
<name>Отмена</name>
<name>Закрыть</name>
<id>9</id>
<title>
<key>ru</key>
<value>Закрыть</value>
</title>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<extendedTooltip>
<name>ОтменаРасширеннаяПодсказка</name>
<name>ЗакрытьРасширеннаяПодсказка</name>
<id>10</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
@@ -163,7 +196,7 @@
<name>НеНапоминатьОЗагрузке</name>
<title>
<key>ru</key>
<value>Больше не напоминать до завершения работы программы</value>
<value>Больше не напоминать до следующего входа в программу</value>
</title>
<id>2</id>
<valueType>
@@ -52,7 +52,7 @@
ТипАдреса = "Муниципальный";
КонецЕсли;
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда
Если ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент() Тогда // Временное решение для работы в мобильном клиенте, будет удалено в следующих версиях
ПоложениеКоманднойПанели = ПоложениеКоманднойПанелиФормы.Авто;
@@ -195,11 +195,6 @@
&НаКлиенте
Процедура НаселенныйПунктОбработкаВыбора(Элемент, ВыбранноеЗначение, СтандартнаяОбработка)
Если ВыбранноеЗначение.Отказ Или ПустаяСтрока(ВыбранноеЗначение.Представление) Тогда
ПоказатьПредупреждение(, НСтр("ru = 'Выбор из списка недоступен, т.к в адресном классификаторе отсутствует информация о адресных сведениях.'"));
СтандартнаяОбработка = Ложь;
Возврат;
КонецЕсли;
ОбработкаВыбора(Элемент, ВыбранноеЗначение, СтандартнаяОбработка);
КонецПроцедуры
@@ -303,9 +298,9 @@
Регион = ПредставлениеУровняАдреса(НаселенныйПунктДетально, "Area");
Район = ПредставлениеУровняАдреса(НаселенныйПунктДетально, "District");
МуниципальныйРайон = ПредставлениеУровняАдреса(НаселенныйПунктДетально, "MunDistrict");
МуниципальныйРайон = ПредставлениеУровняАдреса(НаселенныйПунктДетально, "MunDistrict", Ложь);
Город = ПредставлениеУровняАдреса(НаселенныйПунктДетально, "City");
Поселение = ПредставлениеУровняАдреса(НаселенныйПунктДетально, "Settlement");
Поселение = ПредставлениеУровняАдреса(НаселенныйПунктДетально, "Settlement", Ложь);
ВнутригородскойРайон = ПредставлениеУровняАдреса(НаселенныйПунктДетально, "CityDistrict");
НаселенныйПункт = ПредставлениеУровняАдреса(НаселенныйПунктДетально, "Locality");
Территория = ПредставлениеУровняАдреса(НаселенныйПунктДетально, "Territory");
Loaded 100 of 174 files, more files were not shown because too many files have changed in this diff. Show more