3_1_7_123
This commit is contained in:
1 parent
7e4f81a91c
commit
25d8bba0ad
73 files changed
+1463
-666
No files matched your search
@@ -644,6 +644,31 @@
|
||||
|
||||
КонецФункции
|
||||
|
||||
// Возвращаемое значение:
|
||||
// Дата - оперативная отметка универсального времени, полученная
|
||||
// при первом вызове этой функции в сеансе.
|
||||
// Разные ПК имеют разное время, что влияет на результат.
|
||||
//
|
||||
Функция ОперативнаяОтметкаВремениСеанса() Экспорт
|
||||
|
||||
УстановитьОтключениеБезопасногоРежима(Истина);
|
||||
УстановитьПривилегированныйРежим(Истина);
|
||||
|
||||
Если Не ПараметрыСеанса.УстановленныеРасширения.Свойство("ОперативнаяОтметкаВремениСеанса") Тогда
|
||||
УстановленныеРасширения = Новый Структура(ПараметрыСеанса.УстановленныеРасширения);
|
||||
УстановленныеРасширения.Вставить("ОперативнаяОтметкаВремениСеанса",
|
||||
ПолучитьТекущийСеансИнформационнойБазы().НачалоСеанса - СмещениеСтандартногоВремени());
|
||||
ПараметрыСеанса.УстановленныеРасширения = Новый ФиксированнаяСтруктура(УстановленныеРасширения);
|
||||
КонецЕсли;
|
||||
ОтметкаВремени = ПараметрыСеанса.УстановленныеРасширения.ОперативнаяОтметкаВремениСеанса;
|
||||
|
||||
УстановитьПривилегированныйРежим(Ложь);
|
||||
УстановитьОтключениеБезопасногоРежима(Ложь);
|
||||
|
||||
Возврат ОтметкаВремени;
|
||||
|
||||
КонецФункции
|
||||
|
||||
#КонецОбласти
|
||||
|
||||
#Область СлужебныеПроцедурыИФункции
|
||||
|
||||
@@ -1121,6 +1121,7 @@
|
||||
Строка.Синоним = НСтр("ru = 'Константы'");
|
||||
Строка.ИмяВЕдЧисле = "Константа";
|
||||
Строка.СинонимВЕдЧисле = НСтр("ru = 'Константа'");
|
||||
Строка.ОбъектыРасширений = Истина;
|
||||
|
||||
// Подсистемы
|
||||
Строка = СвойстваКоллекцийОбъектовМетаданных.Добавить();
|
||||
|
||||
@@ -17,6 +17,7 @@
|
||||
КонецЕсли;
|
||||
|
||||
Если Владелец.ПометкаУдаления Тогда
|
||||
ПредопределеннаяПапка = Ложь;
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
|
||||
@@ -24,14 +25,10 @@
|
||||
ОбщегоНазначения.СообщитьПользователю(
|
||||
НСтр("ru = 'Данная операция доступна только ответственному за ведение папок для данной учетной записи'"),
|
||||
Ссылка,,,Отказ);
|
||||
ИначеЕсли ПредопределеннаяПапка И ПометкаУдаления И (НЕ Владелец.ПометкаУдаления) Тогда
|
||||
ОбщегоНазначения.СообщитьПользователю(
|
||||
НСтр("ru = 'Нельзя установить пометку удаления для предопределенной папки'"),
|
||||
Ссылка,,,Отказ);
|
||||
ИначеЕсли ПредопределеннаяПапка И (Не Родитель.Пустая()) Тогда
|
||||
ОбщегоНазначения.СообщитьПользователю(
|
||||
НСтр("ru = 'Нельзя переместить предопределенную папку в другую папку'"),
|
||||
Ссылка,,,Отказ);
|
||||
ОбщегоНазначения.СообщитьПользователю(
|
||||
НСтр("ru = 'Нельзя переместить предопределенную папку в другую папку'"),
|
||||
Ссылка,,,Отказ);
|
||||
КонецЕсли;
|
||||
|
||||
ДополнительныеСвойства.Вставить("Родитель",ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Ссылка,"Родитель"));
|
||||
|
||||
@@ -192,8 +192,9 @@
|
||||
Кэш = УправлениеДоступомСлужебныйПовтИсп.ОписаниеПоставляемыхПрофилейСеанса();
|
||||
НовоеЗначение = Кэш.ХешСумма;
|
||||
|
||||
УжеИзменен = Ложь;
|
||||
ИмяПараметра = "СтандартныеПодсистемы.УправлениеДоступом.ОбновленныеПоставляемыеПрофили";
|
||||
СтароеЗначение = СтандартныеПодсистемыСервер.ПараметрРаботыРасширения(ИмяПараметра, Истина);
|
||||
СтароеЗначение = СтандартныеПодсистемыСервер.ПараметрРаботыРасширения(ИмяПараметра, Истина, УжеИзменен);
|
||||
|
||||
Если СтароеЗначение = НовоеЗначение Тогда
|
||||
Возврат;
|
||||
@@ -219,7 +220,7 @@
|
||||
КонецЕсли;
|
||||
КонецЕсли;
|
||||
|
||||
Если ЗначениеЗаполнено(СтароеЗначение) Тогда
|
||||
Если УжеИзменен Тогда
|
||||
УправлениеДоступомСлужебный.ПроверитьАктуальностьМетаданных();
|
||||
КонецЕсли;
|
||||
|
||||
@@ -236,14 +237,15 @@
|
||||
Кэш = УправлениеДоступомСлужебныйПовтИсп.ОписаниеПоставляемыхПрофилейСеанса();
|
||||
НовоеЗначение = Кэш.ХешСумма;
|
||||
|
||||
УжеИзменен = Ложь;
|
||||
ИмяПараметра = "СтандартныеПодсистемы.УправлениеДоступом.ОбновленныеНепоставляемыеПрофили";
|
||||
СтароеЗначение = СтандартныеПодсистемыСервер.ПараметрРаботыРасширения(ИмяПараметра, Истина);
|
||||
СтароеЗначение = СтандартныеПодсистемыСервер.ПараметрРаботыРасширения(ИмяПараметра, Истина, УжеИзменен);
|
||||
|
||||
Если СтароеЗначение = НовоеЗначение Тогда
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
|
||||
Если ЗначениеЗаполнено(СтароеЗначение) Тогда
|
||||
Если УжеИзменен Тогда
|
||||
УправлениеДоступомСлужебный.ПроверитьАктуальностьМетаданных();
|
||||
КонецЕсли;
|
||||
|
||||
@@ -803,6 +805,92 @@
|
||||
|
||||
КонецФункции
|
||||
|
||||
// Сравнивает часть объекта в базе данных с той же частью объекта в памяти.
|
||||
//
|
||||
// Параметры:
|
||||
// Профиль - СправочникОбъект.ПрофилиГруппДоступа - объект в памяти.
|
||||
//
|
||||
// СтарыеЗначения - Структура:
|
||||
// * Наименование - Строка
|
||||
// * Родитель - СправочникСсылка.ПрофилиГруппДоступа
|
||||
// * Роли - РезультатЗапроса
|
||||
// * Назначение - РезультатЗапроса
|
||||
// * ВидыДоступа - РезультатЗапроса
|
||||
// * ЗначенияДоступа - РезультатЗапроса
|
||||
//
|
||||
Функция ПоставляемыеОбластиПрофиляИзменены(НовыйПрофиль, СтарыеЗначения) Экспорт
|
||||
|
||||
Если ВРег(НовыйПрофиль.Наименование) <> ВРег(СтарыеЗначения.Наименование) Тогда
|
||||
Возврат Истина;
|
||||
КонецЕсли;
|
||||
|
||||
Если НовыйПрофиль.Родитель <> СтарыеЗначения.Родитель Тогда
|
||||
ОписанияПрофилей = УправлениеДоступомСлужебный.ПоставляемыеПрофили().ОписанияПрофилей;
|
||||
СвойстваПрофиля = ОписанияПрофилей.Получить(Строка(НовыйПрофиль.ИдентификаторПоставляемыхДанных)); // См. СвойстваПоставляемогоПрофиля
|
||||
Если СвойстваПрофиля <> Неопределено
|
||||
И ЗначениеЗаполнено(СвойстваПрофиля.Родитель)
|
||||
И ЗначениеЗаполнено(ПоставляемыйПрофильПоИдентификатору(СвойстваПрофиля.Родитель)) Тогда
|
||||
Возврат Истина;
|
||||
КонецЕсли;
|
||||
КонецЕсли;
|
||||
|
||||
Если НовыйПрофиль.ЭтоГруппа Тогда
|
||||
Возврат Ложь;
|
||||
КонецЕсли;
|
||||
|
||||
СтарыйПрофиль = Новый Структура;
|
||||
СтарыйПрофиль.Вставить("Роли", СтарыеЗначения.Роли.Выгрузить());
|
||||
СтарыйПрофиль.Вставить("Назначение", СтарыеЗначения.Назначение.Выгрузить());
|
||||
СтарыйПрофиль.Вставить("ВидыДоступа", СтарыеЗначения.ВидыДоступа.Выгрузить());
|
||||
СтарыйПрофиль.Вставить("ЗначенияДоступа", СтарыеЗначения.ЗначенияДоступа.Выгрузить());
|
||||
|
||||
Если НовыйПрофиль.Роли.Количество() <> СтарыйПрофиль.Роли.Количество()
|
||||
Или НовыйПрофиль.ВидыДоступа.Количество() <> СтарыйПрофиль.ВидыДоступа.Количество()
|
||||
Или НовыйПрофиль.ЗначенияДоступа.Количество() <> СтарыйПрофиль.ЗначенияДоступа.Количество()
|
||||
Или НовыйПрофиль.Назначение.Количество() <> СтарыйПрофиль.Назначение.Количество() Тогда
|
||||
Возврат Истина;
|
||||
КонецЕсли;
|
||||
|
||||
Для Каждого Строка Из НовыйПрофиль.Роли Цикл
|
||||
Если СтарыйПрофиль.Роли.Найти(Строка.Роль, "Роль") = Неопределено Тогда
|
||||
Возврат Истина;
|
||||
КонецЕсли;
|
||||
КонецЦикла;
|
||||
|
||||
Для Каждого Строка Из НовыйПрофиль.ВидыДоступа Цикл
|
||||
Отбор = Новый Структура("ВидДоступа, Предустановленный, ВсеРазрешены",
|
||||
Строка.ВидДоступа, Строка.Предустановленный, Строка.ВсеРазрешены);
|
||||
Если СтарыйПрофиль.ВидыДоступа.НайтиСтроки(Отбор).Количество() = 0 Тогда
|
||||
Возврат Истина;
|
||||
КонецЕсли;
|
||||
КонецЦикла;
|
||||
|
||||
Для Каждого Строка Из НовыйПрофиль.ВидыДоступа Цикл
|
||||
Отбор = Новый Структура("ВидДоступа, Предустановленный, ВсеРазрешены",
|
||||
Строка.ВидДоступа, Строка.Предустановленный, Строка.ВсеРазрешены);
|
||||
Если СтарыйПрофиль.ВидыДоступа.НайтиСтроки(Отбор).Количество() = 0 Тогда
|
||||
Возврат Истина;
|
||||
КонецЕсли;
|
||||
КонецЦикла;
|
||||
|
||||
Для Каждого Строка Из НовыйПрофиль.ЗначенияДоступа Цикл
|
||||
Отбор = Новый Структура("ВидДоступа, ЗначениеДоступа, ВключаяНижестоящие",
|
||||
Строка.ВидДоступа, Строка.ЗначениеДоступа, Строка.ВключаяНижестоящие);
|
||||
Если СтарыйПрофиль.ЗначенияДоступа.НайтиСтроки(Отбор).Количество() = 0 Тогда
|
||||
Возврат Истина;
|
||||
КонецЕсли;
|
||||
КонецЦикла;
|
||||
|
||||
Для Каждого Строка Из НовыйПрофиль.Назначение Цикл
|
||||
Если СтарыйПрофиль.Назначение.Найти(Строка.ТипПользователей, "ТипПользователей") = Неопределено Тогда
|
||||
Возврат Истина;
|
||||
КонецЕсли;
|
||||
КонецЦикла;
|
||||
|
||||
Возврат Ложь;
|
||||
|
||||
КонецФункции
|
||||
|
||||
// Определяет наличие начального заполнения для профиля групп доступа в переопределяемом модуле.
|
||||
//
|
||||
// Параметры:
|
||||
@@ -997,9 +1085,10 @@
|
||||
НачатьТранзакцию();
|
||||
Попытка
|
||||
Блокировка.Заблокировать();
|
||||
СтароеЗначение = СтандартныеПодсистемыСервер.ПараметрРаботыРасширения(ИмяПараметра, Истина);
|
||||
УжеИзменен = Ложь;
|
||||
СтароеЗначение = СтандартныеПодсистемыСервер.ПараметрРаботыРасширения(ИмяПараметра, Истина, УжеИзменен);
|
||||
Если СтароеЗначение <> НовоеЗначение Тогда
|
||||
Если ЗначениеЗаполнено(СтароеЗначение) Тогда // Не первое обновление.
|
||||
Если УжеИзменен Тогда
|
||||
УправлениеДоступомСлужебный.ПроверитьАктуальностьМетаданных();
|
||||
КонецЕсли;
|
||||
УстановитьОтключениеБезопасногоРежима(Истина);
|
||||
@@ -1363,9 +1452,10 @@
|
||||
НачатьТранзакцию();
|
||||
Попытка
|
||||
Блокировка.Заблокировать();
|
||||
СтароеЗначение = СтандартныеПодсистемыСервер.ПараметрРаботыРасширения(ИмяПараметра, Истина);
|
||||
УжеИзменен = Ложь;
|
||||
СтароеЗначение = СтандартныеПодсистемыСервер.ПараметрРаботыРасширения(ИмяПараметра, Истина, УжеИзменен);
|
||||
Если СтароеЗначение <> НовоеЗначение Тогда
|
||||
Если ЗначениеЗаполнено(СтароеЗначение) Тогда // Не первое обновление.
|
||||
Если УжеИзменен Тогда
|
||||
УправлениеДоступомСлужебный.ПроверитьАктуальностьМетаданных();
|
||||
КонецЕсли;
|
||||
УстановитьОтключениеБезопасногоРежима(Истина);
|
||||
|
||||
@@ -63,8 +63,15 @@
|
||||
Справочники.ПрофилиГруппДоступа.ЗаполнитьСтандартныеРолиРасширений(Роли);
|
||||
|
||||
Если Не ДополнительныеСвойства.Свойство("НеОбновлятьРеквизитПоставляемыйПрофильИзменен") Тогда
|
||||
ПоставляемыйПрофильИзменен =
|
||||
НовоеЗначениеПоставляемыйПрофильИзменен =
|
||||
Справочники.ПрофилиГруппДоступа.ПоставляемыйПрофильИзменен(ЭтотОбъект);
|
||||
|
||||
Если ПоставляемыйПрофильИзменен <> НовоеЗначениеПоставляемыйПрофильИзменен
|
||||
И (Не НовоеЗначениеПоставляемыйПрофильИзменен
|
||||
Или Справочники.ПрофилиГруппДоступа.ПоставляемыеОбластиПрофиляИзменены(ЭтотОбъект, СтарыеЗначения)) Тогда
|
||||
|
||||
ПоставляемыйПрофильИзменен = НовоеЗначениеПоставляемыйПрофильИзменен;
|
||||
КонецЕсли;
|
||||
КонецЕсли;
|
||||
|
||||
// Обновление наименования у персональных групп доступа этого профиля (если есть).
|
||||
@@ -441,6 +448,8 @@
|
||||
// Возвращаемое значение:
|
||||
// Структура:
|
||||
// * Ссылка - СправочникСсылка.ПрофилиГруппДоступа
|
||||
// * Наименование - Строка
|
||||
// * Родитель - СправочникСсылка.ПрофилиГруппДоступа
|
||||
// * ПометкаУдаления - Булево
|
||||
// * Роли - РезультатЗапроса
|
||||
// * Назначение - РезультатЗапроса
|
||||
@@ -450,7 +459,7 @@
|
||||
Функция СтарыеЗначения()
|
||||
|
||||
Возврат ОбщегоНазначения.ЗначенияРеквизитовОбъекта(Ссылка,
|
||||
"Ссылка, ПометкаУдаления, Роли, Назначение, ВидыДоступа, ЗначенияДоступа");
|
||||
"Ссылка, Наименование, Родитель, ПометкаУдаления, Роли, Назначение, ВидыДоступа, ЗначенияДоступа");
|
||||
|
||||
КонецФункции
|
||||
|
||||
|
||||
+1
-1
@@ -1402,7 +1402,7 @@
|
||||
ДополнительнаяПроверкаНаВозможностьПодписания(Контекст.СертификатКриптографии, Истина, ОписаниеОшибки);
|
||||
|
||||
// Подписание.
|
||||
Если ПроверкиНаКлиенте.НаличиеСертификата = Истина И Не ЗначениеЗаполнено(ОписаниеОшибки) Тогда
|
||||
Если ПроверкиНаСервере.НаличиеСертификата = Истина И Не ЗначениеЗаполнено(ОписаниеОшибки) Тогда
|
||||
|
||||
МодульСервисКриптографииDSSКлиентСервер = ОбщегоНазначенияКлиент.ОбщийМодуль("СервисКриптографииDSSКлиентСервер");
|
||||
МодульСервисКриптографииDSSКлиент = ОбщегоНазначенияКлиент.ОбщийМодуль("СервисКриптографииDSSКлиент");
|
||||
|
||||
+6
@@ -126,6 +126,12 @@
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
|
||||
Если ИмяСобытия = "Запись_НаборКонстант" И Источник = "РазрешенныеНеаккредитованныеУЦ" Тогда
|
||||
|
||||
ОбновитьВидимостьПредупреждения();
|
||||
|
||||
КонецЕсли;
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
&НаСервере
|
||||
|
||||
@@ -109,7 +109,7 @@
|
||||
КонецЕсли;
|
||||
|
||||
Если ИмяСобытия = "Запись_Файл" И Источник = Объект.Ссылка И Не Модифицированность Тогда
|
||||
Прочитать();
|
||||
ОбновитьОбъект();
|
||||
КонецЕсли;
|
||||
|
||||
Если ИмяСобытия = "Запись_Подпись" Тогда
|
||||
@@ -849,7 +849,6 @@
|
||||
КонецЕсли;
|
||||
|
||||
Обработчик = Новый ОписаниеОповещения("ПрочитатьИУстановитьДоступностьЭлементовФормы", ЭтотОбъект);
|
||||
|
||||
РаботаСФайламиСлужебныйКлиент.СохранитьИзмененияФайлаСОповещением(Обработчик,
|
||||
ЭтотОбъект.Объект.Ссылка, УникальныйИдентификатор);
|
||||
|
||||
@@ -1065,7 +1064,7 @@
|
||||
КонецЦикла;
|
||||
|
||||
МодульЭлектроннаяПодпись.УдалитьПодпись(Объект.Ссылка, ИндексыСтрок, УникальныйИдентификатор);
|
||||
Прочитать();
|
||||
ОбновитьОбъект();
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
@@ -1435,8 +1434,7 @@
|
||||
&НаКлиенте
|
||||
Процедура ПрочитатьИУстановитьДоступностьЭлементовФормы(Результат, ДополнительныеПараметры) Экспорт
|
||||
|
||||
Прочитать();
|
||||
УстановитьДоступностьКнопок(ЭтотОбъект, Элементы);
|
||||
ОбновитьОбъект();
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
@@ -1544,7 +1542,7 @@
|
||||
Версия = РаботаСФайламиСлужебный.СоздатьВерсию(Приемник, СведенияОФайле);
|
||||
РаботаСФайламиСлужебный.ОбновитьВерсиюВФайле(
|
||||
Приемник, Версия, Источник.ТекущаяВерсия.ТекстХранилище, УникальныйИдентификатор);
|
||||
Прочитать();
|
||||
ОбновитьОбъект();
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
|
||||
@@ -1,5 +1,41 @@
|
||||
<?xml version="1.0" encoding="UTF-8"?>
|
||||
<form:Form xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:form="http://g5.1c.ru/v8/dt/form">
|
||||
<form:Form xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:core="http://g5.1c.ru/v8/dt/mcore" xmlns:form="http://g5.1c.ru/v8/dt/form">
|
||||
<items xsi:type="form:Decoration">
|
||||
<name>ДекорацияНадпись</name>
|
||||
<id>6</id>
|
||||
<title>
|
||||
<key>ru</key>
|
||||
<value>УЦ сертификата добавлен в список разрешенных УЦ</value>
|
||||
</title>
|
||||
<enabled>true</enabled>
|
||||
<userVisible>
|
||||
<common>true</common>
|
||||
</userVisible>
|
||||
<extendedTooltip>
|
||||
<name>ДекорацияНадписьРасширеннаяПодсказка</name>
|
||||
<id>8</id>
|
||||
<type>Label</type>
|
||||
<autoMaxWidth>true</autoMaxWidth>
|
||||
<autoMaxHeight>true</autoMaxHeight>
|
||||
<extInfo xsi:type="form:LabelDecorationExtInfo">
|
||||
<horizontalAlign>Left</horizontalAlign>
|
||||
</extInfo>
|
||||
</extendedTooltip>
|
||||
<contextMenu>
|
||||
<name>ДекорацияНадписьКонтекстноеМеню</name>
|
||||
<id>7</id>
|
||||
<autoFill>true</autoFill>
|
||||
</contextMenu>
|
||||
<type>Label</type>
|
||||
<autoMaxWidth>true</autoMaxWidth>
|
||||
<autoMaxHeight>true</autoMaxHeight>
|
||||
<extInfo xsi:type="form:LabelDecorationExtInfo">
|
||||
<horizontalAlign>Left</horizontalAlign>
|
||||
<backColor xsi:type="core:ColorRef">
|
||||
<color>Style.ToolTipBackColor</color>
|
||||
</backColor>
|
||||
</extInfo>
|
||||
</items>
|
||||
<items xsi:type="form:FormGroup">
|
||||
<name>ГруппаРазрешенныеНеаккредитованныеУЦ</name>
|
||||
<id>4</id>
|
||||
@@ -20,7 +56,7 @@
|
||||
<id>3</id>
|
||||
<title>
|
||||
<key>ru</key>
|
||||
<value>Список ОГРН (через запятую) удостоверяющих центров, потерявших аккредитацию, подписание сертификатами которых разрешено, подписи считаются верными.</value>
|
||||
<value>Список ОГРН (с новой строки или через запятую) удостоверяющих центров, потерявших аккредитацию, подписание сертификатами которых разрешено, подписи считаются верными.</value>
|
||||
</title>
|
||||
<type>Label</type>
|
||||
<autoMaxWidth>true</autoMaxWidth>
|
||||
@@ -40,13 +76,19 @@
|
||||
<headerHorizontalAlign>Left</headerHorizontalAlign>
|
||||
<showInFooter>true</showInFooter>
|
||||
<extInfo xsi:type="form:InputFieldExtInfo">
|
||||
<handlers>
|
||||
<event>EditTextChange</event>
|
||||
<name>РазрешенныеНеаккредитованныеУЦИзменениеТекстаРедактирования</name>
|
||||
</handlers>
|
||||
<autoMaxWidth>true</autoMaxWidth>
|
||||
<height>5</height>
|
||||
<autoMaxHeight>true</autoMaxHeight>
|
||||
<wrap>true</wrap>
|
||||
<multiLine>true</multiLine>
|
||||
<chooseType>true</chooseType>
|
||||
<typeDomainEnabled>true</typeDomainEnabled>
|
||||
<textEdit>true</textEdit>
|
||||
<editTextUpdate>OnValueChange</editTextUpdate>
|
||||
<textSize>Normal</textSize>
|
||||
</extInfo>
|
||||
</items>
|
||||
@@ -86,6 +128,14 @@
|
||||
<horizontalAlign>Left</horizontalAlign>
|
||||
<autoFill>true</autoFill>
|
||||
</autoCommandBar>
|
||||
<handlers>
|
||||
<event>OnOpen</event>
|
||||
<name>ПриОткрытии</name>
|
||||
</handlers>
|
||||
<handlers>
|
||||
<event>OnCreateAtServer</event>
|
||||
<name>ПриСозданииНаСервере</name>
|
||||
</handlers>
|
||||
<windowOpeningMode>LockOwner</windowOpeningMode>
|
||||
<saveWindowSettings>true</saveWindowSettings>
|
||||
<autoTitle>true</autoTitle>
|
||||
@@ -111,6 +161,25 @@
|
||||
<main>true</main>
|
||||
<savedData>true</savedData>
|
||||
</attributes>
|
||||
<attributes>
|
||||
<name>ТекстПредупреждения</name>
|
||||
<id>7</id>
|
||||
<valueType>
|
||||
<types>String</types>
|
||||
<stringQualifiers/>
|
||||
</valueType>
|
||||
<view>
|
||||
<common>true</common>
|
||||
</view>
|
||||
<edit>
|
||||
<common>true</common>
|
||||
</edit>
|
||||
</attributes>
|
||||
<parameters>
|
||||
<name>Сертификат</name>
|
||||
<valueType/>
|
||||
<keyParameter>true</keyParameter>
|
||||
</parameters>
|
||||
<commandInterface>
|
||||
<navigationPanel/>
|
||||
<commandBar/>
|
||||
|
||||
@@ -8,10 +8,146 @@
|
||||
|
||||
#Область ОбработчикиСобытийФормы
|
||||
|
||||
&НаКлиенте
|
||||
Процедура ПослеЗаписи(ПараметрыЗаписи)
|
||||
ОбновитьПовторноИспользуемыеЗначения();
|
||||
&НаСервере
|
||||
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
|
||||
|
||||
ДобавитьУдостоверяющийЦентрСертификатаВРазрешенные();
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
&НаКлиенте
|
||||
Процедура ПриОткрытии(Отказ)
|
||||
|
||||
Если ЗначениеЗаполнено(ТекстПредупреждения) Тогда
|
||||
СтандартныеПодсистемыКлиент.УстановитьХранениеФормы(ЭтотОбъект, Истина);
|
||||
ПодключитьОбработчикОжидания("ОбработчикОжиданияПоказатьВопросПользователю", 0.1, Истина);
|
||||
Отказ = Истина;
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
|
||||
Модифицированность = Элементы.ДекорацияНадпись.Видимость;
|
||||
ПодключитьОбработчикОжидания("ОбновитьКоличествоВЗаголовке", 0.1, Истина);
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
&НаКлиенте
|
||||
Процедура ПослеЗаписи(ПараметрыЗаписи)
|
||||
|
||||
ОбновитьПовторноИспользуемыеЗначения();
|
||||
Оповестить("Запись_НаборКонстант", Новый Структура, "РазрешенныеНеаккредитованныеУЦ");
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
#КонецОбласти
|
||||
|
||||
#Область ОбработчикиСобытийЭлементовШапкиФормы
|
||||
|
||||
&НаКлиенте
|
||||
Процедура РазрешенныеНеаккредитованныеУЦИзменениеТекстаРедактирования(Элемент, Текст, СтандартнаяОбработка)
|
||||
|
||||
ПодключитьОбработчикОжидания("ОбновитьКоличествоВЗаголовке", 0.5, Истина);
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
#КонецОбласти
|
||||
|
||||
#Область СлужебныеПроцедурыИФункции
|
||||
|
||||
&НаКлиенте
|
||||
Процедура ОбновитьКоличествоВЗаголовке()
|
||||
|
||||
Если ПустаяСтрока(Элементы.РазрешенныеНеаккредитованныеУЦ.ТекстРедактирования) Тогда
|
||||
Элементы.РазрешенныеНеаккредитованныеУЦ.Заголовок = НСтр("ru ='Разрешенные неаккредитованные УЦ'");
|
||||
Иначе
|
||||
РазрешенныеУЦ = СтрРазделить(Элементы.РазрешенныеНеаккредитованныеУЦ.ТекстРедактирования, ",;" + Символы.ПС, Ложь);
|
||||
Элементы.РазрешенныеНеаккредитованныеУЦ.Заголовок = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
|
||||
НСтр("ru ='Разрешенные неаккредитованные УЦ (%1)'"), РазрешенныеУЦ.Количество());
|
||||
КонецЕсли;
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
&НаКлиенте
|
||||
Процедура ОбработчикОжиданияПоказатьВопросПользователю()
|
||||
|
||||
СтандартныеПодсистемыКлиент.УстановитьХранениеФормы(ЭтотОбъект, Ложь);
|
||||
ПараметрыВопроса = СтандартныеПодсистемыКлиент.ПараметрыВопросаПользователю();
|
||||
ПараметрыВопроса.Картинка = БиблиотекаКартинок.Предупреждение32;
|
||||
ПараметрыВопроса.ПредлагатьБольшеНеЗадаватьЭтотВопрос = Ложь;
|
||||
ПараметрыВопроса.Заголовок = НСтр("ru = 'Неаккредитованный удостоверяющий центр'");
|
||||
СтандартныеПодсистемыКлиент.ПоказатьВопросПользователю(Неопределено, ТекстПредупреждения, РежимДиалогаВопрос.ОК, ПараметрыВопроса);
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
&НаСервере
|
||||
Процедура ДобавитьУдостоверяющийЦентрСертификатаВРазрешенные()
|
||||
|
||||
Элементы.ДекорацияНадпись.Видимость = Ложь;
|
||||
|
||||
Если Не ЗначениеЗаполнено(Параметры.Сертификат) Тогда
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
|
||||
МодульЭлектроннаяПодписьКлиентСерверЛокализация = ОбщегоНазначения.ОбщийМодуль(
|
||||
"ЭлектроннаяПодписьКлиентСерверЛокализация");
|
||||
|
||||
Если МодульЭлектроннаяПодписьКлиентСерверЛокализация = Неопределено Тогда
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
|
||||
Сертификат = Параметры.Сертификат;
|
||||
|
||||
Если ТипЗнч(Сертификат) = Тип("Строка") И ЭтоАдресВременногоХранилища(Сертификат) Тогда
|
||||
|
||||
Сертификат = ПолучитьИзВременногоХранилища(Сертификат);
|
||||
|
||||
ИначеЕсли ТипЗнч(Сертификат) = Тип("СправочникСсылка.СертификатыКлючейЭлектроннойПодписиИШифрования") Тогда
|
||||
|
||||
Сертификат = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Сертификат, "ДанныеСертификата").Получить();
|
||||
|
||||
КонецЕсли;
|
||||
|
||||
Если ТипЗнч(Сертификат) <> Тип("ДвоичныеДанные") Тогда
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
|
||||
Сертификат = Новый СертификатКриптографии(Сертификат);
|
||||
|
||||
ДанныеДляПроверкиУдостоверяющегоЦентра = МодульЭлектроннаяПодписьКлиентСерверЛокализация.ДанныеДляПроверкиУдостоверяющегоЦентра(
|
||||
Сертификат);
|
||||
ЗначенияПоиска = ДанныеДляПроверкиУдостоверяющегоЦентра.ЗначенияПоиска;
|
||||
|
||||
Если ЗначенияПоиска = Неопределено Тогда
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
|
||||
МассивПолейПоиска = СтрРазделить(ЗначенияПоиска, ",");
|
||||
|
||||
ЗначениеДляДобавления = МассивПолейПоиска[0];
|
||||
|
||||
РазрешенныеУЦ = СтрРазделить(НаборКонстант.РазрешенныеНеаккредитованныеУЦ, ",;" + Символы.ПС);
|
||||
Если РазрешенныеУЦ.Найти(ЗначениеДляДобавления) = Неопределено Тогда
|
||||
|
||||
ПредставлениеИздателя = ЭлектроннаяПодписьСлужебныйКлиентСервер.ПредставлениеИздателя(Сертификат);
|
||||
|
||||
Элементы.ДекорацияНадпись.Видимость = Истина;
|
||||
|
||||
ЕстьПраваНаИзменение = ПравоДоступа("Изменение", Метаданные.Константы.РазрешенныеНеаккредитованныеУЦ);
|
||||
|
||||
Если Не ЕстьПраваНаИзменение Тогда
|
||||
ТекстПредупреждения = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
|
||||
НСтр("ru='Обратитесь к администратору для добавления ОГРН %1 удостоверяющего центра ""%2"" в список разрешенных неаккредитованных УЦ.'"),
|
||||
ЗначениеДляДобавления, ПредставлениеИздателя);
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
|
||||
РазрешенныеУЦ.Вставить(0, ЗначениеДляДобавления);
|
||||
НаборКонстант.РазрешенныеНеаккредитованныеУЦ = СтрСоединить(РазрешенныеУЦ, Символы.ПС);
|
||||
Элементы.ДекорацияНадпись.Заголовок = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
|
||||
НСтр("ru='Нажмите ""Записать и закрыть"", чтобы добавить ОГРН %1 удостоверяющего центра ""%2"" в список разрешенных.'"),
|
||||
ЗначениеДляДобавления, ПредставлениеИздателя);
|
||||
|
||||
КонецЕсли;
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
#КонецОбласти
|
||||
@@ -2441,6 +2441,12 @@
|
||||
ТекущаяОбласть.Текст = ТекущееЗначение;
|
||||
ИначеЕсли ТекущаяОбласть.ТипОбласти = ТипОбластиЯчеекТабличногоДокумента.Строки Тогда
|
||||
ТекущаяОбласть.Имя = "";
|
||||
|
||||
Область = ТабличныйДокумент.Область(ТекущаяОбласть.Верх, 1, ТекущаяОбласть.Верх, 1);
|
||||
Если Область.Текст = "" Тогда
|
||||
Область.Текст = "";
|
||||
КонецЕсли;
|
||||
|
||||
ТекущаяОбласть.ПараметрРасшифровки = ТекущееЗначение;
|
||||
|
||||
Если ЗначениеЗаполнено(ТекущееЗначение) Тогда
|
||||
|
||||
@@ -6,6 +6,46 @@
|
||||
// https://creativecommons.org/licenses/by/4.0/legalcode
|
||||
///////////////////////////////////////////////////////////////////////////////////////////////////////
|
||||
|
||||
#Область СлужебныйПрограммныйИнтерфейс
|
||||
|
||||
Функция ТипыАдресныхОбъектовДляРаспознаванияАдреса() Экспорт
|
||||
|
||||
Запрос = Новый Запрос;
|
||||
Запрос.Текст =
|
||||
"ВЫБРАТЬ
|
||||
| УровниСокращенийАдресныхСведений.Сокращение КАК Сокращение
|
||||
|ИЗ
|
||||
| РегистрСведений.УровниСокращенийАдресныхСведений КАК УровниСокращенийАдресныхСведений";
|
||||
|
||||
РезультатЗапроса = Запрос.Выполнить();
|
||||
|
||||
Если РезультатЗапроса.Пустой() Тогда
|
||||
АдресныеСокращения = РегистрыСведений.АдресныеОбъекты.АдресныеСокращения();
|
||||
Иначе
|
||||
АдресныеСокращения = РезультатЗапроса.Выгрузить();
|
||||
КонецЕсли;
|
||||
|
||||
АдресныеСокращения.Колонки.Добавить("Длина", ОбщегоНазначения.ОписаниеТипаЧисло(3));
|
||||
АдресныеСокращения.Колонки.Добавить("СокращениеВНачале", ОбщегоНазначения.ОписаниеТипаСтрока(20));
|
||||
АдресныеСокращения.Колонки.Добавить("СокращениеВКонце", ОбщегоНазначения.ОписаниеТипаСтрока(20));
|
||||
|
||||
Для каждого ЭлементИзПеречня Из АдресныеСокращения Цикл
|
||||
ЭлементИзПеречня.СокращениеВНачале = ВРег(ЭлементИзПеречня.Сокращение) + " ";
|
||||
ЭлементИзПеречня.СокращениеВКонце = " " + ВРег(ЭлементИзПеречня.Сокращение);
|
||||
ЭлементИзПеречня.Длина = СтрДлина(ЭлементИзПеречня.Сокращение);
|
||||
КонецЦикла;
|
||||
|
||||
АдресныеСокращения.Свернуть("Длина, СокращениеВНачале, СокращениеВКонце");
|
||||
|
||||
АдресныеСокращения.Индексы.Добавить("Длина");
|
||||
АдресныеСокращения.Сортировать("Длина Убыв");
|
||||
|
||||
Возврат АдресныеСокращения;
|
||||
|
||||
КонецФункции
|
||||
|
||||
#КонецОбласти
|
||||
|
||||
#Область СлужебныеПроцедурыИФункции
|
||||
|
||||
// HTTPСоединение для вызова веб-сервиса 1С.
|
||||
@@ -318,6 +358,7 @@
|
||||
|
||||
КонецФункции
|
||||
|
||||
|
||||
Функция МуниципальныеРайоны() Экспорт
|
||||
|
||||
// АПК: 1297-выкл Данные адресного классификатора, не локализуются
|
||||
|
||||
@@ -2386,7 +2386,12 @@
|
||||
РезультатЗапроса = Запрос.ВыполнитьПакет();
|
||||
|
||||
СопоставленныеЧастиАдреса = СопоставленныеЧастиАдреса(РезультатЗапроса);
|
||||
ДомаЗдания = ДомаЗдания(РезультатЗапроса);
|
||||
|
||||
Если СопоставленныеЧастиАдреса.Количество() = 0 Тогда
|
||||
Возврат Адрес;
|
||||
КонецЕсли;
|
||||
|
||||
ДомаЗдания = ДомаЗдания(РезультатЗапроса);
|
||||
|
||||
// дома здания
|
||||
КодыДомовВладенийИСтроений = КодыДомовВладенийИСтроений();
|
||||
@@ -2397,22 +2402,22 @@
|
||||
|
||||
Для каждого ЭлементАдреса Из ДомаЗдания Цикл
|
||||
|
||||
Тип = ВРег(СокрЛП(СтрЗаменить(ЭлементАдреса.Наименование, "№", "")));
|
||||
Значение = ЭлементАдреса.Сокращение;
|
||||
Тип = ВРег(СокрЛП(СтрЗаменить(ЭлементАдреса.Сокращение, "№", "")));
|
||||
Значение = ЭлементАдреса.Наименование;
|
||||
|
||||
Если КодыДомовВладенийИСтроений.Дома[Тип] <> Неопределено Тогда
|
||||
СведенияОДоме.ТипДома = ТРег(ЭлементАдреса.Наименование);
|
||||
СведенияОДоме.ТипДома = ТРег(ЭлементАдреса.Сокращение);
|
||||
СведенияОДоме.НомерДома = Значение;
|
||||
ИначеЕсли КодыДомовВладенийИСтроений.Строения[Тип] <> Неопределено Тогда
|
||||
Строения.Добавить(ЗначениеСтроенияИлиПомещения(ТРег(ЭлементАдреса.Наименование), Значение));
|
||||
Строения.Добавить(ЗначениеСтроенияИлиПомещения(ТРег(ЭлементАдреса.Сокращение), Значение));
|
||||
Если КодыДомовВладенийИСтроений.Строения[Тип] = -1 Тогда
|
||||
СведенияОДоме.НомерКорпуса = Значение;
|
||||
Иначе
|
||||
СведенияОДоме.ТипСтроения = ТРег(ЭлементАдреса.Наименование);
|
||||
СведенияОДоме.ТипСтроения = ТРег(ЭлементАдреса.Сокращение);
|
||||
СведенияОДоме.НомерСтроения = Значение;
|
||||
КонецЕсли;
|
||||
Иначе
|
||||
Квартиры.Добавить(ЗначениеСтроенияИлиПомещения(ТРег(ЭлементАдреса.Наименование), Значение));
|
||||
Квартиры.Добавить(ЗначениеСтроенияИлиПомещения(ТРег(ЭлементАдреса.Сокращение), Значение));
|
||||
КонецЕсли;
|
||||
|
||||
КонецЦикла;
|
||||
@@ -2436,10 +2441,6 @@
|
||||
СоединениеМуниципальный = Новый Массив;
|
||||
Где = Новый Массив;
|
||||
|
||||
Если СопоставленныеЧастиАдреса.Количество() = 0 Тогда
|
||||
Возврат Адрес;
|
||||
КонецЕсли;
|
||||
|
||||
Для Счетчик = 1 По СопоставленныеЧастиАдреса.Количество() Цикл
|
||||
|
||||
Выбор.Добавить(СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(ШаблонВыбор, Счетчик));
|
||||
@@ -7512,26 +7513,37 @@
|
||||
|
||||
Процедура ОбработатьОбщепринятыеСокращения(ДоступныеУровни)
|
||||
|
||||
ОбщепринятыеСокращения = Новый Соответствие();
|
||||
ОбщепринятыеСокращения.Вставить("КОРП", "Корпус");
|
||||
ОбщепринятыеСокращения.Вставить("КОРП.", "Корпус");
|
||||
ОбщепринятыеСокращения.Вставить("К.", "Корпус");
|
||||
ОбщепринятыеСокращения.Вставить("КВ.", "Квартира");
|
||||
ОбщепринятыеСокращения.Вставить("КВ", "Квартира");
|
||||
ОбщепринятыеСокращения.Вставить("ОФ.", "Офис");
|
||||
ОбщепринятыеСокращения.Вставить("ОФ.", "Офис");
|
||||
ОбщепринятыеСокращения.Вставить("ПОМЕЩ", "Квартира");
|
||||
ОбщепринятыеСокращения.Вставить("ПОМЕЩ.", "Квартира");
|
||||
ОбщепринятыеСокращения.Вставить("Д", "Дом");
|
||||
ОбщепринятыеСокращения.Вставить("Д.", "Дом");
|
||||
ОбщепринятыеСокращения.Вставить("СТР.", "Строение");
|
||||
ОбщепринятыеСокращения.Вставить("ЛИТЕР", "Литера");
|
||||
|
||||
Фильтр = Новый Структура("Уровень", 0);
|
||||
НераспознанныеСтроки = ДоступныеУровни.НайтиСтроки(Фильтр);
|
||||
Для каждого НераспознаннаяЧастьАдреса Из НераспознанныеСтроки Цикл
|
||||
Если (ВРЕГ(НераспознаннаяЧастьАдреса.Наименование) = "МОСКВА"
|
||||
ИЛИ ВРЕГ(НераспознаннаяЧастьАдреса.Наименование) = "САНКТ-ПЕТЕРБУРГ")
|
||||
Или ВРЕГ(НераспознаннаяЧастьАдреса.Наименование) = "САНКТ-ПЕТЕРБУРГ")
|
||||
И ПустаяСтрока(НераспознаннаяЧастьАдреса.Сокращение) Тогда
|
||||
НераспознаннаяЧастьАдреса.Сокращение = "г";
|
||||
НераспознаннаяЧастьАдреса.Значение = НераспознаннаяЧастьАдреса.Наименование + " " + НераспознаннаяЧастьАдреса.Сокращение;
|
||||
ИначеЕсли ВРЕГ(НераспознаннаяЧастьАдреса.Наименование) = "КОРП" Или ВРЕГ(НераспознаннаяЧастьАдреса.Наименование) = "КОРП." Тогда
|
||||
НераспознаннаяЧастьАдреса.Наименование = "Корпус";
|
||||
ИначеЕсли ВРЕГ(НераспознаннаяЧастьАдреса.Наименование) = "КВ" Или ВРЕГ(НераспознаннаяЧастьАдреса.Наименование) = "КВ." Тогда
|
||||
НераспознаннаяЧастьАдреса.Наименование = "Квартира";
|
||||
ИначеЕсли ВРЕГ(НераспознаннаяЧастьАдреса.Наименование) = "ОФ" Или ВРЕГ(НераспознаннаяЧастьАдреса.Наименование) = "ОФ." Тогда
|
||||
НераспознаннаяЧастьАдреса.Наименование = "Квартира";
|
||||
ИначеЕсли ВРЕГ(НераспознаннаяЧастьАдреса.Наименование) = "ПОМЕЩ" Или ВРЕГ(НераспознаннаяЧастьАдреса.Наименование) = "ПОМЕЩ." Тогда
|
||||
НераспознаннаяЧастьАдреса.Наименование = "Квартира";
|
||||
ИначеЕсли ВРЕГ(НераспознаннаяЧастьАдреса.Наименование) = "Д" Или ВРЕГ(НераспознаннаяЧастьАдреса.Наименование) = "Д." Тогда
|
||||
НераспознаннаяЧастьАдреса.Наименование = "Дом";
|
||||
ИначеЕсли ВРЕГ(НераспознаннаяЧастьАдреса.Наименование) = "ЛИТЕР" Тогда
|
||||
НераспознаннаяЧастьАдреса.Наименование = "Литера";
|
||||
НераспознаннаяЧастьАдреса.Значение = СоединитьНаименованиеИТипАдресногоОбъекта(НераспознаннаяЧастьАдреса.Наименование,
|
||||
НераспознаннаяЧастьАдреса.Сокращение, Истина);
|
||||
Иначе
|
||||
|
||||
Сокращение = ОбщепринятыеСокращения[ВРЕГ(НераспознаннаяЧастьАдреса.Сокращение)];
|
||||
Если Сокращение <> Неопределено Тогда
|
||||
НераспознаннаяЧастьАдреса.Сокращение = Сокращение;
|
||||
КонецЕсли;
|
||||
|
||||
КонецЕсли;
|
||||
КонецЦикла;
|
||||
|
||||
|
||||
@@ -761,6 +761,8 @@
|
||||
|
||||
ПараметрыЗаполнения = Неопределено;
|
||||
Если Выборка.Количество() > 0 Тогда
|
||||
ОбъектыДляОбработкиОтсутствуют = Ложь;
|
||||
Параметры.ОбработкаЗавершена = Ложь;
|
||||
ПараметрыЗаполнения = ОбновлениеИнформационнойБазыСлужебный.НаборПараметровДляЗаполненияОбъекта(Метаданные.НайтиПоПолномуИмени(ИмяОбъектСТЧПредставления));
|
||||
КонецЕсли;
|
||||
|
||||
|
||||
@@ -45,7 +45,7 @@
|
||||
Процедура ПриДобавленииПодсистемы(Описание) Экспорт
|
||||
|
||||
Описание.Имя = "СтандартныеПодсистемы";
|
||||
Описание.Версия = "3.1.7.110";
|
||||
Описание.Версия = "3.1.7.123";
|
||||
Описание.ИдентификаторИнтернетПоддержки = "SSL";
|
||||
Описание.РежимВыполненияОтложенныхОбработчиков = "Параллельно";
|
||||
Описание.ПараллельноеОтложенноеОбновлениеСВерсии = "2.3.3.0";
|
||||
|
||||
@@ -5782,7 +5782,8 @@
|
||||
ОписаниеПроцедурыЗаполнения = ОбработчикОбновления.ОбрабатываемыеДанные.Получить();
|
||||
ПорцииДляОбновления = ОписаниеПроцедурыЗаполнения.ПорцииДляОбновления;
|
||||
|
||||
Если ПорцииДляОбновления <> Неопределено Тогда
|
||||
Если ПорцииДляОбновления <> Неопределено
|
||||
И КонтекстОбработчика.Параметры.Свойство("ОбновляемыеДанные") Тогда
|
||||
ОбновляемыеДанные = КонтекстОбработчика.Параметры.ОбновляемыеДанные;
|
||||
|
||||
Если ОбновляемыеДанные <> Неопределено Тогда
|
||||
|
||||
@@ -216,6 +216,8 @@
|
||||
Сообщения["[СообщениеПараметрыФайлаРезервнойКопии]"] = НСтр("ru = '\r\n\Файл резервной копии уже существует: {0}\r\n\Создан: {1}\r\n\Последнее обращение: {2}\r\n\Последнее изменение: {3}\r\n\Размер: {4}\r\n\Тип: {5}\r\n\Атрибуты:\r\n\{6}'");
|
||||
Сообщения["[СообщениеДискНеСуществует]"] = НСтр("ru = '\r\n\Диск не найден по пути {0}\r\n\Исключение: {1}, {2}'");
|
||||
Сообщения["[СообщениеДискНедоступен]"] = НСтр("ru = 'Диск не доступен по пути {0}'");
|
||||
Сообщения["[СообщениеДисковогоПространстваДостаточно]"] = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
|
||||
НСтр("ru = 'Доступно на диске {0}: {1} Mb\r\n\Размер файла %1: {2} Mb\r\n\Тип диска: {3}'"), "1Cv8.1CD");
|
||||
Сообщения["[СообщениеДисковогоПространстваНедостаточно]"] = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
|
||||
НСтр("ru = '\r\n\Недостаточно свободного места для создания резервной копии.\r\n\Освободите место или укажите папку на другом диске.\r\n\Требуется: {0} Mb\r\n\Доступно на диске {1}: {2} Mb\r\n\Размер файла %1: {3} Mb\r\n\Тип диска: {4}'"), "1Cv8.1CD");
|
||||
Сообщения["[СообщениеРезультатСозданияРезервнойКопииБазы]"] = НСтр("ru = 'Резервная копия базы создана'");
|
||||
|
||||
@@ -138,8 +138,8 @@
|
||||
// ПриЗапуске - Булево - Истина, если вызывается при начале работы программы.
|
||||
// В этом случае недопустимо вызывать те серверные функции конфигурации,
|
||||
// которые рассчитывают на то, что запуск уже полностью завершен.
|
||||
// Например, вместо СтандартныеПодсистемыКлиентПовтИсп.ПараметрыРаботыКлиента
|
||||
// следует вызывать СтандартныеПодсистемыКлиентПовтИсп.ПараметрыРаботыКлиентаПриЗапуске.
|
||||
// Например, вместо СтандартныеПодсистемыКлиент.ПараметрыРаботыКлиента
|
||||
// следует вызывать СтандартныеПодсистемыКлиент.ПараметрыРаботыКлиентаПриЗапуске.
|
||||
//
|
||||
// Пример:
|
||||
// Для того чтобы в начале заголовка программы вывести название текущего проекта, следует определить параметр
|
||||
|
||||
@@ -96,7 +96,7 @@
|
||||
// при запуске конфигурации (в обработчиках событий ПередНачаломРаботыСистемы и ПриНачалеРаботыСистемы)
|
||||
// без дополнительных серверных вызовов.
|
||||
// Для получения значений этих параметров из клиентского кода
|
||||
// см. СтандартныеПодсистемыКлиентПовтИсп.ПараметрыРаботыКлиентаПриЗапуске.
|
||||
// см. СтандартныеПодсистемыКлиент.ПараметрыРаботыКлиентаПриЗапуске.
|
||||
//
|
||||
// Важно: недопустимо использовать команды сброса кэша повторно используемых модулей,
|
||||
// иначе запуск может привести к непредсказуемым ошибкам и лишним серверным вызовам.
|
||||
@@ -115,7 +115,7 @@
|
||||
// Позволяет задать значения параметров, необходимых для работы клиентского кода
|
||||
// конфигурации без дополнительных серверных вызовов.
|
||||
// Для получения этих параметров из клиентского кода
|
||||
// см. СтандартныеПодсистемыКлиентПовтИсп.ПараметрыРаботыКлиента.
|
||||
// см. СтандартныеПодсистемыКлиент.ПараметрыРаботыКлиента.
|
||||
//
|
||||
// Параметры:
|
||||
// Параметры - Структура - имена и значения параметров работы клиента, которые необходимо задать.
|
||||
|
||||
@@ -1948,8 +1948,6 @@
|
||||
НастройкиВхода.ПросрочкаРаботыВПрограммеДатаВключения = НачалоДня(ТекущаяДатаСеанса());
|
||||
КонецЕсли;
|
||||
|
||||
УстановитьПривилегированныйРежим(Истина);
|
||||
|
||||
Константы.НастройкиВходаПользователей.Установить(Новый ХранилищеЗначения(Настройки));
|
||||
|
||||
Если Не РазделениеВключено Тогда
|
||||
@@ -1961,8 +1959,6 @@
|
||||
|
||||
КонецЕсли;
|
||||
|
||||
УстановитьПривилегированныйРежим(Ложь);
|
||||
|
||||
ЗафиксироватьТранзакцию();
|
||||
|
||||
Исключение
|
||||
|
||||
@@ -2310,7 +2310,7 @@
|
||||
ГруппаРазмещенияНаФорме = Форма.Элементы.Вставить(ИмяГруппы, Тип("ГруппаФормы"),
|
||||
ЭлементРодитель, ЭлементРазмещения);
|
||||
|
||||
ТолькоОдинФайлТекст = ?(ДобавляемыйЭлемент.ТолькоОдинФайл, "ТолькоОдинФайл", "");
|
||||
ТолькоОдинФайлТекст = ?(ДобавляемыйЭлемент.ТолькоОдинФайл, РаботаСФайламиКлиентСервер.ТолькоОдинФайлТекст(), "");
|
||||
ЗаполнитьЗначенияСвойств(ГруппаРазмещенияНаФорме, СвойстваГруппыБезОтображения);
|
||||
|
||||
ГруппаШапка = Форма.Элементы.Добавить(
|
||||
|
||||
@@ -650,7 +650,7 @@
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
|
||||
НомерЭлемента = Число(ЧастиИмениКоманды[1]);
|
||||
НомерЭлемента = Число(СтрЗаменить(ЧастиИмениКоманды[1], РаботаСФайламиКлиентСервер.ТолькоОдинФайлТекст(), ""));
|
||||
ВладелецПрисоединенныхФайлов = ЗначениеПараметраПрисоединенногоФайла(Форма, НомерЭлемента, "ПутьКДаннымВладельца");
|
||||
Если Не ЗначениеЗаполнено(ВладелецПрисоединенныхФайлов) Тогда
|
||||
|
||||
@@ -1290,7 +1290,7 @@
|
||||
ИмяКоманды = СтрЗаменить(ЧастиИмениКоманды[0], "УправлениеПрисоединеннымиФайлами", "");
|
||||
|
||||
ПараметрыВыполнения = ПараметрыКомандыУправления(Форма);
|
||||
ПараметрыВыполнения.НомерЭлемента = ЧастиИмениКоманды[1];
|
||||
ПараметрыВыполнения.НомерЭлемента = СтрЗаменить(ЧастиИмениКоманды[1], РаботаСФайламиКлиентСервер.ТолькоОдинФайлТекст(), "");
|
||||
|
||||
ОбработчикЗавершения = Новый ОписаниеОповещения("ЗавершениеВыполненияКомандыСОповещением",
|
||||
ЭтотОбъект, ПараметрыВыполнения);
|
||||
|
||||
@@ -181,4 +181,8 @@
|
||||
|
||||
КонецФункции
|
||||
|
||||
Функция ТолькоОдинФайлТекст() Экспорт
|
||||
Возврат "ТолькоОдинФайл";
|
||||
КонецФункции
|
||||
|
||||
#КонецОбласти
|
||||
@@ -2723,12 +2723,9 @@
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
|
||||
ПроцессорВывода = Новый ПроцессорВыводаРезультатаКомпоновкиДанныхВКоллекциюЗначений;
|
||||
ДеревоЗначений = Новый ДеревоЗначений;
|
||||
ПроцессорВывода.УстановитьОбъект(ДеревоЗначений);
|
||||
ДеревоВладельцев = ВыбратьДанныеПоПравилу(Настройка, МассивИсключений, ПроцессорВывода);
|
||||
НенужныеФайлы = ВыбратьНенужныеФайлы(Настройка, МассивИсключений);
|
||||
МассивИсключений.Добавить(Настройка.ВладелецФайла);
|
||||
ОчиститьДанныеНенужныхФайлов(ДеревоВладельцев);
|
||||
ОчиститьДанныеНенужныхФайлов(НенужныеФайлы);
|
||||
КонецПроцедуры
|
||||
|
||||
Функция ТекстЗапросаДляОчисткиФайлов(ВладелецФайла, Настройка, МассивИсключений, ЭлементИсключение)
|
||||
@@ -2744,7 +2741,7 @@
|
||||
ТекстЗапроса =
|
||||
"ВЫБРАТЬ
|
||||
| ТИПЗНАЧЕНИЯ(Файлы.ВладелецФайла) КАК ВладелецФайла,
|
||||
| ВерсииФайлов.Размер /1024 /1024 КАК ОбъемНенужныхФайлов,
|
||||
| ВерсииФайлов.Размер / (1024 * 1024) КАК Размер,
|
||||
| Файлы.Ссылка КАК ФайлСсылка,
|
||||
| ВерсииФайлов.Ссылка КАК ВерсияСсылка
|
||||
|ИЗ
|
||||
@@ -2754,6 +2751,7 @@
|
||||
|ГДЕ
|
||||
| ВерсииФайлов.ДатаСоздания <= &ПериодОчистки
|
||||
| И НЕ Файлы.ПометкаУдаления
|
||||
| И &ЭтоНеГруппа
|
||||
| И ТИПЗНАЧЕНИЯ(Файлы.ВладелецФайла) = &ТипВладельца
|
||||
| И ВЫБОР
|
||||
| КОГДА ВерсииФайлов.ТипХраненияФайла = ЗНАЧЕНИЕ(Перечисление.ТипыХраненияФайлов.ВТомахНаДиске)
|
||||
@@ -2772,7 +2770,7 @@
|
||||
| СправочникВладелецФайла.Ссылка,
|
||||
| &Реквизиты,
|
||||
| ТИПЗНАЧЕНИЯ(Файлы.ВладелецФайла) КАК ВладелецФайла,
|
||||
| ВерсииФайлов.Размер /1024 /1024 КАК ОбъемНенужныхФайлов,
|
||||
| ВерсииФайлов.Размер / (1024 * 1024) КАК Размер,
|
||||
| Файлы.Ссылка КАК ФайлСсылка,
|
||||
| ВерсииФайлов.Ссылка КАК ВерсияСсылка
|
||||
|ИЗ
|
||||
@@ -2783,6 +2781,7 @@
|
||||
| ПО СправочникВладелецФайла.Ссылка = Файлы.ВладелецФайла
|
||||
|ГДЕ
|
||||
| НЕ Файлы.ПометкаУдаления
|
||||
| И &ЭтоНеГруппа
|
||||
| И НЕ ЕСТЬNULL(ВерсииФайлов.ПометкаУдаления, ЛОЖЬ)
|
||||
| И ВЫБОР
|
||||
| КОГДА ВерсииФайлов.ТипХраненияФайла = ЗНАЧЕНИЕ(Перечисление.ТипыХраненияФайлов.ВТомахНаДиске)
|
||||
@@ -2805,7 +2804,7 @@
|
||||
ТекстЗапроса =
|
||||
"ВЫБРАТЬ
|
||||
| ТИПЗНАЧЕНИЯ(Файлы.ВладелецФайла) КАК ВладелецФайла,
|
||||
| Файлы.Размер /1024 /1024 КАК ОбъемНенужныхФайлов,
|
||||
| Файлы.Размер / (1024 * 1024) КАК Размер,
|
||||
| Файлы.Ссылка КАК ФайлСсылка
|
||||
|ИЗ
|
||||
| #ТипВладельцаФайла КАК Файлы
|
||||
@@ -2814,6 +2813,7 @@
|
||||
|ГДЕ
|
||||
| Файлы.ДатаСоздания <= &ПериодОчистки
|
||||
| И НЕ Файлы.ПометкаУдаления
|
||||
| И &ЭтоНеГруппа
|
||||
| И ВЫБОР
|
||||
| КОГДА Файлы.ТипХраненияФайла = ЗНАЧЕНИЕ(Перечисление.ТипыХраненияФайлов.ВТомахНаДиске)
|
||||
| ТОГДА (ВЫРАЗИТЬ(Файлы.ПутьКФайлу КАК СТРОКА(100))) <> """"
|
||||
@@ -2831,7 +2831,7 @@
|
||||
"ВЫБРАТЬ
|
||||
| СправочникВладелецФайла.Ссылка,
|
||||
| ТИПЗНАЧЕНИЯ(Файлы.ВладелецФайла) КАК ВладелецФайла,
|
||||
| Файлы.Размер /1024 /1024 КАК ОбъемНенужныхФайлов,
|
||||
| Файлы.Размер / (1024 * 1024) КАК Размер,
|
||||
| &Реквизиты,
|
||||
| Файлы.Ссылка КАК ФайлСсылка
|
||||
|ИЗ
|
||||
@@ -2840,6 +2840,7 @@
|
||||
| ПО Файлы.ВладелецФайла = СправочникВладелецФайла.Ссылка
|
||||
|ГДЕ
|
||||
| НЕ Файлы.ПометкаУдаления
|
||||
| И &ЭтоНеГруппа
|
||||
| И ВЫБОР
|
||||
| КОГДА Файлы.ТипХраненияФайла = ЗНАЧЕНИЕ(Перечисление.ТипыХраненияФайлов.ВТомахНаДиске)
|
||||
| ТОГДА (ВЫРАЗИТЬ(Файлы.ПутьКФайлу КАК СТРОКА(100))) <> """"
|
||||
@@ -2850,7 +2851,6 @@
|
||||
ТекстЗапроса = СтрЗаменить(ТекстЗапроса, "&Реквизиты" + ",", РеквизитыВладельцаФайлов(ВладелецФайла));
|
||||
ТекстЗапроса = СтрЗаменить(ТекстЗапроса, "#ПолноеИмяСправочникаФайлов", ПолноеИмяСправочникаФайлов);
|
||||
ТекстЗапроса = СтрЗаменить(ТекстЗапроса, "#СправочникВладелецФайла", ВладелецФайла.ПолноеИмя);
|
||||
|
||||
КонецЕсли;
|
||||
КонецЕсли;
|
||||
|
||||
@@ -2867,6 +2867,8 @@
|
||||
| И ВерсииФайлов.Ссылка <> Файлы.ТекущаяВерсия
|
||||
| И ВерсииФайлов.РодительскаяВерсия <> ЗНАЧЕНИЕ(Справочник.ВерсииФайлов.ПустаяСсылка)"; // @query-part
|
||||
КонецЕсли;
|
||||
ТекстЗапроса = СтрЗаменить(ТекстЗапроса, "&ЭтоНеГруппа",
|
||||
?(МетаданныеОбъектаФайлов.Иерархический, "НЕ Файлы.ЭтоГруппа", "ИСТИНА")); // @query-part
|
||||
|
||||
Возврат ТекстЗапроса;
|
||||
|
||||
@@ -2966,9 +2968,9 @@
|
||||
// Сведения об очищаемых файлах.
|
||||
//
|
||||
// Возвращаемое значение:
|
||||
// Структура - сведения об очищаемых файлах:
|
||||
// * ОбъемУдаляемыхФайлов - Число - результат отчета см. Отчеты.ПроверкаЦелостностиТома.
|
||||
// * ОбъемНенужныхФайлов - Число - результат отчета см. Отчеты.ОбъемНенужныхФайлов.
|
||||
// Структура:
|
||||
// * ОбъемУдаляемыхФайлов - Число - в Мб, результат отчета, см. Отчеты.ПроверкаЦелостностиТома.
|
||||
// * ОбъемНенужныхФайлов - Число - в Мб, результат отчета, см. Отчеты.ОбъемНенужныхФайлов.
|
||||
//
|
||||
Функция СведенияОбОчищаемыхФайлах() Экспорт
|
||||
Результат = Новый Структура;
|
||||
@@ -2990,7 +2992,7 @@
|
||||
Файл = Новый Файл(ЛишнийФайл.ПолноеИмя);
|
||||
|
||||
Если Файл.Существует() Тогда
|
||||
Результат.ОбъемУдаляемыхФайлов = Результат.ОбъемУдаляемыхФайлов + Файл.Размер() ;
|
||||
Результат.ОбъемУдаляемыхФайлов = Результат.ОбъемУдаляемыхФайлов + Файл.Размер();
|
||||
КонецЕсли;
|
||||
КонецЦикла;
|
||||
|
||||
@@ -5595,25 +5597,16 @@
|
||||
#Область ОчисткаНенужныхФайлов
|
||||
|
||||
// Параметры:
|
||||
// ДеревоВладельцев - СтрокаДереваЗначений:
|
||||
// * ФайлСсылка - ОпределяемыйТип.ПрисоединенныйФайл
|
||||
// * ВерсияСсылка - ОпределяемыйТип.ПрисоединенныйФайл
|
||||
// * ИдентификаторВладельца - СправочникСсылка.ИдентификаторыОбъектовМетаданных
|
||||
// * ЭтоНастройкаДляЭлементаСправочника - Булево
|
||||
// * ТипВладельцаФайла - СправочникСсылка.ИдентификаторыОбъектовМетаданных
|
||||
// * ПравилоОтбора - ХранилищеЗначения
|
||||
// * Действие - ПеречислениеСсылка.ВариантыОчисткиФайлов
|
||||
// * ПериодОчистки - ПеречислениеСсылка.ПериодОчисткиФайлов
|
||||
// * ЭтоФайл - Булево
|
||||
// НенужныеФайлы - см. ВыбратьНенужныеФайлы
|
||||
//
|
||||
Процедура ОчиститьДанныеНенужныхФайлов(ДеревоВладельцев)
|
||||
Процедура ОчиститьДанныеНенужныхФайлов(НенужныеФайлы)
|
||||
|
||||
Если ДеревоВладельцев.Строки.Количество() = 0 Тогда
|
||||
Если НенужныеФайлы.Строки.Количество() = 0 Тогда
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
|
||||
УдаляемыеПрисоединенныеФайлы = Новый Массив;
|
||||
Для Каждого Файл Из ДеревоВладельцев.Строки Цикл
|
||||
Для Каждого Файл Из НенужныеФайлы.Строки Цикл
|
||||
ПрисоединенныйФайл = Файл.ФайлСсылка; // ОпределяемыйТип.ПрисоединенныйФайл
|
||||
ПодготовленныйФайл = ПодготовитьФайлКУдалению(ПрисоединенныйФайл);
|
||||
Если ЗначениеЗаполнено(ПодготовленныйФайл) Тогда
|
||||
@@ -5649,7 +5642,7 @@
|
||||
Если ЕстьМестаИспользования Тогда
|
||||
Продолжить;
|
||||
КонецЕсли;
|
||||
ПрисоединенныйФайл = ДеревоВладельцев.Строки.Найти(ПрисоединенныйФайл, "ФайлСсылка");
|
||||
ПрисоединенныйФайл = НенужныеФайлы.Строки.Найти(ПрисоединенныйФайл, "ФайлСсылка");
|
||||
УдалитьНенужныеФайлы(ПрисоединенныйФайл);
|
||||
КонецЦикла;
|
||||
|
||||
@@ -5696,7 +5689,7 @@
|
||||
КонецФункции
|
||||
|
||||
// Параметры:
|
||||
// ОписаниеПрисоединенногоФайла - см. ОчиститьДанныеНенужныхФайлов.ДеревоВладельцев
|
||||
// ОписаниеПрисоединенногоФайла - СтрокаДереваЗначения из см. ВыбратьНенужныеФайлы
|
||||
//
|
||||
Процедура УдалитьНенужныеФайлы(ОписаниеПрисоединенногоФайла)
|
||||
|
||||
@@ -5782,7 +5775,17 @@
|
||||
Возврат Истина;
|
||||
КонецФункции
|
||||
|
||||
Функция ВыбратьДанныеПоПравилу(НастройкаОчистки, МассивИсключений, ПроцессорВывода) Экспорт
|
||||
// Параметры:
|
||||
// НастройкаОчистки - СтрокаТаблицыЗначений из см. РегистрыСведений.НастройкиОчисткиФайлов.ТекущиеНастройкиОчистки
|
||||
// МассивИсключений - Массив из ОпределяемыйТип.ВладелецФайлов
|
||||
//
|
||||
// Возвращаемое значение:
|
||||
// ДеревоЗначений:
|
||||
// * ФайлСсылка - ОпределяемыйТип.ПрисоединенныйФайл
|
||||
// * ВладелецФайла - Тип - тип ОпределяемыйТип.ВладелецФайлов.
|
||||
// * Размер - Число - размер в Мб.
|
||||
//
|
||||
Функция ВыбратьНенужныеФайлы(НастройкаОчистки, МассивИсключений) Экспорт
|
||||
|
||||
КомпоновщикНастроек = Новый КомпоновщикНастроекКомпоновкиДанных;
|
||||
|
||||
@@ -5820,14 +5823,15 @@
|
||||
|
||||
ВыбранноеПоле = Структура.Выбор.Элементы.Добавить(Тип("ВыбранноеПолеКомпоновкиДанных"));
|
||||
ВыбранноеПоле.Поле = Новый ПолеКомпоновкиДанных("ФайлСсылка");
|
||||
ВыбранноеПоле = Структура.Выбор.Элементы.Добавить(Тип("ВыбранноеПолеКомпоновкиДанных"));
|
||||
ВыбранноеПоле.Поле = Новый ПолеКомпоновкиДанных("ВладелецФайла");
|
||||
ВыбранноеПоле = Структура.Выбор.Элементы.Добавить(Тип("ВыбранноеПолеКомпоновкиДанных"));
|
||||
ВыбранноеПоле.Поле = Новый ПолеКомпоновкиДанных("Размер");
|
||||
|
||||
Если НастройкаОчистки.ЭтоФайл Тогда
|
||||
|
||||
СтруктураВерсий = Структура.Структура.Добавить(Тип("ГруппировкаКомпоновкиДанных"));
|
||||
|
||||
ВыбранноеПоле = СтруктураВерсий.Выбор.Элементы.Добавить(Тип("ВыбранноеПолеКомпоновкиДанных"));
|
||||
ВыбранноеПоле.Поле = Новый ПолеКомпоновкиДанных("ВерсияСсылка");
|
||||
|
||||
КонецЕсли;
|
||||
|
||||
КомпоновщикНастроек.Инициализировать(Новый ИсточникДоступныхНастроекКомпоновкиДанных(СхемаКомпоновкиДанных));
|
||||
@@ -5870,11 +5874,14 @@
|
||||
КомпоновщикМакета = Новый КомпоновщикМакетаКомпоновкиДанных;
|
||||
ПроцессорКомпоновкиДанных = Новый ПроцессорКомпоновкиДанных;
|
||||
|
||||
МакетКомпоновкиДанных = КомпоновщикМакета.Выполнить(СхемаКомпоновкиДанных, КомпоновщикНастроек.Настройки, , , Тип("ГенераторМакетаКомпоновкиДанныхДляКоллекцииЗначений"));
|
||||
МакетКомпоновкиДанных = КомпоновщикМакета.Выполнить(СхемаКомпоновкиДанных, КомпоновщикНастроек.Настройки, , ,
|
||||
Тип("ГенераторМакетаКомпоновкиДанныхДляКоллекцииЗначений"));
|
||||
ПроцессорКомпоновкиДанных.Инициализировать(МакетКомпоновкиДанных);
|
||||
|
||||
Результат = ПроцессорВывода.Вывести(ПроцессорКомпоновкиДанных);
|
||||
ПроцессорВывода = Новый ПроцессорВыводаРезультатаКомпоновкиДанныхВКоллекциюЗначений;
|
||||
ПроцессорВывода.УстановитьОбъект(Новый ДеревоЗначений);
|
||||
|
||||
Результат = ПроцессорВывода.Вывести(ПроцессорКомпоновкиДанных);
|
||||
Возврат Результат;
|
||||
|
||||
КонецФункции
|
||||
@@ -7472,6 +7479,9 @@
|
||||
|
||||
Процедура ВыполнитьСинхронизациюФайловОблачнымСервисом(ПараметрыСинхронизации)
|
||||
|
||||
// Корневая запись о начале синхронизации
|
||||
ЗапомнитьСерверныеДанныеСсылки("", "", "", Ложь, Неопределено, Ложь, ПараметрыСинхронизации.УчетнаяЗапись);
|
||||
|
||||
ДеревоФайловСервера = СформироватьСтруктуруДереваФайловСервера();
|
||||
АдресСервера = КодироватьURIПоСтруктуре(ПараметрыСинхронизации.СтруктураАдресаСервера);
|
||||
|
||||
@@ -7483,34 +7493,33 @@
|
||||
ЗаголовкиHTTP["Accept"] = "text/xml";
|
||||
ЗаголовкиHTTP["Depth"] = "0";
|
||||
|
||||
Результат = ВыполнитьМетодWebdav("PROPFIND", АдресСервера, ЗаголовкиHTTP, ПараметрыСинхронизации);
|
||||
Если Не Результат.Успешно Тогда
|
||||
ВызватьМетодMKCOL(АдресСервера, ПараметрыСинхронизации);
|
||||
КонецЕсли;
|
||||
Попытка
|
||||
Результат = ВыполнитьМетодWebdav("PROPFIND", АдресСервера, ЗаголовкиHTTP, ПараметрыСинхронизации);
|
||||
Если Не Результат.Успешно Тогда
|
||||
ВызватьМетодMKCOL(АдресСервера, ПараметрыСинхронизации);
|
||||
КонецЕсли;
|
||||
Исключение
|
||||
ТекстСобытия = НСтр("ru = 'Не удалось создать корневую папку на сервере, синхронизация файлов не выполнена.'");
|
||||
ЗаписатьВЖурналСобытийСинхронизацииФайлов(ТекстСобытия, ПараметрыСинхронизации.УчетнаяЗапись, УровеньЖурналаРегистрации.Ошибка);
|
||||
Возврат;
|
||||
КонецПопытки
|
||||
|
||||
КонецЕсли;
|
||||
|
||||
Отказ = Ложь;
|
||||
СинхронизацияВыполнена = Истина;
|
||||
|
||||
// Корневая запись о начале синхронизации
|
||||
ЗапомнитьСерверныеДанныеСсылки("", "", "", Ложь, Неопределено, Ложь, ПараметрыСинхронизации.УчетнаяЗапись);
|
||||
|
||||
СкачатьДеревоФайловРекурсивно(ДеревоФайловСервера.Строки, АдресСервера, ПараметрыСинхронизации, Отказ);
|
||||
|
||||
Если Отказ = Истина Тогда
|
||||
|
||||
ТекстСобытия = НСтр("ru = 'Не удалось загрузить структуру файлов с сервера, синхронизация не выполнена.'");
|
||||
ТекстСобытия = НСтр("ru = 'Не удалось загрузить структуру файлов с сервера, синхронизация файлов не выполнена.'");
|
||||
ЗаписатьВЖурналСобытийСинхронизацииФайлов(ТекстСобытия, ПараметрыСинхронизации.УчетнаяЗапись, УровеньЖурналаРегистрации.Ошибка);
|
||||
Возврат;
|
||||
|
||||
КонецЕсли;
|
||||
|
||||
// Сравниваем с деревом файлов в системе, синхронизация идет по уникальному идентификатору.
|
||||
ТаблицаФайлов = ВыбратьДанныеПоПравилам(ПараметрыСинхронизации.УчетнаяЗапись);
|
||||
|
||||
Если ТаблицаФайлов = Неопределено Тогда
|
||||
ТекстСобытия = НСтр("ru = 'Не удалось получить таблицу файлов из информационной базы, синхронизация не выполнена.'");
|
||||
ТекстСобытия = НСтр("ru = 'Не удалось получить таблицу файлов из информационной базы, синхронизация файлов не выполнена.'");
|
||||
ЗаписатьВЖурналСобытийСинхронизацииФайлов(ТекстСобытия, ПараметрыСинхронизации.УчетнаяЗапись, УровеньЖурналаРегистрации.Ошибка);
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
@@ -8478,10 +8487,10 @@
|
||||
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.ЭлектроннаяПодпись") Тогда
|
||||
Если ИмяСправочника = "ВерсииФайлов" Тогда
|
||||
ТекстЗапроса = ТекстЗапроса + "
|
||||
| И НЕ Файлы.Владелец.Зашифрован"; // @query-part-1
|
||||
| И НЕ Файлы.Владелец.Зашифрован"; // @query-part
|
||||
Иначе
|
||||
ТекстЗапроса = ТекстЗапроса + "
|
||||
| И НЕ Файлы.Зашифрован"; // @query-part-1
|
||||
| И НЕ Файлы.Зашифрован"; // @query-part
|
||||
КонецЕсли;
|
||||
КонецЕсли;
|
||||
|
||||
@@ -8813,7 +8822,7 @@
|
||||
ИЛИ РеквизитыФайла.Том <> ТекущаяВерсия.Том
|
||||
ИЛИ РеквизитыФайла.ПутьКФайлу <> ТекущаяВерсия.ПутьКФайлу
|
||||
ИЛИ РеквизитыФайла.ИндексКартинки <> ТекущаяВерсия.ИндексКартинки
|
||||
ИЛИ РеквизитыФайла.ДатаМодификацииУниверсальная <> ТекущаяВерсия.ДатаМодификацииФайла Тогда
|
||||
ИЛИ РеквизитыФайла.ДатаМодификацииУниверсальная <> ТекущаяВерсия.ДатаМодификацииУниверсальная Тогда
|
||||
НачатьТранзакцию();
|
||||
Попытка
|
||||
БлокировкаДанных = Новый БлокировкаДанных;
|
||||
|
||||
@@ -627,6 +627,7 @@
|
||||
Файл.ВладелецФайла = Владелец;
|
||||
Файл.Наименование = СведенияОФайле.ИмяБезРасширения;
|
||||
Файл.Автор = ?(СведенияОФайле.Автор <> Неопределено, СведенияОФайле.Автор, Пользователи.АвторизованныйПользователь());
|
||||
Файл.Изменил = Файл.Автор;
|
||||
Файл.ДатаСоздания = ТекущаяДатаСеанса();
|
||||
Файл.Описание = СведенияОФайле.Комментарий;
|
||||
Файл.ИндексКартинки = РаботаСФайламиСлужебныйКлиентСервер.ПолучитьИндексПиктограммыФайла(Неопределено);
|
||||
|
||||
@@ -2414,7 +2414,7 @@
|
||||
ПараметрыЦикла = Новый Структура();
|
||||
ПараметрыЦикла.Вставить("ВидОперации", НСтр("ru = 'Подготовка транзакции'", КодЯзыка()));
|
||||
ПараметрыЦикла.Вставить("НастройкиПользователя", ПараметрыВыполнения.НастройкиПользователя);
|
||||
ПараметрыЦикла.Вставить("ПараметрыВыполнения", ПараметрыВыполнения);
|
||||
ПараметрыЦикла.Вставить("ПараметрыВыполнения", ПроверитьПараметрыОперации(ПараметрыВыполнения));
|
||||
ПараметрыЦикла.Вставить("ПараметрыОперации", ДополнимПараметры);
|
||||
ПараметрыЦикла.Вставить("ОповещениеОЗавершении", ОповещениеОЗавершении);
|
||||
|
||||
@@ -7226,7 +7226,8 @@
|
||||
Если ПараметрыФормы <> Неопределено Тогда
|
||||
Для каждого СтрокаКлюча Из Результат Цикл
|
||||
|
||||
Если ТипЗнч(СтрокаКлюча.Значение) = Тип("ФормаКлиентскогоПриложения") Тогда
|
||||
Если ТипЗнч(СтрокаКлюча.Значение) = Тип("ФормаКлиентскогоПриложения")
|
||||
ИЛИ ТипЗнч(СтрокаКлюча.Значение) = Тип("ОписаниеОповещения") Тогда
|
||||
Результат.Вставить(СтрокаКлюча.Ключ, Неопределено);
|
||||
ИначеЕсли ТипЗнч(СтрокаКлюча.Значение) = Тип("Структура") Тогда
|
||||
Результат.Вставить(СтрокаКлюча.Ключ, ПодготовитьПараметрыФормы(СтрокаКлюча.Значение));
|
||||
|
||||
@@ -11,7 +11,7 @@
|
||||
// См. СтандартныеПодсистемыКлиент.ПараметрыРаботыКлиентаПриЗапуске().
|
||||
Функция ПараметрыРаботыКлиентаПриЗапуске() Экспорт
|
||||
|
||||
ПроверитьПорядокЗапускаПрограммыПередНачаломРаботыСистемы();
|
||||
ПроверитьЗапускПрограммыЗавершен(Истина);
|
||||
|
||||
ПараметрыПриЗапускеПрограммы = ПараметрыПриложения["СтандартныеПодсистемы.ПараметрыПриЗапускеПрограммы"];
|
||||
|
||||
@@ -59,8 +59,7 @@
|
||||
// См. СтандартныеПодсистемыКлиент.ПараметрыРаботыКлиента().
|
||||
Функция ПараметрыРаботыКлиента() Экспорт
|
||||
|
||||
ПроверитьПорядокЗапускаПрограммыПередНачаломРаботыСистемы();
|
||||
ПроверитьПорядокЗапускаПрограммыПриНачалеРаботыСистемы();
|
||||
ПроверитьЗапускПрограммыЗавершен();
|
||||
|
||||
СвойстваКлиента = Новый Структура;
|
||||
СтандартныеПодсистемыКлиент.ЗаполнитьПараметрыРаботыКлиентаНаСервере(СвойстваКлиента);
|
||||
@@ -69,8 +68,6 @@
|
||||
|
||||
КонецФункции
|
||||
|
||||
#Область ПредопределенныйЭлемент
|
||||
|
||||
// См. СтандартныеПодсистемыПовтИсп.СсылкиПоИменамПредопределенных
|
||||
Функция СсылкиПоИменамПредопределенных(ПолноеИмяОбъектаМетаданных) Экспорт
|
||||
|
||||
@@ -78,28 +75,27 @@
|
||||
|
||||
КонецФункции
|
||||
|
||||
#КонецОбласти
|
||||
|
||||
Процедура ПроверитьПорядокЗапускаПрограммыПередНачаломРаботыСистемы()
|
||||
Процедура ПроверитьЗапускПрограммыЗавершен(ТолькоПередНачаломРаботыСистемы = Ложь)
|
||||
|
||||
ИмяПараметра = "СтандартныеПодсистемы.ЗапускПрограммыЗавершен";
|
||||
Если ПараметрыПриложения[ИмяПараметра] = Неопределено Тогда
|
||||
ВызватьИсключение СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
|
||||
НСтр("ru = 'Ошибка запуска программы.
|
||||
|Первой процедурой, которая вызывается из обработчика события %1
|
||||
|должна быть процедура %2.'"),
|
||||
"ПередНачаломРаботыСистемы", "СтандартныеПодсистемыКлиент.ПередНачаломРаботыСистемы");
|
||||
НСтр("ru = 'Недопустимый вызов %1 при запуске программы.
|
||||
|Первой процедурой, которая вызывается из обработчика события %2, должна быть процедура %3.'"),
|
||||
"СтандартныеПодсистемыКлиент.ПараметрыРаботыКлиента", "ПередНачаломРаботыСистемы",
|
||||
"СтандартныеПодсистемыКлиент.ПередНачаломРаботыСистемы");
|
||||
КонецЕсли;
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
Процедура ПроверитьПорядокЗапускаПрограммыПриНачалеРаботыСистемы()
|
||||
Если ТолькоПередНачаломРаботыСистемы Тогда
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
|
||||
Если Не СтандартныеПодсистемыКлиент.ЗапускПрограммыЗавершен() Тогда
|
||||
ВызватьИсключение
|
||||
НСтр("ru = 'Ошибка запуска программы.
|
||||
|Перед получением параметров работы клиента запуск программы должен быть завершен.
|
||||
|Пока запуск не завершен следует использовать параметры работы клиента при запуске.'");
|
||||
ВызватьИсключение СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
|
||||
НСтр("ru = 'Недопустимый вызов %1 при запуске программы.
|
||||
|Следует вызывать %2, пока запуск еще не завершен.'"),
|
||||
"СтандартныеПодсистемыКлиент.ПараметрыРаботыКлиента",
|
||||
"СтандартныеПодсистемыКлиент.ПараметрыРаботыКлиентаПриЗапуске");
|
||||
КонецЕсли;
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
@@ -677,6 +677,28 @@
|
||||
|
||||
КонецФункции
|
||||
|
||||
// Возвращаемое значение:
|
||||
// Структура:
|
||||
// * НомерСеанса - Число
|
||||
// * НачалоСеанса - Дата
|
||||
// * КлючКомпьютера - Строка
|
||||
//
|
||||
Функция СвойстваТекущегоСеанса() Экспорт
|
||||
|
||||
Сеанс = ПолучитьТекущийСеансИнформационнойБазы();
|
||||
Хеширование = Новый ХешированиеДанных(ХешФункция.SHA256);
|
||||
Хеширование.Добавить(Сеанс.ИмяКомпьютера);
|
||||
СтрокаХешСуммы = Base64Строка(Хеширование.ХешСумма);
|
||||
|
||||
Результат = Новый Структура;
|
||||
Результат.Вставить("НомерСеанса", Сеанс.НомерСеанса);
|
||||
Результат.Вставить("НачалоСеанса", Сеанс.НачалоСеанса);
|
||||
Результат.Вставить("КлючКомпьютера", СтрокаХешСуммы);
|
||||
|
||||
Возврат Результат;
|
||||
|
||||
КонецФункции
|
||||
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
// Для справочника ИдентификаторыОбъектовМетаданных.
|
||||
|
||||
|
||||
@@ -970,15 +970,20 @@
|
||||
|
||||
ИмяРеквизита = "";
|
||||
|
||||
// Для определения предопределенных элементов в подсистемах Свойства и КонтактнаяИнформация
|
||||
// зачитываются реквизиты ИмяПредопределенногоНабора и ИмяПредопределенногоВида.
|
||||
ЗначенияРеквизитов = Новый Структура("ИмяПредопределенногоНабора,ИмяПредопределенногоВида,ИмяПредопределенныхДанных",
|
||||
"", "", "");
|
||||
// Для определения предопределенных элементов в подсистемах Свойства, КонтактнаяИнформация и Взаимодействия
|
||||
// зачитываются реквизиты ИмяПредопределенногоНабора, ИмяПредопределенногоВида и ПредопределеннаяПапка.
|
||||
ЗначенияРеквизитов = Новый Структура;
|
||||
ЗначенияРеквизитов.Вставить("ИмяПредопределенныхДанных", "");
|
||||
ЗначенияРеквизитов.Вставить("ИмяПредопределенногоНабора", "");
|
||||
ЗначенияРеквизитов.Вставить("ИмяПредопределенногоВида", "");
|
||||
ЗначенияРеквизитов.Вставить("ПредопределеннаяПапка", Ложь);
|
||||
|
||||
ЗаполнитьЗначенияСвойств(ЗначенияРеквизитов, Элемент);
|
||||
|
||||
Если (ЗначенияРеквизитов.ИмяПредопределенныхДанных = ""
|
||||
Если ЗначенияРеквизитов.ИмяПредопределенныхДанных = ""
|
||||
И ЗначенияРеквизитов.ИмяПредопределенногоНабора = ""
|
||||
И ЗначенияРеквизитов.ИмяПредопределенногоВида = "") Тогда
|
||||
И ЗначенияРеквизитов.ИмяПредопределенногоВида = ""
|
||||
И Не ЗначенияРеквизитов.ПредопределеннаяПапка Тогда
|
||||
Возврат Ложь;
|
||||
КонецЕсли;
|
||||
|
||||
@@ -986,6 +991,8 @@
|
||||
ИмяРеквизита = "ИмяПредопределенногоНабора";
|
||||
ИначеЕсли ЗначенияРеквизитов.ИмяПредопределенногоВида <> "" Тогда
|
||||
ИмяРеквизита = "ИмяПредопределенногоВида";
|
||||
ИначеЕсли ЗначенияРеквизитов.ПредопределеннаяПапка Тогда
|
||||
ИмяРеквизита = "ПредопределеннаяПапка";
|
||||
Иначе
|
||||
ИмяРеквизита = "ИмяПредопределенныхДанных";
|
||||
КонецЕсли;
|
||||
@@ -1004,15 +1011,23 @@
|
||||
// Параметры:
|
||||
// ИмяПараметра - Строка - не более 128 символов. Например,
|
||||
// "СтандартныеПодсистемы.ВариантыОтчетов.ОтчетыСНастройками".
|
||||
//
|
||||
// БезУчетаВерсииРасширений - Булево
|
||||
//
|
||||
// УжеИзменен - Булево - возвращаемое значение. Устанавливается Истина
|
||||
// когда БезУчетаВерсииРасширений равно Истина,
|
||||
// хранилище значения содержит значение отличное от Неопределено и
|
||||
// значение было установлено более новым сеансом, чем текущий.
|
||||
// - Неопределено - установка значения не требуется.
|
||||
//
|
||||
// Возвращаемое значение:
|
||||
// Произвольный - возвращается Неопределено, если параметр не заполнен
|
||||
// для текущей версии расширений.
|
||||
//
|
||||
Функция ПараметрРаботыРасширения(ИмяПараметра, БезУчетаВерсииРасширений = Ложь) Экспорт
|
||||
Функция ПараметрРаботыРасширения(ИмяПараметра, БезУчетаВерсииРасширений = Ложь, УжеИзменен = Неопределено) Экспорт
|
||||
|
||||
Возврат РегистрыСведений.ПараметрыРаботыВерсийРасширений.ПараметрРаботыРасширения(ИмяПараметра, БезУчетаВерсииРасширений);
|
||||
Возврат РегистрыСведений.ПараметрыРаботыВерсийРасширений.ПараметрРаботыРасширения(ИмяПараметра,
|
||||
БезУчетаВерсииРасширений, УжеИзменен);
|
||||
|
||||
КонецФункции
|
||||
|
||||
@@ -2806,14 +2821,14 @@
|
||||
"ПометкаУдаления, ИмяПредопределенныхДанных"
|
||||
+ ?(ИмяРеквизита <> "ИмяПредопределенныхДанных", ", " + ИмяРеквизита, ""));
|
||||
|
||||
Если (СтарыеСвойства.ИмяПредопределенныхДанных <> "" Или ИмяРеквизита <> "" И СтарыеСвойства[ИмяРеквизита] <> "")
|
||||
Если (СтарыеСвойства.ИмяПредопределенныхДанных <> "" Или ИмяРеквизита <> "" И ЗначениеЗаполнено(СтарыеСвойства[ИмяРеквизита]))
|
||||
И СтарыеСвойства.ПометкаУдаления <> Истина Тогда
|
||||
|
||||
ВызватьИсключение СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
|
||||
НСтр("ru = 'Недопустимо помечать на удаление предопределенный элемент:
|
||||
|""%1"".'"),
|
||||
Строка(Источник.Ссылка));
|
||||
ИначеЕсли (ЗначениеРеквизита <> "" И СтарыеСвойства[ИмяРеквизита] = ""
|
||||
ИначеЕсли (ЗначениеЗаполнено(ЗначениеРеквизита) И Не ЗначениеЗаполнено(СтарыеСвойства[ИмяРеквизита])
|
||||
Или СтарыеСвойства.ИмяПредопределенныхДанных = "")
|
||||
И СтарыеСвойства.ПометкаУдаления = Истина Тогда
|
||||
|
||||
@@ -2836,6 +2851,13 @@
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
|
||||
ЗначенияРеквизитов = Новый Структура("Владелец");
|
||||
ЗаполнитьЗначенияСвойств(ЗначенияРеквизитов, Источник);
|
||||
|
||||
Если ЗначениеЗаполнено(ЗначенияРеквизитов.Владелец) И ЗначенияРеквизитов.Владелец.ПолучитьОбъект() = Неопределено Тогда
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
|
||||
ВызватьИсключение СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
|
||||
НСтр("ru = 'Недопустимо удалять предопределенный элемент
|
||||
|""%1"".'"),
|
||||
|
||||
@@ -3402,6 +3402,13 @@
|
||||
И Источник.ДополнительныеСвойства.Свойство(
|
||||
"НаборыЗначенийДоступаТабличнойЧастиЗаполнены")) Тогда
|
||||
|
||||
Если Источник.ЭтоНовый()
|
||||
И ОбщегоНазначения.ИнформационнаяБазаФайловая()
|
||||
И Не ПропуститьПроверкуДоступа(Отказ, Источник) Тогда
|
||||
|
||||
ПредварительнаяБлокировкаПередЗаписьюНовогоВФайловойИБ();
|
||||
КонецЕсли;
|
||||
|
||||
Таблица = ПолучитьНаборыЗначенийДоступаТабличнойЧасти(Источник);
|
||||
ПодготовитьНаборыЗначенийДоступаКЗаписи(Неопределено, Таблица, Ложь);
|
||||
Источник.НаборыЗначенийДоступа.Загрузить(Таблица);
|
||||
@@ -5220,8 +5227,8 @@
|
||||
КонецЕсли;
|
||||
|
||||
// Проверка необходимости обновления регистра ТаблицыГруппДоступа.
|
||||
ПараметрыОбновления = СтандартныеПодсистемыСервер.ПараметрРаботыРасширения(
|
||||
"СтандартныеПодсистемы.УправлениеДоступом.ПараметрыОбновленияТаблицГруппДоступа", Истина);
|
||||
ИмяПараметра = "СтандартныеПодсистемы.УправлениеДоступом.ПараметрыОбновленияТаблицГруппДоступа";
|
||||
ПараметрыОбновления = СтандартныеПодсистемыСервер.ПараметрРаботыРасширения(ИмяПараметра, Истина);
|
||||
|
||||
Если ТипЗнч(ПараметрыОбновления) <> Тип("Структура")
|
||||
Или Не ПараметрыОбновления.Свойство("ПоследниеПраваРолейРасширений")
|
||||
@@ -5264,10 +5271,16 @@
|
||||
|
||||
Блокировка = Новый БлокировкаДанных;
|
||||
Блокировка.Добавить("РегистрСведений.ТаблицыГруппДоступа");
|
||||
ЭлементБлокировки = Блокировка.Добавить("РегистрСведений.ПараметрыРаботыВерсийРасширений");
|
||||
ЭлементБлокировки.УстановитьЗначение("ВерсияРасширений", Справочники.ВерсииРасширений.ПустаяСсылка());
|
||||
ЭлементБлокировки.УстановитьЗначение("ИмяПараметра", ИмяПараметра);
|
||||
|
||||
НачатьТранзакцию();
|
||||
Попытка
|
||||
Блокировка.Заблокировать();
|
||||
Если ПараметрыОбновления <> Неопределено Тогда // Не первое обновление.
|
||||
УжеИзменен = Ложь;
|
||||
СтандартныеПодсистемыСервер.ПараметрРаботыРасширения(ИмяПараметра, Истина, УжеИзменен);
|
||||
Если УжеИзменен Тогда
|
||||
ПроверитьАктуальностьМетаданных();
|
||||
КонецЕсли;
|
||||
Если УстановитьНовыеПраваРолейРасширений Тогда;
|
||||
@@ -5275,8 +5288,7 @@
|
||||
"СтандартныеПодсистемы.УправлениеДоступом.ПраваРолей",
|
||||
Новый ХранилищеЗначения(ПраваРолейРасширений));
|
||||
КонецЕсли;
|
||||
СтандартныеПодсистемыСервер.УстановитьПараметрРаботыРасширения(
|
||||
"СтандартныеПодсистемы.УправлениеДоступом.ПараметрыОбновленияТаблицГруппДоступа",
|
||||
СтандартныеПодсистемыСервер.УстановитьПараметрРаботыРасширения(ИмяПараметра,
|
||||
НовыеПараметрыОбновления, Истина);
|
||||
РегистрыСведений.ТаблицыГруппДоступа.ОбновитьДанныеРегистра(, ОбъектыСИзменениемПравДляОбновления);
|
||||
ЗафиксироватьТранзакцию();
|
||||
@@ -6321,10 +6333,11 @@
|
||||
НачатьТранзакцию();
|
||||
Попытка
|
||||
Блокировка.Заблокировать();
|
||||
ТекущееЗначение = ПоследниеИдентификаторыРолей(ИмяПараметра);
|
||||
УжеИзменен = Ложь;
|
||||
ТекущееЗначение = ПоследниеИдентификаторыРолей(ИмяПараметра, УжеИзменен);
|
||||
Если ТекущееЗначение.ХешСумма <> ЗначениеСеанса.ХешСумма Тогда
|
||||
ПропуститьОбновление = Ложь;
|
||||
Если ЗначениеЗаполнено(ТекущееЗначение.ХешСумма) Тогда // Не первое обновление.
|
||||
Если УжеИзменен Тогда
|
||||
Попытка
|
||||
ПроверитьАктуальностьМетаданных();
|
||||
Исключение
|
||||
@@ -6353,9 +6366,9 @@
|
||||
КонецПроцедуры
|
||||
|
||||
// См. УправлениеДоступомСлужебныйПовтИсп.ИдентификаторыРолейСеанса
|
||||
Функция ПоследниеИдентификаторыРолей(ИмяПараметра)
|
||||
Функция ПоследниеИдентификаторыРолей(ИмяПараметра, УжеИзменен = Ложь)
|
||||
|
||||
Значение = СтандартныеПодсистемыСервер.ПараметрРаботыРасширения(ИмяПараметра, Истина);
|
||||
Значение = СтандартныеПодсистемыСервер.ПараметрРаботыРасширения(ИмяПараметра, Истина, УжеИзменен);
|
||||
Если ТипЗнч(Значение) <> Тип("ФиксированнаяСтруктура")
|
||||
Или Не Значение.Свойство("ХешСумма")
|
||||
Или Не Значение.Свойство("ИдентификаторыРолей")
|
||||
@@ -7598,11 +7611,12 @@
|
||||
НачатьТранзакцию();
|
||||
Попытка
|
||||
Блокировка.Заблокировать();
|
||||
СтароеЗначение = СтандартныеПодсистемыСервер.ПараметрРаботыРасширения(ИмяПараметра, Истина);
|
||||
УжеИзменен = Ложь;
|
||||
СтароеЗначение = СтандартныеПодсистемыСервер.ПараметрРаботыРасширения(ИмяПараметра, Истина, УжеИзменен);
|
||||
СтароеЗначение = НовыеХешСуммыСвойствВидовДоступа(СтароеЗначение);
|
||||
Если СтароеЗначение.ХешСуммаТиповГруппИЗначенийДоступа
|
||||
<> НовоеЗначение.ХешСуммаТиповГруппИЗначенийДоступа Тогда
|
||||
Если ЗначениеЗаполнено(СтароеЗначение.ХешСуммаТиповГруппИЗначенийДоступа) Тогда // Не первое обновление.
|
||||
Если УжеИзменен Тогда
|
||||
ПроверитьАктуальностьМетаданных();
|
||||
КонецЕсли;
|
||||
РегистрыСведений.ГруппыЗначенийДоступа.ОбновитьВспомогательныеДанныеРегистраПоИзменениямКонфигурации();
|
||||
@@ -7671,10 +7685,11 @@
|
||||
НачатьТранзакцию();
|
||||
Попытка
|
||||
Блокировка.Заблокировать();
|
||||
СтароеЗначение = СтандартныеПодсистемыСервер.ПараметрРаботыРасширения(ИмяПараметра, Истина);
|
||||
УжеИзменен = Ложь;
|
||||
СтароеЗначение = СтандартныеПодсистемыСервер.ПараметрРаботыРасширения(ИмяПараметра, Истина, УжеИзменен);
|
||||
СтароеЗначение = НовыеХешСуммыСвойствВидовДоступа(СтароеЗначение);
|
||||
Если СтароеЗначение.ХешСумма <> НовоеЗначение.ХешСумма Тогда
|
||||
Если ЗначениеЗаполнено(СтароеЗначение.ХешСумма) Тогда // Не первое обновление.
|
||||
Если УжеИзменен Тогда
|
||||
ПроверитьАктуальностьМетаданных();
|
||||
КонецЕсли;
|
||||
УстановитьОтключениеБезопасногоРежима(Истина);
|
||||
@@ -9635,6 +9650,39 @@
|
||||
|
||||
#Область ПроверкаДоступаПриИзменении
|
||||
|
||||
// Для процедур ПроверитьДоступПередЗаписьюИсточника и др.
|
||||
Процедура ПредварительнаяБлокировкаПередЗаписьюНовогоВФайловойИБ()
|
||||
|
||||
Блокировка = Новый БлокировкаДанных;
|
||||
Блокировка.Добавить("РегистрСведений.КлючиДоступаКОбъектам");
|
||||
Блокировка.Добавить("РегистрСведений.КлючиДоступаГруппДоступа");
|
||||
Блокировка.Добавить("РегистрСведений.КлючиДоступаНаборовГруппДоступа");
|
||||
Блокировка.Добавить("РегистрСведений.КлючиДоступаПользователей");
|
||||
Блокировка.Добавить("РегистрСведений.КлючиДоступаВнешнихПользователей");
|
||||
Блокировка.Добавить("Справочник.КлючиДоступа");
|
||||
Блокировка.Добавить("РегистрСведений.ПараметрыРаботыВерсийРасширений");
|
||||
ЭлементБлокировки = Блокировка.Добавить("Справочник.НаборыГруппДоступа");
|
||||
ЭлементБлокировки.Режим = РежимБлокировкиДанных.Разделяемый;
|
||||
ЭлементБлокировки = Блокировка.Добавить("Справочник.ПрофилиГруппДоступа");
|
||||
ЭлементБлокировки.Режим = РежимБлокировкиДанных.Разделяемый;
|
||||
ЭлементБлокировки = Блокировка.Добавить("Справочник.ГруппыДоступа");
|
||||
ЭлементБлокировки.Режим = РежимБлокировкиДанных.Разделяемый;
|
||||
ЭлементБлокировки = Блокировка.Добавить("РегистрСведений.ТаблицыГруппДоступа");
|
||||
ЭлементБлокировки.Режим = РежимБлокировкиДанных.Разделяемый;
|
||||
ЭлементБлокировки = Блокировка.Добавить("РегистрСведений.ГруппыЗначенийДоступа");
|
||||
ЭлементБлокировки.Режим = РежимБлокировкиДанных.Разделяемый;
|
||||
ЭлементБлокировки = Блокировка.Добавить("РегистрСведений.ЗначенияГруппДоступа");
|
||||
ЭлементБлокировки.Режим = РежимБлокировкиДанных.Разделяемый;
|
||||
ЭлементБлокировки = Блокировка.Добавить("РегистрСведений.ЗначенияГруппДоступаПоУмолчанию");
|
||||
ЭлементБлокировки.Режим = РежимБлокировкиДанных.Разделяемый;
|
||||
ЭлементБлокировки = Блокировка.Добавить("РегистрСведений.НастройкиПравОбъектов");
|
||||
ЭлементБлокировки.Режим = РежимБлокировкиДанных.Разделяемый;
|
||||
ЭлементБлокировки = Блокировка.Добавить("РегистрСведений.НаследованиеНастроекПравОбъектов");
|
||||
ЭлементБлокировки.Режим = РежимБлокировкиДанных.Разделяемый;
|
||||
Блокировка.Заблокировать();
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
// Для обработчиков подписок на событие ПередЗаписью.
|
||||
Процедура ПроверитьДоступПередЗаписьюИсточника(Источник, Отказ, ЭтоНаборЗаписей, Замещение)
|
||||
|
||||
@@ -9642,34 +9690,11 @@
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
|
||||
Если Не ЭтоНаборЗаписей И Источник.ЭтоНовый() И ОбщегоНазначения.ИнформационнаяБазаФайловая() Тогда
|
||||
Блокировка = Новый БлокировкаДанных;
|
||||
Блокировка.Добавить("РегистрСведений.КлючиДоступаКОбъектам");
|
||||
Блокировка.Добавить("РегистрСведений.КлючиДоступаГруппДоступа");
|
||||
Блокировка.Добавить("РегистрСведений.КлючиДоступаНаборовГруппДоступа");
|
||||
Блокировка.Добавить("РегистрСведений.КлючиДоступаПользователей");
|
||||
Блокировка.Добавить("РегистрСведений.КлючиДоступаВнешнихПользователей");
|
||||
Блокировка.Добавить("Справочник.КлючиДоступа");
|
||||
Блокировка.Добавить("РегистрСведений.ПараметрыРаботыВерсийРасширений");
|
||||
ЭлементБлокировки = Блокировка.Добавить("Справочник.НаборыГруппДоступа");
|
||||
ЭлементБлокировки.Режим = РежимБлокировкиДанных.Разделяемый;
|
||||
ЭлементБлокировки = Блокировка.Добавить("Справочник.ПрофилиГруппДоступа");
|
||||
ЭлементБлокировки.Режим = РежимБлокировкиДанных.Разделяемый;
|
||||
ЭлементБлокировки = Блокировка.Добавить("Справочник.ГруппыДоступа");
|
||||
ЭлементБлокировки.Режим = РежимБлокировкиДанных.Разделяемый;
|
||||
ЭлементБлокировки = Блокировка.Добавить("РегистрСведений.ТаблицыГруппДоступа");
|
||||
ЭлементБлокировки.Режим = РежимБлокировкиДанных.Разделяемый;
|
||||
ЭлементБлокировки = Блокировка.Добавить("РегистрСведений.ГруппыЗначенийДоступа");
|
||||
ЭлементБлокировки.Режим = РежимБлокировкиДанных.Разделяемый;
|
||||
ЭлементБлокировки = Блокировка.Добавить("РегистрСведений.ЗначенияГруппДоступа");
|
||||
ЭлементБлокировки.Режим = РежимБлокировкиДанных.Разделяемый;
|
||||
ЭлементБлокировки = Блокировка.Добавить("РегистрСведений.ЗначенияГруппДоступаПоУмолчанию");
|
||||
ЭлементБлокировки.Режим = РежимБлокировкиДанных.Разделяемый;
|
||||
ЭлементБлокировки = Блокировка.Добавить("РегистрСведений.НастройкиПравОбъектов");
|
||||
ЭлементБлокировки.Режим = РежимБлокировкиДанных.Разделяемый;
|
||||
ЭлементБлокировки = Блокировка.Добавить("РегистрСведений.НаследованиеНастроекПравОбъектов");
|
||||
ЭлементБлокировки.Режим = РежимБлокировкиДанных.Разделяемый;
|
||||
Блокировка.Заблокировать();
|
||||
Если Не ЭтоНаборЗаписей
|
||||
И Источник.ЭтоНовый()
|
||||
И ОбщегоНазначения.ИнформационнаяБазаФайловая() Тогда
|
||||
|
||||
ПредварительнаяБлокировкаПередЗаписьюНовогоВФайловойИБ();
|
||||
КонецЕсли;
|
||||
|
||||
ЭтоПолноправныйПользователь = Пользователи.ЭтоПолноправныйПользователь()
|
||||
@@ -22562,6 +22587,14 @@
|
||||
КонецЕсли;
|
||||
КонецЕсли;
|
||||
|
||||
Попытка
|
||||
ВызватьИсключение НСтр("ru = 'Стек вызовов'");
|
||||
Исключение
|
||||
СтекВызовов = ПодробноеПредставлениеОшибки(ИнформацияОбОшибке());
|
||||
КонецПопытки;
|
||||
|
||||
КомментарийДляЖурнала = КомментарийДляЖурнала + Символы.ПС + Символы.ПС + СтекВызовов;
|
||||
|
||||
ЗаписьЖурналаРегистрации(
|
||||
НСтр("ru = 'Управление доступом.Показатели.Планирование обновления доступа'",
|
||||
ОбщегоНазначения.КодОсновногоЯзыка()),
|
||||
|
||||
@@ -6037,7 +6037,7 @@
|
||||
| ЕСТЬNULL(КонтактнаяИнформация.Значение, """") КАК Значение,
|
||||
| ЕСТЬNULL(КонтактнаяИнформация.ДействуетС, 0) КАК ДействуетС,
|
||||
| ЕСТЬNULL(КонтактнаяИнформация.НомерСтроки, 0) КАК НомерСтроки,
|
||||
| 0 КАК ИдентификаторСтрокиТабличнойЧасти,
|
||||
| ЕСТЬNULL(КонтактнаяИнформация.ИдентификаторСтрокиТабличнойЧасти, 0) КАК ИдентификаторСтрокиТабличнойЧасти,
|
||||
| ВЫРАЗИТЬ("""" КАК СТРОКА(200)) КАК ИмяРеквизита,
|
||||
| ВидыКонтактнойИнформации.ПометкаУдаления КАК ПометкаУдаления,
|
||||
| ВЫРАЗИТЬ("""" КАК СТРОКА) КАК Комментарий
|
||||
|
||||
@@ -1348,6 +1348,7 @@
|
||||
|
||||
Функция ЧастиАдресаТаблицей(Знач Текст)
|
||||
|
||||
ТипыАдресныхОбъектов = ТипыАдресныхОбъектов();
|
||||
Результат = ЧастиАдреса();
|
||||
|
||||
Номер = 1;
|
||||
@@ -1366,29 +1367,72 @@
|
||||
Строка.Начало = Часть.Начало;
|
||||
Строка.Длина = Часть.Длина;
|
||||
|
||||
Позиция = СтрДлина(Значение);
|
||||
Пока Позиция > 0 Цикл
|
||||
Символ = Сред(Значение, Позиция, 1);
|
||||
Если ПустаяСтрока(Символ) Тогда
|
||||
Строка.Наименование = СокрЛП(Лев(Значение, Позиция-1));
|
||||
Если СтрНайти(Значение, " ") = 0 Тогда
|
||||
Строка.Наименование = Значение;
|
||||
Строка.Значение = Строка.Наименование;
|
||||
Продолжить;
|
||||
КонецЕсли;
|
||||
|
||||
ЗначениеВерхнийРегистр = ВРег(Значение);
|
||||
Для Каждого ТипАдресныхОбъектов Из ТипыАдресныхОбъектов Цикл
|
||||
|
||||
Если СтрНачинаетсяС(ЗначениеВерхнийРегистр, ТипАдресныхОбъектов.СокращениеВНачале) Тогда
|
||||
|
||||
Строка.Наименование = СокрЛП(Сред(Значение, ТипАдресныхОбъектов.Длина + 1));
|
||||
Строка.Сокращение = СокрЛП(Лев(Значение, ТипАдресныхОбъектов.Длина));
|
||||
Строка.Значение = УправлениеКонтактнойИнформациейКлиентСервер.СоединитьНаименованиеИТипАдресногоОбъекта(Строка.Наименование, Строка.Сокращение);
|
||||
Прервать;
|
||||
|
||||
ИначеЕсли СтрЗаканчиваетсяНа(ЗначениеВерхнийРегистр, ТипАдресныхОбъектов.СокращениеВКонце) Тогда
|
||||
|
||||
Строка.Наименование = СокрЛП(Сред(Значение, 1, СтрДлина(Значение) - ТипАдресныхОбъектов.Длина));
|
||||
Строка.Сокращение = СокрЛП(Прав(Значение, ТипАдресныхОбъектов.Длина));
|
||||
Строка.Значение = УправлениеКонтактнойИнформациейКлиентСервер.СоединитьНаименованиеИТипАдресногоОбъекта(Строка.Наименование, Строка.Сокращение);
|
||||
Прервать;
|
||||
|
||||
КонецЕсли;
|
||||
Строка.Сокращение = Символ + Строка.Сокращение;
|
||||
Позиция = Позиция - 1;
|
||||
|
||||
КонецЦикла;
|
||||
|
||||
Если ПустаяСтрока(Строка.Наименование) Тогда
|
||||
Строка.Наименование = СокрЛП(Строка.Сокращение);
|
||||
Строка.Сокращение = "";
|
||||
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.АдресныйКлассификатор") Тогда
|
||||
МодульАдресныйКлассификатор = ОбщегоНазначения.ОбщийМодуль("АдресныйКлассификатор");
|
||||
КодРегиона = МодульАдресныйКлассификатор.КодРегионаПоНаименованию(
|
||||
УправлениеКонтактнойИнформациейКлиентСервер.СоединитьНаименованиеИТипАдресногоОбъекта(Строка.Наименование, Строка.Сокращение, Истина));
|
||||
Если КодРегиона <> Неопределено Тогда
|
||||
Строка.Значение = МодульАдресныйКлассификатор.НаименованиеРегионаПоКоду(КодРегиона);
|
||||
Строка.Уровень = 1;
|
||||
КонецЕсли;
|
||||
КонецЕсли;
|
||||
Если СтрЗаканчиваетсяНа(Строка.Наименование, "тер.") Тогда
|
||||
Строка.Наименование = СокрЛП(СтрЗаменить(Строка.Наименование, "тер.", ""));
|
||||
Строка.Сокращение = "тер. " + Строка.Сокращение;
|
||||
|
||||
Если ЗначениеЗаполнено(Строка.Значение) Тогда
|
||||
Продолжить;
|
||||
КонецЕсли;
|
||||
Строка.Значение = СокрЛП(Строка.Наименование + " " + Строка.Сокращение);
|
||||
|
||||
ЧастиАдресногоОбъекта = СтрРазделить(Значение, " " + Символы.ПС + Символы.Таб);
|
||||
|
||||
Строка.Сокращение = ЧастиАдресногоОбъекта[0];
|
||||
ЧастиАдресногоОбъекта.Удалить(0);
|
||||
Строка.Наименование = СокрЛП(СтрСоединить(ЧастиАдресногоОбъекта, " "));
|
||||
Строка.Значение = УправлениеКонтактнойИнформациейКлиентСервер.СоединитьНаименованиеИТипАдресногоОбъекта(Строка.Наименование, Строка.Сокращение);
|
||||
|
||||
|
||||
КонецЦикла;
|
||||
|
||||
Возврат Результат;
|
||||
|
||||
КонецФункции
|
||||
|
||||
Функция ТипыАдресныхОбъектов()
|
||||
|
||||
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.АдресныйКлассификатор") Тогда
|
||||
МодульАдресныйКлассификаторПовтИсп = ОбщегоНазначения.ОбщийМодуль("АдресныйКлассификаторПовтИсп");
|
||||
СписокСокращений = МодульАдресныйКлассификаторПовтИсп.ТипыАдресныхОбъектовДляРаспознаванияАдреса();
|
||||
Иначе
|
||||
СписокСокращений = Новый ФиксированноеСоответствие(Новый Соответствие());
|
||||
КонецЕсли;
|
||||
|
||||
Возврат СписокСокращений;
|
||||
|
||||
КонецФункции
|
||||
|
||||
// Функция-конструктор таблицы содержащей адрес, где каждая строка это часть адреса.
|
||||
|
||||
@@ -1046,6 +1046,7 @@
|
||||
|
||||
ОткрытаТаблица = Ложь;
|
||||
ОткрытаКлеткаТаблицы = Ложь;
|
||||
УстановленАтрибутСохраненияПробелов = Ложь;
|
||||
|
||||
ШиринаТаблицы = 0;
|
||||
ШиринаКлеткиТаблицы = 0;
|
||||
@@ -1060,6 +1061,7 @@
|
||||
|
||||
Если ЧтениеНачалаТекстаСтроки(СтруктураРазбораXML, ЧтениеXML) Тогда
|
||||
ОбработатьТекст = ИСТИНА;
|
||||
УстановленАтрибутСохраненияПробелов = Ложь;
|
||||
КонецЕсли;
|
||||
|
||||
Если ЧтениеКонцаТекстаСтроки(СтруктураРазбораXML, ЧтениеXML) Тогда
|
||||
@@ -1106,9 +1108,8 @@
|
||||
|
||||
Для Каждого ПараметрТекст Из ПараметрыИзТекста Цикл
|
||||
|
||||
Если ДанныеОбъекта.Свойство(ПараметрТекст, ЗначениеПараметра) Тогда
|
||||
ЗначениеПараметра = СокрЛП(ЗначениеПараметра);
|
||||
КонецЕсли;
|
||||
ДанныеОбъекта.Свойство(ПараметрТекст, ЗначениеПараметра);
|
||||
ЗначениеПараметра = Строка(ЗначениеПараметра);
|
||||
|
||||
Если ТипЗнч(ЗначениеПараметра) = Тип("Строка") И НЕ СтрНачинаетсяС(ЗначениеПараметра, "e1cib/tempstorage") Тогда
|
||||
ТекстУзла = СтрЗаменить(ТекстУзла, "{v8 " + ПараметрТекст + "}", ЗначениеПараметра);
|
||||
@@ -1123,7 +1124,7 @@
|
||||
|
||||
Если ВыводТекста Тогда
|
||||
|
||||
ЗаписатьТекстВПотоки(СтруктураРазбораXML, ЧтениеXML, "Область", ТекстУзла);
|
||||
ЗаписатьТекстВПотоки(СтруктураРазбораXML, ЧтениеXML, "Область", ТекстУзла, УстановленАтрибутСохраненияПробелов);
|
||||
|
||||
ИначеЕсли ВыводКартинки Тогда
|
||||
|
||||
@@ -1174,7 +1175,7 @@
|
||||
КонецЕсли
|
||||
|
||||
Иначе
|
||||
ЗаписатьЭлементXMLВПоток(СтруктураРазбораXML, ЧтениеXML, ПечатнаяФорма.СтруктураДокумента);
|
||||
ЗаписатьЭлементXMLВПоток(СтруктураРазбораXML, ЧтениеXML, ПечатнаяФорма.СтруктураДокумента, УстановленАтрибутСохраненияПробелов);
|
||||
КонецЕсли;
|
||||
|
||||
КонецЦикла;
|
||||
@@ -1880,7 +1881,7 @@
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
Процедура ЗаписатьТекстВПотоки(СтруктураРазбораXML, ЧтениеXML, ИмяПотока = "", Знач Текст = Неопределено)
|
||||
Процедура ЗаписатьТекстВПотоки(СтруктураРазбораXML, ЧтениеXML, ИмяПотока = "", Знач Текст = Неопределено, УстановленАтрибутСохраненияПробелов = Неопределено)
|
||||
|
||||
Для Каждого ЭлементПотока Из СтруктураРазбораXML.ПотокиЗаписи Цикл
|
||||
|
||||
@@ -1911,6 +1912,9 @@
|
||||
Для Инд = 1 По ЧислоСтрок Цикл
|
||||
|
||||
СтрокаТекста = СтрПолучитьСтроку(Текст, Инд);
|
||||
Если УстановленАтрибутСохраненияПробелов = Ложь Тогда
|
||||
ЭлементПотока.Значение.Поток.ЗаписатьАтрибут("xml:space", "preserve");
|
||||
КонецЕсли;
|
||||
ЭлементПотока.Значение.Поток.ЗаписатьТекст(СтрокаТекста);
|
||||
|
||||
Если Инд < ЧислоСтрок Тогда
|
||||
@@ -1923,6 +1927,9 @@
|
||||
КонецЦикла;
|
||||
|
||||
Иначе
|
||||
Если УстановленАтрибутСохраненияПробелов = Ложь Тогда
|
||||
ЭлементПотока.Значение.Поток.ЗаписатьАтрибут("xml:space", "preserve");
|
||||
КонецЕсли;
|
||||
ЭлементПотока.Значение.Поток.ЗаписатьТекст(Текст);
|
||||
КонецЕсли;
|
||||
|
||||
@@ -1930,7 +1937,7 @@
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
Процедура ЗаписатьЭлементXMLВПоток(СтруктураРазбораXML, ЧтениеXML, СтруктураДокумента)
|
||||
Процедура ЗаписатьЭлементXMLВПоток(СтруктураРазбораXML, ЧтениеXML, СтруктураДокумента, УстановленАтрибутСохраненияПробелов = Неопределено)
|
||||
|
||||
Если ЧтениеXML.ТипУзла = ТипУзлаXML.ИнструкцияОбработки Тогда
|
||||
|
||||
@@ -1954,6 +1961,8 @@
|
||||
ЗначениеАтрибута = СтруктураДокумента.ИдентификаторДокумента;
|
||||
КонецЕсли;
|
||||
|
||||
УстановленАтрибутСохраненияПробелов = ЧтениеXML.Имя = "xml:space";
|
||||
|
||||
ЗаписатьАтрибутВПотоки(СтруктураРазбораXML, ЧтениеXML,, ЗначениеАтрибута);
|
||||
|
||||
Если ИмяУзла = "w:document" ИЛИ ИмяУзла = "w:ftr" ИЛИ ИмяУзла = "w:hdr" Тогда
|
||||
|
||||
@@ -1705,7 +1705,7 @@
|
||||
ОбрабатываемыеНаборы = Запрос.Выполнить().Выгрузить();
|
||||
|
||||
Для Каждого Строка Из ОбрабатываемыеНаборы Цикл
|
||||
СвойстваНабора = ПредопределенныеНаборыСвойств.Получить(Строка.Ссылка);
|
||||
СвойстваНабора = ПредопределенныеНаборыСвойств.Получить(Строка.Ссылка); // см. Справочники.НаборыДополнительныхРеквизитовИСведений.СвойстваНабора
|
||||
Объект = СвойстваНабора.Ссылка.ПолучитьОбъект();
|
||||
СоздатьНаборСвойств(Объект, СвойстваНабора);
|
||||
|
||||
|
||||
@@ -307,6 +307,7 @@
|
||||
|
||||
Структура = Новый Структура;
|
||||
Структура.Вставить("ДанныеУдостоверяющегоЦентра");
|
||||
Структура.Вставить("ЗначенияПоиска");
|
||||
Структура.Вставить("НаименованиеУдостоверяющегоЦентра", "");
|
||||
Структура.Вставить("ДобавкаВремени");
|
||||
Структура.Вставить("НаДату");
|
||||
@@ -472,17 +473,16 @@
|
||||
|
||||
Если ВозможенПеревыпуск Тогда
|
||||
РезультатПроверкиУдостоверяющегоЦентра.Предупреждение.Решение = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
|
||||
НСтр("ru = 'Подайте <a href = ""%1"">заявление</a> на новый сертификат.'"), "ПодатьЗаявлениеНаСертификат");
|
||||
НСтр("ru = 'Подайте <a href = ""%1"">заявление</a> на новый сертификат или добавьте удостоверяющий центр %2 в <a href = ""%3"">список разрешенных</a> неаккредитованных УЦ.'"),
|
||||
"ПодатьЗаявлениеНаСертификат", КонтекстПроверки.НаименованиеУдостоверяющегоЦентра,
|
||||
"ДобавитьУдостоверяющийЦентрВСписокРазрешенныхНеаккредитованных");
|
||||
Иначе
|
||||
РезультатПроверкиУдостоверяющегоЦентра.Предупреждение.Решение = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
|
||||
НСтр("ru = 'Получите новый сертификат в <a href = ""%1"">соответствующем удостоверяющем центре</a>.'"),
|
||||
СсылкаНаСтатьюОбУдостоверяющихЦентрах());
|
||||
НСтр("ru = 'Получите новый сертификат в <a href = ""%1"">соответствующем удостоверяющем центре</a> или добавьте удостоверяющий центр %2 в <a href = ""%3"">список разрешенных</a> неаккредитованных УЦ.'"),
|
||||
СсылкаНаСтатьюОбУдостоверяющихЦентрах(), КонтекстПроверки.НаименованиеУдостоверяющегоЦентра,
|
||||
"ДобавитьУдостоверяющийЦентрВСписокРазрешенныхНеаккредитованных");
|
||||
КонецЕсли;
|
||||
|
||||
Иначе
|
||||
РезультатПроверкиУдостоверяющегоЦентра.Предупреждение.ТекстОшибки =
|
||||
РезультатПроверкиУдостоверяющегоЦентра.Предупреждение.ТекстОшибки +" "+ РезультатПроверкиУдостоверяющегоЦентра.Предупреждение.Причина;
|
||||
РезультатПроверкиУдостоверяющегоЦентра.Предупреждение.Причина = Неопределено;
|
||||
КонецЕсли;
|
||||
|
||||
Возврат РезультатПроверкиУдостоверяющегоЦентра;
|
||||
|
||||
@@ -422,6 +422,7 @@
|
||||
КонтекстПроверки = МодульЭлектроннаяПодписьКлиентСерверЛокализация.КонтекстПроверкиУдостоверяющегоЦентраСертификата();
|
||||
КонтекстПроверки.ДанныеУдостоверяющегоЦентра = ДанныеУдостоверяющегоЦентра;
|
||||
КонтекстПроверки.НаименованиеУдостоверяющегоЦентра = ДанныеДляПроверкиУдостоверяющегоЦентра.НаименованиеУдостоверяющегоЦентра;
|
||||
КонтекстПроверки.ЗначенияПоиска = ДанныеДляПроверкиУдостоверяющегоЦентра.ЗначенияПоиска;
|
||||
КонтекстПроверки.НаДату = ?(НаДату = Неопределено, ТекущаяДатаСеанса(), НаДату);
|
||||
КонтекстПроверки.ДобавкаВремени = ДобавкаВремени();
|
||||
КонтекстПроверки.ЭтоПроверкаПодписи = ЭтоПроверкаПодписи;
|
||||
|
||||
@@ -1676,6 +1676,7 @@
|
||||
КонтекстПроверки = МодульЭлектроннаяПодписьКлиентСерверЛокализация.КонтекстПроверкиУдостоверяющегоЦентраСертификата();
|
||||
КонтекстПроверки.ДанныеУдостоверяющегоЦентра = ДанныеУдостоверяющегоЦентра;
|
||||
КонтекстПроверки.НаименованиеУдостоверяющегоЦентра = ДанныеДляПроверкиУдостоверяющегоЦентра.НаименованиеУдостоверяющегоЦентра;
|
||||
КонтекстПроверки.ЗначенияПоиска = ДанныеДляПроверкиУдостоверяющегоЦентра.ЗначенияПоиска;
|
||||
КонтекстПроверки.НаДату = ?(НаДату = Неопределено, ОбщегоНазначенияКлиент.ДатаСеанса(), НаДату);
|
||||
КонтекстПроверки.ДобавкаВремени = ДобавкаВремени();
|
||||
КонтекстПроверки.ЭтоПроверкаПодписи = ЭтоПроверкаПодписи;
|
||||
@@ -8007,33 +8008,37 @@
|
||||
Процедура ОбработатьНавигационнуюСсылкуКлассификатора(Элемент, НавигационнаяСсылкаФорматированнойСтроки, СтандартнаяОбработка, ДополнительныеДанные = Неопределено) Экспорт
|
||||
|
||||
СтандартнаяОбработка = Ложь;
|
||||
Сертификат = Неопределено;
|
||||
Если ТипЗнч(ДополнительныеДанные) = Тип("Структура") Тогда
|
||||
Сертификат = ДополнительныеДанные.Сертификат;
|
||||
КонецЕсли;
|
||||
|
||||
Если НавигационнаяСсылкаФорматированнойСтроки = "ОткрытьСертификат" Тогда
|
||||
|
||||
Если ДополнительныеДанные = Неопределено Тогда
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
|
||||
Сертификат = ДополнительныеДанные.Сертификат;
|
||||
Если ЗначениеЗаполнено(Сертификат) Тогда
|
||||
ПоказатьЗначение( ,Сертификат);
|
||||
КонецЕсли;
|
||||
ИначеЕсли НавигационнаяСсылкаФорматированнойСтроки = "ОткрытьСписокПрограмм" Тогда
|
||||
|
||||
ЭлектроннаяПодписьКлиент.ОткрытьНастройкиЭлектроннойПодписиИШифрования("Программы");
|
||||
|
||||
ИначеЕсли НавигационнаяСсылкаФорматированнойСтроки = "ПодатьЗаявлениеНаСертификат" Тогда
|
||||
|
||||
Если ДополнительныеДанные = Неопределено Тогда
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
|
||||
Сертификат = ДополнительныеДанные.Сертификат;
|
||||
Если ЗначениеЗаполнено(Сертификат) Тогда
|
||||
ПараметрыСоздания = Новый Структура;
|
||||
ПараметрыСоздания.Вставить("СоздатьЗаявление", Истина);
|
||||
ПараметрыСоздания.Вставить("СертификатОснование", Сертификат);
|
||||
ДобавитьСертификат(ПараметрыСоздания);
|
||||
КонецЕсли;
|
||||
// Локализация
|
||||
ИначеЕсли НавигационнаяСсылкаФорматированнойСтроки = "ДобавитьУдостоверяющийЦентрВСписокРазрешенныхНеаккредитованных" Тогда
|
||||
|
||||
ИначеЕсли НавигационнаяСсылкаФорматированнойСтроки = "ОткрытьСписокПрограмм" Тогда
|
||||
ЭлектроннаяПодписьКлиент.ОткрытьНастройкиЭлектроннойПодписиИШифрования("Программы");
|
||||
Если ЗначениеЗаполнено(Сертификат) И ЭлектроннаяПодписьКлиент.ОбщиеНастройки().ДоступнаПроверкаПоСпискуУЦ Тогда
|
||||
ПараметрыСоздания = Новый Структура;
|
||||
ПараметрыСоздания.Вставить("Сертификат", Сертификат);
|
||||
ОткрытьФорму("ОбщаяФорма.РазрешенныеНеаккредитованныеУЦ", ПараметрыСоздания, Элемент);
|
||||
КонецЕсли;
|
||||
// Конец Локализация
|
||||
Иначе
|
||||
ФайловаяСистемаКлиент.ОткрытьНавигационнуюСсылку(НавигационнаяСсылкаФорматированнойСтроки, );
|
||||
КонецЕсли;
|
||||
|
||||
@@ -135,7 +135,7 @@
|
||||
|
||||
РазрешенныеНеаккредитованныеУЦ = Новый Соответствие;
|
||||
|
||||
МассивЗначенийПоиска = СтрРазделить(Константы.РазрешенныеНеаккредитованныеУЦ.Получить(), ",;" + Символы.ПС);
|
||||
МассивЗначенийПоиска = СтрРазделить(Константы.РазрешенныеНеаккредитованныеУЦ.Получить(), ",;" + Символы.ПС, Ложь);
|
||||
Для Каждого ТекущееЗначениеПоиска Из МассивЗначенийПоиска Цикл
|
||||
ЗначениеПоиска = ЭлектроннаяПодписьКлиентСерверЛокализация.ПодготовитьЗначениеПоиска(ТекущееЗначениеПоиска);
|
||||
Если Не ЗначениеЗаполнено(ЗначениеПоиска) Тогда
|
||||
|
||||
@@ -1,17 +1,17 @@
|
||||
<?xml version="1.0" encoding="UTF-8"?>
|
||||
<mdclass:Configuration xmlns:mdclass="http://g5.1c.ru/v8/dt/metadata/mdclass" uuid="46d9a112-128a-4524-bcdd-e7e991a2b1f6">
|
||||
<mdclass:Configuration xmlns:mdclass="http://g5.1c.ru/v8/dt/metadata/mdclass" uuid="4efe36f5-b178-4958-a26f-f549e1243965">
|
||||
<name>БиблиотекаСтандартныхПодсистем</name>
|
||||
<synonym>
|
||||
<key>ru</key>
|
||||
<value>Библиотека стандартных подсистем, редакция 3.1</value>
|
||||
</synonym>
|
||||
<containedObjects classId="9cd510cd-abfc-11d4-9434-004095e12fc7" objectId="8ccedcbf-9000-4d26-ab20-a9edec48cdf8"/>
|
||||
<containedObjects classId="9fcd25a0-4822-11d4-9414-008048da11f9" objectId="d7d135d7-9c09-4b9d-bf39-9ea484f0cbea"/>
|
||||
<containedObjects classId="e3687481-0a87-462c-a166-9f34594f9bba" objectId="bd788b56-5121-495e-bdea-7ccabbd57b71"/>
|
||||
<containedObjects classId="9de14907-ec23-4a07-96f0-85521cb6b53b" objectId="a0a5c60b-10c8-47b6-8ca5-b060a5f463cd"/>
|
||||
<containedObjects classId="51f2d5d8-ea4d-4064-8892-82951750031e" objectId="88c72ae7-46a9-4d8b-8609-53ee855aefe0"/>
|
||||
<containedObjects classId="e68182ea-4237-4383-967f-90c1e3370bc7" objectId="b9dcf5f4-f32d-499a-bdc5-37341fe3dd91"/>
|
||||
<containedObjects classId="fb282519-d103-4dd3-bc12-cb271d631dfc" objectId="fa92b851-faa0-40a2-bed3-14b221b80160"/>
|
||||
<containedObjects classId="9cd510cd-abfc-11d4-9434-004095e12fc7" objectId="d16c264c-880f-477e-a983-86247ad01d0c"/>
|
||||
<containedObjects classId="9fcd25a0-4822-11d4-9414-008048da11f9" objectId="bda9ca33-dc73-46c2-93b9-3484a71e5a87"/>
|
||||
<containedObjects classId="e3687481-0a87-462c-a166-9f34594f9bba" objectId="abdb29e6-9425-4979-beee-ff27b439b2aa"/>
|
||||
<containedObjects classId="9de14907-ec23-4a07-96f0-85521cb6b53b" objectId="1ee52ac9-47ae-4c53-aba4-c2855a90cab4"/>
|
||||
<containedObjects classId="51f2d5d8-ea4d-4064-8892-82951750031e" objectId="042507bf-7080-4498-be28-fbd79ac7bd3d"/>
|
||||
<containedObjects classId="e68182ea-4237-4383-967f-90c1e3370bc7" objectId="041c4ea6-51d2-434a-aeea-81eec468f4ba"/>
|
||||
<containedObjects classId="fb282519-d103-4dd3-bc12-cb271d631dfc" objectId="bddaf223-9e94-4efb-8772-ab12246a5bc8"/>
|
||||
<defaultRunMode>ManagedApplication</defaultRunMode>
|
||||
<usePurposes>PersonalComputer</usePurposes>
|
||||
<scriptVariant>Russian</scriptVariant>
|
||||
@@ -19,7 +19,7 @@
|
||||
<defaultRoles>Role.АдминистраторСистемы</defaultRoles>
|
||||
<defaultRoles>Role.ИнтерактивноеОткрытиеВнешнихОтчетовИОбработок</defaultRoles>
|
||||
<vendor>Фирма "1С"</vendor>
|
||||
<version>3.1.7.110</version>
|
||||
<version>3.1.7.123</version>
|
||||
<updateCatalogAddress>http://downloads.v8.1c.ru/tmplts/</updateCatalogAddress>
|
||||
<includeHelpInContents>true</includeHelpInContents>
|
||||
<usedMobileApplicationFunctionalities>
|
||||
|
||||
@@ -1 +1 @@
|
||||
{6,1,1,3282cfbd-ca6e-4669-bce6-c738be4f827c,1,2ee48293-fbd0-49ab-91cb-0b1098b642a8,"3.1.7.110","Фирма ""1С""","БиблиотекаСтандартныхПодсистем",6757,1,0,46d9a112-128a-4524-bcdd-e7e991a2b1f6,46d9a112-128a-4524-bcdd-e7e991a2b1f6,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,4cbbdbaf-1f3a-46cd-8c42-28cdcfa32c06,4cbbdbaf-1f3a-46cd-8c42-28cdcfa32c06,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,e8b248d9-9049-456a-9c7d-7a0462cc67ab,e8b248d9-9049-456a-9c7d-7a0462cc67ab,1,0,d4562287-440d-4462-9de2-7097ccbf3764,d4562287-440d-4462-9de2-7097ccbf3764,1,0,1983fe34-c984-4659-ba41-0e94504f8989,1983fe34-c984-4659-ba41-0e94504f8989,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,153e11ac-f898-46a5-98c6-734adb933ca2,153e11ac-f898-46a5-98c6-734adb933ca2,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,f24de2ea-fcda-4052-b90f-e9d84314c4f2,f24de2ea-fcda-4052-b90f-e9d84314c4f2,1,0,ff8ae395-c740-4a30-a048-0d57eef6267f,ff8ae395-c740-4a30-a048-0d57eef6267f,1,0,51d06532-f61a-4ed5-afaa-cc4563633e0c,51d06532-f61a-4ed5-afaa-cc4563633e0c,1,0,0e49d980-581b-459f-a4b0-024e8c97e4c0,0e49d980-581b-459f-a4b0-024e8c97e4c0,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,2fd1287d-d96d-4480-baf7-8815ae5ffbfb,2fd1287d-d96d-4480-baf7-8815ae5ffbfb,1,0,d8c58e53-b7b9-4426-bdfa-d0816adf8cc1,d8c58e53-b7b9-4426-bdfa-d0816adf8cc1,1,0,4009cb3a-6754-481f-911b-907558cea38a,4009cb3a-6754-481f-911b-907558cea38a,1,0,653a7fd8-91c7-49aa-aa63-45da087e0d0a,653a7fd8-91c7Line truncated
|
||||
{6,1,1,1d3b400f-321b-4a0d-9220-f34cb9095dea,1,a4ace054-5c2c-4551-8927-d03035615a60,"3.1.7.123","Фирма ""1С""","БиблиотекаСтандартныхПодсистем",6757,1,0,4efe36f5-b178-4958-a26f-f549e1243965,4efe36f5-b178-4958-a26f-f549e1243965,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,4cbbdbaf-1f3a-46cd-8c42-28cdcfa32c06,4cbbdbaf-1f3a-46cd-8c42-28cdcfa32c06,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,e8b248d9-9049-456a-9c7d-7a0462cc67ab,e8b248d9-9049-456a-9c7d-7a0462cc67ab,1,0,d4562287-440d-4462-9de2-7097ccbf3764,d4562287-440d-4462-9de2-7097ccbf3764,1,0,1983fe34-c984-4659-ba41-0e94504f8989,1983fe34-c984-4659-ba41-0e94504f8989,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,153e11ac-f898-46a5-98c6-734adb933ca2,153e11ac-f898-46a5-98c6-734adb933ca2,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,f24de2ea-fcda-4052-b90f-e9d84314c4f2,f24de2ea-fcda-4052-b90f-e9d84314c4f2,1,0,ff8ae395-c740-4a30-a048-0d57eef6267f,ff8ae395-c740-4a30-a048-0d57eef6267f,1,0,51d06532-f61a-4ed5-afaa-cc4563633e0c,51d06532-f61a-4ed5-afaa-cc4563633e0c,1,0,0e49d980-581b-459f-a4b0-024e8c97e4c0,0e49d980-581b-459f-a4b0-024e8c97e4c0,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,2fd1287d-d96d-4480-baf7-8815ae5ffbfb,2fd1287d-d96d-4480-baf7-8815ae5ffbfb,1,0,d8c58e53-b7b9-4426-bdfa-d0816adf8cc1,d8c58e53-b7b9-4426-bdfa-d0816adf8cc1,1,0,4009cb3a-6754-481f-911b-907558cea38a,4009cb3a-6754-481f-911b-907558cea38a,1,0,653a7fd8-91c7-49aa-aa63-45da087e0d0a,653a7fd8-91c7Line truncated
|
||||
@@ -45,7 +45,7 @@
|
||||
|
||||
Функция ВерсияКалендарей() Экспорт
|
||||
|
||||
Возврат 42;
|
||||
Возврат 43;
|
||||
|
||||
КонецФункции
|
||||
|
||||
@@ -57,7 +57,7 @@
|
||||
|
||||
Функция ВерсияОбновленияДанныхПроизводственныхКалендарей() Экспорт
|
||||
|
||||
Возврат "3.1.7.91";
|
||||
Возврат "3.1.7.115";
|
||||
|
||||
КонецФункции
|
||||
|
||||
|
||||
+8
-8
@@ -222,8 +222,9 @@
|
||||
<Item Calendar="06" Year="2021" DayType="Праздник" Date="20210721" SwapDate=""/>
|
||||
<Item Calendar="06" Year="2022" DayType="Праздник" Date="20220504" SwapDate=""/>
|
||||
<Item Calendar="06" Year="2022" DayType="Предпраздничный" Date="20220708" SwapDate=""/>
|
||||
<Item Calendar="06" Year="2022" DayType="Праздник" Date="20220709" SwapDate="20220711"/>
|
||||
<Item Calendar="06" Year="2022" DayType="Суббота" Date="20220711" SwapDate="20220709"/>
|
||||
<Item Calendar="06" Year="2022" DayType="Праздник" Date="20220709" SwapDate=""/>
|
||||
<Item Calendar="06" Year="2022" DayType="Праздник" Date="20220710" SwapDate=""/>
|
||||
<Item Calendar="06" Year="2022" DayType="Праздник" Date="20220711" SwapDate=""/>
|
||||
<Item Calendar="07" Year="2016" DayType="Праздник" Date="20160328" SwapDate=""/>
|
||||
<Item Calendar="07" Year="2016" DayType="Праздник" Date="20160521" SwapDate=""/>
|
||||
<Item Calendar="07" Year="2016" DayType="Нерабочий" Date="20160705" SwapDate=""/>
|
||||
@@ -269,9 +270,7 @@
|
||||
<Item Calendar="07" Year="2021" DayType="Праздник" Date="20210920" SwapDate=""/>
|
||||
<Item Calendar="07" Year="2022" DayType="Праздник" Date="20220328" SwapDate=""/>
|
||||
<Item Calendar="07" Year="2022" DayType="Нерабочий" Date="20220521" SwapDate=""/>
|
||||
<Item Calendar="07" Year="2022" DayType="Предпраздничный" Date="20220708" SwapDate=""/>
|
||||
<Item Calendar="07" Year="2022" DayType="Праздник" Date="20220709" SwapDate="20220711"/>
|
||||
<Item Calendar="07" Year="2022" DayType="Суббота" Date="20220711" SwapDate="20220709"/>
|
||||
<Item Calendar="07" Year="2022" DayType="Праздник" Date="20220711" SwapDate=""/>
|
||||
<Item Calendar="07" Year="2022" DayType="Праздник" Date="20220901" SwapDate=""/>
|
||||
<Item Calendar="07" Year="2022" DayType="Праздник" Date="20220920" SwapDate=""/>
|
||||
<Item Calendar="07" Year="2023" DayType="Предпраздничный" Date="20230327" SwapDate=""/>
|
||||
@@ -383,7 +382,7 @@
|
||||
<Item Calendar="09" Year="2021" DayType="Нерабочий" Date="20210720" SwapDate=""/>
|
||||
<Item Calendar="09" Year="2022" DayType="Праздник" Date="20220503" SwapDate="20220504"/>
|
||||
<Item Calendar="09" Year="2022" DayType="Суббота" Date="20220504" SwapDate="20220101"/>
|
||||
<Item Calendar="09" Year="2022" DayType="Нерабочий" Date="20220709" SwapDate=""/>
|
||||
<Item Calendar="09" Year="2022" DayType="Нерабочий" Date="20220711" SwapDate=""/>
|
||||
<Item Calendar="09" Year="2023" DayType="Предпраздничный" Date="20230502" SwapDate=""/>
|
||||
<Item Calendar="09" Year="2023" DayType="Праздник" Date="20230503" SwapDate=""/>
|
||||
<Item Calendar="11" Year="2016" DayType="Праздник" Date="20160822" SwapDate=""/>
|
||||
@@ -624,8 +623,9 @@
|
||||
<Item Calendar="20" Year="2022" DayType="Суббота" Date="20220418" SwapDate="20220416"/>
|
||||
<Item Calendar="20" Year="2022" DayType="Праздник" Date="20220504" SwapDate=""/>
|
||||
<Item Calendar="20" Year="2022" DayType="Предпраздничный" Date="20220708" SwapDate=""/>
|
||||
<Item Calendar="20" Year="2022" DayType="Праздник" Date="20220709" SwapDate="20220711"/>
|
||||
<Item Calendar="20" Year="2022" DayType="Суббота" Date="20220711" SwapDate="20220709"/>
|
||||
<Item Calendar="20" Year="2022" DayType="Праздник" Date="20220709" SwapDate=""/>
|
||||
<Item Calendar="20" Year="2022" DayType="Праздник" Date="20220710" SwapDate=""/>
|
||||
<Item Calendar="20" Year="2022" DayType="Праздник" Date="20220711" SwapDate=""/>
|
||||
<Item Calendar="20" Year="2023" DayType="Предпраздничный" Date="20230322" SwapDate=""/>
|
||||
<Item Calendar="20" Year="2023" DayType="Праздник" Date="20230323" SwapDate=""/>
|
||||
<Item Calendar="20" Year="2023" DayType="Праздник" Date="20230416" SwapDate="20230417"/>
|
||||
|
||||
@@ -173,6 +173,7 @@
|
||||
<autoFill>true</autoFill>
|
||||
</contextMenu>
|
||||
<type>InputField</type>
|
||||
<markRequiredComplete>true</markRequiredComplete>
|
||||
<editMode>Enter</editMode>
|
||||
<showInHeader>true</showInHeader>
|
||||
<headerHorizontalAlign>Left</headerHorizontalAlign>
|
||||
@@ -181,6 +182,7 @@
|
||||
<autoMaxWidth>true</autoMaxWidth>
|
||||
<autoMaxHeight>true</autoMaxHeight>
|
||||
<wrap>true</wrap>
|
||||
<autoMarkIncomplete>true</autoMarkIncomplete>
|
||||
<chooseType>true</chooseType>
|
||||
<typeDomainEnabled>true</typeDomainEnabled>
|
||||
<textEdit>true</textEdit>
|
||||
@@ -253,6 +255,10 @@
|
||||
<event>OnCreateAtServer</event>
|
||||
<name>ПриСозданииНаСервере</name>
|
||||
</handlers>
|
||||
<handlers>
|
||||
<event>FillCheckProcessingAtServer</event>
|
||||
<name>ОбработкаПроверкиЗаполненияНаСервере</name>
|
||||
</handlers>
|
||||
<windowOpeningMode>LockOwner</windowOpeningMode>
|
||||
<autoSaveDataInSettings>Use</autoSaveDataInSettings>
|
||||
<saveWindowSettings>true</saveWindowSettings>
|
||||
@@ -315,6 +321,7 @@
|
||||
<edit>
|
||||
<common>true</common>
|
||||
</edit>
|
||||
<fillChecking>ShowError</fillChecking>
|
||||
<savedData>true</savedData>
|
||||
</attributes>
|
||||
<attributes>
|
||||
|
||||
@@ -54,6 +54,17 @@
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
&НаСервере
|
||||
Процедура ОбработкаПроверкиЗаполненияНаСервере(Отказ, ПроверяемыеРеквизиты)
|
||||
|
||||
Если Не Элементы.Наименование.Видимость Тогда
|
||||
ИсключаемыеРеквизиты = Новый Массив;
|
||||
ИсключаемыеРеквизиты.Добавить("Наименование");
|
||||
ОбщегоНазначения.УдалитьНепроверяемыеРеквизитыИзМассива(ПроверяемыеРеквизиты, ИсключаемыеРеквизиты);
|
||||
КонецЕсли;
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
#КонецОбласти
|
||||
|
||||
#Область ОбработчикиКомандФормы
|
||||
@@ -61,7 +72,11 @@
|
||||
&НаКлиенте
|
||||
Процедура ЗавершитьРедактирование(Команда)
|
||||
|
||||
ПодключитьОбработчикОжидания("ЗакрытьФорму", 0.1, Истина);
|
||||
ОчиститьСообщения();
|
||||
|
||||
Если ПроверитьЗаполнение() Тогда
|
||||
ПодключитьОбработчикОжидания("ЗакрытьФорму", 0.1, Истина);
|
||||
КонецЕсли;
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
|
||||
@@ -290,7 +290,7 @@
|
||||
КонецЕсли;
|
||||
|
||||
Если НЕ Модифицированность Тогда
|
||||
ПеречитатьДанныеССервера();
|
||||
ОбновитьОбъект();
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
|
||||
@@ -305,7 +305,7 @@
|
||||
Процедура СтандартнаяПеречитатьОтветПолучен(РезультатВопроса, ДополнительныеПараметры) Экспорт
|
||||
|
||||
Если РезультатВопроса = КодВозвратаДиалога.Да Тогда
|
||||
ПеречитатьДанныеССервера();
|
||||
ОбновитьОбъект();
|
||||
Модифицированность = Ложь;
|
||||
КонецЕсли;
|
||||
|
||||
@@ -1320,6 +1320,9 @@
|
||||
|
||||
ЗначениеВРеквизитФормы(ТекущаяСсылкаНаФайлСервер().ПолучитьОбъект(), "Объект");
|
||||
УстановитьДоступностьКнопок(ЭтотОбъект, Элементы);
|
||||
ДатаМодификации = МестноеВремя(ЭтотОбъект.Объект.ДатаМодификацииУниверсальная);
|
||||
РаботаСФайламиСлужебный.ЗаполнитьСписокПодписей(ЭтотОбъект);
|
||||
РаботаСФайламиСлужебный.ЗаполнитьСписокШифрования(ЭтотОбъект);
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
@@ -1377,16 +1380,6 @@
|
||||
|
||||
КонецФункции
|
||||
|
||||
&НаСервере
|
||||
Процедура ПеречитатьДанныеССервера()
|
||||
|
||||
ФайлОбъект = ТекущаяСсылкаНаФайлСервер().ПолучитьОбъект();
|
||||
ЗначениеВРеквизитФормы(ФайлОбъект, "Объект");
|
||||
РаботаСФайламиСлужебный.ЗаполнитьСписокПодписей(ЭтотОбъект);
|
||||
РаботаСФайламиСлужебный.ЗаполнитьСписокШифрования(ЭтотОбъект);
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
&НаСервере
|
||||
Функция ЗаписатьФайл(Знач ПараметрОбъект = Неопределено)
|
||||
|
||||
|
||||
+9
-4
@@ -360,9 +360,7 @@ function backupDB () {
|
||||
}
|
||||
|
||||
var fileDB = oFileSystemObject.GetFile(BaseFileName)
|
||||
|
||||
requiredFreeSize = fileDB.size * 2
|
||||
|
||||
if (drive.FreeSpace < requiredFreeSize) {
|
||||
throw new Error(
|
||||
format('[СообщениеДисковогоПространстваНедостаточно]',
|
||||
@@ -373,11 +371,18 @@ function backupDB () {
|
||||
DriveTypeName(drive.DriveType)
|
||||
)
|
||||
)
|
||||
} else {
|
||||
log(format('[СообщениеДисковогоПространстваДостаточно]',
|
||||
drive.DriveLetter,
|
||||
drive.FreeSpace / 1024 / 1024,
|
||||
fileDB.size / 1024 / 1024,
|
||||
DriveTypeName(drive.DriveType)
|
||||
),
|
||||
false)
|
||||
}
|
||||
|
||||
oFileSystemObject.CopyFile(BaseFileName, backupFileName, true)
|
||||
|
||||
log(format('[СообщениеРезультатСозданияРезервнойКопииБазы]', ret), ret !== 0)
|
||||
log('[СообщениеРезультатСозданияРезервнойКопииБазы]', false)
|
||||
|
||||
} catch (e) {
|
||||
CollectGarbage()
|
||||
|
||||
@@ -71,6 +71,22 @@
|
||||
Блокировка.Добавить("РегистрСведений.ЗначенияГруппДоступа");
|
||||
Блокировка.Добавить("РегистрСведений.ЗначенияГруппДоступаПоУмолчанию");
|
||||
|
||||
Если ОбщегоНазначения.ИнформационнаяБазаФайловая() Тогда
|
||||
ЭлементБлокировки = Блокировка.Добавить("Справочник.ПрофилиГруппДоступа");
|
||||
ЭлементБлокировки.Режим = РежимБлокировкиДанных.Разделяемый;
|
||||
ЭлементБлокировки = Блокировка.Добавить("Справочник.ГруппыДоступа");
|
||||
ЭлементБлокировки.Режим = РежимБлокировкиДанных.Разделяемый;
|
||||
ЭлементБлокировки = Блокировка.Добавить("РегистрСведений.ИспользуемыеВидыДоступа");
|
||||
ЭлементБлокировки.Режим = РежимБлокировкиДанных.Разделяемый;
|
||||
Если ТранзакцияАктивна() Тогда
|
||||
// АПК:1320-выкл - №783.1.3 Допустимо вызывать блокировку во внешней транзакции для файловой ИБ.
|
||||
// Требуется для предотвращения взаимоблокировки из-за автоматической установки
|
||||
// разделяемой блокировки в файловой ИБ на таблицу при чтении запросом в транзакции.
|
||||
Блокировка.Заблокировать();
|
||||
// АПК:1320-вкл.
|
||||
КонецЕсли;
|
||||
КонецЕсли;
|
||||
|
||||
ПрофильАдминистратор = УправлениеДоступом.ПрофильАдминистратор();
|
||||
|
||||
НачатьТранзакцию();
|
||||
|
||||
@@ -524,7 +524,7 @@
|
||||
КонецЕсли;
|
||||
|
||||
УведомитьПользователей = ОбщегоНазначенияКлиентСервер.СвойствоСтруктуры(
|
||||
Записи.ДополнительныеСвойства, "УведомитьПользователей", Истина);
|
||||
Записи.ДополнительныеСвойства, "УведомитьПользователей", Ложь);
|
||||
|
||||
Если Не УведомитьПользователей Тогда
|
||||
Возврат;
|
||||
|
||||
@@ -597,7 +597,7 @@
|
||||
<type>UsualButton</type>
|
||||
<commandName>Form.Command.Очистить</commandName>
|
||||
<buttonImportance>Normal</buttonImportance>
|
||||
<representation>Auto</representation>
|
||||
<representation>PictureAndText</representation>
|
||||
<autoMaxWidth>true</autoMaxWidth>
|
||||
<autoMaxHeight>true</autoMaxHeight>
|
||||
<placementArea>UserCmds</placementArea>
|
||||
@@ -716,6 +716,33 @@
|
||||
<currentRowUse>Auto</currentRowUse>
|
||||
</extInfo>
|
||||
</items>
|
||||
<items xsi:type="form:Button">
|
||||
<name>ОбновитьСведения</name>
|
||||
<id>151</id>
|
||||
<visible>true</visible>
|
||||
<enabled>true</enabled>
|
||||
<userVisible>
|
||||
<common>true</common>
|
||||
</userVisible>
|
||||
<extendedTooltip>
|
||||
<name>ОбновитьСведенияРасширеннаяПодсказка</name>
|
||||
<id>152</id>
|
||||
<type>Label</type>
|
||||
<autoMaxWidth>true</autoMaxWidth>
|
||||
<autoMaxHeight>true</autoMaxHeight>
|
||||
<extInfo xsi:type="form:LabelDecorationExtInfo">
|
||||
<horizontalAlign>Left</horizontalAlign>
|
||||
</extInfo>
|
||||
</extendedTooltip>
|
||||
<type>UsualButton</type>
|
||||
<commandName>Form.Command.ОбновитьСведения</commandName>
|
||||
<buttonImportance>Normal</buttonImportance>
|
||||
<representation>Auto</representation>
|
||||
<autoMaxWidth>true</autoMaxWidth>
|
||||
<autoMaxHeight>true</autoMaxHeight>
|
||||
<placementArea>UserCmds</placementArea>
|
||||
<representationInContextMenu>Auto</representationInContextMenu>
|
||||
</items>
|
||||
<items xsi:type="form:FormGroup">
|
||||
<name>ИнформацияОРазмереФайлов</name>
|
||||
<id>130</id>
|
||||
@@ -1115,7 +1142,7 @@
|
||||
<extInfo xsi:type="form:UsualGroupExtInfo">
|
||||
<group>Vertical</group>
|
||||
<behavior>Auto</behavior>
|
||||
<representation>WeakSeparation</representation>
|
||||
<representation>NormalSeparation</representation>
|
||||
<showLeftMargin>true</showLeftMargin>
|
||||
<united>true</united>
|
||||
<throughAlign>Auto</throughAlign>
|
||||
@@ -1966,11 +1993,14 @@
|
||||
<id>9</id>
|
||||
<toolTip>
|
||||
<key>ru</key>
|
||||
<value>Очистить</value>
|
||||
<value>Очистить ненужные файлы</value>
|
||||
</toolTip>
|
||||
<use>
|
||||
<common>true</common>
|
||||
</use>
|
||||
<picture xsi:type="core:PictureRef">
|
||||
<picture>StdPicture.Delete</picture>
|
||||
</picture>
|
||||
<action xsi:type="form:FormCommandHandlerContainer">
|
||||
<handler>
|
||||
<name>Очистить</name>
|
||||
@@ -2067,6 +2097,32 @@
|
||||
<currentRowUse>Auto</currentRowUse>
|
||||
<selectedRowsUse>Auto</selectedRowsUse>
|
||||
</formCommands>
|
||||
<formCommands>
|
||||
<name>ОбновитьСведения</name>
|
||||
<title>
|
||||
<key>ru</key>
|
||||
<value>Обновить</value>
|
||||
</title>
|
||||
<id>14</id>
|
||||
<toolTip>
|
||||
<key>ru</key>
|
||||
<value>Обновить сведения об удаляемых файлах</value>
|
||||
</toolTip>
|
||||
<use>
|
||||
<common>true</common>
|
||||
</use>
|
||||
<picture xsi:type="core:PictureRef">
|
||||
<picture>StdPicture.Refresh</picture>
|
||||
</picture>
|
||||
<action xsi:type="form:FormCommandHandlerContainer">
|
||||
<handler>
|
||||
<name>ОбновитьСведения</name>
|
||||
</handler>
|
||||
</action>
|
||||
<representation>Picture</representation>
|
||||
<currentRowUse>Auto</currentRowUse>
|
||||
<selectedRowsUse>Auto</selectedRowsUse>
|
||||
</formCommands>
|
||||
<commandInterface>
|
||||
<navigationPanel/>
|
||||
<commandBar/>
|
||||
|
||||
@@ -27,10 +27,7 @@
|
||||
КонецЕсли;
|
||||
|
||||
Элементы.СтраницыИтогиУдаляемыеФайлы.ТекущаяСтраница = Элементы.СтраницаПодсчетИтоговУдаляемыеФайлы;
|
||||
|
||||
ПараметрыВыполнения = ДлительныеОперации.ПараметрыВыполненияВФоне(УникальныйИдентификатор);
|
||||
ОписаниеРасчетаИтогов = ДлительныеОперации.ВыполнитьФункцию(ПараметрыВыполнения, "РаботаСФайламиСлужебный.СведенияОбОчищаемыхФайлах");
|
||||
|
||||
РассчитатьСведенияОбУдаляемыхФайлах();
|
||||
РежимОчисткиФайлов = РаботаСФайламиСлужебный.РежимОчисткиФайлов();
|
||||
НастроитьРежимыОчисткиФайлов();
|
||||
|
||||
@@ -38,14 +35,9 @@
|
||||
|
||||
&НаКлиенте
|
||||
Процедура ПриОткрытии(Отказ)
|
||||
Обработчик = Новый ОписаниеОповещения("ПриЗавершенииРасчетаИтогов", ЭтотОбъект);
|
||||
ПараметрыОжидания = ДлительныеОперацииКлиент.ПараметрыОжидания(ЭтотОбъект);
|
||||
ПараметрыОжидания.ВыводитьОкноОжидания = Ложь;
|
||||
ПараметрыОжидания.ВыводитьПрогрессВыполнения = Ложь;
|
||||
ДлительныеОперацииКлиент.ОжидатьЗавершение(ОписаниеРасчетаИтогов, Обработчик, ПараметрыОжидания);
|
||||
ОжидатьЗавершениеРасчетаСведенийОбУдаляемыхФайлах();
|
||||
КонецПроцедуры
|
||||
|
||||
|
||||
&НаКлиенте
|
||||
Процедура ОбработкаОповещения(ИмяСобытия, Параметр, Источник)
|
||||
|
||||
@@ -156,7 +148,7 @@
|
||||
Если НастройкаДляУдаленияРодителя <> Неопределено И НастройкаДляУдаленияРодителя.ВозможностьДетализации Тогда
|
||||
|
||||
ТекстВопроса = НСтр("ru = 'Удаление настройки приведет к прекращению очистки файлов
|
||||
|по заданным в ней правилам. Продолжить?'");
|
||||
|по заданным в ней правилам. Продолжить?'");
|
||||
ОписаниеОповещения = Новый ОписаниеОповещения("УдалитьНастройкуЗавершение", ЭтотОбъект);
|
||||
ПоказатьВопрос(ОписаниеОповещения, ТекстВопроса, РежимДиалогаВопрос.ДаНет, , КодВозвратаДиалога.Нет, НСтр("ru = 'Предупреждение'"));
|
||||
Возврат;
|
||||
@@ -179,7 +171,6 @@
|
||||
Процедура ДеревоОбъектовМетаданныхДействиеОчистка(Элемент, СтандартнаяОбработка)
|
||||
|
||||
СтандартнаяОбработка = Ложь;
|
||||
|
||||
УстановитьДействиеДляВыбранныхОбъектов(
|
||||
ПредопределенноеЗначение("Перечисление.ВариантыОчисткиФайлов.НеОчищать"));
|
||||
|
||||
@@ -308,12 +299,35 @@
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
|
||||
&НаКлиенте
|
||||
Процедура ОбновитьСведения(Команда)
|
||||
РассчитатьСведенияОбУдаляемыхФайлах();
|
||||
ОжидатьЗавершениеРасчетаСведенийОбУдаляемыхФайлах();
|
||||
КонецПроцедуры
|
||||
|
||||
#КонецОбласти
|
||||
|
||||
#Область СлужебныеПроцедурыИФункции
|
||||
|
||||
&НаСервере
|
||||
Процедура РассчитатьСведенияОбУдаляемыхФайлах()
|
||||
ПараметрыВыполнения = ДлительныеОперации.ПараметрыВыполненияВФоне(УникальныйИдентификатор);
|
||||
ОписаниеРасчетаИтогов = ДлительныеОперации.ВыполнитьФункцию(ПараметрыВыполнения,
|
||||
"РаботаСФайламиСлужебный.СведенияОбОчищаемыхФайлах");
|
||||
КонецПроцедуры
|
||||
|
||||
&НаКлиенте
|
||||
Процедура ПриЗавершенииРасчетаИтогов(Результат, ДополнительныеПараметры) Экспорт
|
||||
Процедура ОжидатьЗавершениеРасчетаСведенийОбУдаляемыхФайлах()
|
||||
Обработчик = Новый ОписаниеОповещения("ПриЗавершенииРасчетаСведенийОбУдаляемыхФайлах", ЭтотОбъект);
|
||||
ПараметрыОжидания = ДлительныеОперацииКлиент.ПараметрыОжидания(ЭтотОбъект);
|
||||
ПараметрыОжидания.ВыводитьОкноОжидания = Ложь;
|
||||
ПараметрыОжидания.ВыводитьПрогрессВыполнения = Ложь;
|
||||
ДлительныеОперацииКлиент.ОжидатьЗавершение(ОписаниеРасчетаИтогов, Обработчик, ПараметрыОжидания);
|
||||
КонецПроцедуры
|
||||
|
||||
&НаКлиенте
|
||||
Процедура ПриЗавершенииРасчетаСведенийОбУдаляемыхФайлах(Результат, ДополнительныеПараметры) Экспорт
|
||||
Если Результат = Неопределено Тогда
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
@@ -322,9 +336,9 @@
|
||||
Итоги = ПолучитьИзВременногоХранилища(Результат.АдресРезультата); // см. РаботаСФайламиСлужебный.СведенияОбОчищаемыхФайлах
|
||||
ОтобразитьИтоги(Итоги.ОбъемУдаляемыхФайлов, Итоги.ОбъемНенужныхФайлов);
|
||||
Иначе
|
||||
ОтобразитьИтоги(0,0);
|
||||
ОтобразитьИтоги(0, 0);
|
||||
ТекстПредупреждения = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
|
||||
НСтр("ru='Возникла ошибка при подсчете объема удаляемых файлов:
|
||||
НСтр("ru='Не удалось подсчитать объем удаляемых файлов:
|
||||
|%1'"),
|
||||
Результат.КраткоеПредставлениеОшибки);
|
||||
ПоказатьПредупреждение(, ТекстПредупреждения);
|
||||
|
||||
@@ -17,6 +17,7 @@
|
||||
// * ИдентификаторВладельца - СправочникСсылка.ИдентификаторыОбъектовМетаданных
|
||||
// * ЭтоНастройкаДляЭлементаСправочника - Булево
|
||||
// * ТипВладельцаФайла - СправочникСсылка.ИдентификаторыОбъектовМетаданных
|
||||
// * ПравилоОтбора - ХранилищеЗначения
|
||||
// * Действие - ПеречислениеСсылка.ВариантыОчисткиФайлов
|
||||
// * ПериодОчистки - ПеречислениеСсылка.ПериодОчисткиФайлов
|
||||
// * ЭтоФайл - Булево
|
||||
|
||||
@@ -71,9 +71,10 @@
|
||||
НачатьТранзакцию();
|
||||
Попытка
|
||||
Блокировка.Заблокировать();
|
||||
СтароеЗначение = СтандартныеПодсистемыСервер.ПараметрРаботыРасширения(ИмяПараметра, Истина);
|
||||
УжеИзменен = Ложь;
|
||||
СтароеЗначение = СтандартныеПодсистемыСервер.ПараметрРаботыРасширения(ИмяПараметра, Истина, УжеИзменен);
|
||||
Если СтароеЗначение <> НовоеЗначение Тогда
|
||||
Если ЗначениеЗаполнено(СтароеЗначение) Тогда // Не первое обновление.
|
||||
Если УжеИзменен Тогда
|
||||
УправлениеДоступомСлужебный.ПроверитьАктуальностьМетаданных();
|
||||
КонецЕсли;
|
||||
ОбновитьВспомогательныеДанныеРегистра();
|
||||
@@ -691,9 +692,10 @@
|
||||
НачатьТранзакцию();
|
||||
Попытка
|
||||
Блокировка.Заблокировать();
|
||||
СтароеЗначение = СтандартныеПодсистемыСервер.ПараметрРаботыРасширения(ИмяПараметра, Истина);
|
||||
УжеИзменен = Ложь;
|
||||
СтароеЗначение = СтандартныеПодсистемыСервер.ПараметрРаботыРасширения(ИмяПараметра, Истина, УжеИзменен);
|
||||
Если СтароеЗначение <> НовоеЗначение Тогда
|
||||
Если ЗначениеЗаполнено(СтароеЗначение) Тогда // Не первое обновление.
|
||||
Если УжеИзменен Тогда
|
||||
УправлениеДоступомСлужебный.ПроверитьАктуальностьМетаданных();
|
||||
КонецЕсли;
|
||||
УстановитьОтключениеБезопасногоРежима(Истина);
|
||||
|
||||
@@ -11,9 +11,10 @@
|
||||
#Область СлужебныйПрограммныйИнтерфейс
|
||||
|
||||
// См. СтандартныеПодсистемыСервер.ПараметрРаботыРасширения
|
||||
Функция ПараметрРаботыРасширения(ИмяПараметра, БезУчетаВерсииРасширений = Ложь) Экспорт
|
||||
Функция ПараметрРаботыРасширения(ИмяПараметра, БезУчетаВерсииРасширений = Ложь, УжеИзменен = Неопределено) Экспорт
|
||||
|
||||
ВерсияРасширений = ?(БезУчетаВерсииРасширений, Справочники.ВерсииРасширений.ПустаяСсылка(), ПараметрыСеанса.ВерсияРасширений);
|
||||
ВерсияРасширений = ?(БезУчетаВерсииРасширений,
|
||||
Справочники.ВерсииРасширений.ПустаяСсылка(), ПараметрыСеанса.ВерсияРасширений);
|
||||
|
||||
Запрос = Новый Запрос;
|
||||
Запрос.УстановитьПараметр("ВерсияРасширений", ВерсияРасширений);
|
||||
@@ -30,20 +31,99 @@
|
||||
УстановитьОтключениеБезопасногоРежима(Истина);
|
||||
УстановитьПривилегированныйРежим(Истина);
|
||||
Выборка = Запрос.Выполнить().Выбрать();
|
||||
Если Выборка.Следующий() Тогда
|
||||
Возврат Выборка.ХранилищеПараметра.Получить();
|
||||
КонецЕсли;
|
||||
УстановитьПривилегированныйРежим(Ложь);
|
||||
УстановитьОтключениеБезопасногоРежима(Ложь);
|
||||
|
||||
Возврат Неопределено;
|
||||
Если Не Выборка.Следующий()
|
||||
Или ТипЗнч(Выборка.ХранилищеПараметра) <> Тип("ХранилищеЗначения") Тогда
|
||||
Возврат Неопределено;
|
||||
КонецЕсли;
|
||||
|
||||
Содержимое = Выборка.ХранилищеПараметра.Получить();
|
||||
Если Не БезУчетаВерсииРасширений
|
||||
Или ТипЗнч(Содержимое) <> Тип("Структура")
|
||||
Или Содержимое.Количество() <> 5
|
||||
Или Не Содержимое.Свойство("НомерСеансаИзменившегоПараметр")
|
||||
Или Не Содержимое.Свойство("НачалоСеансаИзменившегоПараметр")
|
||||
Или Не Содержимое.Свойство("КлючКомпьютераСеансаИзменившегоПараметр")
|
||||
Или Не Содержимое.Свойство("ОперативнаяОтметкаВремениСеансаИзменившегоПараметр")
|
||||
Или Не Содержимое.Свойство("ЗначениеПараметра") Тогда
|
||||
Возврат Содержимое;
|
||||
КонецЕсли;
|
||||
|
||||
Если ТипЗнч(УжеИзменен) <> Тип("Булево") Тогда
|
||||
Возврат Содержимое.ЗначениеПараметра;
|
||||
КонецЕсли;
|
||||
|
||||
ОтметкаВремени = Справочники.ВерсииРасширений.ОперативнаяОтметкаВремениСеанса();
|
||||
|
||||
Если ТипЗнч(Содержимое.ОперативнаяОтметкаВремениСеансаИзменившегоПараметр) <> Тип("Дата")
|
||||
Или Не ЗначениеЗаполнено(Содержимое.ОперативнаяОтметкаВремениСеансаИзменившегоПараметр) Тогда
|
||||
УжеИзменен = Истина;
|
||||
Иначе
|
||||
СвойстваСеанса = СтандартныеПодсистемыПовтИсп.СвойстваТекущегоСеанса();
|
||||
Если ОбщегоНазначения.ИнформационнаяБазаФайловая()
|
||||
И СвойстваСеанса.КлючКомпьютера <> Содержимое.КлючКомпьютераСеансаИзменившегоПараметр Тогда
|
||||
Сдвиг = 60*60;
|
||||
Иначе
|
||||
Сдвиг = 15;
|
||||
КонецЕсли;
|
||||
Если Содержимое.ОперативнаяОтметкаВремениСеансаИзменившегоПараметр
|
||||
+ Сдвиг >= ОтметкаВремени Тогда
|
||||
УжеИзменен = Истина;
|
||||
КонецЕсли;
|
||||
КонецЕсли;
|
||||
|
||||
Если УжеИзменен Тогда
|
||||
КонфигурацияИзменена = КонфигурацияБазыДанныхИзмененаДинамически();
|
||||
РасширенияИзменены = Справочники.ВерсииРасширений.РасширенияИзмененыДинамически();
|
||||
Если КонфигурацияИзменена Или РасширенияИзменены Тогда
|
||||
Комментарий = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
|
||||
НСтр("ru = 'При получении для изменения параметра работы версии расширений
|
||||
|%1
|
||||
|в текущем сеансе (с устаревшей версией метаданных: %2)
|
||||
|%3
|
||||
|обнаружено, что параметр был уже изменен в сеансе
|
||||
|%4'"),
|
||||
ИмяПараметра,
|
||||
?(КонфигурацияИзменена И РасширенияИзменены, "Конфигурация, Расширения",
|
||||
?(КонфигурацияИзменена, "Конфигурация", "Расширения")),
|
||||
Формат(СвойстваСеанса.НачалоСеанса, "ДЛФ=DT;")
|
||||
+ " " + Формат(СвойстваСеанса.НомерСеанса, "ЧН=0; ЧГ=;")
|
||||
+ " [" + СвойстваСеанса.КлючКомпьютера + "]"
|
||||
+ " (" + Формат(ОтметкаВремени, "ДЛФ=DT;") + ")",
|
||||
Формат(Содержимое.НачалоСеансаИзменившегоПараметр, "ДЛФ=DT;")
|
||||
+ " " + Формат(Содержимое.НомерСеансаИзменившегоПараметр, "ЧН=0; ЧГ=;")
|
||||
+ " [" + Содержимое.КлючКомпьютераСеансаИзменившегоПараметр + "]"
|
||||
+ " (" + Формат(Содержимое.ОперативнаяОтметкаВремениСеансаИзменившегоПараметр, "ДЛФ=DT;") + ")");
|
||||
ИмяСобытия = НСтр("ru = 'Расширения конфигурации.Получение параметра работы расширений'",
|
||||
ОбщегоНазначения.КодОсновногоЯзыка());
|
||||
ЗаписьЖурналаРегистрации(ИмяСобытия, УровеньЖурналаРегистрации.Информация,,, Комментарий);
|
||||
КонецЕсли;
|
||||
КонецЕсли;
|
||||
|
||||
Возврат Содержимое.ЗначениеПараметра;
|
||||
|
||||
КонецФункции
|
||||
|
||||
// См. СтандартныеПодсистемыСервер.УстановитьПараметрРаботыРасширения.
|
||||
Процедура УстановитьПараметрРаботыРасширения(ИмяПараметра, Значение, БезУчетаВерсииРасширений = Ложь) Экспорт
|
||||
|
||||
ВерсияРасширений = ?(БезУчетаВерсииРасширений, Справочники.ВерсииРасширений.ПустаяСсылка(), ПараметрыСеанса.ВерсияРасширений);
|
||||
ВерсияРасширений = ?(БезУчетаВерсииРасширений,
|
||||
Справочники.ВерсииРасширений.ПустаяСсылка(), ПараметрыСеанса.ВерсияРасширений);
|
||||
|
||||
Если БезУчетаВерсииРасширений Тогда
|
||||
СвойстваСеанса = СтандартныеПодсистемыПовтИсп.СвойстваТекущегоСеанса();
|
||||
Содержимое = Новый Структура;
|
||||
Содержимое.Вставить("ЗначениеПараметра", Значение);
|
||||
Содержимое.Вставить("НомерСеансаИзменившегоПараметр", СвойстваСеанса.НомерСеанса);
|
||||
Содержимое.Вставить("НачалоСеансаИзменившегоПараметр", СвойстваСеанса.НачалоСеанса);
|
||||
Содержимое.Вставить("КлючКомпьютераСеансаИзменившегоПараметр", СвойстваСеанса.КлючКомпьютера);
|
||||
Содержимое.Вставить("ОперативнаяОтметкаВремениСеансаИзменившегоПараметр",
|
||||
Справочники.ВерсииРасширений.ОперативнаяОтметкаВремениСеанса());
|
||||
Иначе
|
||||
Содержимое = Значение;
|
||||
КонецЕсли;
|
||||
|
||||
НаборЗаписей = РегистрыСведений.ПараметрыРаботыПрограммы.СлужебныйНаборЗаписей(
|
||||
РегистрыСведений.ПараметрыРаботыВерсийРасширений);
|
||||
@@ -54,7 +134,7 @@
|
||||
НоваяЗапись = НаборЗаписей.Добавить();
|
||||
НоваяЗапись.ВерсияРасширений = ВерсияРасширений;
|
||||
НоваяЗапись.ИмяПараметра = ИмяПараметра;
|
||||
НоваяЗапись.ХранилищеПараметра = Новый ХранилищеЗначения(Значение);
|
||||
НоваяЗапись.ХранилищеПараметра = Новый ХранилищеЗначения(Содержимое);
|
||||
|
||||
НаборЗаписей.Записать();
|
||||
|
||||
|
||||
@@ -58,7 +58,15 @@
|
||||
|
||||
УстановитьПривилегированныйРежим(Истина);
|
||||
|
||||
РегистрыСведений.ПраваРолей.ОбновитьДанныеРегистра(ЕстьИзменения);
|
||||
ПараметрыОбновления = РегистрыСведений.ПараметрыРаботыПрограммы.ПараметрыОбновления();
|
||||
ПараметрыОбновления.УправлениеДоступом.ПраваРолей.Обновлять = Истина;
|
||||
|
||||
РегистрыСведений.ПараметрыРаботыПрограммы.ВыполнитьОбновлениеНеразделенныхДанныхВФоне(
|
||||
ПараметрыОбновления, УникальныйИдентификатор);
|
||||
|
||||
Если ПараметрыОбновления.УправлениеДоступом.ПраваРолей.ЕстьИзменения Тогда
|
||||
ЕстьИзменения = Истина;
|
||||
КонецЕсли;
|
||||
|
||||
Элементы.Список.Обновить();
|
||||
|
||||
|
||||
@@ -41,7 +41,7 @@
|
||||
// Возвращаемое значение:
|
||||
// ТаблицаЗначений:
|
||||
// * ВладелецФайла - ОпределяемыйТип.ВладелецФайлов
|
||||
// * ОбъемНенужныхФайлов - Число
|
||||
// * ОбъемНенужныхФайлов - Число - размер в байтах.
|
||||
//
|
||||
Функция ТаблицаНенужныхФайлов() Экспорт
|
||||
|
||||
@@ -84,14 +84,14 @@
|
||||
МассивИсключений = Новый Массив;
|
||||
КонецЕсли;
|
||||
|
||||
ПроцессорВывода = Новый ПроцессорВыводаРезультатаКомпоновкиДанныхВКоллекциюЗначений;
|
||||
ТаблицаЗначений = Новый ТаблицаЗначений;
|
||||
ПроцессорВывода.УстановитьОбъект(ТаблицаЗначений);
|
||||
НенужныеФайлы = РаботаСФайламиСлужебный.ВыбратьДанныеПоПравилу(НастройкаОчистки, МассивИсключений, ПроцессорВывода);
|
||||
|
||||
Для Каждого НенужныйФайл Из НенужныеФайлы Цикл
|
||||
НенужныеФайлы = РаботаСФайламиСлужебный.ВыбратьНенужныеФайлы(НастройкаОчистки, МассивИсключений);
|
||||
Для Каждого НенужныйФайл Из НенужныеФайлы.Строки Цикл
|
||||
НоваяСтрока = ТаблицаНенужныхФайлов.Добавить();
|
||||
ЗаполнитьЗначенияСвойств(НоваяСтрока, НенужныйФайл);
|
||||
НоваяСтрока.ВладелецФайла = НенужныйФайл.ВладелецФайла;
|
||||
НоваяСтрока.ОбъемНенужныхФайлов = ?(НенужныйФайл.Строки.Количество() > 0, 0, НенужныйФайл.Размер);
|
||||
Для Каждого НенужнаяВерсияФайла Из НенужныйФайл.Строки Цикл
|
||||
НоваяСтрока.ОбъемНенужныхФайлов = НоваяСтрока.ОбъемНенужныхФайлов + НенужнаяВерсияФайла.Размер;
|
||||
КонецЦикла
|
||||
КонецЦикла;
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
@@ -48,14 +48,8 @@
|
||||
Функция ОбъемДанныхВсего()
|
||||
|
||||
УстановитьПривилегированныйРежим(Истина);
|
||||
|
||||
Запрос = Новый Запрос;
|
||||
|
||||
Запрос.Текст = РаботаСФайламиСлужебный.ТекстЗапросаПолногоОбъемаФайлов();
|
||||
|
||||
РезультатЗапроса = Запрос.Выполнить();
|
||||
|
||||
Возврат РезультатЗапроса.Выгрузить();
|
||||
Запрос = Новый Запрос(РаботаСФайламиСлужебный.ТекстЗапросаПолногоОбъемаФайлов());
|
||||
Возврат Запрос.Выполнить().Выгрузить();
|
||||
|
||||
КонецФункции
|
||||
|
||||
|
||||
+30
@@ -236,6 +236,36 @@
|
||||
<dcsset:selection>
|
||||
<dcsset:item xsi:type="dcsset:SelectedItemAuto"/>
|
||||
</dcsset:selection>
|
||||
<dcsset:conditionalAppearance>
|
||||
<dcsset:item>
|
||||
<dcsset:selection>
|
||||
<dcsset:item>
|
||||
<dcsset:field>ОбъемНужныхФайлов</dcsset:field>
|
||||
</dcsset:item>
|
||||
</dcsset:selection>
|
||||
<dcsset:filter/>
|
||||
<dcsset:appearance>
|
||||
<dcscor:item xsi:type="dcsset:SettingsParameterValue">
|
||||
<dcscor:parameter>ЦветВДиаграмме</dcscor:parameter>
|
||||
<dcscor:value xsi:type="v8ui:Color">web:SkyBlue</dcscor:value>
|
||||
</dcscor:item>
|
||||
</dcsset:appearance>
|
||||
</dcsset:item>
|
||||
<dcsset:item>
|
||||
<dcsset:selection>
|
||||
<dcsset:item>
|
||||
<dcsset:field>ОбъемНужныхФайлов</dcsset:field>
|
||||
</dcsset:item>
|
||||
</dcsset:selection>
|
||||
<dcsset:filter/>
|
||||
<dcsset:appearance>
|
||||
<dcscor:item xsi:type="dcsset:SettingsParameterValue">
|
||||
<dcscor:parameter>ЦветВДиаграмме</dcscor:parameter>
|
||||
<dcscor:value xsi:type="v8ui:Color">web:DarkSalmon</dcscor:value>
|
||||
</dcscor:item>
|
||||
</dcsset:appearance>
|
||||
</dcsset:item>
|
||||
</dcsset:conditionalAppearance>
|
||||
</dcsset:item>
|
||||
<dcsset:item xsi:type="dcsset:StructureItemGroup">
|
||||
<dcsset:groupItems>
|
||||
|
||||
@@ -386,7 +386,9 @@
|
||||
ДоступныеЗначения.Добавить("ОстаткиИОбороты", НСтр("ru = 'Остатки и обороты'"));
|
||||
ДоступныеЗначения.Добавить("Остатки", НСтр("ru = 'Остатки'"));
|
||||
ДоступныеЗначения.Добавить("Обороты", НСтр("ru = 'Обороты'"));
|
||||
ДоступныеЗначения.Добавить("ОборотыДтКт", НСтр("ru = 'Обороты Дт/Кт'"));
|
||||
Если ОбъектМетаданных.Корреспонденция Тогда
|
||||
ДоступныеЗначения.Добавить("ОборотыДтКт", НСтр("ru = 'Обороты Дт/Кт'"));
|
||||
КонецЕсли;
|
||||
ДоступныеЗначения.Добавить("ДвиженияССубконто", НСтр("ru = 'Движения с субконто'"));
|
||||
ИначеЕсли ТипОбъектаМетаданных = "РегистрыРасчета" Тогда
|
||||
Если ОбъектМетаданных.ПериодДействия Тогда
|
||||
@@ -1046,9 +1048,13 @@
|
||||
Продолжить;
|
||||
КонецЕсли;
|
||||
|
||||
Если УточнятьСуффиксыПолей
|
||||
И Не МетаданныеПоля.Балансовый Тогда
|
||||
СуффиксыПолей = СтрРазделить("Дт@Кт", "@", Ложь);
|
||||
Если УточнятьСуффиксыПолей Тогда
|
||||
Если МетаданныеПоля.Балансовый ИЛИ (ПараметрыОтчета.ТипОбъектаМетаданных = "РегистрыБухгалтерии"
|
||||
И НЕ МетаданныеИсточника.Корреспонденция) Тогда
|
||||
СуффиксыПолей = СтрРазделить("", "@");
|
||||
Иначе
|
||||
СуффиксыПолей = СтрРазделить("Дт@Кт", "@", Ложь);
|
||||
КонецЕсли;
|
||||
Иначе
|
||||
СуффиксыПолей = СтрРазделить("", "@");
|
||||
КонецЕсли;
|
||||
|
||||
@@ -1535,93 +1535,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>Constant.УдалитьЛогинДоступаКСервисуMorpher</name>
|
||||
<right>
|
||||
@@ -1818,6 +1731,93 @@
|
||||
<value>true</value>
|
||||
</right>
|
||||
</object>
|
||||
<object>
|
||||
<name>Configuration.БиблиотекаСтандартныхПодсистем</name>
|
||||
<right>
|
||||
<name>Administration</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
<right>
|
||||
<name>DataAdministration</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
<right>
|
||||
<name>UpdateDataBaseConfiguration</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
<right>
|
||||
<name>ExclusiveMode</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
<right>
|
||||
<name>ActiveUsers</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
<right>
|
||||
<name>EventLog</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
<right>
|
||||
<name>ThinClient</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
<right>
|
||||
<name>WebClient</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
<right>
|
||||
<name>ThickClient</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
<right>
|
||||
<name>ExternalConnection</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
<right>
|
||||
<name>Automation</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
<right>
|
||||
<name>TechnicalSpecialistMode</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
<right>
|
||||
<name>MainWindowModeNormal</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
<right>
|
||||
<name>MainWindowModeWorkplace</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
<right>
|
||||
<name>MainWindowModeEmbeddedWorkplace</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
<right>
|
||||
<name>MainWindowModeFullscreenWorkplace</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
<right>
|
||||
<name>MainWindowModeKiosk</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
<right>
|
||||
<name>AnalyticsSystemClient</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
<right>
|
||||
<name>SaveUserData</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
<right>
|
||||
<name>ConfigurationExtensionsAdministration</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
<right>
|
||||
<name>Output</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
</object>
|
||||
<object>
|
||||
<name>Constant.СписокРасширенийТекстовыхФайлов</name>
|
||||
<right>
|
||||
|
||||
@@ -655,33 +655,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>
|
||||
</object>
|
||||
<object>
|
||||
<name>Constant.ОтправлятьПисьмаВФорматеHTML</name>
|
||||
<right>
|
||||
@@ -766,6 +739,33 @@
|
||||
<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>
|
||||
</object>
|
||||
<object>
|
||||
<name>DataProcessor.УправлениеПодключениемDSS</name>
|
||||
<right>
|
||||
@@ -2309,6 +2309,13 @@
|
||||
<value>true</value>
|
||||
</right>
|
||||
</object>
|
||||
<object>
|
||||
<name>CommonForm.РазрешенныеНеаккредитованныеУЦ</name>
|
||||
<right>
|
||||
<name>View</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
</object>
|
||||
<object>
|
||||
<name>Constant.ИспользоватьРазделениеПоОбластямДанных</name>
|
||||
<right>
|
||||
|
||||
@@ -539,33 +539,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>
|
||||
</object>
|
||||
<object>
|
||||
<name>Constant.ОтправлятьПисьмаВФорматеHTML</name>
|
||||
<right>
|
||||
@@ -650,6 +623,33 @@
|
||||
<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>
|
||||
</object>
|
||||
<object>
|
||||
<name>DataProcessor.ЗагрузкаДанныхИзФайла</name>
|
||||
<right>
|
||||
|
||||
@@ -10,6 +10,13 @@
|
||||
<value>true</value>
|
||||
</right>
|
||||
</object>
|
||||
<object>
|
||||
<name>CommonForm.НастройкаОнлайнПоддержки</name>
|
||||
<right>
|
||||
<name>View</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
</object>
|
||||
<object>
|
||||
<name>Configuration.БиблиотекаСтандартныхПодсистем</name>
|
||||
<right>
|
||||
@@ -37,13 +44,6 @@
|
||||
<value>true</value>
|
||||
</right>
|
||||
</object>
|
||||
<object>
|
||||
<name>CommonForm.НастройкаОнлайнПоддержки</name>
|
||||
<right>
|
||||
<name>View</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
</object>
|
||||
<object>
|
||||
<name>CommonForm.ПоискИсполняемогоФайлаОнлайнПоддержки</name>
|
||||
<right>
|
||||
|
||||
@@ -173,6 +173,31 @@
|
||||
<value>true</value>
|
||||
</right>
|
||||
</object>
|
||||
<object>
|
||||
<name>DataProcessor.ИнтерактивноеИзменениеВыгрузки</name>
|
||||
<right>
|
||||
<name>Use</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
<right>
|
||||
<name>View</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
</object>
|
||||
<object>
|
||||
<name>CommonCommand.Синхронизировать</name>
|
||||
<right>
|
||||
<name>View</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
</object>
|
||||
<object>
|
||||
<name>WebService.Exchange.Operation.DownloadData</name>
|
||||
<right>
|
||||
<name>Use</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
</object>
|
||||
<object>
|
||||
<name>Configuration.БиблиотекаСтандартныхПодсистем</name>
|
||||
<right>
|
||||
@@ -200,31 +225,6 @@
|
||||
<value>true</value>
|
||||
</right>
|
||||
</object>
|
||||
<object>
|
||||
<name>DataProcessor.ИнтерактивноеИзменениеВыгрузки</name>
|
||||
<right>
|
||||
<name>Use</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
<right>
|
||||
<name>View</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
</object>
|
||||
<object>
|
||||
<name>CommonCommand.Синхронизировать</name>
|
||||
<right>
|
||||
<name>View</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
</object>
|
||||
<object>
|
||||
<name>WebService.Exchange.Operation.DownloadData</name>
|
||||
<right>
|
||||
<name>Use</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
</object>
|
||||
<object>
|
||||
<name>WebService.EnterpriseDataUpload_1_0_1_1.Operation.PutData</name>
|
||||
<right>
|
||||
|
||||
@@ -72,6 +72,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>Configuration.БиблиотекаСтандартныхПодсистем</name>
|
||||
<right>
|
||||
@@ -99,29 +122,6 @@
|
||||
<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>
|
||||
|
||||
@@ -10,6 +10,17 @@
|
||||
<value>true</value>
|
||||
</right>
|
||||
</object>
|
||||
<object>
|
||||
<name>DataProcessor.ЗагрузкаКлассификатораБанков</name>
|
||||
<right>
|
||||
<name>Use</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
<right>
|
||||
<name>View</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
</object>
|
||||
<object>
|
||||
<name>Configuration.БиблиотекаСтандартныхПодсистем</name>
|
||||
<right>
|
||||
@@ -37,17 +48,6 @@
|
||||
<value>true</value>
|
||||
</right>
|
||||
</object>
|
||||
<object>
|
||||
<name>DataProcessor.ЗагрузкаКлассификатораБанков</name>
|
||||
<right>
|
||||
<name>Use</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
<right>
|
||||
<name>View</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
</object>
|
||||
<object>
|
||||
<name>Catalog.КлассификаторБанков</name>
|
||||
<right>
|
||||
|
||||
@@ -391,6 +391,24 @@
|
||||
<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>Document.ЭлектронноеПисьмоВходящее.Command.Переслать</name>
|
||||
<right>
|
||||
<name>View</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
</object>
|
||||
<object>
|
||||
<name>Configuration.БиблиотекаСтандартныхПодсистем</name>
|
||||
<right>
|
||||
@@ -418,24 +436,6 @@
|
||||
<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>Document.ЭлектронноеПисьмоВходящее.Command.Переслать</name>
|
||||
<right>
|
||||
<name>View</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
</object>
|
||||
<object>
|
||||
<name>DocumentJournal.Взаимодействия.Command.ЗапланироватьВзаимодействиеПоПредмету</name>
|
||||
<right>
|
||||
|
||||
@@ -26,6 +26,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>Configuration.БиблиотекаСтандартныхПодсистем</name>
|
||||
<right>
|
||||
@@ -53,29 +76,6 @@
|
||||
<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>Catalog.ПроизводственныеКалендари</name>
|
||||
<right>
|
||||
|
||||
@@ -158,6 +158,13 @@
|
||||
<value>true</value>
|
||||
</right>
|
||||
</object>
|
||||
<object>
|
||||
<name>CommonCommand.ОтправитьПисьмо</name>
|
||||
<right>
|
||||
<name>View</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
</object>
|
||||
<object>
|
||||
<name>Configuration.БиблиотекаСтандартныхПодсистем</name>
|
||||
<right>
|
||||
@@ -185,13 +192,6 @@
|
||||
<value>true</value>
|
||||
</right>
|
||||
</object>
|
||||
<object>
|
||||
<name>CommonCommand.ОтправитьПисьмо</name>
|
||||
<right>
|
||||
<name>View</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
</object>
|
||||
<object>
|
||||
<name>CommonCommand.ОтправитьSMS</name>
|
||||
<right>
|
||||
|
||||
@@ -26,6 +26,21 @@
|
||||
<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>
|
||||
</object>
|
||||
<object>
|
||||
<name>Configuration.БиблиотекаСтандартныхПодсистем</name>
|
||||
<right>
|
||||
@@ -53,21 +68,6 @@
|
||||
<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>
|
||||
</object>
|
||||
<object>
|
||||
<name>Catalog.УчетныеЗаписиСинхронизацииФайлов</name>
|
||||
<right>
|
||||
|
||||
@@ -2221,45 +2221,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>Constant.УдалитьЛогинДоступаКСервисуMorpher</name>
|
||||
<right>
|
||||
@@ -2447,6 +2408,45 @@
|
||||
<value>false</value>
|
||||
</right>
|
||||
</object>
|
||||
<object>
|
||||
<name>Configuration.БиблиотекаСтандартныхПодсистем</name>
|
||||
<right>
|
||||
<name>Administration</name>
|
||||
<value>false</value>
|
||||
</right>
|
||||
<right>
|
||||
<name>UpdateDataBaseConfiguration</name>
|
||||
<value>false</value>
|
||||
</right>
|
||||
<right>
|
||||
<name>ThickClient</name>
|
||||
<value>false</value>
|
||||
</right>
|
||||
<right>
|
||||
<name>ExternalConnection</name>
|
||||
<value>false</value>
|
||||
</right>
|
||||
<right>
|
||||
<name>Automation</name>
|
||||
<value>false</value>
|
||||
</right>
|
||||
<right>
|
||||
<name>TechnicalSpecialistMode</name>
|
||||
<value>false</value>
|
||||
</right>
|
||||
<right>
|
||||
<name>ConfigurationExtensionsAdministration</name>
|
||||
<value>false</value>
|
||||
</right>
|
||||
<right>
|
||||
<name>InteractiveOpenExtDataProcessors</name>
|
||||
<value>false</value>
|
||||
</right>
|
||||
<right>
|
||||
<name>InteractiveOpenExtReports</name>
|
||||
<value>false</value>
|
||||
</right>
|
||||
</object>
|
||||
<object>
|
||||
<name>Constant.СписокРасширенийТекстовыхФайлов</name>
|
||||
<right>
|
||||
|
||||
@@ -965,33 +965,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>
|
||||
</object>
|
||||
<object>
|
||||
<name>Constant.ОтправлятьПисьмаВФорматеHTML</name>
|
||||
<right>
|
||||
@@ -1069,6 +1042,33 @@
|
||||
<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>
|
||||
</object>
|
||||
<object>
|
||||
<name>Catalog.ТелефонныйЗвонокПрисоединенныеФайлы</name>
|
||||
<right>
|
||||
|
||||
@@ -59,6 +59,13 @@
|
||||
<value>true</value>
|
||||
</right>
|
||||
</object>
|
||||
<object>
|
||||
<name>WebService.RemoteAdministrationOfExchange_2_4_5_1.Operation.StartExchangeExecutionInSecondDataBase</name>
|
||||
<right>
|
||||
<name>Use</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
</object>
|
||||
<object>
|
||||
<name>Configuration.БиблиотекаСтандартныхПодсистем</name>
|
||||
<right>
|
||||
@@ -86,13 +93,6 @@
|
||||
<value>true</value>
|
||||
</right>
|
||||
</object>
|
||||
<object>
|
||||
<name>WebService.RemoteAdministrationOfExchange_2_4_5_1.Operation.StartExchangeExecutionInSecondDataBase</name>
|
||||
<right>
|
||||
<name>Use</name>
|
||||
<value>true</value>
|
||||
</right>
|
||||
</object>
|
||||
<object>
|
||||
<name>WebService.RemoteAdministrationOfExchange.Operation.PrepareExchangeExecution</name>
|
||||
<right>
|
||||
|
||||
+26
-1
@@ -158,7 +158,7 @@
|
||||
ПараметрыРедактированияФормулы = КонструкторФормулКлиент.ПараметрыРедактированияФормулы();
|
||||
ПараметрыРедактированияФормулы.Операнды = НастройкиОтчета.АдресСхемы;
|
||||
ПараметрыРедактированияФормулы.ИмяКоллекцииСКДОперандов = ИмяКоллекцииПолей;
|
||||
ПараметрыРедактированияФормулы.Наименование = "";
|
||||
ПараметрыРедактированияФормулы.Наименование = НаименованиеНовогоПоля();
|
||||
ПараметрыРедактированияФормулы.ДляЗапроса = Истина;
|
||||
|
||||
Обработчик = Новый ОписаниеОповещения("ПослеДобавленияФормулы", ЭтотОбъект);
|
||||
@@ -424,6 +424,31 @@
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
&НаКлиенте
|
||||
Функция НаименованиеНовогоПоля()
|
||||
|
||||
ЗаголовкиПолей = Новый Соответствие;
|
||||
|
||||
ПользовательскиеПоля = КомпоновщикНастроек.Настройки.ДоступныеПоляВыбора.Элементы.Найти(Новый ПолеКомпоновкиДанных("ПользовательскиеПоля"));
|
||||
Если ПользовательскиеПоля = Неопределено Тогда
|
||||
Возврат НСтр("ru = 'Поле 1'");
|
||||
КонецЕсли;
|
||||
|
||||
Для Каждого Поле Из ПользовательскиеПоля.Элементы Цикл
|
||||
ЗаголовкиПолей.Вставить(Поле.Заголовок, Истина);
|
||||
КонецЦикла;
|
||||
|
||||
Для НомерПоля = 1 По 100 Цикл
|
||||
НаименованиеПоля = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(НСтр("ru = 'Поле %1'"), НомерПоля);
|
||||
Если ЗаголовкиПолей[НаименованиеПоля] = Неопределено Тогда
|
||||
Возврат НаименованиеПоля;
|
||||
КонецЕсли;
|
||||
КонецЦикла;
|
||||
|
||||
Возврат НСтр("ru = 'Поле'");
|
||||
|
||||
КонецФункции
|
||||
|
||||
#Область Общее
|
||||
|
||||
&НаКлиентеНаСервереБезКонтекста
|
||||
|
||||
Reference in new issue
Block a user