Skip to content

Commit

Permalink
Обновление версии конфигурации поставщика на 3.1.10.403
Browse files Browse the repository at this point in the history
Страница релиза:
https://releases.1c.ru/version_files?nick=SSL31&ver=3.1.10.403
Версии для обновления:
  • Loading branch information
1c committed Dec 16, 2024
1 parent 8b02fa2 commit 3a15568
Show file tree
Hide file tree
Showing 141 changed files with 4,082 additions and 4,709 deletions.
6 changes: 3 additions & 3 deletions description.json
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@
{
"Версия": "3.1.10.383",
"Дата": "2024-11-28T00:00:00",
"Путь": "/version_files?nick=SSL31&ver=3.1.10.383",
"Версия": "3.1.10.403",
"Дата": "2024-12-17T00:00:00",
"Путь": "/version_files?nick=SSL31&ver=3.1.10.403",
"ВерсииДляОбновления": [],
"Бета": false,
"Имя": "1С:Библиотека стандартных подсистем, редакция 3.1",
Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -1063,7 +1063,8 @@
КонецЕсли;

ПрочитатьСостояниеВДругомРеестре();

ПеречитатьРеквизитыОрганизации();

КонецПроцедуры

&НаКлиентеНаСервереБезКонтекста
Expand Down Expand Up @@ -2686,7 +2687,7 @@
КонецПроцедуры

&НаСервере
Процедура ЗаполнитьРеквизитыОрганизации(Знач ИмяЭлементаОрганизация, Знач Загрузка = Ложь)
Процедура ЗаполнитьРеквизитыОрганизации(Знач ИмяЭлементаОрганизация, Знач Загрузка = Ложь, Знач ИзменениеПолномочий = Ложь)

ОрганизацияТип = ЭтотОбъект[ИмяЭлементаОрганизация + "Тип"];
ОрганизацияСсылка = МашиночитаемыеДоверенностиФНССлужебный.ТекущееЗначениеРеквизита(
Expand Down Expand Up @@ -2734,10 +2735,22 @@

ПриПотереГотовности(ЭтотОбъект);

ЭтотОбъект[ИмяЭлементаОрганизация + "Реквизиты"] = Реквизиты;
Если ИзменениеПолномочий Тогда
// Обновим только незаполненные реквизиты.
Для Каждого Реквизит Из ЭтотОбъект[ИмяЭлементаОрганизация + "Реквизиты"] Цикл
Если Не ЗначениеЗаполнено(Реквизит.Значение) И Реквизиты.Свойство(Реквизит.Ключ)
И ЗначениеЗаполнено(Реквизиты[Реквизит.Ключ]) Тогда
ЭтотОбъект[ИмяЭлементаОрганизация + "Реквизиты"][Реквизит.Ключ] = Реквизиты[Реквизит.Ключ];
КонецЕсли;
КонецЦикла;
Иначе
ЭтотОбъект[ИмяЭлементаОрганизация + "Реквизиты"] = Реквизиты;
КонецЕсли;
ОбновитьСтрокуДоверителейПредставителей(ИмяЭлементаОрганизация);

ЗаполнитьРеквизитыРуководителя(ИмяЭлементаОрганизация);
Если Не ИзменениеПолномочий Тогда
ЗаполнитьРеквизитыРуководителя(ИмяЭлементаОрганизация);
КонецЕсли;
УстановитьОтображениеРеквизитовЗависимыхОтОрганизации(ИмяЭлементаОрганизация);

КонецЕсли;
Expand Down Expand Up @@ -2949,7 +2962,7 @@
ОчисткаДоверителяПредставителя(ИмяЭлементаОрганизация);
КонецЕсли;

ОчиститьЭлементыФормы(ИмяЭлементаОрганизация, Ложь, Ложь);
ОчиститьЭлементыФормы(ИмяЭлементаОрганизация, Ложь, УдалитьСтроку);

КонецПроцедуры

Expand Down Expand Up @@ -4171,6 +4184,24 @@

КонецЕсли;

КонецПроцедуры;
КонецПроцедуры

&НаКлиенте
Процедура ПеречитатьРеквизитыОрганизации()

Если ЗначениеЗаполнено(ЛицоДоверителя) Тогда
ЗаполнитьРеквизитыОрганизации("ЛицоДоверителя", , Истина);
КонецЕсли;
Если ЗначениеЗаполнено(Представитель) Тогда
ЗаполнитьРеквизитыОрганизации("Представитель", , Истина);
КонецЕсли;
Если ЗначениеЗаполнено(ЛицоПредставителя) Тогда
ЗаполнитьРеквизитыОрганизации("ЛицоПредставителя", , Истина);
КонецЕсли;
Если ЗначениеЗаполнено(ПредставительУправляющейКомпании) Тогда
ЗаполнитьРеквизитыОрганизации("ПредставительУправляющейКомпании", , Истина);
КонецЕсли;

КонецПроцедуры

#КонецОбласти
Original file line number Diff line number Diff line change
Expand Up @@ -1535,7 +1535,7 @@
<Form>СписокПользователей</Form>
<Form>РедактироватьИмяИОтчество</Form>
<Form>УстановкаСертификата</Form>
<Template>КомпонентаExtraCryptoAPI_3_0_3_39</Template>
<Template>КомпонентаExtraCryptoAPI_3_0_3_42</Template>
<Template>Штамп</Template>
</ChildObjects>
</Catalog>
Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -2,7 +2,7 @@
<MetaDataObject xmlns="http://v8.1c.ru/8.3/MDClasses" xmlns:app="http://v8.1c.ru/8.2/managed-application/core" xmlns:cfg="http://v8.1c.ru/8.1/data/enterprise/current-config" xmlns:cmi="http://v8.1c.ru/8.2/managed-application/cmi" xmlns:ent="http://v8.1c.ru/8.1/data/enterprise" xmlns:lf="http://v8.1c.ru/8.2/managed-application/logform" xmlns:style="http://v8.1c.ru/8.1/data/ui/style" xmlns:sys="http://v8.1c.ru/8.1/data/ui/fonts/system" xmlns:v8="http://v8.1c.ru/8.1/data/core" xmlns:v8ui="http://v8.1c.ru/8.1/data/ui" xmlns:web="http://v8.1c.ru/8.1/data/ui/colors/web" xmlns:win="http://v8.1c.ru/8.1/data/ui/colors/windows" xmlns:xen="http://v8.1c.ru/8.3/xcf/enums" xmlns:xpr="http://v8.1c.ru/8.3/xcf/predef" xmlns:xr="http://v8.1c.ru/8.3/xcf/readable" xmlns:xs="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" version="2.16">
<Template uuid="5189beb9-b939-4f97-aca0-c2f3492ac8b9">
<Properties>
<Name>КомпонентаExtraCryptoAPI_3_0_3_39</Name>
<Name>КомпонентаExtraCryptoAPI_3_0_3_42</Name>
<Synonym>
<v8:item>
<v8:lang>ru</v8:lang>
Expand Down
Binary file not shown.
Original file line number Diff line number Diff line change
Expand Up @@ -559,8 +559,10 @@
АдресНовогоСпискаПаролейВоВременномХранилище =
ПоместитьВоВременноеХранилище(Новый Массив, УникальныйИдентификатор);
ИначеЕсли Количество = -1 Тогда
УстановитьПривилегированныйРежим(Истина);
МенеджерСписка = ДополнительныеНастройкиАутентификации.СписокПроверкиРаскрытияПароля;
Количество = МенеджерСписка.ПолучитьКоличествоСохраняемыхЗначенийПаролей();
УстановитьПривилегированныйРежим(Ложь);
КонецЕсли;
Иначе
Количество = 0;
Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -459,7 +459,15 @@
КонецЕсли;

ДанныеСертификата = ОбщегоНазначенияКлиентСервер.СвойствоСтруктуры(ДополнительныеДанные, "ДанныеСертификата", Неопределено);
Если ЗначениеЗаполнено(ДанныеСертификата) Тогда
ДанныеСертификатаЗаполнены = Ложь;

Если ЭтоАдресВременногоХранилища(ДанныеСертификата) Тогда
ДанныеСертификатаЗаполнены = ЗначениеЗаполнено(ПолучитьИзВременногоХранилища(ДанныеСертификата));
Иначе
ДанныеСертификатаЗаполнены = ЗначениеЗаполнено(ДанныеСертификата);
КонецЕсли;

Если ДанныеСертификатаЗаполнены Тогда
ДополнительныеДанныеДляКлассификатораОшибок.ДанныеСертификата = ДанныеСертификата;
КонецЕсли;

Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -105,6 +105,13 @@
?(ЗначениеЗаполнено(Строка.ВладелецДополнительныхЗначений),
Строка.ВладелецДополнительныхЗначений, Строка.Свойство)));
КонецЕсли;

