This commit is contained in:
Компания 1С committed 2019-09-06 00:14:00 +03:00
1 parent d4fb351e07
commit c29ba2042d
56 files changed
+999 -552

No files matched your search

@@ -124,7 +124,7 @@
Возврат;
КонецЕсли;
Если ВыполняетсяФоновыйПересчетКурсов() Тогда
Если ДополнительныеСвойства.Свойство("ОбновитьКурсы") И ВыполняетсяФоновыйПересчетКурсов() Тогда
ВызватьИсключение НСтр("ru = 'Не удалось записать валюту, так как еще не завершился фоновый пересчет курсов.
|Попробуйте записать валюту позже.'");
КонецЕсли;
@@ -142,6 +142,7 @@
КонецПроцедуры
Функция ВыполняетсяФоновыйПересчетКурсов()
Возврат Истина; // TODO: удалить
ПараметрыЗадания = Новый Структура;
ПараметрыЗадания.Вставить("Наименование", "РаботаСКурсамиВалют.ОбновитьКурсВалюты");
@@ -498,6 +498,42 @@
</dataPath>
<defaultItem>true</defaultItem>
<titleLocation>None</titleLocation>
<items xsi:type="form:FormField">
<name>СписокСсылка</name>
<id>18</id>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<dataPath xsi:type="form:DataPath">
<segments>Список.Ref</segments>
</dataPath>
<extendedTooltip>
<name>СписокСсылкаРасширеннаяПодсказка</name>
<id>20</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<contextMenu>
<name>СписокСсылкаКонтекстноеМеню</name>
<id>19</id>
<autoFill>true</autoFill>
</contextMenu>
<type>LabelField</type>
<editMode>Enter</editMode>
<showInHeader>true</showInHeader>
<headerHorizontalAlign>Left</headerHorizontalAlign>
<showInFooter>true</showInFooter>
<extInfo xsi:type="form:LabelFieldExtInfo">
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
</extInfo>
</items>
<items xsi:type="form:FormField">
<name>СписокСиноним</name>
<id>4</id>
@@ -507,9 +543,7 @@
</title>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<userVisible/>
<dataPath xsi:type="form:DataPath">
<segments>Список.Синоним</segments>
</dataPath>
@@ -573,40 +607,6 @@
<autoMaxHeight>true</autoMaxHeight>
</extInfo>
</items>
<items xsi:type="form:FormField">
<name>СписокСсылка</name>
<id>18</id>
<visible>true</visible>
<enabled>true</enabled>
<userVisible/>
<dataPath xsi:type="form:DataPath">
<segments>Список.Ref</segments>
</dataPath>
<extendedTooltip>
<name>СписокСсылкаРасширеннаяПодсказка</name>
<id>20</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<contextMenu>
<name>СписокСсылкаКонтекстноеМеню</name>
<id>19</id>
<autoFill>true</autoFill>
</contextMenu>
<type>LabelField</type>
<editMode>Enter</editMode>
<showInHeader>true</showInHeader>
<headerHorizontalAlign>Left</headerHorizontalAlign>
<showInFooter>true</showInFooter>
<extInfo xsi:type="form:LabelFieldExtInfo">
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
</extInfo>
</items>
<commandBarLocation>None</commandBarLocation>
<autoCommandBar>
<name>СписокКоманднаяПанель</name>
@@ -1,5 +1,53 @@
<?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">
<items xsi:type="form:FormField">
<name>Ссылка</name>
<id>59</id>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<dataPath xsi:type="form:DataPath">
<segments>Объект.Ref</segments>
</dataPath>
<toolTip>
<key>ru</key>
<value>Вычисляемое представление идентификатора объекта метаданных</value>
</toolTip>
<extendedTooltip>
<name>СсылкаРасширеннаяПодсказка</name>
<id>61</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<contextMenu>
<name>СсылкаКонтекстноеМеню</name>
<id>60</id>
<autoFill>true</autoFill>
</contextMenu>
<type>InputField</type>
<editMode>Enter</editMode>
<showInHeader>true</showInHeader>
<headerHorizontalAlign>Left</headerHorizontalAlign>
<showInFooter>true</showInFooter>
<extInfo xsi:type="form:InputFieldExtInfo">
<width>60</width>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<wrap>true</wrap>
<dropListButton>false</dropListButton>
<openButton>false</openButton>
<chooseType>true</chooseType>
<typeDomainEnabled>true</typeDomainEnabled>
<textEdit>true</textEdit>
<textSize>Normal</textSize>
</extInfo>
</items>
<items xsi:type="form:FormField">
<name>Наименование</name>
<id>1</id>
@@ -51,6 +51,37 @@
#КонецОбласти
#КонецЕсли
#Область ОбработчикиСобытий
Процедура ОбработкаПолученияПолейПредставления(Поля, СтандартнаяОбработка) Экспорт
СтандартнаяОбработка = Ложь;
Поля.Добавить("Ссылка");
Поля.Добавить("Наименование");
Поля.Добавить("ПолноеИмя");
Поля.Добавить("ПолныйСиноним");
КонецПроцедуры
Процедура ОбработкаПолученияПредставления(Данные, Представление, СтандартнаяОбработка) Экспорт
СтандартнаяОбработка = Ложь;
#Если Сервер Или ТолстыйКлиентОбычноеПриложение Или ВнешнееСоединение Тогда
Представление = СтандартныеПодсистемыПовтИсп.ПредставлениеИдентификатораОбъектаМетаданных(Данные.Ссылка);
#Иначе
Представление = СтандартныеПодсистемыКлиентПовтИсп.ПредставлениеИдентификатораОбъектаМетаданных(Данные.Ссылка);
#КонецЕсли
КонецПроцедуры
#КонецОбласти
#Если Сервер Или ТолстыйКлиентОбычноеПриложение Или ВнешнееСоединение Тогда
#Область СлужебныйПрограммныйИнтерфейс
// Только для внутреннего использования.
@@ -2481,7 +2512,7 @@
ЭлементПорядка = Порядок.Элементы.Добавить(Тип("ЭлементПорядкаКомпоновкиДанных"));
ЭлементПорядка.Поле = Новый ПолеКомпоновкиДанных("ПометкаУдаления");
ЭлементПорядка.ТипУпорядочивания = НаправлениеСортировкиКомпоновкиДанных.Убыв;
ЭлементПорядка.ТипУпорядочивания = НаправлениеСортировкиКомпоновкиДанных.Возр;
ЭлементПорядка.РежимОтображения = РежимОтображенияЭлементаНастройкиКомпоновкиДанных.Недоступный;
ЭлементПорядка.Использование = Истина;
@@ -2497,6 +2528,12 @@
ЭлементПорядка.РежимОтображения = РежимОтображенияЭлементаНастройкиКомпоновкиДанных.Недоступный;
ЭлементПорядка.Использование = Истина;
ЭлементПорядка = Порядок.Элементы.Добавить(Тип("ЭлементПорядкаКомпоновкиДанных"));
ЭлементПорядка.Поле = Новый ПолеКомпоновкиДанных("ПометкаБудущегоУдаления");
ЭлементПорядка.ТипУпорядочивания = НаправлениеСортировкиКомпоновкиДанных.Возр;
ЭлементПорядка.РежимОтображения = РежимОтображенияЭлементаНастройкиКомпоновкиДанных.Недоступный;
ЭлементПорядка.Использование = Истина;
ЭлементПорядка = Порядок.Элементы.Добавить(Тип("ЭлементПорядкаКомпоновкиДанных"));
ЭлементПорядка.Поле = Новый ПолеКомпоновкиДанных("Синоним");
ЭлементПорядка.ТипУпорядочивания = НаправлениеСортировкиКомпоновкиДанных.Возр;
@@ -2504,25 +2541,27 @@
ЭлементПорядка.Использование = Истина;
// Оформление.
ЭлементУсловногоОформления = Форма.УсловноеОформление.Элементы.Добавить();
ЭлементОформления = Форма.Список.КомпоновщикНастроек.Настройки.УсловноеОформление.Элементы.Добавить();
ЭлементОформления.РежимОтображения = РежимОтображенияЭлементаНастройкиКомпоновкиДанных.Недоступный;
ЭлементЦветаОформления = ЭлементУсловногоОформления.Оформление.Элементы.Найти("TextColor");
ЭлементЦветаОформления.Значение = Метаданные.ЭлементыСтиля.ТекстЗапрещеннойЯчейкиЦвет.Значение;
ЭлементЦветаОформления.Использование = Истина;
ЭлементЦвета = ЭлементОформления.Оформление.Элементы.Найти("TextColor");
ЭлементЦвета.Значение = Метаданные.ЭлементыСтиля.ТекстЗапрещеннойЯчейкиЦвет.Значение;
ЭлементЦвета.Использование = Истина;
ЭлементОтбораДанных = ЭлементУсловногоОформления.Отбор.Элементы.Добавить(Тип("ЭлементОтбораКомпоновкиДанных"));
ЭлементОтбораДанных.ЛевоеЗначение = Новый ПолеКомпоновкиДанных("Список.ПометкаБудущегоУдаления");
ЭлементОтбораДанных.ВидСравнения = ВидСравненияКомпоновкиДанных.Равно;
ЭлементОтбораДанных.ПравоеЗначение = Истина;
ЭлементОтбораДанных.Использование = Истина;
ЭлементГруппыОтбора = ЭлементОформления.Отбор.Элементы.Добавить(Тип("ГруппаЭлементовОтбораКомпоновкиДанных"));
ЭлементГруппыОтбора.ТипГруппы = ТипГруппыЭлементовОтбораКомпоновкиДанных.ГруппаИли;
ЭлементОформляемогоПоля = ЭлементУсловногоОформления.Поля.Элементы.Добавить();
ЭлементОформляемогоПоля.Поле = Новый ПолеКомпоновкиДанных("Синоним");
ЭлементОформляемогоПоля.Использование = Истина;
ЭлементОтбора = ЭлементГруппыОтбора.Элементы.Добавить(Тип("ЭлементОтбораКомпоновкиДанных"));
ЭлементОтбора.ЛевоеЗначение = Новый ПолеКомпоновкиДанных("ПометкаУдаления");
ЭлементОтбора.ВидСравнения = ВидСравненияКомпоновкиДанных.Равно;
ЭлементОтбора.ПравоеЗначение = Истина;
ЭлементОтбора.Использование = Истина;
ЭлементОформляемогоПоля = ЭлементУсловногоОформления.Поля.Элементы.Добавить();
ЭлементОформляемогоПоля.Поле = Новый ПолеКомпоновкиДанных("ПолноеИмя");
ЭлементОформляемогоПоля.Использование = Истина;
ЭлементОтбора = ЭлементГруппыОтбора.Элементы.Добавить(Тип("ЭлементОтбораКомпоновкиДанных"));
ЭлементОтбора.ЛевоеЗначение = Новый ПолеКомпоновкиДанных("ПометкаБудущегоУдаления");
ЭлементОтбора.ВидСравнения = ВидСравненияКомпоновкиДанных.Равно;
ЭлементОтбора.ПравоеЗначение = Истина;
ЭлементОтбора.Использование = Истина;
КонецПроцедуры
@@ -3105,6 +3144,68 @@
КонецФункции
// Для процедуры ОбработкаПолученияПредставления.
Функция ПредставлениеИдентификатора(Ссылка) Экспорт
ОбъектыРасширений = ТипЗнч(Ссылка) <> Тип("СправочникСсылка.ИдентификаторыОбъектовМетаданных");
СвойстваКоллекций = СтандартныеПодсистемыПовтИсп.СвойстваКоллекцийОбъектовМетаданных(ОбъектыРасширений);
СвойстваКоллекции = СвойстваКоллекций.Найти(Ссылка.УникальныйИдентификатор(), "Идентификатор");
Если СвойстваКоллекции <> Неопределено Тогда
Возврат СвойстваКоллекции.Синоним;
КонецЕсли;
Если ОбъектыРасширений Тогда
Запрос = Новый Запрос;
Запрос.УстановитьПараметр("Ссылка", Ссылка);
Запрос.УстановитьПараметр("ВерсияРасширений", ПараметрыСеанса.ВерсияРасширений);
Запрос.Текст =
"ВЫБРАТЬ
| ЕСТЬNULL(ИдентификаторыОбъектовВерсийРасширений.ПолноеИмяОбъекта, ИдентификаторыОбъектовРасширений.ПолноеИмя) КАК ПолноеИмя
|ИЗ
| Справочник.ИдентификаторыОбъектовРасширений КАК ИдентификаторыОбъектовРасширений
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ИдентификаторыОбъектовВерсийРасширений КАК ИдентификаторыОбъектовВерсийРасширений
| ПО (ИдентификаторыОбъектовВерсийРасширений.Идентификатор = ИдентификаторыОбъектовРасширений.Ссылка)
| И (ИдентификаторыОбъектовВерсийРасширений.ВерсияРасширений = &ВерсияРасширений)
|ГДЕ
| ИдентификаторыОбъектовРасширений.Ссылка = &Ссылка";
Выборка = Запрос.Выполнить().Выбрать();
Если Выборка.Следующий() Тогда
ПолноеИмя = Выборка.ПолноеИмя;
Иначе
ПолноеИмя = Неопределено;
КонецЕсли;
Иначе
ПолноеИмя = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Ссылка, "ПолноеИмя");
КонецЕсли;
Если ПолноеИмя = Неопределено Тогда
Возврат НСтр("ru = 'Объект не найден.'")
КонецЕсли;
ОбъектМетаданных = Метаданные.НайтиПоПолномуИмени(ПолноеИмя);
Если ОбъектМетаданных = Неопределено Тогда
Если СтрНачинаетсяС(ПолноеИмя, "?") Тогда
Возврат "? " + СтрРазделить(ПолноеИмя, " ")[1];
Иначе
Возврат ПолноеИмя;
КонецЕсли;
КонецЕсли;
ПозицияТочки = СтрНайти(ПолноеИмя, ".");
ИмяБазовогоТипа = Лев(ПолноеИмя, ПозицияТочки -1);
Отбор = Новый Структура("ИмяВЕдЧисле", ИмяБазовогоТипа);
Строки = СвойстваКоллекций.НайтиСтроки(Отбор);
Если Строки.Количество() <> 1 Тогда
Возврат ПолноеИмя;
КонецЕсли;
Возврат ПредставлениеОбъектаМетаданных(ОбъектМетаданных, Строки[0]);
КонецФункции
////////////////////////////////////////////////////////////////////////////////
// Процедуры и функции замены идентификатора в базе данных.
@@ -96,7 +96,7 @@
</synonym>
<toolTip>
<key>ru</key>
<value>Представление идентификатора объекта метаданных</value>
<value>Сохраняемое представление идентификатора объекта метаданных</value>
</toolTip>
<fillValue xsi:type="core:UndefinedValue"/>
<fillChecking>ShowError</fillChecking>
@@ -394,6 +394,7 @@
<key>ru</key>
<value>Форма списка</value>
</synonym>
<comment>АПК:149 - #std702,1 Поле Ссылка используется вместо поля Наименование для динамического представления на разных языках</comment>
<usePurposes>PersonalComputer</usePurposes>
<usePurposes>MobileDevice</usePurposes>
</forms>
@@ -498,6 +498,42 @@
</dataPath>
<defaultItem>true</defaultItem>
<titleLocation>None</titleLocation>
<items xsi:type="form:FormField">
<name>СписокСсылка</name>
<id>18</id>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<dataPath xsi:type="form:DataPath">
<segments>Список.Ref</segments>
</dataPath>
<extendedTooltip>
<name>СписокСсылкаРасширеннаяПодсказка</name>
<id>20</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<contextMenu>
<name>СписокСсылкаКонтекстноеМеню</name>
<id>19</id>
<autoFill>true</autoFill>
</contextMenu>
<type>LabelField</type>
<editMode>Enter</editMode>
<showInHeader>true</showInHeader>
<headerHorizontalAlign>Left</headerHorizontalAlign>
<showInFooter>true</showInFooter>
<extInfo xsi:type="form:LabelFieldExtInfo">
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
</extInfo>
</items>
<items xsi:type="form:FormField">
<name>СписокСиноним</name>
<id>4</id>
@@ -507,9 +543,7 @@
</title>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<userVisible/>
<dataPath xsi:type="form:DataPath">
<segments>Список.Синоним</segments>
</dataPath>
@@ -573,40 +607,6 @@
<autoMaxHeight>true</autoMaxHeight>
</extInfo>
</items>
<items xsi:type="form:FormField">
<name>СписокСсылка</name>
<id>18</id>
<visible>true</visible>
<enabled>true</enabled>
<userVisible/>
<dataPath xsi:type="form:DataPath">
<segments>Список.Ref</segments>
</dataPath>
<extendedTooltip>
<name>СписокСсылкаРасширеннаяПодсказка</name>
<id>20</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<contextMenu>
<name>СписокСсылкаКонтекстноеМеню</name>
<id>19</id>
<autoFill>true</autoFill>
</contextMenu>
<type>LabelField</type>
<editMode>Enter</editMode>
<showInHeader>true</showInHeader>
<headerHorizontalAlign>Left</headerHorizontalAlign>
<showInFooter>true</showInFooter>
<extInfo xsi:type="form:LabelFieldExtInfo">
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
</extInfo>
</items>
<commandBarLocation>None</commandBarLocation>
<autoCommandBar>
<name>СписокКоманднаяПанель</name>
@@ -1,5 +1,53 @@
<?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">
<items xsi:type="form:FormField">
<name>Ссылка</name>
<id>62</id>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
<common>true</common>
</userVisible>
<dataPath xsi:type="form:DataPath">
<segments>Объект.Ref</segments>
</dataPath>
<toolTip>
<key>ru</key>
<value>Вычисляемое представление идентификатора объекта расширения</value>
</toolTip>
<extendedTooltip>
<name>СсылкаРасширеннаяПодсказка</name>
<id>64</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<extInfo xsi:type="form:LabelDecorationExtInfo">
<horizontalAlign>Left</horizontalAlign>
</extInfo>
</extendedTooltip>
<contextMenu>
<name>СсылкаКонтекстноеМеню</name>
<id>63</id>
<autoFill>true</autoFill>
</contextMenu>
<type>InputField</type>
<editMode>Enter</editMode>
<showInHeader>true</showInHeader>
<headerHorizontalAlign>Left</headerHorizontalAlign>
<showInFooter>true</showInFooter>
<extInfo xsi:type="form:InputFieldExtInfo">
<width>60</width>
<autoMaxWidth>true</autoMaxWidth>
<autoMaxHeight>true</autoMaxHeight>
<wrap>true</wrap>
<dropListButton>false</dropListButton>
<openButton>false</openButton>
<chooseType>true</chooseType>
<typeDomainEnabled>true</typeDomainEnabled>
<textEdit>true</textEdit>
<textSize>Normal</textSize>
</extInfo>
</items>
<items xsi:type="form:FormField">
<name>Наименование</name>
<id>1</id>
@@ -46,6 +46,28 @@
#КонецОбласти
#КонецЕсли
#Область ОбработчикиСобытий
Процедура ОбработкаПолученияПолейПредставления(Поля, СтандартнаяОбработка)
Справочники.ИдентификаторыОбъектовМетаданных.ОбработкаПолученияПолейПредставления(Поля,
СтандартнаяОбработка);
КонецПроцедуры
Процедура ОбработкаПолученияПредставления(Данные, Представление, СтандартнаяОбработка)
Справочники.ИдентификаторыОбъектовМетаданных.ОбработкаПолученияПредставления(Данные,
Представление, СтандартнаяОбработка);
КонецПроцедуры
#КонецОбласти
#Если Сервер Или ТолстыйКлиентОбычноеПриложение Или ВнешнееСоединение Тогда
#Область СлужебныйПрограммныйИнтерфейс
Функция ПолныеИменаТаблицСДанными() Экспорт
@@ -96,7 +96,7 @@
</synonym>
<toolTip>
<key>ru</key>
<value>Представление идентификатора объекта метаданных</value>
<value>Сохраняемое представление идентификатора объекта расширений</value>
</toolTip>
<fillValue xsi:type="core:UndefinedValue"/>
<fillChecking>ShowError</fillChecking>
@@ -390,6 +390,7 @@
<key>ru</key>
<value>Форма списка</value>
</synonym>
<comment>АПК:149 - #std702,1 Поле Ссылка используется вместо поля Наименование для динамического представления на разных языках</comment>
<usePurposes>PersonalComputer</usePurposes>
<usePurposes>MobileDevice</usePurposes>
</forms>
@@ -229,7 +229,7 @@
</userVisible>
<title>
<key>ru</key>
<value>Командная панель письма ВHTML</value>
<value>Командная панель письма HTML</value>
</title>
<extendedTooltip>
<name>ГруппаКоманднаяПанельПисьмаВHTMLРасширеннаяПодсказка</name>
@@ -250,6 +250,10 @@
<items xsi:type="form:FormField">
<name>ТелоПисьмаВHTML</name>
<id>46</id>
<title>
<key>ru</key>
<value>Тело письма HTML</value>
</title>
<visible>true</visible>
<enabled>true</enabled>
<userVisible>
@@ -101,7 +101,7 @@
<name>ПолеHTMLДокумента</name>
<title>
<key>ru</key>
<value>Поле HTMLДокумента</value>
<value>Поле HTML-документа</value>
</title>
<id>2</id>
<valueType>
@@ -2978,12 +2978,14 @@
ТекущееЗначение = Строка.ПравоеЗначение;
КонецЕсли;
ЗначенияДляВыбора = ЗначенияДляВыбора(Строка);
ПараметрыОткрытия = Новый Структура;
ПараметрыОткрытия.Вставить("Отмеченные", ОтчетыКлиентСервер.ЗначенияСписком(ТекущееЗначение, Истина));
ПараметрыОткрытия.Вставить("ОписаниеТипов", Строка.ТипЗначения);
ПараметрыОткрытия.Вставить("ЗначенияДляВыбора", ЗначенияДляВыбора(Строка));
ПараметрыОткрытия.Вставить("ЗначенияДляВыбораЗаполнены", Строка.ДоступныеЗначения <> Неопределено);
ПараметрыОткрытия.Вставить("ОграничиватьВыборУказаннымиЗначениями", ПараметрыОткрытия.ЗначенияДляВыбораЗаполнены);
ПараметрыОткрытия.Вставить("ЗначенияДляВыбора", ЗначенияДляВыбора);
ПараметрыОткрытия.Вставить("ЗначенияДляВыбораЗаполнены", ЗначенияДляВыбора.Количество() > 0);
ПараметрыОткрытия.Вставить("ОграничиватьВыборУказаннымиЗначениями", Строка.ДоступныеЗначения <> Неопределено);
ПараметрыОткрытия.Вставить("Представление", Строка.ПредставлениеПользовательскойНастройки);
ПараметрыОткрытия.Вставить("ПараметрыВыбора", Новый Массив(ПолеЗначения.ПараметрыВыбора));
ПараметрыОткрытия.Вставить("ВыборГруппИЭлементов", ПолеЗначения.ВыборГруппИЭлементов);
@@ -3001,6 +3003,8 @@
ЗначенияДляВыбора = Новый СписокЗначений;
КонецЕсли;
ЗначенияДляВыбора.ТипЗначения = Строка.ТипЗначения;
СвойствоЭлементаСтруктуры = СвойствоЭлементаСтруктурыНастроек(
Отчет.КомпоновщикНастроек, ?(Строка.ЭтоПараметр, "ПараметрыДанных", "Отбор"));
@@ -3693,6 +3697,7 @@
Коллекция = Узел[ИмяКоллекции];
ТипКоллекции = ТипЗнч(Коллекция);
ИменаКоллекций = ИменаКоллекцийЭлементаСтруктуры(Коллекция);
Если ТипКоллекции = Тип("КоллекцияЭлементовСтруктурыНастроекКомпоновкиДанных") Тогда
@@ -3700,8 +3705,9 @@
СодержитПользовательскиеЭлементыСтруктуры = Истина;
КонецЕсли;
ИначеЕсли ТипКоллекции = Тип("КоллекцияЭлементовСтруктурыТаблицыКомпоновкиДанных")
Или ТипКоллекции = Тип("КоллекцияЭлементовСтруктурыДиаграммыКомпоновкиДанных") Тогда
ИначеЕсли ИменаКоллекций.Найти(ИмяКоллекции) <> Неопределено
И (ТипКоллекции = Тип("КоллекцияЭлементовСтруктурыТаблицыКомпоновкиДанных")
Или ТипКоллекции = Тип("КоллекцияЭлементовСтруктурыДиаграммыКомпоновкиДанных")) Тогда
Строка = Строки.Добавить();
Строка.Идентификатор = СвойствоЭлементаСтруктуры.ПолучитьИдентификаторПоОбъекту(Коллекция);
@@ -3769,7 +3775,6 @@
Или ТипЭлемента = Тип("ГруппировкаДиаграммыКомпоновкиДанных") Тогда
СвойстваЭлемента.Представление = ПредставлениеПолейГруппировки(Элемент, СвойстваЭлемента.ПометкаУдаления);
ИменаКоллекций = "Структура";
ИначеЕсли ТипЭлемента = Тип("НастройкиВложенногоОбъектаКомпоновкиДанных") Тогда
@@ -3785,8 +3790,6 @@
СвойстваЭлемента.Представление = НСтр("ru = 'Вложенная группировка'");
КонецЕсли;
ИменаКоллекций = "Структура";
ИначеЕсли ТипЭлемента = Тип("ТаблицаКомпоновкиДанных") Тогда
СвойстваЭлемента.Представление = НСтр("ru = 'Таблица'");
@@ -3794,8 +3797,6 @@
СвойстваЭлемента.Представление = Элемент.ПредставлениеПользовательскойНастройки;
КонецЕсли;
ИменаКоллекций = "Строки, Колонки";
ИначеЕсли ТипЭлемента = Тип("ДиаграммаКомпоновкиДанных") Тогда
СвойстваЭлемента.Представление = НСтр("ru = 'Диаграмма'");
@@ -3803,11 +3804,8 @@
СвойстваЭлемента.Представление = Элемент.ПредставлениеПользовательскойНастройки;
КонецЕсли;
ИменаКоллекций = "Точки, Серии";
Иначе
СвойстваЭлемента.Представление = Строка(ТипЭлемента);
ИменаКоллекций = "";
КонецЕсли;
Если ТипЭлемента <> Тип("НастройкиВложенногоОбъектаКомпоновкиДанных") Тогда
@@ -3819,7 +3817,7 @@
КонецЕсли;
СвойстваЭлемента.ИменаКоллекций = СтрРазделить(ИменаКоллекций, ", ", Ложь);
СвойстваЭлемента.ИменаКоллекций = ИменаКоллекцийЭлементаСтруктуры(Элемент);
ПредставлениеТипаЭлемента = ОтчетыКлиентСервер.ТипНастройкиСтрокой(ТипЭлемента);
СостояниеЭлемента = ?(СвойстваЭлемента.ПометкаУдаления, "ПометкаУдаления", Неопределено);
@@ -6620,13 +6618,21 @@
Если ТипЭлемента = Тип("ГруппировкаКомпоновкиДанных")
Или ТипЭлемента = Тип("ГруппировкаТаблицыКомпоновкиДанных")
Или ТипЭлемента = Тип("ГруппировкаДиаграммыКомпоновкиДанных")
Или ТипЭлемента = Тип("НастройкиВложенногоОбъектаКомпоновкиДанных") Тогда
Или ТипЭлемента = Тип("НастройкиВложенногоОбъектаКомпоновкиДанных")
Или ТипЭлемента = Тип("КоллекцияЭлементовСтруктурыНастроекКомпоновкиДанных") Тогда
ИменаКоллекций = "Структура";
ИначеЕсли ТипЭлемента = Тип("ТаблицаКомпоновкиДанных") Тогда
ИначеЕсли ТипЭлемента = Тип("ТаблицаКомпоновкиДанных")
Или ТипЭлемента = Тип("КоллекцияЭлементовСтруктурыТаблицыКомпоновкиДанных") Тогда
ИменаКоллекций = "Строки, Колонки";
ИначеЕсли ТипЭлемента = Тип("ДиаграммаКомпоновкиДанных") Тогда
ИначеЕсли ТипЭлемента = Тип("ДиаграммаКомпоновкиДанных")
Или ТипЭлемента = Тип("КоллекцияЭлементовСтруктурыДиаграммыКомпоновкиДанных") Тогда
ИменаКоллекций = "Точки, Серии";
КонецЕсли;
Возврат СтрРазделить(ИменаКоллекций, ", ", Ложь);
@@ -1097,13 +1097,15 @@
СтандартнаяОбработка = Ложь;
Сведения = ОтчетыКлиент.СведенияОЭлементеНастройки(Отчет.КомпоновщикНастроек, Элемент.Имя);
ОписаниеНастроек = Сведения.Описание;
ПользовательскиеНастройки = Отчет.КомпоновщикНастроек.ПользовательскиеНастройки.Элементы;
ПараметрыВыбора = ОтчетыКлиентСервер.ПараметрыВыбора(
Сведения.Настройки, ПользовательскиеНастройки, Сведения.Элемент);
Элемент.ДоступныеТипы = ОтчетыКлиент.ТипЗначенияОграниченныйСвязьюПоТипу(
Сведения.Настройки, ПользовательскиеНастройки, Сведения.Элемент, Сведения.Описание);
Сведения.Настройки, ПользовательскиеНастройки, Сведения.Элемент, ОписаниеНастроек);
Если ТипЗнч(Сведения.ЭлементПользовательскойНастройки) = Тип("ЗначениеПараметраНастроекКомпоновкиДанных") Тогда
ТекущееЗначение = Сведения.ЭлементПользовательскойНастройки.Значение;
@@ -1111,19 +1113,23 @@
ТекущееЗначение = Сведения.ЭлементПользовательскойНастройки.ПравоеЗначение;
КонецЕсли;
Условие = ОтчетыКлиентСервер.УсловиеЭлементаНастройки(Сведения.ЭлементПользовательскойНастройки, Сведения.Описание);
ДоступныеЗначения = ?(ОписаниеНастроек = Неопределено, Неопределено, ОписаниеНастроек.ДоступныеЗначения);
Условие = ОтчетыКлиентСервер.УсловиеЭлементаНастройки(Сведения.ЭлементПользовательскойНастройки, ОписаниеНастроек);
ВыборГруппИЭлементов = ОтчетыКлиент.ЗначениеТипаИспользованиеГруппИЭлементов(
?(Сведения.Описание = Неопределено, Неопределено, Сведения.Описание.ВыборГруппИЭлементов), Условие);
?(ОписаниеНастроек = Неопределено, Неопределено, ОписаниеНастроек.ВыборГруппИЭлементов), Условие);
ЗначенияДляВыбора = ЗначенияДляВыбора(
Элемент.СписокВыбора, Сведения.ЭлементПользовательскойНастройки.ИдентификаторПользовательскойНастройки);
Элемент.СписокВыбора,
Сведения.ЭлементПользовательскойНастройки.ИдентификаторПользовательскойНастройки,
Элемент.ДоступныеТипы);
ПараметрыОткрытия = Новый Структура;
ПараметрыОткрытия.Вставить("Отмеченные", ОтчетыКлиентСервер.ЗначенияСписком(ТекущееЗначение));
ПараметрыОткрытия.Вставить("ОписаниеТипов", Элемент.ДоступныеТипы);
ПараметрыОткрытия.Вставить("ЗначенияДляВыбора", ЗначенияДляВыбора);
ПараметрыОткрытия.Вставить("ЗначенияДляВыбораЗаполнены", Элемент.СписокВыбора.Количество() > 0);
ПараметрыОткрытия.Вставить("ОграничиватьВыборУказаннымиЗначениями", ПараметрыОткрытия.ЗначенияДляВыбораЗаполнены);
ПараметрыОткрытия.Вставить("ОграничиватьВыборУказаннымиЗначениями", ДоступныеЗначения <> Неопределено);
ПараметрыОткрытия.Вставить("Представление", Элемент.Заголовок);
ПараметрыОткрытия.Вставить("ПараметрыВыбора", Новый Массив(ПараметрыВыбора));
ПараметрыОткрытия.Вставить("ВыборГруппИЭлементов", ВыборГруппИЭлементов);
@@ -1135,12 +1141,14 @@
КонецПроцедуры
&НаКлиенте
Функция ЗначенияДляВыбора(СписокВыбора, ИдентификаторПользовательскойНастройки)
Функция ЗначенияДляВыбора(СписокВыбора, ИдентификаторПользовательскойНастройки, ТипЗначения)
ЗначенияДляВыбора = СписокВыбора;
Если Не ЗначениеЗаполнено(ИдентификаторПользовательскойНастройки) Тогда
Возврат ЗначенияДляВыбора;
КонецЕсли;
ЗначенияДляВыбора.ТипЗначения = ТипЗначения;
КэшЗначенийОтборов = ОбщегоНазначенияКлиентСервер.СвойствоСтруктуры(
Отчет.КомпоновщикНастроек.ПользовательскиеНастройки.ДополнительныеСвойства, "КэшЗначенийОтборов");
Если КэшЗначенийОтборов = Неопределено Тогда
@@ -525,7 +525,7 @@
</extInfo>
</items>
<items xsi:type="form:FormField">
<name>HTMLСтраницаПредставление</name>
<name>РезультатыПоиска</name>
<id>39</id>
<displayImportance>VeryHigh</displayImportance>
<visible>true</visible>
@@ -534,11 +534,11 @@
<common>true</common>
</userVisible>
<dataPath xsi:type="form:DataPath">
<segments>HTMLСтраницаПредставление</segments>
<segments>РезультатыПоиска</segments>
</dataPath>
<titleLocation>None</titleLocation>
<extendedTooltip>
<name>HTMLСтраницаПредставлениеРасширеннаяПодсказка</name>
<name>РезультатыПоискаРасширеннаяПодсказка</name>
<id>61</id>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
@@ -548,7 +548,7 @@
</extInfo>
</extendedTooltip>
<contextMenu>
<name>HTMLСтраницаПредставлениеКонтекстноеМеню</name>
<name>РезультатыПоискаКонтекстноеМеню</name>
<id>40</id>
<autoFill>true</autoFill>
</contextMenu>
@@ -642,10 +642,10 @@
</edit>
</attributes>
<attributes>
<name>HTMLСтраницаПредставление</name>
<name>РезультатыПоиска</name>
<title>
<key>ru</key>
<value>HTMLСтраница представление</value>
<value>Результаты поиска</value>
</title>
<id>14</id>
<valueType>
@@ -49,7 +49,7 @@
ОбластиПоискаПредставление = ПредставлениеОбластиПоиска(КонтейнерСостояний);
ОбновитьДоступностьКнопокНавигации(Элементы.Следующие, Элементы.Предыдущие, КонтейнерСостояний);
ИнформацияОНайденномПредставление = ПредставлениеИнформацииОНайденном(КонтейнерСостояний);
HTMLСтраницаПредставление = ПредставлениеHTMLСтраницы(СтрокаПоиска, КонтейнерСостояний);
РезультатыПоиска = СформироватьРезультатыПоиска(СтрокаПоиска, КонтейнерСостояний);
СостояниеПоискаПредставление = ПредставлениеСостоянияПоиска(КонтейнерСостояний);
ОбновитьВидимостьСостояниеПоиска(КонтейнерСостояний);
@@ -219,7 +219,7 @@
ОбновитьИсториюПоиска(Элементы.СтрокаПоиска, КонтейнерСостояний);
ОбновитьДоступностьКнопокНавигации(Элементы.Следующие, Элементы.Предыдущие, КонтейнерСостояний);
ИнформацияОНайденномПредставление = ПредставлениеИнформацииОНайденном(КонтейнерСостояний);
HTMLСтраницаПредставление = ПредставлениеHTMLСтраницы(СтрокаПоиска, КонтейнерСостояний);
РезультатыПоиска = СформироватьРезультатыПоиска(СтрокаПоиска, КонтейнерСостояний);
СостояниеПоискаПредставление = ПредставлениеСостоянияПоиска(КонтейнерСостояний);
ОбновитьВидимостьСостояниеПоиска(КонтейнерСостояний);
@@ -332,7 +332,7 @@
КонецФункции
&НаКлиентеНаСервереБезКонтекста
Функция ПредставлениеHTMLСтраницы(СтрокаПоиска, КонтейнерСостояний)
Функция СформироватьРезультатыПоиска(СтрокаПоиска, КонтейнерСостояний)
КодОшибки = КонтейнерСостояний.КодОшибки;
@@ -231,8 +231,7 @@
// ТолькоВидимые - Булево - чтобы получить и разблокировать все реквизиты объекта, нужно указать Ложь.
//
// Возвращаемое значение:
// Массив - значения:
// * Строка - имена реквизитов.
// Массив из Строка - имена реквизитов.
//
Функция Реквизиты(Знач Форма, Знач ТолькоЗаблокированные = Истина, ТолькоВидимые = Истина) Экспорт
@@ -209,6 +209,9 @@
ПолеКомпоновкиДанных = ГруппировкаКомпоновкиДанных.Выбор.ДоступныеПоляВыбора.Элементы.Найти("Ссылка").Поле;
ЕстьПолеСсылка = Ложь;
Для Каждого ВыбранноеПолеКомпоновкиДанных Из ГруппировкаКомпоновкиДанных.Выбор.Элементы Цикл
Если ТипЗнч(ВыбранноеПолеКомпоновкиДанных) = Тип("АвтоВыбранноеПолеКомпоновкиДанных") Тогда
Продолжить;
КонецЕсли;
Если ВыбранноеПолеКомпоновкиДанных.Поле = ПолеКомпоновкиДанных Тогда
ЕстьПолеСсылка = Истина;
Прервать;
@@ -359,7 +359,12 @@
КонецЕсли;
КомпонентыОбмена.СтрокаСообщенияОбОшибке = КраткоеПредставлениеОшибки;
Если ПустаяСтрока(КомпонентыОбмена.СтрокаСообщенияОбОшибке) Тогда
КомпонентыОбмена.СтрокаСообщенияОбОшибке = КраткоеПредставлениеОшибки;
Иначе
КомпонентыОбмена.СтрокаСообщенияОбОшибке = КомпонентыОбмена.СтрокаСообщенияОбОшибке + "
|" + КраткоеПредставлениеОшибки;
КонецЕсли;
Если ВзвестиФлагОшибок Тогда
@@ -2783,6 +2788,76 @@
Возврат Истина;
КонецФункции
Процедура ПослеОткрытияФайлаЗагрузки(КомпонентыОбмена, Отказ, ИнициализироватьТаблицыПравил = Истина) Экспорт
Если КомпонентыОбмена.ФлагОшибки Тогда
ЗавершитьВедениеПротоколаОбмена(КомпонентыОбмена);
Если КомпонентыОбмена.Свойство("ФайлОбмена") Тогда
КомпонентыОбмена.ФайлОбмена.Закрыть();
КонецЕсли;
Отказ = Истина;
Возврат;
КонецЕсли;
Если КомпонентыОбмена.ЭтоОбменЧерезПланОбмена Тогда
Если КомпонентыОбмена.ОбменДаннымиСВнешнейСистемой Тогда
КодУзлаКорреспондента = СокрЛП(ОбщегоНазначения.ЗначениеРеквизитаОбъекта(КомпонентыОбмена.УзелКорреспондента, "Код"));
Если ЗначениеЗаполнено(КомпонентыОбмена.ИдентификаторКорреспондента)
И Не КодУзлаКорреспондента = КомпонентыОбмена.ИдентификаторКорреспондента Тогда
УзелКорреспондентаОбъект = КомпонентыОбмена.УзелКорреспондента.ПолучитьОбъект();
УзелКорреспондентаОбъект.Код = КомпонентыОбмена.ИдентификаторКорреспондента;
УзелКорреспондентаОбъект.ОбменДанными.Загрузка = Истина;
УзелКорреспондентаОбъект.Записать();
ЗаписатьВПротоколВыполнения(КомпонентыОбмена,
НСтр("ru = 'Изменен идентификатор узла корреспондента.'"), , Ложь, , , Истина);
КонецЕсли;
КонецЕсли;
ОбновитьНастройкиXDTOКорреспондента(КомпонентыОбмена);
ОбновитьПрефиксКорреспондента(КомпонентыОбмена);
Если Не КомпонентыОбмена.ТолькоНастройкиXDTO
И ИнициализироватьТаблицыПравил Тогда
ИнициализироватьТаблицыПравилОбмена(КомпонентыОбмена);
ЗаполнитьСтруктуруНастроекXDTO(КомпонентыОбмена);
ЗаполнитьПоддерживаемыеОбъектыXDTO(КомпонентыОбмена);
КонецЕсли;
КонецЕсли;
Если КомпонентыОбмена.ТолькоНастройкиXDTO Тогда
Если КомпонентыОбмена.Свойство("ФайлОбмена") Тогда
КомпонентыОбмена.ФайлОбмена.Закрыть();
КонецЕсли;
Отказ = Истина;
Возврат;
КонецЕсли;
Если КомпонентыОбмена.ЭтоОбменЧерезПланОбмена Тогда
ИмяПланаОбмена = ОбменДаннымиПовтИсп.ПолучитьИмяПланаОбмена(КомпонентыОбмена.УзелКорреспондента);
Если ОбменДаннымиСервер.ЕстьАлгоритмМенеджераПланаОбмена("ОбработчикПроверкиЗначенийПоУмолчанию", ИмяПланаОбмена) Тогда
СообщениеОбОшибке = "";
ПараметрыОбработчика = Новый Структура;
ПараметрыОбработчика.Вставить("Корреспондент", КомпонентыОбмена.УзелКорреспондента);
ПараметрыОбработчика.Вставить("ПоддерживаемыеОбъектыXDTO", КомпонентыОбмена.ПоддерживаемыеОбъектыXDTO);
ПланыОбмена[ИмяПланаОбмена].ОбработчикПроверкиЗначенийПоУмолчанию(Отказ, ПараметрыОбработчика, СообщениеОбОшибке);
Если Отказ Тогда
ЗаписатьВПротоколВыполнения(КомпонентыОбмена, СообщениеОбОшибке);
ЗавершитьВедениеПротоколаОбмена(КомпонентыОбмена);
Возврат;
КонецЕсли;
КонецЕсли;
КонецЕсли;
КонецПроцедуры
#КонецОбласти
#Область ПроцедурыИФункцииВерсионированияФорматаОбмена
@@ -4513,6 +4588,12 @@
Возврат;
КонецЕсли;
Если ПКС.ИспользуетсяАлгоритмКонвертации
И Не ЗначениеЗаполнено(ПравилоКонвертацииСвойства) Тогда
// Конвертация будет выполняться по алгоритму.
Возврат;
КонецЕсли;
Если ПКС.ОбработкаКлючевогоСвойства
И Не ДанныеXDTO.Свойство("ЭтоНаборКлючевыхСвойств") Тогда
ИсточникДанных = ДанныеXDTO.КлючевыеСвойства;
@@ -5684,7 +5765,7 @@
КонецФункции
Процедура ОбновитьПрефиксКорреспондента(КомпонентыОбмена) Экспорт
Процедура ОбновитьПрефиксКорреспондента(КомпонентыОбмена)
Если ЗначениеЗаполнено(КомпонентыОбмена.ПрефиксКорреспондента) Тогда
Префиксы = РегистрыСведений.ОбщиеНастройкиУзловИнформационныхБаз.ПрефиксыУзла(КомпонентыОбмена.УзелКорреспондента);
@@ -5696,7 +5777,7 @@
КонецПроцедуры
Процедура ОбновитьНастройкиXDTOКорреспондента(КомпонентыОбмена) Экспорт
Процедура ОбновитьНастройкиXDTOКорреспондента(КомпонентыОбмена)
// Проверяем возможность увеличения версии в корреспонденте.
НомерВерсииКорреспондента = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(КомпонентыОбмена.УзелКорреспондента, "ВерсияФорматаОбмена");
@@ -5708,8 +5789,14 @@
УзелКорреспондентаОбъект = КомпонентыОбмена.УзелКорреспондента.ПолучитьОбъект();
УзелКорреспондентаОбъект.ВерсияФорматаОбмена = МаксимальнаяОбщаяВерсия;
УзелКорреспондентаОбъект.Записать();
ИнформационноеСообщение = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
НСтр("ru = 'Изменен номер версии формата обмена (%1->%2).'"),
НомерВерсииКорреспондента,
МаксимальнаяОбщаяВерсия);
ЗаписатьВПротоколВыполнения(КомпонентыОбмена,
НСтр("ru = 'Изменен номер версии формата обмена.'"), , Ложь, , , Истина);
ИнформационноеСообщение, , Ложь, , , Истина);
КонецЕсли;
РегистрыСведений.НастройкиОбменаДаннымиXDTO.ОбновитьНастройкиКорреспондента(КомпонентыОбмена.УзелКорреспондента,
@@ -1710,6 +1710,19 @@
РегистрыСведений.УдалитьНастройкиТранспортаОбмена.ПеренестиНастройкиТранспортаОбменаДаннымиКорреспондента(УзелИнформационнойБазы);
ВидТранспорта = РегистрыСведений.НастройкиТранспортаОбменаДанными.ВидТранспортаСообщенийОбменаПоУмолчанию(УзелИнформационнойБазы);
ИмяПараметра = "СтандартныеПодсистемы.ОбменДанными.ПравилаРегистрации."
+ ОбменДаннымиПовтИсп.ПолучитьИмяПланаОбмена(УзелИнформационнойБазы);
ПравилаРегистрацииОбновлены = СтандартныеПодсистемыСервер.ПараметрРаботыПрограммы(ИмяПараметра);
Если ПравилаРегистрацииОбновлены = Неопределено Тогда
ВыполнитьОбновлениеПравилДляОбменаДанными();
КонецЕсли;
ПравилаРегистрацииОбновлены = СтандартныеПодсистемыСервер.ПараметрРаботыПрограммы(ИмяПараметра);
Если ПравилаРегистрацииОбновлены = Неопределено Тогда
ВызватьИсключение СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
НСтр("ru = 'Не выполнено обновление кэша правил регистрации данных для плана обмена ""%1""'"),
ОбменДаннымиПовтИсп.ПолучитьИмяПланаОбмена(УзелИнформационнойБазы));
КонецЕсли;
// Загрузка только параметров работы программы.
ПараметрыОбмена = ПараметрыОбмена();
ПараметрыОбмена.ВидТранспортаСообщенийОбмена = ВидТранспорта;
@@ -2622,18 +2635,31 @@
ИмяПланаОбмена = ОбменДаннымиПовтИсп.ПолучитьИмяПланаОбмена(УзелОбмена);
ИспользоватьПрефикс = Неопределено;
Если ОбменДаннымиПовтИсп.ЭтоПланОбменаРаспределеннойИнформационнойБазы(ИмяПланаОбмена)
Или ОбменДаннымиПовтИсп.ЭтоУзелСтандартногоОбменаДанными(ИмяПланаОбмена) Тогда
ИспользоватьПрефикс = Ложь;
ИначеЕсли Не ОбщегоНазначения.РазделениеВключено()
И Не ЭтоПланОбменаXDTO(ИмяПланаОбмена) Тогда
ИспользоватьПрефикс = Истина;
КонецЕсли;
КодУзла = СокрЛП(ОбщегоНазначения.ЗначениеРеквизитаОбъекта(ПланыОбмена[ИмяПланаОбмена].ЭтотУзел(), "Код"));
Если ОбменДаннымиПовтИсп.ЭтоУзелРазделенногоОбменаДаннымиБСП(УзелОбмена) Тогда
Если ОбменДаннымиПовтИсп.ЭтоУзелРазделенногоОбменаДаннымиБСП(УзелОбмена)
И ИспользоватьПрефикс <> Ложь Тогда
ПрефиксыУзла = РегистрыСведений.ОбщиеНастройкиУзловИнформационныхБаз.ПрефиксыУзла(УзелОбмена);
ПрефиксЭтогоУзла = СокрЛП(ПрефиксыУзла.Префикс);
Если Не ПустаяСтрока(ПрефиксЭтогоУзла)
И СтрДлина(КодУзла) <= 2 Тогда
Если Не ПустаяСтрока(ПрефиксЭтогоУзла) Тогда
// В качестве кода для целей идентификации при обмене использует префикс,
// установленный при создании настройки подключения.
КодУзла = ПрефиксЭтогоУзла;
Если ИспользоватьПрефикс = Истина
Или СтрДлина(КодУзла) <= 2 Тогда
КодУзла = ПрефиксЭтогоУзла;
КонецЕсли;
КонецЕсли;
КонецЕсли;
@@ -7134,7 +7160,7 @@
Функция ЭтоОшибкаНомерСообщенияМеньшеИлиРавенНомеруРанееПринятогоСообщения(ОписаниеОшибки)
Возврат СтрНайти(НРег(ОписаниеОшибки), НРег("ru = 'Номер сообщения меньше или равен'")) > 0;
Возврат СтрНайти(НРег(ОписаниеОшибки), НРег(НСтр("ru = 'Номер сообщения меньше или равен'"))) > 0;
КонецФункции
@@ -9096,8 +9122,8 @@
Если НЕ ЗначениеЗаполнено(СтруктураНастроекОбмена.УзелИнформационнойБазы) Тогда
// Узел информационной базы не должен быть пустым.
СтрокаСообщенияОбОшибке = НСтр(
"ru = 'Не задан узел информационной базы с которым нужно производить обмен информацией. Обмен отменен.'",
СтрокаСообщенияОбОшибке =
НСтр("ru = 'Не задан узел информационной базы с которым нужно производить обмен информацией. Обмен отменен.'",
ОбщегоНазначения.КодОсновногоЯзыка());
ЗаписьЖурналаРегистрацииОбменаДанными(СтрокаСообщенияОбОшибке, СтруктураНастроекОбмена, Истина);
ЗафиксироватьЗавершениеИнициализацииОбмена(СтруктураНастроекОбмена);
@@ -9127,8 +9153,8 @@
Если НЕ ЗначениеЗаполнено(СтруктураНастроекОбмена.УзелИнформационнойБазы) Тогда
// Узел информационной базы не должен быть пустым.
СтрокаСообщенияОбОшибке = НСтр(
"ru = 'Не задан узел информационной базы с которым нужно производить обмен информацией. Обмен отменен.'",
СтрокаСообщенияОбОшибке =
НСтр("ru = 'Не задан узел информационной базы с которым нужно производить обмен информацией. Обмен отменен.'",
ОбщегоНазначения.КодОсновногоЯзыка());
ЗаписьЖурналаРегистрацииОбменаДанными(СтрокаСообщенияОбОшибке, СтруктураНастроекОбмена, Истина);
ЗафиксироватьЗавершениеИнициализацииОбмена(СтруктураНастроекОбмена);
@@ -9161,8 +9187,8 @@
ИначеЕсли СтруктураНастроекОбмена.УзелИнформационнойБазы = СтруктураНастроекОбмена.ТекущийУзелПланаОбмена Тогда
// Сами с собой не обмениваемся.
СтрокаСообщенияОбОшибке = НСтр(
"ru = 'Нельзя организовать обмен данными с текущим узлом информационной базы. Обмен отменен.'",
СтрокаСообщенияОбОшибке =
НСтр("ru = 'Нельзя организовать обмен данными с текущим узлом информационной базы. Обмен отменен.'",
ОбщегоНазначения.КодОсновногоЯзыка());
ЗаписьЖурналаРегистрацииОбменаДанными(СтрокаСообщенияОбОшибке, СтруктураНастроекОбмена, Истина);
@@ -12701,33 +12727,57 @@
ИмяПланаОбмена = ЗаписьПланаОбмена.ИмяПланаОбмена;
Если ПравилаОбменаЗагруженныеИзФайла.Найти(ИмяПланаОбмена) = Неопределено
И ОбменДаннымиПовтИсп.ЕстьМакетПланаОбмена(ИмяПланаОбмена, "ПравилаОбмена")
Если ОбменДаннымиПовтИсп.ЕстьМакетПланаОбмена(ИмяПланаОбмена, "ПравилаОбмена")
И ОбменДаннымиПовтИсп.ЕстьМакетПланаОбмена(ИмяПланаОбмена, "ПравилаОбменаКорреспондента") Тогда
ТекстСообщения = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
НСтр("ru = 'Выполняется обновление правил конвертации данных для плана обмена %1'"), ИмяПланаОбмена);
ЗаписьЖурналаРегистрации(СобытиеЖурналаРегистрацииОбменДанными(),
УровеньЖурналаРегистрации.Информация,,, ТекстСообщения);
Если ПравилаОбменаЗагруженныеИзФайла.Найти(ИмяПланаОбмена) = Неопределено Тогда
ЗагрузитьПравилаДляОбменаДанными(Отказ, ИмяПланаОбмена, Перечисления.ВидыПравилДляОбменаДанными.ПравилаКонвертацииОбъектов,
"ПравилаОбмена", "ПравилаОбменаКорреспондента");
ТекстСообщения = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
НСтр("ru = 'Выполняется обновление правил конвертации данных для плана обмена %1'"), ИмяПланаОбмена);
ЗаписьЖурналаРегистрации(СобытиеЖурналаРегистрацииОбменДанными(),
УровеньЖурналаРегистрации.Информация,,, ТекстСообщения);
ВыполненоОбновлениеПравил = Истина;
ЗагрузитьПравилаДляОбменаДанными(Отказ, ИмяПланаОбмена, Перечисления.ВидыПравилДляОбменаДанными.ПравилаКонвертацииОбъектов,
"ПравилаОбмена", "ПравилаОбменаКорреспондента");
Если Не Отказ Тогда
ВыполненоОбновлениеПравил = Истина;
СтандартныеПодсистемыСервер.ОбновитьПараметрРаботыПрограммы(
"СтандартныеПодсистемы.ОбменДанными.ПравилаКонвертации." + ИмяПланаОбмена, Истина);
КонецЕсли;
Иначе
СтандартныеПодсистемыСервер.ОбновитьПараметрРаботыПрограммы(
"СтандартныеПодсистемы.ОбменДанными.ПравилаКонвертации." + ИмяПланаОбмена, Ложь);
КонецЕсли;
КонецЕсли;
Если ПравилаРегистрацииЗагруженныеИзФайла.Найти(ИмяПланаОбмена) = Неопределено
И ОбменДаннымиПовтИсп.ЕстьМакетПланаОбмена(ИмяПланаОбмена, "ПравилаРегистрации") Тогда
Если ОбменДаннымиПовтИсп.ЕстьМакетПланаОбмена(ИмяПланаОбмена, "ПравилаРегистрации") Тогда
ТекстСообщения = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
НСтр("ru = 'Выполняется обновление правил регистрации данных для плана обмена %1'"), ИмяПланаОбмена);
ЗаписьЖурналаРегистрации(СобытиеЖурналаРегистрацииОбменДанными(),
УровеньЖурналаРегистрации.Информация,,, ТекстСообщения);
Если ПравилаРегистрацииЗагруженныеИзФайла.Найти(ИмяПланаОбмена) = Неопределено Тогда
ЗагрузитьПравилаДляОбменаДанными(Отказ, ИмяПланаОбмена, Перечисления.ВидыПравилДляОбменаДанными.ПравилаРегистрацииОбъектов, "ПравилаРегистрации");
ВыполненоОбновлениеПравил = Истина;
ТекстСообщения = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
НСтр("ru = 'Выполняется обновление правил регистрации данных для плана обмена %1'"), ИмяПланаОбмена);
ЗаписьЖурналаРегистрации(СобытиеЖурналаРегистрацииОбменДанными(),
УровеньЖурналаРегистрации.Информация,,, ТекстСообщения);
ЗагрузитьПравилаДляОбменаДанными(Отказ, ИмяПланаОбмена, Перечисления.ВидыПравилДляОбменаДанными.ПравилаРегистрацииОбъектов, "ПравилаРегистрации");
Если Не Отказ Тогда
ВыполненоОбновлениеПравил = Истина;
СтандартныеПодсистемыСервер.ОбновитьПараметрРаботыПрограммы(
"СтандартныеПодсистемы.ОбменДанными.ПравилаРегистрации." + ИмяПланаОбмена, Истина);
КонецЕсли;
Иначе
СтандартныеПодсистемыСервер.ОбновитьПараметрРаботыПрограммы(
"СтандартныеПодсистемы.ОбменДанными.ПравилаРегистрации." + ИмяПланаОбмена, Ложь);
КонецЕсли;
КонецЕсли;
@@ -529,7 +529,8 @@
УстановитьПривилегированныйРежим(Истина);
КомпонентыОбмена = КомпонентыОбмена("Получение", ПараметрыWEBСервиса);
Отказ = Ложь;
КомпонентыОбмена = КомпонентыОбмена("Получение", ПараметрыWEBСервиса, Отказ);
Если КомпонентыОбмена.ФлагОшибки Тогда
СообщениеОбОшибке = КомпонентыОбмена.СтрокаСообщенияОбОшибке;
@@ -538,33 +539,41 @@
СтруктураНастроекОбмена = СтруктураНастроекОбмена(КомпонентыОбмена, Перечисления.ДействияПриОбмене.ЗагрузкаДанных);
ОтключитьОбновлениеКлючейДоступа(Истина);
Попытка
ОбменДаннымиXDTOСервер.ПроизвестиЧтениеДанных(КомпонентыОбмена);
Исключение
Информация = ИнформацияОбОшибке();
СообщениеОбОшибке = НСтр("ru = 'Ошибка при загрузке данных: %1'");
СообщениеОбОшибке = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
СообщениеОбОшибке,
ПодробноеПредставлениеОшибки(Информация));
ОбменДаннымиXDTOСервер.ЗаписатьВПротоколВыполнения(КомпонентыОбмена, СообщениеОбОшибке, , , , , Истина);
Если Не Отказ Тогда
ОтключитьОбновлениеКлючейДоступа(Истина);
Попытка
ОбменДаннымиXDTOСервер.ПроизвестиЧтениеДанных(КомпонентыОбмена);
ОтключитьОбновлениеКлючейДоступа(Ложь);
Исключение
ОтключитьОбновлениеКлючейДоступа(Ложь);
Информация = ИнформацияОбОшибке();
СообщениеОбОшибке = НСтр("ru = 'Ошибка при загрузке данных: %1'");
СообщениеОбОшибке = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
СообщениеОбОшибке,
ПодробноеПредставлениеОшибки(Информация));
ОбменДаннымиXDTOСервер.ЗаписатьВПротоколВыполнения(КомпонентыОбмена, СообщениеОбОшибке, , , , , Истина);
КомпонентыОбмена.ФлагОшибки = Истина;
КонецПопытки;
ОтключитьОбновлениеКлючейДоступа(Истина);
Попытка
ОбменДаннымиXDTOСервер.УдалитьВременныеОбъектыСозданныеПоСсылкам(КомпонентыОбмена);
ОтключитьОбновлениеКлючейДоступа(Ложь);
Исключение
ОтключитьОбновлениеКлючейДоступа(Ложь);
Информация = ИнформацияОбОшибке();
СообщениеОбОшибке = НСтр("ru = 'Ошибка при удалении временных объектов, созданных по ссылкам: %1'");
СообщениеОбОшибке = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
СообщениеОбОшибке,
ПодробноеПредставлениеОшибки(Информация));
ОбменДаннымиXDTOСервер.ЗаписатьВПротоколВыполнения(КомпонентыОбмена, СообщениеОбОшибке, , , , , Истина);
КомпонентыОбмена.ФлагОшибки = Истина;
КонецПопытки;
КомпонентыОбмена.ФайлОбмена.Закрыть();
Иначе
КомпонентыОбмена.ФлагОшибки = Истина;
КонецПопытки;
Попытка
ОбменДаннымиXDTOСервер.УдалитьВременныеОбъектыСозданныеПоСсылкам(КомпонентыОбмена);
Исключение
Информация = ИнформацияОбОшибке();
СообщениеОбОшибке = НСтр("ru = 'Ошибка при удалении временных объектов, созданных по ссылкам: %1'");
СообщениеОбОшибке = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
СообщениеОбОшибке,
ПодробноеПредставлениеОшибки(Информация));
ОбменДаннымиXDTOСервер.ЗаписатьВПротоколВыполнения(КомпонентыОбмена, СообщениеОбОшибке, , , , , Истина);
КомпонентыОбмена.ФлагОшибки = Истина;
КонецПопытки;
ОтключитьОбновлениеКлючейДоступа(Ложь);
КомпонентыОбмена.ФайлОбмена.Закрыть();
КонецЕсли;
ЗафиксироватьЗавершениеОбмена(СтруктураНастроекОбмена, КомпонентыОбмена);
@@ -912,7 +921,7 @@
#Область СлужебныеПроцедурыИФункции
Функция КомпонентыОбмена(НаправлениеОбмена, ПараметрыWEBСервиса)
Функция КомпонентыОбмена(НаправлениеОбмена, ПараметрыWEBСервиса, Отказ = Ложь)
КомпонентыОбмена = ОбменДаннымиXDTOСервер.ИнициализироватьКомпонентыОбмена(НаправлениеОбмена);
@@ -932,6 +941,11 @@
ИмяФайла = ОбменДаннымиСервер.ПолучитьФайлИзХранилища(ПараметрыWEBСервиса.ИдентификаторФайлаВоВременномХранилище);
ОбменДаннымиXDTOСервер.ОткрытьФайлЗагрузки(КомпонентыОбмена, ИмяФайла);
ОбменДаннымиXDTOСервер.ПослеОткрытияФайлаЗагрузки(КомпонентыОбмена, Отказ);
Если Отказ Тогда
Возврат КомпонентыОбмена;
КонецЕсли;
Иначе
@@ -41,7 +41,7 @@
Процедура ПриДобавленииПодсистемы(Описание) Экспорт
Описание.Имя = "СтандартныеПодсистемы";
Описание.Версия = "3.0.3.77";
Описание.Версия = "3.0.3.82";
Описание.ИдентификаторИнтернетПоддержки = "SSL";
Описание.РежимВыполненияОтложенныхОбработчиков = "Параллельно";
Описание.ПараллельноеОтложенноеОбновлениеСВерсии = "2.3.3.0";
@@ -170,7 +170,8 @@
ОписаниеТипаЧисло = Новый ОписаниеТипов("Число");
ТекстЯчейки = Ячейка.Текст;
ТекстЯчейки = СтрЗаменить(Ячейка.Текст, " ", "");
Если СтрНачинаетсяС(ТекстЯчейки, "(")
И СтрЗаканчиваетсяНа(ТекстЯчейки, ")") Тогда
@@ -4173,6 +4173,11 @@
МассивТипов = ИсходноеОписаниеТипов.Типы();
Для Каждого Тип Из МассивТипов Цикл
Если Тип = Тип("Null") Тогда
ВычитаемыеТипы.Добавить(Тип);
Продолжить;
КонецЕсли;
Если Тип = Тип("ПолеКомпоновкиДанных") Тогда
Если ПривестиКФорме Тогда
ВычитаемыеТипы.Добавить(Тип);
@@ -1589,8 +1589,8 @@
// который может являться владельцем присоединенных файлов.
//
// Возвращаемое значение:
// Массив - со значениями:
// * Ссылка - ссылка на объект, у которого есть хотя бы один присоединенный файл.
// Массив из ОпределяемыйТип.ВладелецПрисоединенныхФайлов - ссылка на объект, у которого есть хотя бы один
// присоединенный файл.
//
Функция СсылкиНаОбъектыСФайлами(Знач ИмяТаблицыВладельцевФайлов) Экспорт
@@ -282,6 +282,16 @@
КонецФункции
////////////////////////////////////////////////////////////////////////////////
// Для справочника ИдентификаторыОбъектовМетаданных.
// Только для внутреннего использования.
Функция ПредставлениеИдентификатораОбъектаМетаданных(Ссылка) Экспорт
Возврат Справочники.ИдентификаторыОбъектовМетаданных.ПредставлениеИдентификатора(Ссылка);
КонецФункции
////////////////////////////////////////////////////////////////////////////////
// ВСПОМОГАТЕЛЬНЫЕ ПРОЦЕДУРЫ И ФУНКЦИИ
@@ -713,6 +713,32 @@
Возврат СтрНайти(ПараметрЗапуска, "ОтключитьЛогикуНачалаРаботыСистемы") > 0;
КонецФункции
// Коллекция элементов стиля.
//
// Возвращаемое значение:
// Структура - элементы стиля:
// * Ключ - Строка - имя элемента стиля.
// * Значение - ОбъектМетаданных: ЭлементСтиля - элемент стиля.
//
Функция ЭлементыСтиля() Экспорт
ЭлементыСтиля = Новый Структура;
ПараметрыРаботыКлиента = ПараметрыРаботыКлиента();
Для каждого ЭлементСтиля Из ПараметрыРаботыКлиента.ЭлементыСтиля Цикл
#Если ТолстыйКлиентОбычноеПриложение Тогда
ЭлементыСтиля.Вставить(ЭлементСтиля.Ключ, ЭлементСтиля.Значение.Получить());
#Иначе
ЭлементыСтиля.Вставить(ЭлементСтиля.Ключ, ЭлементСтиля.Значение);
#КонецЕсли
КонецЦикла;
Возврат ЭлементыСтиля;
КонецФункции
////////////////////////////////////////////////////////////////////////////////
// Табличный документ
@@ -1487,11 +1513,15 @@
Если ПараметрыКлиента.ЕстьДоступДляОбновленияВерсииПлатформы Тогда
ТекстСообщения =
НСтр("ru='Рекомендуется завершить работу программы и обновить версию платформы 1С:Предприятия.
|В противном случае некоторые возможности программы будут недоступны или будут работать некорректно.'");
|Новая версия платформы содержит исправления ошибок, которые позволят программе работать более стабильно.
|Вы также можете отказаться от обновления и продолжить работу на текущей версии.
|Минимально необходимая версия платформы %1.'");
Иначе
ТекстСообщения =
НСтр("ru='Рекомендуется завершить работу программы и обратиться к администратору для обновления версии платформы 1С:Предприятия.
|В противном случае некоторые возможности программы будут недоступны или будут работать некорректно.'");
|Новая версия платформы содержит исправления ошибок, которые позволят программе работать более стабильно.
|Вы также можете отказаться от обновления и продолжить работу на текущей версии.
|Минимально необходимая версия платформы %1.'");
КонецЕсли;
КонецЕсли;
@@ -122,6 +122,16 @@
КонецПроцедуры
////////////////////////////////////////////////////////////////////////////////
// Для справочника ИдентификаторыОбъектовМетаданных.
// Только для внутреннего использования.
Функция ПредставлениеИдентификатораОбъектаМетаданных(Ссылка) Экспорт
Возврат СтандартныеПодсистемыВызовСервера.ПредставлениеИдентификатораОбъектаМетаданных(Ссылка);
КонецФункции
#Область ПараметрыРаботыКлиентаПриЗапуске
Функция ИспользуемыйКлиент()
@@ -478,6 +478,13 @@
КонецФункции
// Только для внутреннего использования.
Функция ПредставлениеИдентификатораОбъектаМетаданных(Ссылка) Экспорт
Возврат Справочники.ИдентификаторыОбъектовМетаданных.ПредставлениеИдентификатора(Ссылка);
КонецФункции
////////////////////////////////////////////////////////////////////////////////
// Работа с предопределенными данными.
@@ -1765,7 +1765,7 @@
Параметры.Вставить("ИнформационнаяБазаФайловая", ОбщегоНазначения.ИнформационнаяБазаФайловая());
Если ЭтоВызовПередНачаломРаботыСистемы Тогда
Параметры.Вставить("ЭлементыСтиля", ЭлементыСтиля());
Параметры.Вставить("ЭлементыСтиля", НаборЭлементовСтиля());
КонецЕсли;
Если ЭтоВызовПередНачаломРаботыСистемы
@@ -1950,7 +1950,7 @@
Параметры.Вставить("ЭтоБазоваяВерсияКонфигурации", ЭтоБазоваяВерсияКонфигурации());
Параметры.Вставить("ЭтоУчебнаяПлатформа", ЭтоУчебнаяПлатформа());
Параметры.Вставить("ИмяCOMСоединителя", ОбщегоНазначенияКлиентСервер.ИмяCOMСоединителя());
Параметры.Вставить("ЭлементыСтиля", ЭлементыСтиля());
Параметры.Вставить("ЭлементыСтиля", НаборЭлементовСтиля());
ДобавитьОбщиеПараметрыРаботыКлиента(Параметры);
@@ -3346,6 +3346,31 @@
КонецФункции
// Возвращает сериализуемый набор элементов стиля.
//
// Возвращаемое значение:
// Структура - элементы стиля
// * Ключ - Строка - имя элемента стиля.
// * Значение - Строка, ОбъектМетаданных: ЭлементСтиля - элемент стиля. Для толстого клиента обычного приложения
// элемент стиля преобразуется в системное строковое представление переданного значения.
//
Функция НаборЭлементовСтиля()
НаборЭлементовСтиля = Новый Структура;
Для каждого ЭлементСтиля Из Метаданные.ЭлементыСтиля Цикл
Если ТекущийРежимЗапуска() = РежимЗапускаКлиентскогоПриложения.ОбычноеПриложение Тогда
НаборЭлементовСтиля.Вставить(ЭлементСтиля.Имя, Новый ХранилищеЗначения(ЭлементСтиля.Значение));
Иначе
НаборЭлементовСтиля.Вставить(ЭлементСтиля.Имя, ЭлементСтиля.Значение);
КонецЕсли;
КонецЦикла;
Возврат Новый ФиксированнаяСтруктура(НаборЭлементовСтиля);
КонецФункции
// Для процедуры ПриЗаполненииРазрешенийНаДоступКВнешнимРесурсам.
Процедура ДобавитьЗапросРазрешенийНаИспользованиеРасширений(ЗапросыРазрешений)
@@ -31,19 +31,19 @@
// ФорматированнаяСтрока - преобразованная строка.
//
// Пример:
// СтроковыеФункции.ФорматированнаяСтрока(НСтр("ru='<span style=""color: ЗаблокированныйРеквизитЦвет; font:
// ВажнаяНадписьШрифт"">Минимальная</span> версия программы <b>1.1</b>. <a href = ""Обновление"">Обновите</a>
// программу.'")); СтроковыеФункции.ФорматированнаяСтрока(НСтр("ru='Режим: <img src=""РедактироватьВДиалоге""> <a
// style=""color: ИзмененноеЗначениеРеквизитаЦвет; background-color: ИзмененноеЗначениеРеквизитаФон""
// href=""e1cib/command/Обработка.Редактор"">Редактирование</a>'"));
// СтроковыеФункции.ФорматированнаяСтрока(НСтр("ru='Текущая дата <img src=""Календарь""><span style=""font:
// ВажнаяНадписьШрифт"">%1</span>'"), ТекущаяДатаСеанса());//
// 1. СтроковыеФункцииКлиент.ФорматированнаяСтрока(НСтр("ru='
// <span style=""color: ЗаблокированныйРеквизитЦвет; font: ВажнаяНадписьШрифт"">Минимальная</span> версия программы <b>1.1</b>.
// <a href = ""Обновление"">Обновите</a> программу.'"));
// 2. СтроковыеФункцииКлиент.ФорматированнаяСтрока(НСтр("ru='Режим: <img src=""РедактироватьВДиалоге"">
// <a style=""color: ИзмененноеЗначениеРеквизитаЦвет; background-color: ИзмененноеЗначениеРеквизитаФон""
// href=""e1cib/command/Обработка.Редактор"">Редактирование</a>'"));
// 3. СтроковыеФункцииКлиент.ФорматированнаяСтрока(НСтр("ru='Текущая дата <img src=""Календарь"">
// <span style=""font:ВажнаяНадписьШрифт"">%1</span>'"), ТекущаяДатаСеанса());
//
Функция ФорматированнаяСтрока(Знач ШаблонСтроки, Знач Параметр1 = Неопределено, Знач Параметр2 = Неопределено,
Знач Параметр3 = Неопределено, Знач Параметр4 = Неопределено, Знач Параметр5 = Неопределено) Экспорт
ЭлементыСтиля = СтандартныеПодсистемыСервер.ЭлементыСтиля();
Возврат СтроковыеФункцииКлиентСервер.СформироватьФорматированнуюСтроку(ШаблонСтроки, ЭлементыСтиля, Параметр1, Параметр2, Параметр3, Параметр4, Параметр5);
КонецФункции
@@ -31,20 +31,19 @@
// ФорматированнаяСтрока - преобразованная строка.
//
// Пример:
// СтроковыеФункцииКлиент.ФорматированнаяСтрока(НСтр("ru='<span style=""color: ЗаблокированныйРеквизитЦвет; font:
// ВажнаяНадписьШрифт"">Минимальная</span> версия программы <b>1.1</b>. <a href = ""Обновление"">Обновите</a>
// программу.'")); СтроковыеФункцииКлиент.ФорматированнаяСтрока(НСтр("ru='Режим: <img src=""РедактироватьВДиалоге""> <a
// style=""color: ИзмененноеЗначениеРеквизитаЦвет; background-color: ИзмененноеЗначениеРеквизитаФон""
// href=""e1cib/command/Обработка.Редактор"">Редактирование</a>'"));
// СтроковыеФункцииКлиент.ФорматированнаяСтрока(НСтр("ru='Текущая дата <img src=""Календарь""><span style=""font:
// ВажнаяНадписьШрифт"">%1</span>'"), ТекущаяДатаСеанса());//
// 1. СтроковыеФункцииКлиент.ФорматированнаяСтрока(НСтр("ru='
// <span style=""color: ЗаблокированныйРеквизитЦвет; font: ВажнаяНадписьШрифт"">Минимальная</span> версия программы <b>1.1</b>.
// <a href = ""Обновление"">Обновите</a> программу.'"));
// 2. СтроковыеФункцииКлиент.ФорматированнаяСтрока(НСтр("ru='Режим: <img src=""РедактироватьВДиалоге"">
// <a style=""color: ИзмененноеЗначениеРеквизитаЦвет; background-color: ИзмененноеЗначениеРеквизитаФон""
// href=""e1cib/command/Обработка.Редактор"">Редактирование</a>'"));
// 3. СтроковыеФункцииКлиент.ФорматированнаяСтрока(НСтр("ru='Текущая дата <img src=""Календарь"">
// <span style=""font:ВажнаяНадписьШрифт"">%1</span>'"), ТекущаяДатаСеанса());
//
Функция ФорматированнаяСтрока(Знач ШаблонСтроки, Знач Параметр1 = Неопределено, Знач Параметр2 = Неопределено,
Знач Параметр3 = Неопределено, Знач Параметр4 = Неопределено, Знач Параметр5 = Неопределено) Экспорт
ПараметрыРаботыКлиента = СтандартныеПодсистемыКлиент.ПараметрыРаботыКлиента();
ЭлементыСтиля = ПараметрыРаботыКлиента.ЭлементыСтиля;
ЭлементыСтиля = СтандартныеПодсистемыКлиент.ЭлементыСтиля();
Возврат СтроковыеФункцииКлиентСервер.СформироватьФорматированнуюСтроку(ШаблонСтроки, ЭлементыСтиля, Параметр1, Параметр2, Параметр3, Параметр4, Параметр5);
КонецФункции
@@ -17409,6 +17409,12 @@
ПараметрыОбновления.Кэш.Вставить("ЗначенияГруппДоступаВерсия", Новый УникальныйИдентификатор);
КонецЕсли;
Если ТранзакцияАктивна() И ОбщегоНазначения.ИнформационнаяБазаФайловая() Тогда
Блокировка = Новый БлокировкаДанных;
Блокировка.Добавить("РегистрСведений.ПараметрыРаботыВерсийРасширений");
Блокировка.Заблокировать();
КонецЕсли;
ИмяПараметраВерсии = "СтандартныеПодсистемы.УправлениеДоступом.ЗначенияГруппДоступаВерсия";
ЗначенияГруппДоступаВерсия = СтандартныеПодсистемыСервер.ПараметрРаботыРасширения(ИмяПараметраВерсии, Истина);
@@ -20776,6 +20782,7 @@
ЭлементБлокировки.Режим = РежимБлокировкиДанных.Разделяемый;
ЭлементБлокировки.УстановитьЗначение("Версия", ОписаниеВерсии.Версия);
БлокировкаДанных.Заблокировать();
ЭлементБлокировки = БлокировкаДанных.Добавить("РегистрСведений.ПараметрыОграниченияДоступа");
ЗаблокированнаяВерсия = ОписаниеВерсии.Версия;
ОписаниеВерсии = ОписаниеПоследнейВерсии();
Продолжить;
@@ -2719,18 +2719,7 @@
Функция ПолучитьУчетнуюЗаписьДляОтправкиПоУмолчанию() Экспорт
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ РАЗРЕШЕННЫЕ ПЕРВЫЕ 1
| УчетныеЗаписиЭлектроннойПочты.Ссылка КАК Ссылка
|ИЗ
| Справочник.УчетныеЗаписиЭлектроннойПочты КАК УчетныеЗаписиЭлектроннойПочты
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.НастройкиУчетныхЗаписейЭлектроннойПочты КАК НастройкиУчетныхЗаписейЭлектроннойПочты
| ПО НастройкиУчетныхЗаписейЭлектроннойПочты.УчетнаяЗаписьЭлектроннойПочты = УчетныеЗаписиЭлектроннойПочты.Ссылка
|ГДЕ
| УчетныеЗаписиЭлектроннойПочты.ИспользоватьДляОтправки
| И НЕ ЕСТЬNULL(НастройкиУчетныхЗаписейЭлектроннойПочты.НеИспользоватьВоВстроенномПочтовомКлиенте, ЛОЖЬ)
| И (УчетныеЗаписиЭлектроннойПочты.ВладелецУчетнойЗаписи = &ТекущийПользователь
| ИЛИ УчетныеЗаписиЭлектроннойПочты.ВладелецУчетнойЗаписи = ЗНАЧЕНИЕ(Справочник.Пользователи.ПустаяСсылка))";
Запрос.Текст = ТекстЗапросаПоДоступнымУчетнымЗаписям();
Запрос.УстановитьПараметр("ТекущийПользователь", Пользователи.АвторизованныйПользователь());
@@ -2741,7 +2730,7 @@
Выборка = РезультатЗапроса.Выбрать();
Выборка.Следующий();
Возврат Выборка.Ссылка;
Возврат Выборка.УчетнаяЗапись;
КонецФункции
@@ -2965,8 +2954,30 @@
СписокВыбора.Очистить();
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ РАЗРЕШЕННЫЕ ПЕРВЫЕ 1
Запрос.Текст = ТекстЗапросаПоДоступнымУчетнымЗаписям();
Запрос.УстановитьПараметр("ТекущийПользователь",Пользователи.ТекущийПользователь());
Результат = Запрос.Выполнить();
Если Результат.Пустой() Тогда
Возврат;
КонецЕсли;
Выборка = Результат.Выбрать();
Пока Выборка.Следующий() Цикл
СписокВыбора.Добавить(Выборка.УчетнаяЗапись,
ВзаимодействияКлиентСервер.ПолучитьПредставлениеАдресата(Выборка.ИмяПользователя,
Выборка.АдресЭлектроннойПочты,
""));
КонецЦикла;
ОбщегоНазначенияКлиентСервер.ДополнитьТаблицу(Результат.Выгрузить(), ТаблицаДанныхУчетнойЗаписи);
КонецПроцедуры
Функция ТекстЗапросаПоДоступнымУчетнымЗаписям()
Возврат "
|ВЫБРАТЬ РАЗРЕШЕННЫЕ ПЕРВЫЕ 1
| ЭлектронноеПисьмоИсходящее.УчетнаяЗапись КАК УчетнаяЗапись
|ПОМЕСТИТЬ ПоследняяИспользовавшаясяУчетная
|ИЗ
@@ -3013,23 +3024,7 @@
|УПОРЯДОЧИТЬ ПО
| ЗначениеУпорядочивания";
Запрос.УстановитьПараметр("ТекущийПользователь",Пользователи.ТекущийПользователь());
Результат = Запрос.Выполнить();
Если Результат.Пустой() Тогда
Возврат;
КонецЕсли;
Выборка = Результат.Выбрать();
Пока Выборка.Следующий() Цикл
СписокВыбора.Добавить(Выборка.УчетнаяЗапись,
ВзаимодействияКлиентСервер.ПолучитьПредставлениеАдресата(Выборка.ИмяПользователя,
Выборка.АдресЭлектроннойПочты,
""));
КонецЦикла;
ОбщегоНазначенияКлиентСервер.ДополнитьТаблицу(Результат.Выгрузить(), ТаблицаДанныхУчетнойЗаписи);
КонецПроцедуры
КонецФункции
// Создает предопределенные папки для учетной записи электронной почты.
//
+9 -9
View File
@@ -1,17 +1,17 @@
<?xml version="1.0" encoding="UTF-8"?>
<mdclass:Configuration xmlns:mdclass="http://g5.1c.ru/v8/dt/metadata/mdclass" uuid="89b7ba30-5dcb-48b3-863b-c8d6fe56d084">
<mdclass:Configuration xmlns:mdclass="http://g5.1c.ru/v8/dt/metadata/mdclass" uuid="f9d8b876-5903-4ed0-a04e-7e2db9ad6e14">
<name>БиблиотекаСтандартныхПодсистем</name>
<synonym>
<key>ru</key>
<value>Библиотека стандартных подсистем, редакция 3.0</value>
</synonym>
<containedObjects classId="9cd510cd-abfc-11d4-9434-004095e12fc7" objectId="b0559b7a-be1f-4ee4-b71d-1b57665c7166"/>
<containedObjects classId="9fcd25a0-4822-11d4-9414-008048da11f9" objectId="b3ea73f3-7080-4aeb-a7c8-b49be17abd87"/>
<containedObjects classId="e3687481-0a87-462c-a166-9f34594f9bba" objectId="d8f8326c-9349-4b29-9aff-b4c3dd1dfd22"/>
<containedObjects classId="9de14907-ec23-4a07-96f0-85521cb6b53b" objectId="0b579607-4891-45b5-9f5d-05859080b890"/>
<containedObjects classId="51f2d5d8-ea4d-4064-8892-82951750031e" objectId="e37502ee-89a7-4dca-afcc-31ba75f59077"/>
<containedObjects classId="e68182ea-4237-4383-967f-90c1e3370bc7" objectId="98e46974-ad4c-4092-bdeb-eb00b6ce62a4"/>
<containedObjects classId="fb282519-d103-4dd3-bc12-cb271d631dfc" objectId="7daa996b-b899-4cca-8d01-177d616dfa25"/>
<containedObjects classId="9cd510cd-abfc-11d4-9434-004095e12fc7" objectId="28377eae-11e9-4de1-bf3a-aae0fadcb69c"/>
<containedObjects classId="9fcd25a0-4822-11d4-9414-008048da11f9" objectId="7a83344a-2096-4443-a067-e58e6850aa85"/>
<containedObjects classId="e3687481-0a87-462c-a166-9f34594f9bba" objectId="7eda60ac-64ff-497d-b18e-2d8e64cc7d12"/>
<containedObjects classId="9de14907-ec23-4a07-96f0-85521cb6b53b" objectId="d3842027-68ba-4d17-833a-7a776b538320"/>
<containedObjects classId="51f2d5d8-ea4d-4064-8892-82951750031e" objectId="f5bfe1fc-9365-4f21-bffe-3d87a8e3c9f2"/>
<containedObjects classId="e68182ea-4237-4383-967f-90c1e3370bc7" objectId="1e3dd583-a87a-48ea-a4fd-03cc3fc51e43"/>
<containedObjects classId="fb282519-d103-4dd3-bc12-cb271d631dfc" objectId="98f365e5-0f8b-41d6-ab7b-6ba67ad7d7fc"/>
<defaultRunMode>ManagedApplication</defaultRunMode>
<usePurposes>PersonalComputer</usePurposes>
<scriptVariant>Russian</scriptVariant>
@@ -19,7 +19,7 @@
<defaultRoles>Role.АдминистраторСистемы</defaultRoles>
<defaultRoles>Role.ИнтерактивноеОткрытиеВнешнихОтчетовИОбработок</defaultRoles>
<vendor>Фирма &quot;1С&quot;</vendor>
<version>3.0.3.77</version>
<version>3.0.3.82</version>
<updateCatalogAddress>http://downloads.v8.1c.ru/tmplts/</updateCatalogAddress>
<includeHelpInContents>true</includeHelpInContents>
<usedMobileApplicationFunctionalities>
@@ -1 +1 @@
{6,1,1,e7284f00-78fa-454f-b0b3-0981c83cf270,1,ab19a080-01eb-4c6a-a99a-a2edea04012c,"3.0.3.77","Фирма ""1С""","БиблиотекаСтандартныхПодсистем",6041,1,0,89b7ba30-5dcb-48b3-863b-c8d6fe56d084,89b7ba30-5dcb-48b3-863b-c8d6fe56d084,1,0,db4a9ccb-9ef5-4b3c-8577-b6fe5db1b62e,db4a9ccb-9ef5-4b3c-8577-b6fe5db1b62e,1,0,9233322b-dfdb-4c66-91fe-1299292d40a5,9233322b-dfdb-4c66-91fe-1299292d40a5,1,0,7795348b-2f52-47f7-bf00-e11e5e795a43,7795348b-2f52-47f7-bf00-e11e5e795a43,1,0,0421b67e-ed26-491d-ab98-ec59002ed4ce,0421b67e-ed26-491d-ab98-ec59002ed4ce,1,0,bb47ced2-31f9-4870-8633-20b986e53ccc,bb47ced2-31f9-4870-8633-20b986e53ccc,1,0,7d8acec9-f5a9-411e-921c-446ed0dd3332,7d8acec9-f5a9-411e-921c-446ed0dd3332,1,0,739c01a9-1125-45ef-ab4e-8c73af4eeff0,739c01a9-1125-45ef-ab4e-8c73af4eeff0,1,0,cdbd26b1-9583-46e8-adf7-8cc705639892,cdbd26b1-9583-46e8-adf7-8cc705639892,1,0,c0e38c3e-7088-4e35-9d84-2d0ab9655402,c0e38c3e-7088-4e35-9d84-2d0ab9655402,1,0,1098786f-dd24-4cce-b212-be0cb5f01735,1098786f-dd24-4cce-b212-be0cb5f01735,1,0,3c0037f3-4422-4836-b116-8c72e32bdd55,3c0037f3-4422-4836-b116-8c72e32bdd55,1,0,6f7c6c31-206b-4010-bdad-1ad2e304f154,6f7c6c31-206b-4010-bdad-1ad2e304f154,1,0,a8659e53-8c6b-4b0c-9736-fe93a91e4d69,a8659e53-8c6b-4b0c-9736-fe93a91e4d69,1,0,fe9a1d1a-19c0-499f-8e1b-09cadabe882f,fe9a1d1a-19c0-499f-8e1b-09cadabe882f,1,0,5b68d479-7880-44de-84e3-7f578b43f0dc,5b68d479-7880-44de-84e3-7f578b43f0dc,1,0,bf9ca98c-5c95-4cfb-9181-8c1d847f9fbb,bf9ca98c-5c95-4cfb-9181-8c1d847f9fbb,1,0,b4629308-42de-4ce8-8591-cf0c2399a9a2,b4629308-42de-4ce8-8591-cf0c2399a9a2,1,0,c7e984ae-1dbb-4041-b18a-bfd0d63a002f,c7e984ae-1dbb-4041-b18a-bfd0d63a002f,1,0,bb0424b8-dfd1-4a27-bd66-9dea3ffc77c4,bb0424b8-dfd1-4a27-bd66-9dea3ffc77c4,1,0,a4ac0a50-ee39-4dc1-b84f-eec8fe485f03,a4ac0a50-ee39-4dc1-b84f-eec8fe485f03,1,0,1861ee4f-fd8c-4afa-8441-c074bf51f67e,1861ee4f-fd8c-4afa-8441-c074bf51f67e,1,0,de7ed8f7-3c02-47e0-aea8-4747ac68a5d5,de7ed8f7-3c02-47e0-aea8-4747ac68a5d5,1,0,b93b8760-6200-40ee-8bdc-875ba80a6155,b93b8760-6200-40ee-8bdc-875ba80a6155,1,0,c27472ee-879a-4746-9d21-122738ec80b7,c27472ee-879a-4746-9d21-122738ec80b7,1,0,e8b248d9-9049-456a-9c7d-7a0462cc67ab,e8b248d9-9049-456a-9c7d-7a0462cc67ab,1,0,d4562287-440d-4462-9de2-7097ccbf3764,d4562287-440d-4462-9de2-7097ccbf3764,1,0,ec797c75-02c5-4cf5-9dd4-26cd46c99519,ec797c75-02c5-4cf5-9dd4-26cd46c99519,1,0,6fccdf59-fc99-4a2b-a144-fffe438a147c,6fccdf59-fc99-4a2b-a144-fffe438a147c,1,0,af8bd73a-d8e8-487d-8f36-d835ab10ea3a,af8bd73a-d8e8-487d-8f36-d835ab10ea3a,1,0,08a413ff-bebd-42e5-8ff3-2115746a0844,08a413ff-bebd-42e5-8ff3-2115746a0844,1,0,da9b32e6-5b93-45a6-84b2-238d57541e18,da9b32e6-5b93-45a6-84b2-238d57541e18,1,0,e43d69c8-b284-47da-b236-611bc94a15b6,e43d69c8-b284-47da-b236-611bc94a15b6,1,0,31eeaa05-6c49-41fe-b840-1edbad4ccac7,31eeaa05-6c49-41fe-b840-1edbad4ccac7,1,0,842c8662-8f39-405e-9665-cbdabc116159,842c8662-8f39-405e-9665-cbdabc116159,1,0,fca4b033-02c4-4d61-9e51-87783c3cef1a,fca4b033-02c4-4d61-9e51-87783c3cef1a,1,0,396ef757-d7f6-411f-8c4c-1acb1106a009,396ef757-d7f6-411f-8c4c-1acb1106a009,1,0,839e29b1-a0d2-40fa-9f3e-46e66b943358,839e29b1-a0d2-40fa-9f3e-46e66b943358,1,0,c56d2cc7-630a-441b-b23f-ba78c34849bd,c56d2cc7-630a-441b-b23f-ba78c34849bd,1,0,9aecf4f5-46ed-4d1c-a584-cd028e467895,9aecf4f5-46ed-4d1c-a584-cd028e467895,1,0,21d92c2f-6c78-43ce-b1f4-59d7845b5a91,21d92c2f-6c78-43ce-b1f4-59d7845b5a91,1,0,a1c379be-43d3-4e02-83bb-d2e7de2d4ae3,a1c379be-43d3-4e02-83bb-d2e7de2d4ae3,1,0,a1f10624-22e9-4a04-b370-fd085bdd0f67,a1f10624-22e9-4a04-b370-fd085bdd0f67,1,0,2a4b10be-3cd7-4755-905f-7b4d02ff6a22,2a4b10be-3cd7-4755-905f-7b4d02ff6a22,1,0,3cffb795-2a28-4beb-92f4-5813f5994022,3cffb795-2a28-4beb-92f4-5813f5994022,1,0,3323ca68-1382-4710-a933-23fc56588935,3323ca68-1382-4710-a933-23fc56588935,1,0,d6b12775-3255-42b8-88b2-62684f873e7d,d6b12775-3255-42b8-88b2-62684f873e7d,1,0,cc23d903-ccc5-42f4-862f-5e7278c4e346,cc23d903-ccc5-42f4-862f-5e7278c4e346,1,0,98f033e0-fa40-46e0-b51a-87a066749a35,98f033e0-fa40-46e0-b51a-87a066749a35,1,0,e8b4cb2d-1180-4101-954a-4cb5464f198c,e8b4cb2d-1180-4101-954a-4cb5464f198c,1,0,a379287d-1ce8-460d-a503-910e728e28f1,a379287d-1ce8-460d-a503-910e728e28f1,1,0,f765c4ba-c677-42ac-8d0c-43bb485405b9,f765c4ba-c677-42ac-8d0c-43bb485405b9,1,0,83192b3e-e7a9-4595-8887-24cda84457a9,83192b3e-e7a9-4595-8887-24cda84457a9,1,0,2fd1287d-d96d-4480-baf7-8815ae5ffbfb,2fd1287d-d96d-4480-baf7-8815ae5ffbfb,1,0,c8a4c5da-bc88-4f6e-9787-1c22c2f41be7,c8a4c5da-bc88-4f6e-9787-1c22c2f41be7,1,0,08eeb8f1-944f-4450-83f6-ef20aaab7d86,08eeb8f1-944f-4450-83f6-ef20aaab7d86,1,0,d8c58e53-b7b9-4426-bdfa-d0816adf8cc1,d8c58e53-b7b9-4426-bdfa-d0816adf8cc1,1,0,8d77dd4a-e646-4105-8dcf-8ce8fc3da0b4,8d77dd4a-e646-4105-8dcf-8ce8fc3da0b4,1,0,2fd12dba-5311-4f31-949c-f6b15decc0cc,2fd12dba-5311-4f31-949c-f6b15decc0cc,1,0,d7cf3981-cf63-4a21-868b-8175a7704a8f,d7cf3981-cf63-4a21-868b-8175a7704a8f,1,0,35895e12-52b6-49a1-acdf-6d828a948af0,35895e12-52b6-49a1-acdf-6d828a948af0,1,0,0ae93712-74e8-41c7-8f2d-4dfc8983697d,0ae93712-74e8-Line truncated
{6,1,1,6b226bc3-178e-4131-b182-b4819e628eda,1,331696d6-8c79-4306-b5fd-8625124e6452,"3.0.3.82","Фирма ""1С""","БиблиотекаСтандартныхПодсистем",6041,1,0,f9d8b876-5903-4ed0-a04e-7e2db9ad6e14,f9d8b876-5903-4ed0-a04e-7e2db9ad6e14,1,0,db4a9ccb-9ef5-4b3c-8577-b6fe5db1b62e,db4a9ccb-9ef5-4b3c-8577-b6fe5db1b62e,1,0,9233322b-dfdb-4c66-91fe-1299292d40a5,9233322b-dfdb-4c66-91fe-1299292d40a5,1,0,7795348b-2f52-47f7-bf00-e11e5e795a43,7795348b-2f52-47f7-bf00-e11e5e795a43,1,0,0421b67e-ed26-491d-ab98-ec59002ed4ce,0421b67e-ed26-491d-ab98-ec59002ed4ce,1,0,bb47ced2-31f9-4870-8633-20b986e53ccc,bb47ced2-31f9-4870-8633-20b986e53ccc,1,0,7d8acec9-f5a9-411e-921c-446ed0dd3332,7d8acec9-f5a9-411e-921c-446ed0dd3332,1,0,739c01a9-1125-45ef-ab4e-8c73af4eeff0,739c01a9-1125-45ef-ab4e-8c73af4eeff0,1,0,cdbd26b1-9583-46e8-adf7-8cc705639892,cdbd26b1-9583-46e8-adf7-8cc705639892,1,0,c0e38c3e-7088-4e35-9d84-2d0ab9655402,c0e38c3e-7088-4e35-9d84-2d0ab9655402,1,0,1098786f-dd24-4cce-b212-be0cb5f01735,1098786f-dd24-4cce-b212-be0cb5f01735,1,0,3c0037f3-4422-4836-b116-8c72e32bdd55,3c0037f3-4422-4836-b116-8c72e32bdd55,1,0,6f7c6c31-206b-4010-bdad-1ad2e304f154,6f7c6c31-206b-4010-bdad-1ad2e304f154,1,0,a8659e53-8c6b-4b0c-9736-fe93a91e4d69,a8659e53-8c6b-4b0c-9736-fe93a91e4d69,1,0,fe9a1d1a-19c0-499f-8e1b-09cadabe882f,fe9a1d1a-19c0-499f-8e1b-09cadabe882f,1,0,5b68d479-7880-44de-84e3-7f578b43f0dc,5b68d479-7880-44de-84e3-7f578b43f0dc,1,0,bf9ca98c-5c95-4cfb-9181-8c1d847f9fbb,bf9ca98c-5c95-4cfb-9181-8c1d847f9fbb,1,0,b4629308-42de-4ce8-8591-cf0c2399a9a2,b4629308-42de-4ce8-8591-cf0c2399a9a2,1,0,c7e984ae-1dbb-4041-b18a-bfd0d63a002f,c7e984ae-1dbb-4041-b18a-bfd0d63a002f,1,0,bb0424b8-dfd1-4a27-bd66-9dea3ffc77c4,bb0424b8-dfd1-4a27-bd66-9dea3ffc77c4,1,0,a4ac0a50-ee39-4dc1-b84f-eec8fe485f03,a4ac0a50-ee39-4dc1-b84f-eec8fe485f03,1,0,1861ee4f-fd8c-4afa-8441-c074bf51f67e,1861ee4f-fd8c-4afa-8441-c074bf51f67e,1,0,de7ed8f7-3c02-47e0-aea8-4747ac68a5d5,de7ed8f7-3c02-47e0-aea8-4747ac68a5d5,1,0,b93b8760-6200-40ee-8bdc-875ba80a6155,b93b8760-6200-40ee-8bdc-875ba80a6155,1,0,c27472ee-879a-4746-9d21-122738ec80b7,c27472ee-879a-4746-9d21-122738ec80b7,1,0,e8b248d9-9049-456a-9c7d-7a0462cc67ab,e8b248d9-9049-456a-9c7d-7a0462cc67ab,1,0,d4562287-440d-4462-9de2-7097ccbf3764,d4562287-440d-4462-9de2-7097ccbf3764,1,0,ec797c75-02c5-4cf5-9dd4-26cd46c99519,ec797c75-02c5-4cf5-9dd4-26cd46c99519,1,0,6fccdf59-fc99-4a2b-a144-fffe438a147c,6fccdf59-fc99-4a2b-a144-fffe438a147c,1,0,af8bd73a-d8e8-487d-8f36-d835ab10ea3a,af8bd73a-d8e8-487d-8f36-d835ab10ea3a,1,0,08a413ff-bebd-42e5-8ff3-2115746a0844,08a413ff-bebd-42e5-8ff3-2115746a0844,1,0,da9b32e6-5b93-45a6-84b2-238d57541e18,da9b32e6-5b93-45a6-84b2-238d57541e18,1,0,e43d69c8-b284-47da-b236-611bc94a15b6,e43d69c8-b284-47da-b236-611bc94a15b6,1,0,31eeaa05-6c49-41fe-b840-1edbad4ccac7,31eeaa05-6c49-41fe-b840-1edbad4ccac7,1,0,842c8662-8f39-405e-9665-cbdabc116159,842c8662-8f39-405e-9665-cbdabc116159,1,0,fca4b033-02c4-4d61-9e51-87783c3cef1a,fca4b033-02c4-4d61-9e51-87783c3cef1a,1,0,396ef757-d7f6-411f-8c4c-1acb1106a009,396ef757-d7f6-411f-8c4c-1acb1106a009,1,0,839e29b1-a0d2-40fa-9f3e-46e66b943358,839e29b1-a0d2-40fa-9f3e-46e66b943358,1,0,c56d2cc7-630a-441b-b23f-ba78c34849bd,c56d2cc7-630a-441b-b23f-ba78c34849bd,1,0,9aecf4f5-46ed-4d1c-a584-cd028e467895,9aecf4f5-46ed-4d1c-a584-cd028e467895,1,0,21d92c2f-6c78-43ce-b1f4-59d7845b5a91,21d92c2f-6c78-43ce-b1f4-59d7845b5a91,1,0,a1c379be-43d3-4e02-83bb-d2e7de2d4ae3,a1c379be-43d3-4e02-83bb-d2e7de2d4ae3,1,0,a1f10624-22e9-4a04-b370-fd085bdd0f67,a1f10624-22e9-4a04-b370-fd085bdd0f67,1,0,2a4b10be-3cd7-4755-905f-7b4d02ff6a22,2a4b10be-3cd7-4755-905f-7b4d02ff6a22,1,0,3cffb795-2a28-4beb-92f4-5813f5994022,3cffb795-2a28-4beb-92f4-5813f5994022,1,0,3323ca68-1382-4710-a933-23fc56588935,3323ca68-1382-4710-a933-23fc56588935,1,0,d6b12775-3255-42b8-88b2-62684f873e7d,d6b12775-3255-42b8-88b2-62684f873e7d,1,0,cc23d903-ccc5-42f4-862f-5e7278c4e346,cc23d903-ccc5-42f4-862f-5e7278c4e346,1,0,98f033e0-fa40-46e0-b51a-87a066749a35,98f033e0-fa40-46e0-b51a-87a066749a35,1,0,e8b4cb2d-1180-4101-954a-4cb5464f198c,e8b4cb2d-1180-4101-954a-4cb5464f198c,1,0,a379287d-1ce8-460d-a503-910e728e28f1,a379287d-1ce8-460d-a503-910e728e28f1,1,0,f765c4ba-c677-42ac-8d0c-43bb485405b9,f765c4ba-c677-42ac-8d0c-43bb485405b9,1,0,83192b3e-e7a9-4595-8887-24cda84457a9,83192b3e-e7a9-4595-8887-24cda84457a9,1,0,2fd1287d-d96d-4480-baf7-8815ae5ffbfb,2fd1287d-d96d-4480-baf7-8815ae5ffbfb,1,0,c8a4c5da-bc88-4f6e-9787-1c22c2f41be7,c8a4c5da-bc88-4f6e-9787-1c22c2f41be7,1,0,08eeb8f1-944f-4450-83f6-ef20aaab7d86,08eeb8f1-944f-4450-83f6-ef20aaab7d86,1,0,d8c58e53-b7b9-4426-bdfa-d0816adf8cc1,d8c58e53-b7b9-4426-bdfa-d0816adf8cc1,1,0,8d77dd4a-e646-4105-8dcf-8ce8fc3da0b4,8d77dd4a-e646-4105-8dcf-8ce8fc3da0b4,1,0,2fd12dba-5311-4f31-949c-f6b15decc0cc,2fd12dba-5311-4f31-949c-f6b15decc0cc,1,0,d7cf3981-cf63-4a21-868b-8175a7704a8f,d7cf3981-cf63-4a21-868b-8175a7704a8f,1,0,35895e12-52b6-49a1-acdf-6d828a948af0,35895e12-52b6-49a1-acdf-6d828a948af0,1,0,0ae93712-74e8-41c7-8f2d-4dfc8983697d,0ae93712-74e8-Line truncated
@@ -64,7 +64,7 @@
<div>В параметре <strong>/UC</strong> укажите код доступа, который был задан при блокировке работы пользователей.</div></li></ul></li><li>
<div>Для установки блокировки также можно использовать запуск программы с параметром <strong>ЗавершитьРаботуПользователей</strong>:</div>
<ul><li>
<div>"C:\Program Files\1cv8\bin\1cv8.exe" ENTERPRISE /F"C:\Documents and Settings\Админ\Мои документы\1C\DemoSSL" /NAdministrator /Pххххх /CЗавершитьРаботуПользователей</div></li></ul></li><li>
<div>"C:\Program Files\1cv8\bin\1cv8.exe" ENTERPRISE /F"C:\Documents and Settings\Админ\Мои документы\1C\DemoSSL" /N&lt;имя администратора&gt; /P&lt;пароль&gt; /CЗавершитьРаботуПользователей</div></li></ul></li><li>
<div>Для снятия блокировки рекомендуется использовать запуск программы с параметром <strong>РазрешитьРаботуПользователей</strong>.</div>
<ul><li>
<div>"C:\Program Files\1cv8\bin\1cv8.exe" ENTERPRISE \F"C:\Documents and Settings\Админ\Мои документы\1C\DemoSSL" /CРазрешитьРаботуПользователей /UC &lt;код разрешения&gt;</div>
@@ -1179,6 +1179,11 @@
Если ДлительнаяОперацияЗавершенаСОшибкой Тогда
ИдентификаторФайлаСообщенияВСервисе = "";
ОбменДаннымиВызовСервера.ЗафиксироватьЗавершениеОбменаСОшибкой(
УзелИнформационнойБазы,
?(ФоновоеЗаданиеВыполняемоеДействие = 1, "ЗагрузкаДанных", "ВыгрузкаДанных"),
ДатаНачалаОперации,
СообщениеОбОшибке);
Иначе
// Если выполнялось длительное получение данных из приложения в интернете,
@@ -1283,6 +1288,13 @@
Если ФоновоеЗаданиеРезультатВыполнения.Статус = "Ошибка" Тогда
СообщениеОбОшибке = ФоновоеЗаданиеРезультатВыполнения.ПодробноеПредставлениеОшибки;
УстановитьПривилегированныйРежим(Истина);
ОбменДаннымиСервер.ЗафиксироватьЗавершениеОбменаСОшибкой(
УзелИнформационнойБазы,
?(ФоновоеЗаданиеВыполняемоеДействие = 1, "ЗагрузкаДанных", "ВыгрузкаДанных"),
ДатаНачалаОперации,
СообщениеОбОшибке);
УстановитьПривилегированныйРежим(Ложь);
Иначе
РезультатВыполненияВФоне = ПолучитьИзВременногоХранилища(ФоновоеЗаданиеАдресХранилища);
@@ -576,7 +576,7 @@
<value>Для загрузки данных необходимо, сохранить бланк в файл для заполнения в другой программе.
Затем загрузить заполненную таблицу в одном из форматов:
• Книги Microsoft Excel 97 (.xls) и Excel 2007 (.xlsx)
• Электронные таблицы LibreOffice Сalс (.ods)
• Электронные таблицы LibreOffice Calc (.ods)
• Текст с разделителями (.csv)
• Табличный документ (.mxl)</value>
</title>
@@ -6718,7 +6718,7 @@
<title>
<key>ru</key>
<value>Записать корневой сертификат в файл для ручной установки на компьютер.
Требуется в случаях случайного удаления корневого сертфификата.</value>
Требуется в случаях случайного удаления корневого сертификата.</value>
</title>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
@@ -6809,7 +6809,7 @@
<id>426</id>
<title>
<key>ru</key>
<value>Напечатать cоглашение</value>
<value>Напечатать соглашение</value>
</title>
<type>Label</type>
<autoMaxWidth>true</autoMaxWidth>
@@ -669,71 +669,7 @@
Процедура ПослеОткрытияФайлаЗагрузки(Отказ = Ложь, ИнициализироватьТаблицыПравил = Истина)
Если КомпонентыОбмена.ФлагОшибки Тогда
ОбменДаннымиXDTOСервер.ЗавершитьВедениеПротоколаОбмена(КомпонентыОбмена);
Если КомпонентыОбмена.Свойство("ФайлОбмена") Тогда
КомпонентыОбмена.ФайлОбмена.Закрыть();
КонецЕсли;
Отказ = Истина;
Возврат;
КонецЕсли;
Если КомпонентыОбмена.ЭтоОбменЧерезПланОбмена Тогда
Если КомпонентыОбмена.ОбменДаннымиСВнешнейСистемой Тогда
КодУзлаКорреспондента = СокрЛП(ОбщегоНазначения.ЗначениеРеквизитаОбъекта(КомпонентыОбмена.УзелКорреспондента, "Код"));
Если ЗначениеЗаполнено(КомпонентыОбмена.ИдентификаторКорреспондента)
И Не КодУзлаКорреспондента = КомпонентыОбмена.ИдентификаторКорреспондента Тогда
УзелКорреспондентаОбъект = КомпонентыОбмена.УзелКорреспондента.ПолучитьОбъект();
УзелКорреспондентаОбъект.Код = КомпонентыОбмена.ИдентификаторКорреспондента;
УзелКорреспондентаОбъект.ОбменДанными.Загрузка = Истина;
УзелКорреспондентаОбъект.Записать();
ОбменДаннымиXDTOСервер.ЗаписатьВПротоколВыполнения(КомпонентыОбмена,
НСтр("ru = 'Изменен идентификатор узла корреспондента.'"), , Ложь, , , Истина);
КонецЕсли;
КонецЕсли;
ОбменДаннымиXDTOСервер.ОбновитьНастройкиXDTOКорреспондента(КомпонентыОбмена);
ОбменДаннымиXDTOСервер.ОбновитьПрефиксКорреспондента(КомпонентыОбмена);
Если Не КомпонентыОбмена.ТолькоНастройкиXDTO
И ИнициализироватьТаблицыПравил Тогда
ОбменДаннымиXDTOСервер.ИнициализироватьТаблицыПравилОбмена(КомпонентыОбмена);
ОбменДаннымиXDTOСервер.ЗаполнитьСтруктуруНастроекXDTO(КомпонентыОбмена);
ОбменДаннымиXDTOСервер.ЗаполнитьПоддерживаемыеОбъектыXDTO(КомпонентыОбмена);
КонецЕсли;
КонецЕсли;
Если КомпонентыОбмена.ТолькоНастройкиXDTO Тогда
Если КомпонентыОбмена.Свойство("ФайлОбмена") Тогда
КомпонентыОбмена.ФайлОбмена.Закрыть();
КонецЕсли;
Отказ = Истина;
Возврат;
КонецЕсли;
Если КомпонентыОбмена.ЭтоОбменЧерезПланОбмена Тогда
ИмяПланаОбмена = ОбменДаннымиПовтИсп.ПолучитьИмяПланаОбмена(КомпонентыОбмена.УзелКорреспондента);
Если ОбменДаннымиСервер.ЕстьАлгоритмМенеджераПланаОбмена("ОбработчикПроверкиЗначенийПоУмолчанию", ИмяПланаОбмена) Тогда
СообщениеОбОшибке = "";
ПараметрыОбработчика = Новый Структура;
ПараметрыОбработчика.Вставить("Корреспондент", КомпонентыОбмена.УзелКорреспондента);
ПараметрыОбработчика.Вставить("ПоддерживаемыеОбъектыXDTO", КомпонентыОбмена.ПоддерживаемыеОбъектыXDTO);
ПланыОбмена[ИмяПланаОбмена].ОбработчикПроверкиЗначенийПоУмолчанию(Отказ, ПараметрыОбработчика, СообщениеОбОшибке);
Если Отказ Тогда
ОбменДаннымиXDTOСервер.ЗаписатьВПротоколВыполнения(КомпонентыОбмена, СообщениеОбОшибке);
ОбменДаннымиXDTOСервер.ЗавершитьВедениеПротоколаОбмена(КомпонентыОбмена);
Возврат;
КонецЕсли;
КонецЕсли;
КонецЕсли;
ОбменДаннымиXDTOСервер.ПослеОткрытияФайлаЗагрузки(КомпонентыОбмена, Отказ, ИнициализироватьТаблицыПравил);
КонецПроцедуры
@@ -24,6 +24,9 @@
Минимальная = Параметры.МинимальнаяВерсияПлатформы;
Рекомендуемая = Параметры.РекомендуемаяВерсияПлатформы;
Элементы.ТекстСообщения.Заголовок = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
Элементы.ТекстСообщения.Заголовок, Минимальная);
ПродолжениеРаботыНевозможно = Ложь;
Если ОбщегоНазначенияКлиентСервер.СравнитьВерсии(Текущая, Минимальная) < 0 Тогда
ТекстУсловие = НСтр("ru = 'необходимо'");
@@ -1632,7 +1632,7 @@
КонецФункции
&НаСервереБезКонтекста
Функция СостояниеДлительнойОперации(Знач ИдентификаторОперации, УзелОбмена, ПолучитьПарольИзСеансовыхДанных)
Функция СостояниеДлительнойОперации(Знач ИдентификаторОперации, УзелОбмена, ПолучитьПарольИзСеансовыхДанных, СтрокаСообщенияОбОшибке = "")
Попытка
@@ -1704,7 +1704,7 @@
Если ОбменЧерезВебСервис Тогда
ПолучитьПарольИзСеансовыхДанных = (Не ПропускатьСтраницуТранспорта И Не WSЗапомнитьПароль);
СостояниеОперации = СостояниеДлительнойОперации(ИдентификаторОперации, Объект.УзелИнформационнойБазы, ПолучитьПарольИзСеансовыхДанных);
СостояниеОперации = СостояниеДлительнойОперации(ИдентификаторОперации, Объект.УзелИнформационнойБазы, ПолучитьПарольИзСеансовыхДанных, СообщениеОбОшибке);
Иначе
// Обмен по COM соединению.
СостояниеОперации = ОбменДаннымиВызовСервера.СостояниеЗадания(ИдентификаторЗадания);
@@ -1943,12 +1943,26 @@
КонецПроцедуры
&НаКлиенте
Процедура ОбработатьСтатусВыполненияФоновогоЗадания()
Процедура ОбработатьСтатусВыполненияФоновогоЗадания(ВыполняемоеДействие = Неопределено)
ЗафиксироватьЗавершение = Ложь;
Если РезультатВыполненияФоновогоЗадания.Статус = "Ошибка" Тогда
СообщениеОбОшибке = РезультатВыполненияФоновогоЗадания.ПодробноеПредставлениеОшибки;
ЗафиксироватьЗавершение = Истина;
ИначеЕсли РезультатВыполненияФоновогоЗадания.Статус = "Отменено" Тогда
СообщениеОбОшибке = НСтр("ru = 'Действие отменено пользователем.'");
ЗафиксироватьЗавершение = Истина;
КонецЕсли;
Если ЗначениеЗаполнено(ВыполняемоеДействие)
И ЗафиксироватьЗавершение Тогда
ОбменДаннымиВызовСервера.ЗафиксироватьЗавершениеОбменаСОшибкой(
Объект.УзелИнформационнойБазы,
ВыполняемоеДействие,
ДатаНачалаОперации,
СообщениеОбОшибке);
КонецЕсли;
КонецПроцедуры
#КонецОбласти
@@ -2140,7 +2154,7 @@
&НаКлиенте
Процедура ЗавершениеПолученияДанныхВоВременныйКаталог()
ОбработатьСтатусВыполненияФоновогоЗадания();
ОбработатьСтатусВыполненияФоновогоЗадания("ЗагрузкаДанных");
Если ЗначениеЗаполнено(СообщениеОбОшибке) Тогда
ПропуститьПолучениеДанных = Истина;
@@ -2201,7 +2215,7 @@
&НаКлиенте
Процедура ЗавершениеПолученияФайлаСДаннымиОтКорреспондентаВоВременныйКаталог()
ОбработатьСтатусВыполненияФоновогоЗадания();
ОбработатьСтатусВыполненияФоновогоЗадания("ЗагрузкаДанных");
Если ЗначениеЗаполнено(СообщениеОбОшибке) Тогда
ПропуститьПолучениеДанных = Истина;
@@ -2307,11 +2321,6 @@
Если Не ПропуститьПолучениеДанных И ЗначениеЗаполнено(СообщениеОбОшибке) Тогда
ПропуститьПолучениеДанных = Истина;
ОбменДаннымиВызовСервера.ЗафиксироватьЗавершениеОбменаСОшибкой(
Объект.УзелИнформационнойБазы,
"ЗагрузкаДанных",
ДатаНачалаОперации,
СообщениеОбОшибке);
Иначе
ЗавершениеАнализаДанныхНаСервере();
КонецЕсли;
@@ -2718,10 +2727,17 @@
&НаКлиенте
Функция Подключаемый_СтраницаОжиданияВыгрузкиДанныхДлительнаяОперацияОкончание_ОбработкаДлительнойОперации(Отказ, ПерейтиДалее)
Если ДлительнаяОперацияЗавершена
И Не ДлительнаяОперацияЗавершенаСОшибкой Тогда
ОбменДаннымиВызовСервера.ЗафиксироватьВыполнениеВыгрузкиДанныхВРежимеДлительнойОперации(
Объект.УзелИнформационнойБазы, ДатаНачалаОперации);
Если ДлительнаяОперацияЗавершена Тогда
Если ДлительнаяОперацияЗавершенаСОшибкой Тогда
ОбменДаннымиВызовСервера.ЗафиксироватьЗавершениеОбменаСОшибкой(
Объект.УзелИнформационнойБазы,
"ВыгрузкаДанных",
ДатаНачалаОперации,
СообщениеОбОшибке);
Иначе
ОбменДаннымиВызовСервера.ЗафиксироватьВыполнениеВыгрузкиДанныхВРежимеДлительнойОперации(
Объект.УзелИнформационнойБазы, ДатаНачалаОперации);
КонецЕсли;
КонецЕсли;
Возврат Неопределено;
@@ -3308,7 +3308,7 @@
</userVisible>
<title>
<key>ru</key>
<value>Cинхронизация данных через каталог на FTP-сервере</value>
<value>Синхронизация данных через каталог на FTP-сервере</value>
</title>
<extendedTooltip>
<name>ГруппаСинхронизацияЧерезFTPРасширеннаяПодсказка</name>
@@ -3605,7 +3605,7 @@
</userVisible>
<title>
<key>ru</key>
<value>Cинхронизация данных через электронную почту</value>
<value>Синхронизация данных через электронную почту</value>
</title>
<extendedTooltip>
<name>ГруппаСинхронизацияЧерезEMAILРасширеннаяПодсказка</name>
@@ -7273,7 +7273,7 @@
<id>5</id>
<toolTip>
<key>ru</key>
<value>Cправка</value>
<value>Справка</value>
</toolTip>
<use>
<common>true</common>
@@ -1986,17 +1986,7 @@
ДобавитьЗаписьXML(ЗаписьXML, НастройкиПодключения.НаименованиеЭтойБазы, "НаименованиеВторойБазы");
ДобавитьЗаписьXML(ЗаписьXML, НастройкиПодключения.НаименованиеВторойБазы, "НаименованиеЭтойБазы");
Если НастройкиПодключения.ИспользоватьПрефиксыДляНастройкиОбмена
Или НастройкиПодключения.ИспользоватьПрефиксыДляНастройкиОбменаКорреспондента Тогда
ДобавитьЗаписьXML(ЗаписьXML, НастройкиПодключения.ПрефиксИнформационнойБазыИсточника, "КодНовогоУзлаВторойБазы");
Иначе
ДобавитьЗаписьXML(ЗаписьXML, НастройкиПодключения.ИдентификаторИнформационнойБазыИсточника, "КодНовогоУзлаВторойБазы");
КонецЕсли;
ДобавитьЗаписьXML(ЗаписьXML, КодУзла(НастройкиПодключения), "КодНовогоУзлаВторойБазы");
ДобавитьЗаписьXML(ЗаписьXML, НастройкиПодключения.ПрефиксИнформационнойБазыПриемника, "ПрефиксИнформационнойБазыИсточника");
// Настройки транспорта сообщений обмена.
@@ -2064,12 +2054,7 @@
// Поддержка файла настроек обмена формата версии 1.0.
ДобавитьЗаписьXML(ЗаписьXML, НастройкиПодключения.НаименованиеЭтойБазы, "НаименованиеНастройкиВыполненияОбмена");
Если НастройкиПодключения.ИспользоватьПрефиксыДляНастройкиОбмена
Или НастройкиПодключения.ИспользоватьПрефиксыДляНастройкиОбменаКорреспондента Тогда
ДобавитьЗаписьXML(ЗаписьXML, НастройкиПодключения.ПрефиксИнформационнойБазыИсточника, "КодНовогоУзла");
Иначе
ДобавитьЗаписьXML(ЗаписьXML, НастройкиПодключения.ИдентификаторИнформационнойБазыИсточника, "КодНовогоУзла");
КонецЕсли;
ДобавитьЗаписьXML(ЗаписьXML, КодУзла(НастройкиПодключения), "КодНовогоУзла");
КодУзлаИБ = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(НастройкиПодключения.УзелИнформационнойБазы, "Код");
@@ -1876,7 +1876,7 @@
<titleLocation>None</titleLocation>
<toolTip>
<key>ru</key>
<value>Cервис выбора и проверки адресных сведений недоступен</value>
<value>Сервис выбора и проверки адресных сведений недоступен</value>
</toolTip>
<extendedTooltip>
<name>ТекстСообщенияСервисаРасширеннаяПодсказка</name>
@@ -8334,7 +8334,7 @@
<name>Рассмотрено</name>
<title>
<key>ru</key>
<value>Раcсмотрено</value>
<value>Рассмотрено</value>
</title>
<id>4</id>
<toolTip>
@@ -2463,7 +2463,7 @@
<id>143</id>
<title>
<key>ru</key>
<value>Пометить на удаление / Cнять пометку</value>
<value>Пометить на удаление / Снять пометку</value>
</title>
<visible>true</visible>
<enabled>true</enabled>
@@ -5,7 +5,7 @@
<dataSourceType>Local</dataSourceType>
</dataSource>
<dataSet xsi:type="DataSetQuery">
<name>ИерархияВзаимодейстий</name>
<name>ИерархияВзаимодействий</name>
<field xsi:type="DataSetFieldField">
<dataPath>ВзаимодействиеОснование</dataPath>
<field>ВзаимодействиеОснование</field>
@@ -189,8 +189,8 @@
(Взаимодействия.Дата МЕЖДУ &amp;НачалоПериода И &amp;КонецПериода)}</query>
</dataSet>
<dataSetLink>
<sourceDataSet>ИерархияВзаимодейстий</sourceDataSet>
<destinationDataSet>ИерархияВзаимодейстий</destinationDataSet>
<sourceDataSet>ИерархияВзаимодействий</sourceDataSet>
<destinationDataSet>ИерархияВзаимодействий</destinationDataSet>
<sourceExpression>Ссылка</sourceExpression>
<destinationExpression>ВзаимодействиеОснование</destinationExpression>
<startExpression>Неопределено</startExpression>
@@ -421,6 +421,19 @@
ВидТранспорта = РегистрыСведений.НастройкиТранспортаОбменаДанными.ВидТранспортаСообщенийОбменаПоУмолчанию(УзелИнформационнойБазы);
ИмяПараметра = "СтандартныеПодсистемы.ОбменДанными.ПравилаРегистрации."
+ ОбменДаннымиПовтИсп.ПолучитьИмяПланаОбмена(УзелИнформационнойБазы);
ПравилаРегистрацииОбновлены = СтандартныеПодсистемыСервер.ПараметрРаботыПрограммы(ИмяПараметра);
Если ПравилаРегистрацииОбновлены = Неопределено Тогда
ОбменДаннымиСервер.ВыполнитьОбновлениеПравилДляОбменаДанными();
КонецЕсли;
ПравилаРегистрацииОбновлены = СтандартныеПодсистемыСервер.ПараметрРаботыПрограммы(ИмяПараметра);
Если ПравилаРегистрацииОбновлены = Неопределено Тогда
ВызватьИсключение СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
НСтр("ru = 'Не выполнено обновление кэша правил регистрации данных для плана обмена ""%1""'"),
ОбменДаннымиПовтИсп.ПолучитьИмяПланаОбмена(УзелИнформационнойБазы));
КонецЕсли;
ДатаНачалаОперации = ТекущаяДатаСеанса();
ПараметрыАутентификации = ?(ЭтоАвтономноеРабочееМесто, Новый Структура("ИспользоватьТекущегоПользователя, Пароль", Истина, Пароль), Неопределено);
@@ -333,7 +333,7 @@
УстановитьПривилегированныйРежим(Истина);
ПараметрыСоединения.Вставить("COMПарольПользователя",
ОбщегоНазначения.ПрочитатьДанныеИзБезопасногоХранилища(Запись.Корреспондент, "COMПарольПользователя", Истина));
ОбщегоНазначения.ПрочитатьДанныеИзБезопасногоХранилища(Запись.Корреспондент, "COMПарольПользователя"));
УстановитьПривилегированныйРежим(Ложь);
Иначе
@@ -360,7 +360,7 @@
Если Не WSПарольИзменен Тогда
УстановитьПривилегированныйРежим(Истина);
ПараметрыПодключения.WSПароль = ОбщегоНазначения.ПрочитатьДанныеИзБезопасногоХранилища(Запись.Корреспондент, "WSПароль", Истина);
ПараметрыПодключения.WSПароль = ОбщегоНазначения.ПрочитатьДанныеИзБезопасногоХранилища(Запись.Корреспондент, "WSПароль");
УстановитьПривилегированныйРежим(Ложь);
Иначе
@@ -169,19 +169,19 @@
////////////////////////////////////////////////////////////////////////////////
ВЫБРАТЬ
АналитикаОдниНоборПредопределенныхОтветов.Анкета КАК Анкета,
АналитикаОдниНоборПредопределенныхОтветов.Вопрос КАК Вопрос,
АналитикаОдниНоборПредопределенныхОтветов.Аналитика1 КАК Аналитика1,
АналитикаОдинНаборПредопределенныхОтветов.Анкета КАК Анкета,
АналитикаОдинНаборПредопределенныхОтветов.Вопрос КАК Вопрос,
АналитикаОдинНаборПредопределенныхОтветов.Аналитика1 КАК Аналитика1,
ОтветыОдинНаборПредопределенныхОтветов.Ответ,
ОтветыОдинНаборПредопределенныхОтветов.ЭлементарныйВопросДанныеРегистра,
ОтветыОдинНаборПредопределенныхОтветов.Аналитика2
ПОМЕСТИТЬ ОдинНаборОтветов
ИЗ
АналитикаОдниНаборПредопределенныхОтветов КАК АналитикаОдниНоборПредопределенныхОтветов
АналитикаОдниНаборПредопределенныхОтветов КАК АналитикаОдинНаборПредопределенныхОтветов
ВНУТРЕННЕЕ СОЕДИНЕНИЕ ОтветыОдинНаборПредопределенныхОтветов КАК ОтветыОдинНаборПредопределенныхОтветов
ПО АналитикаОдниНоборПредопределенныхОтветов.Анкета = ОтветыОдинНаборПредопределенныхОтветов.Анкета
И АналитикаОдниНоборПредопределенныхОтветов.Вопрос = ОтветыОдинНаборПредопределенныхОтветов.Вопрос
И АналитикаОдниНоборПредопределенныхОтветов.НомерЯчейки = ОтветыОдинНаборПредопределенныхОтветов.НомерЯчейки
ПО АналитикаОдинНаборПредопределенныхОтветов.Анкета = ОтветыОдинНаборПредопределенныхОтветов.Анкета
И АналитикаОдинНаборПредопределенныхОтветов.Вопрос = ОтветыОдинНаборПредопределенныхОтветов.Вопрос
И АналитикаОдинНаборПредопределенныхОтветов.НомерЯчейки = ОтветыОдинНаборПредопределенныхОтветов.НомерЯчейки
;
////////////////////////////////////////////////////////////////////////////////
@@ -3365,93 +3365,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.ПрефиксОбластиДанных</name>
<right>
@@ -6297,6 +6210,93 @@
<value>true</value>
</right>
</object>
<object>
<name>Configuration.БиблиотекаСтандартныхПодсистем</name>
<right>
<name>Administration</name>
<value>true</value>
</right>
<right>
<name>DataAdministration</name>
<value>true</value>
</right>
<right>
<name>UpdateDataBaseConfiguration</name>
<value>true</value>
</right>
<right>
<name>ExclusiveMode</name>
<value>true</value>
</right>
<right>
<name>ActiveUsers</name>
<value>true</value>
</right>
<right>
<name>EventLog</name>
<value>true</value>
</right>
<right>
<name>ThinClient</name>
<value>true</value>
</right>
<right>
<name>WebClient</name>
<value>true</value>
</right>
<right>
<name>ThickClient</name>
<value>true</value>
</right>
<right>
<name>ExternalConnection</name>
<value>true</value>
</right>
<right>
<name>Automation</name>
<value>true</value>
</right>
<right>
<name>TechnicalSpecialistMode</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeNormal</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeWorkplace</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeEmbeddedWorkplace</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeFullscreenWorkplace</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeKiosk</name>
<value>true</value>
</right>
<right>
<name>AnalyticsSystemClient</name>
<value>true</value>
</right>
<right>
<name>SaveUserData</name>
<value>true</value>
</right>
<right>
<name>ConfigurationExtensionsAdministration</name>
<value>true</value>
</right>
<right>
<name>Output</name>
<value>true</value>
</right>
</object>
<object>
<name>InformationRegister.БезопасноеХранилищеДанных</name>
<right>
@@ -28,37 +28,6 @@
<value>true</value>
</right>
</object>
<object>
<name>Configuration.БиблиотекаСтандартныхПодсистем</name>
<right>
<name>MainWindowModeNormal</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeWorkplace</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeEmbeddedWorkplace</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeFullscreenWorkplace</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeKiosk</name>
<value>true</value>
</right>
<right>
<name>AnalyticsSystemClient</name>
<value>true</value>
</right>
<right>
<name>Output</name>
<value>true</value>
</right>
</object>
<object>
<name>Catalog.РассылкиОтчетов</name>
<right>
@@ -107,6 +76,37 @@
<value>true</value>
</right>
</object>
<object>
<name>Configuration.БиблиотекаСтандартныхПодсистем</name>
<right>
<name>MainWindowModeNormal</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeWorkplace</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeEmbeddedWorkplace</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeFullscreenWorkplace</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeKiosk</name>
<value>true</value>
</right>
<right>
<name>AnalyticsSystemClient</name>
<value>true</value>
</right>
<right>
<name>Output</name>
<value>true</value>
</right>
</object>
<restrictionTemplate>
<name>ДляОбъекта(ПолеОбъекта)</name>
<condition>// ДляОбъекта(ПолеОбъекта = "")
@@ -4481,45 +4481,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>Catalog.ЗакладкиВзаимодействий</name>
<right>
@@ -8065,6 +8026,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>InformationRegister.БезопасноеХранилищеДанных</name>
<right>
@@ -3,6 +3,24 @@
<setForNewObjects>false</setForNewObjects>
<setForAttributesByDefault>true</setForAttributesByDefault>
<independentRightsOfChildObjects>false</independentRightsOfChildObjects>
<object>
<name>DataProcessor.ЖурналРегистрации.Command.ЖурналРегистрации</name>
<right>
<name>View</name>
<value>true</value>
</right>
</object>
<object>
<name>DataProcessor.ЖурналРегистрации</name>
<right>
<name>Use</name>
<value>true</value>
</right>
<right>
<name>View</name>
<value>true</value>
</right>
</object>
<object>
<name>Configuration.БиблиотекаСтандартныхПодсистем</name>
<right>
@@ -34,22 +52,4 @@
<value>true</value>
</right>
</object>
<object>
<name>DataProcessor.ЖурналРегистрации.Command.ЖурналРегистрации</name>
<right>
<name>View</name>
<value>true</value>
</right>
</object>
<object>
<name>DataProcessor.ЖурналРегистрации</name>
<right>
<name>Use</name>
<value>true</value>
</right>
<right>
<name>View</name>
<value>true</value>
</right>
</object>
</Rights>
@@ -5,7 +5,7 @@
<key>ru</key>
<value>Дата обновления повторно используемых значений МРО</value>
</synonym>
<comment>Дата на которую повторно-используемые значения механизма регистрации объектов были cчитаны в текущем сеансе</comment>
<comment>Дата на которую повторно-используемые значения механизма регистрации объектов были считаны в текущем сеансе</comment>
<type>
<types>Date</types>
<dateQualifiers/>