3_0_2_269

This commit is contained in:
Компания 1С committed 2019-04-19 00:30:00 +03:00
1 parent e15865dca6
commit c5ecb03899
46 files changed
+1542 -673

No files matched your search

@@ -2156,41 +2156,6 @@
<common>true</common>
</edit>
</attributes>
<attributes>
<name>ПредопределеннаяВидимостьПоУмолчанию</name>
<title>
<key>ru</key>
<value>Предопределенная видимость по умолчанию</value>
</title>
<id>13</id>
<valueType>
<types>Boolean</types>
</valueType>
<view>
<common>true</common>
</view>
<edit>
<common>true</common>
</edit>
</attributes>
<attributes>
<name>ПредопределенноеОписание</name>
<title>
<key>ru</key>
<value>Предопределенное описание</value>
</title>
<id>14</id>
<valueType>
<types>String</types>
<stringQualifiers/>
</valueType>
<view>
<common>true</common>
</view>
<edit>
<common>true</common>
</edit>
</attributes>
<attributes>
<name>ЭтоПредопределенный</name>
<title>
@@ -22,19 +22,6 @@
ОбновлениеИнформационнойБазы.ПроверитьОбъектОбработан(Объект, ЭтотОбъект);
Доступен = ?(Объект.ТолькоДляАвтора, "1", "2");
ЭтоПредопределенный = Не Объект.Пользовательский
И (Объект.ТипОтчета = Перечисления.ТипыОтчетов.Внутренний
Или Объект.ТипОтчета = Перечисления.ТипыОтчетов.Расширение)
И ЗначениеЗаполнено(Объект.ПредопределенныйВариант);
Если ЭтоПредопределенный Тогда
ПредопределенныйВариант = Объект.ПредопределенныйВариант.ПолучитьОбъект();
ЛокализацияСервер.ПриЧтенииПредставленийНаСервере(ПредопределенныйВариант);
ПредопределеннаяВидимостьПоУмолчанию = ПредопределенныйВариант.ВидимостьПоУмолчанию;
ПредопределенноеОписание = ПредопределенныйВариант.Описание;
ЗаполнитьИзПредопределенного();
КонецЕсли;
ПолныеПраваНаВарианты = ВариантыОтчетов.ПолныеПраваНаВарианты();
ПравоНаЭтотВариант = ПолныеПраваНаВарианты Или Объект.Автор = Пользователи.АвторизованныйПользователь();
@@ -104,11 +91,20 @@
&НаСервере
Процедура ПередЗаписьюНаСервере(Отказ, ТекущийОбъект, ПараметрыЗаписи)
// Запись свойств, связанных с предопределенным вариантом отчета.
ОписаниеИзменено = Ложь;
Если ЭтоПредопределенный Тогда
ПредопределенныйВариант = ТекущийОбъект.ПредопределенныйВариант.ПолучитьОбъект();
ЛокализацияСервер.ПриЧтенииПредставленийНаСервере(ПредопределенныйВариант);
ТекущийОбъект.ВидимостьПоУмолчаниюПереопределена =
Объект.ВидимостьПоУмолчанию <> ПредопределеннаяВидимостьПоУмолчанию;
Если Не ПустаяСтрока(Объект.Описание) И НРег(СокрЛП(Объект.Описание)) = НРег(СокрЛП(ПредопределенноеОписание)) Тогда
Объект.ВидимостьПоУмолчанию <> ПредопределенныйВариант.ВидимостьПоУмолчанию;
ОписаниеИзменено = Не ПустаяСтрока(Объект.Описание) И НРег(СокрЛП(Объект.Описание)) <> НРег(СокрЛП(ПредопределенныйВариант.Описание));
Если Не ОписаниеИзменено Тогда
ТекущийОбъект.Описание = "";
Для каждого ПредставлениеВарианта Из ТекущийОбъект.Представления Цикл
ПредставлениеВарианта.Описание = "";
КонецЦикла;
КонецЕсли;
КонецЕсли;
@@ -122,13 +118,16 @@
ВариантыОтчетов.ДеревоПодсистемЗаписать(ТекущийОбъект, ИзмененныеРазделы);
ЛокализацияСервер.ПередЗаписьюНаСервере(ТекущийОбъект);
Если ЭтоПредопределенный И Не ОписаниеИзменено Тогда
ТекущийОбъект.Представления.Очистить();
КонецЕсли;
КонецПроцедуры
&НаСервере
Процедура ПослеЗаписиНаСервере(ТекущийОбъект, ПараметрыЗаписи)
ПерезаполнитьДерево(Ложь);
ЗаполнитьИзПредопределенного();
ЗаполнитьИзПредопределенного(ТекущийОбъект);
ЛокализацияСервер.ПриЧтенииНаСервере(ЭтотОбъект, ТекущийОбъект);
КонецПроцедуры
@@ -148,6 +147,7 @@
КонецЕсли;
// Конец СтандартныеПодсистемы.УправлениеДоступом
ЗаполнитьИзПредопределенного(ТекущийОбъект);
ЛокализацияСервер.ПриЧтенииНаСервере(ЭтотОбъект, ТекущийОбъект);
КонецПроцедуры
@@ -216,18 +216,36 @@
КонецФункции
&НаСервере
Процедура ЗаполнитьИзПредопределенного()
Процедура ЗаполнитьИзПредопределенного(ВариантОбъект)
ЭтоПредопределенный = Не ВариантОбъект.Пользовательский
И (ВариантОбъект.ТипОтчета = Перечисления.ТипыОтчетов.Внутренний
Или ВариантОбъект.ТипОтчета = Перечисления.ТипыОтчетов.Расширение)
И ЗначениеЗаполнено(ВариантОбъект.ПредопределенныйВариант);
Если Не ЭтоПредопределенный Тогда
Возврат;
КонецЕсли;
Если Объект.ВидимостьПоУмолчаниюПереопределена = Ложь Тогда
Объект.ВидимостьПоУмолчанию = ПредопределеннаяВидимостьПоУмолчанию;
ПредопределенныйВариант = ВариантОбъект.ПредопределенныйВариант.ПолучитьОбъект();
Если ВариантОбъект.ВидимостьПоУмолчаниюПереопределена = Ложь Тогда
ВариантОбъект.ВидимостьПоУмолчанию = ПредопределенныйВариант.ВидимостьПоУмолчанию;
КонецЕсли;
Если ПустаяСтрока(Объект.Описание) Тогда
Объект.Описание = ПредопределенноеОписание;
ВариантОбъект.Наименование = ПредопределенныйВариант.Наименование;
ПредставленияВарианта = ВариантОбъект.Представления.Выгрузить();
ВариантОбъект.Представления.Очистить();
ВариантОбъект.Представления.Загрузить(ПредопределенныйВариант.Представления.Выгрузить());
Если ПустаяСтрока(ВариантОбъект.Описание) Тогда
ВариантОбъект.Описание = ПредопределенныйВариант.Описание;
Иначе
ВариантОбъект.Представления.Сортировать("КодЯзыка");
ПредставленияВарианта.Сортировать("КодЯзыка");
Для каждого ПредставлениеВарианта Из ВариантОбъект.Представления Цикл
ОписаниеВарианта = ПредставленияВарианта.Найти(ПредставлениеВарианта.КодЯзыка, "КодЯзыка");
ПредставлениеВарианта.Описание = ОписаниеВарианта.Описание;
КонецЦикла;
КонецЕсли;
КонецПроцедуры
@@ -49,13 +49,18 @@
ИЛИ НЕ СсылкаРодителя.Пустая()
ИЛИ СсылкаРодителя.Уровень() = 0 Тогда
ТабличнаяЧасть = Неопределено;
Если СтрНачинаетсяС(СсылкаРодителя.ИмяПредопределенныхДанных, "Справочник") Тогда
ИмяОбъекта = Сред(СсылкаРодителя.ИмяПредопределенныхДанных, 11);
РеквизитыРодителя = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(СсылкаРодителя, "ИмяПредопределенныхДанных, ИмяПредопределенногоВида");
ИмяПредопределенногоВида = ?(ЗначениеЗаполнено(РеквизитыРодителя.ИмяПредопределенногоВида),
РеквизитыРодителя.ИмяПредопределенногоВида, РеквизитыРодителя.ИмяПредопределенныхДанных);
Если СтрНачинаетсяС(ИмяПредопределенногоВида, "Справочник") Тогда
ИмяОбъекта = Сред(ИмяПредопределенногоВида, 11);
Если Метаданные.Справочники.Найти(ИмяОбъекта) <> Неопределено Тогда
ТабличнаяЧасть = Метаданные.Справочники[ИмяОбъекта].ТабличныеЧасти.Найти("КонтактнаяИнформация");
КонецЕсли;
ИначеЕсли СтрНачинаетсяС(СсылкаРодителя.ИмяПредопределенныхДанных, "Документ") Тогда
ИмяОбъекта = Сред(СсылкаРодителя.ИмяПредопределенныхДанных, 9);
ИначеЕсли СтрНачинаетсяС(ИмяПредопределенногоВида, "Документ") Тогда
ИмяОбъекта = Сред(ИмяПредопределенногоВида, 9);
Если Метаданные.Документы.Найти(ИмяОбъекта) <> Неопределено Тогда
ТабличнаяЧасть = Метаданные.Документы[ИмяОбъекта].ТабличныеЧасти.Найти("КонтактнаяИнформация");
КонецЕсли;
@@ -71,8 +71,8 @@
| СправочникГрафикиРаботы.ГоризонтПланирования КАК ГоризонтПланирования,
| СправочникГрафикиРаботы.ДатаОкончания КАК ДатаОкончания,
| СправочникГрафикиРаботы.ПроизводственныйКалендарь КАК ПроизводственныйКалендарь,
| ДанныеГрафиков.ДатаЗаполненности КАК ДатаЗаполненности,
| ДанныеПроизводственныхКалендарей.ДатаЗаполненности КАК ДатаЗаполненностиПроизводственногоКалендаря
| ЕСТЬNULL(ДанныеГрафиков.ДатаЗаполненности, ДАТАВРЕМЯ(1, 1, 1)) КАК ДатаЗаполненности,
| ЕСТЬNULL(ДанныеПроизводственныхКалендарей.ДатаЗаполненности, ДАТАВРЕМЯ(1, 1, 1)) КАК ДатаЗаполненностиПроизводственногоКалендаря
|ИЗ
| Справочник.Календари КАК СправочникГрафикиРаботы
| ЛЕВОЕ СОЕДИНЕНИЕ ВТДатыЗаполненностиГрафиков КАК ДанныеГрафиков
@@ -10,6 +10,15 @@
#Область ОбработчикиСобытий
Процедура ОбработкаПроверкиЗаполнения(Отказ, ПроверяемыеРеквизиты)
Если ЗначениеЗаполнено(ДатаОкончания) И ДатаОкончания < ДатаНачала Тогда
ТекстСообщения = НСтр("ru = 'Дата окончания меньше даты начала. Скорее всего, дата окончания заполнена неверно.'");
ОбщегоНазначения.СообщитьПользователю(ТекстСообщения, Ссылка, , , Отказ);
КонецЕсли;
КонецПроцедуры
Процедура ПередЗаписью(Отказ)
Если ОбменДанными.Загрузка Тогда
@@ -446,6 +446,10 @@
<items xsi:type="form:FormField">
<name>ОбщиеНаборыСвойствПредставление</name>
<id>436</id>
<title>
<key>ru</key>
<value>Представление</value>
</title>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
@@ -1,6 +1,6 @@
<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"><html><head><meta content="text/html; charset=utf-8" http-equiv="Content-Type"></meta><link rel="stylesheet" type="text/css" href="v8help://service_book/service_style"></link><meta name="GENERATOR" content="MSHTML 11.00.9600.18427"></meta></head><body>
<p>Выводит <a href="Catalog.ВариантыОтчетов/Help">варианты отчетов</a>, размещенные в разделе или группах раздела программы. </p>
<p>Открыть панель отчетов можно по соответствующей команде из раздела программы.</p>
<p>Открыть панель отчетов можно по соответствующей команде из разделов программы, например, в разделе<b> Администрирование - Обслуживание - Отчеты и обработки</b> предусмотрена команда <b>Отчеты администратора</b>.</p>
<p>Панель отчетов позволяет работать с отчетами из одного места и группирует варианты отчетов по группам командного интерфейса. Работа с панелью отчетов ведется в двух режимах: </p>
<ul><li>в режиме <a href="#1">просмотра</a>;
</li><li>в режиме <a href="#2">настройки</a>.</li></ul><h3>Режим п<a name="#1">росмотр</a>а</h3>
@@ -9,7 +9,7 @@
<ul><li>Также в панели отчетов могут быть предусмотрены и другие виды группировки, которые зависят от конкретного списка отчетов.
</li><li>Предусмотрена группа <strong>См. также</strong>, в ней обычно размещаются варианты отчетов, которые редко используются при работе с программой.
</li><li>Важные отчеты в панели отчетов выделены<strong> жирным шрифтом</strong>.
</li><li>Эти группы можно настроить в списке <a href="Catalog.ВариантыОтчетов/Help">всех отчетов</a>, к которому можно перейти по команде <strong>Все отчеты</strong>).</li></ul></li><li>Нажмите <strong>Настройка</strong> или клавишу <strong>F2</strong>, для того чтобы перейти в режим <a href="#2">настройки</a> панели отчетов.</li></ul><h3>Поиск отчетов</h3>
</li><li>Эти группы можно настроить в списке <a href="Catalog.ВариантыОтчетов/Help">всех отчетов</a>, к которому можно перейти по команде <strong>Все отчеты</strong>.</li></ul></li><li>Нажмите <strong>Настройка</strong> или клавишу <strong>F2</strong>, для того чтобы перейти в режим <a href="#2">настройки</a> панели отчетов.</li></ul><h3>Поиск отчетов</h3>
<p>Поиск доступен как в режиме просмотра, так и в режиме настройки.</p>
<ul><li>Отчеты можно искать по слову (части слова), также возможен поиск по нескольким словам. Поиск осуществляется:
<ul><li>по наименованию отчета;
@@ -3812,23 +3812,33 @@
Возврат НСтр("ru = '<Детальные записи>'");
КонецЕсли;
ПредставлениеПолей = "";
ПредставлениеПолей = Новый Массив;
Для Каждого Элемент Из Поля.Элементы Цикл
Если ТипЗнч(Элемент) = Тип("АвтоПолеГруппировкиКомпоновкиДанных") Тогда
Продолжить;
КонецЕсли;
ОписаниеПоля = Поля.ДоступныеПоляПолейГруппировок.НайтиПоле(Элемент.Поле);
Если ОписаниеПоля = Неопределено Тогда
ПометкаУдаления = Истина;
ПредставлениеПоля = Строка(Элемент.Поле);
Иначе
ПредставлениеПоля = ОписаниеПоля.Заголовок;
КонецЕсли;
ПредставлениеПолей = ПредставлениеПолей
+ ?(ЗначениеЗаполнено(ПредставлениеПолей), ", ", "")
+ ?(ОписаниеПоля = Неопределено, Строка(Элемент.Поле), ОписаниеПоля.Заголовок);
Если Элемент.ТипГруппировки <> ТипГруппировкиКомпоновкиДанных.Элементы Тогда
ПредставлениеПолей = ПредставлениеПолей + " (" + Элемент.ТипГруппировки + ")";
ПредставлениеПоля = ПредставлениеПоля + " (" + Элемент.ТипГруппировки + ")";
КонецЕсли;
ПредставлениеПолей.Добавить(ПредставлениеПоля);
КонецЦикла;
Возврат ПредставлениеПолей;
Если ПредставлениеПолей.Количество() = 0 Тогда
Возврат НСтр("ru = '<Детальные записи>'");
КонецЕсли;
Возврат СтрСоединить(ПредставлениеПолей, ", ");
КонецФункции
&НаСервере
@@ -4304,7 +4314,7 @@
КонецЕсли;
ИмяОткрываемойФормы = НастройкиОтчета.ПолноеИмя + ?(ИспользоватьФормуВарианта, ".ФормаВарианта", ".ФормаНастроек");
ОткрытьФорму(ИмяОткрываемойФормы, ПараметрыФормы, ЭтотОбъект,,,, Обработчик, РежимОткрытияОкнаФормы.БлокироватьОкноВладельца);
ОткрытьФорму(ИмяОткрываемойФормы, ПараметрыФормы, ЭтотОбъект,,,, Обработчик);
КонецПроцедуры
&НаКлиенте
@@ -5407,12 +5417,14 @@
СвойствоЭлементаСтруктуры = СвойствоЭлементаСтруктурыНастроек(
КомпоновщикНастроек, "Выбор", ИдентификаторЭлементаСтруктурыНастроек, РасширенныйРежим);
ОтображатьВыбранныеПоля =
ЗначениеЗаполнено(СвойствоЭлементаСтруктуры.ИдентификаторПользовательскойНастройки) Или ЭтоРасширенныйРежим;
СвойствоЭлементаСтруктуры <> Неопределено
И (ЗначениеЗаполнено(СвойствоЭлементаСтруктуры.ИдентификаторПользовательскойНастройки) Или ЭтоРасширенныйРежим);
СвойствоЭлементаСтруктуры = СвойствоЭлементаСтруктурыНастроек(
КомпоновщикНастроек, "Порядок", ИдентификаторЭлементаСтруктурыНастроек, РасширенныйРежим);
ОтображатьСортировки =
ТипЭлементаСтруктурыНастроек <> "ДиаграммаКомпоновкиДанных"
И СвойствоЭлементаСтруктуры <> Неопределено
И (ЗначениеЗаполнено(СвойствоЭлементаСтруктуры.ИдентификаторПользовательскойНастройки) Или ЭтоРасширенныйРежим);
Если ОтображатьВыбранныеПоля И ОтображатьСортировки Тогда
@@ -5570,6 +5582,21 @@
ПолеЭлемента = Элемент.Поля.Элементы.Добавить();
ПолеЭлемента.Поле = Новый ПолеКомпоновкиДанных(Элементы.СоставГруппировкиТипДополнения.Имя);
// Поле = Неопределено.
//
Элемент = УсловноеОформление.Элементы.Добавить();
ОтборЭлемента = Элемент.Отбор.Элементы.Добавить(Тип("ЭлементОтбораКомпоновкиДанных"));
ОтборЭлемента.ЛевоеЗначение = Новый ПолеКомпоновкиДанных("СоставГруппировки.Поле");
ОтборЭлемента.ВидСравнения = ВидСравненияКомпоновкиДанных.Равно;
ОтборЭлемента.ПравоеЗначение = Неопределено;
Элемент.Оформление.УстановитьЗначениеПараметра("Видимость", Ложь);
Элемент.Оформление.УстановитьЗначениеПараметра("Отображать", Ложь);
ПолеЭлемента = Элемент.Поля.Элементы.Добавить();
ПолеЭлемента.Поле = Новый ПолеКомпоновкиДанных(Элементы.СоставГруппировкиТипГруппировки.Имя);
// Заголовок - Заполнено.
//
Элемент = УсловноеОформление.Элементы.Добавить();
@@ -295,12 +295,9 @@
Если Параметры.Свойство("АвтоТест") Тогда
Возврат;
КонецЕсли;
Если НовыеНастройкиКД = Неопределено Тогда
Возврат;
КонецЕсли;
// Ничего не делать если отчет не на СКД и никаких настроек не загружено.
Если Не РежимВариантаОтчета() И НовыеНастройкиКД = Неопределено Тогда
Если НовыеНастройкиКД = Неопределено Или Не РежимВариантаОтчета() Тогда
Возврат;
КонецЕсли;
@@ -1502,6 +1499,8 @@
ДоступныеНастройки = ОтчетыСервер.ДоступныеНастройки(ПараметрыЗагрузки, НастройкиОтчета);
ПрименитьПредопределенныеНастройки(ДоступныеНастройки.Настройки);
СброситьНастройкиВарианта = ОбщегоНазначенияКлиентСервер.СвойствоСтруктуры(
ПараметрыЗагрузки, "СброситьНастройкиВарианта", Ложь);
Если СброситьНастройкиВарианта Тогда
@@ -1604,6 +1603,25 @@
ПараметрыЗагрузки.Вставить("ОтчетОбъектИлиПолноеИмя", НастройкиОтчета.ПолноеИмя);
КонецПроцедуры
&НаСервере
Процедура ПрименитьПредопределенныеНастройки(Настройки)
Если Настройки = Неопределено
Или Не РежимВариантаОтчета()
Или ВариантМодифицирован
Или ТекущийЯзык() = Метаданные.ОсновнойЯзык Тогда
Возврат;
КонецЕсли;
ЭтоПредопределенный = Не НастройкиОтчета.Пользовательский
И (НастройкиОтчета.ТипОтчета = Перечисления.ТипыОтчетов.Внутренний
Или НастройкиОтчета.ТипОтчета = Перечисления.ТипыОтчетов.Расширение)
И ЗначениеЗаполнено(НастройкиОтчета.ПредопределенныйСсылка);
Если ЭтоПредопределенный Тогда
Настройки = Отчет.КомпоновщикНастроек.Настройки;
КонецЕсли;
КонецПроцедуры
&НаСервере
Процедура УстановитьУсловияОтборов(ПараметрыЗагрузки)
УсловияОтборов = ОбщегоНазначенияКлиентСервер.СвойствоСтруктуры(ПараметрыЗагрузки, "УсловияОтборов");
@@ -1748,6 +1766,7 @@
НастройкиОтчета.Вставить("ПредопределенныйСсылка", Неопределено);
НастройкиОтчета.Вставить("ИмяИсходногоВарианта", Неопределено);
НастройкиОтчета.Вставить("Пользовательский", Неопределено);
НастройкиОтчета.Вставить("ТипОтчета", Неопределено);
Запрос = Новый Запрос("
|ВЫБРАТЬ РАЗРЕШЕННЫЕ ПЕРВЫЕ 1
@@ -1760,7 +1779,8 @@
| ТОГДА ВариантыОтчетов.КлючВарианта
| ИНАЧЕ ВариантыОтчетов.Родитель.КлючВарианта
| КОНЕЦ КАК ИмяИсходногоВарианта,
| ВариантыОтчетов.Пользовательский КАК Пользовательский
| ВариантыОтчетов.Пользовательский КАК Пользовательский,
| ВариантыОтчетов.ТипОтчета
|ИЗ
| Справочник.ВариантыОтчетов КАК ВариантыОтчетов
|ГДЕ
@@ -1781,11 +1801,10 @@
НастройкиОтчета.ПолноеИмя + "." + КлючТекущегоВарианта, 135);
КонецЕсли;
НастройкиОтчета.ВариантСсылка = Выборка.ВариантСсылка;
ЗаполнитьЗначенияСвойств(НастройкиОтчета, Выборка);
НастройкиОтчета.КлючЗамеров = КлючЗамеров;
НастройкиОтчета.ПредопределенныйСсылка = Выборка.ПредопределенныйСсылка;
НастройкиОтчета.ИмяИсходногоВарианта = ?(Выборка.Пользовательский, Выборка.ИмяИсходногоВарианта, КлючТекущегоВарианта);
НастройкиОтчета.Пользовательский = Выборка.Пользовательский;
КонецПроцедуры
&НаСервере
@@ -4433,7 +4433,7 @@
КонецЕсли;
Если ЗначениеЗаполнено(Корпус) Тогда
СписокСтроений.Добавить(СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(Шаблон, НСтр("ru='корпус'"), Корпус));
СписокСтроений.Добавить(СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(Шаблон, "корпус", Корпус));
КонецЕсли;
Если ЗначениеЗаполнено(Строение) Тогда
@@ -5122,9 +5122,9 @@
Если ЗначениеЗаполнено(ОписаниеДома.Корпус) Тогда
Если ПустаяСтрока(СтрокаПоиска) Или Не СтрНачинаетсяС(ОписаниеДома.Корпус, СтрокаПоиска) Тогда
ТекстПроСтроения = НСтр("ru = 'корпус'") + " " + ОписаниеДома.Корпус;
ТекстПроСтроения = "корпус" + " " + ОписаниеДома.Корпус;
Иначе
ТекстПроСтроения = Новый ФорматированнаяСтрока(НСтр("ru = 'корпус'") + " ",
ТекстПроСтроения = Новый ФорматированнаяСтрока("корпус" + " ",
Новый ФорматированнаяСтрока(СтрокаПоиска, Новый Шрифт(,, Истина) , ЦветаСтиля.РезультатУспехЦвет),
Сред(ОписаниеДома.Корпус, СтрДлина(СтрокаПоиска) + 1));
КонецЕсли;
@@ -5184,8 +5184,8 @@
Функция НаименованиеВладенийИСтроений()
Результат = Новый Структура("Владения, Строения", Новый Соответствие, Новый Соответствие);
Результат.Владения.Вставить(0, НСтр("ru = 'Дом'"));
Результат.Строения.Вставить(0, НСтр("ru = 'Строение'"));
Результат.Владения.Вставить(0, "Дом");
Результат.Строения.Вставить(0, "Строение");
Запрос = Новый Запрос;
Запрос.Текст =
@@ -5242,7 +5242,7 @@
КонецЕсли;
КонецЦикла;
Результат.Строения.Вставить(ВРег(НСтр("ru='Корпус'")), -1);
Результат.Строения.Вставить(ВРег("Корпус"), -1);
Возврат Результат;
@@ -5251,15 +5251,15 @@
Функция КодыПомещений()
Результат = Новый Соответствие;
Результат.Вставить(ВРег(НСтр("ru = 'Комната'")), 1);
Результат.Вставить(ВРег(НСтр("ru = 'Помещение'")), 2);
Результат.Вставить(ВРег(НСтр("ru = 'Квартира'")), 3);
Результат.Вставить(ВРег(НСтр("ru = 'Офис'")), 4);
Результат.Вставить(ВРег(НСтр("ru = 'Бокс'")), 5);
Результат.Вставить(ВРег(НСтр("ru = 'Этаж'")), 6);
Результат.Вставить(ВРег(НСтр("ru = 'А/я'")), 7);
Результат.Вставить(ВРег(НСтр("ru = 'В/ч'")), 8);
Результат.Вставить(ВРег(НСтр("ru = 'П/о'")), 9);
Результат.Вставить(ВРег("Комната"), 1);
Результат.Вставить(ВРег("Помещение"), 2);
Результат.Вставить(ВРег("Квартира"), 3);
Результат.Вставить(ВРег("Офис"), 4);
Результат.Вставить(ВРег("Бокс"), 5);
Результат.Вставить(ВРег("Этаж"), 6);
Результат.Вставить(ВРег("А/я"), 7);
Результат.Вставить(ВРег("В/ч"), 8);
Результат.Вставить(ВРег("П/о"), 9);
Возврат Результат;
@@ -6917,7 +6917,7 @@
КонецФункции
Функция АдресВСвободнойФорме()
Возврат НСтр("ru='ВСвободнойФорме'");
Возврат "ВСвободнойФорме";
КонецФункции
// Возвращает значения уровней 90(дополнительный элемент) и 91(подчиненный) из адреса.
@@ -7154,31 +7154,31 @@
// Код, Наименование, Тип, Порядок, КодФИАС
// Тип: 1 - владение, 2 - здание, 3 - помещение.
Результат.Добавить(СтрокаОбъектаАдресации("1010", НСтр("ru = 'Дом'"), 1, 1, 2));
Результат.Добавить(СтрокаОбъектаАдресации("1020", НСтр("ru = 'Владение'"), 1, 2, 1));
Результат.Добавить(СтрокаОбъектаАдресации("1030", НСтр("ru = 'Домовладение'"), 1, 3, 3));
Результат.Добавить(СтрокаОбъектаАдресации("1010", "Дом", 1, 1, 2)); // не локализуется
Результат.Добавить(СтрокаОбъектаАдресации("1020", "Владение", 1, 2, 1)); // не локализуется
Результат.Добавить(СтрокаОбъектаАдресации("1030", "Домовладение", 1, 3, 3)); // не локализуется
Результат.Добавить(СтрокаОбъектаАдресации("1050", НСтр("ru = 'Корпус'"), 2, 1));
Результат.Добавить(СтрокаОбъектаАдресации("1060", НСтр("ru = 'Строение'"), 2, 2, 1));
Результат.Добавить(СтрокаОбъектаАдресации("1080", НСтр("ru = 'Литера'"), 2, 3, 3));
Результат.Добавить(СтрокаОбъектаАдресации("1090", НСтр("ru = 'Литер'"), 2, 6, 3));
Результат.Добавить(СтрокаОбъектаАдресации("1070", НСтр("ru = 'Сооружение'"), 2, 4, 2));
Результат.Добавить(СтрокаОбъектаАдресации("1040", НСтр("ru = 'Участок'"), 2, 5));
Результат.Добавить(СтрокаОбъектаАдресации("1050", "Корпус", 2, 1)); // не локализуется
Результат.Добавить(СтрокаОбъектаАдресации("1060", "Строение", 2, 2, 1)); // не локализуется
Результат.Добавить(СтрокаОбъектаАдресации("1080", "Литера", 2, 3, 3)); // не локализуется
Результат.Добавить(СтрокаОбъектаАдресации("1090", "Литер", 2, 6, 3)); // не локализуется
Результат.Добавить(СтрокаОбъектаАдресации("1070", "Сооружение", 2, 4, 2)); // не локализуется
Результат.Добавить(СтрокаОбъектаАдресации("1040", "Участок", 2, 5)); // не локализуется
Результат.Добавить(СтрокаОбъектаАдресации("2010", НСтр("ru = 'Квартира'"), 3, 1));
Результат.Добавить(СтрокаОбъектаАдресации("2030", НСтр("ru = 'Офис'"), 3, 2));
Результат.Добавить(СтрокаОбъектаАдресации("2040", НСтр("ru = 'Бокс'"), 3, 3));
Результат.Добавить(СтрокаОбъектаАдресации("2020", НСтр("ru = 'Помещение'"), 3, 4));
Результат.Добавить(СтрокаОбъектаАдресации("2050", НСтр("ru = 'Комната'"), 3, 5));
Результат.Добавить(СтрокаОбъектаАдресации("2060", НСтр("ru = 'Этаж'"), 3, 6));
Результат.Добавить(СтрокаОбъектаАдресации("2070", НСтр("ru = 'А/я'"), 3, 7));
Результат.Добавить(СтрокаОбъектаАдресации("2080", НСтр("ru = 'В/ч'"), 3, 8));
Результат.Добавить(СтрокаОбъектаАдресации("2090", НСтр("ru = 'П/о'"), 3, 9));
Результат.Добавить(СтрокаОбъектаАдресации("2010", "Квартира", 3, 1)); // не локализуется
Результат.Добавить(СтрокаОбъектаАдресации("2030", "Офис", 3, 2)); // не локализуется
Результат.Добавить(СтрокаОбъектаАдресации("2040", "Бокс", 3, 3)); // не локализуется
Результат.Добавить(СтрокаОбъектаАдресации("2020", "Помещение", 3, 4)); // не локализуется
Результат.Добавить(СтрокаОбъектаАдресации("2050", "Комната", 3, 5)); // не локализуется
Результат.Добавить(СтрокаОбъектаАдресации("2060", "Этаж", 3, 6)); // не локализуется
Результат.Добавить(СтрокаОбъектаАдресации("2070", "А/я", 3, 7)); // не локализуется
Результат.Добавить(СтрокаОбъектаАдресации("2080", "В/ч", 3, 8)); // не локализуется
Результат.Добавить(СтрокаОбъектаАдресации("2090", "П/о", 3, 9)); // не локализуется
// Наши сокращения для поддержки обратной совместимости при парсинге.
Результат.Добавить(СтрокаОбъектаАдресации("2010", НСтр("ru = 'кв.'"), 3, 6));
Результат.Добавить(СтрокаОбъектаАдресации("2030", НСтр("ru = 'оф.'"), 3, 7));
Результат.Добавить(СтрокаОбъектаАдресации("2010", "кв.", 3, 6)); // не локализуется
Результат.Добавить(СтрокаОбъектаАдресации("2030", "оф.", 3, 7)); // не локализуется
// Ввод помещения вручную.
Результат.Добавить(СтрокаОбъектаАдресации("2000", НСтр("ru = ''"), 3, 0));
Результат.Добавить(СтрокаОбъектаАдресации("2000", "", 3, 0));
// Уточняющие объекты
Результат.Добавить(СтрокаОбъектаАдресации("10100000", НСтр("ru = 'Почтовый индекс'")));
@@ -1517,6 +1517,7 @@
//
Функция Обновить(Знач Настройки = Неопределено) Экспорт
УстановитьОтключениеБезопасногоРежима(Истина);
УстановитьПривилегированныйРежим(Истина);
Если Настройки = Неопределено Тогда
@@ -2127,7 +2128,7 @@
КонецЕсли;
ОписаниеВарианта.Тип = ОтчетТип;
ОписаниеВарианта.ЭтоВариант = Истина;
Если ОписаниеОтчета.ОсновнойВариант = Неопределено Тогда
Если ПустаяСтрока(ОписаниеОтчета.ОсновнойВариант) Тогда
ОписаниеОтчета.ОсновнойВариант = ОписаниеВарианта.КлючВарианта;
КонецЕсли;
Если РазрешеноИндексирование И ТипЗнч(ВариантНастроекКД) = Тип("ВариантНастроекКомпоновкиДанных") Тогда
@@ -3601,7 +3602,7 @@
НачатьЗаполнениеПредставлений(Режим, Ложь);
ОбщиеДанные = (Режим = "ОбщиеДанныеКонфигурации" Или Режим = "ОбщиеДанныеРасширений");
Уточнение = НРег(ОтчетыКлиентСервер.ИмяВПредставление(Режим)) + ", " + ?(ИндексироватьСхему, НСтр("ru = 'полное'"), НСтр("ru = 'по изменениям'"));
Уточнение = НРег(ПредставлениеРежима(Режим)) + ", " + ?(ИндексироватьСхему, НСтр("ru = 'полное'"), НСтр("ru = 'по изменениям'"));
ПредставлениеПроцедуры = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(НСтр("ru = 'Обновление индекса поиска (%1)'"), Уточнение);
ЗаписатьВЖурналЗапускПроцедуры(ПредставлениеПроцедуры);
@@ -3930,7 +3931,7 @@
ОсновныеВарианты = Новый Соответствие;
Для Каждого ОписаниеВарианта Из Результат.ВариантыОтчетов Цикл
Если ОписаниеВарианта.КлючВарианта = "" Тогда // это отчет
Если Не ОписаниеВарианта.ЭтоВариант Тогда
Если ОписаниеВарианта.ОпределитьНастройкиФормы Тогда
ОтчетыСНастройкамиСписок.Добавить(ОписаниеВарианта.Отчет);
КонецЕсли;
@@ -4106,7 +4107,7 @@
Процедура АктуализироватьВариантыОтчетовПоПредопределенным(Режим, Результат)
ПредставлениеПроцедуры = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(НСтр("ru = 'Обновление вариантов отчетов (%1)'"),
НРег(ОтчетыКлиентСервер.ИмяВПредставление(Режим)));
НРег(ПредставлениеРежима(Режим)));
ЗаписатьВЖурналЗапускПроцедуры(ПредставлениеПроцедуры);
// Обновление сведений предопределенных вариантов.
@@ -4330,6 +4331,7 @@
Блокировка = Новый БлокировкаДанных;
ЭлементБлокировки = Блокировка.Добавить("Справочник.ВариантыОтчетов");
ЭлементБлокировки.УстановитьЗначение("Ссылка", СтрокаТаблицы.РеквизитСсылка);
Блокировка.Заблокировать();
ВариантОбъект = СтрокаТаблицы.РеквизитСсылка.ПолучитьОбъект();
ВариантОбъект.Заблокировать();
@@ -4369,6 +4371,7 @@
Блокировка = Новый БлокировкаДанных;
ЭлементБлокировки = Блокировка.Добавить("Справочник.ВариантыОтчетов");
ЭлементБлокировки.УстановитьЗначение("Ссылка", СтрокаТаблицы.РеквизитСсылка);
Блокировка.Заблокировать();
// Перенос пользовательских настроек.
ЗаменитьКлючиПользовательскихНастроек(ИзменяемыеРеквизиты, СтрокаТаблицы);
@@ -4411,7 +4414,7 @@
ПредставлениеПроцедуры = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
НСтр("ru = 'Удаление вариантов удаленных отчетов (%1)'"),
НРег(ОтчетыКлиентСервер.ИмяВПредставление(Режим)));
НРег(ПредставлениеРежима(Режим)));
ЗаписатьВЖурналЗапускПроцедуры(ПредставлениеПроцедуры);
Запрос = Новый Запрос;
@@ -4717,6 +4720,20 @@
Результат.Записать();
КонецФункции
Функция ПредставлениеРежима(Режим)
Режимы = Новый Соответствие;
Режимы.Вставить("ОбщиеДанныеКонфигурации", НСтр("ru = 'Общие данные конфигурации'"));
Режимы.Вставить("ОбщиеДанныеРасширений", НСтр("ru = 'Общие данные расширений'"));
Режимы.Вставить("РазделенныеДанныеКонфигурации", НСтр("ru = 'Разделенные данные конфигурации'"));
Режимы.Вставить("РазделенныеДанныеРасширений", НСтр("ru = 'Разделенные данные расширений'"));
ПредставлениеРежима = Режимы.Получить(Режим);
Возврат ?(ПредставлениеРежима = Неопределено, "", ПредставлениеРежима);
КонецФункции
////////////////////////////////////////////////////////////////////////////////
// Обновление информационной базы / Переход к редакции 2.1.
@@ -41,7 +41,7 @@
Процедура ПриДобавленииПодсистемы(Описание) Экспорт
Описание.Имя = "СтандартныеПодсистемы";
Описание.Версия = "3.0.2.264";
Описание.Версия = "3.0.2.269";
Описание.ИдентификаторИнтернетПоддержки = "SSL";
Описание.РежимВыполненияОтложенныхОбработчиков = "Параллельно";
Описание.ПараллельноеОтложенноеОбновлениеСВерсии = "2.3.3.0";
@@ -59,22 +59,22 @@
Функция ЗаголовокСозданияРезервнойКопии(Параметры) Экспорт
Если Параметры.СоздаватьРезервнуюКопию = 0 Тогда
Действие = НСтр("ru = 'Не создавать резервную копию ИБ'");
Возврат НСтр("ru = 'Не создавать резервную копию ИБ'");
ИначеЕсли Параметры.СоздаватьРезервнуюКопию = 1 Тогда
Действие = НСтр("ru = 'Создавать временную резервную копию ИБ'");
ИначеЕсли Параметры.СоздаватьРезервнуюКопию = 2 Тогда
Действие = НСтр("ru = 'Создавать резервную копию ИБ'");
КонецЕсли;
Если Параметры.ВосстанавливатьИнформационнуюБазу Тогда
Результат = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
НСтр("ru = '%1 и выполнять откат при нештатной ситуации'"), Действие);
Возврат НСтр("ru = 'Создавать временную резервную копию ИБ и выполнять откат при нештатной ситуации'");
Иначе
Результат = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
НСтр("ru = '%1 и не выполнять откат при нештатной ситуации'"), Действие);
Возврат НСтр("ru = 'Создавать временную резервную копию ИБ и не выполнять откат при нештатной ситуации'");
КонецЕсли;
ИначеЕсли Параметры.СоздаватьРезервнуюКопию = 2 Тогда
Если Параметры.ВосстанавливатьИнформационнуюБазу Тогда
Возврат НСтр("ru = 'Создавать резервную копию ИБ и выполнять откат при нештатной ситуации'");
Иначе
Возврат НСтр("ru = 'Создавать резервную копию ИБ и не выполнять откат при нештатной ситуации'");
КонецЕсли;
Иначе
Возврат "";
КонецЕсли;
Возврат Результат;
КонецФункции
@@ -506,10 +506,10 @@
КонецЕсли;
Комментарий = СокрЛП(Сред(ТекущаяСтрока, СтрНайти(ТекущаяСтрока, "}") + 2));
Если Комментарий = НСтр("ru = 'Обновление выполнено'") Тогда
Если Комментарий = "Обновление выполнено" Тогда // АПК:1297 не локализуется (фрагмент журнала)
РезультатОбновления = Истина;
Продолжить;
ИначеЕсли Комментарий = НСтр("ru = 'Обновление не выполнено'") Тогда
ИначеЕсли Комментарий = "Обновление не выполнено" Тогда // АПК:1297 не локализуется (фрагмент журнала)
РезультатОбновления = Ложь;
Продолжить;
КонецЕсли;
@@ -1053,7 +1053,7 @@
Возврат Представление;
КонецФункции
Функция ИмяВПредставление(Знач ИсходнаяСтрока) Экспорт
Функция ИмяВПредставление(Знач ИсходнаяСтрока)
Результат = "";
ЭтоПервыйСимвол = Истина;
Для НомерСимвола = 1 По СтрДлина(ИсходнаяСтрока) Цикл
@@ -79,7 +79,39 @@
//
Функция НастройкиПроксиНаКлиенте() Экспорт
Возврат ОбщегоНазначения.ХранилищеОбщихНастроекЗагрузить("НастройкаПроксиСервера", "");
ИмяПользователя = Неопределено;
Если ОбщегоНазначения.ИнформационнаяБазаФайловая() Тогда
// В файловом режиме регламентные задания выполняются на том же компьютере,
// на котором выполняется работа пользователя.
ТекущийСеансИнформационнойБазы = ПолучитьТекущийСеансИнформационнойБазы();
ФоновоеЗадание = ТекущийСеансИнформационнойБазы.ПолучитьФоновоеЗадание();
ЭтоСеансРегламентногоЗадания = ФоновоеЗадание <> Неопределено И ФоновоеЗадание.РегламентноеЗадание <> Неопределено;
Если ЭтоСеансРегламентногоЗадания Тогда
Если Не ЗначениеЗаполнено(ФоновоеЗадание.РегламентноеЗадание.ИмяПользователя) Тогда
// Если регламентное задание выполняется от имени пользователя по умолчанию,
// то следует взять настройки прокси из сохраненных настроек пользователя,
// на компьютере которого запущен текущий сеанс регламентного задания.
Сеансы = ПолучитьСеансыИнформационнойБазы();
Для Каждого Сеанс Из Сеансы Цикл
Если Сеанс.ИмяКомпьютера = ТекущийСеансИнформационнойБазы.ИмяКомпьютера Тогда
ИмяПользователя = Сеанс.Пользователь.Имя;
Прервать;
КонецЕсли;
КонецЦикла;
КонецЕсли;
КонецЕсли;
КонецЕсли;
Возврат ОбщегоНазначения.ХранилищеОбщихНастроекЗагрузить("НастройкаПроксиСервера", "",,, ИмяПользователя);
КонецФункции
@@ -486,7 +486,7 @@
Если ДополнительнаяИнформацияАдреса.Свойство("НомерДома") И ЗначениеЗаполнено(ДополнительнаяИнформацияАдреса.НомерДома) Тогда
ОписаниеДома = РазделитьДомаСтроения(ДополнительнаяИнформацияАдреса.НомерДома, НСтр("ru='Дом'"));
ОписаниеДома = РазделитьДомаСтроения(ДополнительнаяИнформацияАдреса.НомерДома, "Дом");
Адрес.Вставить("houseType", ОписаниеДома.Тип);
Адрес.Вставить("houseNumber", ОписаниеДома.Номер);
Адрес.Вставить("houseId", "");
@@ -495,7 +495,7 @@
Если ДополнительнаяИнформацияАдреса.Свойство("НомерСтроения") И ЗначениеЗаполнено(ДополнительнаяИнформацияАдреса.НомерСтроения) Тогда
ОписаниеСтроения = РазделитьДомаСтроения(ДополнительнаяИнформацияАдреса.НомерСтроения, НСтр("ru='Корпус'"));
ОписаниеСтроения = РазделитьДомаСтроения(ДополнительнаяИнформацияАдреса.НомерСтроения, "Корпус");
Строение = УправлениеКонтактнойИнформациейКлиентСервер.ЗначениеСтроенияИлиПомещения(ОписаниеСтроения.Тип, ОписаниеСтроения.Номер);
Адрес.buildings.Добавить(Строение);
@@ -503,7 +503,7 @@
Если ДополнительнаяИнформацияАдреса.Свойство("НомерОфиса") И ЗначениеЗаполнено(ДополнительнаяИнформацияАдреса.НомерОфиса) Тогда
ОписаниеПомещения = РазделитьДомаСтроения(ДополнительнаяИнформацияАдреса.НомерОфиса, НСтр("ru='Офис'"));
ОписаниеПомещения = РазделитьДомаСтроения(ДополнительнаяИнформацияАдреса.НомерОфиса, "Офис");
Помещение = УправлениеКонтактнойИнформациейКлиентСервер.ЗначениеСтроенияИлиПомещения(ОписаниеПомещения.Тип, ОписаниеПомещения.Номер);
Адрес.apartments.Добавить(Помещение);
@@ -511,7 +511,7 @@
Если ДополнительнаяИнформацияАдреса.Свойство("АбонентскийЯщик") И ЗначениеЗаполнено(ДополнительнаяИнформацияАдреса.АбонентскийЯщик) Тогда
ОписаниеАбонентскийЯщик = РазделитьДомаСтроения(ДополнительнаяИнформацияАдреса.АбонентскийЯщик, НСтр("ru='А/Я'"));
ОписаниеАбонентскийЯщик = РазделитьДомаСтроения(ДополнительнаяИнформацияАдреса.АбонентскийЯщик, "А/Я");
АбонентскийЯщик = УправлениеКонтактнойИнформациейКлиентСервер.ЗначениеСтроенияИлиПомещения(ОписаниеАбонентскийЯщик.Тип, ОписаниеАбонентскийЯщик.Номер);
Адрес.apartments.Добавить(АбонентскийЯщик);
КонецЕсли;
@@ -553,25 +553,25 @@
Результат = Новый Соответствие;
Результат.Вставить(НСтр("ru = 'Дом'"), НСтр("ru = 'Д.'"));
Результат.Вставить(НСтр("ru = 'Владение'"), НСтр("ru = 'Вл.'"));
Результат.Вставить(НСтр("ru = 'Домовладение'"), НСтр("ru = 'Домовл.'"));
Результат.Вставить("Дом", "Д.");
Результат.Вставить("Владение", "Вл.");
Результат.Вставить("Домовладение", "Домовл.");
Результат.Вставить(НСтр("ru = 'Корпус'"), НСтр("ru = 'Корп.'"));
Результат.Вставить(НСтр("ru = 'Строение'"), НСтр("ru = 'Стр.'"));
Результат.Вставить(НСтр("ru = 'Литера'"), НСтр("ru = 'Лит.'"));
Результат.Вставить(НСтр("ru = 'Сооружение'"), НСтр("ru = 'Сооруж.'"));
Результат.Вставить(НСтр("ru = 'Участок'"), НСтр("ru = 'Уч.'"));
Результат.Вставить("Корпус", "Корп.");
Результат.Вставить("Строение", "Стр.");
Результат.Вставить("Литера", "Лит.");
Результат.Вставить("Сооружение", "Сооруж.");
Результат.Вставить("Участок", "Уч.");
Результат.Вставить(НСтр("ru = 'Квартира'"), НСтр("ru = 'Кв.'"));
Результат.Вставить(НСтр("ru = 'Офис'"), НСтр("ru = 'Оф.'"));
Результат.Вставить(НСтр("ru = 'Бокс'"), НСтр("ru = 'Бокс'"));
Результат.Вставить(НСтр("ru = 'Помещение'"), НСтр("ru = 'Пом.'"));
Результат.Вставить(НСтр("ru = 'Комната'"), НСтр("ru = 'Ком.'"));
Результат.Вставить(НСтр("ru = 'Этаж'"), НСтр("ru = 'Этаж'"));
Результат.Вставить(НСтр("ru = 'А/я'"), НСтр("ru = 'а/я'"));
Результат.Вставить(НСтр("ru = 'П/о'"), НСтр("ru = 'п/о'"));
Результат.Вставить(НСтр("ru = 'В/ч'"), НСтр("ru = 'в/ч'"));
Результат.Вставить("Квартира", "Кв.");
Результат.Вставить("Офис", "Оф.");
Результат.Вставить("Бокс", "Бокс");
Результат.Вставить("Помещение", "Пом.");
Результат.Вставить("Комната", "Ком.");
Результат.Вставить("Этаж", "Этаж");
Результат.Вставить("А/я", "а/я");
Результат.Вставить("П/о", "п/о");
Результат.Вставить("В/ч", "в/ч");
Возврат Результат;
КонецФункции
@@ -988,36 +988,36 @@
// Код, Наименование, Тип, Порядок, КодФИАС
// Тип: 1 - владение, 2 - здание, 3 - помещение.
Результат.Добавить(СтрокаОбъектаАдресации("1010", НСтр("ru = 'Дом'"), 1, 1, 2));
Результат.Добавить(СтрокаОбъектаАдресации("1020", НСтр("ru = 'Владение'"), 1, 2, 1));
Результат.Добавить(СтрокаОбъектаАдресации("1030", НСтр("ru = 'Домовладение'"), 1, 3, 3));
Результат.Добавить(СтрокаОбъектаАдресации("1034", НСтр("ru = 'Гараж'"), 1, 4, 4));
Результат.Добавить(СтрокаОбъектаАдресации("1036", НСтр("ru = 'Здание'"), 1, 5, 5));
Результат.Добавить(СтрокаОбъектаАдресации("1038", НСтр("ru = 'Шахта'"), 1, 6, 6));
Результат.Добавить(СтрокаОбъектаАдресации("1010", "Дом", 1, 1, 2)); // Тип владения не локализуется
Результат.Добавить(СтрокаОбъектаАдресации("1020", "Владение", 1, 2, 1)); // Тип владения не локализуется
Результат.Добавить(СтрокаОбъектаАдресации("1030", "Домовладение", 1, 3, 3)); // Тип владения не локализуется
Результат.Добавить(СтрокаОбъектаАдресации("1034", "Гараж", 1, 4, 4)); // Тип владения не локализуется
Результат.Добавить(СтрокаОбъектаАдресации("1036", "Здание", 1, 5, 5)); // Тип владения не локализуется
Результат.Добавить(СтрокаОбъектаАдресации("1038", "Шахта", 1, 6, 6)); // Тип владения не локализуется
Результат.Добавить(СтрокаОбъектаАдресации("1039", РаботаСАдресамиКлиентСервер.НаименованиеЗемельногоУчастка()
, 1, 9, 9));
Результат.Добавить(СтрокаОбъектаАдресации("1050", НСтр("ru = 'Корпус'"), 2, 1));
Результат.Добавить(СтрокаОбъектаАдресации("1060", НСтр("ru = 'Строение'"), 2, 2, 1));
Результат.Добавить(СтрокаОбъектаАдресации("1080", НСтр("ru = 'Литера'"), 2, 3, 3));
Результат.Добавить(СтрокаОбъектаАдресации("1090", НСтр("ru = 'Литер'"), 2, 6, 3));
Результат.Добавить(СтрокаОбъектаАдресации("1070", НСтр("ru = 'Сооружение'"), 2, 4, 2));
Результат.Добавить(СтрокаОбъектаАдресации("1040", НСтр("ru = 'Участок'"), 2, 5));
Результат.Добавить(СтрокаОбъектаАдресации("1050", "Корпус", 2, 1)); // Тип здания не локализуется
Результат.Добавить(СтрокаОбъектаАдресации("1060", "Строение", 2, 2, 1)); // Тип здания не локализуется
Результат.Добавить(СтрокаОбъектаАдресации("1080", "Литера", 2, 3, 3)); // Тип здания не локализуется
Результат.Добавить(СтрокаОбъектаАдресации("1090", "Литер", 2, 6, 3)); // Тип здания не локализуется
Результат.Добавить(СтрокаОбъектаАдресации("1070", "Сооружение", 2, 4, 2)); // Тип здания не локализуется
Результат.Добавить(СтрокаОбъектаАдресации("1040", "Участок", 2, 5)); // Тип здания не локализуется
Результат.Добавить(СтрокаОбъектаАдресации("2010", НСтр("ru = 'Квартира'"), 3, 1));
Результат.Добавить(СтрокаОбъектаАдресации("2030", НСтр("ru = 'Офис'"), 3, 2));
Результат.Добавить(СтрокаОбъектаАдресации("2040", НСтр("ru = 'Бокс'"), 3, 3));
Результат.Добавить(СтрокаОбъектаАдресации("2020", НСтр("ru = 'Помещение'"), 3, 4));
Результат.Добавить(СтрокаОбъектаАдресации("2050", НСтр("ru = 'Комната'"), 3, 5));
Результат.Добавить(СтрокаОбъектаАдресации("2060", НСтр("ru = 'Этаж'"), 3, 6));
Результат.Добавить(СтрокаОбъектаАдресации("2070", НСтр("ru = 'А/я'"), 3, 7));
Результат.Добавить(СтрокаОбъектаАдресации("2080", НСтр("ru = 'В/ч'"), 3, 8));
Результат.Добавить(СтрокаОбъектаАдресации("2090", НСтр("ru = 'П/о'"), 3, 9));
Результат.Добавить(СтрокаОбъектаАдресации("2010", "Квартира", 3, 1)); // Тип помещения не локализуется
Результат.Добавить(СтрокаОбъектаАдресации("2030", "Офис", 3, 2)); // Тип помещения не локализуется
Результат.Добавить(СтрокаОбъектаАдресации("2040", "Бокс", 3, 3)); // Тип помещения не локализуется
Результат.Добавить(СтрокаОбъектаАдресации("2020", "Помещение", 3, 4)); // Тип помещения не локализуется
Результат.Добавить(СтрокаОбъектаАдресации("2050", "Комната", 3, 5)); // Тип помещения не локализуется
Результат.Добавить(СтрокаОбъектаАдресации("2060", "Этаж", 3, 6)); // Тип помещения не локализуется
Результат.Добавить(СтрокаОбъектаАдресации("2070", "А/я", 3, 7)); // Тип помещения не локализуется
Результат.Добавить(СтрокаОбъектаАдресации("2080", "В/ч", 3, 8)); // Тип помещения не локализуется
Результат.Добавить(СтрокаОбъектаАдресации("2090", "П/о", 3, 9)); // Тип помещения не локализуется
// Наши сокращения для поддержки обратной совместимости при парсинге.
Результат.Добавить(СтрокаОбъектаАдресации("2010", НСтр("ru = 'кв.'"), 3, 6));
Результат.Добавить(СтрокаОбъектаАдресации("2030", НСтр("ru = 'оф.'"), 3, 7));
Результат.Добавить(СтрокаОбъектаАдресации("2010", "кв.", 3, 6)); // Тип помещения не локализуется
Результат.Добавить(СтрокаОбъектаАдресации("2030", "оф.", 3, 7)); // Тип помещения не локализуется
// Ввод помещения вручную.
Результат.Добавить(СтрокаОбъектаАдресации("2000", НСтр("ru = ''"), 3, 0));
Результат.Добавить(СтрокаОбъектаАдресации("2000", "", 3, 0));
// Уточняющие объекты
Результат.Добавить(СтрокаОбъектаАдресации("10100000", НСтр("ru = 'Почтовый индекс'")));
@@ -2084,14 +2084,13 @@
И КонтактнаяИнформация.Здание.Свойство("Номер") Тогда
ОписаниеКонтактнойИнформации.HouseNumber = ?(КонтактнаяИнформация.Здание.Свойство("Номер"), КонтактнаяИнформация.Здание.Номер, "");
ОписаниеКонтактнойИнформации.HouseType = ?(КонтактнаяИнформация.Здание.Свойство("ТипЗдания"), КонтактнаяИнформация.Здание.ТипЗдания, НСтр("ru='Дом'"));
ОписаниеКонтактнойИнформации.HouseType = ?(КонтактнаяИнформация.Здание.Свойство("ТипЗдания"), КонтактнаяИнформация.Здание.ТипЗдания, "Дом");
КонецЕсли;
Если КонтактнаяИнформация.Свойство("Корпус")И ЗначениеЗаполнено(КонтактнаяИнформация.Корпус) Тогда
ТипКорпуса = ?(КонтактнаяИнформация.Свойство("ТипКорпуса"), КонтактнаяИнформация.ТипКорпуса, НСтр("ru='Корпус'"));
ТипКорпуса = ?(КонтактнаяИнформация.Свойство("ТипКорпуса"), КонтактнаяИнформация.ТипКорпуса, "Корпус"); // Тип владения не локализуется
ОписаниеКонтактнойИнформации.buildings.Добавить(УправлениеКонтактнойИнформациейКлиентСервер.ЗначениеСтроенияИлиПомещения(ТипКорпуса, КонтактнаяИнформация.Корпус));
ИначеЕсли КонтактнаяИнформация.Свойство("Корпуса")И ТипЗнч(КонтактнаяИнформация.Корпуса) = Тип("Массив") Тогда
Для каждого Корпус Из КонтактнаяИнформация.Корпуса Цикл
@@ -2103,7 +2102,7 @@
Если КонтактнаяИнформация.Свойство("Квартира") И ЗначениеЗаполнено(КонтактнаяИнформация.Квартира) Тогда
ТипКвартиры = ?(КонтактнаяИнформация.Свойство("ТипКвартиры"), КонтактнаяИнформация.ТипКвартиры, НСтр("ru='Квартира'"));
ТипКвартиры = ?(КонтактнаяИнформация.Свойство("ТипКвартиры"), КонтактнаяИнформация.ТипКвартиры, "Квартира"); // Тип помещения не локализуется
ОписаниеКонтактнойИнформации.apartments.Добавить(УправлениеКонтактнойИнформациейКлиентСервер.ЗначениеСтроенияИлиПомещения(ТипКвартиры, КонтактнаяИнформация.Квартира));
ИначеЕсли КонтактнаяИнформация.Свойство("Помещения")И ТипЗнч(КонтактнаяИнформация.Помещения) = Тип("Массив") Тогда
@@ -480,7 +480,7 @@
Если Адрес.Свойство("HouseNumber") И НЕ ПустаяСтрока(Адрес.HouseNumber) Тогда
СписокЗаполненныхУровней.Добавить(НРег(Адрес.HouseType) + " " + Адрес.HouseNumber);
ИначеЕсли Адрес.Свойство("stead") И Не ПустаяСтрока(Адрес.stead) Тогда
СписокЗаполненныхУровней.Добавить(НСтр("ru='участок'") + " " + Адрес.stead);
СписокЗаполненныхУровней.Добавить("участок" + " " + Адрес.stead);
КонецЕсли;
Если Адрес.Свойство("Buildings") И Адрес.Buildings.Количество() > 0 Тогда
@@ -516,7 +516,7 @@
КонецФункции
Функция НаименованиеЗемельногоУчастка() Экспорт
Возврат НСтр("ru='Зем. участок'");
Возврат "Зем. участок";
КонецФункции
#Область ПрочиеСлужебныеПроцедурыИФункции
@@ -281,7 +281,8 @@
//
Процедура ЗаполнитьПрисоединенныеФайлыКОбъекту(Знач ВладелецФайла, Знач Файлы) Экспорт
Если ТипЗнч(ВладелецФайла) = Тип("СправочникСсылка.ИдентификаторыОбъектовМетаданных") Тогда
Если Не ЗначениеЗаполнено(ВладелецФайла)
Или ТипЗнч(ВладелецФайла) = Тип("СправочникСсылка.ИдентификаторыОбъектовМетаданных") Тогда
Возврат;
КонецЕсли;
@@ -316,7 +317,6 @@
Функция НоваяСсылкаНаФайл(ВладелецФайлов, ИмяСправочника = Неопределено) Экспорт
ЗаголовокОшибки = НСтр("ru = 'Ошибка при получении новой ссылки на присоединенный файл.'");
ИмяСправочника = РаботаСФайламиСлужебный.ИмяСправочникаХраненияФайлов(
ВладелецФайлов, ИмяСправочника, ЗаголовокОшибки);
@@ -396,8 +396,9 @@
//
Функция КОбъектуМожноПрисоединятьФайлы(ВладелецФайлов, ИмяСправочника = "") Экспорт
ЗаголовокОшибки = НСтр("ru = 'Ошибка определения возможности присоединения файла.'");
ИмяСправочника = РаботаСФайламиСлужебный.ИмяСправочникаХраненияФайлов(
ВладелецФайлов, ИмяСправочника);
ВладелецФайлов, ИмяСправочника, ЗаголовокОшибки);
СправочникПрисоединенныеФайлы = Метаданные.Справочники.Найти(ИмяСправочника);
@@ -424,6 +425,10 @@
//
Функция ДобавитьФайлСДиска(ВладелецФайлов, ПутьКФайлуНаДиске) Экспорт
Если Не ЗначениеЗаполнено(ВладелецФайлов) Тогда
ВызватьИсключение НСтр("ru = 'Не задано значение параметра ВладелецФайлов в РаботаСФайлами.ДобавитьФайлСДиска.'");
КонецЕсли;
Файл = Новый Файл(ПутьКФайлуНаДиске);
ДвоичныеДанные = Новый ДвоичныеДанные(ПутьКФайлуНаДиске);
@@ -569,6 +574,11 @@
ВладелецФайлов = ПараметрыФайла.ВладелецФайлов;
ИмяБезРасширения = ПараметрыФайла.ИмяБезРасширения;
РасширениеБезТочки = ПараметрыФайла.РасширениеБезТочки;
Если Не ЗначениеЗаполнено(ВладелецФайлов) Тогда
ВызватьИсключение НСтр("ru = 'Не задано значение параметра ВладелецФайлов в РаботаСФайлами.ДобавитьФайл.'");
КонецЕсли;
ГруппаФайлов = Неопределено;
Если ПараметрыФайла.Свойство("ГруппаФайлов")
И ЗначениеЗаполнено(ПараметрыФайла.ГруппаФайлов)
@@ -924,14 +934,12 @@
//
Функция СконвертироватьФайлыВПрисоединенные(Знач ВладелецФайлов, ИмяСправочника = Неопределено) Экспорт
Результат = Новый Соответствие;
Если Не ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.РаботаСФайлами") Тогда
Возврат Результат;
Если Не ЗначениеЗаполнено(ВладелецФайлов) Тогда
ВызватьИсключение НСтр("ru = 'Не задано значение параметра ВладелецФайлов в РаботаСФайлами.СконвертироватьФайлыВПрисоединенные.'");
КонецЕсли;
ЗаголовокОшибки = НСтр("ru = 'Ошибка при конвертации присоединенных файлов подсистемы Работа с файлами
|в присоединенные файлы подсистемы Присоединенные файлы.'");
Результат = Новый Соответствие;
ЗаголовокОшибки = НСтр("ru = 'Ошибка при конвертации присоединенных файлов.'");
ИмяСправочника = РаботаСФайламиСлужебный.ИмяСправочникаХраненияФайлов(
ВладелецФайлов, ИмяСправочника, ЗаголовокОшибки);
@@ -1069,13 +1077,11 @@
//
Процедура ИзменитьСправочникХраненияФайлов(Знач ВладелецФайлов, ИмяСправочника = Неопределено) Экспорт
Если Не ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.РаботаСФайлами") Тогда
Возврат;
Если Не ЗначениеЗаполнено(ВладелецФайлов) Тогда
ВызватьИсключение НСтр("ru = 'Не задано значение параметра ВладелецФайлов в РаботаСФайлами.ИзменитьСправочникХраненияФайлов.'");
КонецЕсли;
ЗаголовокОшибки = НСтр("ru = 'Ошибка при конвертации присоединенных файлов подсистемы Работа с файлами
|в присоединенные файлы подсистемы Присоединенные файлы.'");
ЗаголовокОшибки = НСтр("ru = 'Ошибка при конвертации присоединенных файлов.'");
ИмяСправочника = РаботаСФайламиСлужебный.ИмяСправочникаХраненияФайлов(
ВладелецФайлов, ИмяСправочника, ЗаголовокОшибки);
@@ -71,6 +71,10 @@
Процедура ДобавитьФайлы(Знач ВладелецФайла, Знач ИдентификаторФормы, Знач Фильтр = "", ГруппаФайлов = Неопределено,
ОбработчикРезультата = Неопределено) Экспорт
Если Не ЗначениеЗаполнено(ВладелецФайла) Тогда
ВызватьИсключение НСтр("ru = 'Не задано значение параметра ВладелецФайла в РаботаСФайламиКлиент.ДобавитьФайлы.'");
КонецЕсли;
Параметры = Новый Структура;
Параметры.Вставить("ВладелецФайла", ВладелецФайла);
Параметры.Вставить("ИдентификаторФормы", ИдентификаторФормы);
@@ -117,6 +121,10 @@
Процедура ДобавитьФайл(ОбработчикРезультата, ВладелецФайла, ФормаВладелец, РежимСоздания = Неопределено,
ПараметрыДобавления = Неопределено) Экспорт
Если Не ЗначениеЗаполнено(ВладелецФайла) Тогда
ВызватьИсключение НСтр("ru = 'Не задано значение параметра ВладелецФайла в РаботаСФайламиКлиент.ДобавитьФайл.'");
КонецЕсли;
ПараметрыВыполнения = Новый Структура;
Если ПараметрыДобавления = Неопределено
Или ТипЗнч(ПараметрыДобавления) = Тип("Булево") Тогда
@@ -224,6 +232,10 @@
Процедура СкопироватьФайл(ВладелецФайла, ФайлОснование, ДополнительныеПараметры = Неопределено,
ОписаниеОповещенияОЗакрытии = Неопределено) Экспорт
Если Не ЗначениеЗаполнено(ВладелецФайла) Тогда
ВызватьИсключение НСтр("ru = 'Не задано значение параметра ВладелецФайла в РаботаСФайламиКлиент.СкопироватьФайл.'");
КонецЕсли;
ЭтоФайлы = ТипЗнч(ФайлОснование) = Тип("СправочникСсылка.Файлы");
ПараметрыФормы = Новый Структура;
File diff suppressed because it is too large. Load diff
@@ -83,15 +83,18 @@
КонецФункции
// Возвращает таблицу, содержащую контактную информацию объекта.
// Поведение, при котором возвращалось представление контактной информации, теперь считается устаревшим
// и сохранено для обратной совместимости. Для получения представления контактной информации рекомендуется
// использовать функцию ПредставлениеКонтактнойИнформацииОбъекта.
//
// Параметры:
// СсылкаИлиОбъект - ЛюбаяСсылка, Объект - Ссылка или объект-владелец контактной информации (организация,
// контрагент, партнер и т.д.).
// ВидКонтактнойИнформации - СправочникСсылка.ВидыКонтактнойИнформации - Необязательный, отбор по виду контактной информации.
// Дата - Дата - необязательный, дата с которой действует запись контактной информации,
// используется при хранении истории изменения контактной информации.
// Если владелец хранит историю изменений, то при несоответствии параметра
// дате будет вызвано исключение.
// Дата - Дата - дата с которой действует запись контактной информации.
// Если объект-владелец допускает хранение истории изменения контактной информации,
// признаком которого является наличие колонки ДействуетС в табличной части КонтактнаяИнформация,
// то необходимо обязательно передавать дату, в противном случае будет вызвано исключение.
// ТолькоПредставление - Булево - Если Истина, то возвращает только представление, иначе таблицу значений.
// Для получения представления рекомендуется использовать функцию ПредставлениеКонтактнойИнформацииОбъекта.
//
@@ -166,7 +169,7 @@
ВидыКонтактнойИнформации = Новый Массив;
ВидыКонтактнойИнформации.Добавить(ВидКонтактнойИнформации);
ТипыКонтактнойИнформации = Новый Массив;
ТипыКонтактнойИнформации.Добавить(ВидКонтактнойИнформации.Тип);
ТипыКонтактнойИнформации.Добавить(ОбщегоНазначения.ЗначениеРеквизитаОбъекта(ВидКонтактнойИнформации, "Тип"));
Иначе
ВидыКонтактнойИнформации = Неопределено;
КонецЕсли;
@@ -1568,8 +1571,10 @@
ГруппаВидовКонтактнойИнформации = ГруппаВидовКонтактнойИнформацииОбъекта(ПолноеИмяОбъектаМетаданных);
ИспользуетсяКонтактнаяИнформация = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(ГруппаВидовКонтактнойИнформации, "Используется");
Если ИспользуетсяКонтактнаяИнформация = Ложь Тогда
СкрытьКонтактнуюИнформацию(Форма, ДобавляемыеРеквизиты, ИмяЭлементаДляРазмещения, ИсключаемыеВиды,
ОтложеннаяИнициализация, ПоложениеЗаголовкаКИ, СсылкаНаОбъект);
ПараметрыВыводаКонтактнойИнформации = ПараметрыВыводаКонтактнойИнформации(Форма, ИмяЭлементаДляРазмещения, ПоложениеЗаголовкаКИ,
ОтложеннаяИнициализация, ИсключаемыеВиды, СкрываемыеВиды);
СкрытьКонтактнуюИнформацию(Форма, ДобавляемыеРеквизиты, ПараметрыВыводаКонтактнойИнформации, СсылкаНаОбъект);
Возврат;
КонецЕсли;
@@ -1730,7 +1735,7 @@
СоздатьРеквизитыКонтактнойИнформации(Форма, ДобавляемыеРеквизиты, ИмяОбъекта, ИсключаемыеВиды, КонтактнаяИнформация, ОтложеннаяИнициализация, ОбработкаНавигационнойСсылки);
ПараметрыКонтактнойИнформации = ПараметрыВыводаКонтактнойИнформации(Форма, ИмяЭлементаДляРазмещения, ПоложениеЗаголовкаКИ,
ОтложеннаяИнициализация, ИсключаемыеВиды);
ОтложеннаяИнициализация, ИсключаемыеВиды, СкрываемыеВиды);
ПараметрыКонтактнойИнформации.Владелец = СсылкаНаОбъект;
ПараметрыКонтактнойИнформации.ПараметрыАдреса.ТипПомещения = ТипПомещения;
ПараметрыКонтактнойИнформации.ОбработкаНавигационнойСсылки = ОбработкаНавигационнойСсылки;
@@ -1890,7 +1895,14 @@
КонецЕсли;
Форма.ИзменитьРеквизиты(, МассивУдаляемыхРеквизитов);
ПриСозданииНаСервере(Форма, Объект, ИмяЭлементаДляРазмещения, ПоложениеЗаголовкаКИ, Параметры.ИсключаемыеВиды, ОтложеннаяИнициализация);
ДополнительныеПараметры = ПараметрыКонтактнойИнформации();
ДополнительныеПараметры.ИмяЭлементаДляРазмещения = ИмяЭлементаДляРазмещения;
ДополнительныеПараметры.ПоложениеЗаголовкаКИ = ПоложениеЗаголовкаКИ;
ДополнительныеПараметры.ИсключаемыеВиды = Параметры.ИсключаемыеВиды;
ДополнительныеПараметры.СкрываемыеВиды = Параметры.СкрываемыеВиды;
ДополнительныеПараметры.ОтложеннаяИнициализация = ОтложеннаяИнициализация;
ПриСозданииНаСервере(Форма, Объект, ДополнительныеПараметры);
Параметры = ПараметрыКонтактнойИнформацииФормы(Форма.ПараметрыКонтактнойИнформации, ИмяЭлементаДляРазмещения);
Параметры.ВыполненаОтложеннаяИнициализация = ВыполненаОтложеннаяИнициализация;
@@ -2054,7 +2066,46 @@
Процедура ПередЗаписьюНаСервере(Форма, Объект, Отказ = Ложь) Экспорт
КонтактнаяИнформация = КонтактнаяИнформацияИзРеквизитовФормы(Форма, Объект);
ЭтоПараметрыОсновногоОбъекта = Истина;
ПараметрыКонтактнойИнформации = Неопределено;
Для каждого ПараметрКонтактнойИнформации Из Форма.ПараметрыКонтактнойИнформации Цикл
Если ПараметрКонтактнойИнформации.Значение.Владелец = Объект.Ссылка Тогда
ПараметрыКонтактнойИнформации = ПараметрКонтактнойИнформации.Значение;
Прервать;
КонецЕсли;
ЭтоПараметрыОсновногоОбъекта = Ложь;
КонецЦикла;
Если Объект.Ссылка.Пустая() Тогда
Если ЭтоПараметрыОсновногоОбъекта Тогда
НоваяСсылка = ОбщегоНазначения.МенеджерОбъектаПоСсылке(Объект.Ссылка).ПолучитьСсылку();
Объект.УстановитьСсылкуНового(НоваяСсылка);
ПараметрыКонтактнойИнформации.Владелец = Объект.ПолучитьСсылкуНового();
Иначе
Возврат;
КонецЕсли;
КонецЕсли;
Если ПараметрыКонтактнойИнформации.СкрываемыеВиды.Количество() = 0 Тогда
Объект.КонтактнаяИнформация.Очистить();
Иначе
Индекс = Объект.КонтактнаяИнформация.Количество() -1;
Пока Индекс >= 0 Цикл
СтрокаТаблицы = Объект.КонтактнаяИнформация.Получить(Индекс);
Если ПараметрыКонтактнойИнформации.СкрываемыеВиды.Найти(СтрокаТаблицы.Вид) = Неопределено Тогда
Объект.КонтактнаяИнформация.Удалить(СтрокаТаблицы);
КонецЕсли;
Индекс = Индекс - 1;
КонецЦикла;
КонецЕсли;
УстановитьКонтактнуюИнформациюОбъекта(Объект, КонтактнаяИнформация);
КонецПроцедуры
@@ -2259,7 +2310,8 @@
// * ТипПомещения - Строка - наименование типа помещения, который будет установлен
// в форме ввода нового адреса. По умолчанию, "Квартира".
// * ИмяЭлементаДляРазмещения - Строка - группа, куда будут размещены элементы контактной информации.
// * ИсключаемыеВиды - Массив - виды контактной информации, которые не требуется отображать на форме.
// * ИсключаемыеВиды - Массив - виды контактной информации, которые при отложенной инициализации будут созданы на форме,
// только после вызова процедуры УправлениеКонтактнойИнформацией.ВыполнитьОтложеннуюИнициализацию.
// * СкрываемыеВиды - Массив - виды контактной информации, которые не требуется отображать на форме.
// * ОтложеннаяИнициализация - Булево - если Истина, то создание полей контактной информации на форме будет отложено.
// * ПоложениеЗаголовкаКИ - ПоложениеЗаголовкаЭлементаФормы - может принимать значения:
@@ -3691,8 +3743,7 @@
КонецПроцедуры
Процедура СкрытьКонтактнуюИнформацию(Знач Форма, Знач ДобавляемыеРеквизиты, Знач ИмяЭлементаДляРазмещения, Знач ИсключаемыеВиды,
Знач ОтложеннаяИнициализация, Знач ПоложениеЗаголовкаКИ, Знач СсылкаНаОбъект)
Процедура СкрытьКонтактнуюИнформацию(Знач Форма, Знач ДобавляемыеРеквизиты, ПараметрыКонтактнойИнформации, Знач СсылкаНаОбъект)
Если ДобавляемыеРеквизиты.Количество() > 0 Тогда
Форма.ИзменитьРеквизиты(ДобавляемыеРеквизиты);
@@ -3704,13 +3755,11 @@
КонецЕсли;
КонецЦикла;
ПараметрыКонтактнойИнформации = ПараметрыВыводаКонтактнойИнформации(Форма, ИмяЭлементаДляРазмещения, ПоложениеЗаголовкаКИ,
ОтложеннаяИнициализация, ИсключаемыеВиды);
ПараметрыКонтактнойИнформации.ДобавленныеРеквизиты = ДобавленныеРеквизиты;
ПараметрыКонтактнойИнформации.Владелец = СсылкаНаОбъект;
Если Не ПустаяСтрока(ИмяЭлементаДляРазмещения) Тогда
Форма.Элементы[ИмяЭлементаДляРазмещения].Видимость = Ложь;
Если Не ПустаяСтрока(ПараметрыКонтактнойИнформации.ИмяЭлементаДляРазмещения) Тогда
Форма.Элементы[ПараметрыКонтактнойИнформации.ИмяЭлементаДляРазмещения].Видимость = Ложь;
КонецЕсли;
КонецПроцедуры
@@ -5130,7 +5179,7 @@
КонецФункции
Функция ПараметрыВыводаКонтактнойИнформации(Форма, ИмяЭлементаДляРазмещения, ПоложениеЗаголовкаКИ, ОтложеннаяИнициализация, ИсключаемыеВиды)
Функция ПараметрыВыводаКонтактнойИнформации(Форма, ИмяЭлементаДляРазмещения, ПоложениеЗаголовкаКИ, ОтложеннаяИнициализация, ИсключаемыеВиды, СкрываемыеВиды)
Если ТипЗнч(Форма.ПараметрыКонтактнойИнформации) <> Тип("Структура") Тогда
Форма.ПараметрыКонтактнойИнформации = Новый Структура;
@@ -5155,6 +5204,7 @@
ПараметрыКонтактнойИнформации.Вставить("МожноОтправлятьSMS", МожноОтправлятьSMS);
ПараметрыКонтактнойИнформации.Вставить("Владелец", Неопределено);
ПараметрыКонтактнойИнформации.Вставить("ОбработкаНавигационнойСсылки", Ложь);
ПараметрыКонтактнойИнформации.Вставить("СкрываемыеВиды", СкрываемыеВиды);
ПараметрыАдреса = Новый Структура("ТипПомещения, Страна, Индекс", "Квартира");
ПараметрыКонтактнойИнформации.Вставить("ПараметрыАдреса", ПараметрыАдреса);
@@ -5412,13 +5462,16 @@
КонецПроцедуры
Функция ПараметрыКонтактнойИнформацииФормы(ПараметрыКонтактнойИнформации, ИмяЭлементаДляРазмещения)
Если НЕ ЗначениеЗаполнено(ИмяЭлементаДляРазмещения) ИЛИ НЕ ПараметрыКонтактнойИнформации.Свойство(ИмяЭлементаДляРазмещения) Тогда
Для каждого ПерваяЗапись Из ПараметрыКонтактнойИнформации Цикл
Возврат ПерваяЗапись.Значение;
КонецЦикла;
Возврат ПараметрыКонтактнойИнформации;
КонецЕсли;
Возврат ПараметрыКонтактнойИнформации[ИмяЭлементаДляРазмещения];
КонецФункции
Функция ОпределитьСледующуюСтроку(Форма, КонтактнаяИнформация, СтрокаКИ)
@@ -284,15 +284,15 @@
КонецФункции
Функция АдресВСвободнойФорме() Экспорт
Возврат НСтр("ru='ВСвободнойФорме'");
Возврат "ВСвободнойФорме";
КонецФункции
Функция АдресЕАЭС() Экспорт
Возврат НСтр("ru='ЕАЭС'");
Возврат "ЕАЭС";
КонецФункции
Функция ИностранныйАдрес() Экспорт
Возврат НСтр("ru='Иностранный'");
Возврат "Иностранный";
КонецФункции
Функция ЭтоАдресВСвободнойФорме(ТипАдреса) Экспорт
@@ -2080,7 +2080,7 @@
Возврат Ложь;
КонецЕсли;
Если Владелец.Свойство("Value") = Неопределено Или Владелец.Свойство("Type") = Неопределено Тогда
Если Не Владелец.Свойство("Value") Или Не Владелец.Свойство("Type") Тогда
Возврат Ложь;
КонецЕсли;
@@ -2100,7 +2100,7 @@
КонецЕсли;
Для каждого ИмяПоля Из СписокПолейДляПроверки Цикл
Если Владелец.Свойство(ИмяПоля) <> Неопределено И ЗначениеЗаполнено(Владелец[ИмяПоля]) Тогда
Если Владелец.Свойство(ИмяПоля) И ЗначениеЗаполнено(Владелец[ИмяПоля]) Тогда
Возврат Истина;
КонецЕсли;
КонецЦикла;
@@ -1633,9 +1633,9 @@
Пакет = РегистрыСведений.ПакетыДляОтправки.ПолучитьПакет(НомерПакета);
Если Пакет <> Неопределено Тогда
HASH = Пакет.ХешПакета;
PACKET_NUMBER = Формат(Пакет.НомерПакета, "ЧН=0; ЧГ=0");
GUID = Строка(Параметры.ИдентификаторИнформационнойБазы);
ХешПакета = Пакет.ХешПакета;
НомерПакета = Формат(Пакет.НомерПакета, "ЧН=0; ЧГ=0");
Идентификатор = Строка(Параметры.ИдентификаторИнформационнойБазы);
Если Параметры.ЗащищенноеСоединение Тогда
ТипСоединения = "https";
@@ -1647,7 +1647,7 @@
Если Прав(АдресРесурса, 1) <> "/" Тогда
АдресРесурса = АдресРесурса + "/";
КонецЕсли;
АдресРесурса = АдресРесурса + GUID + "/" + PACKET_NUMBER + "/" + HASH;
АдресРесурса = АдресРесурса + Идентификатор + "/" + НомерПакета + "/" + ХешПакета;
ПараметрыHTTP = Новый Структура;
ПараметрыHTTP.Вставить("Сервер", Параметры.Сервер);
+9 -9
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="fbf5a25a-1828-4fe3-912a-924fd0620b24">
<mdclass:Configuration xmlns:mdclass="http://g5.1c.ru/v8/dt/metadata/mdclass" uuid="9562f530-1ba8-46e8-b69d-133f66449016">
<name>БиблиотекаСтандартныхПодсистем</name>
<synonym>
<key>ru</key>
<value>Библиотека стандартных подсистем, редакция 3.0</value>
</synonym>
<containedObjects classId="9cd510cd-abfc-11d4-9434-004095e12fc7" objectId="59e70b74-c130-4665-ac42-765cddef1e66"/>
<containedObjects classId="9fcd25a0-4822-11d4-9414-008048da11f9" objectId="28648567-0472-4ff8-a6d3-ec8a55886055"/>
<containedObjects classId="e3687481-0a87-462c-a166-9f34594f9bba" objectId="b5c0294f-2927-4411-bf19-7045e1246a4a"/>
<containedObjects classId="9de14907-ec23-4a07-96f0-85521cb6b53b" objectId="6b77ec45-46ac-4c97-9782-fb7f1eff999e"/>
<containedObjects classId="51f2d5d8-ea4d-4064-8892-82951750031e" objectId="8bc394b9-89af-40a1-ad8b-7f21c5885eca"/>
<containedObjects classId="e68182ea-4237-4383-967f-90c1e3370bc7" objectId="22ed3ded-0ea3-4628-adae-aaf8708b68d0"/>
<containedObjects classId="fb282519-d103-4dd3-bc12-cb271d631dfc" objectId="8d16713b-b2cf-4f2a-a61e-aeaadbe959fc"/>
<containedObjects classId="9cd510cd-abfc-11d4-9434-004095e12fc7" objectId="0050cc3c-106d-41bd-83a4-8ffbca91a075"/>
<containedObjects classId="9fcd25a0-4822-11d4-9414-008048da11f9" objectId="2ae7d59e-d34f-4e3d-8933-abc8ba4fb006"/>
<containedObjects classId="e3687481-0a87-462c-a166-9f34594f9bba" objectId="d7a31eff-373f-412e-8427-c9fea0e084d7"/>
<containedObjects classId="9de14907-ec23-4a07-96f0-85521cb6b53b" objectId="8de054d0-8da9-49b8-9820-e50376b2831d"/>
<containedObjects classId="51f2d5d8-ea4d-4064-8892-82951750031e" objectId="750c18c8-98d1-4a99-8ca2-8b68d51a4a60"/>
<containedObjects classId="e68182ea-4237-4383-967f-90c1e3370bc7" objectId="4e44d7fe-11d9-417d-9340-9d4c9b73e9b5"/>
<containedObjects classId="fb282519-d103-4dd3-bc12-cb271d631dfc" objectId="8c23967b-a052-4e01-a688-3fa082895a9b"/>
<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.2.264</version>
<version>3.0.2.269</version>
<updateCatalogAddress>http://downloads.v8.1c.ru/tmplts/</updateCatalogAddress>
<includeHelpInContents>true</includeHelpInContents>
<usedMobileApplicationFunctionalities>
@@ -1 +1 @@
{6,1,1,3c9df8d0-67aa-458d-8233-9f5afeeb2912,1,dada1dfd-068d-46eb-8298-6b1be4527c2c,"3.0.2.264","Фирма ""1С""","БиблиотекаСтандартныхПодсистем",6024,1,0,fbf5a25a-1828-4fe3-912a-924fd0620b24,fbf5a25a-1828-4fe3-912a-924fd0620b24,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,d39f26bc-8104-4573-8d5c-effd5f839e01,1,77eb6fe0-f660-4023-ac49-8617afeb10d0,"3.0.2.269","Фирма ""1С""","БиблиотекаСтандартныхПодсистем",6024,1,0,9562f530-1ba8-46e8-b69d-133f66449016,9562f530-1ba8-46e8-b69d-133f66449016,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
@@ -49,6 +49,7 @@
ПараметрыПланирования = МодульУправлениеДоступомСлужебный.ПараметрыПланированияОбновленияДоступа();
ПараметрыПланирования.ДляПользователей = Ложь;
ПараметрыПланирования.ДляВнешнихПользователей = Истина;
ПараметрыПланирования.ЭтоПродолжениеОбновления = Истина;
ПараметрыПланирования.Описание = "ИспользоватьВнешнихПользователейПриЗаписи";
МодульУправлениеДоступомСлужебный.ЗапланироватьОбновлениеДоступа(, ПараметрыПланирования);
КонецЕсли;
@@ -48,6 +48,7 @@
И Константы.ОграничиватьДоступНаУровнеЗаписейУниверсально.Получить() Тогда
ПараметрыПланирования = УправлениеДоступомСлужебный.ПараметрыПланированияОбновленияДоступа();
ПараметрыПланирования.ЭтоПродолжениеОбновления = Истина;
ПараметрыПланирования.Описание = "ОграничиватьДоступНаУровнеЗаписейПриЗаписи";
УправлениеДоступомСлужебный.ЗапланироватьОбновлениеДоступа(, ПараметрыПланирования);
УправлениеДоступомСлужебный.УстановитьОбновлениеДоступа(Истина);
@@ -296,6 +296,10 @@
<items xsi:type="form:FormField">
<name>СписокСсылка</name>
<id>87</id>
<title>
<key>ru</key>
<value>Ссылка</value>
</title>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
@@ -260,6 +260,10 @@
<items xsi:type="form:FormField">
<name>СписокКод</name>
<id>186</id>
<title>
<key>ru</key>
<value>Код</value>
</title>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
@@ -8669,6 +8669,21 @@
<common>true</common>
</edit>
</attributes>
<attributes>
<name>ВидКонтактнойИнформацииТелефон</name>
<title>
<key>ru</key>
<value>Вид контактной информации (телефон)</value>
</title>
<id>91</id>
<valueType/>
<view>
<common>true</common>
</view>
<edit>
<common>true</common>
</edit>
</attributes>
<formCommands>
<name>Далее</name>
<title>
@@ -57,6 +57,9 @@
ВидКонтактнойИнформации.НастройкиПроверки.ТолькоНациональныйАдрес = Истина;
ВидКонтактнойИнформацииТелефон = МодульУправлениеКонтактнойИнформацией.ПараметрыВидаКонтактнойИнформации(
Перечисления["ТипыКонтактнойИнформации"].Телефон);
КонецЕсли;
КонецПроцедуры
@@ -3642,13 +3645,8 @@
МодульУправлениеКонтактнойИнформациейКлиент = ОбщегоНазначенияКлиент.ОбщийМодуль(
"УправлениеКонтактнойИнформациейКлиент");
ИмяТипаКонтактнойИнформации = "Перечисление" + ".ТипыКонтактнойИнформации.Телефон";
ВидКонтактнойИнформации = Новый Структура;
ВидКонтактнойИнформации.Вставить("Тип", ПредопределенноеЗначение(ИмяТипаКонтактнойИнформации));
ПараметрыФормы = МодульУправлениеКонтактнойИнформациейКлиент.ПараметрыФормыКонтактнойИнформации(
ВидКонтактнойИнформации, ЭтотОбъект[ИмяРеквизита + "XML"], ЭтотОбъект[ИмяРеквизита]);
ВидКонтактнойИнформацииТелефон, ЭтотОбъект[ИмяРеквизита + "XML"], ЭтотОбъект[ИмяРеквизита]);
ПараметрыФормы.Вставить("Заголовок", ЗаголовокФормы);
@@ -515,6 +515,11 @@
ЭтотОбъект[Элемент.Имя] = "";
КонецЕсли;
Если ПустаяСтрока(Помещение) Тогда
ОбновитьМенюДобавленияСтроенийИПомещений();
Возврат;
КонецЕсли;
Если НаселенныйПунктДетально.Apartments.Количество() > 0 Тогда
НаселенныйПунктДетально.Apartments[0].Type = ТипПомещения;
КонецЕсли;
@@ -524,7 +529,6 @@
КонецЕсли;
ОбновитьМенюДобавленияСтроенийИПомещений();
ОбработкаИзмененияАдреса();
КонецПроцедуры
@@ -539,7 +543,11 @@
Если НаселенныйПунктДетально.Apartments.Количество() = 0 Тогда
НаселенныйПунктДетально.Apartments.Добавить(ИнформацияОПомещении);
Иначе
Если СтрСравнить(НаселенныйПунктДетально.Apartments[0].type, ТипПомещения) = 0 Тогда
НаселенныйПунктДетально.Apartments[0] = ИнформацияОПомещении;
Иначе
НаселенныйПунктДетально.Apartments.Вставить(0, ИнформацияОПомещении);
КонецЕсли;
КонецЕсли;
КонецЕсли;
ОбработкаИзмененияАдреса();
@@ -3351,7 +3359,7 @@
ОписаниеПомещения.Значение = ИмяПомещенияИлиСтроения;
ОписаниеПомещения.Тип = Тип;
ОписаниеПомещения.Видимость = Истина;
ОписаниеПомещения.Ключ = ?(ПустаяСтрока(Ключ), ИмяПомещенияИлиСтроения, Ключ);
ОписаниеПомещения.Ключ = "key" + СтрЗаменить(новый УникальныйИдентификатор, "-", "");
ОписаниеПомещения.ПредыдущиеЗначение = ИмяПомещенияИлиСтроения;
КонецПроцедуры
@@ -31,7 +31,7 @@
// позиционирование
Отбор = Новый Структура("Дом", Параметры.Номер);
Если ЗначениеЗаполнено(Параметры.ТипСтроения) Тогда
Если ВРег(Параметры.ТипСтроения) = НСтр("ru = 'КОРПУС'") Тогда
Если ВРег(Параметры.ТипСтроения) = "КОРПУС" Тогда
Отбор.Вставить("Корпус", Параметры.Строение);
Отбор.Вставить("Строение", "");
Иначе
@@ -2536,6 +2536,10 @@
<items xsi:type="form:FormField">
<name>СписокСсылокСсылкаПредставление</name>
<id>21</id>
<title>
<key>ru</key>
<value>Данные</value>
</title>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
@@ -3509,7 +3509,9 @@
Возврат НСтр("ru = 'Общая дата для всех разделов'");
ИначеЕсли Не Данные.ЭтоРаздел Тогда
ДанныеРаздела = Данные.ПолучитьРодителя();
Если Не ЗначениеЗаполнено(ДанныеРаздела.ДатаЗапрета) Тогда
Если ДанныеРаздела = Неопределено Тогда
Возврат "";
ИначеЕсли Не ЗначениеЗаполнено(ДанныеРаздела.ДатаЗапрета) Тогда
Возврат СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
НСтр("ru = 'Общая дата для раздела ""%1""'"), ДанныеРаздела.Представление);
Иначе
@@ -248,6 +248,7 @@
УправлениеДоступомСлужебный.ОчиститьКэшЗначенийГруппДоступаДляРасчетаПрав();
ПараметрыПланирования = УправлениеДоступомСлужебный.ПараметрыПланированияОбновленияДоступа();
ПараметрыПланирования.ЭтоПродолжениеОбновления = Истина;
ПараметрыПланирования.Описание = "ЗапланироватьОбновлениеДоступаКоВсемЭлементамОтмеченныхСписковНаСервере";
УправлениеДоступомСлужебный.ЗапланироватьОбновлениеДоступа(Списки, ПараметрыПланирования);
@@ -57,6 +57,7 @@
ПараметрыПланирования.КлючиДоступаКДанным = Ложь;
ПараметрыПланирования.ДляВнешнихПользователей = Ложь;
ПараметрыПланирования.ЭтоПродолжениеОбновления = Истина;
ПараметрыПланирования.Описание = "ОбработатьДанныеДляПереходаНаНовуюВерсию1";
УправлениеДоступомСлужебный.ЗапланироватьОбновлениеДоступа(Списки, ПараметрыПланирования);
@@ -4672,6 +4672,10 @@
<items xsi:type="form:FormField">
<name>НепринятыеПоДатеДата</name>
<id>334</id>
<title>
<key>ru</key>
<value>Дата</value>
</title>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
@@ -279,8 +279,10 @@
<value>Проблемный объект</value>
</synonym>
<type>
<types>BusinessProcessRef</types>
<types>DocumentRef</types>
<types>ChartOfCalculationTypesRef</types>
<types>TaskRef</types>
<types>ChartOfCharacteristicTypesRef</types>
<types>ChartOfAccountsRef</types>
<types>CatalogRef</types>
@@ -692,9 +692,9 @@
Или Не ВыводитьОтбор.Использование Тогда
Область = Макет.ПолучитьОбласть("Отбор");
Если МинимальнаяПродолжительностьСеансовРегламентныхЗаданий > 0 Тогда
РежимОтображенияИнтервалов = НСтр("ru = 'Отключено'");
РежимОтображенияИнтервалов = НСтр("ru = 'Отключено отображение интервалов с нулевой продолжительностью'");
Иначе
РежимОтображенияИнтервалов = НСтр("ru = 'Включено'");
РежимОтображенияИнтервалов = НСтр("ru = 'Включено отображение интервалов с нулевой продолжительностью'");
КонецЕсли;
Область.Параметры.ДатаНачала = ДатаНачала;
Область.Параметры.ДатаОкончания = ДатаОкончания;
@@ -1264,9 +1264,9 @@
Область.Параметры.ДатаНачала = ДатаНачала;
Область.Параметры.ДатаОкончания = ДатаОкончания;
Если Расшифровка.Получить(8) = 0 Тогда
РежимОтображенияИнтервалов = НСтр("ru = 'Включено'");
РежимОтображенияИнтервалов = НСтр("ru = 'Включено отображение интервалов с нулевой продолжительностью'");
Иначе
РежимОтображенияИнтервалов = НСтр("ru = 'Отключено'");
РежимОтображенияИнтервалов = НСтр("ru = 'Отключено отображение интервалов с нулевой продолжительностью'");
КонецЕсли;
Область.Параметры.РежимОтображенияСеансов = РежимОтображенияИнтервалов;
Отчет.Вывести(Область);
@@ -193,7 +193,7 @@
<tl>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>[РежимОтображенияИнтервалов] отображение интервалов с нулевой продолжительностью</v8:content>
<v8:content>[РежимОтображенияИнтервалов]</v8:content>
</v8:item>
</tl>
</c>
@@ -198,7 +198,7 @@
<tl>
<v8:item>
<v8:lang>ru</v8:lang>
<v8:content>[РежимОтображенияСеансов] отображение сеансов задания с нулевой продолжительностью</v8:content>
<v8:content>[РежимОтображенияСеансов]</v8:content>
</v8:item>
</tl>
</c>
@@ -3462,6 +3462,93 @@
<value>true</value>
</right>
</object>
<object>
<name>Configuration.БиблиотекаСтандартныхПодсистем</name>
<right>
<name>Administration</name>
<value>true</value>
</right>
<right>
<name>DataAdministration</name>
<value>true</value>
</right>
<right>
<name>UpdateDataBaseConfiguration</name>
<value>true</value>
</right>
<right>
<name>ExclusiveMode</name>
<value>true</value>
</right>
<right>
<name>ActiveUsers</name>
<value>true</value>
</right>
<right>
<name>EventLog</name>
<value>true</value>
</right>
<right>
<name>ThinClient</name>
<value>true</value>
</right>
<right>
<name>WebClient</name>
<value>true</value>
</right>
<right>
<name>ThickClient</name>
<value>true</value>
</right>
<right>
<name>ExternalConnection</name>
<value>true</value>
</right>
<right>
<name>Automation</name>
<value>true</value>
</right>
<right>
<name>TechnicalSpecialistMode</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeNormal</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeWorkplace</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeEmbeddedWorkplace</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeFullscreenWorkplace</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeKiosk</name>
<value>true</value>
</right>
<right>
<name>AnalyticsSystemClient</name>
<value>true</value>
</right>
<right>
<name>SaveUserData</name>
<value>true</value>
</right>
<right>
<name>ConfigurationExtensionsAdministration</name>
<value>true</value>
</right>
<right>
<name>Output</name>
<value>true</value>
</right>
</object>
<object>
<name>Constant.ИспользоватьАльтернативныйСерверДляЗагрузкиКурсовВалют</name>
<right>
@@ -6276,93 +6363,6 @@
<value>true</value>
</right>
</object>
<object>
<name>Configuration.БиблиотекаСтандартныхПодсистем</name>
<right>
<name>Administration</name>
<value>true</value>
</right>
<right>
<name>DataAdministration</name>
<value>true</value>
</right>
<right>
<name>UpdateDataBaseConfiguration</name>
<value>true</value>
</right>
<right>
<name>ExclusiveMode</name>
<value>true</value>
</right>
<right>
<name>ActiveUsers</name>
<value>true</value>
</right>
<right>
<name>EventLog</name>
<value>true</value>
</right>
<right>
<name>ThinClient</name>
<value>true</value>
</right>
<right>
<name>WebClient</name>
<value>true</value>
</right>
<right>
<name>ThickClient</name>
<value>true</value>
</right>
<right>
<name>ExternalConnection</name>
<value>true</value>
</right>
<right>
<name>Automation</name>
<value>true</value>
</right>
<right>
<name>TechnicalSpecialistMode</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeNormal</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeWorkplace</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeEmbeddedWorkplace</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeFullscreenWorkplace</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeKiosk</name>
<value>true</value>
</right>
<right>
<name>AnalyticsSystemClient</name>
<value>true</value>
</right>
<right>
<name>SaveUserData</name>
<value>true</value>
</right>
<right>
<name>ConfigurationExtensionsAdministration</name>
<value>true</value>
</right>
<right>
<name>Output</name>
<value>true</value>
</right>
</object>
<object>
<name>CommonForm.ПодключениеКонечнойТочки</name>
<right>
@@ -4684,6 +4684,45 @@
<value>false</value>
</right>
</object>
<object>
<name>Configuration.БиблиотекаСтандартныхПодсистем</name>
<right>
<name>Administration</name>
<value>false</value>
</right>
<right>
<name>UpdateDataBaseConfiguration</name>
<value>false</value>
</right>
<right>
<name>ThickClient</name>
<value>false</value>
</right>
<right>
<name>ExternalConnection</name>
<value>false</value>
</right>
<right>
<name>Automation</name>
<value>false</value>
</right>
<right>
<name>TechnicalSpecialistMode</name>
<value>false</value>
</right>
<right>
<name>ConfigurationExtensionsAdministration</name>
<value>false</value>
</right>
<right>
<name>InteractiveOpenExtDataProcessors</name>
<value>false</value>
</right>
<right>
<name>InteractiveOpenExtReports</name>
<value>false</value>
</right>
</object>
<object>
<name>Constant.ИспользоватьАльтернативныйСерверДляЗагрузкиКурсовВалют</name>
<right>
@@ -8107,45 +8146,6 @@
<value>false</value>
</right>
</object>
<object>
<name>Configuration.БиблиотекаСтандартныхПодсистем</name>
<right>
<name>Administration</name>
<value>false</value>
</right>
<right>
<name>UpdateDataBaseConfiguration</name>
<value>false</value>
</right>
<right>
<name>ThickClient</name>
<value>false</value>
</right>
<right>
<name>ExternalConnection</name>
<value>false</value>
</right>
<right>
<name>Automation</name>
<value>false</value>
</right>
<right>
<name>TechnicalSpecialistMode</name>
<value>false</value>
</right>
<right>
<name>ConfigurationExtensionsAdministration</name>
<value>false</value>
</right>
<right>
<name>InteractiveOpenExtDataProcessors</name>
<value>false</value>
</right>
<right>
<name>InteractiveOpenExtReports</name>
<value>false</value>
</right>
</object>
<object>
<name>CommonForm.ПодключениеКонечнойТочки</name>
<right>
@@ -3,24 +3,6 @@
<setForNewObjects>false</setForNewObjects>
<setForAttributesByDefault>true</setForAttributesByDefault>
<independentRightsOfChildObjects>false</independentRightsOfChildObjects>
<object>
<name>DataProcessor.ЖурналРегистрации.Command.ЖурналРегистрации</name>
<right>
<name>View</name>
<value>true</value>
</right>
</object>
<object>
<name>DataProcessor.ЖурналРегистрации</name>
<right>
<name>Use</name>
<value>true</value>
</right>
<right>
<name>View</name>
<value>true</value>
</right>
</object>
<object>
<name>Configuration.БиблиотекаСтандартныхПодсистем</name>
<right>
@@ -52,4 +34,22 @@
<value>true</value>
</right>
</object>
<object>
<name>DataProcessor.ЖурналРегистрации.Command.ЖурналРегистрации</name>
<right>
<name>View</name>
<value>true</value>
</right>
</object>
<object>
<name>DataProcessor.ЖурналРегистрации</name>
<right>
<name>Use</name>
<value>true</value>
</right>
<right>
<name>View</name>
<value>true</value>
</right>
</object>
</Rights>