Если Строка.ТипЗначения.СодержитТип(Тип("СправочникСсылка.ЗначенияСвойствОбъектов")) Тогда
Элементы.ТаблицаЗначенийСвойствЗначение.ВыборГруппИЭлементов = ГруппыИЭлементы.Элементы;
Иначе
Элементы.ТаблицаЗначенийСвойствЗначение.ВыборГруппИЭлементов = ГруппыИЭлементы.ГруппыИЭлементы;
КонецЕсли;

Элементы.ТаблицаЗначенийСвойствЗначение.ПараметрыВыбора = Новый ФиксированныйМассив(ПараметрыВыбораМассив);
КонецПроцедуры

Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -3972,15 +3972,15 @@

&НаКлиенте
Процедура ИзменитьТипУпорядочиванияСтрок(ТипУпорядочивания)
Элементы = Сортировка.ПолучитьЭлементы()[0].ПолучитьЭлементы();
Если Элементы.Количество() = 0 Тогда
ЭлементыКоллекции = Сортировка.ПолучитьЭлементы()[0].ПолучитьЭлементы();
Если ЭлементыКоллекции.Количество() = 0 Тогда
Возврат;
КонецЕсли;

СвойствоЭлементаСтруктуры = СвойствоЭлементаСтруктурыНастроек(
Отчет.КомпоновщикНастроек, "Порядок", ИдентификаторЭлементаСтруктурыНастроек, РасширенныйРежим);

