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

3_0_2_300

Browse Source
This commit is contained in:
Компания 1С committed 2019-05-23 16:48:00 +03:00
1 parent 04d905c55b
commit 9bd9b5210b
42 files changed
+1074 -418
Download Patch File Download Diff File Expand all files Collapse all files

No files matched your search

SSL/src/Catalogs/ВидыКонтактнойИнформации/Forms/ФормаЭлемента/Module.bsl
+2 -2
View File
@@ -55,12 +55,12 @@
РеквизитыРодителя.ИмяПредопределенногоВида, РеквизитыРодителя.ИмяПредопределенныхДанных);
Если СтрНачинаетсяС(ИмяПредопределенногоВида, "Справочник") Тогда
ИмяОбъекта = Сред(ИмяПредопределенногоВида, 11);
ИмяОбъекта = Сред(ИмяПредопределенногоВида, СтрДлина("Справочник") + 1);
Если Метаданные.Справочники.Найти(ИмяОбъекта) <> Неопределено Тогда
ТабличнаяЧасть = Метаданные.Справочники[ИмяОбъекта].ТабличныеЧасти.Найти("КонтактнаяИнформация");
КонецЕсли;
ИначеЕсли СтрНачинаетсяС(ИмяПредопределенногоВида, "Документ") Тогда
ИмяОбъекта = Сред(ИмяПредопределенногоВида, 9);
ИмяОбъекта = Сред(ИмяПредопределенногоВида, СтрДлина("Документ") + 1);
Если Метаданные.Документы.Найти(ИмяОбъекта) <> Неопределено Тогда
ТабличнаяЧасть = Метаданные.Документы[ИмяОбъекта].ТабличныеЧасти.Найти("КонтактнаяИнформация");
КонецЕсли;
SSL/src/Catalogs/РассылкиОтчетов/Forms/ФормаЭлемента/Module.bsl
+14 -1
View File
@@ -245,6 +245,14 @@
Элементы.ДругиеСпособыДоставки.Группировка = ГруппировкаПодчиненныхЭлементовФормы.ГоризонтальнаяЕслиВозможно;
Элементы.ИспользоватьСетевойКаталог.Группировка = ГруппировкаПодчиненныхЭлементовФормы.ГоризонтальнаяЕслиВозможно;
Элементы.ИспользоватьПапку.Группировка = ГруппировкаПодчиненныхЭлементовФормы.ГоризонтальнаяЕслиВозможно;
Элементы.ИзменитьРасписание.Доступность = Ложь;
Элементы.ТемаПисьмаКонтекстноеМенюПредпросмотрШаблона.Доступность = Ложь;
Элементы.ТекстПисьмаФорматированныйДокументПредпросмотрШаблона.Доступность = Ложь;
Элементы.ТекстПисьмаФорматированныйДокументКонтекстноеМенюПредпросмотрШаблона.Доступность = Ложь;
Элементы.ПредпросмотрШаблона.Доступность = Ложь;
Элементы.ТекстПисьмаКонтекстноеМенюПредпросмотрШаблона.Доступность = Ложь;
КонецЕсли;
КонецПроцедуры
@@ -614,7 +622,8 @@
&НаКлиенте
Процедура ПериодичностьРасписанияПриИзменении(Элемент)
ВидимостьДоступностьКорректность(ЭтотОбъект, "ПериодичностьРасписания");
Если Объект.ПериодичностьРасписания = ПредопределенноеЗначение("Перечисление.ПериодичностиРасписанийРассылокОтчетов.Произвольное") Тогда
Если Не ОбщегоНазначенияКлиентСервер.ЭтоМобильныйКлиент()
И Объект.ПериодичностьРасписания = ПредопределенноеЗначение("Перечисление.ПериодичностиРасписанийРассылокОтчетов.Произвольное") Тогда
ИзменитьРасписаниеВДиалоге();
КонецЕсли;
КонецПроцедуры
@@ -1748,9 +1757,11 @@
ПараметрыШаблона.Вставить("СформированныеОтчеты", СформированныеОтчеты);
ПараметрыШаблона.Вставить("СпособДоставки", СпособДоставки);
#Если НЕ МобильныйКлиент Тогда
ТекстовыйДокумент = Новый ТекстовыйДокумент;
ТекстовыйДокумент.УстановитьТекст(РассылкаОтчетовКлиентСервер.ЗаполнитьШаблон(Шаблон, ПараметрыШаблона));
ТекстовыйДокумент.Показать();
#КонецЕсли
КонецПроцедуры
&НаКлиенте
@@ -2281,9 +2292,11 @@
&НаКлиенте
Процедура ИзменитьРасписаниеВДиалоге()
#Если НЕ МобильныйКлиент Тогда
Обработчик = Новый ОписаниеОповещения("ПослеИзмененияРасписания", ЭтотОбъект);
ДиалогРасписания = Новый ДиалогРасписанияРегламентногоЗадания(Расписание);
ДиалогРасписания.Показать(Обработчик);
#КонецЕсли
КонецПроцедуры
&НаКлиенте
SSL/src/CommonAttributes/ОбластьДанныхОсновныеДанные/ОбластьДанныхОсновныеДанные.mdo
+4
View File
@@ -550,6 +550,10 @@
<metadata>Constant.СписокЗапрещенныхРасширений</metadata>
<use>DontUse</use>
</content>
<content>
<metadata>InformationRegister.СвязиАдресныхОбъектов</metadata>
<use>DontUse</use>
</content>
<content>
<metadata>InformationRegister.УдалитьЗамерыВремени</metadata>
<use>DontUse</use>
SSL/src/CommonForms/ГруппыПользователей/Module.bsl
+11 -6
View File
@@ -173,14 +173,12 @@
Иначе
Если УведомлениеПользователя.ПолныйТекстСообщения <> Неопределено Тогда
Отчет = Новый ТекстовыйДокумент;
Отчет.ДобавитьСтроку(УведомлениеПользователя.ПолныйТекстСообщения);
ТекстВопроса = УведомлениеПользователя.Сообщение;
КнопкиВопроса = Новый СписокЗначений;
КнопкиВопроса.Добавить("Ок", НСтр("ru='ОК'"));
КнопкиВопроса.Добавить("ПоказатьОтчет", НСтр("ru='Показать отчет'"));
Оповещение = Новый ОписаниеОповещения("ЗаписатьИЗакрытьОбработкаВопроса", ЭтотОбъект, Отчет);
Оповещение = Новый ОписаниеОповещения("ЗаписатьИЗакрытьОбработкаВопроса",
ЭтотОбъект, УведомлениеПользователя.ПолныйТекстСообщения);
ПоказатьВопрос(Оповещение, ТекстВопроса, КнопкиВопроса,, КнопкиВопроса[0].Значение);
Иначе
Оповещение = Новый ОписаниеОповещения("ЗаписатьИЗакрытьОбработкаПредупреждения", ЭтотОбъект);
@@ -532,13 +530,20 @@
КонецПроцедуры
&НаКлиенте
Процедура ЗаписатьИЗакрытьОбработкаВопроса(Ответ, Отчет) Экспорт
Процедура ЗаписатьИЗакрытьОбработкаВопроса(Ответ, ПолныйТекстСообщения) Экспорт
Если Ответ = "Ок" Тогда
Модифицированность = Ложь;
ЗаписатьИЗакрытьЗавершение();
Иначе
Отчет.Показать(НСтр("ru = 'Пользователи, не включенные в группы'"));
ЗаголовокСообщения = НСтр("ru = 'Пользователи, не включенные в группы'");
#Если МобильныйКлиент Тогда
ПоказатьПредупреждение(, ЗаголовокСообщения + Символы.ПС + ПолныйТекстСообщения);
#Иначе
Отчет = Новый ТекстовыйДокумент;
Отчет.ДобавитьСтроку(ПолныйТекстСообщения);
Отчет.Показать(ЗаголовокСообщения);
#КонецЕсли
КонецЕсли;
КонецПроцедуры
SSL/src/CommonForms/ФормаОтчета/Module.bsl
+3
View File
@@ -637,10 +637,13 @@
Процедура НастройкиПоУмолчанию(Команда)
ПараметрыЗаполнения = Новый Структура;
ПараметрыЗаполнения.Вставить("ИмяСобытия", "НастройкиПоУмолчанию");
Если ВариантМодифицирован Тогда
ПараметрыЗаполнения.Вставить("СброситьНастройкиВарианта", Истина);
ПараметрыЗаполнения.Вставить("ВариантМодифицирован", Ложь);
КонецЕсли;
ПараметрыЗаполнения.Вставить("СброситьПользовательскиеНастройки", Истина);
ПараметрыЗаполнения.Вставить("ПользовательскиеНастройкиМодифицированы", Истина);
ОбновитьЭлементыФормыНастроек(ПараметрыЗаполнения);
SSL/src/CommonModules/АдресныйКлассификаторСлужебный/Module.bsl
+285 -55
View File
@@ -240,6 +240,10 @@
Процедура УстановитьМуниципальныеСведения(Адрес, ОКТМО) Экспорт
Если Не ЭтоГородФедеральногоЗначения(Адрес) Тогда
Возврат;
КонецЕсли;
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
@@ -469,6 +473,7 @@
Сведения = Новый Структура();
Сведения.Вставить("Идентификатор", СведенияОбАдресе.Идентификатор);
Сведения.Вставить("Родитель", Родитель);
Сведения.Вставить("Представление", СведенияОбАдресе.Представление);
Сведения.Вставить("Отказ", Ложь);
@@ -1163,12 +1168,15 @@
КонецЕсли;
// Получаем код КЛАДР из веб-сервиса.
// Получаем коды из веб-сервиса.
Если ЗагруженныеАдресныеСведения["КлассификаторДоступен"] Или Источник = "Сервис1С" Тогда
Если ЗначениеЗаполнено(ИдентификаторАдресногоОбъекта) Тогда
ИдентификаторОбъекта = ?(ЗначениеЗаполнено(Адрес.houseId), Адрес.houseId, ИдентификаторАдресногоОбъекта);
Если ЗначениеЗаполнено(ИдентификаторОбъекта) Тогда
ТекстGETЗапроса = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку("selectByCode?code=%1&codeType=ID",
Строка(ИдентификаторАдресногоОбъекта));
Строка(ИдентификаторОбъекта));
РезультатВебСервис = ВыполнитьЗапросЧерезВебСервис(ТекстGETЗапроса);
@@ -1181,7 +1189,8 @@
КонецЕсли;
Результат.КодыАдреса.КодКЛАДР = Сведения.codeKLADR;
Результат.КодыАдреса.Идентификатор = Сведения.Id;
Результат.КодыАдреса.Идентификатор = ИдентификаторАдресногоОбъекта(Сведения, Адрес.addressType);
Результат.КодыАдреса.ИдентификаторДома = ?(ЗначениеЗаполнено(Сведения.houseId), Сведения.houseId, "");
Результат.КодыАдреса.ОКАТО = Сведения.okato;
Результат.КодыАдреса.ОКТМО = Сведения.oktmo;
Результат.КодыАдреса.КодИФНСФЛ = Сведения.ifnsFlCode;
@@ -1624,6 +1633,20 @@
#Область СлужебныеПроцедурыИФункции
Функция ИдентификаторАдресногоОбъекта(Адрес, Знач ТипАдреса)
Идентификатор = "";
ИменаУровнейАдреса = ИменаУровнейАдреса(ТипАдреса, Истина);
Для каждого УровеньАдреса Из ИменаУровнейАдреса Цикл
Если ЗначениеЗаполнено(Адрес[УровеньАдреса + "Id"]) Тогда
Идентификатор = Адрес[УровеньАдреса + "Id"];
КонецЕсли;
КонецЦикла;
Возврат Идентификатор;
КонецФункции
// Возвращает настройку текущего источника данных адресов.
//
// Возвращаемое значение:
@@ -2125,25 +2148,40 @@
|ИЗ
| РегистрСведений.АдресныеОбъекты КАК АдресныеОбъектыУровень0
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.АдресныеОбъекты КАК АдресныеОбъектыУровень1
| ПО (АдресныеОбъектыУровень0.Идентификатор = АдресныеОбъектыУровень1.РодительскийИдентификатор)
| И (АдресныеОбъектыУровень1.Наименование = &Наименование1)
| И (АдресныеОбъектыУровень1.Сокращение = &Сокращение1)
| ПО АдресныеОбъектыУровень1.Наименование = &Наименование1
| И АдресныеОбъектыУровень1.Сокращение = &Сокращение1
| И (АдресныеОбъектыУровень0.Идентификатор = АдресныеОбъектыУровень1.РодительскийИдентификатор
| ИЛИ ИСТИНА В (ВЫБРАТЬ ПЕРВЫЕ 1 ИСТИНА ИЗ РегистрСведений.СвязиАдресныхОбъектов КАК СвязанныеАдресныеОбъектыУровень1
| ГДЕ (АдресныеОбъектыУровень1.Идентификатор = СвязанныеАдресныеОбъектыУровень1.Идентификатор) И
| (СвязанныеАдресныеОбъектыУровень1.МуниципальныйРодительскийИдентификатор = АдресныеОбъектыУровень0.Идентификатор)))
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.АдресныеОбъекты КАК АдресныеОбъектыУровень2
| ПО (АдресныеОбъектыУровень1.Идентификатор = АдресныеОбъектыУровень2.РодительскийИдентификатор)
| И (АдресныеОбъектыУровень2.Наименование = &Наименование2)
| И (АдресныеОбъектыУровень2.Сокращение = &Сокращение2)
| ПО АдресныеОбъектыУровень2.Наименование = &Наименование2
| И АдресныеОбъектыУровень2.Сокращение = &Сокращение2
| И (АдресныеОбъектыУровень1.Идентификатор = АдресныеОбъектыУровень2.РодительскийИдентификатор
| ИЛИ ИСТИНА В (ВЫБРАТЬ ПЕРВЫЕ 1 ИСТИНА ИЗ РегистрСведений.СвязиАдресныхОбъектов КАК СвязанныеАдресныеОбъектыУровень2
| ГДЕ (АдресныеОбъектыУровень2.Идентификатор = СвязанныеАдресныеОбъектыУровень2.Идентификатор) И
| (СвязанныеАдресныеОбъектыУровень2.МуниципальныйРодительскийИдентификатор = АдресныеОбъектыУровень1.Идентификатор)))
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.АдресныеОбъекты КАК АдресныеОбъектыУровень3
| ПО (АдресныеОбъектыУровень2.Идентификатор = АдресныеОбъектыУровень3.РодительскийИдентификатор)
| И (АдресныеОбъектыУровень3.Наименование = &Наименование3)
| И (АдресныеОбъектыУровень3.Сокращение = &Сокращение3)
| ПО АдресныеОбъектыУровень3.Наименование = &Наименование3
| И АдресныеОбъектыУровень3.Сокращение = &Сокращение3
| И (АдресныеОбъектыУровень2.Идентификатор = АдресныеОбъектыУровень3.РодительскийИдентификатор
| ИЛИ ИСТИНА В (ВЫБРАТЬ ПЕРВЫЕ 1 ИСТИНА ИЗ РегистрСведений.СвязиАдресныхОбъектов КАК СвязанныеАдресныеОбъектыУровень3
| ГДЕ (АдресныеОбъектыУровень3.Идентификатор = СвязанныеАдресныеОбъектыУровень3.Идентификатор) И
| (СвязанныеАдресныеОбъектыУровень3.МуниципальныйРодительскийИдентификатор = АдресныеОбъектыУровень2.Идентификатор)))
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.АдресныеОбъекты КАК АдресныеОбъектыУровень4
| ПО (АдресныеОбъектыУровень3.Идентификатор = АдресныеОбъектыУровень4.РодительскийИдентификатор)
| И (АдресныеОбъектыУровень4.Наименование = &Наименование4)
| И (АдресныеОбъектыУровень4.Сокращение = &Сокращение4)
| ПО АдресныеОбъектыУровень4.Наименование = &Наименование4
| И АдресныеОбъектыУровень4.Сокращение = &Сокращение4
| И (АдресныеОбъектыУровень3.Идентификатор = АдресныеОбъектыУровень4.РодительскийИдентификатор
| ИЛИ ИСТИНА В (ВЫБРАТЬ ПЕРВЫЕ 1 ИСТИНА ИЗ РегистрСведений.СвязиАдресныхОбъектов КАК СвязанныеАдресныеОбъектыУровень4
| ГДЕ (АдресныеОбъектыУровень4.Идентификатор = СвязанныеАдресныеОбъектыУровень4.Идентификатор) И
| (СвязанныеАдресныеОбъектыУровень4.МуниципальныйРодительскийИдентификатор = АдресныеОбъектыУровень3.Идентификатор)))
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.АдресныеОбъекты КАК АдресныеОбъектыУровень5
| ПО (АдресныеОбъектыУровень4.Идентификатор = АдресныеОбъектыУровень5.РодительскийИдентификатор)
| И (АдресныеОбъектыУровень5.Наименование = &Наименование5)
| И (АдресныеОбъектыУровень5.Сокращение = &Сокращение5)
| ПО АдресныеОбъектыУровень5.Наименование = &Наименование5
| И АдресныеОбъектыУровень5.Сокращение = &Сокращение5
| И (АдресныеОбъектыУровень4.Идентификатор = АдресныеОбъектыУровень5.РодительскийИдентификатор
| ИЛИ ИСТИНА В (ВЫБРАТЬ ПЕРВЫЕ 1 ИСТИНА ИЗ РегистрСведений.СвязиАдресныхОбъектов КАК СвязанныеАдресныеОбъектыУровень5
| ГДЕ (АдресныеОбъектыУровень5.Идентификатор = СвязанныеАдресныеОбъектыУровень5.Идентификатор) И
| (СвязанныеАдресныеОбъектыУровень5.МуниципальныйРодительскийИдентификатор = АдресныеОбъектыУровень4.Идентификатор)))
|ГДЕ
| АдресныеОбъектыУровень0.Наименование = &Наименование0
| И АдресныеОбъектыУровень0.Сокращение = &Сокращение0
@@ -2163,7 +2201,8 @@
| ПО ДомаЗданияСтроения.АдресныйОбъект = АдресныеОбъекты.Идентификатор
|";
Если ЭтоМуниципальныйАдрес(Адрес.AddressType) Тогда
ЭтоМуниципальныйАдрес = ЭтоМуниципальныйАдрес(Адрес.AddressType);
Если ЭтоМуниципальныйАдрес Тогда
Запрос.Текст = СтрЗаменить(Запрос.Текст, ".РодительскийИдентификатор", ".МуниципальныйРодительскийИдентификатор");
КонецЕсли;
@@ -2174,6 +2213,13 @@
Для каждого УровеньАдреса Из ИменаУровнейАдреса Цикл
Если Не ЭтоМуниципальныйАдрес
И СтрСравнить(УровеньАдреса, "Locality") = 0
И СтрСравнить(Адрес.city, Адрес.locality) = 0
И СтрСравнить(Адрес.cityType, Адрес.localityType) = 0 Тогда
Продолжить;
КонецЕсли;
Если ЗначениеЗаполнено(Адрес[УровеньАдреса]) Тогда
Запрос.УстановитьПараметр("Наименование" + Строка(Счетчик), Адрес[УровеньАдреса]);
@@ -2418,18 +2464,39 @@
| РегистрСведений.АдресныеОбъекты КАК АдресныеОбъектыУровень0
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.АдресныеОбъекты КАК АдресныеОбъектыУровень1
| ПО АдресныеОбъектыУровень0.МуниципальныйРодительскийИдентификатор = АдресныеОбъектыУровень1.Идентификатор
| ИЛИ ИСТИНА В (ВЫБРАТЬ ПЕРВЫЕ 1 ИСТИНА ИЗ
| РегистрСведений.СвязиАдресныхОбъектов КАК СвязанныеАдресныеОбъектыУровень1
| ГДЕ (АдресныеОбъектыУровень0.Идентификатор = СвязанныеАдресныеОбъектыУровень1.Идентификатор)
| И (СвязанныеАдресныеОбъектыУровень1.МуниципальныйРодительскийИдентификатор = АдресныеОбъектыУровень1.Идентификатор))
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.АдресныеОбъекты КАК АдресныеОбъектыУровень2
| ПО (АдресныеОбъектыУровень1.МуниципальныйРодительскийИдентификатор = АдресныеОбъектыУровень2.Идентификатор)
| ИЛИ ИСТИНА В (ВЫБРАТЬ ПЕРВЫЕ 1 ИСТИНА ИЗ
| РегистрСведений.СвязиАдресныхОбъектов КАК СвязанныеАдресныеОбъектыУровень2
| ГДЕ (АдресныеОбъектыУровень1.Идентификатор = СвязанныеАдресныеОбъектыУровень2.Идентификатор)
| И (СвязанныеАдресныеОбъектыУровень2.МуниципальныйРодительскийИдентификатор = АдресныеОбъектыУровень2.Идентификатор))
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.АдресныеОбъекты КАК АдресныеОбъектыУровень3
| ПО (АдресныеОбъектыУровень2.МуниципальныйРодительскийИдентификатор = АдресныеОбъектыУровень3.Идентификатор)
| ИЛИ ИСТИНА В (ВЫБРАТЬ ПЕРВЫЕ 1 ИСТИНА ИЗ
| РегистрСведений.СвязиАдресныхОбъектов КАК СвязанныеАдресныеОбъектыУровень3
| ГДЕ (АдресныеОбъектыУровень2.Идентификатор = СвязанныеАдресныеОбъектыУровень3.Идентификатор)
| И (СвязанныеАдресныеОбъектыУровень3.МуниципальныйРодительскийИдентификатор = АдресныеОбъектыУровень3.Идентификатор))
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.АдресныеОбъекты КАК АдресныеОбъектыУровень4
| ПО (АдресныеОбъектыУровень3.МуниципальныйРодительскийИдентификатор = АдресныеОбъектыУровень4.Идентификатор)
| ИЛИ ИСТИНА В (ВЫБРАТЬ ПЕРВЫЕ 1 ИСТИНА ИЗ
| РегистрСведений.СвязиАдресныхОбъектов КАК СвязанныеАдресныеОбъектыУровень4
| ГДЕ (АдресныеОбъектыУровень3.Идентификатор = СвязанныеАдресныеОбъектыУровень4.Идентификатор)
| И (СвязанныеАдресныеОбъектыУровень4.МуниципальныйРодительскийИдентификатор = АдресныеОбъектыУровень4.Идентификатор))
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.АдресныеОбъекты КАК АдресныеОбъектыУровень5
| ПО (АдресныеОбъектыУровень4.МуниципальныйРодительскийИдентификатор = АдресныеОбъектыУровень5.Идентификатор)
| ИЛИ ИСТИНА В (ВЫБРАТЬ ПЕРВЫЕ 1 ИСТИНА ИЗ
| РегистрСведений.СвязиАдресныхОбъектов КАК СвязанныеАдресныеОбъектыУровень5
| ГДЕ (АдресныеОбъектыУровень4.Идентификатор = СвязанныеАдресныеОбъектыУровень5.Идентификатор)
| И (СвязанныеАдресныеОбъектыУровень5.МуниципальныйРодительскийИдентификатор = АдресныеОбъектыУровень5.Идентификатор))
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ДополнительныеАдресныеСведения КАК ДополнительныеСведения
| ПО АдресныеОбъектыУровень0.ДополнительныеАдресныеСведения = ДополнительныеСведения.Идентификатор
|ГДЕ
| АдресныеОбъектыУровень0.Идентификатор = &Идентификатор
| АдресныеОбъектыУровень0.Идентификатор = &Идентификатор
| &ДополнительныйОтбор
|
| ОБЪЕДИНИТЬ ВСЕ
|
@@ -2509,7 +2576,16 @@
Результат = ОписаниеНовойКонтактнойИнформации();
Запрос = Новый Запрос(ТекстЗапроса);
Запрос = Новый Запрос;
ДополнительныйОтбор = "";
Если Значение.Свойство("Родитель") Тогда
ДополнительныйОтбор = "И АдресныеОбъектыУровень1.Идентификатор = &ИдентификаторРодитель";
Запрос.УстановитьПараметр("ИдентификаторРодитель", Новый УникальныйИдентификатор(Значение.Родитель));
КонецЕсли;
ТекстЗапроса = СтрЗаменить(ТекстЗапроса, "&ДополнительныйОтбор", ДополнительныйОтбор);
Запрос.Текст = ТекстЗапроса;
Запрос.УстановитьПараметр("ПредставлениеМуниципальный", МуниципальныйАдрес());
Запрос.УстановитьПараметр("ПредставлениеАдминистративный", АдминистративноТерриториальныйАдрес());
Запрос.УстановитьПараметр("Идентификатор", Новый УникальныйИдентификатор(Значение.Идентификатор));
@@ -2544,15 +2620,18 @@
СловарьИменПолей = СловарьКлючейПолейАдресВСоответствииСУровнем();
Индекс = 5;
Пока Индекс >= 0 Цикл
ЗаполнитьПоляВСоответствииСУровнемАдреса(Результат, Выборка[1], Индекс, СловарьИменПолей);
Индекс = Индекс - 1;
КонецЦикла;
Если Выборка.Количество() > 1 Тогда
Индекс = 5;
Пока Индекс >= 0 Цикл
ЗаполнитьПоляВСоответствииСУровнемАдреса(Результат, Выборка[1], Индекс, СловарьИменПолей, ЭтоМуниципальныйАдрес(Выборка[1].ТипАдреса));
Индекс = Индекс - 1;
КонецЦикла;
КонецЕсли;
// Муниципальный
Индекс = 5;
Пока Индекс >= 0 Цикл
ЗаполнитьПоляВСоответствииСУровнемАдреса(Результат, Выборка[0], Индекс, СловарьИменПолей);
ЗаполнитьПоляВСоответствииСУровнемАдреса(Результат, Выборка[0], Индекс, СловарьИменПолей, ЭтоМуниципальныйАдрес(Выборка[0].ТипАдреса));
Индекс = Индекс - 1;
КонецЦикла;
@@ -3287,6 +3366,14 @@
Запрос.Текст = СтрЗаменить(Запрос.Текст, "&ОтборПоИдентификатору", "");
КонецЕсли;
Если ЭтоМуниципальныйАдрес(ТипАдреса) Тогда
Запрос.Текст = СтрЗаменить(Запрос.Текст, "РодительскийИдентификатор", "МуниципальныйРодительскийИдентификатор");
Если Уровень = 7 Или Уровень = 6 Тогда
ДополнитьТекстЗапроса(Запрос.Текст);
КонецЕсли;
КонецЕсли;
Если ТипЗнч(ДополнительныеПараметры) = Тип("Структура")
И ДополнительныеПараметры.Свойство("СтрокаПоиска")
И ЗначениеЗаполнено(ДополнительныеПараметры.СтрокаПоиска) Тогда
@@ -3300,9 +3387,6 @@
КонецЕсли;
Если ЭтоМуниципальныйАдрес(ТипАдреса) Тогда
Запрос.Текст = СтрЗаменить(Запрос.Текст, "РодительскийИдентификатор", "МуниципальныйРодительскийИдентификатор");
КонецЕсли;
Если Уровень = 31 Или Уровень = 41 Тогда
@@ -3338,6 +3422,34 @@
КонецПроцедуры
Процедура ДополнитьТекстЗапроса(ТекстЗапроса)
ТекстЗапроса = "
|ВЫБРАТЬ
| АдресныеОбъекты.Наименование + "" "" + АдресныеОбъекты.Сокращение КАК Представление,
| АдресныеОбъекты.Идентификатор КАК Идентификатор,
| АдресныеОбъекты.ДополнительныеАдресныеСведения КАК ДополнительныеАдресныеСведения,
| ДополнительныеСведения.ПочтовыйИндекс КАК ПочтовыйИндекс,
| ИСТИНА КАК Муниципальный,
| ЗагруженныеВерсииАдресныхСведений.ДатаВерсии > ДАТАВРЕМЯ(1, 1, 1, 0, 0, 0) КАК РегионЗагружен
|ИЗ
| РегистрСведений.СвязиАдресныхОбъектов КАК СвязиАдресныхОбъектов
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.АдресныеОбъекты КАК АдресныеОбъекты
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ДополнительныеАдресныеСведения КАК ДополнительныеСведения
| ПО АдресныеОбъекты.ДополнительныеАдресныеСведения = ДополнительныеСведения.Идентификатор
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ЗагруженныеВерсииАдресныхСведений КАК ЗагруженныеВерсииАдресныхСведений
| ПО АдресныеОбъекты.КодСубъектаРФ = ЗагруженныеВерсииАдресныхСведений.КодСубъектаРФ
| ПО СвязиАдресныхОбъектов.Идентификатор = АдресныеОбъекты.Идентификатор
|ГДЕ
| СвязиАдресныхОбъектов.МуниципальныйРодительскийИдентификатор = &Идентификатор
| &ОтборПоСтроке
|
|ОБЪЕДИНИТЬ ВСЕ
|
|" + ТекстЗапроса ;
КонецПроцедуры
// Конструктор таблицы - результата выбора.
//
Функция ТаблицаДанныхДляИнтерактивногоВыбора()
@@ -3469,6 +3581,7 @@
ЗагрузитьАдресныеОбъекты(СубъектРФ, КаталогФайлов, ЗагружатьОднимНабором);
ЗагрузитьДомаЗданияСтроения(СубъектРФ, КаталогФайлов, ЗагружатьОднимНабором);
ЗагрузитьЗемельныеУчастки(СубъектРФ, КаталогФайлов, ЗагружатьОднимНабором);
ЗагрузитьСвязиАдресныхОбъектов(СубъектРФ, КаталогФайлов, ЗагружатьОднимНабором);
Если ПараметрыЗагрузки.ЗагружатьИсториюАдресов Тогда
ЗагрузитьИсториюАдресныхОбъектов(СубъектРФ, КаталогФайлов, ЗагружатьОднимНабором);
@@ -4075,28 +4188,44 @@
| КОНЕЦ
| КОНЕЦ КАК Идентификатор
|ПОМЕСТИТЬ АдресныеОбъекты
|ИЗ
| РегистрСведений.АдресныеОбъекты КАК АдресныеОбъектыУровень0
| ИЗ
| РегистрСведений.АдресныеОбъекты КАК АдресныеОбъектыУровень0
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.АдресныеОбъекты КАК АдресныеОбъектыУровень1
| ПО (АдресныеОбъектыУровень0.Идентификатор = АдресныеОбъектыУровень1.РодительскийИдентификатор)
| И (АдресныеОбъектыУровень1.Наименование = &Наименование1)
| И (АдресныеОбъектыУровень1.Сокращение = &Сокращение1)
| ПО АдресныеОбъектыУровень1.Наименование = &Наименование1
| И АдресныеОбъектыУровень1.Сокращение = &Сокращение1
| И (АдресныеОбъектыУровень0.Идентификатор = АдресныеОбъектыУровень1.РодительскийИдентификатор
| ИЛИ ИСТИНА В (ВЫБРАТЬ ПЕРВЫЕ 1 ИСТИНА ИЗ РегистрСведений.СвязиАдресныхОбъектов КАК СвязанныеАдресныеОбъектыУровень1
| ГДЕ (АдресныеОбъектыУровень1.Идентификатор = СвязанныеАдресныеОбъектыУровень1.Идентификатор) И
| (СвязанныеАдресныеОбъектыУровень1.МуниципальныйРодительскийИдентификатор = АдресныеОбъектыУровень0.Идентификатор)))
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.АдресныеОбъекты КАК АдресныеОбъектыУровень2
| ПО (АдресныеОбъектыУровень1.Идентификатор = АдресныеОбъектыУровень2.РодительскийИдентификатор)
| И (АдресныеОбъектыУровень2.Наименование = &Наименование2)
| И (АдресныеОбъектыУровень2.Сокращение = &Сокращение2)
| ПО АдресныеОбъектыУровень2.Наименование = &Наименование2
| И АдресныеОбъектыУровень2.Сокращение = &Сокращение2
| И (АдресныеОбъектыУровень1.Идентификатор = АдресныеОбъектыУровень2.РодительскийИдентификатор
| ИЛИ ИСТИНА В (ВЫБРАТЬ ПЕРВЫЕ 1 ИСТИНА ИЗ РегистрСведений.СвязиАдресныхОбъектов КАК СвязанныеАдресныеОбъектыУровень2
| ГДЕ (АдресныеОбъектыУровень2.Идентификатор = СвязанныеАдресныеОбъектыУровень2.Идентификатор) И
| (СвязанныеАдресныеОбъектыУровень2.МуниципальныйРодительскийИдентификатор = АдресныеОбъектыУровень1.Идентификатор)))
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.АдресныеОбъекты КАК АдресныеОбъектыУровень3
| ПО (АдресныеОбъектыУровень2.Идентификатор = АдресныеОбъектыУровень3.РодительскийИдентификатор)
| И (АдресныеОбъектыУровень3.Наименование = &Наименование3)
| И (АдресныеОбъектыУровень3.Сокращение = &Сокращение3)
| ПО АдресныеОбъектыУровень3.Наименование = &Наименование3
| И АдресныеОбъектыУровень3.Сокращение = &Сокращение3
| И (АдресныеОбъектыУровень2.Идентификатор = АдресныеОбъектыУровень3.РодительскийИдентификатор
| ИЛИ ИСТИНА В (ВЫБРАТЬ ПЕРВЫЕ 1 ИСТИНА ИЗ РегистрСведений.СвязиАдресныхОбъектов КАК СвязанныеАдресныеОбъектыУровень3
| ГДЕ (АдресныеОбъектыУровень3.Идентификатор = СвязанныеАдресныеОбъектыУровень3.Идентификатор) И
| (СвязанныеАдресныеОбъектыУровень3.МуниципальныйРодительскийИдентификатор = АдресныеОбъектыУровень2.Идентификатор)))
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.АдресныеОбъекты КАК АдресныеОбъектыУровень4
| ПО (АдресныеОбъектыУровень3.Идентификатор = АдресныеОбъектыУровень4.РодительскийИдентификатор)
| И (АдресныеОбъектыУровень4.Наименование = &Наименование4)
| И (АдресныеОбъектыУровень4.Сокращение = &Сокращение4)
| ПО АдресныеОбъектыУровень4.Наименование = &Наименование4
| И АдресныеОбъектыУровень4.Сокращение = &Сокращение4
| И (АдресныеОбъектыУровень3.Идентификатор = АдресныеОбъектыУровень4.РодительскийИдентификатор
| ИЛИ ИСТИНА В (ВЫБРАТЬ ПЕРВЫЕ 1 ИСТИНА ИЗ РегистрСведений.СвязиАдресныхОбъектов КАК СвязанныеАдресныеОбъектыУровень4
| ГДЕ (АдресныеОбъектыУровень4.Идентификатор = СвязанныеАдресныеОбъектыУровень4.Идентификатор) И
| (СвязанныеАдресныеОбъектыУровень4.МуниципальныйРодительскийИдентификатор = АдресныеОбъектыУровень3.Идентификатор)))
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.АдресныеОбъекты КАК АдресныеОбъектыУровень5
| ПО (АдресныеОбъектыУровень4.Идентификатор = АдресныеОбъектыУровень5.РодительскийИдентификатор)
| И (АдресныеОбъектыУровень5.Наименование = &Наименование5)
| И (АдресныеОбъектыУровень5.Сокращение = &Сокращение5)
| ПО АдресныеОбъектыУровень5.Наименование = &Наименование5
| И АдресныеОбъектыУровень5.Сокращение = &Сокращение5
| И (АдресныеОбъектыУровень4.Идентификатор = АдресныеОбъектыУровень5.РодительскийИдентификатор
| ИЛИ ИСТИНА В (ВЫБРАТЬ ПЕРВЫЕ 1 ИСТИНА ИЗ РегистрСведений.СвязиАдресныхОбъектов КАК СвязанныеАдресныеОбъектыУровень5
| ГДЕ (АдресныеОбъектыУровень5.Идентификатор = СвязанныеАдресныеОбъектыУровень5.Идентификатор) И
| (СвязанныеАдресныеОбъектыУровень5.МуниципальныйРодительскийИдентификатор = АдресныеОбъектыУровень4.Идентификатор)))
|
|ГДЕ
| АдресныеОбъектыУровень0.Наименование = &Наименование0
| И АдресныеОбъектыУровень0.Сокращение = &Сокращение0
@@ -4160,8 +4289,17 @@
Для каждого УровеньАдреса Из ИменаУровнейАдреса Цикл
Если Адрес.Свойство(УровеньАдреса) И ЗначениеЗаполнено(Адрес[УровеньАдреса]) Тогда
Запрос.УстановитьПараметр("Наименование" + Строка(Счетчик), Адрес[УровеньАдреса]);
Запрос.УстановитьПараметр("Сокращение" + Строка(Счетчик), Адрес[УровеньАдреса + "Type"]);
Наименование = Адрес[УровеньАдреса];
Сокращение = Адрес[УровеньАдреса + "Type"];
Если ЭтоАдминистративноТерриториальныйАдрес(Адрес.AddressType)
И СтрСравнить(УровеньАдреса, "locality") = 0
И СтрСравнить(Наименование, Адрес["city"]) = 0
И СтрСравнить(Сокращение, Адрес["cityType"]) = 0 Тогда
Продолжить;
КонецЕсли;
Запрос.УстановитьПараметр("Наименование" + Строка(Счетчик), Наименование);
Запрос.УстановитьПараметр("Сокращение" + Строка(Счетчик), Сокращение);
КакиеУровниПроверять.Вставить(УровеньАдреса, Счетчик);
Счетчик = Счетчик + 1;
@@ -4179,6 +4317,7 @@
Дома = РезультатЗапроса[1];
ДополнительныеСведения = РезультатЗапроса[3];
СписокКорректныхАдресов = Новый Массив;
Для каждого АдресСтрока Из Адреса.Выгрузить() Цикл
@@ -4612,12 +4751,15 @@
КонецФункции
Процедура ЗаполнитьПоляВСоответствииСУровнемАдреса(Адрес, Выборка, Суффикс, СловарьИменПолей)
Процедура ЗаполнитьПоляВСоответствииСУровнемАдреса(Адрес, Выборка, Суффикс, СловарьИменПолей, Муниципальный = Ложь)
Если ЗначениеЗаполнено(Выборка["НаименованиеУровень" + Суффикс]) Тогда
Идентификатор = Выборка["ИдентификаторУровень" + Суффикс];
ИмяУровня = СловарьИменПолей[Выборка["Уровень" + Суффикс]];
Если Муниципальный И СтрСравнить(ИмяУровня,"City") = 0 Тогда
ИмяУровня = "Locality";
КонецЕсли;
Адрес[ИмяУровня] = Выборка["НаименованиеУровень" + Суффикс];
Адрес[ИмяУровня + "Type"] = Выборка["СокращениеУровень" + Суффикс];
@@ -4912,7 +5054,11 @@
КонецФункции
Функция ЭтоМуниципальныйАдрес(ТипАдреса)
Возврат СтрСравнить(ТипАдреса, "Муниципальный") = 0;
Возврат СтрСравнить(ТипАдреса, МуниципальныйАдрес()) = 0;
КонецФункции
Функция ЭтоАдминистративноТерриториальныйАдрес(ТипАдреса)
Возврат СтрСравнить(ТипАдреса, АдминистративноТерриториальныйАдрес()) = 0;
КонецФункции
Функция ИменаУровнейАдреса(ТипАдреса, ВключатьУлицу)
@@ -5384,6 +5530,8 @@
ОчиститьАдресныеОбъекты(СубъектРФ);
ОчиститьДомаЗданияСтроения(СубъектРФ);
ОчиститьИсториюАдресныхОбъектов(СубъектРФ);
ОчиститьЗемельныеУчастки(СубъектРФ);
ОчиститьСвязиАдресныхОбъектов(СубъектРФ);
ОчиститьПричиныИзмененияАдреса(СубъектРФ);
ОчиститьДополнительныеСведения(СубъектРФ);
ОчиститьАдресныеОриентиры(СубъектРФ);
@@ -5754,7 +5902,7 @@
Пока ТекущаяЗапись.Прочитать() Цикл
Если ТекущаяЗапись.ТипУзла <> ТипУзлаXML.НачалоЭлемента Тогда
Если ТекущаяЗапись.ТипУзла <> ТипУзлаXML.НачалоЭлемента Или ПустаяСтрока(ТекущаяЗапись.ЗначениеАтрибута("AOGUID")) Тогда
Продолжить;
КонецЕсли;
@@ -5852,6 +6000,68 @@
КонецПроцедуры
Процедура ЗагрузитьСвязиАдресныхОбъектов(КодСубъектаРФ, КаталогФайлов, ЗагружатьОднимНабором)
Сжатие = Новый СжатиеДанных(9);
ФайлЗагрузки = ФайлЗагрузкиСубъектаРФ(КодСубъектаРФ, КаталогФайлов, "LINK", "Links");
Если ФайлЗагрузки = Неопределено Тогда
Возврат;
КонецЕсли;
ТекущаяЗапись = ФайлЗагрузки.ФайлЧтения;
Набор = РегистрыСведений.СвязиАдресныхОбъектов.СоздатьНаборЗаписей();
Набор.Отбор.КодСубъектаРФ.Установить(КодСубъектаРФ);
Замещать = Истина;
КоличествоЗаписейВНаборе = 0;
РазмерПорции = МаксимальныйРазмерНабораЗаписей();
Попытка
Пока ТекущаяЗапись.Прочитать() Цикл
Если ТекущаяЗапись.ТипУзла <> ТипУзлаXML.НачалоЭлемента Тогда
Продолжить;
КонецЕсли;
Запись = Набор.Добавить();
Запись.КодСубъектаРФ = КодСубъектаРФ;
Запись.Идентификатор = УникальныйИдентификаторИзСтроки64(ТекущаяЗапись.ЗначениеАтрибута("AOGUID"));
Запись.МуниципальныйРодительскийИдентификатор = УникальныйИдентификаторИзСтроки64(ТекущаяЗапись.ЗначениеАтрибута("MUNPARENTGUID"));
Если ЗагружатьОднимНабором Тогда
Продолжить;
КонецЕсли;
Если КоличествоЗаписейВНаборе < РазмерПорции Тогда
КоличествоЗаписейВНаборе = КоличествоЗаписейВНаборе + 1;
Продолжить;
КонецЕсли;
ОбновлениеИнформационнойБазы.ЗаписатьНаборЗаписей(Набор, Замещать);
Замещать = Ложь;
КоличествоЗаписейВНаборе = 0;
Набор = РегистрыСведений.СвязиАдресныхОбъектов.СоздатьНаборЗаписей();
Набор.Отбор.КодСубъектаРФ.Установить(КодСубъектаРФ);
КонецЦикла;
ОбновлениеИнформационнойБазы.ЗаписатьНаборЗаписей(Набор, Замещать);
ЗакрытьФайлЗагрузкиСубъектаРФ(ФайлЗагрузки);
Исключение
ЗакрытьФайлЗагрузкиСубъектаРФ(ФайлЗагрузки);
ВызватьИсключение;
КонецПопытки;
КонецПроцедуры
Процедура ЗагрузитьДополнительныеСведения(КодСубъектаРФ, КаталогФайлов, ЗагружатьИсториюИзменений)
Набор = РегистрыСведений.ДополнительныеАдресныеСведения.СоздатьНаборЗаписей();
@@ -6097,6 +6307,22 @@
КонецПроцедуры
Процедура ОчиститьЗемельныеУчастки(КодСубъектаРФ)
Набор = РегистрыСведений.ЗемельныеУчастки.СоздатьНаборЗаписей();
Набор.Отбор.КодСубъектаРФ.Установить(КодСубъектаРФ);
ОбновлениеИнформационнойБазы.ЗаписатьДанные(Набор);
КонецПроцедуры
Процедура ОчиститьСвязиАдресныхОбъектов(КодСубъектаРФ)
Набор = РегистрыСведений.СвязиАдресныхОбъектов.СоздатьНаборЗаписей();
Набор.Отбор.КодСубъектаРФ.Установить(КодСубъектаРФ);
ОбновлениеИнформационнойБазы.ЗаписатьДанные(Набор);
КонецПроцедуры
Процедура ОчиститьДополнительныеСведения(КодСубъектаРФ)
Набор = РегистрыСведений.ДополнительныеАдресныеСведения.СоздатьНаборЗаписей();
@@ -6209,6 +6435,10 @@
Результат.Вставить("ФайлЧтения", Новый ЧтениеFastInfoset);
ФайлЧтения = Результат.ФайлЧтения;
ПроверкаФайла = Новый Файл(Результат.ПолноеИмя);
Если Не ПроверкаФайла.Существует() Тогда
Возврат Неопределено;
КонецЕсли;
ФайлЧтения.ОткрытьФайл(Результат.ПолноеИмя);
// Встаем на первый узел с данными.
@@ -6366,7 +6596,7 @@
КонецЕсли;
КонецЦикла;
Результат.Вставить("ИдентификаторДома", Коды.ИдентификаторДома);
Результат.Вставить("ИдентификаторДома", ?(ЗначениеЗаполнено(Коды.ИдентификаторДома), Коды.ИдентификаторДома, ""));
Возврат Истина;
КонецЕсли;
@@ -7650,4 +7880,4 @@
#КонецОбласти
#КонецОбласти
#КонецОбласти
SSL/src/CommonModules/ДатыЗапретаИзмененияСлужебный/Module.bsl
+6 -1
View File
@@ -1564,7 +1564,12 @@
Для Каждого Строка Из Таблицы Цикл
ИсточникиТаблицы = Новый Структура;
Попытка
Если СтрНачинаетсяС(ВРег(Строка.Таблица), ВРег("Регистр")) Тогда
ВРегИмяТаблица = ВРег(Строка.Таблица);
Если СтрНачинаетсяС(ВРегИмяТаблица, ВРег("РегистрСведений"))
Или СтрНачинаетсяС(ВРегИмяТаблица, ВРег("РегистрНакопления"))
Или СтрНачинаетсяС(ВРегИмяТаблица, ВРег("РегистрБухгалтерии"))
Или СтрНачинаетсяС(ВРегИмяТаблица, ВРег("РегистрРасчета")) Тогда
ТипЭлемента = Тип(СтрЗаменить(Строка.Таблица, ".", "КлючЗаписи."));
ЭтоРегистр = Истина;
Иначе
SSL/src/CommonModules/ОбновлениеИнформационнойБазыБСП/Module.bsl
+1 -1
View File
@@ -41,7 +41,7 @@
Процедура ПриДобавленииПодсистемы(Описание) Экспорт
Описание.Имя = "СтандартныеПодсистемы";
Описание.Версия = "3.0.2.293";
Описание.Версия = "3.0.2.300";
Описание.ИдентификаторИнтернетПоддержки = "SSL";
Описание.РежимВыполненияОтложенныхОбработчиков = "Параллельно";
Описание.ПараллельноеОтложенноеОбновлениеСВерсии = "2.3.3.0";
SSL/src/CommonModules/ОбновлениеКонфигурацииКлиент/Module.bsl
+41 -39
View File
@@ -160,8 +160,10 @@
НСтр("ru = 'Папка с журналом обновления расположена %1'"), КаталогСкрипта),
,
Истина);
#Если Не ВебКлиент И НЕ МобильныйКлиент Тогда
ПрочитатьДанныеВЖурналРегистрации(РезультатОбновления, КаталогСкрипта);
#КонецЕсли
КонецЕсли;
КонецПроцедуры
@@ -471,6 +473,44 @@
КонецПроцедуры
Процедура ЗаписатьСобытияВЖурналРегистрации() Экспорт
СобытияДляЖурналаРегистрации = ПараметрыПриложения["СтандартныеПодсистемы.СообщенияДляЖурналаРегистрации"];
Если ТипЗнч(СобытияДляЖурналаРегистрации) <> Тип("СписокЗначений") Тогда
Возврат;
КонецЕсли;
Если СобытияДляЖурналаРегистрации.Количество() = 0 Тогда
Возврат;
КонецЕсли;
ЖурналРегистрацииВызовСервера.ЗаписатьСобытияВЖурналРегистрации(СобытияДляЖурналаРегистрации);
КонецПроцедуры
Функция ПоддерживаетсяПланировщикЗаданий()
// Планировщик заданий поддерживается начиная с версии 6.0 - Windows Vista.
СистемнаяИнформация = Новый СистемнаяИнформация();
ПозицияТочки = СтрНайти(СистемнаяИнформация.ВерсияОС, ".");
Если ПозицияТочки < 2 Тогда
Возврат Ложь;
КонецЕсли;
НомерВерсии = Сред(СистемнаяИнформация.ВерсияОС, ПозицияТочки - 2, 2);
ОписаниеТипаЧисло = Новый ОписаниеТипов("Число");
ВерсияВышеVista = ОписаниеТипаЧисло.ПривестиЗначение(НомерВерсии) >= 6;
Возврат ВерсияВышеVista;
КонецФункции
#Если Не ВебКлиент И НЕ МобильныйКлиент Тогда
Процедура ПрочитатьДанныеВЖурналРегистрации(РезультатОбновления, КаталогСкрипта)
РезультатОбновления = Неопределено;
@@ -548,44 +588,6 @@
КонецПроцедуры
Процедура ЗаписатьСобытияВЖурналРегистрации() Экспорт
СобытияДляЖурналаРегистрации = ПараметрыПриложения["СтандартныеПодсистемы.СообщенияДляЖурналаРегистрации"];
Если ТипЗнч(СобытияДляЖурналаРегистрации) <> Тип("СписокЗначений") Тогда
Возврат;
КонецЕсли;
Если СобытияДляЖурналаРегистрации.Количество() = 0 Тогда
Возврат;
КонецЕсли;
ЖурналРегистрацииВызовСервера.ЗаписатьСобытияВЖурналРегистрации(СобытияДляЖурналаРегистрации);
КонецПроцедуры
Функция ПоддерживаетсяПланировщикЗаданий()
// Планировщик заданий поддерживается начиная с версии 6.0 - Windows Vista.
СистемнаяИнформация = Новый СистемнаяИнформация();
ПозицияТочки = СтрНайти(СистемнаяИнформация.ВерсияОС, ".");
Если ПозицияТочки < 2 Тогда
Возврат Ложь;
КонецЕсли;
НомерВерсии = Сред(СистемнаяИнформация.ВерсияОС, ПозицияТочки - 2, 2);
ОписаниеТипаЧисло = Новый ОписаниеТипов("Число");
ВерсияВышеVista = ОписаниеТипаЧисло.ПривестиЗначение(НомерВерсии) >= 6;
Возврат ВерсияВышеVista;
КонецФункции
#Если Не ВебКлиент И НЕ МобильныйКлиент Тогда
Функция КодировкаФайловПрограммыОбновления()
// wscript.exe может работать только с файлами в кодировке UTF-16 LE.
SSL/src/CommonModules/РаботаСАдресами/Module.bsl
+1
View File
@@ -1826,6 +1826,7 @@
Если Параметры.КодыАдреса Тогда
Результат.ИдентификаторАдресногоОбъекта = ИдентификаторАдресногоОбъекта;
Результат.ИдентификаторДома = ?(ЗначениеЗаполнено(Адрес.houseId), Адрес.houseId, "");
КонецЕсли;
// Установка полных наименований типов
SSL/src/CommonModules/РаботаСАдресамиКлиентСервер/Module.bsl
+5
View File
@@ -468,6 +468,11 @@
Для каждого ИмяУровня Из ИменаУровнейАдреса(ТипАдреса, Истина) Цикл
Если Адрес.Свойство(ИмяУровня) И НЕ ПустаяСтрока(Адрес[ИмяУровня]) Тогда
Если ТипАдреса = АдминистративноТерриториальныйАдрес()
И СтрСравнить(ИмяУровня, "Locality") = 0
И СтрСравнить(СокрЛП(Адрес[ИмяУровня] + " " + Адрес[ИмяУровня + "Type"]), СокрЛП(Адрес["city"] + " " + Адрес["cityType"])) = 0 Тогда
Продолжить;
КонецЕсли;
Если НЕ ПредставлениеУровняБезСокращения(ИмяУровня) Тогда
СписокЗаполненныхУровней.Добавить(СокрЛП(Адрес[ИмяУровня] + " " + Адрес[ИмяУровня + "Type"]));
Иначе
SSL/src/CommonModules/РаботаСФайлами/Module.bsl
+1 -2
View File
@@ -396,9 +396,8 @@
//
Функция КОбъектуМожноПрисоединятьФайлы(ВладелецФайлов, ИмяСправочника = "") Экспорт
ЗаголовокОшибки = НСтр("ru = 'Ошибка определения возможности присоединения файла.'");
ИмяСправочника = РаботаСФайламиСлужебный.ИмяСправочникаХраненияФайлов(
ВладелецФайлов, ИмяСправочника, ЗаголовокОшибки);
ВладелецФайлов, ИмяСправочника);
СправочникПрисоединенныеФайлы = Метаданные.Справочники.Найти(ИмяСправочника);
SSL/src/CommonModules/СтандартныеПодсистемыСервер/Module.bsl
+46 -10
View File
@@ -2209,9 +2209,21 @@
// Обработчик события ПередЗаписью предопределенных элементов.
Процедура ЗапретитьПометкуУдаленияПредопределенныхЭлементовПередЗаписью(Источник, Отказ) Экспорт
Если Источник.ОбменДанными.Загрузка
Или Источник.ИмяПредопределенныхДанных = ""
Или Источник.ПометкаУдаления <> Истина Тогда
Если Источник.ОбменДанными.Загрузка Тогда
Возврат;
КонецЕсли;
Если Источник.ПометкаУдаления <> Истина Тогда
Возврат;
КонецЕсли;
// Для определения предопределенных в подсистемах Свойства и КонтактнаяИнформация
// зачитываются другие реквизиты.
Параметры = Новый Структура("ИмяПредопределенногоНабора, ИмяПредопределенногоВида", "", "");
ЗаполнитьЗначенияСвойств(Параметры, Источник);
Если Источник.ИмяПредопределенныхДанных = ""
И Параметры.ИмяПредопределенногоНабора = ""
И Параметры.ИмяПредопределенногоВида = "" Тогда
Возврат;
КонецЕсли;
@@ -2219,18 +2231,25 @@
ВызватьИсключение
НСтр("ru = 'Недопустимо создавать предопределенный элемент помеченный на удаление.'");
Иначе
СтарыеСвойства = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(
Источник.Ссылка, "ПометкаУдаления, ИмяПредопределенныхДанных");
ИмяРеквизита = "";
Если Параметры.ИмяПредопределенногоНабора <> "" Тогда
ИмяРеквизита = "ИмяПредопределенногоНабора";
ИначеЕсли Параметры.ИмяПредопределенногоВида <> "" Тогда
ИмяРеквизита = "ИмяПредопределенногоВида";
КонецЕсли;
Если СтарыеСвойства.ИмяПредопределенныхДанных <> ""
СтарыеСвойства = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(
Источник.Ссылка, "ПометкаУдаления, ИмяПредопределенныхДанных" + ?(ИмяРеквизита <> "", ", " + ИмяРеквизита, ""));
Если (СтарыеСвойства.ИмяПредопределенныхДанных <> "" Или ИмяРеквизита <> "" И СтарыеСвойства[ИмяРеквизита] <> "")
И СтарыеСвойства.ПометкаУдаления <> Истина Тогда
ВызватьИсключение СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
НСтр("ru = 'Недопустимо помечать на удаление предопределенный элемент:
|""%1"".'"),
Строка(Источник.Ссылка));
ИначеЕсли СтарыеСвойства.ИмяПредопределенныхДанных = ""
ИначеЕсли (ИмяРеквизита <> "" И Параметры[ИмяРеквизита] <> "" И СтарыеСвойства[ИмяРеквизита] = ""
Или СтарыеСвойства.ИмяПредопределенныхДанных = "")
И СтарыеСвойства.ПометкаУдаления = Истина Тогда
ВызватьИсключение СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
@@ -2245,8 +2264,18 @@
// Обработчик события ПередУдалением предопределенных элементов.
Процедура ЗапретитьУдалениеПредопределенныхЭлементовПередУдалением(Источник, Отказ) Экспорт
Если Источник.ОбменДанными.Загрузка
Или Источник.ИмяПредопределенныхДанных = "" Тогда
Если Источник.ОбменДанными.Загрузка Тогда
Возврат;
КонецЕсли;
// Для определения предопределенных в подсистемах Свойства и КонтактнаяИнформация
// зачитываются другие реквизиты.
Параметры = Новый Структура("ИмяПредопределенногоНабора, ИмяПредопределенногоВида", "", "");
ЗаполнитьЗначенияСвойств(Параметры, Источник);
Если Источник.ИмяПредопределенныхДанных = ""
И Параметры.ИмяПредопределенногоНабора = ""
И Параметры.ИмяПредопределенногоВида = "" Тогда
Возврат;
КонецЕсли;
@@ -2641,6 +2670,13 @@
КонецЕсли;
КонецЕсли;
ТекущийПользовательИБ = ПользователиИнформационнойБазы.ТекущийПользователь();
Если Не ТекущийПользовательИБ.АутентификацияСтандартная
И Не ТекущийПользовательИБ.АутентификацияОС
И Не ТекущийПользовательИБ.АутентификацияOpenID Тогда
ВызватьИсключение НСтр("ru = 'Вход в программу запрещен. Обратитесь к администратору.'");
КонецЕсли;
Если (Метаданные.ОсновныеРоли.Количество() <> 2 И Метаданные.ОсновныеРоли.Количество() <> 3)
Или Не Метаданные.ОсновныеРоли.Содержит(Метаданные.Роли.АдминистраторСистемы)
Или Не Метаданные.ОсновныеРоли.Содержит(Метаданные.Роли.ПолныеПрава) Тогда
SSL/src/CommonModules/УправлениеДоступомСлужебный/Module.bsl
+51 -35
View File
@@ -12128,7 +12128,7 @@
ВыбраныВсеЭлементы = Ложь;
Если ОбщиеПараметрыОбновления.ПолучитьПорции > 0 Тогда
КоличествоВПорции = КоличествоЭлементовВПорции(ЭтоОбновлениеПрав);
КоличествоВПорции = КоличествоЭлементовВПорции(ПараметрыОбновления);
КоличествоВЗапросе = КоличествоВПорции * ОбщиеПараметрыОбновления.ПолучитьПорции;
Элементы = ЭлементыДляОбновления(ПараметрыОбновления, КоличествоВЗапросе, ВыбраныВсеЭлементы);
@@ -12702,9 +12702,11 @@
КонецФункции
// Для процедура ВыполнитьОбновлениеДоступаСписка.
Функция КоличествоЭлементовВПорции(ЭтоОбновлениеПрав)
Функция КоличествоЭлементовВПорции(ПараметрыОбновления)
Если ЭтоОбновлениеПрав Тогда
Если ЭтоСправочникНаборыГруппДоступа(ПараметрыОбновления) Тогда
Возврат 25;
ИначеЕсли ПараметрыОбновления.ЭтоОбновлениеПрав Тогда
Возврат КоличествоКлючейДоступаВПорции();
Иначе
Возврат КоличествоЭлементовДанныхВПорции();
@@ -14375,11 +14377,38 @@
Запрос.Текст = СтрЗаменить(Запрос.Текст,
"СУММА(НомераГрупп.ЧастьНомера1) КАК ЧастьНомера1", ПоляСуммированияНовых);
ЭлементыДанных = Запрос.Выполнить().Выгрузить();
ЭлементыДанных.Колонки.Добавить("ОписаниеНомеровГрупп");
Результат = Запрос.Выполнить().Выгрузить();
ОписаниеНомеровГрупп = Новый Структура("НомераГрупп, ИменаЧастейНомера", НомераГрупп, ИменаЧастейНомера);
ЭлементыДанных.ЗаполнитьЗначения(Новый ХранилищеЗначения(ОписаниеНомеровГрупп), "ОписаниеНомеровГрупп");
СписокИменЧастейНабора = СтрСоединить(ИменаЧастейНомера, ", ");
НовыеНаборыГрупп = Результат.Скопировать(Новый Массив, СписокИменЧастейНабора);
НовыеНаборыГрупп.Колонки.Добавить("ГруппыНабора");
НовыеНаборыГрупп.Колонки.Добавить("ИдентификаторГрупп");
Отбор = Новый Структура(СписокИменЧастейНабора);
ЭлементыДанных = Результат.Скопировать(Новый Массив, "ТекущаяСсылка, НаборГрупп, НаборГруппНовый");
ЭлементыДанных.Колонки.Добавить("ГруппыНабора");
ЭлементыДанных.Колонки.Добавить("ИдентификаторГрупп");
Для Каждого Строка Из Результат Цикл
НоваяСтрока = ЭлементыДанных.Добавить();
ЗаполнитьЗначенияСвойств(НоваяСтрока, Строка);
Если ЗначениеЗаполнено(Строка.НаборГрупп) Тогда
Продолжить;
КонецЕсли;
ЗаполнитьЗначенияСвойств(Отбор, Строка);
НайденныеСтроки = НовыеНаборыГрупп.НайтиСтроки(Отбор);
Если НайденныеСтроки.Количество() = 0 Тогда
СвойстваНовогоНабора = НовыеНаборыГрупп.Добавить();
ЗаполнитьЗначенияСвойств(СвойстваНовогоНабора, Строка);
СвойстваНовогоНабора.ИдентификаторГрупп = Новый УникальныйИдентификатор;
СвойстваНовогоНабора.ГруппыНабора =
ГруппыНабораПоНомерам(НомераГрупп, ИменаЧастейНомера, СвойстваНовогоНабора);
Иначе
СвойстваНовогоНабора = НайденныеСтроки[0];
КонецЕсли;
НоваяСтрока.ГруппыНабора = СвойстваНовогоНабора.ГруппыНабора;
НоваяСтрока.ИдентификаторГрупп = СвойстваНовогоНабора.ИдентификаторГрупп;
КонецЦикла;
Возврат ЭлементыДанных;
@@ -14410,34 +14439,20 @@
КонецЕсли;
КонецЕсли;
НомераГрупп = Неопределено;
ИменаЧастейНомера = Неопределено;
Отбор = Неопределено;
НовыеНаборыГрупп = ЭлементыДанных.Скопировать(Новый Массив);
НовыеНаборыГрупп = Новый Соответствие;
Для Каждого Строка Из ЭлементыДанных Цикл
Если НомераГрупп = Неопределено Тогда
ОписаниеНомеровГрупп = Строка.ОписаниеНомеровГрупп.Получить();
НомераГрупп = ОписаниеНомеровГрупп.НомераГрупп;
ИменаЧастейНомера = ОписаниеНомеровГрупп.ИменаЧастейНомера;
Отбор = Новый Структура(СтрСоединить(ИменаЧастейНомера, ", "));
КонецЕсли;
Если Не ЗначениеЗаполнено(Строка.НаборГрупп) Тогда
ЗаполнитьЗначенияСвойств(Отбор, Строка);
НайденныеСтроки = НовыеНаборыГрупп.НайтиСтроки(Отбор);
Если НайденныеСтроки.Количество() = 0 Тогда
Строка.НаборГрупп = НовыйНаборГрупп(НомераГрупп,
ИменаЧастейНомера,
Отбор,
НаборГрупп = НовыеНаборыГрупп.Получить(Строка.ИдентификаторГрупп);
Если НаборГрупп = Неопределено Тогда
Строка.НаборГрупп = НовыйНаборГрупп(Строка.ГруппыНабора,
ПараметрыОбновления.ДляВнешнихПользователей,
ТипЭлементовНабора,
ПредставлениеЭлементовГрупп,
Строка.НаборГруппНовый);
НайденнаяСтрока = НовыеНаборыГрупп.Добавить();
ЗаполнитьЗначенияСвойств(НайденнаяСтрока, Отбор);
НайденнаяСтрока.НаборГрупп = Строка.НаборГрупп;
НовыеНаборыГрупп.Вставить(Строка.ИдентификаторГрупп, Строка.НаборГрупп);
Иначе
Строка.НаборГрупп = НайденныеСтроки[0].НаборГрупп;
Строка.НаборГрупп = НаборГрупп;
КонецЕсли;
КонецЕсли;
@@ -14502,8 +14517,8 @@
КонецПроцедуры
// Для процедуры ОбновитьНаборыГруппВСправочнике.
Функция НовыйНаборГрупп(НомераГрупп, ИменаЧастейНомера, ЧастиНомера, ДляВнешнихПользователей,
ТипЭлементовНабора, ПредставлениеЭлементовГрупп, НаборГруппДобавлен)
Функция НовыйНаборГрупп(ГруппыНабора, ДляВнешнихПользователей, ТипЭлементовНабора,
ПредставлениеЭлементовГрупп, НаборГруппДобавлен)
НоваяСсылка = Справочники.НаборыГруппДоступа.ПолучитьСсылку();
Объект = СлужебныйЭлемент(Справочники.НаборыГруппДоступа);
@@ -14512,7 +14527,6 @@
Объект.ТипЭлементовНабора = ТипЭлементовНабора;
Объект.Наименование = Строка(НоваяСсылка.УникальныйИдентификатор()) + " (" + ПредставлениеЭлементовГрупп + ")";
ГруппыНабора = ГруппыНабораПоНомерам(НомераГрупп, ИменаЧастейНомера, ЧастиНомера);
Для Каждого ГруппаНабора Из ГруппыНабора Цикл
Объект.Группы.Добавить().Группа = ГруппаНабора;
КонецЦикла;
@@ -14567,11 +14581,13 @@
Целое = Цел(ЧастьНомера / Делитель);
БлокЧастиНомера = ЧастьНомера - Целое * Делитель;
ЧастьНомера = Целое;
Для НомерБита = 0 По 31 Цикл
Если ПроверитьБит(БлокЧастиНомера, НомерБита) Тогда
ГруппыНабора.Добавить(НомераГрупп[ИндексГруппы + НомерБита].Ссылка);
КонецЕсли;
КонецЦикла;
Если БлокЧастиНомера > 0 Тогда
Для НомерБита = 0 По 31 Цикл
Если ПроверитьБит(БлокЧастиНомера, НомерБита) Тогда
ГруппыНабора.Добавить(НомераГрупп[ИндексГруппы + НомерБита].Ссылка);
КонецЕсли;
КонецЦикла;
КонецЕсли;
ИндексГруппы = ИндексГруппы + 32;
КонецЦикла;
КонецЦикла;
SSL/src/CommonModules/УправлениеКонтактнойИнформацией/Module.bsl
+4 -4
View File
@@ -2811,7 +2811,7 @@
Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
Если СтрНачинаетсяС(ВыборкаДетальныеЗаписи.ИмяПредопределенногоВида, "Справочник") Тогда
ИмяОбъекта = Сред(ВыборкаДетальныеЗаписи.ИмяПредопределенногоВида, 11);
ИмяОбъекта = Сред(ВыборкаДетальныеЗаписи.ИмяПредопределенногоВида, СтрДлина("Справочник") + 1);
Если Метаданные.Справочники.Найти(ИмяОбъекта) <> Неопределено Тогда
КонтактнаяИнформация = Метаданные.Справочники[ИмяОбъекта].ТабличныеЧасти.КонтактнаяИнформация;
@@ -2821,7 +2821,7 @@
КонецЕсли;
КонецЕсли;
ИначеЕсли СтрНачинаетсяС(ВыборкаДетальныеЗаписи.ИмяПредопределенногоВида, "Документ") Тогда
ИмяОбъекта = Сред(ВыборкаДетальныеЗаписи.ИмяПредопределенногоВида, 9);
ИмяОбъекта = Сред(ВыборкаДетальныеЗаписи.ИмяПредопределенногоВида, СтрДлина("Документ") + 1);
Если Метаданные.Документы.Найти(ИмяОбъекта) <> Неопределено Тогда
КонтактнаяИнформация = Метаданные.Документы[ИмяОбъекта].ТабличныеЧасти.КонтактнаяИнформация;
@@ -2920,14 +2920,14 @@
Продолжить;
КонецЕсли;
ИмяПредопределенногоВида = Сред(Вид.ИмяПредопределенныхДанных, 8);
ИмяПредопределенногоВида = Сред(Вид.ИмяПредопределенныхДанных, СтрДлина("удалить") + 1);
Если ВидыКонтактнойИнформации.Найти(ИмяПредопределенногоВида, "ИмяПредопределенногоВида") <> Неопределено Тогда
Продолжить;
КонецЕсли;
ОбъектВидКИ = Вид.ВидКИ.ПолучитьОбъект();
Если Не ОбъектВидКИ.ЭтоГруппа Тогда
ОбъектВидКИ.ИмяГруппы = Сред(Вид.Группа, 8);
ОбъектВидКИ.ИмяГруппы = Сред(Вид.Группа, СтрДлина("удалить") + 1);
КонецЕсли;
ОбъектВидКИ.ИмяПредопределенногоВида = ИмяПредопределенногоВида;
SSL/src/CommonModules/УправлениеКонтактнойИнформациейКлиент/Module.bsl
+1 -1
View File
@@ -167,7 +167,7 @@
ИЛИ СтрНачинаетсяС(ИмяКоманды, "КартаGoogleМеню") Тогда
КомандаКонтекстногоМеню = КомандаКонтекстногоМеню(ИмяКоманды);
ИмяРеквизита = Сред(КомандаКонтекстногоМеню.ИмяРеквизита, 5);
ИмяРеквизита = Сред(КомандаКонтекстногоМеню.ИмяРеквизита, СтрДлина("Меню") + 1);
Иначе
SSL/src/CommonModules/УправлениеКонтактнойИнформациейСлужебный/Module.bsl
+5 -5
View File
@@ -533,7 +533,7 @@
| ТаблицаСКонтактнойИнформацией.Ссылка";
Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
Если СтрНачинаетсяС(ВыборкаДетальныеЗаписи.ИмяПредопределенногоВида, "Справочник") Тогда
ИмяОбъекта = Сред(ВыборкаДетальныеЗаписи.ИмяПредопределенногоВида, 11);
ИмяОбъекта = Сред(ВыборкаДетальныеЗаписи.ИмяПредопределенногоВида, СтрДлина("Справочник") + 1);
Если Метаданные.Справочники.Найти(ИмяОбъекта) <> Неопределено Тогда
ТекстЗапроса = ТекстЗапроса + Разделитель + СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(ШаблонЗапроса, "Справочник", ИмяОбъекта);
Разделитель = " ОБЪЕДИНИТЬ ВСЕ ";
@@ -1725,7 +1725,7 @@
ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать();
Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
Если СтрНачинаетсяС(ВыборкаДетальныеЗаписи.ИмяПредопределенногоВида, "Справочник") Тогда
ИмяОбъекта = Сред(ВыборкаДетальныеЗаписи.ИмяПредопределенногоВида, 11);
ИмяОбъекта = Сред(ВыборкаДетальныеЗаписи.ИмяПредопределенногоВида, СтрДлина("Справочник") + 1);
Если Метаданные.Справочники.Найти(ИмяОбъекта) <> Неопределено Тогда
КонтактнаяИнформация = Метаданные.Справочники[ИмяОбъекта].ТабличныеЧасти.КонтактнаяИнформация;
Если КонтактнаяИнформация.Реквизиты.Найти("ВидДляСписка") <> Неопределено Тогда
@@ -1733,7 +1733,7 @@
КонецЕсли;
КонецЕсли;
ИначеЕсли СтрНачинаетсяС(ВыборкаДетальныеЗаписи.ИмяПредопределенногоВида, "Документ") Тогда
ИмяОбъекта = Сред(ВыборкаДетальныеЗаписи.ИмяПредопределенногоВида, 9);
ИмяОбъекта = Сред(ВыборкаДетальныеЗаписи.ИмяПредопределенногоВида, СтрДлина("Документ") + 1);
Если Метаданные.Документы.Найти(ИмяОбъекта) <> Неопределено Тогда
КонтактнаяИнформация = Метаданные.Документы[ИмяОбъекта].ТабличныеЧасти.КонтактнаяИнформация;
Если КонтактнаяИнформация.Реквизиты.Найти("ВидДляСписка") <> Неопределено Тогда
@@ -2209,8 +2209,8 @@
Если СтрНачинаетсяС(Добавочный, ",") Тогда
Добавочный = СокрЛ(Сред(Добавочный, 2));
КонецЕсли;
Если ВРег(Лев(Добавочный, 3 ))= "ДОБ" Тогда
Добавочный = СокрЛ(Сред(Добавочный, 4));
Если СтрНачинаетсяС(ВРег(Добавочный), "ДОБ") Тогда
Добавочный = СокрЛ(Сред(Добавочный, СтрДлина("ДОБ") + 1));
КонецЕсли;
Если ВРег(Лев(Добавочный, 1 ))= "." Тогда
Добавочный = СокрЛ(Сред(Добавочный, 2));
SSL/src/CommonModules/ФайловаяСистемаКлиент/Module.bsl
+1 -1
View File
@@ -19,7 +19,7 @@
// Параметры:
// ОбработчикЗавершения- ОписаниеОповещения - содержит описание процедуры, которая будет вызвана после
// загрузки файла со следующими параметрами:
// * ПомещенныеФайлы - Неопределено - пользователь отказался от выбора.
// * ПомещенныйФайл - Неопределено - пользователь отказался от выбора.
// - Структура - пользователь выбрал файл.
// ** Хранение - Строка - расположение данных во временном хранилище.
// ** Имя - Строка - локальный путь, по которому должен быть получен файл.
SSL/src/Configuration/Configuration.mdo
+10 -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="4852d9ae-5956-406f-954e-37bef580d67f">
<mdclass:Configuration xmlns:mdclass="http://g5.1c.ru/v8/dt/metadata/mdclass" uuid="a7a5a59a-cfed-426c-8f31-6dbf468f5c32">
<name>БиблиотекаСтандартныхПодсистем</name>
<synonym>
<key>ru</key>
<value>Библиотека стандартных подсистем, редакция 3.0</value>
</synonym>
<containedObjects classId="9cd510cd-abfc-11d4-9434-004095e12fc7" objectId="08b02198-9106-44b8-82e5-b330ec7eb38d"/>
<containedObjects classId="9fcd25a0-4822-11d4-9414-008048da11f9" objectId="8f7543e9-89dc-46eb-b006-dca148577892"/>
<containedObjects classId="e3687481-0a87-462c-a166-9f34594f9bba" objectId="61356c99-bd9b-44d4-8902-892b0fbb6dc3"/>
<containedObjects classId="9de14907-ec23-4a07-96f0-85521cb6b53b" objectId="6fc435a5-5612-4511-86c2-ae5865bef3a2"/>
<containedObjects classId="51f2d5d8-ea4d-4064-8892-82951750031e" objectId="21b4b063-1205-415c-9204-ad22eaa190cd"/>
<containedObjects classId="e68182ea-4237-4383-967f-90c1e3370bc7" objectId="f70a6c95-d2ee-468a-844a-400cc7504d5f"/>
<containedObjects classId="fb282519-d103-4dd3-bc12-cb271d631dfc" objectId="967a84d6-5699-4acc-b21e-96ee36eff521"/>
<containedObjects classId="9cd510cd-abfc-11d4-9434-004095e12fc7" objectId="367e69ed-5986-41a4-a95c-135eb1b8584b"/>
<containedObjects classId="9fcd25a0-4822-11d4-9414-008048da11f9" objectId="53767249-ca90-460c-867a-b999a29914c1"/>
<containedObjects classId="e3687481-0a87-462c-a166-9f34594f9bba" objectId="79bfef02-383a-480f-a55a-bd2a87e98c2b"/>
<containedObjects classId="9de14907-ec23-4a07-96f0-85521cb6b53b" objectId="e206a0df-b7df-404a-9a66-5adc7c382b23"/>
<containedObjects classId="51f2d5d8-ea4d-4064-8892-82951750031e" objectId="d75f1bce-c88f-4ee9-9a00-4705b843cad1"/>
<containedObjects classId="e68182ea-4237-4383-967f-90c1e3370bc7" objectId="2867aa73-3715-45bd-bbe4-921615f76fc8"/>
<containedObjects classId="fb282519-d103-4dd3-bc12-cb271d631dfc" objectId="76a62791-e8fb-4df3-a3cc-3ec3d93c7aed"/>
<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.293</version>
<version>3.0.2.300</version>
<updateCatalogAddress>http://downloads.v8.1c.ru/tmplts/</updateCatalogAddress>
<includeHelpInContents>true</includeHelpInContents>
<usedMobileApplicationFunctionalities>
@@ -1896,6 +1896,7 @@
<informationRegisters>InformationRegister.РучныеИзмененияГрафиковРаботы</informationRegisters>
<informationRegisters>InformationRegister.СведенияОПользователях</informationRegisters>
<informationRegisters>InformationRegister.СведенияОФайлах</informationRegisters>
<informationRegisters>InformationRegister.СвязиАдресныхОбъектов</informationRegisters>
<informationRegisters>InformationRegister.СеансыВерсийРасширений</informationRegisters>
<informationRegisters>InformationRegister.СертификатыШифрования</informationRegisters>
<informationRegisters>InformationRegister.СклоненияПредставленийОбъектов</informationRegisters>
SSL/src/Configuration/ParentConfigurations.bin
+1 -1
View File
@@ -1 +1 @@
{6,1,1,8750a181-cf7a-46fa-b845-ad923bd5ed37,1,8877b165-8ed3-4211-bef7-aeb4f2e3163e,"3.0.2.293","Фирма ""1С""","БиблиотекаСтандартныхПодсистем",6031,1,0,4852d9ae-5956-406f-954e-37bef580d67f,4852d9ae-5956-406f-954e-37bef580d67f,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,0bbad887-195d-4e0f-82b7-78c827a22e2f,1,ea74d15d-7e09-4099-b298-005384383f45,"3.0.2.300","Фирма ""1С""","БиблиотекаСтандартныхПодсистем",6035,1,0,a7a5a59a-cfed-426c-8f31-6dbf468f5c32,a7a5a59a-cfed-426c-8f31-6dbf468f5c32,1,0,db4a9ccb-9ef5-4b3c-8577-b6fe5db1b62e,db4a9ccb-9ef5-4b3c-8577-b6fe5db1b62e,1,0,9233322b-dfdb-4c66-91fe-1299292d40a5,9233322b-dfdb-4c66-91fe-1299292d40a5,1,0,7795348b-2f52-47f7-bf00-e11e5e795a43,7795348b-2f52-47f7-bf00-e11e5e795a43,1,0,0421b67e-ed26-491d-ab98-ec59002ed4ce,0421b67e-ed26-491d-ab98-ec59002ed4ce,1,0,bb47ced2-31f9-4870-8633-20b986e53ccc,bb47ced2-31f9-4870-8633-20b986e53ccc,1,0,7d8acec9-f5a9-411e-921c-446ed0dd3332,7d8acec9-f5a9-411e-921c-446ed0dd3332,1,0,739c01a9-1125-45ef-ab4e-8c73af4eeff0,739c01a9-1125-45ef-ab4e-8c73af4eeff0,1,0,cdbd26b1-9583-46e8-adf7-8cc705639892,cdbd26b1-9583-46e8-adf7-8cc705639892,1,0,c0e38c3e-7088-4e35-9d84-2d0ab9655402,c0e38c3e-7088-4e35-9d84-2d0ab9655402,1,0,1098786f-dd24-4cce-b212-be0cb5f01735,1098786f-dd24-4cce-b212-be0cb5f01735,1,0,3c0037f3-4422-4836-b116-8c72e32bdd55,3c0037f3-4422-4836-b116-8c72e32bdd55,1,0,6f7c6c31-206b-4010-bdad-1ad2e304f154,6f7c6c31-206b-4010-bdad-1ad2e304f154,1,0,a8659e53-8c6b-4b0c-9736-fe93a91e4d69,a8659e53-8c6b-4b0c-9736-fe93a91e4d69,1,0,fe9a1d1a-19c0-499f-8e1b-09cadabe882f,fe9a1d1a-19c0-499f-8e1b-09cadabe882f,1,0,5b68d479-7880-44de-84e3-7f578b43f0dc,5b68d479-7880-44de-84e3-7f578b43f0dc,1,0,bf9ca98c-5c95-4cfb-9181-8c1d847f9fbb,bf9ca98c-5c95-4cfb-9181-8c1d847f9fbb,1,0,b4629308-42de-4ce8-8591-cf0c2399a9a2,b4629308-42de-4ce8-8591-cf0c2399a9a2,1,0,c7e984ae-1dbb-4041-b18a-bfd0d63a002f,c7e984ae-1dbb-4041-b18a-bfd0d63a002f,1,0,bb0424b8-dfd1-4a27-bd66-9dea3ffc77c4,bb0424b8-dfd1-4a27-bd66-9dea3ffc77c4,1,0,a4ac0a50-ee39-4dc1-b84f-eec8fe485f03,a4ac0a50-ee39-4dc1-b84f-eec8fe485f03,1,0,1861ee4f-fd8c-4afa-8441-c074bf51f67e,1861ee4f-fd8c-4afa-8441-c074bf51f67e,1,0,de7ed8f7-3c02-47e0-aea8-4747ac68a5d5,de7ed8f7-3c02-47e0-aea8-4747ac68a5d5,1,0,b93b8760-6200-40ee-8bdc-875ba80a6155,b93b8760-6200-40ee-8bdc-875ba80a6155,1,0,c27472ee-879a-4746-9d21-122738ec80b7,c27472ee-879a-4746-9d21-122738ec80b7,1,0,e8b248d9-9049-456a-9c7d-7a0462cc67ab,e8b248d9-9049-456a-9c7d-7a0462cc67ab,1,0,d4562287-440d-4462-9de2-7097ccbf3764,d4562287-440d-4462-9de2-7097ccbf3764,1,0,ec797c75-02c5-4cf5-9dd4-26cd46c99519,ec797c75-02c5-4cf5-9dd4-26cd46c99519,1,0,6fccdf59-fc99-4a2b-a144-fffe438a147c,6fccdf59-fc99-4a2b-a144-fffe438a147c,1,0,af8bd73a-d8e8-487d-8f36-d835ab10ea3a,af8bd73a-d8e8-487d-8f36-d835ab10ea3a,1,0,08a413ff-bebd-42e5-8ff3-2115746a0844,08a413ff-bebd-42e5-8ff3-2115746a0844,1,0,da9b32e6-5b93-45a6-84b2-238d57541e18,da9b32e6-5b93-45a6-84b2-238d57541e18,1,0,e43d69c8-b284-47da-b236-611bc94a15b6,e43d69c8-b284-47da-b236-611bc94a15b6,1,0,31eeaa05-6c49-41fe-b840-1edbad4ccac7,31eeaa05-6c49-41fe-b840-1edbad4ccac7,1,0,842c8662-8f39-405e-9665-cbdabc116159,842c8662-8f39-405e-9665-cbdabc116159,1,0,fca4b033-02c4-4d61-9e51-87783c3cef1a,fca4b033-02c4-4d61-9e51-87783c3cef1a,1,0,396ef757-d7f6-411f-8c4c-1acb1106a009,396ef757-d7f6-411f-8c4c-1acb1106a009,1,0,839e29b1-a0d2-40fa-9f3e-46e66b943358,839e29b1-a0d2-40fa-9f3e-46e66b943358,1,0,c56d2cc7-630a-441b-b23f-ba78c34849bd,c56d2cc7-630a-441b-b23f-ba78c34849bd,1,0,9aecf4f5-46ed-4d1c-a584-cd028e467895,9aecf4f5-46ed-4d1c-a584-cd028e467895,1,0,21d92c2f-6c78-43ce-b1f4-59d7845b5a91,21d92c2f-6c78-43ce-b1f4-59d7845b5a91,1,0,a1c379be-43d3-4e02-83bb-d2e7de2d4ae3,a1c379be-43d3-4e02-83bb-d2e7de2d4ae3,1,0,a1f10624-22e9-4a04-b370-fd085bdd0f67,a1f10624-22e9-4a04-b370-fd085bdd0f67,1,0,2a4b10be-3cd7-4755-905f-7b4d02ff6a22,2a4b10be-3cd7-4755-905f-7b4d02ff6a22,1,0,3cffb795-2a28-4beb-92f4-5813f5994022,3cffb795-2a28-4beb-92f4-5813f5994022,1,0,3323ca68-1382-4710-a933-23fc56588935,3323ca68-1382-4710-a933-23fc56588935,1,0,d6b12775-3255-42b8-88b2-62684f873e7d,d6b12775-3255-42b8-88b2-62684f873e7d,1,0,cc23d903-ccc5-42f4-862f-5e7278c4e346,cc23d903-ccc5-42f4-862f-5e7278c4e346,1,0,98f033e0-fa40-46e0-b51a-87a066749a35,98f033e0-fa40-46e0-b51a-87a066749a35,1,0,e8b4cb2d-1180-4101-954a-4cb5464f198c,e8b4cb2d-1180-4101-954a-4cb5464f198c,1,0,a379287d-1ce8-460d-a503-910e728e28f1,a379287d-1ce8-460d-a503-910e728e28f1,1,0,f765c4ba-c677-42ac-8d0c-43bb485405b9,f765c4ba-c677-42ac-8d0c-43bb485405b9,1,0,83192b3e-e7a9-4595-8887-24cda84457a9,83192b3e-e7a9-4595-8887-24cda84457a9,1,0,2fd1287d-d96d-4480-baf7-8815ae5ffbfb,2fd1287d-d96d-4480-baf7-8815ae5ffbfb,1,0,c8a4c5da-bc88-4f6e-9787-1c22c2f41be7,c8a4c5da-bc88-4f6e-9787-1c22c2f41be7,1,0,08eeb8f1-944f-4450-83f6-ef20aaab7d86,08eeb8f1-944f-4450-83f6-ef20aaab7d86,1,0,d8c58e53-b7b9-4426-bdfa-d0816adf8cc1,d8c58e53-b7b9-4426-bdfa-d0816adf8cc1,1,0,8d77dd4a-e646-4105-8dcf-8ce8fc3da0b4,8d77dd4a-e646-4105-8dcf-8ce8fc3da0b4,1,0,2fd12dba-5311-4f31-949c-f6b15decc0cc,2fd12dba-5311-4f31-949c-f6b15decc0cc,1,0,d7cf3981-cf63-4a21-868b-8175a7704a8f,d7cf3981-cf63-4a21-868b-8175a7704a8f,1,0,35895e12-52b6-49a1-acdf-6d828a948af0,35895e12-52b6-49a1-acdf-6d828a948af0,1,0,0ae93712-74e8-41c7-8f2d-4dfc8983697d,0ae93712-74e8Line truncated
SSL/src/DataProcessors/ГрупповоеИзменениеРеквизитов/ObjectModule.bsl
+2 -1
View File
@@ -457,7 +457,8 @@
Процедура ВыполнитьКодАлгоритма(Знач Объект, Знач КодАлгоритма, Знач ВыполнитьВБезопасномРежиме)
Если ВыполнитьВБезопасномРежиме Или НЕ ПравоДоступа("Администрирование", Метаданные) Тогда
КодАлгоритма = СтрЗаменить(КодАлгоритма, "Объект.", "Параметры.");
КодАлгоритма = "Объект = Параметры;
|" + КодАлгоритма;
ВыполнитьВБезопасномРежиме(КодАлгоритма, Объект);
Иначе
Выполнить КодАлгоритма; // АПК:487 Для "ремонтных" сценариев допускается выполнение кода Администратором.
SSL/src/DataProcessors/ЗагрузкаДанныхИзФайла/Forms/ЗагрузкаДанныхИзФайла/Module.bsl
+4 -4
View File
@@ -1196,7 +1196,7 @@
Если ТипЗагрузки = "ТабличнаяЧасть" Тогда
Если Строка.РезультатСопоставленияСтроки = "Неоднозначность" И СтрДлина(Строка.ОписаниеОшибки) > 0 Тогда
Если СтрДлина(ПолеИмя) > 3 И СтрНачинаетсяС(ПолеИмя, "ТаблицаСопоставленияДанных_ТЧ_") Тогда
Имя = Сред(ПолеИмя, 31);
Имя = Сред(ПолеИмя, СтрДлина("ТаблицаСопоставленияДанных_ТЧ_") + 1);
Если СтрНайти(Строка.ОписаниеОшибки, Имя) Тогда
СтандартнаяОбработка = Ложь;
СтрокаИзТаблицы = Новый Массив;
@@ -1500,7 +1500,7 @@
Если СтрНачинаетсяС(Колонка.ИмяКолонки, "КонтактнаяИнформация_") Тогда
ИмяВидаКИ = СтандартныеПодсистемыСервер.ПреобразоватьАдаптированноеНаименованиеКолонкиВСтроку(Сред(Колонка.ИмяКолонки, 22));
ИмяВидаКИ = СтандартныеПодсистемыСервер.ПреобразоватьАдаптированноеНаименованиеКолонкиВСтроку(Сред(Колонка.ИмяКолонки, СтрДлина("КонтактнаяИнформация_") + 1));
НайденныеВиды = ВидыКонтактнойИнформации.Найти(ИмяВидаКИ, "Наименование");
ТабличнаяЧасть = "КонтактнаяИнформация";
@@ -1760,8 +1760,8 @@
ТаблицаДляТЧ = Новый ТаблицаЗначений;
Для Каждого Колонка Из Таблица.Колонки Цикл
Если СтрНачинаетсяС(Колонка.Имя, "ТЧ_") Тогда
ТаблицаДляТЧ.Колонки.Добавить(Сред(Колонка.имя, 4), Колонка.ТипЗначения, Колонка.Заголовок, Колонка.Ширина);
ИначеЕсли Колонка.Имя = "РезультатСопоставленияСтроки" ИЛИ Колонка.Имя = "ОписаниеОшибки" ИЛИ Колонка.Имя = "Идентификатор" Тогда
ТаблицаДляТЧ.Колонки.Добавить(Сред(Колонка.имя, СтрДлина( "ТЧ_") + 1), Колонка.ТипЗначения, Колонка.Заголовок, Колонка.Ширина);
ИначеЕсли Колонка.Имя = "РезультатСопоставленияСтроки" ИЛИ Колонка.Имя = "ОписаниеОшибки" ИЛИ Колонка.Имя = "Идентификатор" Тогда
ТаблицаДляТЧ.Колонки.Добавить(Колонка.имя, Колонка.ТипЗначения, Колонка.Заголовок, Колонка.Ширина);
КонецЕсли;
КонецЦикла;
SSL/src/DataProcessors/ЗагрузкаДанныхИзФайла/ManagerModule.bsl
+2 -2
View File
@@ -167,7 +167,7 @@
КонецЦикла;
КонецЦикла;
Если ВРег(Лев(Справочник.Имя, 7)) = "УДАЛИТЬ" Тогда
Если СтрНачинаетсяС(ВРег(Справочник.Имя), "УДАЛИТЬ") Тогда
Возврат Истина;
КонецЕсли;
@@ -1553,7 +1553,7 @@
Для каждого Колонка Из ИнформацияПоКолонкам Цикл
Если Колонка.Видимость Тогда
Если СтрНачинаетсяС(Колонка.ИмяКолонки, "КонтактнаяИнформация_") Тогда
ИмяВидаКИ = СтандартныеПодсистемыСервер.ПреобразоватьАдаптированноеНаименованиеКолонкиВСтроку(Сред(Колонка.ИмяКолонки, 22));
ИмяВидаКИ = СтандартныеПодсистемыСервер.ПреобразоватьАдаптированноеНаименованиеКолонкиВСтроку(Сред(Колонка.ИмяКолонки, СтрДлина("КонтактнаяИнформация_") + 1));
ВидКонтактнойИнформации = ВидыКонтактнойИнформации.Найти(ИмяВидаКИ, "Наименование");
Если НеобходимоОчиститьКонтактнуюИнформацию Тогда
ЭлементСправочника.КонтактнаяИнформация.Очистить();
SSL/src/DataProcessors/РасширенныйВводКонтактнойИнформации/Forms/ВводАдреса/Module.bsl
+63 -47
View File
@@ -576,43 +576,7 @@
&НаКлиенте
Процедура НаселенныйПунктПриИзменении(Элемент)
Если ПустаяСтрока(НаселенныйПункт) Тогда
ОчиститьНаселенныйПункт();
Возврат;
КонецЕсли;
Если РаботаСАдресамиКлиентСервер.ЭтоОсновнаяСтрана(Страна) Тогда
ИменаУровнейАдреса = РаботаСАдресамиКлиентСервер.ИменаУровнейАдреса(НаселенныйПунктДетально.AddressType, Ложь);
ИначеЕсли ЭтоСтранаУчастникЕАЭС Тогда
ИменаУровнейАдреса = РаботаСАдресамиКлиентСервер.ИменаУровнейАдреса(УправлениеКонтактнойИнформациейКлиентСервер.АдресЕАЭС(), Ложь);
Иначе
ИменаУровнейАдреса = РаботаСАдресамиКлиентСервер.ИменаУровнейАдреса(УправлениеКонтактнойИнформациейКлиентСервер.ИностранныйАдрес(), Ложь);
КонецЕсли;
ЭлементыАдреса = СтрРазделить(НаселенныйПункт, ",", Истина);
Для ИндексАдреса = 0 По ИменаУровнейАдреса.Количество() - 1 Цикл
Если ЭлементыАдреса.Количество() > 0 Тогда
ЗначениеПоля = СокрЛП(ЭлементыАдреса[0]);
Позиция = СтрНайти(ЗначениеПоля, " ", НаправлениеПоиска.СКонца);
Если Позиция > 0 И НЕ РаботаСАдресамиКлиентСервер.ПредставлениеУровняБезСокращения(ИменаУровнейАдреса[ИндексАдреса]) Тогда
НаселенныйПунктДетально[ИменаУровнейАдреса[ИндексАдреса]] = СокрЛП(Лев(ЗначениеПоля, Позиция));
НаселенныйПунктДетально[ИменаУровнейАдреса[ИндексАдреса] + "Type"] = СокрЛП(Сред(ЗначениеПоля, Позиция +1));
Иначе
НаселенныйПунктДетально[ИменаУровнейАдреса[ИндексАдреса]] = ЗначениеПоля;
КонецЕсли;
ЭлементыАдреса.Удалить(0);
Иначе
НаселенныйПунктДетально[ИменаУровнейАдреса[ИндексАдреса]] = "";
КонецЕсли;
КонецЦикла;
Если ЭлементыАдреса.Количество() > 0 Тогда
НаселенныйПунктДетально[ИменаУровнейАдреса[ИменаУровнейАдреса.Количество() - 1]] = СокрЛП(СтрСоединить(ЭлементыАдреса, ","));
КонецЕсли;
ОчиститьИдентификаторыАдреса();
ОбновитьПредставлениеАдреса();
ИзменитьСведенияОНаселенномПункте();
КонецПроцедуры
@@ -631,7 +595,7 @@
Если Элемент.ТекстРедактирования <> НаселенныйПункт Тогда
Модифицированность = Истина;
НаселенныйПункт = Элемент.ТекстРедактирования;
ИзменитьСведенияОНаселенномПункте();
ИдентификаторНаселенногоПункта = Неопределено;
КонецЕсли;
@@ -1284,7 +1248,10 @@
НаселенныйПунктДетально[ИмяУровня + "Id"] = "";
КонецЕсли;
КонецЦикла;
ОчиститьИдентификаторыАдреса();
ОбновитьПредставлениеАдреса();
КонецПроцедуры
&НаКлиенте
@@ -2225,7 +2192,7 @@
Если НаселенныйПунктДетальноПереопределение <> Неопределено Тогда
НаселенныйПунктДетально = НаселенныйПунктДетальноПереопределение;
КонецЕсли;
Если НаселенныйПунктДетально = Неопределено Тогда
Возврат Неопределено;
КонецЕсли;
@@ -2236,9 +2203,9 @@
Пока КоличествоЭлементов > 0 Цикл
КоличествоЭлементов = КоличествоЭлементов - 1;
ЭлементыФормы = Элементы.ГруппаСтроенияДополнительно.ПодчиненныеЭлементы.Получить(КоличествоЭлементов);
Идентификатор = Сред(ЭлементыФормы.Имя, 15);
Идентификатор = Сред(ЭлементыФормы.Имя, СтрДлина("ГруппаСтроение") + 1);
Удалять.Добавить("ТипСтроения" + Идентификатор);
Удалять.Добавить("Строение" + Идентификатор);
Элементы.Удалить(Элементы["ГруппаСтроение" + Идентификатор]);
@@ -2256,7 +2223,7 @@
КоличествоЭлементов = КоличествоЭлементов - 1;
ЭлементыФормы = Элементы.ГруппаПомещенияДополнительно.ПодчиненныеЭлементы.Получить(КоличествоЭлементов);
Идентификатор = Сред(ЭлементыФормы.Имя, 16);
Идентификатор = Сред(ЭлементыФормы.Имя, СтрДлина("ГруппаПомещение") + 1);
Удалять.Добавить("ТипПомещения" + Идентификатор);
Удалять.Добавить("Помещение" + Идентификатор);
Элементы.Удалить(Элементы["ГруппаПомещение" + Идентификатор]);
@@ -2486,7 +2453,7 @@
&НаКлиенте
Процедура Подключаемый_ТипСтроенияПриИзменении(Элемент)
Идентификатор = Сред(Элемент.Имя, 12);
Идентификатор = Сред(Элемент.Имя, СтрДлина("ТипСтроения") + 1);
НайденныеСтрокиСтарые = ДополнительныеСтроенияИПомещения.НайтиСтроки(Новый Структура("ИмяЭлемента", Идентификатор));
Если НайденныеСтрокиСтарые.Количество() > 0 Тогда
СтароеЗначение = НайденныеСтрокиСтарые[0].Значение;
@@ -2522,7 +2489,7 @@
&НаКлиенте
Процедура Подключаемый_СтроениеПриИзменении(Элемент)
Идентификатор = Сред(Элемент.Имя, 9);
Идентификатор = Сред(Элемент.Имя, СтрДлина("Строение") + 1);
НайденныеСтроки = ДополнительныеСтроенияИПомещения.НайтиСтроки(Новый Структура("ИмяЭлемента", Идентификатор));
Если НайденныеСтроки.Количество() > 0 Тогда
@@ -2558,7 +2525,7 @@
&НаКлиенте
Процедура Подключаемый_ТипПомещенияПриИзменении(Элемент)
Идентификатор = Сред(Элемент.Имя, 13);
Идентификатор = Сред(Элемент.Имя, СтрДлина("ТипПомещения") + 1);
НайденныеСтрокиСтарые = ДополнительныеСтроенияИПомещения.НайтиСтроки(Новый Структура("ИмяЭлемента", Идентификатор));
Если НайденныеСтрокиСтарые.Количество() > 0 Тогда
СтароеЗначение = НайденныеСтрокиСтарые[0].ПредыдущиеЗначение;
@@ -2615,7 +2582,7 @@
&НаКлиенте
Процедура Подключаемый_ПомещениеПриИзменении(Элемент)
Идентификатор = Сред(Элемент.Имя, 10);
Идентификатор = Сред(Элемент.Имя, СтрДлина("Помещение") + 1);
НайденныеСтроки = ДополнительныеСтроенияИПомещения.НайтиСтроки(Новый Структура("ИмяЭлемента", Идентификатор));
Если НайденныеСтроки.Количество() > 0 Тогда
@@ -3409,6 +3376,49 @@
КонецПроцедуры
&НаКлиенте
Процедура ИзменитьСведенияОНаселенномПункте()
Если ПустаяСтрока(НаселенныйПункт) Тогда
ОчиститьНаселенныйПункт();
Возврат;
КонецЕсли;
Если РаботаСАдресамиКлиентСервер.ЭтоОсновнаяСтрана(Страна) Тогда
ИменаУровнейАдреса = РаботаСАдресамиКлиентСервер.ИменаУровнейАдреса(НаселенныйПунктДетально.AddressType, Ложь);
ИначеЕсли ЭтоСтранаУчастникЕАЭС Тогда
ИменаУровнейАдреса = РаботаСАдресамиКлиентСервер.ИменаУровнейАдреса(УправлениеКонтактнойИнформациейКлиентСервер.АдресЕАЭС(), Ложь);
Иначе
ИменаУровнейАдреса = РаботаСАдресамиКлиентСервер.ИменаУровнейАдреса(УправлениеКонтактнойИнформациейКлиентСервер.ИностранныйАдрес(), Ложь);
КонецЕсли;
ЭлементыАдреса = СтрРазделить(НаселенныйПункт, ",", Истина);
Для ИндексАдреса = 0 По ИменаУровнейАдреса.Количество() - 1 Цикл
Если ЭлементыАдреса.Количество() > 0 Тогда
ЗначениеПоля = СокрЛП(ЭлементыАдреса[0]);
Позиция = СтрНайти(ЗначениеПоля, " ", НаправлениеПоиска.СКонца);
Если Позиция > 0 И НЕ РаботаСАдресамиКлиентСервер.ПредставлениеУровняБезСокращения(ИменаУровнейАдреса[ИндексАдреса]) Тогда
НаселенныйПунктДетально[ИменаУровнейАдреса[ИндексАдреса]] = СокрЛП(Лев(ЗначениеПоля, Позиция));
НаселенныйПунктДетально[ИменаУровнейАдреса[ИндексАдреса] + "Type"] = СокрЛП(Сред(ЗначениеПоля, Позиция + 1));
Иначе
НаселенныйПунктДетально[ИменаУровнейАдреса[ИндексАдреса]] = ЗначениеПоля;
КонецЕсли;
ЭлементыАдреса.Удалить(0);
Иначе
НаселенныйПунктДетально[ИменаУровнейАдреса[ИндексАдреса]] = "";
КонецЕсли;
КонецЦикла;
Если ЭлементыАдреса.Количество() > 0 Тогда
НаселенныйПунктДетально[ИменаУровнейАдреса[ИменаУровнейАдреса.Количество() - 1]] = СокрЛП(СтрСоединить(ЭлементыАдреса, ","));
КонецЕсли;
ОчиститьИдентификаторыАдреса();
ОбновитьПредставлениеАдреса();
КонецПроцедуры
&НаКлиенте
Процедура ПоказатьПодсказкуПоТипАдреса()
@@ -3499,6 +3509,12 @@
Для каждого ИмяУровня Из РаботаСАдресамиКлиентСервер.ИменаУровнейАдреса(Адрес.AddressType, Ложь) Цикл
Если ЗначениеЗаполнено(Адрес[ИмяУровня]) Тогда
Если Адрес.AddressType = РаботаСАдресамиКлиентСервер.АдминистративноТерриториальныйАдрес()
И СтрСравнить(ИмяУровня, "Locality") = 0
И СтрСравнить(СокрЛП(Адрес[ИмяУровня] + " " + Адрес[ИмяУровня + "Type"]), СокрЛП(Адрес["city"] + " " + Адрес["cityType"])) = 0 Тогда
Продолжить;
КонецЕсли;
Если НЕ РаботаСАдресамиКлиентСервер.ПредставлениеУровняБезСокращения(ИмяУровня) Тогда
СписокЗаполненныхУровней.Добавить(Адрес[ИмяУровня] + " " + Адрес[ИмяУровня + "Type"]);
Иначе
SSL/src/DataProcessors/РасширенныйВводКонтактнойИнформации/Forms/ВыборАдресаПоУровню/Module.bsl
+2 -1
View File
@@ -43,7 +43,7 @@
Параметры.Свойство("СкрыватьНеактуальные", СкрыватьНеактуальные);
ПараметрыПоиска = Новый Структура;
ПараметрыПоиска.Вставить("КоличествоЗаписей", 3000);
ПараметрыПоиска.Вставить("КоличествоЗаписей", 7000);
Если НЕ ЗначениеЗаполнено(Родитель) И Уровень > 1 Тогда
// поиск адреса без родителя
@@ -187,6 +187,7 @@
Результат.Вставить("Уровень", 0);
Результат.Вставить("Муниципальный", Неопределено);
Результат.Вставить("ПредлагатьЗагрузкуКлассификатора", Ложь);
Результат.Вставить("Родитель", Родитель);
Возврат Результат;
КонецФункции
SSL/src/DataProcessors/РасширенныйВводКонтактнойИнформации/Forms/НаселенныйПунктАдреса/Module.bsl
+11
View File
@@ -324,6 +324,12 @@
&НаКлиентеНаСервереБезКонтекста
Функция ПредставлениеУровняАдреса(Адрес, ИмяУровня, ДобавлятьСокращение = Истина)
Если ИмяУровня = "Locality"
И Не РаботаСАдресамиКлиентСервер.ЭтоМуниципальныйАдрес(Адрес.AddressType)
И Адрес.localityId = Адрес.cityId Тогда
Возврат "";
КонецЕсли;
Если Адрес.Свойство(ИмяУровня) И ЗначениеЗаполнено(Адрес[ИмяУровня]) Тогда
Если ДобавлятьСокращение Тогда
Сокращение = ?(ПустаяСтрока(Адрес[ИмяУровня +"Type"]), "", " " + Адрес[ИмяУровня +"Type"]);
@@ -346,6 +352,11 @@
Элементы.Город.Видимость = НЕ ЭтоМуниципальныйАдрес;
Элементы.МуниципальныйРайон.Видимость = ЭтоМуниципальныйАдрес;
Элементы.Поселение.Видимость = ЭтоМуниципальныйАдрес;
Если НаселенныйПунктДетально <> Неопределено
И НаселенныйПунктДетально.localityId = НаселенныйПунктДетально.cityId Тогда
НаселенныйПункт = ?(ЭтоМуниципальныйАдрес,
НаселенныйПунктДетально.locality + " " + НаселенныйПунктДетально.localityType, "");
КонецЕсли;
Иначе
SSL/src/DocumentJournals/Взаимодействия/Forms/ПараметрыЭлектронногоПисьма/Form.form
+7
View File
@@ -768,6 +768,13 @@
<currentRowUse>DontUse</currentRowUse>
<selectedRowsUse>Auto</selectedRowsUse>
</formCommands>
<parameters>
<name>ЗаголовкиИнтернета</name>
<valueType>
<types>String</types>
<stringQualifiers/>
</valueType>
</parameters>
<commandInterface>
<navigationPanel/>
<commandBar/>
SSL/src/DocumentJournals/Взаимодействия/Forms/ПараметрыЭлектронногоПисьма/Module.bsl
+2 -1
View File
@@ -84,7 +84,6 @@
Процедура ЗаполнитьРеквизитыФормыИзПараметров(ПереданныеПараметры)
ЗаполнитьРеквизитФормыИзПараметра(ПереданныеПараметры,"ВнутреннийНомер");
ЗаполнитьРеквизитФормыИзПараметра(ПереданныеПараметры,"ЗаголовкиИнтернета");
ЗаполнитьРеквизитФормыИзПараметра(ПереданныеПараметры,"Создано");
ЗаполнитьРеквизитФормыИзПараметра(ПереданныеПараметры,"Получено","ОтправленоПолучено");
ЗаполнитьРеквизитФормыИзПараметра(ПереданныеПараметры,"Отправлено","ОтправленоПолучено");
@@ -95,6 +94,8 @@
ЗаполнитьРеквизитФормыИзПараметра(ПереданныеПараметры,"ВключатьТелоИсходногоПисьма");
ЗаполнитьРеквизитФормыИзПараметра(ПереданныеПараметры,"УчетнаяЗапись");
ЗаголовкиИнтернета.ДобавитьСтроку(ПереданныеПараметры.ЗаголовкиИнтернета);
Папка = Взаимодействия.ПолучитьПапкуЭлектронногоПисьма(Письмо);
ТекущаяПапка = Папка;
SSL/src/Documents/ЭлектронноеПисьмоВходящее/Forms/ФормаДокумента/Module.bsl
+9 -12
View File
@@ -453,20 +453,17 @@
&НаКлиенте
Процедура ПараметрыПисьма(Команда)
ТекстЗаголовкиИнтернета = Новый ТекстовыйДокумент;
ТекстЗаголовкиИнтернета.ДобавитьСтроку(Объект.ВнутреннийЗаголовок);
ПараметрыФормы = Новый Структура;
ПараметрыФормы.Вставить("Создано", Объект.Дата);
ПараметрыФормы.Вставить("Получено", Объект.ДатаПолучения);
ПараметрыФормы.Вставить("УведомитьОДоставке", Объект.УведомитьОДоставке);
ПараметрыФормы.Вставить("Создано", Объект.Дата);
ПараметрыФормы.Вставить("Получено", Объект.ДатаПолучения);
ПараметрыФормы.Вставить("УведомитьОДоставке", Объект.УведомитьОДоставке);
ПараметрыФормы.Вставить("УведомитьОПрочтении", Объект.УведомитьОПрочтении);
ПараметрыФормы.Вставить("ЗаголовкиИнтернета", ТекстЗаголовкиИнтернета);
ПараметрыФормы.Вставить("Письмо", Объект.Ссылка);
ПараметрыФормы.Вставить("ТипПисьма", "ЭлектронноеПисьмоВходящее");
ПараметрыФормы.Вставить("Кодировка", Объект.Кодировка);
ПараметрыФормы.Вставить("ВнутреннийНомер", Объект.Номер);
ПараметрыФормы.Вставить("УчетнаяЗапись", Объект.УчетнаяЗапись);
ПараметрыФормы.Вставить("ЗаголовкиИнтернета", Объект.ВнутреннийЗаголовок);
ПараметрыФормы.Вставить("Письмо", Объект.Ссылка);
ПараметрыФормы.Вставить("ТипПисьма", "ЭлектронноеПисьмоВходящее");
ПараметрыФормы.Вставить("Кодировка", Объект.Кодировка);
ПараметрыФормы.Вставить("ВнутреннийНомер", Объект.Номер);
ПараметрыФормы.Вставить("УчетнаяЗапись", Объект.УчетнаяЗапись);
ОткрытьФорму("ЖурналДокументов.Взаимодействия.Форма.ПараметрыЭлектронногоПисьма", ПараметрыФормы, ЭтотОбъект);
SSL/src/Documents/ЭлектронноеПисьмоИсходящее/Forms/ФормаДокумента/Module.bsl
+29 -20
View File
@@ -112,13 +112,10 @@
Если ВРег(ИсточникВыбора.ИмяФормы) = ВРег("Документ.ЭлектронноеПисьмоИсходящее.Форма.ФормированиеВнешнейСсылкиНаОбъект") Тогда
Если ФорматСообщения = ПредопределенноеЗначение("Перечисление.СпособыРедактированияЭлектронныхПисем.ОбычныйТекст") Тогда
Элементы.ТекстПисьма.ПолучитьГраницыВыделения(СтрокаНачало, КолонкаНачало, СтрокаКонец, КолонкаКонец);
ТекстовыйДокумент = Новый ТекстовыйДокумент;
ТекстовыйДокумент.УстановитьТекст(ТекстПисьма);
СтрокаВставки = ТекстовыйДокумент.ПолучитьСтроку(СтрокаНачало);
СтрокаВставки = Лев(СтрокаВставки, КолонкаНачало - 1) + ВыбранноеЗначение + Прав(СтрокаВставки,СтрДлина(СтрокаВставки) - КолонкаКонец + 1);
ТекстовыйДокумент.ЗаменитьСтроку(СтрокаНачало, СтрокаВставки);
ТекстПисьма = ТекстовыйДокумент.ПолучитьТекст();
ТекстПисьма = РезультатВставкиТекстаВПисьмо(ТекстПисьма, СтрокаНачало, КолонкаНачало, КолонкаКонец, ВыбранноеЗначение);
Иначе
Элементы.ТекстПисьмаФорматированныйДокумент.ПолучитьГраницыВыделения(НачалоВыделения, КонецВыделения);
@@ -886,24 +883,24 @@
&НаКлиенте
Процедура ПараметрыПисьма(Команда)
ТекстИдентификаторы = Новый ТекстовыйДокумент;
ТекстИдентификаторы.ДобавитьСтроку("Идентификатор сообщения: " + Объект.ИдентификаторСообщения);
ТекстИдентификаторы.ДобавитьСтроку("Идентификатор основания: " + Объект.ИдентификаторОснования);
ТекстИдентификаторы.ДобавитьСтроку("Идентификаторы оснований: "
ТекстИдентификаторы = Новый Массив;
ТекстИдентификаторы.Добавить("Идентификатор сообщения: " + Объект.ИдентификаторСообщения);
ТекстИдентификаторы.Добавить("Идентификатор основания: " + Объект.ИдентификаторОснования);
ТекстИдентификаторы.Добавить("Идентификаторы оснований: "
+ ПолучитьПредставлениеИдентификаторовОснований(Объект.ИдентификаторыОснований));
СтруктураПараметры = Новый Структура;
СтруктураПараметры.Вставить("Создано", Объект.Дата);
СтруктураПараметры.Вставить("Отправлено", Объект.ДатаОтправления);
СтруктураПараметры.Вставить("УведомитьОДоставке", Объект.УведомитьОДоставке);
СтруктураПараметры.Вставить("УведомитьОПрочтении", Объект.УведомитьОПрочтении);
СтруктураПараметры.Вставить("ЗаголовкиИнтернета", ТекстИдентификаторы);
СтруктураПараметры.Вставить("Письмо", Объект.Ссылка);
СтруктураПараметры.Вставить("ТипПисьма", "ЭлектронноеПисьмоИсходящее");
СтруктураПараметры.Вставить("Кодировка", Объект.Кодировка);
СтруктураПараметры.Вставить("ВнутреннийНомер", Объект.Номер);
СтруктураПараметры.Вставить("Создано", Объект.Дата);
СтруктураПараметры.Вставить("Отправлено", Объект.ДатаОтправления);
СтруктураПараметры.Вставить("УведомитьОДоставке", Объект.УведомитьОДоставке);
СтруктураПараметры.Вставить("УведомитьОПрочтении", Объект.УведомитьОПрочтении);
СтруктураПараметры.Вставить("ЗаголовкиИнтернета", СтрСоединить(ТекстИдентификаторы, Символы.ПС));
СтруктураПараметры.Вставить("Письмо", Объект.Ссылка);
СтруктураПараметры.Вставить("ТипПисьма", "ЭлектронноеПисьмоИсходящее");
СтруктураПараметры.Вставить("Кодировка", Объект.Кодировка);
СтруктураПараметры.Вставить("ВнутреннийНомер", Объект.Номер);
СтруктураПараметры.Вставить("ВключатьТелоИсходногоПисьма", Объект.ВключатьТелоИсходногоПисьма);
СтруктураПараметры.Вставить("УчетнаяЗапись", Объект.УчетнаяЗапись);
СтруктураПараметры.Вставить("УчетнаяЗапись", Объект.УчетнаяЗапись);
ОткрытьФорму("ЖурналДокументов.Взаимодействия.Форма.ПараметрыЭлектронногоПисьма", СтруктураПараметры, ЭтотОбъект);
@@ -2109,6 +2106,18 @@
КонецПроцедуры
&НаСервере
Функция РезультатВставкиТекстаВПисьмо(ТекстПисьма, СтрокаНачало, КолонкаНачало, КолонкаКонец, ВыбранноеЗначение)
ТекстовыйДокумент = Новый ТекстовыйДокумент;
ТекстовыйДокумент.УстановитьТекст(ТекстПисьма);
СтрокаВставки = ТекстовыйДокумент.ПолучитьСтроку(СтрокаНачало);
СтрокаВставки = Лев(СтрокаВставки, КолонкаНачало - 1) + ВыбранноеЗначение + Прав(СтрокаВставки,СтрДлина(СтрокаВставки) - КолонкаКонец + 1);
ТекстовыйДокумент.ЗаменитьСтроку(СтрокаНачало, СтрокаВставки);
Возврат ТекстовыйДокумент.ПолучитьТекст();
КонецФункции
#КонецОбласти
&НаКлиенте
SSL/src/EventSubscriptions/КонтрольНеразделенныхНаборовЗаписейПриЗаписи/КонтрольНеразделенныхНаборовЗаписейПриЗаписи.mdo
+1
View File
@@ -34,6 +34,7 @@
<types>InformationRegisterRecordSet.НастройкиОтправителя</types>
<types>InformationRegisterRecordSet.ПакетыИнформацииПриЗапуске</types>
<types>InformationRegisterRecordSet.ОбластиТребующиеОбработкиПоставляемыхДанных</types>
<types>InformationRegisterRecordSet.СвязиАдресныхОбъектов</types>
<types>InformationRegisterRecordSet.ДомаЗданияСтроения</types>
<types>InformationRegisterRecordSet.ДополнительныеАдресныеСведения</types>
<types>InformationRegisterRecordSet.НастройкиТранспортаОбменаСообщениями</types>
SSL/src/ExchangePlans/ОбновлениеИнформационнойБазы/ОбновлениеИнформационнойБазы.mdo
+3
View File
@@ -911,6 +911,9 @@
<content>
<mdObject>Constant.СписокЗапрещенныхРасширений</mdObject>
</content>
<content>
<mdObject>InformationRegister.СвязиАдресныхОбъектов</mdObject>
</content>
<content>
<mdObject>InformationRegister.УдалитьЗамерыВремени</mdObject>
</content>
SSL/src/InformationRegisters/ОбновлениеКлючейДоступаКДанным/Forms/ОбновлениеДоступаНаУровнеЗаписей/Module.bsl
+4
View File
@@ -150,9 +150,13 @@
СтандартнаяОбработка = Ложь;
Если НавигационнаяСсылкаФорматированнойСтроки = "ПоказатьТекстОшибки" Тогда
#Если МобильныйКлиент Тогда
ПоказатьПредупреждение(, ТекстОшибкиОбновленияДоступа);
#Иначе
ТекстовыйДокумент = Новый ТекстовыйДокумент;
ТекстовыйДокумент.УстановитьТекст(ТекстОшибкиОбновленияДоступа);
ТекстовыйДокумент.Показать(НСтр("ru = 'Ошибка обновления доступа'"));
#КонецЕсли
КонецЕсли;
КонецПроцедуры
SSL/src/InformationRegisters/СвязиАдресныхОбъектов/СвязиАдресныхОбъектов.mdo
+116
View File
@@ -0,0 +1,116 @@
<?xml version="1.0" encoding="UTF-8"?>
<mdclass:InformationRegister 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="b67fb4f8-e895-4a8e-9230-31bc5cde4953">
<producedTypes>
<selectionType typeId="fc901c6c-6394-49d5-b28e-e86083f121d8" valueTypeId="af7ed396-c6d7-4fd1-ae7e-9b2234712d45"/>
<listType typeId="8e77c890-85b8-4619-87d7-4b61b3f5c507" valueTypeId="6a962729-4fa8-4f56-aab2-a895253cd432"/>
<managerType typeId="bd3452b1-bb1b-4ce4-9dbd-995b59d89657" valueTypeId="30418669-abb1-4976-8aea-2af3b83590b6"/>
<recordSetType typeId="a2ed2a29-e905-407c-a291-df977b34ead3" valueTypeId="4cfd550b-3e8b-48cb-97dc-4f6ec5401e76"/>
<recordKeyType typeId="2dd00053-e5e1-419c-a1ed-29ed9ce49a66" valueTypeId="3bcd2c6a-6e83-4d10-a4ef-0504f1014e9d"/>
<recordType typeId="b6bc9481-1030-48fd-a232-565894948594" valueTypeId="8de18c84-dd2b-445c-ad1e-3f1afeb348e4"/>
<recordManagerType typeId="2e0200a7-1235-4569-b4c2-59020b35d412" valueTypeId="c6150998-147e-4249-b26a-b085ba620220"/>
</producedTypes>
<name>СвязиАдресныхОбъектов</name>
<synonym>
<key>ru</key>
<value>Связи адресных объектов</value>
</synonym>
<useStandardCommands>true</useStandardCommands>
<editType>InDialog</editType>
<standardAttributes>
<dataHistory>Use</dataHistory>
<name>Active</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>LineNumber</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>Recorder</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>Period</name>
<fillValue xsi:type="core:UndefinedValue"/>
<fillChecking>ShowError</fillChecking>
<fullTextSearch>Use</fullTextSearch>
<minValue xsi:type="core:UndefinedValue"/>
<maxValue xsi:type="core:UndefinedValue"/>
</standardAttributes>
<dataLockControlMode>Managed</dataLockControlMode>
<dimensions uuid="f3c9fde1-6d0e-4319-a798-ed8e330750de">
<name>МуниципальныйРодительскийИдентификатор</name>
<synonym>
<key>ru</key>
<value>Муниципальный родительский идентификатор</value>
</synonym>
<type>
<types>UUID</types>
</type>
<toolTip>
<key>ru</key>
<value>Идентификатор родительского объекта (региона, района, города, населенного пункта) используется для связи с вышестоящими муниципальными адресными объектами.</value>
</toolTip>
<minValue xsi:type="core:UndefinedValue"/>
<maxValue xsi:type="core:UndefinedValue"/>
<dataHistory>Use</dataHistory>
<fillValue xsi:type="core:UndefinedValue"/>
<mainFilter>true</mainFilter>
</dimensions>
<dimensions uuid="50d1bd75-3523-41c0-8da1-500731c0872b">
<name>Идентификатор</name>
<synonym>
<key>ru</key>
<value>Идентификатор</value>
</synonym>
<comment>Глобальный уникальный идентификатор адресного объекта ФНС</comment>
<type>
<types>UUID</types>
</type>
<toolTip>
<key>ru</key>
<value>Глобальный уникальный идентификатор адресного объекта ФНС в ФИАС</value>
</toolTip>
<minValue xsi:type="core:UndefinedValue"/>
<maxValue xsi:type="core:UndefinedValue"/>
<indexing>Index</indexing>
<dataHistory>Use</dataHistory>
<fillFromFillingValue>true</fillFromFillingValue>
<fillValue xsi:type="core:UndefinedValue"/>
</dimensions>
<dimensions uuid="1a8d3872-6e19-4a49-b0ea-b120b6c09d7f">
<name>КодСубъектаРФ</name>
<synonym>
<key>ru</key>
<value>Код субъекта РФ</value>
</synonym>
<type>
<types>Number</types>
<numberQualifiers>
<precision>2</precision>
</numberQualifiers>
</type>
<toolTip>
<key>ru</key>
<value>Код субъекта РФ в ФИАС</value>
</toolTip>
<minValue xsi:type="core:UndefinedValue"/>
<maxValue xsi:type="core:UndefinedValue"/>
<indexing>Index</indexing>
<dataHistory>Use</dataHistory>
<fillValue xsi:type="core:UndefinedValue"/>
<mainFilter>true</mainFilter>
</dimensions>
</mdclass:InformationRegister>
SSL/src/Roles/АдминистраторСистемы/Rights.rights
+146 -87
View File
@@ -1923,93 +1923,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>
@@ -3932,6 +3845,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>InformationRegister.ПараметрыРаботыПрограммы</name>
<right>
@@ -4471,6 +4471,65 @@
<value>true</value>
</right>
</object>
<object>
<name>InformationRegister.СвязиАдресныхОбъектов</name>
<right>
<name>Read</name>
<value>true</value>
</right>
<right>
<name>Update</name>
<value>true</value>
</right>
<right>
<name>View</name>
<value>true</value>
</right>
<right>
<name>Edit</name>
<value>true</value>
</right>
<right>
<name>TotalsControl</name>
<value>true</value>
</right>
<right>
<name>ReadDataHistory</name>
<value>true</value>
</right>
<right>
<name>ReadDataHistoryOfMissingData</name>
<value>true</value>
</right>
<right>
<name>UpdateDataHistory</name>
<value>true</value>
</right>
<right>
<name>UpdateDataHistoryOfMissingData</name>
<value>true</value>
</right>
<right>
<name>UpdateDataHistorySettings</name>
<value>true</value>
</right>
<right>
<name>UpdateDataHistoryVersionComment</name>
<value>true</value>
</right>
<right>
<name>ViewDataHistory</name>
<value>true</value>
</right>
<right>
<name>EditDataHistoryVersionComment</name>
<value>true</value>
</right>
<right>
<name>SwitchToDataHistoryVersion</name>
<value>true</value>
</right>
</object>
<object>
<name>InformationRegister.УдалитьЗамерыВремени</name>
<right>
SSL/src/Roles/БазовыеПраваБСП/Rights.rights
+11
View File
@@ -1747,6 +1747,17 @@
<value>true</value>
</right>
</object>
<object>
<name>InformationRegister.СвязиАдресныхОбъектов</name>
<right>
<name>Read</name>
<value>true</value>
</right>
<right>
<name>View</name>
<value>true</value>
</right>
</object>
<object>
<name>SessionParameter.ПараметрыОбработчикаОбновления</name>
<right>
SSL/src/Roles/БазовыеПраваВнешнихПользователейБСП/Rights.rights
+11
View File
@@ -1506,6 +1506,17 @@
<value>true</value>
</right>
</object>
<object>
<name>InformationRegister.СвязиАдресныхОбъектов</name>
<right>
<name>Read</name>
<value>true</value>
</right>
<right>
<name>View</name>
<value>true</value>
</right>
</object>
<object>
<name>SessionParameter.ПараметрыОбработчикаОбновления</name>
<right>
SSL/src/Roles/ДобавлениеИзменениеАдресныхСведений/Rights.rights
+23
View File
@@ -187,6 +187,29 @@
<value>true</value>
</right>
</object>
<object>
<name>InformationRegister.СвязиАдресныхОбъектов</name>
<right>
<name>Read</name>
<value>true</value>
</right>
<right>
<name>Update</name>
<value>true</value>
</right>
<right>
<name>View</name>
<value>true</value>
</right>
<right>
<name>Edit</name>
<value>true</value>
</right>
<right>
<name>TotalsControl</name>
<value>true</value>
</right>
</object>
<object>
<name>InformationRegister.ЗемельныеУчастки</name>
<right>
SSL/src/Roles/ДобавлениеИзменениеРассылокОтчетов/Rights.rights
+31 -31
View File
@@ -21,37 +21,6 @@
<value>true</value>
</right>
</object>
<object>
<name>Configuration.БиблиотекаСтандартныхПодсистем</name>
<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>Output</name>
<value>true</value>
</right>
</object>
<object>
<name>Catalog.РассылкиОтчетов.Command.ВыполнитьСейчас</name>
<right>
@@ -107,6 +76,37 @@
<value>true</value>
</right>
</object>
<object>
<name>Configuration.БиблиотекаСтандартныхПодсистем</name>
<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>Output</name>
<value>true</value>
</right>
</object>
<restrictionTemplate>
<name>ДляОбъекта(ПолеОбъекта)</name>
<condition>// ДляОбъекта(ПолеОбъекта = "")
SSL/src/Roles/ПолныеПрава/Rights.rights
+90 -39
View File
@@ -2547,45 +2547,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>
@@ -5227,6 +5188,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>Catalog.УчетныеЗаписиСинхронизацииФайлов</name>
<right>
@@ -5936,6 +5936,57 @@
<value>false</value>
</right>
</object>
<object>
<name>InformationRegister.СвязиАдресныхОбъектов</name>
<right>
<name>Update</name>
<value>false</value>
</right>
<right>
<name>Edit</name>
<value>false</value>
</right>
<right>
<name>TotalsControl</name>
<value>false</value>
</right>
<right>
<name>ReadDataHistory</name>
<value>false</value>
</right>
<right>
<name>ReadDataHistoryOfMissingData</name>
<value>false</value>
</right>
<right>
<name>UpdateDataHistory</name>
<value>false</value>
</right>
<right>
<name>UpdateDataHistoryOfMissingData</name>
<value>false</value>
</right>
<right>
<name>UpdateDataHistorySettings</name>
<value>false</value>
</right>
<right>
<name>UpdateDataHistoryVersionComment</name>
<value>false</value>
</right>
<right>
<name>ViewDataHistory</name>
<value>false</value>
</right>
<right>
<name>EditDataHistoryVersionComment</name>
<value>false</value>
</right>
<right>
<name>SwitchToDataHistoryVersion</name>
<value>false</value>
</right>
</object>
<object>
<name>InformationRegister.УдалитьЗамерыВремени</name>
<right>
SSL/src/Subsystems/СтандартныеПодсистемы/Subsystems/АдресныйКлассификатор/АдресныйКлассификатор.mdo
+1
View File
@@ -24,5 +24,6 @@
<content>InformationRegister.СлужебныеАдресныеСведения</content>
<content>InformationRegister.УровниСокращенийАдресныхСведений</content>
<content>InformationRegister.ЗемельныеУчастки</content>
<content>InformationRegister.СвязиАдресныхОбъектов</content>
<parentSubsystem>Subsystem.СтандартныеПодсистемы</parentSubsystem>
</mdclass:Subsystem>
SSL/src/XDTOPackages/АдресныйКлассификатор/Package.xdto
+13
View File
@@ -64,6 +64,14 @@
<property name="UpdateDate" type="xs:dateTime" form="Attribute"/>
</typeDef>
</property>
<property name="Links">
<typeDef xsi:type="ObjectType">
<property xmlns:d4p1="http://www.v8.1c.ru/ssl/AddressSystem" name="Link" type="d4p1:Link" lowerBound="0" upperBound="-1"/>
<property name="Version" type="xs:int" form="Attribute"/>
<property name="Title" type="xs:string" lowerBound="0" form="Attribute"/>
<property name="UpdateDate" type="xs:dateTime" form="Attribute"/>
</typeDef>
</property>
<valueType name="SortDirection" base="xs:string" variety="Atomic">
<enumeration>ASC</enumeration>
<enumeration>DESC</enumeration>
@@ -265,4 +273,9 @@
<property name="POSTALCODE" type="xs:decimal" lowerBound="0" nillable="true" form="Attribute"/>
<property xmlns:d3p1="http://www.v8.1c.ru/ssl/AddressSystem" name="NUMBERS" type="d3p1:StringBlob" lowerBound="1" form="Attribute"/>
</objectType>
<objectType name="Link">
<property name="REGIONCODE" type="xs:int" form="Attribute"/>
<property xmlns:d3p1="http://www.v8.1c.ru/ssl/AddressSystem" name="AOGUID" type="d3p1:UUID" lowerBound="1" form="Attribute"/>
<property xmlns:d3p1="http://www.v8.1c.ru/ssl/AddressSystem" name="MUNPARENTGUID" type="d3p1:UUID" lowerBound="1" form="Attribute"/>
</objectType>
</package>