Для Каждого Элемент Из Элементы Цикл
Для Каждого Элемент Из ЭлементыКоллекции Цикл
ЭлементНастройки = ЭлементНастройки(СвойствоЭлементаСтруктуры, Элемент);
ЭлементНастройки.ТипУпорядочивания = ТипУпорядочивания;
Элемент.ТипУпорядочивания = ЭлементНастройки.ТипУпорядочивания;
Expand Down Expand Up @@ -4511,16 +4511,16 @@
Возврат;
КонецЕсли;

Элементы = Оформление.ПолучитьЭлементы();
ЭлементыОформления = Оформление.ПолучитьЭлементы();
СвойствоЭлементаСтруктуры = Отчет.КомпоновщикНастроек.Настройки.ПараметрыВывода;

Для Каждого Элемент Из Элементы Цикл
Если ТипЗнч(Элемент.Идентификатор) <> Тип("ИдентификаторКомпоновкиДанных") Тогда
Для Каждого ЭлементОформления Из ЭлементыОформления Цикл
Если ТипЗнч(ЭлементОформления.Идентификатор) <> Тип("ИдентификаторКомпоновкиДанных") Тогда
Продолжить;
КонецЕсли;

Элемент.Использование = Использование;
ЭлементНастройки = ЭлементНастройки(СвойствоЭлементаСтруктуры, Элемент);
ЭлементОформления.Использование = Использование;
ЭлементНастройки = ЭлементНастройки(СвойствоЭлементаСтруктуры, ЭлементОформления);
ЭлементНастройки.Использование = Использование;
КонецЦикла;
КонецПроцедуры
Expand Down Expand Up @@ -5695,17 +5695,17 @@
КонецПроцедуры

&НаКлиенте
Процедура ИзменитьИспользование(ИмяКоллекции, Использование = Истина, Элементы = Неопределено)
Если Элементы = Неопределено Тогда
Процедура ИзменитьИспользование(ИмяКоллекции, Использование = Истина, ЭлементыКоллекции = Неопределено)
Если ЭлементыКоллекции = Неопределено Тогда
КорневаяСтрока = КорневаяСтрокаПоУмолчанию(ИмяКоллекции);
Если КорневаяСтрока = Неопределено Тогда
Возврат;
КонецЕсли;

Элементы = КорневаяСтрока.ПолучитьЭлементы();
ЭлементыКоллекции = КорневаяСтрока.ПолучитьЭлементы();
КонецЕсли;

Для Каждого Элемент Из Элементы Цикл
Для Каждого Элемент Из ЭлементыКоллекции Цикл
Элемент.Использование = Использование;

КлючСвойства = КлючСвойстваЭлементаСтруктурыНастроек(ИмяКоллекции, Элемент);
Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -168,12 +168,17 @@
Функция СведенияОЗагрузкеСубъектовРФ() Экспорт

УстановитьПривилегированныйРежим(Истина);
Результат = Новый Соответствие;
Результат = Новый Соответствие;
ТекстОшибки = "";

// Веб-сервис 1С
СервисРезультат = АдресныйКлассификаторСлужебный.ВерсияПоставщикаДанных();
КлассификаторДоступен = (СервисРезультат.Данные = Истина);
Результат.Вставить("КлассификаторДоступен", КлассификаторДоступен);
ВебСервисДоступен = (СервисРезультат.Данные = Истина);
Результат.Вставить("КлассификаторДоступен", ВебСервисДоступен);

Если Не ВебСервисДоступен Тогда
ТекстОшибки = СервисРезультат.КраткоеПредставлениеОшибки;
КонецЕсли;

ИспользоватьЗагруженные = Ложь;
ЕстьЗагруженныеСведения = Ложь;
Expand All @@ -183,7 +188,7 @@

ЗагруженныеСведенияРегионаАктуальны = СведенияОбСубъектеРФ.Загружено;

Если КлассификаторДоступен И СведенияОбСубъектеРФ.Устарело = Истина Тогда
Если ВебСервисДоступен И СведенияОбСубъектеРФ.Устарело = Истина Тогда
ЗагруженныеСведенияРегионаАктуальны = Ложь;
КонецЕсли;

Expand All @@ -205,6 +210,8 @@
Результат.Вставить("ИспользоватьЗагруженные", ИспользоватьЗагруженные);
Результат.Вставить("ЕстьЗагруженныеСведения", ЕстьЗагруженныеСведения);

Результат["ТекстОшибки"] = ТекстОшибки;

Возврат Новый ФиксированноеСоответствие(Результат);

КонецФункции
Expand Down
Loading

0 comments on commit 3a15568

Please sign in to comment.