3_1_9_179
This commit is contained in:
1 parent
fffad70fe9
commit
7608f6cefa
212 files changed
+8091
-3464
No files matched your search
@@ -385,7 +385,7 @@
|
|||||||
<representationInContextMenu>Auto</representationInContextMenu>
|
<representationInContextMenu>Auto</representationInContextMenu>
|
||||||
</items>
|
</items>
|
||||||
<items xsi:type="form:FormGroup">
|
<items xsi:type="form:FormGroup">
|
||||||
<name>СписокГруппа1</name>
|
<name>СписокГруппаПоиск</name>
|
||||||
<id>188</id>
|
<id>188</id>
|
||||||
<items xsi:type="form:Button">
|
<items xsi:type="form:Button">
|
||||||
<name>СписокНайти</name>
|
<name>СписокНайти</name>
|
||||||
@@ -475,10 +475,10 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Группа 1</value>
|
<value>Поиск</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>СписокГруппа1РасширеннаяПодсказка</name>
|
<name>СписокГруппаПоискРасширеннаяПодсказка</name>
|
||||||
<id>189</id>
|
<id>189</id>
|
||||||
<type>Label</type>
|
<type>Label</type>
|
||||||
<autoMaxWidth>true</autoMaxWidth>
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
@@ -1887,11 +1887,6 @@
|
|||||||
<value>Справка</value>
|
<value>Справка</value>
|
||||||
</value>
|
</value>
|
||||||
</mobileDeviceCommandBarContent>
|
</mobileDeviceCommandBarContent>
|
||||||
<mobileDeviceCommandBarContent>
|
|
||||||
<value xsi:type="core:StringValue">
|
|
||||||
<value>СписокГруппа1</value>
|
|
||||||
</value>
|
|
||||||
</mobileDeviceCommandBarContent>
|
|
||||||
<mobileDeviceCommandBarContent>
|
<mobileDeviceCommandBarContent>
|
||||||
<value xsi:type="core:StringValue">
|
<value xsi:type="core:StringValue">
|
||||||
<value>КомандыСписка</value>
|
<value>КомандыСписка</value>
|
||||||
|
|||||||
@@ -87,27 +87,11 @@
|
|||||||
Иначе
|
Иначе
|
||||||
// Установка идентификатора.
|
// Установка идентификатора.
|
||||||
ИдентификаторДляФормул = Справочники.ВидыКонтактнойИнформации.УникальныйИдентификаторДляФормул(
|
ИдентификаторДляФормул = Справочники.ВидыКонтактнойИнформации.УникальныйИдентификаторДляФормул(
|
||||||
НаименованиеДляФормированияИдентификатора(), Ссылка, Родитель);
|
УправлениеКонтактнойИнформацией.НаименованиеДляФормированияИдентификатора(ЭтотОбъект), Ссылка, Родитель);
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
Функция НаименованиеДляФормированияИдентификатора()
|
|
||||||
|
|
||||||
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.Мультиязычность") Тогда
|
|
||||||
МодульМультиязычностьСервер = ОбщегоНазначения.ОбщийМодуль("МультиязычностьСервер");
|
|
||||||
СуффиксТекущегоЯзыка = МодульМультиязычностьСервер.СуффиксТекущегоЯзыка();
|
|
||||||
ЗаголовокДляИдентификатора = ?(ЗначениеЗаполнено(СуффиксТекущегоЯзыка),
|
|
||||||
ЭтотОбъект["Наименование"+ СуффиксТекущегоЯзыка],
|
|
||||||
Наименование);
|
|
||||||
Иначе
|
|
||||||
ЗаголовокДляИдентификатора = Наименование;
|
|
||||||
КонецЕсли;
|
|
||||||
|
|
||||||
Возврат ЗаголовокДляИдентификатора;
|
|
||||||
|
|
||||||
КонецФункции
|
|
||||||
|
|
||||||
Процедура ПриЧтенииПредставленийНаСервере() Экспорт
|
Процедура ПриЧтенииПредставленийНаСервере() Экспорт
|
||||||
|
|
||||||
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.Мультиязычность") Тогда
|
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.Мультиязычность") Тогда
|
||||||
|
|||||||
@@ -329,7 +329,7 @@
|
|||||||
<name>ГруппаДействие</name>
|
<name>ГруппаДействие</name>
|
||||||
<id>65</id>
|
<id>65</id>
|
||||||
<items xsi:type="form:Button">
|
<items xsi:type="form:Button">
|
||||||
<name>ОбновитьСПортала1СИТС</name>
|
<name>ОбновитьССайта</name>
|
||||||
<id>67</id>
|
<id>67</id>
|
||||||
<visible>true</visible>
|
<visible>true</visible>
|
||||||
<enabled>true</enabled>
|
<enabled>true</enabled>
|
||||||
@@ -337,7 +337,7 @@
|
|||||||
<common>true</common>
|
<common>true</common>
|
||||||
</userVisible>
|
</userVisible>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ОбновитьСПортала1СИТСРасширеннаяПодсказка</name>
|
<name>ОбновитьССайтаРасширеннаяПодсказка</name>
|
||||||
<id>68</id>
|
<id>68</id>
|
||||||
<type>Label</type>
|
<type>Label</type>
|
||||||
<autoMaxWidth>true</autoMaxWidth>
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
@@ -346,7 +346,7 @@
|
|||||||
<horizontalAlign>Left</horizontalAlign>
|
<horizontalAlign>Left</horizontalAlign>
|
||||||
</extInfo>
|
</extInfo>
|
||||||
</extendedTooltip>
|
</extendedTooltip>
|
||||||
<commandName>Form.Command.ОбновитьСПортала1СИТС</commandName>
|
<commandName>Form.Command.ОбновитьССайта</commandName>
|
||||||
<buttonImportance>Normal</buttonImportance>
|
<buttonImportance>Normal</buttonImportance>
|
||||||
<representation>Auto</representation>
|
<representation>Auto</representation>
|
||||||
<autoMaxWidth>true</autoMaxWidth>
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
@@ -546,7 +546,7 @@
|
|||||||
</extInfo>
|
</extInfo>
|
||||||
</items>
|
</items>
|
||||||
<items xsi:type="form:FormField">
|
<items xsi:type="form:FormField">
|
||||||
<name>ОбновлятьСПортала1СИТС</name>
|
<name>ОбновлятьССайта</name>
|
||||||
<id>28</id>
|
<id>28</id>
|
||||||
<visible>true</visible>
|
<visible>true</visible>
|
||||||
<enabled>true</enabled>
|
<enabled>true</enabled>
|
||||||
@@ -558,7 +558,7 @@
|
|||||||
</dataPath>
|
</dataPath>
|
||||||
<titleLocation>None</titleLocation>
|
<titleLocation>None</titleLocation>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ОбновлятьСПортала1СИТСРасширеннаяПодсказка</name>
|
<name>ОбновлятьССайтаРасширеннаяПодсказка</name>
|
||||||
<id>30</id>
|
<id>30</id>
|
||||||
<type>Label</type>
|
<type>Label</type>
|
||||||
<autoMaxWidth>true</autoMaxWidth>
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
@@ -568,7 +568,7 @@
|
|||||||
</extInfo>
|
</extInfo>
|
||||||
</extendedTooltip>
|
</extendedTooltip>
|
||||||
<contextMenu>
|
<contextMenu>
|
||||||
<name>ОбновлятьСПортала1СИТСКонтекстноеМеню</name>
|
<name>ОбновлятьССайтаКонтекстноеМеню</name>
|
||||||
<id>29</id>
|
<id>29</id>
|
||||||
<autoFill>true</autoFill>
|
<autoFill>true</autoFill>
|
||||||
</contextMenu>
|
</contextMenu>
|
||||||
@@ -1091,7 +1091,7 @@
|
|||||||
<selectedRowsUse>Auto</selectedRowsUse>
|
<selectedRowsUse>Auto</selectedRowsUse>
|
||||||
</formCommands>
|
</formCommands>
|
||||||
<formCommands>
|
<formCommands>
|
||||||
<name>ОбновитьСПортала1СИТС</name>
|
<name>ОбновитьССайта</name>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Обновить</value>
|
<value>Обновить</value>
|
||||||
|
|||||||
@@ -17,7 +17,7 @@
|
|||||||
Элементы.ГрупповоеДобавление.Видимость = Ложь;
|
Элементы.ГрупповоеДобавление.Видимость = Ложь;
|
||||||
Элементы.ФормаОбновитьИзФайла.Видимость = Ложь;
|
Элементы.ФормаОбновитьИзФайла.Видимость = Ложь;
|
||||||
Элементы.ФормаСохранитьКак.Видимость = Ложь;
|
Элементы.ФормаСохранитьКак.Видимость = Ложь;
|
||||||
Элементы.ОбновитьСПортала1СИТС.Видимость = Ложь;
|
Элементы.ОбновитьССайта.Видимость = Ложь;
|
||||||
Элементы.СписокКонтекстноеМенюОбновитьИзФайла.Видимость = Ложь;
|
Элементы.СписокКонтекстноеМенюОбновитьИзФайла.Видимость = Ложь;
|
||||||
Элементы.СписокКонтекстноеМенюСохранитьКак.Видимость = Ложь;
|
Элементы.СписокКонтекстноеМенюСохранитьКак.Видимость = Ложь;
|
||||||
Иначе
|
Иначе
|
||||||
@@ -26,8 +26,8 @@
|
|||||||
|
|
||||||
Если Не ВнешниеКомпонентыСлужебный.ДоступнаЗагрузкаСПортала() Тогда
|
Если Не ВнешниеКомпонентыСлужебный.ДоступнаЗагрузкаСПортала() Тогда
|
||||||
Элементы.ДобавитьИзСервиса.Видимость = Ложь;
|
Элементы.ДобавитьИзСервиса.Видимость = Ложь;
|
||||||
Элементы.ОбновлятьСПортала1СИТС.Видимость = Ложь;
|
Элементы.ОбновлятьССайта.Видимость = Ложь;
|
||||||
Элементы.ОбновитьСПортала1СИТС.Видимость = Ложь;
|
Элементы.ОбновитьССайта.Видимость = Ложь;
|
||||||
Иначе
|
Иначе
|
||||||
Элементы.ДобавитьИзСервиса.Видимость = ВнешниеКомпонентыСлужебный.ДоступнаИнтерактивнаяЗагрузкаСПортала();
|
Элементы.ДобавитьИзСервиса.Видимость = ВнешниеКомпонентыСлужебный.ДоступнаИнтерактивнаяЗагрузкаСПортала();
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|||||||
@@ -109,31 +109,99 @@
|
|||||||
//
|
//
|
||||||
Процедура ЗарегистрироватьДанныеКОбработкеДляПереходаНаНовуюВерсию(Параметры) Экспорт
|
Процедура ЗарегистрироватьДанныеКОбработкеДляПереходаНаНовуюВерсию(Параметры) Экспорт
|
||||||
|
|
||||||
ТекстЗапроса ="ВЫБРАТЬ
|
Если ОбщегоНазначенияКлиентСервер.СравнитьВерсии(Параметры.ВерсияПодсистемыНаНачалоОбновления, "3.1.6.48") < 0 Тогда
|
||||||
| ВнешниеКомпоненты.Ссылка
|
|
||||||
|ИЗ
|
|
||||||
| Справочник.ВнешниеКомпоненты КАК ВнешниеКомпоненты";
|
|
||||||
|
|
||||||
Запрос = Новый Запрос(ТекстЗапроса);
|
ТекстЗапроса ="ВЫБРАТЬ
|
||||||
|
| ВнешниеКомпоненты.Ссылка
|
||||||
ОбновлениеИнформационнойБазы.ОтметитьКОбработке(Параметры, Запрос.Выполнить().Выгрузить().ВыгрузитьКолонку("Ссылка"));
|
|ИЗ
|
||||||
|
| Справочник.ВнешниеКомпоненты КАК ВнешниеКомпоненты";
|
||||||
|
|
||||||
|
Запрос = Новый Запрос(ТекстЗапроса);
|
||||||
|
|
||||||
|
ОбновлениеИнформационнойБазы.ОтметитьКОбработке(Параметры, Запрос.Выполнить().Выгрузить().ВыгрузитьКолонку("Ссылка"));
|
||||||
|
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
// Обработчик обновления на версию 3.1.6.48:
|
// Обработчик обновления:
|
||||||
// - заполняет реквизиты совместимости для браузеров MacOS в справочнике "Внешние компоненты".
|
// - на версию 3.1.6.48: Заполняет реквизиты совместимости для браузеров MacOS в справочнике "Внешние компоненты";
|
||||||
|
// - на версию 3.1.5.220: в справочник "Внешние компоненты" добавляет внешнюю компоненту ExtraCryptoAPI.
|
||||||
|
// - на версию 3.1.9.163: в справочник "Внешние компоненты" добавляет внешнюю компоненту сканирования.
|
||||||
//
|
//
|
||||||
Процедура ОбработатьДанныеДляПереходаНаНовуюВерсию(Параметры) Экспорт
|
Процедура ОбработатьДанныеДляПереходаНаНовуюВерсию(Параметры) Экспорт
|
||||||
|
|
||||||
Выборка = ОбновлениеИнформационнойБазы.ВыбратьСсылкиДляОбработки(Параметры.Очередь, "Справочник.ВнешниеКомпоненты");
|
Если ОбщегоНазначенияКлиентСервер.СравнитьВерсии(Параметры.ВерсияПодсистемыНаНачалоОбновления, "3.1.6.48") < 0 Тогда
|
||||||
Если Выборка.Количество() > 0 Тогда
|
|
||||||
ОбработатьВнешниеКомпоненты(Выборка);
|
Выборка = ОбновлениеИнформационнойБазы.ВыбратьСсылкиДляОбработки(Параметры.Очередь, "Справочник.ВнешниеКомпоненты");
|
||||||
КонецЕсли;
|
Если Выборка.Количество() > 0 Тогда
|
||||||
|
ОбработатьВнешниеКомпоненты(Выборка);
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
ОбработкаЗавершена = ОбновлениеИнформационнойБазы.ОбработкаДанныхЗавершена(Параметры.Очередь,
|
ОбработкаЗавершена = ОбновлениеИнформационнойБазы.ОбработкаДанныхЗавершена(Параметры.Очередь,
|
||||||
"Справочник.ВнешниеКомпоненты");
|
"Справочник.ВнешниеКомпоненты");
|
||||||
Параметры.ОбработкаЗавершена = ОбработкаЗавершена;
|
Параметры.ОбработкаЗавершена = ОбработкаЗавершена;
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
Если ОбщегоНазначенияКлиентСервер.СравнитьВерсии(Параметры.ВерсияПодсистемыНаНачалоОбновления, "3.1.5.220") < 0
|
||||||
|
И ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.ЭлектроннаяПодпись")
|
||||||
|
И Не ОбщегоНазначения.РазделениеВключено() Тогда
|
||||||
|
|
||||||
|
МодульЭлектроннаяПодписьСлужебныйКлиентСервер = ОбщегоНазначения.ОбщийМодуль("ЭлектроннаяПодписьСлужебныйКлиентСервер");
|
||||||
|
МодульЭлектроннаяПодписьСлужебный = ОбщегоНазначения.ОбщийМодуль("ЭлектроннаяПодписьСлужебный");
|
||||||
|
|
||||||
|
ОписаниеКомпоненты = МодульЭлектроннаяПодписьСлужебныйКлиентСервер.ОписаниеКомпоненты();
|
||||||
|
КомпонентаПоследнейВерсииИзМакета = СтандартныеПодсистемыСервер.КомпонентаПоследнейВерсии(
|
||||||
|
ОписаниеКомпоненты.ИмяОбъекта, ОписаниеКомпоненты.ПолноеИмяМакета);
|
||||||
|
|
||||||
|
МестоположениеМакетаРазделенное = СтрРазделить(КомпонентаПоследнейВерсииИзМакета.Местоположение, ".");
|
||||||
|
|
||||||
|
ДвоичныеДанные = МодульЭлектроннаяПодписьСлужебный.ПолучитьДанныеКомпоненты(
|
||||||
|
МестоположениеМакетаРазделенное.Получить(МестоположениеМакетаРазделенное.ВГраница()));
|
||||||
|
|
||||||
|
ПараметрыКомпоненты = ВнешниеКомпонентыСлужебный.ПараметрыЗагрузки();
|
||||||
|
ПараметрыКомпоненты.Идентификатор = ОписаниеКомпоненты.ИмяОбъекта;
|
||||||
|
ПараметрыКомпоненты.Наименование = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
|
||||||
|
НСтр("ru='%1 для 1С:Предприятие'", ОбщегоНазначения.КодОсновногоЯзыка()), "ExtraCryptoAPI");
|
||||||
|
ПараметрыКомпоненты.Версия = КомпонентаПоследнейВерсииИзМакета.Версия;
|
||||||
|
ПараметрыКомпоненты.ОписаниеОшибки = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
|
||||||
|
НСтр("ru = 'Добавлена автоматически %1.'", ОбщегоНазначения.КодОсновногоЯзыка()), ТекущаяДатаСеанса());
|
||||||
|
ПараметрыКомпоненты.ОбновлятьСПортала1СИТС = Истина;
|
||||||
|
ПараметрыКомпоненты.Данные = ДвоичныеДанные;
|
||||||
|
|
||||||
|
ВнешниеКомпонентыСлужебный.ЗагрузитьКомпонентуИзДвоичныхДанных(ПараметрыКомпоненты, Ложь);
|
||||||
|
|
||||||
|
Параметры.ОбработкаЗавершена = Истина;
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
Если ОбщегоНазначенияКлиентСервер.СравнитьВерсии(Параметры.ВерсияПодсистемыНаНачалоОбновления, "3.1.9.163") < 0
|
||||||
|
И ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.РаботаСФайлами")
|
||||||
|
И Не ОбщегоНазначения.РазделениеВключено() Тогда
|
||||||
|
|
||||||
|
МодульРаботаСФайламиСлужебныйКлиентСервер = ОбщегоНазначения.ОбщийМодуль("РаботаСФайламиСлужебныйКлиентСервер");
|
||||||
|
|
||||||
|
ОписаниеКомпоненты = МодульРаботаСФайламиСлужебныйКлиентСервер.ОписаниеКомпоненты();
|
||||||
|
КомпонентаПоследнейВерсииИзМакета = СтандартныеПодсистемыСервер.КомпонентаПоследнейВерсии(
|
||||||
|
ОписаниеКомпоненты.ИмяОбъекта, ОписаниеКомпоненты.ПолноеИмяМакета);
|
||||||
|
|
||||||
|
МестоположениеМакетаРазделенное = СтрРазделить(КомпонентаПоследнейВерсииИзМакета.Местоположение, ".");
|
||||||
|
ДвоичныеДанные = ПолучитьОбщийМакет(МестоположениеМакетаРазделенное.Получить(МестоположениеМакетаРазделенное.ВГраница()));
|
||||||
|
|
||||||
|
ПараметрыКомпоненты = ВнешниеКомпонентыСлужебный.ПараметрыЗагрузки();
|
||||||
|
ПараметрыКомпоненты.Идентификатор = ОписаниеКомпоненты.ИмяОбъекта;
|
||||||
|
ПараметрыКомпоненты.Наименование = НСтр("ru='Компонента для сканирования документов и изображений'");
|
||||||
|
ПараметрыКомпоненты.Версия = КомпонентаПоследнейВерсииИзМакета.Версия;
|
||||||
|
ПараметрыКомпоненты.ОписаниеОшибки = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
|
||||||
|
НСтр("ru = 'Добавлена автоматически %1.'"), ТекущаяДатаСеанса());
|
||||||
|
ПараметрыКомпоненты.ОбновлятьСПортала1СИТС = Истина;
|
||||||
|
ПараметрыКомпоненты.Данные = ДвоичныеДанные;
|
||||||
|
|
||||||
|
ВнешниеКомпонентыСлужебный.ЗагрузитьКомпонентуИзДвоичныхДанных(ПараметрыКомпоненты, Ложь);
|
||||||
|
|
||||||
|
Параметры.ОбработкаЗавершена = Истина;
|
||||||
|
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
// Параметры:
|
// Параметры:
|
||||||
|
|||||||
@@ -6,6 +6,8 @@
|
|||||||
// https://creativecommons.org/licenses/by/4.0/legalcode
|
// https://creativecommons.org/licenses/by/4.0/legalcode
|
||||||
///////////////////////////////////////////////////////////////////////////////////////////////////////
|
///////////////////////////////////////////////////////////////////////////////////////////////////////
|
||||||
|
|
||||||
|
#Область ОбработчикиСобытий
|
||||||
|
|
||||||
&НаКлиенте
|
&НаКлиенте
|
||||||
Процедура ОбработкаКоманды(ПараметрКоманды, ПараметрыВыполненияКоманды)
|
Процедура ОбработкаКоманды(ПараметрКоманды, ПараметрыВыполненияКоманды)
|
||||||
ПараметрыФормы = Новый Структура("Доверенность", ПараметрКоманды);
|
ПараметрыФормы = Новый Структура("Доверенность", ПараметрКоманды);
|
||||||
@@ -14,3 +16,5 @@
|
|||||||
ПараметрыВыполненияКоманды.Окно, ПараметрыВыполненияКоманды.НавигационнаяСсылка,,
|
ПараметрыВыполненияКоманды.Окно, ПараметрыВыполненияКоманды.НавигационнаяСсылка,,
|
||||||
РежимОткрытияОкнаФормы.БлокироватьОкноВладельца);
|
РежимОткрытияОкнаФормы.БлокироватьОкноВладельца);
|
||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
|
#КонецОбласти
|
||||||
+6
-6
@@ -20,10 +20,10 @@
|
|||||||
<excludedCommands>MoveDown</excludedCommands>
|
<excludedCommands>MoveDown</excludedCommands>
|
||||||
<excludedCommands>MoveUp</excludedCommands>
|
<excludedCommands>MoveUp</excludedCommands>
|
||||||
<items xsi:type="form:FormGroup">
|
<items xsi:type="form:FormGroup">
|
||||||
<name>ТаблицаГруппа2</name>
|
<name>ГруппаКолонок</name>
|
||||||
<id>30</id>
|
<id>30</id>
|
||||||
<items xsi:type="form:FormGroup">
|
<items xsi:type="form:FormGroup">
|
||||||
<name>ТаблицаГруппа1</name>
|
<name>ГруппаКодНаименование</name>
|
||||||
<id>28</id>
|
<id>28</id>
|
||||||
<items xsi:type="form:FormField">
|
<items xsi:type="form:FormField">
|
||||||
<name>ТаблицаКод</name>
|
<name>ТаблицаКод</name>
|
||||||
@@ -115,10 +115,10 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Таблица группа 1</value>
|
<value>Группа Код</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ТаблицаГруппа1РасширеннаяПодсказка</name>
|
<name>ГруппаКодНаименованиеРасширеннаяПодсказка</name>
|
||||||
<id>29</id>
|
<id>29</id>
|
||||||
<type>Label</type>
|
<type>Label</type>
|
||||||
<autoMaxWidth>true</autoMaxWidth>
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
@@ -184,10 +184,10 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Таблица группа 2</value>
|
<value>Колонок</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ТаблицаГруппа2РасширеннаяПодсказка</name>
|
<name>ГруппаКолонокРасширеннаяПодсказка</name>
|
||||||
<id>31</id>
|
<id>31</id>
|
||||||
<type>Label</type>
|
<type>Label</type>
|
||||||
<autoMaxWidth>true</autoMaxWidth>
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
|
|||||||
@@ -171,6 +171,7 @@
|
|||||||
<edit>
|
<edit>
|
||||||
<common>true</common>
|
<common>true</common>
|
||||||
</edit>
|
</edit>
|
||||||
|
<fillChecking>ShowError</fillChecking>
|
||||||
</attributes>
|
</attributes>
|
||||||
<attributes>
|
<attributes>
|
||||||
<name>НомерДоверенности</name>
|
<name>НомерДоверенности</name>
|
||||||
|
|||||||
@@ -20,13 +20,15 @@
|
|||||||
|
|
||||||
&НаКлиенте
|
&НаКлиенте
|
||||||
Процедура ОтменитьДоверенность(Команда)
|
Процедура ОтменитьДоверенность(Команда)
|
||||||
ДанныеОтмены = МашиночитаемыеДоверенностиФНССлужебныйВызовСервера.ПолучитьФайлОтменыДоверенности(Доверенность, ПричинаОтмены);
|
Если ПроверитьЗаполнение() Тогда
|
||||||
ОписаниеДанных = Новый Структура;
|
ДанныеОтмены = МашиночитаемыеДоверенностиФНССлужебныйВызовСервера.ПолучитьФайлОтменыДоверенности(Доверенность, ПричинаОтмены);
|
||||||
ОписаниеДанных.Вставить("Операция", НСтр("ru='Отмена доверенности'"));
|
ОписаниеДанных = Новый Структура;
|
||||||
ОписаниеДанных.Вставить("ЗаголовокДанных", НСтр("ru='Доверенность'"));
|
ОписаниеДанных.Вставить("Операция", НСтр("ru='Отмена доверенности'"));
|
||||||
ОписаниеДанных.Вставить("Данные", ДанныеОтмены.Содержимое);
|
ОписаниеДанных.Вставить("ЗаголовокДанных", НСтр("ru='Доверенность'"));
|
||||||
|
ОписаниеДанных.Вставить("Данные", ДанныеОтмены.Содержимое);
|
||||||
|
|
||||||
ЭлектроннаяПодписьКлиент.Подписать(ОписаниеДанных,,Новый ОписаниеОповещения("ОтправитьОтменуДоверенности", ЭтотОбъект, ДанныеОтмены));
|
ЭлектроннаяПодписьКлиент.Подписать(ОписаниеДанных,,Новый ОписаниеОповещения("ПослеПодписанияДоверенности", ЭтотОбъект, ДанныеОтмены));
|
||||||
|
КонецЕсли;
|
||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
#КонецОбласти
|
#КонецОбласти
|
||||||
@@ -34,7 +36,7 @@
|
|||||||
#Область СлужебныеПроцедурыИФункции
|
#Область СлужебныеПроцедурыИФункции
|
||||||
|
|
||||||
&НаКлиенте
|
&НаКлиенте
|
||||||
Процедура ОтправитьОтменуДоверенности(Результат, ДанныеОтмены) Экспорт
|
Процедура ПослеПодписанияДоверенности(Результат, ДанныеОтмены) Экспорт
|
||||||
Если Результат.Успех Тогда
|
Если Результат.Успех Тогда
|
||||||
|
|
||||||
Если ТипЗнч(Результат.СвойстваПодписи) = Тип("Структура") Тогда
|
Если ТипЗнч(Результат.СвойстваПодписи) = Тип("Структура") Тогда
|
||||||
@@ -51,11 +53,19 @@
|
|||||||
|
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
|
РезультатПроверки = ПроверитьСертификатДоверителя(Доверенность, СвойстваПодписи.Сертификат);
|
||||||
|
Если ЗначениеЗаполнено(РезультатПроверки.Ошибка) Тогда
|
||||||
|
КонтекстОшибки = МашиночитаемыеДоверенностиФНССлужебныйКлиент.КонтекстДляОбработкиОшибкиРР();
|
||||||
|
КонтекстОшибки.ЗаголовокПредупреждения = НСтр("ru='Подпись не подходит для отмены'");
|
||||||
|
МашиночитаемыеДоверенностиФНССлужебныйКлиент.ОбработатьОшибкуВзаимодействияРР(РезультатПроверки.Ошибка, КонтекстОшибки);
|
||||||
|
Возврат;
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
РезультатОтмены = МашиночитаемыеДоверенностиФНССлужебныйВызовСервера.ОтменитьМЧДРР(ДанныеОтмены.ИмяФайла, ДанныеОтмены.Содержимое, СвойстваПодписи.Подпись, ДанныеОтмены.Доверенность);
|
РезультатОтмены = МашиночитаемыеДоверенностиФНССлужебныйВызовСервера.ОтменитьМЧДРР(ДанныеОтмены.ИмяФайла, ДанныеОтмены.Содержимое, СвойстваПодписи.Подпись, ДанныеОтмены.Доверенность);
|
||||||
|
|
||||||
Если ЗначениеЗаполнено(РезультатОтмены.Ошибка) Тогда
|
Если ЗначениеЗаполнено(РезультатОтмены.Ошибка) Тогда
|
||||||
КонтекстОшибки = МашиночитаемыеДоверенностиФНССлужебныйКлиент.КонтекстДляОбработкиОшибкиРР();
|
КонтекстОшибки = МашиночитаемыеДоверенностиФНССлужебныйКлиент.КонтекстДляОбработкиОшибкиРР();
|
||||||
КонтекстОшибки.ЗаголовокПредупреждения = НСтр("ru='Не удается отменить доверенность.'");
|
КонтекстОшибки.ЗаголовокПредупреждения = НСтр("ru='Не удается отменить доверенность'");
|
||||||
МашиночитаемыеДоверенностиФНССлужебныйКлиент.ОбработатьОшибкуВзаимодействияРР(РезультатОтмены.Ошибка, КонтекстОшибки);
|
МашиночитаемыеДоверенностиФНССлужебныйКлиент.ОбработатьОшибкуВзаимодействияРР(РезультатОтмены.Ошибка, КонтекстОшибки);
|
||||||
Возврат;
|
Возврат;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
@@ -73,22 +83,51 @@
|
|||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
&НаСервере
|
&НаСервере
|
||||||
Функция ДобавитьФайлОтзываИПолучитьРезультатРегистрации(ДанныеОтмены, СвойстваПодписи)
|
Процедура ДобавитьФайлОтзываИПолучитьРезультатРегистрации(ДанныеОтмены, СвойстваПодписи)
|
||||||
ФайлДоверености = Новый Файл(ДанныеОтмены.ИмяФайла);
|
ФайлДоверенности = Новый Файл(ДанныеОтмены.ИмяФайла);
|
||||||
ПараметрыДобавления = РаботаСФайлами.ПараметрыДобавленияФайла();
|
ПараметрыДобавления = РаботаСФайлами.ПараметрыДобавленияФайла();
|
||||||
ПараметрыДобавления.ВладелецФайлов = Доверенность;
|
ПараметрыДобавления.ВладелецФайлов = Доверенность;
|
||||||
ПараметрыДобавления.ИмяБезРасширения = ФайлДоверености.ИмяБезРасширения;
|
ПараметрыДобавления.ИмяБезРасширения = ФайлДоверенности.ИмяБезРасширения;
|
||||||
ПараметрыДобавления.РасширениеБезТочки = ФайлДоверености.Расширение;
|
ПараметрыДобавления.РасширениеБезТочки = ФайлДоверенности.Расширение;
|
||||||
ПараметрыДобавления.Служебный = Истина;
|
ПараметрыДобавления.Служебный = Истина;
|
||||||
ФайлЗаявленияНаОтмену = РаботаСФайлами.ДобавитьФайл(ПараметрыДобавления, ДанныеОтмены.Содержимое);
|
ФайлЗаявленияНаОтмену = РаботаСФайлами.ДобавитьФайл(ПараметрыДобавления, ДанныеОтмены.Содержимое);
|
||||||
|
|
||||||
ЭлектроннаяПодпись.ДобавитьПодпись(ФайлЗаявленияНаОтмену, СвойстваПодписи);
|
ЭлектроннаяПодпись.ДобавитьПодпись(ФайлЗаявленияНаОтмену, СвойстваПодписи);
|
||||||
|
|
||||||
ОбъектМЧД = Доверенность.ПолучитьОбъект();
|
НачатьТранзакцию();
|
||||||
ОбъектМЧД.ФайлЗаявленияНаОтмену = ФайлЗаявленияНаОтмену;
|
Попытка
|
||||||
ОбъектМЧД.Статус = Перечисления.СтатусыМЧД.НеДействует;
|
Блокировка = Новый БлокировкаДанных;
|
||||||
ОбъектМЧД.ОбменДанными.Загрузка = Истина;
|
ЭлементБлокировки = Блокировка.Добавить("Справочник.МашиночитаемыеДоверенности");
|
||||||
ОбъектМЧД.Записать();
|
ЭлементБлокировки.УстановитьЗначение("Ссылка", Доверенность);
|
||||||
|
Блокировка.Заблокировать();
|
||||||
|
|
||||||
|
ОбъектМЧД = Доверенность.ПолучитьОбъект();
|
||||||
|
ОбъектМЧД.ФайлЗаявленияНаОтмену = ФайлЗаявленияНаОтмену;
|
||||||
|
ОбъектМЧД.ДатаОтмены = ТекущаяДатаСеанса();
|
||||||
|
ОбъектМЧД.Статус = Перечисления.СтатусыМЧД.НеДействует;
|
||||||
|
ОбъектМЧД.Записать();
|
||||||
|
|
||||||
|
ЗафиксироватьТранзакцию();
|
||||||
|
Исключение
|
||||||
|
ОтменитьТранзакцию();
|
||||||
|
ВызватьИсключение;
|
||||||
|
КонецПопытки;
|
||||||
|
|
||||||
|
КонецПроцедуры
|
||||||
|
|
||||||
|
&НаСервереБезКонтекста
|
||||||
|
Функция ПроверитьСертификатДоверителя(Доверенность, Сертификат)
|
||||||
|
Результат = Новый Структура;
|
||||||
|
Результат.Вставить("Ошибка");
|
||||||
|
|
||||||
|
ФайлДоверенности = Доверенность.ФайлДоверенности;
|
||||||
|
РезультатПроверки = МашиночитаемыеДоверенностиФНССлужебный.ПроверитьСертификатДоверителя(Доверенность, ФайлДоверенности, Сертификат, Ложь);
|
||||||
|
Если РезультатПроверки <> Истина Тогда
|
||||||
|
ПараметрыОшибкиМЧДРР = МашиночитаемыеДоверенностиФНССлужебный.ПараметрыОшибкиМЧДРР(, , , , НСтр("ru='Подпись не подходит для отмены'"), РезультатПроверки);
|
||||||
|
Результат.Ошибка = МашиночитаемыеДоверенностиФНССлужебный.ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
Возврат Результат;
|
||||||
КонецФункции
|
КонецФункции
|
||||||
|
|
||||||
#КонецОбласти
|
#КонецОбласти
|
||||||
+24
-5
@@ -51,7 +51,7 @@
|
|||||||
<name>ГруппаДолжностноеЛицо</name>
|
<name>ГруппаДолжностноеЛицо</name>
|
||||||
<id>98</id>
|
<id>98</id>
|
||||||
<items xsi:type="form:FormField">
|
<items xsi:type="form:FormField">
|
||||||
<name>ДолжностьЛицаБезДоверенности</name>
|
<name>ДолжностьЛицаДоверителя</name>
|
||||||
<id>100</id>
|
<id>100</id>
|
||||||
<visible>true</visible>
|
<visible>true</visible>
|
||||||
<enabled>true</enabled>
|
<enabled>true</enabled>
|
||||||
@@ -59,14 +59,14 @@
|
|||||||
<common>true</common>
|
<common>true</common>
|
||||||
</userVisible>
|
</userVisible>
|
||||||
<dataPath xsi:type="form:DataPath">
|
<dataPath xsi:type="form:DataPath">
|
||||||
<segments>ДолжностьЛицаБезДоверенности</segments>
|
<segments>ДолжностьЛицаДоверителя</segments>
|
||||||
</dataPath>
|
</dataPath>
|
||||||
<handlers>
|
<handlers>
|
||||||
<event>OnChange</event>
|
<event>OnChange</event>
|
||||||
<name>РеквизитПриИзменении</name>
|
<name>РеквизитПриИзменении</name>
|
||||||
</handlers>
|
</handlers>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ДолжностьЛицаБезДоверенностиРасширеннаяПодсказка</name>
|
<name>ДолжностьЛицаДоверителяРасширеннаяПодсказка</name>
|
||||||
<id>102</id>
|
<id>102</id>
|
||||||
<type>Label</type>
|
<type>Label</type>
|
||||||
<autoMaxWidth>true</autoMaxWidth>
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
@@ -76,7 +76,7 @@
|
|||||||
</extInfo>
|
</extInfo>
|
||||||
</extendedTooltip>
|
</extendedTooltip>
|
||||||
<contextMenu>
|
<contextMenu>
|
||||||
<name>ДолжностьЛицаБезДоверенностиКонтекстноеМеню</name>
|
<name>ДолжностьЛицаДоверителяКонтекстноеМеню</name>
|
||||||
<id>101</id>
|
<id>101</id>
|
||||||
<autoFill>true</autoFill>
|
<autoFill>true</autoFill>
|
||||||
</contextMenu>
|
</contextMenu>
|
||||||
@@ -1878,7 +1878,7 @@
|
|||||||
</edit>
|
</edit>
|
||||||
</attributes>
|
</attributes>
|
||||||
<attributes>
|
<attributes>
|
||||||
<name>ДолжностьЛицаБезДоверенности</name>
|
<name>ДолжностьЛицаДоверителя</name>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Должность </value>
|
<value>Должность </value>
|
||||||
@@ -2306,6 +2306,19 @@
|
|||||||
<common>true</common>
|
<common>true</common>
|
||||||
</edit>
|
</edit>
|
||||||
</attributes>
|
</attributes>
|
||||||
|
<attributes>
|
||||||
|
<name>ПоказыватьПерсональныеДанные</name>
|
||||||
|
<id>36</id>
|
||||||
|
<valueType>
|
||||||
|
<types>Boolean</types>
|
||||||
|
</valueType>
|
||||||
|
<view>
|
||||||
|
<common>true</common>
|
||||||
|
</view>
|
||||||
|
<edit>
|
||||||
|
<common>true</common>
|
||||||
|
</edit>
|
||||||
|
</attributes>
|
||||||
<formCommands>
|
<formCommands>
|
||||||
<name>ОК</name>
|
<name>ОК</name>
|
||||||
<title>
|
<title>
|
||||||
@@ -2387,6 +2400,12 @@
|
|||||||
</valueType>
|
</valueType>
|
||||||
<keyParameter>true</keyParameter>
|
<keyParameter>true</keyParameter>
|
||||||
</parameters>
|
</parameters>
|
||||||
|
<parameters>
|
||||||
|
<name>ПоказыватьПерсональныеДанные</name>
|
||||||
|
<valueType>
|
||||||
|
<types>Boolean</types>
|
||||||
|
</valueType>
|
||||||
|
</parameters>
|
||||||
<commandInterface>
|
<commandInterface>
|
||||||
<navigationPanel/>
|
<navigationPanel/>
|
||||||
<commandBar/>
|
<commandBar/>
|
||||||
|
|||||||
+14
-3
@@ -18,6 +18,8 @@
|
|||||||
&НаСервере
|
&НаСервере
|
||||||
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
|
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
|
||||||
|
|
||||||
|
ПоказыватьПерсональныеДанные = Параметры.ПоказыватьПерсональныеДанные;
|
||||||
|
|
||||||
ЗаполнитьСписокВидовДокументов();
|
ЗаполнитьСписокВидовДокументов();
|
||||||
|
|
||||||
Ссылка = Параметры.Ссылка;
|
Ссылка = Параметры.Ссылка;
|
||||||
@@ -567,7 +569,7 @@
|
|||||||
ЭтоФизическоеЛицо = Не Форма.ЭтоДолжностноеЛицо И Не Форма.ЭтоИндивидуальныйПредприниматель;
|
ЭтоФизическоеЛицо = Не Форма.ЭтоДолжностноеЛицо И Не Форма.ЭтоИндивидуальныйПредприниматель;
|
||||||
|
|
||||||
Если ЭтоДолжностноеЛицо = Неопределено Или Не ЭтоДолжностноеЛицо Тогда
|
Если ЭтоДолжностноеЛицо = Неопределено Или Не ЭтоДолжностноеЛицо Тогда
|
||||||
Форма.ДолжностьЛицаБезДоверенности = "";
|
Форма.ДолжностьЛицаДоверителя = "";
|
||||||
Иначе
|
Иначе
|
||||||
Форма.Заголовок = НСтр("ru='Сведения о должностном лице'");
|
Форма.Заголовок = НСтр("ru='Сведения о должностном лице'");
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
@@ -589,6 +591,10 @@
|
|||||||
СписокРеквизитов = МашиночитаемыеДоверенностиФНССлужебныйКлиентСервер.РеквизитыФизическогоЛицаСписок(Ложь,
|
СписокРеквизитов = МашиночитаемыеДоверенностиФНССлужебныйКлиентСервер.РеквизитыФизическогоЛицаСписок(Ложь,
|
||||||
МашиночитаемыеДоверенностиФНССлужебныйКлиентСервер.ОпределитьВидУчастника(Форма));
|
МашиночитаемыеДоверенностиФНССлужебныйКлиентСервер.ОпределитьВидУчастника(Форма));
|
||||||
|
|
||||||
|
Если Не Форма.ПоказыватьПерсональныеДанные Тогда
|
||||||
|
ПерсональныеДанные = МашиночитаемыеДоверенностиФНССлужебныйКлиентСервер.ПерсональныеДанные();
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
Для Каждого Элемент Из Форма.Элементы Цикл
|
Для Каждого Элемент Из Форма.Элементы Цикл
|
||||||
|
|
||||||
Если Элемент.Имя = "Ссылка1" Тогда
|
Если Элемент.Имя = "Ссылка1" Тогда
|
||||||
@@ -598,10 +604,15 @@
|
|||||||
Если Элемент.Вид <> ВидПоляФормы.ПолеВвода Тогда
|
Если Элемент.Вид <> ВидПоляФормы.ПолеВвода Тогда
|
||||||
Продолжить;
|
Продолжить;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
Реквизит = СписокРеквизитов.НайтиПоЗначению(Элемент.Имя);
|
Реквизит = СписокРеквизитов.НайтиПоЗначению(Элемент.Имя);
|
||||||
Если Реквизит <> Неопределено Тогда
|
Если Реквизит <> Неопределено Тогда
|
||||||
Форма.Элементы[Элемент.Имя].АвтоОтметкаНезаполненного = Не Реквизит.Пометка;
|
Если Не Форма.ПоказыватьПерсональныеДанные И ПерсональныеДанные.Найти(Элемент.Имя) <> Неопределено Тогда
|
||||||
Форма.Элементы[Элемент.Имя].Видимость = Истина;
|
Форма.Элементы[Элемент.Имя].Видимость = Ложь;
|
||||||
|
Иначе
|
||||||
|
Форма.Элементы[Элемент.Имя].АвтоОтметкаНезаполненного = Не Реквизит.Пометка;
|
||||||
|
Форма.Элементы[Элемент.Имя].Видимость = Истина;
|
||||||
|
КонецЕсли;
|
||||||
Иначе
|
Иначе
|
||||||
Форма.Элементы[Элемент.Имя].Видимость = Ложь;
|
Форма.Элементы[Элемент.Имя].Видимость = Ложь;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|||||||
@@ -1541,7 +1541,7 @@
|
|||||||
</extInfo>
|
</extInfo>
|
||||||
</items>
|
</items>
|
||||||
<items xsi:type="form:FormField">
|
<items xsi:type="form:FormField">
|
||||||
<name>ТаблицаПредставительНесколькоПредставительФЛСтрока</name>
|
<name>ТаблицаПредставительНесколькоЛицоПредставителяСтрока</name>
|
||||||
<id>199</id>
|
<id>199</id>
|
||||||
<visible>true</visible>
|
<visible>true</visible>
|
||||||
<enabled>true</enabled>
|
<enabled>true</enabled>
|
||||||
@@ -1549,10 +1549,10 @@
|
|||||||
<common>true</common>
|
<common>true</common>
|
||||||
</userVisible>
|
</userVisible>
|
||||||
<dataPath xsi:type="form:DataPath">
|
<dataPath xsi:type="form:DataPath">
|
||||||
<segments>ТаблицаПредставительНесколько.ПредставительФЛСтрока</segments>
|
<segments>ТаблицаПредставительНесколько.ЛицоПредставителяСтрока</segments>
|
||||||
</dataPath>
|
</dataPath>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ТаблицаПредставительНесколькоПредставительФЛСтрокаРасширеннаяПодсказка</name>
|
<name>ТаблицаПредставительНесколькоЛицоПредставителяСтрокаРасширеннаяПодсказка</name>
|
||||||
<id>201</id>
|
<id>201</id>
|
||||||
<type>Label</type>
|
<type>Label</type>
|
||||||
<autoMaxWidth>true</autoMaxWidth>
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
@@ -1562,7 +1562,7 @@
|
|||||||
</extInfo>
|
</extInfo>
|
||||||
</extendedTooltip>
|
</extendedTooltip>
|
||||||
<contextMenu>
|
<contextMenu>
|
||||||
<name>ТаблицаПредставительНесколькоПредставительФЛСтрокаКонтекстноеМеню</name>
|
<name>ТаблицаПредставительНесколькоЛицоПредставителяСтрокаКонтекстноеМеню</name>
|
||||||
<id>200</id>
|
<id>200</id>
|
||||||
<autoFill>true</autoFill>
|
<autoFill>true</autoFill>
|
||||||
</contextMenu>
|
</contextMenu>
|
||||||
@@ -2701,7 +2701,7 @@
|
|||||||
</edit>
|
</edit>
|
||||||
</columns>
|
</columns>
|
||||||
<columns>
|
<columns>
|
||||||
<name>ПредставительФЛ</name>
|
<name>ЛицоПредставителя</name>
|
||||||
<id>3</id>
|
<id>3</id>
|
||||||
<valueType>
|
<valueType>
|
||||||
<types>DefinedType.СторонаМЧД</types>
|
<types>DefinedType.СторонаМЧД</types>
|
||||||
@@ -2714,7 +2714,7 @@
|
|||||||
</edit>
|
</edit>
|
||||||
</columns>
|
</columns>
|
||||||
<columns>
|
<columns>
|
||||||
<name>ПредставительФЛИдентификатор</name>
|
<name>ЛицоПредставителяИдентификатор</name>
|
||||||
<id>4</id>
|
<id>4</id>
|
||||||
<valueType>
|
<valueType>
|
||||||
<types>UUID</types>
|
<types>UUID</types>
|
||||||
@@ -2809,7 +2809,7 @@
|
|||||||
</edit>
|
</edit>
|
||||||
</columns>
|
</columns>
|
||||||
<columns>
|
<columns>
|
||||||
<name>ПредставительФЛСтрока</name>
|
<name>ЛицоПредставителяСтрока</name>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Не заполнены реквизиты</value>
|
<value>Не заполнены реквизиты</value>
|
||||||
|
|||||||
@@ -37,6 +37,12 @@
|
|||||||
ПараметрыРазмещения.КоманднаяПанель = КоманднаяПанель;
|
ПараметрыРазмещения.КоманднаяПанель = КоманднаяПанель;
|
||||||
ПодключаемыеКоманды.ПриСозданииНаСервере(ЭтотОбъект, ПараметрыРазмещения);
|
ПодключаемыеКоманды.ПриСозданииНаСервере(ЭтотОбъект, ПараметрыРазмещения);
|
||||||
// Конец СтандартныеПодсистемы.ПодключаемыеКоманды
|
// Конец СтандартныеПодсистемы.ПодключаемыеКоманды
|
||||||
|
|
||||||
|
ЕстьПравоДобавления = ПравоДоступа("Добавление", Метаданные.Справочники.МашиночитаемыеДоверенности);
|
||||||
|
|
||||||
|
Элементы.СписокЗагрузитьИзФайла.Видимость = ЕстьПравоДобавления;
|
||||||
|
Элементы.СписокЗагрузитьИзРеестраФНС.Видимость = ЕстьПравоДобавления;
|
||||||
|
Элементы.СписокПолучитьСтатус.Видимость = ПравоДоступа("Изменение", Метаданные.Справочники.МашиночитаемыеДоверенности);
|
||||||
|
|
||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
|
|||||||
File diff suppressed because it is too large.
Load diff
File diff suppressed because it is too large.
Load diff
File diff suppressed because it is too large.
Load diff
@@ -38,11 +38,11 @@
|
|||||||
Если Не ЗначениеЗаполнено(Ответственный) Тогда
|
Если Не ЗначениеЗаполнено(Ответственный) Тогда
|
||||||
Ответственный = Пользователи.ТекущийПользователь();
|
Ответственный = Пользователи.ТекущийПользователь();
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
Если Не Ссылка.Пустая() Тогда
|
Если Не Ссылка.Пустая() Тогда
|
||||||
ОбновитьСтатус();
|
ОбновитьСтатус();
|
||||||
Иначе
|
Иначе
|
||||||
ДополнительныеСвойства.Вставить("РассчитатьТехническийСтатус");
|
ДополнительныеСвойства.Вставить("ОбновитьСтатус");
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
@@ -94,12 +94,12 @@
|
|||||||
|
|
||||||
Для Каждого СтрокаУправляющаяКомпания Из НайденоУправляющиеКомпании Цикл
|
Для Каждого СтрокаУправляющаяКомпания Из НайденоУправляющиеКомпании Цикл
|
||||||
|
|
||||||
СовместныеПолномочияЛицаБезДоверенности = СтрокаУправляющаяКомпания.СовместныеПолномочия;
|
СовместныеПолномочияЛицаДоверителя = СтрокаУправляющаяКомпания.СовместныеПолномочия;
|
||||||
РеквизитыУправляющейКомпании = СтрокаУправляющаяКомпания.ДоверительРеквизиты.Получить();
|
РеквизитыУправляющейКомпании = СтрокаУправляющаяКомпания.ДоверительРеквизиты.Получить();
|
||||||
|
|
||||||
Если РеквизитыУправляющейКомпании.ЭтоФизическоеЛицо Тогда
|
Если РеквизитыУправляющейКомпании.ЭтоФизическоеЛицо Тогда
|
||||||
ДобавитьСтрокуДоверителя(НаборЗаписей, СтрокаУправляющаяКомпания.Доверитель, РеквизитыУправляющейКомпании,
|
ДобавитьСтрокуДоверителя(НаборЗаписей, СтрокаУправляющаяКомпания.Доверитель, РеквизитыУправляющейКомпании,
|
||||||
СовместныеПолномочияЛицаБезДоверенности, СтрокаОрганизация.Доверитель, РеквизитыОрганизации);
|
СовместныеПолномочияЛицаДоверителя, СтрокаОрганизация.Доверитель, РеквизитыОрганизации);
|
||||||
Иначе
|
Иначе
|
||||||
|
|
||||||
НайденоФизическиеЛица = Доверители.НайтиСтроки(Новый Структура("ИдентификаторРодителя",
|
НайденоФизическиеЛица = Доверители.НайтиСтроки(Новый Структура("ИдентификаторРодителя",
|
||||||
@@ -109,9 +109,8 @@
|
|||||||
|
|
||||||
РеквизитыФизическогоЛица = СтрокаФизическоеЛицо.ДоверительРеквизиты.Получить();
|
РеквизитыФизическогоЛица = СтрокаФизическоеЛицо.ДоверительРеквизиты.Получить();
|
||||||
ДобавитьСтрокуДоверителя(НаборЗаписей, СтрокаФизическоеЛицо.Доверитель, РеквизитыФизическогоЛица,
|
ДобавитьСтрокуДоверителя(НаборЗаписей, СтрокаФизическоеЛицо.Доверитель, РеквизитыФизическогоЛица,
|
||||||
СовместныеПолномочияЛицаБезДоверенности, СтрокаОрганизация.Доверитель, РеквизитыУправляющейКомпании,
|
СовместныеПолномочияЛицаДоверителя, СтрокаОрганизация.Доверитель, РеквизитыОрганизации,
|
||||||
СтрокаУправляющаяКомпания.Доверитель);
|
СтрокаУправляющаяКомпания.Доверитель);
|
||||||
|
|
||||||
КонецЦикла;
|
КонецЦикла;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
КонецЦикла;
|
КонецЦикла;
|
||||||
@@ -140,23 +139,19 @@
|
|||||||
|
|
||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
Процедура ДобавитьСтрокуПредставителя(НаборЗаписей, Представитель, Реквизиты,
|
Процедура ДобавитьСтрокуПредставителя(НаборЗаписей, Представитель, РеквизитыФизическогоЛица,
|
||||||
Организация = Неопределено, РеквизитыОрганизации = Неопределено)
|
Организация = Неопределено, РеквизитыОрганизации = Неопределено)
|
||||||
|
|
||||||
НоваяЗапись = НаборЗаписей.Добавить();
|
НоваяЗапись = НаборЗаписей.Добавить();
|
||||||
ЗаполнитьЗначенияСвойств(НоваяЗапись, Реквизиты);
|
ЗаполнитьЗначенияСвойств(НоваяЗапись, РеквизитыФизическогоЛица);
|
||||||
|
|
||||||
НоваяЗапись.МашиночитаемаяДоверенность = Ссылка;
|
НоваяЗапись.МашиночитаемаяДоверенность = Ссылка;
|
||||||
НоваяЗапись.ТипУчастника = Перечисления.ТипыУчастниковМЧД.Представитель;
|
НоваяЗапись.ТипУчастника = Перечисления.ТипыУчастниковМЧД.Представитель;
|
||||||
НоваяЗапись.СовместныеПолномочия = СовместныеПолномочия;
|
НоваяЗапись.СовместныеПолномочия = СовместныеПолномочия;
|
||||||
|
|
||||||
Если Реквизиты.ЭтоФизическоеЛицо Тогда
|
НоваяЗапись.ФизическоеЛицо = Представитель;
|
||||||
НоваяЗапись.ФизическоеЛицо = Представитель;
|
НоваяЗапись.ФИО = ФИО(РеквизитыФизическогоЛица);
|
||||||
НоваяЗапись.ФИО = ФИО(Реквизиты);
|
НоваяЗапись.СНИЛС = МашиночитаемыеДоверенностиФНССлужебныйКлиентСервер.ТолькоЦифры(РеквизитыФизическогоЛица.СтраховойНомерПФР);
|
||||||
НоваяЗапись.СНИЛС = МашиночитаемыеДоверенностиФНССлужебныйКлиентСервер.ТолькоЦифры(Реквизиты.СтраховойНомерПФР);
|
|
||||||
Иначе
|
|
||||||
ЗаполнитьРеквизитыОрганизации(НоваяЗапись, Представитель, Реквизиты);
|
|
||||||
КонецЕсли;
|
|
||||||
|
|
||||||
Если РеквизитыОрганизации <> Неопределено Тогда
|
Если РеквизитыОрганизации <> Неопределено Тогда
|
||||||
ЗаполнитьРеквизитыОрганизации(НоваяЗапись, Организация, РеквизитыОрганизации);
|
ЗаполнитьРеквизитыОрганизации(НоваяЗапись, Организация, РеквизитыОрганизации);
|
||||||
@@ -164,23 +159,19 @@
|
|||||||
|
|
||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
Процедура ДобавитьСтрокуДоверителя(НаборЗаписей, Доверитель, Реквизиты, СовместныеПолномочияЛицаБезДоверенности,
|
Процедура ДобавитьСтрокуДоверителя(НаборЗаписей, Доверитель, РеквизитыФизическогоЛица, СовместныеПолномочияЛицаБезДоверенности,
|
||||||
Организация = Неопределено, РеквизитыОрганизации = Неопределено, УправляющаяКомпания = Неопределено)
|
Организация = Неопределено, РеквизитыОрганизации = Неопределено, УправляющаяКомпания = Неопределено)
|
||||||
|
|
||||||
НоваяЗапись = НаборЗаписей.Добавить();
|
НоваяЗапись = НаборЗаписей.Добавить();
|
||||||
ЗаполнитьЗначенияСвойств(НоваяЗапись, Реквизиты);
|
ЗаполнитьЗначенияСвойств(НоваяЗапись, РеквизитыФизическогоЛица);
|
||||||
|
|
||||||
НоваяЗапись.МашиночитаемаяДоверенность = Ссылка;
|
НоваяЗапись.МашиночитаемаяДоверенность = Ссылка;
|
||||||
НоваяЗапись.ТипУчастника = Перечисления.ТипыУчастниковМЧД.Доверитель;
|
НоваяЗапись.ТипУчастника = Перечисления.ТипыУчастниковМЧД.Доверитель;
|
||||||
НоваяЗапись.СовместныеПолномочия = СовместныеПолномочияЛицаБезДоверенности;
|
НоваяЗапись.СовместныеПолномочия = СовместныеПолномочияЛицаБезДоверенности;
|
||||||
|
|
||||||
Если Реквизиты.ЭтоФизическоеЛицо Тогда
|
НоваяЗапись.ФизическоеЛицо = Доверитель;
|
||||||
НоваяЗапись.ФизическоеЛицо = Доверитель;
|
НоваяЗапись.ФИО = ФИО(РеквизитыФизическогоЛица);
|
||||||
НоваяЗапись.ФИО = ФИО(Реквизиты);
|
НоваяЗапись.СНИЛС = МашиночитаемыеДоверенностиФНССлужебныйКлиентСервер.ТолькоЦифры(РеквизитыФизическогоЛица.СтраховойНомерПФР);
|
||||||
НоваяЗапись.СНИЛС = МашиночитаемыеДоверенностиФНССлужебныйКлиентСервер.ТолькоЦифры(Реквизиты.СтраховойНомерПФР);
|
|
||||||
Иначе
|
|
||||||
ЗаполнитьРеквизитыОрганизации(НоваяЗапись, Организация, РеквизитыОрганизации);
|
|
||||||
КонецЕсли;
|
|
||||||
|
|
||||||
Если РеквизитыОрганизации <> Неопределено Тогда
|
Если РеквизитыОрганизации <> Неопределено Тогда
|
||||||
ЗаполнитьРеквизитыОрганизации(НоваяЗапись, Организация, РеквизитыОрганизации);
|
ЗаполнитьРеквизитыОрганизации(НоваяЗапись, Организация, РеквизитыОрганизации);
|
||||||
|
|||||||
+1319
-3
File diff suppressed because it is too large.
Load diff
@@ -234,7 +234,9 @@
|
|||||||
</type>
|
</type>
|
||||||
<minValue xsi:type="core:UndefinedValue"/>
|
<minValue xsi:type="core:UndefinedValue"/>
|
||||||
<maxValue xsi:type="core:UndefinedValue"/>
|
<maxValue xsi:type="core:UndefinedValue"/>
|
||||||
<fillValue xsi:type="core:UndefinedValue"/>
|
<fillValue xsi:type="core:ReferenceValue">
|
||||||
|
<value>Enum.ВозможностьПередоверияМЧД.EnumValue.БезПередоверия</value>
|
||||||
|
</fillValue>
|
||||||
<fullTextSearch>Use</fullTextSearch>
|
<fullTextSearch>Use</fullTextSearch>
|
||||||
<dataHistory>Use</dataHistory>
|
<dataHistory>Use</dataHistory>
|
||||||
</attributes>
|
</attributes>
|
||||||
|
|||||||
+8
-5
@@ -256,17 +256,20 @@
|
|||||||
СвойстваОшибок = ОписаниеОшибок.Ошибки; // Массив Из см. ЭлектроннаяПодписьСлужебныйКлиентСервер.НовыеСвойстваОшибки
|
СвойстваОшибок = ОписаниеОшибок.Ошибки; // Массив Из см. ЭлектроннаяПодписьСлужебныйКлиентСервер.НовыеСвойстваОшибки
|
||||||
Для Каждого СвойстваОшибки Из СвойстваОшибок Цикл
|
Для Каждого СвойстваОшибки Из СвойстваОшибок Цикл
|
||||||
|
|
||||||
|
НовыеСвойстваОшибки = ЭлектроннаяПодписьСлужебныйКлиентСервер.НовыеСвойстваОшибки();
|
||||||
|
ЗаполнитьЗначенияСвойств(НовыеСвойстваОшибки, СвойстваОшибки);
|
||||||
|
|
||||||
ОписаниеСЗаголовком = "";
|
ОписаниеСЗаголовком = "";
|
||||||
Если ЗначениеЗаполнено(СвойстваОшибки.ЗаголовокОшибки) Тогда
|
Если ЗначениеЗаполнено(НовыеСвойстваОшибки.ЗаголовокОшибки) Тогда
|
||||||
ОписаниеСЗаголовком = СвойстваОшибки.ЗаголовокОшибки + Символы.ПС;
|
ОписаниеСЗаголовком = НовыеСвойстваОшибки.ЗаголовокОшибки + Символы.ПС;
|
||||||
ИначеЕсли ЗначениеЗаполнено(ОписаниеОшибок.ЗаголовокОшибки) Тогда
|
ИначеЕсли ЗначениеЗаполнено(ОписаниеОшибок.ЗаголовокОшибки) Тогда
|
||||||
ОписаниеСЗаголовком = ОписаниеОшибок.ЗаголовокОшибки + Символы.ПС;
|
ОписаниеСЗаголовком = ОписаниеОшибок.ЗаголовокОшибки + Символы.ПС;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
Описание = "";
|
Описание = "";
|
||||||
Если ЗначениеЗаполнено(СвойстваОшибки.Программа) Тогда
|
Если ЗначениеЗаполнено(НовыеСвойстваОшибки.Программа) Тогда
|
||||||
Описание = Описание + Строка(СвойстваОшибки.Программа) + ":" + Символы.ПС;
|
Описание = Описание + Строка(НовыеСвойстваОшибки.Программа) + ":" + Символы.ПС;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
Описание = Описание + СвойстваОшибки.Описание;
|
Описание = Описание + НовыеСвойстваОшибки.Описание;
|
||||||
ОписаниеСЗаголовком = ОписаниеСЗаголовком + Описание;
|
ОписаниеСЗаголовком = ОписаниеСЗаголовком + Описание;
|
||||||
|
|
||||||
СтрокаОшибки = Ошибки.Добавить();
|
СтрокаОшибки = Ошибки.Добавить();
|
||||||
|
|||||||
@@ -983,7 +983,7 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Группа1</value>
|
<value>Отправлено</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ГруппаОтборОтправленоРасширеннаяПодсказка</name>
|
<name>ГруппаОтборОтправленоРасширеннаяПодсказка</name>
|
||||||
@@ -1713,7 +1713,7 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Группа1</value>
|
<value>Подвал</value>
|
||||||
</title>
|
</title>
|
||||||
<groupHorizontalAlign>Right</groupHorizontalAlign>
|
<groupHorizontalAlign>Right</groupHorizontalAlign>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
|
|||||||
@@ -522,7 +522,7 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Группа1</value>
|
<value>Отборы</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ГруппаОтборыРасширеннаяПодсказка</name>
|
<name>ГруппаОтборыРасширеннаяПодсказка</name>
|
||||||
|
|||||||
@@ -152,7 +152,7 @@
|
|||||||
// Автор рассылки
|
// Автор рассылки
|
||||||
ТекущийПользователь = Пользователи.ТекущийПользователь();
|
ТекущийПользователь = Пользователи.ТекущийПользователь();
|
||||||
Объект.Автор = ТекущийПользователь;
|
Объект.Автор = ТекущийПользователь;
|
||||||
Объект.ВажностьПисьма = РассылкаОтчетовКлиентСервер.ОбычнаяВажностьИнтернетПочтовогоСообщения();
|
Объект.ВажностьПисьма = РаботаСПочтовымиСообщениямиСлужебныйКлиентСервер.ОбычнаяВажностьИнтернетПочтовогоСообщения();
|
||||||
Объект.ПрикреплятьОтчетыВоВложения = Истина;
|
Объект.ПрикреплятьОтчетыВоВложения = Истина;
|
||||||
Если Не ЗначениеЗаполнено(Объект.Автор) Тогда
|
Если Не ЗначениеЗаполнено(Объект.Автор) Тогда
|
||||||
Отказ = Истина;
|
Отказ = Истина;
|
||||||
@@ -2135,7 +2135,7 @@
|
|||||||
|
|
||||||
&НаКлиенте
|
&НаКлиенте
|
||||||
Процедура ВажностьВысокая(Команда)
|
Процедура ВажностьВысокая(Команда)
|
||||||
Объект.ВажностьПисьма = РассылкаОтчетовКлиентСервер.ВысокаяВажностьИнтернетПочтовогоСообщения();
|
Объект.ВажностьПисьма = РаботаСПочтовымиСообщениямиСлужебныйКлиентСервер.ВысокаяВажностьИнтернетПочтовогоСообщения();
|
||||||
Элементы.ГруппаВажность.Картинка = БиблиотекаКартинок.ВажностьВысокая;
|
Элементы.ГруппаВажность.Картинка = БиблиотекаКартинок.ВажностьВысокая;
|
||||||
Элементы.ГруппаВажность.Подсказка = НСтр("ru = 'Высокая важность'");
|
Элементы.ГруппаВажность.Подсказка = НСтр("ru = 'Высокая важность'");
|
||||||
Модифицированность = Истина;
|
Модифицированность = Истина;
|
||||||
@@ -2143,7 +2143,7 @@
|
|||||||
|
|
||||||
&НаКлиенте
|
&НаКлиенте
|
||||||
Процедура ВажностьОбычная(Команда)
|
Процедура ВажностьОбычная(Команда)
|
||||||
Объект.ВажностьПисьма = РассылкаОтчетовКлиентСервер.ОбычнаяВажностьИнтернетПочтовогоСообщения();
|
Объект.ВажностьПисьма = РаботаСПочтовымиСообщениямиСлужебныйКлиентСервер.ОбычнаяВажностьИнтернетПочтовогоСообщения();
|
||||||
Элементы.ГруппаВажность.Картинка = БиблиотекаКартинок.ВажностьНеЗадана;
|
Элементы.ГруппаВажность.Картинка = БиблиотекаКартинок.ВажностьНеЗадана;
|
||||||
Элементы.ГруппаВажность.Подсказка = НСтр("ru = 'Обычная важность'");
|
Элементы.ГруппаВажность.Подсказка = НСтр("ru = 'Обычная важность'");
|
||||||
Модифицированность = Истина;
|
Модифицированность = Истина;
|
||||||
@@ -2151,7 +2151,7 @@
|
|||||||
|
|
||||||
&НаКлиенте
|
&НаКлиенте
|
||||||
Процедура ВажностьНизкая(Команда)
|
Процедура ВажностьНизкая(Команда)
|
||||||
Объект.ВажностьПисьма = РассылкаОтчетовКлиентСервер.НизкаяВажностьИнтернетПочтовогоСообщения();
|
Объект.ВажностьПисьма = РаботаСПочтовымиСообщениямиСлужебныйКлиентСервер.НизкаяВажностьИнтернетПочтовогоСообщения();
|
||||||
Элементы.ГруппаВажность.Картинка = БиблиотекаКартинок.ВажностьНизкая;
|
Элементы.ГруппаВажность.Картинка = БиблиотекаКартинок.ВажностьНизкая;
|
||||||
Элементы.ГруппаВажность.Подсказка = НСтр("ru = 'Низкая важность'");
|
Элементы.ГруппаВажность.Подсказка = НСтр("ru = 'Низкая важность'");
|
||||||
Модифицированность = Истина;
|
Модифицированность = Истина;
|
||||||
@@ -4705,10 +4705,10 @@
|
|||||||
&НаСервере
|
&НаСервере
|
||||||
Процедура ОтобразитьВажность()
|
Процедура ОтобразитьВажность()
|
||||||
|
|
||||||
Если Объект.ВажностьПисьма = РассылкаОтчетовКлиентСервер.ВысокаяВажностьИнтернетПочтовогоСообщения() Тогда
|
Если Объект.ВажностьПисьма = РаботаСПочтовымиСообщениямиСлужебныйКлиентСервер.ВысокаяВажностьИнтернетПочтовогоСообщения() Тогда
|
||||||
Элементы.ГруппаВажность.Картинка = БиблиотекаКартинок.ВажностьВысокая;
|
Элементы.ГруппаВажность.Картинка = БиблиотекаКартинок.ВажностьВысокая;
|
||||||
Элементы.ГруппаВажность.Подсказка = НСтр("ru = 'Высокая важность'");
|
Элементы.ГруппаВажность.Подсказка = НСтр("ru = 'Высокая важность'");
|
||||||
ИначеЕсли Объект.ВажностьПисьма = РассылкаОтчетовКлиентСервер.НизкаяВажностьИнтернетПочтовогоСообщения() Тогда
|
ИначеЕсли Объект.ВажностьПисьма = РаботаСПочтовымиСообщениямиСлужебныйКлиентСервер.НизкаяВажностьИнтернетПочтовогоСообщения() Тогда
|
||||||
Элементы.ГруппаВажность.Картинка = БиблиотекаКартинок.ВажностьНизкая;
|
Элементы.ГруппаВажность.Картинка = БиблиотекаКартинок.ВажностьНизкая;
|
||||||
Элементы.ГруппаВажность.Подсказка = НСтр("ru = 'Низкая важность'");
|
Элементы.ГруппаВажность.Подсказка = НСтр("ru = 'Низкая важность'");
|
||||||
Иначе
|
Иначе
|
||||||
|
|||||||
+3
-3
@@ -1766,7 +1766,7 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Горизонтальная группа 2</value>
|
<value>Горизонтальная группа</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ГоризонтальнаяГруппа2РасширеннаяПодсказка</name>
|
<name>ГоризонтальнаяГруппа2РасширеннаяПодсказка</name>
|
||||||
@@ -1965,7 +1965,7 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Вертикальная группа 2</value>
|
<value>Вертикальная группа</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ВертикальнаяГруппа2РасширеннаяПодсказка</name>
|
<name>ВертикальнаяГруппа2РасширеннаяПодсказка</name>
|
||||||
@@ -1993,7 +1993,7 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Вертикальная группа 3</value>
|
<value>Вертикальная группа</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ВертикальнаяГруппа3РасширеннаяПодсказка</name>
|
<name>ВертикальнаяГруппа3РасширеннаяПодсказка</name>
|
||||||
|
|||||||
+1
-1
@@ -178,7 +178,7 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Группа1</value>
|
<value>Группа команды</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ГруппаКомандыРасширеннаяПодсказка</name>
|
<name>ГруппаКомандыРасширеннаяПодсказка</name>
|
||||||
|
|||||||
+1
-1
@@ -610,7 +610,7 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Группа1</value>
|
<value>Группа свойства сертификата</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ГруппаСвойстваСертификатаРасширеннаяПодсказка</name>
|
<name>ГруппаСвойстваСертификатаРасширеннаяПодсказка</name>
|
||||||
|
|||||||
+2
-1
@@ -876,7 +876,7 @@
|
|||||||
<extInfo xsi:type="form:InputFieldExtInfo">
|
<extInfo xsi:type="form:InputFieldExtInfo">
|
||||||
<autoMaxHeight>true</autoMaxHeight>
|
<autoMaxHeight>true</autoMaxHeight>
|
||||||
<wrap>true</wrap>
|
<wrap>true</wrap>
|
||||||
<chooseType>true</chooseType>
|
<dropListButton>true</dropListButton>
|
||||||
<typeDomainEnabled>true</typeDomainEnabled>
|
<typeDomainEnabled>true</typeDomainEnabled>
|
||||||
<textEdit>true</textEdit>
|
<textEdit>true</textEdit>
|
||||||
<choiceParameterLinks>
|
<choiceParameterLinks>
|
||||||
@@ -894,6 +894,7 @@
|
|||||||
</value>
|
</value>
|
||||||
</choiceParameters>
|
</choiceParameters>
|
||||||
<textSize>Normal</textSize>
|
<textSize>Normal</textSize>
|
||||||
|
<choiceHistoryOnInput>DontUse</choiceHistoryOnInput>
|
||||||
</extInfo>
|
</extInfo>
|
||||||
</items>
|
</items>
|
||||||
<visible>true</visible>
|
<visible>true</visible>
|
||||||
|
|||||||
-3
@@ -639,7 +639,6 @@
|
|||||||
МашиночитаемаяДоверенность = Неопределено;
|
МашиночитаемаяДоверенность = Неопределено;
|
||||||
РезультатПроверкиМЧДДляПодписания = Неопределено;
|
РезультатПроверкиМЧДДляПодписания = Неопределено;
|
||||||
Элементы.МашиночитаемаяДоверенность.СписокВыбора.Очистить();
|
Элементы.МашиночитаемаяДоверенность.СписокВыбора.Очистить();
|
||||||
Элементы.МашиночитаемаяДоверенность.РежимВыбораИзСписка = Ложь;
|
|
||||||
|
|
||||||
МодульМашиночитаемыеДоверенностиФНС = ОбщегоНазначения.ОбщийМодуль("МашиночитаемыеДоверенностиФНС");
|
МодульМашиночитаемыеДоверенностиФНС = ОбщегоНазначения.ОбщийМодуль("МашиночитаемыеДоверенностиФНС");
|
||||||
СертификатКриптографии = Новый СертификатКриптографии(ПолучитьИзВременногоХранилища(СертификатАдрес));
|
СертификатКриптографии = Новый СертификатКриптографии(ПолучитьИзВременногоХранилища(СертификатАдрес));
|
||||||
@@ -653,8 +652,6 @@
|
|||||||
Доверенности = МодульМашиночитаемыеДоверенностиФНС.ДоверенностиСОтбором(ОтборДляДоверенностейПоСертификату, ВыбранныеПоля);
|
Доверенности = МодульМашиночитаемыеДоверенностиФНС.ДоверенностиСОтбором(ОтборДляДоверенностейПоСертификату, ВыбранныеПоля);
|
||||||
|
|
||||||
Если Доверенности.Количество() > 0 Тогда
|
Если Доверенности.Количество() > 0 Тогда
|
||||||
Элементы.МашиночитаемаяДоверенность.РежимВыбораИзСписка = Истина;
|
|
||||||
Элементы.МашиночитаемаяДоверенность.СписокВыбора.Очистить();
|
|
||||||
Для Каждого Строка Из Доверенности Цикл
|
Для Каждого Строка Из Доверенности Цикл
|
||||||
Элементы.МашиночитаемаяДоверенность.СписокВыбора.Добавить(Строка.МашиночитаемаяДоверенность,
|
Элементы.МашиночитаемаяДоверенность.СписокВыбора.Добавить(Строка.МашиночитаемаяДоверенность,
|
||||||
СтрШаблон("%1, %2", Строка.Наименование, Формат(Строка.ДатаВыдачи, "ДЛФ=D")));
|
СтрШаблон("%1, %2", Строка.Наименование, Формат(Строка.ДатаВыдачи, "ДЛФ=D")));
|
||||||
|
|||||||
+1
-1
@@ -94,7 +94,7 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Группа1</value>
|
<value>Шапка</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ГруппаШапкаРасширеннаяПодсказка</name>
|
<name>ГруппаШапкаРасширеннаяПодсказка</name>
|
||||||
|
|||||||
+363
-39
@@ -130,7 +130,7 @@
|
|||||||
<choiceList>
|
<choiceList>
|
||||||
<presentation>
|
<presentation>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Указанные пользователи</value>
|
<value>Указанные пользователи:</value>
|
||||||
</presentation>
|
</presentation>
|
||||||
<value xsi:type="core:StringValue">
|
<value xsi:type="core:StringValue">
|
||||||
<value>СписокПользователей</value>
|
<value>СписокПользователей</value>
|
||||||
@@ -243,17 +243,73 @@
|
|||||||
<autoCommandBar>
|
<autoCommandBar>
|
||||||
<name>ТаблицаПользователейКоманднаяПанель</name>
|
<name>ТаблицаПользователейКоманднаяПанель</name>
|
||||||
<id>9</id>
|
<id>9</id>
|
||||||
<items xsi:type="form:Button">
|
<items xsi:type="form:FormGroup">
|
||||||
<name>ПользователиПометитьВсе</name>
|
<name>ГруппаКнопок</name>
|
||||||
<id>26</id>
|
<id>47</id>
|
||||||
|
<items xsi:type="form:Button">
|
||||||
|
<name>ПользователиПометитьВсе</name>
|
||||||
|
<id>26</id>
|
||||||
|
<visible>true</visible>
|
||||||
|
<enabled>true</enabled>
|
||||||
|
<userVisible>
|
||||||
|
<common>true</common>
|
||||||
|
</userVisible>
|
||||||
|
<extendedTooltip>
|
||||||
|
<name>ПользователиПометитьВсеРасширеннаяПодсказка</name>
|
||||||
|
<id>27</id>
|
||||||
|
<type>Label</type>
|
||||||
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
|
<autoMaxHeight>true</autoMaxHeight>
|
||||||
|
<extInfo xsi:type="form:LabelDecorationExtInfo">
|
||||||
|
<horizontalAlign>Left</horizontalAlign>
|
||||||
|
</extInfo>
|
||||||
|
</extendedTooltip>
|
||||||
|
<commandName>Form.Command.ПометитьВсе</commandName>
|
||||||
|
<buttonImportance>Normal</buttonImportance>
|
||||||
|
<representation>Auto</representation>
|
||||||
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
|
<autoMaxHeight>true</autoMaxHeight>
|
||||||
|
<placementArea>UserCmds</placementArea>
|
||||||
|
<representationInContextMenu>Auto</representationInContextMenu>
|
||||||
|
</items>
|
||||||
|
<items xsi:type="form:Button">
|
||||||
|
<name>ПользователиОтменитьПометку</name>
|
||||||
|
<id>28</id>
|
||||||
|
<visible>true</visible>
|
||||||
|
<enabled>true</enabled>
|
||||||
|
<userVisible>
|
||||||
|
<common>true</common>
|
||||||
|
</userVisible>
|
||||||
|
<extendedTooltip>
|
||||||
|
<name>ПользователиОтменитьПометкуРасширеннаяПодсказка</name>
|
||||||
|
<id>29</id>
|
||||||
|
<type>Label</type>
|
||||||
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
|
<autoMaxHeight>true</autoMaxHeight>
|
||||||
|
<extInfo xsi:type="form:LabelDecorationExtInfo">
|
||||||
|
<horizontalAlign>Left</horizontalAlign>
|
||||||
|
</extInfo>
|
||||||
|
</extendedTooltip>
|
||||||
|
<commandName>Form.Command.ОтменитьПометку</commandName>
|
||||||
|
<buttonImportance>Normal</buttonImportance>
|
||||||
|
<representation>Auto</representation>
|
||||||
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
|
<autoMaxHeight>true</autoMaxHeight>
|
||||||
|
<placementArea>UserCmds</placementArea>
|
||||||
|
<representationInContextMenu>Auto</representationInContextMenu>
|
||||||
|
</items>
|
||||||
<visible>true</visible>
|
<visible>true</visible>
|
||||||
<enabled>true</enabled>
|
<enabled>true</enabled>
|
||||||
<userVisible>
|
<userVisible>
|
||||||
<common>true</common>
|
<common>true</common>
|
||||||
</userVisible>
|
</userVisible>
|
||||||
|
<title>
|
||||||
|
<key>ru</key>
|
||||||
|
<value>Группа кнопок</value>
|
||||||
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ПользователиПометитьВсеРасширеннаяПодсказка</name>
|
<name>ГруппаКнопокРасширеннаяПодсказка</name>
|
||||||
<id>27</id>
|
<id>48</id>
|
||||||
<type>Label</type>
|
<type>Label</type>
|
||||||
<autoMaxWidth>true</autoMaxWidth>
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
<autoMaxHeight>true</autoMaxHeight>
|
<autoMaxHeight>true</autoMaxHeight>
|
||||||
@@ -261,39 +317,9 @@
|
|||||||
<horizontalAlign>Left</horizontalAlign>
|
<horizontalAlign>Left</horizontalAlign>
|
||||||
</extInfo>
|
</extInfo>
|
||||||
</extendedTooltip>
|
</extendedTooltip>
|
||||||
<commandName>Form.Command.ПометитьВсе</commandName>
|
<extInfo xsi:type="form:ButtonGroupExtInfo">
|
||||||
<buttonImportance>Normal</buttonImportance>
|
<representation>Compact</representation>
|
||||||
<representation>Auto</representation>
|
</extInfo>
|
||||||
<autoMaxWidth>true</autoMaxWidth>
|
|
||||||
<autoMaxHeight>true</autoMaxHeight>
|
|
||||||
<placementArea>UserCmds</placementArea>
|
|
||||||
<representationInContextMenu>Auto</representationInContextMenu>
|
|
||||||
</items>
|
|
||||||
<items xsi:type="form:Button">
|
|
||||||
<name>ПользователиОтменитьПометку</name>
|
|
||||||
<id>28</id>
|
|
||||||
<visible>true</visible>
|
|
||||||
<enabled>true</enabled>
|
|
||||||
<userVisible>
|
|
||||||
<common>true</common>
|
|
||||||
</userVisible>
|
|
||||||
<extendedTooltip>
|
|
||||||
<name>ПользователиОтменитьПометкуРасширеннаяПодсказка</name>
|
|
||||||
<id>29</id>
|
|
||||||
<type>Label</type>
|
|
||||||
<autoMaxWidth>true</autoMaxWidth>
|
|
||||||
<autoMaxHeight>true</autoMaxHeight>
|
|
||||||
<extInfo xsi:type="form:LabelDecorationExtInfo">
|
|
||||||
<horizontalAlign>Left</horizontalAlign>
|
|
||||||
</extInfo>
|
|
||||||
</extendedTooltip>
|
|
||||||
<commandName>Form.Command.ОтменитьПометку</commandName>
|
|
||||||
<buttonImportance>Normal</buttonImportance>
|
|
||||||
<representation>Auto</representation>
|
|
||||||
<autoMaxWidth>true</autoMaxWidth>
|
|
||||||
<autoMaxHeight>true</autoMaxHeight>
|
|
||||||
<placementArea>UserCmds</placementArea>
|
|
||||||
<representationInContextMenu>Auto</representationInContextMenu>
|
|
||||||
</items>
|
</items>
|
||||||
<horizontalAlign>Left</horizontalAlign>
|
<horizontalAlign>Left</horizontalAlign>
|
||||||
<autoFill>true</autoFill>
|
<autoFill>true</autoFill>
|
||||||
@@ -434,6 +460,246 @@
|
|||||||
<currentRowUse>Auto</currentRowUse>
|
<currentRowUse>Auto</currentRowUse>
|
||||||
</extInfo>
|
</extInfo>
|
||||||
</items>
|
</items>
|
||||||
|
<items xsi:type="form:FormGroup">
|
||||||
|
<name>ГруппаПодбор</name>
|
||||||
|
<id>49</id>
|
||||||
|
<items xsi:type="form:Table">
|
||||||
|
<name>ВыбранныеПользователи</name>
|
||||||
|
<id>51</id>
|
||||||
|
<visible>true</visible>
|
||||||
|
<enabled>true</enabled>
|
||||||
|
<userVisible>
|
||||||
|
<common>true</common>
|
||||||
|
</userVisible>
|
||||||
|
<dataPath xsi:type="form:DataPath">
|
||||||
|
<segments>ВыбранныеПользователи</segments>
|
||||||
|
</dataPath>
|
||||||
|
<titleLocation>None</titleLocation>
|
||||||
|
<items xsi:type="form:FormField">
|
||||||
|
<name>ВыбранныеПользователиПользователь</name>
|
||||||
|
<id>67</id>
|
||||||
|
<visible>true</visible>
|
||||||
|
<enabled>true</enabled>
|
||||||
|
<userVisible>
|
||||||
|
<common>true</common>
|
||||||
|
</userVisible>
|
||||||
|
<dataPath xsi:type="form:DataPath">
|
||||||
|
<segments>ВыбранныеПользователи.Пользователь</segments>
|
||||||
|
</dataPath>
|
||||||
|
<extendedTooltip>
|
||||||
|
<name>ВыбранныеПользователиПользовательРасширеннаяПодсказка</name>
|
||||||
|
<id>69</id>
|
||||||
|
<type>Label</type>
|
||||||
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
|
<autoMaxHeight>true</autoMaxHeight>
|
||||||
|
<extInfo xsi:type="form:LabelDecorationExtInfo">
|
||||||
|
<horizontalAlign>Left</horizontalAlign>
|
||||||
|
</extInfo>
|
||||||
|
</extendedTooltip>
|
||||||
|
<contextMenu>
|
||||||
|
<name>ВыбранныеПользователиПользовательКонтекстноеМеню</name>
|
||||||
|
<id>68</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">
|
||||||
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
|
<autoMaxHeight>true</autoMaxHeight>
|
||||||
|
<wrap>true</wrap>
|
||||||
|
<chooseType>true</chooseType>
|
||||||
|
<typeDomainEnabled>true</typeDomainEnabled>
|
||||||
|
<textEdit>true</textEdit>
|
||||||
|
<textSize>Normal</textSize>
|
||||||
|
</extInfo>
|
||||||
|
</items>
|
||||||
|
<autoCommandBar>
|
||||||
|
<name>ВыбранныеПользователиКоманднаяПанель</name>
|
||||||
|
<id>52</id>
|
||||||
|
<horizontalAlign>Left</horizontalAlign>
|
||||||
|
<autoFill>true</autoFill>
|
||||||
|
</autoCommandBar>
|
||||||
|
<handlers>
|
||||||
|
<event>BeforeAddRow</event>
|
||||||
|
<name>ВыбранныеПользователиПередНачаломДобавления</name>
|
||||||
|
</handlers>
|
||||||
|
<searchStringAddition>
|
||||||
|
<name>ВыбранныеПользователиСтрокаПоиска</name>
|
||||||
|
<id>55</id>
|
||||||
|
<extendedTooltip>
|
||||||
|
<name>ВыбранныеПользователиСтрокаПоискаРасширеннаяПодсказка</name>
|
||||||
|
<id>57</id>
|
||||||
|
<type>Label</type>
|
||||||
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
|
<autoMaxHeight>true</autoMaxHeight>
|
||||||
|
<extInfo xsi:type="form:LabelDecorationExtInfo">
|
||||||
|
<horizontalAlign>Left</horizontalAlign>
|
||||||
|
</extInfo>
|
||||||
|
</extendedTooltip>
|
||||||
|
<contextMenu>
|
||||||
|
<name>ВыбранныеПользователиСтрокаПоискаКонтекстноеМеню</name>
|
||||||
|
<id>56</id>
|
||||||
|
<autoFill>true</autoFill>
|
||||||
|
</contextMenu>
|
||||||
|
<source>ВыбранныеПользователи</source>
|
||||||
|
<extInfo xsi:type="form:SearchStringAdditionExtInfo">
|
||||||
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
|
</extInfo>
|
||||||
|
</searchStringAddition>
|
||||||
|
<viewStatusAddition>
|
||||||
|
<name>ВыбранныеПользователиСостояниеПросмотра</name>
|
||||||
|
<id>61</id>
|
||||||
|
<extendedTooltip>
|
||||||
|
<name>ВыбранныеПользователиСостояниеПросмотраРасширеннаяПодсказка</name>
|
||||||
|
<id>63</id>
|
||||||
|
<type>Label</type>
|
||||||
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
|
<autoMaxHeight>true</autoMaxHeight>
|
||||||
|
<extInfo xsi:type="form:LabelDecorationExtInfo">
|
||||||
|
<horizontalAlign>Left</horizontalAlign>
|
||||||
|
</extInfo>
|
||||||
|
</extendedTooltip>
|
||||||
|
<contextMenu>
|
||||||
|
<name>ВыбранныеПользователиСостояниеПросмотраКонтекстноеМеню</name>
|
||||||
|
<id>62</id>
|
||||||
|
<autoFill>true</autoFill>
|
||||||
|
</contextMenu>
|
||||||
|
<type>ViewStatusAddition</type>
|
||||||
|
<source>ВыбранныеПользователи</source>
|
||||||
|
<extInfo xsi:type="form:ViewStatusAdditionExtInfo">
|
||||||
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
|
</extInfo>
|
||||||
|
</viewStatusAddition>
|
||||||
|
<searchControlAddition>
|
||||||
|
<name>ВыбранныеПользователиУправлениеПоиском</name>
|
||||||
|
<id>58</id>
|
||||||
|
<extendedTooltip>
|
||||||
|
<name>ВыбранныеПользователиУправлениеПоискомРасширеннаяПодсказка</name>
|
||||||
|
<id>60</id>
|
||||||
|
<type>Label</type>
|
||||||
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
|
<autoMaxHeight>true</autoMaxHeight>
|
||||||
|
<extInfo xsi:type="form:LabelDecorationExtInfo">
|
||||||
|
<horizontalAlign>Left</horizontalAlign>
|
||||||
|
</extInfo>
|
||||||
|
</extendedTooltip>
|
||||||
|
<contextMenu>
|
||||||
|
<name>ВыбранныеПользователиУправлениеПоискомКонтекстноеМеню</name>
|
||||||
|
<id>59</id>
|
||||||
|
<autoFill>true</autoFill>
|
||||||
|
</contextMenu>
|
||||||
|
<type>SearchControlAddition</type>
|
||||||
|
<source>ВыбранныеПользователи</source>
|
||||||
|
<extInfo xsi:type="form:SearchControlAdditionExtInfo">
|
||||||
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
|
</extInfo>
|
||||||
|
</searchControlAddition>
|
||||||
|
<extendedTooltip>
|
||||||
|
<name>ВыбранныеПользователиРасширеннаяПодсказка</name>
|
||||||
|
<id>54</id>
|
||||||
|
<type>Label</type>
|
||||||
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
|
<autoMaxHeight>true</autoMaxHeight>
|
||||||
|
<extInfo xsi:type="form:LabelDecorationExtInfo">
|
||||||
|
<horizontalAlign>Left</horizontalAlign>
|
||||||
|
</extInfo>
|
||||||
|
</extendedTooltip>
|
||||||
|
<contextMenu>
|
||||||
|
<name>ВыбранныеПользователиКонтекстноеМеню</name>
|
||||||
|
<id>53</id>
|
||||||
|
<autoFill>true</autoFill>
|
||||||
|
</contextMenu>
|
||||||
|
<changeRowSet>true</changeRowSet>
|
||||||
|
<changeRowOrder>true</changeRowOrder>
|
||||||
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
|
<autoMaxHeight>true</autoMaxHeight>
|
||||||
|
<autoMaxRowsCount>true</autoMaxRowsCount>
|
||||||
|
<selectionMode>MultiRow</selectionMode>
|
||||||
|
<headerHeight>1</headerHeight>
|
||||||
|
<footerHeight>1</footerHeight>
|
||||||
|
<horizontalScrollBar>AutoUse</horizontalScrollBar>
|
||||||
|
<verticalScrollBar>AutoUse</verticalScrollBar>
|
||||||
|
<horizontalLines>true</horizontalLines>
|
||||||
|
<verticalLines>true</verticalLines>
|
||||||
|
<useAlternationRowColorBWA>false</useAlternationRowColorBWA>
|
||||||
|
<searchOnInput>Auto</searchOnInput>
|
||||||
|
<initialListView>Auto</initialListView>
|
||||||
|
<horizontalStretch>true</horizontalStretch>
|
||||||
|
<verticalStretch>true</verticalStretch>
|
||||||
|
<fileDragMode>AsFileRef</fileDragMode>
|
||||||
|
<autoMaxCardHeight>true</autoMaxCardHeight>
|
||||||
|
<rowFilter xsi:type="core:UndefinedValue"/>
|
||||||
|
</items>
|
||||||
|
<visible>true</visible>
|
||||||
|
<enabled>true</enabled>
|
||||||
|
<userVisible>
|
||||||
|
<common>true</common>
|
||||||
|
</userVisible>
|
||||||
|
<title>
|
||||||
|
<key>ru</key>
|
||||||
|
<value>Группа подбор</value>
|
||||||
|
</title>
|
||||||
|
<extendedTooltip>
|
||||||
|
<name>ГруппаПодборРасширеннаяПодсказка</name>
|
||||||
|
<id>50</id>
|
||||||
|
<type>Label</type>
|
||||||
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
|
<autoMaxHeight>true</autoMaxHeight>
|
||||||
|
<extInfo xsi:type="form:LabelDecorationExtInfo">
|
||||||
|
<horizontalAlign>Left</horizontalAlign>
|
||||||
|
</extInfo>
|
||||||
|
</extendedTooltip>
|
||||||
|
<type>UsualGroup</type>
|
||||||
|
<extInfo xsi:type="form:UsualGroupExtInfo">
|
||||||
|
<group>HorizontalIfPossible</group>
|
||||||
|
<behavior>Auto</behavior>
|
||||||
|
<representation>WeakSeparation</representation>
|
||||||
|
<showLeftMargin>true</showLeftMargin>
|
||||||
|
<united>true</united>
|
||||||
|
<throughAlign>Auto</throughAlign>
|
||||||
|
<currentRowUse>Auto</currentRowUse>
|
||||||
|
</extInfo>
|
||||||
|
</items>
|
||||||
|
<items xsi:type="form:Decoration">
|
||||||
|
<name>ДекорацияПредупреждение</name>
|
||||||
|
<id>44</id>
|
||||||
|
<title>
|
||||||
|
<key>ru</key>
|
||||||
|
<value>Список заполняется автоматически при операциях с использованием ключа электронной подписи. Передавать личный ключ электронной подписи другим лицам не рекомендуется.</value>
|
||||||
|
</title>
|
||||||
|
<visible>true</visible>
|
||||||
|
<enabled>true</enabled>
|
||||||
|
<userVisible>
|
||||||
|
<common>true</common>
|
||||||
|
</userVisible>
|
||||||
|
<extendedTooltip>
|
||||||
|
<name>ДекорацияПредупреждениеРасширеннаяПодсказка</name>
|
||||||
|
<id>46</id>
|
||||||
|
<type>Label</type>
|
||||||
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
|
<autoMaxHeight>true</autoMaxHeight>
|
||||||
|
<extInfo xsi:type="form:LabelDecorationExtInfo">
|
||||||
|
<horizontalAlign>Left</horizontalAlign>
|
||||||
|
</extInfo>
|
||||||
|
</extendedTooltip>
|
||||||
|
<contextMenu>
|
||||||
|
<name>ДекорацияПредупреждениеКонтекстноеМеню</name>
|
||||||
|
<id>45</id>
|
||||||
|
<autoFill>true</autoFill>
|
||||||
|
</contextMenu>
|
||||||
|
<type>Label</type>
|
||||||
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
|
<autoMaxHeight>true</autoMaxHeight>
|
||||||
|
<textColor xsi:type="core:ColorRef">
|
||||||
|
<color>Style.ПоясняющийТекст</color>
|
||||||
|
</textColor>
|
||||||
|
<extInfo xsi:type="form:LabelDecorationExtInfo">
|
||||||
|
<horizontalAlign>Left</horizontalAlign>
|
||||||
|
</extInfo>
|
||||||
|
</items>
|
||||||
<visible>true</visible>
|
<visible>true</visible>
|
||||||
<enabled>true</enabled>
|
<enabled>true</enabled>
|
||||||
<userVisible>
|
<userVisible>
|
||||||
@@ -655,6 +921,64 @@
|
|||||||
<common>true</common>
|
<common>true</common>
|
||||||
</edit>
|
</edit>
|
||||||
</attributes>
|
</attributes>
|
||||||
|
<attributes>
|
||||||
|
<name>ВыбранныеПользователи</name>
|
||||||
|
<title>
|
||||||
|
<key>ru</key>
|
||||||
|
<value>Выбранные пользователи</value>
|
||||||
|
</title>
|
||||||
|
<id>4</id>
|
||||||
|
<valueType>
|
||||||
|
<types>ValueTable</types>
|
||||||
|
</valueType>
|
||||||
|
<view>
|
||||||
|
<common>true</common>
|
||||||
|
</view>
|
||||||
|
<edit>
|
||||||
|
<common>true</common>
|
||||||
|
</edit>
|
||||||
|
<columns>
|
||||||
|
<name>Основной</name>
|
||||||
|
<id>5</id>
|
||||||
|
<valueType>
|
||||||
|
<types>Boolean</types>
|
||||||
|
</valueType>
|
||||||
|
<view>
|
||||||
|
<common>true</common>
|
||||||
|
</view>
|
||||||
|
<edit>
|
||||||
|
<common>true</common>
|
||||||
|
</edit>
|
||||||
|
</columns>
|
||||||
|
<columns>
|
||||||
|
<name>Пользователь</name>
|
||||||
|
<title>
|
||||||
|
<key>ru</key>
|
||||||
|
<value>Пользователь</value>
|
||||||
|
</title>
|
||||||
|
<id>6</id>
|
||||||
|
<valueType>
|
||||||
|
<types>CatalogRef.Пользователи</types>
|
||||||
|
</valueType>
|
||||||
|
<view>
|
||||||
|
<common>true</common>
|
||||||
|
</view>
|
||||||
|
<edit>
|
||||||
|
<common>true</common>
|
||||||
|
</edit>
|
||||||
|
</columns>
|
||||||
|
</attributes>
|
||||||
|
<attributes>
|
||||||
|
<name>ВладелецСертификата</name>
|
||||||
|
<id>7</id>
|
||||||
|
<valueType/>
|
||||||
|
<view>
|
||||||
|
<common>true</common>
|
||||||
|
</view>
|
||||||
|
<edit>
|
||||||
|
<common>true</common>
|
||||||
|
</edit>
|
||||||
|
</attributes>
|
||||||
<formCommands>
|
<formCommands>
|
||||||
<name>ПометитьВсе</name>
|
<name>ПометитьВсе</name>
|
||||||
<title>
|
<title>
|
||||||
|
|||||||
+112
-19
@@ -46,6 +46,37 @@
|
|||||||
|
|
||||||
#КонецОбласти
|
#КонецОбласти
|
||||||
|
|
||||||
|
#Область ОбработчикиСобытийЭлементовТаблицыФормыВыбранныеПользователи
|
||||||
|
|
||||||
|
&НаКлиенте
|
||||||
|
Процедура ВыбранныеПользователиПередНачаломДобавления(Элемент, Отказ, Копирование, Родитель, ЭтоГруппа, Параметр)
|
||||||
|
|
||||||
|
Отказ = Истина;
|
||||||
|
ПараметрыПодбора = Новый Структура;
|
||||||
|
ПараметрыПодбора.Вставить("РежимВыбора", Истина);
|
||||||
|
ПараметрыПодбора.Вставить("ЗакрыватьПриВыборе", Ложь);
|
||||||
|
ПараметрыПодбора.Вставить("МножественныйВыбор", Истина);
|
||||||
|
ПараметрыПодбора.Вставить("РасширенныйПодбор", Истина);
|
||||||
|
ПараметрыПодбора.Вставить("СкрытьПользователейБезПользователяИБ", Истина);
|
||||||
|
|
||||||
|
Выбранные = Новый Массив;
|
||||||
|
Для Каждого Строка Из ВыбранныеПользователи Цикл
|
||||||
|
Выбранные.Добавить(Строка.Пользователь);
|
||||||
|
КонецЦикла;
|
||||||
|
|
||||||
|
ПараметрыПодбора.Вставить("ВыбранныеПользователи", Выбранные);
|
||||||
|
ПараметрыПодбора.Вставить("ЗаголовокФормыПодбора",
|
||||||
|
НСтр("ru = 'Выберите пользователей, у которых сертификат будет доступен в списке выбора'"));
|
||||||
|
ПараметрыПодбора.Вставить("ЗаголовокКнопкиЗавершенияПодбора", НСтр("ru = 'Выбрать'"));
|
||||||
|
|
||||||
|
Обработчик = Новый ОписаниеОповещения("ДобавитьПользователей", ЭтотОбъект);
|
||||||
|
|
||||||
|
ОткрытьФорму("Справочник.Пользователи.ФормаВыбора", ПараметрыПодбора,,,,, Обработчик);
|
||||||
|
|
||||||
|
КонецПроцедуры
|
||||||
|
|
||||||
|
#КонецОбласти
|
||||||
|
|
||||||
#Область ОбработчикиКомандФормы
|
#Область ОбработчикиКомандФормы
|
||||||
|
|
||||||
&НаКлиенте
|
&НаКлиенте
|
||||||
@@ -59,11 +90,17 @@
|
|||||||
Результат.Вставить("Пользователь", ПредопределенноеЗначение("Справочник.Пользователи.ПустаяСсылка"));
|
Результат.Вставить("Пользователь", ПредопределенноеЗначение("Справочник.Пользователи.ПустаяСсылка"));
|
||||||
|
|
||||||
Если СпособВыбора = "СписокПользователей" Тогда
|
Если СпособВыбора = "СписокПользователей" Тогда
|
||||||
Для Каждого СтрокаПользователя Из ТаблицаПользователей Цикл
|
Если Элементы.ТаблицаПользователей.Видимость Тогда
|
||||||
Если СтрокаПользователя.Пометка Тогда
|
Для Каждого СтрокаПользователя Из ТаблицаПользователей Цикл
|
||||||
|
Если СтрокаПользователя.Пометка Тогда
|
||||||
|
Результат.Пользователи.Добавить(СтрокаПользователя.Пользователь);
|
||||||
|
КонецЕсли;
|
||||||
|
КонецЦикла;
|
||||||
|
Иначе
|
||||||
|
Для Каждого СтрокаПользователя Из ВыбранныеПользователи Цикл
|
||||||
Результат.Пользователи.Добавить(СтрокаПользователя.Пользователь);
|
Результат.Пользователи.Добавить(СтрокаПользователя.Пользователь);
|
||||||
КонецЕсли;
|
КонецЦикла;
|
||||||
КонецЦикла;
|
КонецЕсли;
|
||||||
Иначе
|
Иначе
|
||||||
Результат.Пользователь = ПользователиКлиент.ТекущийПользователь();
|
Результат.Пользователь = ПользователиКлиент.ТекущийПользователь();
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
@@ -95,6 +132,24 @@
|
|||||||
|
|
||||||
#Область СлужебныеПроцедурыИФункции
|
#Область СлужебныеПроцедурыИФункции
|
||||||
|
|
||||||
|
&НаКлиенте
|
||||||
|
Процедура ДобавитьПользователей(Результат, ДополнительныеПараметры) Экспорт
|
||||||
|
|
||||||
|
Если Результат = Неопределено Тогда
|
||||||
|
Возврат;
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
ВыбранныеПользователи.Очистить();
|
||||||
|
Для Каждого Пользователь Из Результат Цикл
|
||||||
|
НоваяСтрока = ВыбранныеПользователи.Добавить();
|
||||||
|
НоваяСтрока.Пользователь = Пользователь;
|
||||||
|
Если Пользователь = ВладелецСертификата Тогда
|
||||||
|
НоваяСтрока.Основной = Истина;
|
||||||
|
КонецЕсли;
|
||||||
|
КонецЦикла;
|
||||||
|
|
||||||
|
КонецПроцедуры
|
||||||
|
|
||||||
&НаКлиенте
|
&НаКлиенте
|
||||||
Процедура ИзменитьПометкиСписка(ЗначениеПометки)
|
Процедура ИзменитьПометкиСписка(ЗначениеПометки)
|
||||||
|
|
||||||
@@ -107,21 +162,41 @@
|
|||||||
&НаСервере
|
&НаСервере
|
||||||
Процедура НастроитьУсловноеОформление()
|
Процедура НастроитьУсловноеОформление()
|
||||||
|
|
||||||
ЭлементУсловногоОформления = УсловноеОформление.Элементы.Добавить();
|
Если Элементы.ТаблицаПользователей.Видимость Тогда
|
||||||
|
ЭлементУсловногоОформления = УсловноеОформление.Элементы.Добавить();
|
||||||
|
|
||||||
|
ЭлементЦветаОформления = ЭлементУсловногоОформления.Оформление.Элементы.Найти("BackColor");
|
||||||
|
ЭлементЦветаОформления.Значение = ЦветаСтиля.ДобавленныйРеквизитФон;
|
||||||
|
ЭлементЦветаОформления.Использование = Истина;
|
||||||
|
|
||||||
|
ЭлементОтбораДанных = ЭлементУсловногоОформления.Отбор.Элементы.Добавить(Тип("ЭлементОтбораКомпоновкиДанных"));
|
||||||
|
ЭлементОтбораДанных.ЛевоеЗначение = Новый ПолеКомпоновкиДанных("ТаблицаПользователей.Основной");
|
||||||
|
ЭлементОтбораДанных.ВидСравнения = ВидСравненияКомпоновкиДанных.Равно;
|
||||||
|
ЭлементОтбораДанных.ПравоеЗначение = Истина;
|
||||||
|
ЭлементОтбораДанных.Использование = Истина;
|
||||||
|
|
||||||
|
ЭлементПоляОформления = ЭлементУсловногоОформления.Поля.Элементы.Добавить();
|
||||||
|
ЭлементПоляОформления.Поле = Новый ПолеКомпоновкиДанных("ТаблицаПользователей");
|
||||||
|
ЭлементПоляОформления.Использование = Истина;
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
ЭлементЦветаОформления = ЭлементУсловногоОформления.Оформление.Элементы.Найти("BackColor");
|
Если Элементы.ТаблицаПользователей.Видимость Тогда
|
||||||
ЭлементЦветаОформления.Значение = ЦветаСтиля.ДобавленныйРеквизитФон;
|
ЭлементУсловногоОформления = УсловноеОформление.Элементы.Добавить();
|
||||||
ЭлементЦветаОформления.Использование = Истина;
|
|
||||||
|
ЭлементЦветаОформления = ЭлементУсловногоОформления.Оформление.Элементы.Найти("BackColor");
|
||||||
ЭлементОтбораДанных = ЭлементУсловногоОформления.Отбор.Элементы.Добавить(Тип("ЭлементОтбораКомпоновкиДанных"));
|
ЭлементЦветаОформления.Значение = ЦветаСтиля.ДобавленныйРеквизитФон;
|
||||||
ЭлементОтбораДанных.ЛевоеЗначение = Новый ПолеКомпоновкиДанных("ТаблицаПользователей.Основной");
|
ЭлементЦветаОформления.Использование = Истина;
|
||||||
ЭлементОтбораДанных.ВидСравнения = ВидСравненияКомпоновкиДанных.Равно;
|
|
||||||
ЭлементОтбораДанных.ПравоеЗначение = Истина;
|
ЭлементОтбораДанных = ЭлементУсловногоОформления.Отбор.Элементы.Добавить(Тип("ЭлементОтбораКомпоновкиДанных"));
|
||||||
ЭлементОтбораДанных.Использование = Истина;
|
ЭлементОтбораДанных.ЛевоеЗначение = Новый ПолеКомпоновкиДанных("ВыбранныеПользователи.Основной");
|
||||||
|
ЭлементОтбораДанных.ВидСравнения = ВидСравненияКомпоновкиДанных.Равно;
|
||||||
ЭлементПоляОформления = ЭлементУсловногоОформления.Поля.Элементы.Добавить();
|
ЭлементОтбораДанных.ПравоеЗначение = Истина;
|
||||||
ЭлементПоляОформления.Поле = Новый ПолеКомпоновкиДанных("ТаблицаПользователей");
|
ЭлементОтбораДанных.Использование = Истина;
|
||||||
ЭлементПоляОформления.Использование = Истина;
|
|
||||||
|
ЭлементПоляОформления = ЭлементУсловногоОформления.Поля.Элементы.Добавить();
|
||||||
|
ЭлементПоляОформления.Поле = Новый ПолеКомпоновкиДанных("ВыбранныеПользователи");
|
||||||
|
ЭлементПоляОформления.Использование = Истина;
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
@@ -170,7 +245,23 @@
|
|||||||
Запрос.УстановитьПараметр("ПустойИдентификаторПользователяИБ", Новый УникальныйИдентификатор("00000000-0000-0000-0000-000000000000"));
|
Запрос.УстановитьПараметр("ПустойИдентификаторПользователяИБ", Новый УникальныйИдентификатор("00000000-0000-0000-0000-000000000000"));
|
||||||
Запрос.УстановитьПараметр("ВладелецСертификата", ВладелецСертификата);
|
Запрос.УстановитьПараметр("ВладелецСертификата", ВладелецСертификата);
|
||||||
|
|
||||||
ТаблицаПользователей.Загрузить(Запрос.Выполнить().Выгрузить());
|
Результат = Запрос.Выполнить().Выгрузить();
|
||||||
|
Если Результат.Количество() > 30 Тогда
|
||||||
|
ВыбранныеПользователи.Очистить();
|
||||||
|
Для Каждого Пользователь Из МассивПользователей Цикл
|
||||||
|
НоваяСтрока = ВыбранныеПользователи.Добавить();
|
||||||
|
НоваяСтрока.Пользователь = Пользователь;
|
||||||
|
Если Пользователь = ВладелецСертификата Тогда
|
||||||
|
НоваяСтрока.Основной = Истина;
|
||||||
|
КонецЕсли;
|
||||||
|
КонецЦикла;
|
||||||
|
Элементы.ТаблицаПользователей.Видимость = Ложь;
|
||||||
|
Элементы.ВыбранныеПользователи.Видимость = Истина;
|
||||||
|
Иначе
|
||||||
|
ТаблицаПользователей.Загрузить(Результат);
|
||||||
|
Элементы.ТаблицаПользователей.Видимость = Истина;
|
||||||
|
Элементы.ВыбранныеПользователи.Видимость = Ложь;
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
@@ -181,10 +272,12 @@
|
|||||||
|
|
||||||
Если КонтекстФормы.РежимПросмотра Тогда
|
Если КонтекстФормы.РежимПросмотра Тогда
|
||||||
ЭлементыФормы.ТаблицаПользователей.ТолькоПросмотр = Истина;
|
ЭлементыФормы.ТаблицаПользователей.ТолькоПросмотр = Истина;
|
||||||
|
ЭлементыФормы.ВыбранныеПользователи.ТолькоПросмотр = Истина;
|
||||||
ЭлементыФормы.СпособВыбора.ТолькоПросмотр = Истина;
|
ЭлементыФормы.СпособВыбора.ТолькоПросмотр = Истина;
|
||||||
ЭлементыФормы.СпособВыбораСписок.ТолькоПросмотр = Истина;
|
ЭлементыФормы.СпособВыбораСписок.ТолькоПросмотр = Истина;
|
||||||
Иначе
|
Иначе
|
||||||
ЭлементыФормы.ТаблицаПользователей.ТолькоПросмотр = НЕ КонтекстФормы.СпособВыбора = "СписокПользователей";
|
ЭлементыФормы.ТаблицаПользователей.ТолькоПросмотр = НЕ КонтекстФормы.СпособВыбора = "СписокПользователей";
|
||||||
|
ЭлементыФормы.ВыбранныеПользователи.ТолькоПросмотр = НЕ КонтекстФормы.СпособВыбора = "СписокПользователей";
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
ЭлементыФормы.ПользователиПометитьВсе.Доступность = НЕ ЭлементыФормы.ТаблицаПользователей.ТолькоПросмотр;
|
ЭлементыФормы.ПользователиПометитьВсе.Доступность = НЕ ЭлементыФормы.ТаблицаПользователей.ТолькоПросмотр;
|
||||||
|
|||||||
+4
-4
@@ -652,7 +652,7 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Вертикальная группа 3</value>
|
<value>Вертикальная группа</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ВертикальнаяГруппа3РасширеннаяПодсказка</name>
|
<name>ВертикальнаяГруппа3РасширеннаяПодсказка</name>
|
||||||
@@ -876,7 +876,7 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Горизонтальная группа 2</value>
|
<value>Горизонтальная группа</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ГоризонтальнаяГруппа2РасширеннаяПодсказка</name>
|
<name>ГоризонтальнаяГруппа2РасширеннаяПодсказка</name>
|
||||||
@@ -992,7 +992,7 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Вертикальная группа 3</value>
|
<value>Вертикальная группа</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ГоризонтальнаяГруппа3РасширеннаяПодсказка</name>
|
<name>ГоризонтальнаяГруппа3РасширеннаяПодсказка</name>
|
||||||
@@ -1580,7 +1580,7 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Горизонтальная группа 1</value>
|
<value>Горизонтальная группа</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ГоризонтальнаяГруппа1РасширеннаяПодсказка</name>
|
<name>ГоризонтальнаяГруппа1РасширеннаяПодсказка</name>
|
||||||
|
|||||||
@@ -212,7 +212,7 @@
|
|||||||
<excludedCommands>Delete</excludedCommands>
|
<excludedCommands>Delete</excludedCommands>
|
||||||
<excludedCommands>SetDeletionMark</excludedCommands>
|
<excludedCommands>SetDeletionMark</excludedCommands>
|
||||||
<items xsi:type="form:FormGroup">
|
<items xsi:type="form:FormGroup">
|
||||||
<name>ВертикальнаяГруппа1</name>
|
<name>ПерваяКолонка</name>
|
||||||
<id>56</id>
|
<id>56</id>
|
||||||
<displayImportance>VeryHigh</displayImportance>
|
<displayImportance>VeryHigh</displayImportance>
|
||||||
<items xsi:type="form:FormField">
|
<items xsi:type="form:FormField">
|
||||||
@@ -300,10 +300,10 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Вертикальная группа 1</value>
|
<value>Первая колонка</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ВертикальнаяГруппа1РасширеннаяПодсказка</name>
|
<name>ПерваяКолонкаРасширеннаяПодсказка</name>
|
||||||
<id>57</id>
|
<id>57</id>
|
||||||
<type>Label</type>
|
<type>Label</type>
|
||||||
<autoMaxWidth>true</autoMaxWidth>
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
@@ -320,7 +320,7 @@
|
|||||||
</extInfo>
|
</extInfo>
|
||||||
</items>
|
</items>
|
||||||
<items xsi:type="form:FormGroup">
|
<items xsi:type="form:FormGroup">
|
||||||
<name>ВертикальнаяГруппа2</name>
|
<name>ВтораяКолонка</name>
|
||||||
<id>58</id>
|
<id>58</id>
|
||||||
<items xsi:type="form:FormField">
|
<items xsi:type="form:FormField">
|
||||||
<name>СписокПорядокЗаполнения</name>
|
<name>СписокПорядокЗаполнения</name>
|
||||||
@@ -405,10 +405,10 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Вертикальная группа 2</value>
|
<value>Вторая колонка</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ВертикальнаяГруппа2РасширеннаяПодсказка</name>
|
<name>ВтораяКолонкаРасширеннаяПодсказка</name>
|
||||||
<id>59</id>
|
<id>59</id>
|
||||||
<type>Label</type>
|
<type>Label</type>
|
||||||
<autoMaxWidth>true</autoMaxWidth>
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
@@ -425,7 +425,7 @@
|
|||||||
</extInfo>
|
</extInfo>
|
||||||
</items>
|
</items>
|
||||||
<items xsi:type="form:FormGroup">
|
<items xsi:type="form:FormGroup">
|
||||||
<name>ВертикальнаяГруппа3</name>
|
<name>ТретьяКолонка</name>
|
||||||
<id>60</id>
|
<id>60</id>
|
||||||
<items xsi:type="form:FormField">
|
<items xsi:type="form:FormField">
|
||||||
<name>СписокПолныйПутьWindows</name>
|
<name>СписокПолныйПутьWindows</name>
|
||||||
@@ -518,10 +518,10 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Вертикальная группа 3</value>
|
<value>Третья колонка</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ВертикальнаяГруппа3РасширеннаяПодсказка</name>
|
<name>ТретьяКолонкаРасширеннаяПодсказка</name>
|
||||||
<id>61</id>
|
<id>61</id>
|
||||||
<type>Label</type>
|
<type>Label</type>
|
||||||
<autoMaxWidth>true</autoMaxWidth>
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
|
|||||||
@@ -264,7 +264,7 @@
|
|||||||
&НаКлиенте
|
&НаКлиенте
|
||||||
Процедура СписокПриАктивизацииСтроки(Элемент)
|
Процедура СписокПриАктивизацииСтроки(Элемент)
|
||||||
|
|
||||||
Если Элементы.Список.ТекущиеДанные <> Неопределено Тогда
|
Если СтандартныеПодсистемыКлиент.ЭтоЭлементДинамическогоСписка(Элементы.Список) Тогда
|
||||||
НавигационнаяСсылка = ПолучитьНавигационнуюСсылку(Элементы.Список.ТекущиеДанные.Ссылка);
|
НавигационнаяСсылка = ПолучитьНавигационнуюСсылку(Элементы.Список.ТекущиеДанные.Ссылка);
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
ОбработкаОжиданияУстановитьДоступностьФайловыхКоманд();
|
ОбработкаОжиданияУстановитьДоступностьФайловыхКоманд();
|
||||||
@@ -771,13 +771,10 @@
|
|||||||
&НаКлиенте
|
&НаКлиенте
|
||||||
Процедура Удалить(Команда)
|
Процедура Удалить(Команда)
|
||||||
|
|
||||||
Если Элементы.Список.ТекущаяСтрока = Неопределено Тогда
|
ВыделенныеСтроки = ВыделенныеСтроки();
|
||||||
Возврат;
|
|
||||||
КонецЕсли;
|
|
||||||
|
|
||||||
РаботаСФайламиСлужебныйКлиент.УдалитьДанные(
|
ОписаниеОповещения = Новый ОписаниеОповещения("ПослеУдаленияДанных", ЭтотОбъект);
|
||||||
Новый ОписаниеОповещения("ПослеУдаленияДанных", ЭтотОбъект),
|
РаботаСФайламиСлужебныйКлиент.УдалитьДанныеФайлов(ОписаниеОповещения, ВыделенныеСтроки, УникальныйИдентификатор);
|
||||||
Элементы.Список.ТекущиеДанные.Ссылка, УникальныйИдентификатор);
|
|
||||||
|
|
||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
@@ -1635,4 +1632,18 @@
|
|||||||
|
|
||||||
// Конец СтандартныеПодсистемы.ПодключаемыеКоманды
|
// Конец СтандартныеПодсистемы.ПодключаемыеКоманды
|
||||||
|
|
||||||
|
&НаКлиенте
|
||||||
|
Функция ВыделенныеСтроки()
|
||||||
|
ВыделенныеСтроки = Новый Массив;
|
||||||
|
|
||||||
|
Для Каждого ВыделеннаяСтрока Из Элементы.Список.ВыделенныеСтроки Цикл
|
||||||
|
Если ТипЗнч(ВыделеннаяСтрока) <> Тип("СтрокаГруппировкиДинамическогоСписка") Тогда
|
||||||
|
ВыделенныеСтроки.Добавить(ВыделеннаяСтрока);
|
||||||
|
КонецЕсли;
|
||||||
|
КонецЦикла;
|
||||||
|
|
||||||
|
Возврат ВыделенныеСтроки
|
||||||
|
|
||||||
|
КонецФункции
|
||||||
|
|
||||||
#КонецОбласти
|
#КонецОбласти
|
||||||
@@ -837,7 +837,7 @@
|
|||||||
<extInfo xsi:type="form:ButtonGroupExtInfo"/>
|
<extInfo xsi:type="form:ButtonGroupExtInfo"/>
|
||||||
</items>
|
</items>
|
||||||
<items xsi:type="form:FormGroup">
|
<items xsi:type="form:FormGroup">
|
||||||
<name>ФормаДереваАнкетыГруппа1</name>
|
<name>ФормаДереваАнкетыГруппаУдалить</name>
|
||||||
<id>133</id>
|
<id>133</id>
|
||||||
<items xsi:type="form:Button">
|
<items xsi:type="form:Button">
|
||||||
<name>ДеревоАнкетыКоманднаяПанельУдалить</name>
|
<name>ДеревоАнкетыКоманднаяПанельУдалить</name>
|
||||||
@@ -873,10 +873,10 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Форма дерева анкеты группа 1</value>
|
<value>Удалить</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ФормаДереваАнкетыГруппа1РасширеннаяПодсказка</name>
|
<name>ФормаДереваАнкетыГруппаУдалитьРасширеннаяПодсказка</name>
|
||||||
<id>134</id>
|
<id>134</id>
|
||||||
<type>Label</type>
|
<type>Label</type>
|
||||||
<autoMaxWidth>true</autoMaxWidth>
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
@@ -1245,7 +1245,7 @@
|
|||||||
<representationInContextMenu>Auto</representationInContextMenu>
|
<representationInContextMenu>Auto</representationInContextMenu>
|
||||||
</items>
|
</items>
|
||||||
<items xsi:type="form:FormGroup">
|
<items xsi:type="form:FormGroup">
|
||||||
<name>ФормаДереваАнкетыКонтекстноеМенюГруппа1</name>
|
<name>ФормаДереваАнкетыКонтекстноеМенюГруппаПеремещение</name>
|
||||||
<id>135</id>
|
<id>135</id>
|
||||||
<items xsi:type="form:Button">
|
<items xsi:type="form:Button">
|
||||||
<name>ДеревоАнкетыКонтекстноеМенюПереместитьВверх</name>
|
<name>ДеревоАнкетыКонтекстноеМенюПереместитьВверх</name>
|
||||||
@@ -1308,10 +1308,10 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Форма дерева анкеты контекстное меню группа 1</value>
|
<value>Перемещение</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ФормаДереваАнкетыКонтекстноеМенюГруппа1РасширеннаяПодсказка</name>
|
<name>ФормаДереваАнкетыКонтекстноеМенюГруппаПеремещениеРасширеннаяПодсказка</name>
|
||||||
<id>136</id>
|
<id>136</id>
|
||||||
<type>Label</type>
|
<type>Label</type>
|
||||||
<autoMaxWidth>true</autoMaxWidth>
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
@@ -1323,7 +1323,7 @@
|
|||||||
<extInfo xsi:type="form:ButtonGroupExtInfo"/>
|
<extInfo xsi:type="form:ButtonGroupExtInfo"/>
|
||||||
</items>
|
</items>
|
||||||
<items xsi:type="form:FormGroup">
|
<items xsi:type="form:FormGroup">
|
||||||
<name>ФормаДереваАнкетыКонтекстноеМенюГруппа2</name>
|
<name>ФормаДереваАнкетыКонтекстноеМенюГруппаУдалить</name>
|
||||||
<id>137</id>
|
<id>137</id>
|
||||||
<items xsi:type="form:Button">
|
<items xsi:type="form:Button">
|
||||||
<name>ДеревоАнкетыКонтекстноеМенюУдалить</name>
|
<name>ДеревоАнкетыКонтекстноеМенюУдалить</name>
|
||||||
@@ -1359,10 +1359,10 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Форма дерева анкеты контекстное меню группа 2</value>
|
<value>Удалить</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ФормаДереваАнкетыКонтекстноеМенюГруппа2РасширеннаяПодсказка</name>
|
<name>ФормаДереваАнкетыКонтекстноеМенюГруппаУдалитьРасширеннаяПодсказка</name>
|
||||||
<id>138</id>
|
<id>138</id>
|
||||||
<type>Label</type>
|
<type>Label</type>
|
||||||
<autoMaxWidth>true</autoMaxWidth>
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
|
|||||||
+3
-3
@@ -4101,7 +4101,7 @@
|
|||||||
<name>ЗначенияДополнительногоРеквизитаКоманднаяПанель</name>
|
<name>ЗначенияДополнительногоРеквизитаКоманднаяПанель</name>
|
||||||
<id>293</id>
|
<id>293</id>
|
||||||
<items xsi:type="form:FormGroup">
|
<items xsi:type="form:FormGroup">
|
||||||
<name>ЗначенияДополнительныхРеквизитов1Группа1</name>
|
<name>ЗначенияДополнительныхРеквизитовГруппа</name>
|
||||||
<id>310</id>
|
<id>310</id>
|
||||||
<items xsi:type="form:Button">
|
<items xsi:type="form:Button">
|
||||||
<name>ЗначенияДополнительногоРеквизитаСоздать</name>
|
<name>ЗначенияДополнительногоРеквизитаСоздать</name>
|
||||||
@@ -4162,10 +4162,10 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Значения дополнительных реквизитов 1 группа 1</value>
|
<value>Группа</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ЗначенияДополнительныхРеквизитов1Группа1РасширеннаяПодсказка</name>
|
<name>ЗначенияДополнительныхРеквизитовГруппаРасширеннаяПодсказка</name>
|
||||||
<id>311</id>
|
<id>311</id>
|
||||||
<type>Label</type>
|
<type>Label</type>
|
||||||
<autoMaxWidth>true</autoMaxWidth>
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
|
|||||||
@@ -21,7 +21,7 @@
|
|||||||
</dataPath>
|
</dataPath>
|
||||||
<titleLocation>None</titleLocation>
|
<titleLocation>None</titleLocation>
|
||||||
<items xsi:type="form:FormGroup">
|
<items xsi:type="form:FormGroup">
|
||||||
<name>КомандыПечатиГруппа1</name>
|
<name>КомандыПечатиВидимостьПредставление</name>
|
||||||
<id>32</id>
|
<id>32</id>
|
||||||
<items xsi:type="form:FormField">
|
<items xsi:type="form:FormField">
|
||||||
<name>КомандыПечатиВидимость</name>
|
<name>КомандыПечатиВидимость</name>
|
||||||
@@ -119,10 +119,10 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Команда Печати</value>
|
<value>Видимость и представление</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>КомандыПечатиГруппа1РасширеннаяПодсказка</name>
|
<name>КомандыПечатиВидимостьПредставлениеРасширеннаяПодсказка</name>
|
||||||
<id>33</id>
|
<id>33</id>
|
||||||
<type>Label</type>
|
<type>Label</type>
|
||||||
<autoMaxWidth>true</autoMaxWidth>
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
@@ -139,7 +139,7 @@
|
|||||||
</extInfo>
|
</extInfo>
|
||||||
</items>
|
</items>
|
||||||
<items xsi:type="form:FormGroup">
|
<items xsi:type="form:FormGroup">
|
||||||
<name>КомандыПечатиГруппа2</name>
|
<name>КомандыПечатиГруппаКомментарий</name>
|
||||||
<id>44</id>
|
<id>44</id>
|
||||||
<items xsi:type="form:FormField">
|
<items xsi:type="form:FormField">
|
||||||
<name>КомандыПечатиКомментарий</name>
|
<name>КомандыПечатиКомментарий</name>
|
||||||
@@ -197,10 +197,10 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Команды печати группа 2</value>
|
<value>Комментарий</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>КомандыПечатиГруппа2РасширеннаяПодсказка</name>
|
<name>КомандыПечатиГруппаКомментарийРасширеннаяПодсказка</name>
|
||||||
<id>45</id>
|
<id>45</id>
|
||||||
<type>Label</type>
|
<type>Label</type>
|
||||||
<autoMaxWidth>true</autoMaxWidth>
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
@@ -440,7 +440,7 @@
|
|||||||
<representationInContextMenu>Auto</representationInContextMenu>
|
<representationInContextMenu>Auto</representationInContextMenu>
|
||||||
</items>
|
</items>
|
||||||
<items xsi:type="form:FormGroup">
|
<items xsi:type="form:FormGroup">
|
||||||
<name>ФормаГруппа1</name>
|
<name>ФормаГруппаПрочее</name>
|
||||||
<id>39</id>
|
<id>39</id>
|
||||||
<items xsi:type="form:Button">
|
<items xsi:type="form:Button">
|
||||||
<name>ФормаУстановитьНастройкиПоУмолчанию</name>
|
<name>ФормаУстановитьНастройкиПоУмолчанию</name>
|
||||||
@@ -480,10 +480,10 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Форма группа 1</value>
|
<value>Прочее</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ФормаГруппа1РасширеннаяПодсказка</name>
|
<name>ФормаГруппаПрочееРасширеннаяПодсказка</name>
|
||||||
<id>40</id>
|
<id>40</id>
|
||||||
<type>Label</type>
|
<type>Label</type>
|
||||||
<autoMaxWidth>true</autoMaxWidth>
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
|
|||||||
@@ -1299,9 +1299,11 @@
|
|||||||
|
|
||||||
Для Каждого Криптопровайдер Из Результат.Программы Цикл
|
Для Каждого Криптопровайдер Из Результат.Программы Цикл
|
||||||
|
|
||||||
|
// Локализация
|
||||||
Если ЗначениеЗаполнено(Криптопровайдер.Программа) И Не ЕстьПроверяемыеПрограммы Тогда
|
Если ЗначениеЗаполнено(Криптопровайдер.Программа) И Не ЕстьПроверяемыеПрограммы Тогда
|
||||||
ЕстьПроверяемыеПрограммы = Истина;
|
ЕстьПроверяемыеПрограммы = Истина;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
// Конец Локализация
|
||||||
|
|
||||||
Найдено = Программы.НайтиСтроки(Новый Структура("ИмяПрограммы, ТипПрограммы",
|
Найдено = Программы.НайтиСтроки(Новый Структура("ИмяПрограммы, ТипПрограммы",
|
||||||
Криптопровайдер.ИмяПрограммы, Криптопровайдер.ТипПрограммы));
|
Криптопровайдер.ИмяПрограммы, Криптопровайдер.ТипПрограммы));
|
||||||
@@ -1325,12 +1327,14 @@
|
|||||||
|
|
||||||
КонецЦикла;
|
КонецЦикла;
|
||||||
|
|
||||||
|
// Локализация
|
||||||
Если Не ЕстьПроверяемыеПрограммы Тогда
|
Если Не ЕстьПроверяемыеПрограммы Тогда
|
||||||
Элементы.ГруппаПодсказкаКриптопровайдеры.Видимость = Истина;
|
Элементы.ГруппаПодсказкаКриптопровайдеры.Видимость = Истина;
|
||||||
Элементы.ДекорацияПроверкаУстановкиКриптопровайдера.Заголовок = СтроковыеФункцииКлиент.ФорматированнаяСтрока(
|
Элементы.ДекорацияПроверкаУстановкиКриптопровайдера.Заголовок = СтроковыеФункцииКлиент.ФорматированнаяСтрока(
|
||||||
НСтр("ru = 'Если планируется работа с усиленной квалифицированной электронной подписью, то на компьютере должна быть установлена сертифицированная программа (средство криптографической защиты информации).
|
НСтр("ru = 'Если планируется работа с усиленной квалифицированной электронной подписью, то на компьютере должна быть установлена сертифицированная программа (средство криптографической защиты информации).
|
||||||
|<a href = ""%1"">Установить.</a>'"), "ПроверитьУстановкуПрограммКриптографии");
|
|<a href = ""%1"">Установить.</a>'"), "ПроверитьУстановкуПрограммКриптографии");
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
// Конец Локализация
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
Если Оповещение <> Неопределено Тогда
|
Если Оповещение <> Неопределено Тогда
|
||||||
|
|||||||
@@ -516,7 +516,7 @@
|
|||||||
|
|
||||||
&НаКлиенте
|
&НаКлиенте
|
||||||
Процедура ВажностьВысокая(Команда)
|
Процедура ВажностьВысокая(Команда)
|
||||||
ВажностьПисьма = "Высокая";
|
ВажностьПисьма = РаботаСПочтовымиСообщениямиСлужебныйКлиентСервер.ВысокаяВажностьИнтернетПочтовогоСообщения();
|
||||||
Элементы.ГруппаВажность.Картинка = БиблиотекаКартинок.ВажностьВысокая;
|
Элементы.ГруппаВажность.Картинка = БиблиотекаКартинок.ВажностьВысокая;
|
||||||
Элементы.ГруппаВажность.Подсказка = НСтр("ru = 'Высокая важность'");
|
Элементы.ГруппаВажность.Подсказка = НСтр("ru = 'Высокая важность'");
|
||||||
Модифицированность = Истина;
|
Модифицированность = Истина;
|
||||||
@@ -524,7 +524,7 @@
|
|||||||
|
|
||||||
&НаКлиенте
|
&НаКлиенте
|
||||||
Процедура ВажностьОбычная(Команда)
|
Процедура ВажностьОбычная(Команда)
|
||||||
ВажностьПисьма = "Обычная";
|
ВажностьПисьма = РаботаСПочтовымиСообщениямиСлужебныйКлиентСервер.ОбычнаяВажностьИнтернетПочтовогоСообщения();
|
||||||
Элементы.ГруппаВажность.Картинка = БиблиотекаКартинок.ВажностьНеЗадана;
|
Элементы.ГруппаВажность.Картинка = БиблиотекаКартинок.ВажностьНеЗадана;
|
||||||
Элементы.ГруппаВажность.Подсказка = НСтр("ru = 'Обычная важность'");
|
Элементы.ГруппаВажность.Подсказка = НСтр("ru = 'Обычная важность'");
|
||||||
Модифицированность = Истина;
|
Модифицированность = Истина;
|
||||||
@@ -532,7 +532,7 @@
|
|||||||
|
|
||||||
&НаКлиенте
|
&НаКлиенте
|
||||||
Процедура ВажностьНизкая(Команда)
|
Процедура ВажностьНизкая(Команда)
|
||||||
ВажностьПисьма = "Низкая";
|
ВажностьПисьма = РаботаСПочтовымиСообщениямиСлужебныйКлиентСервер.НизкаяВажностьИнтернетПочтовогоСообщения();
|
||||||
Элементы.ГруппаВажность.Картинка = БиблиотекаКартинок.ВажностьНизкая;
|
Элементы.ГруппаВажность.Картинка = БиблиотекаКартинок.ВажностьНизкая;
|
||||||
Элементы.ГруппаВажность.Подсказка = НСтр("ru = 'Низкая важность'");
|
Элементы.ГруппаВажность.Подсказка = НСтр("ru = 'Низкая важность'");
|
||||||
Модифицированность = Истина;
|
Модифицированность = Истина;
|
||||||
@@ -810,7 +810,7 @@
|
|||||||
ПараметрыПисьма.Вставить("Тело", ТелоПисьма);
|
ПараметрыПисьма.Вставить("Тело", ТелоПисьма);
|
||||||
ПараметрыПисьма.Вставить("Вложения", Вложения());
|
ПараметрыПисьма.Вставить("Вложения", Вложения());
|
||||||
ПараметрыПисьма.Вставить("Важность", ?(ЗначениеЗаполнено(ВажностьПисьма),
|
ПараметрыПисьма.Вставить("Важность", ?(ЗначениеЗаполнено(ВажностьПисьма),
|
||||||
ВажностьИнтернетПочтовогоСообщения[ВажностьПисьма], ВажностьИнтернетПочтовогоСообщения.Обычная));
|
РаботаСПочтовымиСообщениямиСлужебный.ВажностьИнтернетПочтовогоСообщенияИзСтроки(ВажностьПисьма), ВажностьИнтернетПочтовогоСообщения.Обычная));
|
||||||
|
|
||||||
Возврат ПараметрыПисьма;
|
Возврат ПараметрыПисьма;
|
||||||
|
|
||||||
|
|||||||
@@ -1881,12 +1881,10 @@
|
|||||||
Подсистема.НомерЭлемента = Подсистема.НомерЭлемента + 1;
|
Подсистема.НомерЭлемента = Подсистема.НомерЭлемента + 1;
|
||||||
ГруппаПодсистемыИмя = Подсистема.ИмяЭлемента + "_" + Формат(Подсистема.НомерЭлемента, "ЧГ=0");
|
ГруппаПодсистемыИмя = Подсистема.ИмяЭлемента + "_" + Формат(Подсистема.НомерЭлемента, "ЧГ=0");
|
||||||
|
|
||||||
Если Не ПараметрыЗаполнения.ТолькоТекущийРаздел Тогда
|
Пока Элементы.Найти(ГруппаПодсистемыИмя) <> Неопределено Цикл
|
||||||
Пока Элементы.Найти(ГруппаПодсистемыИмя) <> Неопределено Цикл
|
Подсистема.НомерЭлемента = Подсистема.НомерЭлемента + 1;
|
||||||
Подсистема.НомерЭлемента = Подсистема.НомерЭлемента + 1;
|
ГруппаПодсистемыИмя = Подсистема.ИмяЭлемента + "_" + Формат(Подсистема.НомерЭлемента, "ЧГ=0");
|
||||||
ГруппаПодсистемыИмя = Подсистема.ИмяЭлемента + "_" + Формат(Подсистема.НомерЭлемента, "ЧГ=0");
|
КонецЦикла;
|
||||||
КонецЦикла;
|
|
||||||
КонецЕсли;
|
|
||||||
|
|
||||||
// Добавление отступа слева.
|
// Добавление отступа слева.
|
||||||
Если СтрокаПорядкаВывода.УровеньВложенности > 1 Тогда
|
Если СтрокаПорядкаВывода.УровеньВложенности > 1 Тогда
|
||||||
|
|||||||
@@ -51,20 +51,30 @@
|
|||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
ДополнительныеПрокси = НастройкаПроксиСервера.Получить("ДополнительныеНастройкиПрокси");
|
ДополнительныеПрокси = НастройкаПроксиСервера.Получить("ДополнительныеНастройкиПрокси");
|
||||||
|
|
||||||
Если ТипЗнч(ДополнительныеПрокси) <> Тип("Соответствие") Тогда
|
Если ТипЗнч(ДополнительныеПрокси) <> Тип("Соответствие") Тогда
|
||||||
ОдинПроксиДляВсехПротоколов = Истина;
|
ОдинПроксиДляВсехПротоколов = Истина;
|
||||||
Иначе
|
Иначе
|
||||||
|
|
||||||
// Если в настройках заданы дополнительные прокси-серверы,
|
// Если в настройках заданы дополнительные прокси-серверы,
|
||||||
// то прочитать их из настроек.
|
// то прочитать их из настроек.
|
||||||
Для каждого ПротоколСервер Из ДополнительныеПрокси Цикл
|
ЗначениеПараметра = ДополнительныеПрокси.Получить("http");
|
||||||
Протокол = ПротоколСервер.Ключ;
|
Если ТипЗнч(ЗначениеПараметра) = Тип("Структура") Тогда
|
||||||
НастройкаПоПротоколу = ПротоколСервер.Значение;
|
СерверHTTP = ЗначениеПараметра.Адрес;
|
||||||
ЭтотОбъект["Сервер" + Протокол] = НастройкаПоПротоколу.Адрес;
|
ПортHTTP = ЗначениеПараметра.Порт;
|
||||||
ЭтотОбъект["Порт" + Протокол] = НастройкаПоПротоколу.Порт;
|
КонецЕсли;
|
||||||
КонецЦикла;
|
|
||||||
|
|
||||||
|
ЗначениеПараметра = ДополнительныеПрокси.Получить("https");
|
||||||
|
Если ТипЗнч(ЗначениеПараметра) = Тип("Структура") Тогда
|
||||||
|
СерверHTTPS = ЗначениеПараметра.Адрес;
|
||||||
|
ПортHTTPS = ЗначениеПараметра.Порт;
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
ЗначениеПараметра = ДополнительныеПрокси.Получить("ftp");
|
||||||
|
Если ТипЗнч(ЗначениеПараметра) = Тип("Структура") Тогда
|
||||||
|
СерверFTP = ЗначениеПараметра.Адрес;
|
||||||
|
ПортFTP = ЗначениеПараметра.Порт;
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|||||||
@@ -1487,7 +1487,7 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Настройки печатных форм группа1</value>
|
<value>Управление флажками</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>УправлениеФлажкамиРасширеннаяПодсказка</name>
|
<name>УправлениеФлажкамиРасширеннаяПодсказка</name>
|
||||||
@@ -1565,7 +1565,7 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Настройки печатных форм группа1</value>
|
<value>Управление строками</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>УправлениеСтрокамиРасширеннаяПодсказка</name>
|
<name>УправлениеСтрокамиРасширеннаяПодсказка</name>
|
||||||
@@ -2923,6 +2923,20 @@
|
|||||||
<common>true</common>
|
<common>true</common>
|
||||||
</edit>
|
</edit>
|
||||||
</columns>
|
</columns>
|
||||||
|
<columns>
|
||||||
|
<name>ТекстОшибкиФормирования</name>
|
||||||
|
<id>32</id>
|
||||||
|
<valueType>
|
||||||
|
<types>String</types>
|
||||||
|
<stringQualifiers/>
|
||||||
|
</valueType>
|
||||||
|
<view>
|
||||||
|
<common>true</common>
|
||||||
|
</view>
|
||||||
|
<edit>
|
||||||
|
<common>true</common>
|
||||||
|
</edit>
|
||||||
|
</columns>
|
||||||
</attributes>
|
</attributes>
|
||||||
<attributes>
|
<attributes>
|
||||||
<name>ПечатнаяФормаОбразец</name>
|
<name>ПечатнаяФормаОбразец</name>
|
||||||
|
|||||||
@@ -79,7 +79,7 @@
|
|||||||
СохранитьНастройкиКомплектаПоУмолчанию();
|
СохранитьНастройкиКомплектаПоУмолчанию();
|
||||||
ЗагрузитьНастройкиКоличестваКопий();
|
ЗагрузитьНастройкиКоличестваКопий();
|
||||||
ЕстьРазрешенныйВывод = ЕстьРазрешенныйВывод();
|
ЕстьРазрешенныйВывод = ЕстьРазрешенныйВывод();
|
||||||
НастроитьВидимостьЭлементовФормы(ЕстьРазрешенныйВывод);
|
НастроитьВидимостьЭлементовФормы();
|
||||||
УстановитьПризнакДоступностиВыводаВПредставленияхПечатныхФорм(ЕстьРазрешенныйВывод);
|
УстановитьПризнакДоступностиВыводаВПредставленияхПечатныхФорм(ЕстьРазрешенныйВывод);
|
||||||
Если Не ОбщегоНазначения.ЭтоМобильныйКлиент() И ЭтоПечатьКомплекта() Тогда
|
Если Не ОбщегоНазначения.ЭтоМобильныйКлиент() И ЭтоПечатьКомплекта() Тогда
|
||||||
Элементы.Копий.Заголовок = НСтр("ru = 'Копий комплекта'");
|
Элементы.Копий.Заголовок = НСтр("ru = 'Копий комплекта'");
|
||||||
@@ -934,6 +934,7 @@
|
|||||||
НоваяНастройкаПечатнойФормы.ИмяРеквизита = РанееДобавленнаяНастройкаПечатнойФормы.ИмяРеквизита;
|
НоваяНастройкаПечатнойФормы.ИмяРеквизита = РанееДобавленнаяНастройкаПечатнойФормы.ИмяРеквизита;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
|
НоваяНастройкаПечатнойФормы.ТекстОшибкиФормирования = ОписаниеПечатнойФормы.ТекстОшибкиФормирования;
|
||||||
НомерПечатнойФормы = НомерПечатнойФормы + 1;
|
НомерПечатнойФормы = НомерПечатнойФормы + 1;
|
||||||
КонецЦикла;
|
КонецЦикла;
|
||||||
|
|
||||||
@@ -951,8 +952,9 @@
|
|||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
&НаСервере
|
&НаСервере
|
||||||
Процедура НастроитьВидимостьЭлементовФормы(Знач ЕстьРазрешенныйВывод)
|
Процедура НастроитьВидимостьЭлементовФормы()
|
||||||
|
|
||||||
|
ЕстьРазрешенныйВывод = ЕстьРазрешенныйВывод();
|
||||||
ЕстьРазрешенноеРедактирование = ЕстьРазрешенноеРедактирование();
|
ЕстьРазрешенноеРедактирование = ЕстьРазрешенноеРедактирование();
|
||||||
|
|
||||||
ДоступнаОтправкаПисем = Ложь;
|
ДоступнаОтправкаПисем = Ложь;
|
||||||
@@ -1013,7 +1015,7 @@
|
|||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
ДоступноИзменениеМакетов = ПравоДоступа("Изменение", Метаданные.РегистрыСведений.ПользовательскиеМакетыПечати) И ЕстьРедактируемыеМакеты();
|
ДоступноИзменениеМакетов = ПравоДоступа("Изменение", Метаданные.РегистрыСведений.ПользовательскиеМакетыПечати) И ЕстьРедактируемыеМакеты();
|
||||||
Элементы.КнопкаИзменитьМакет.Видимость = ДоступноИзменениеМакетов И ЕстьДанныеДляПечати;
|
Элементы.КнопкаИзменитьМакет.Видимость = ДоступноИзменениеМакетов;
|
||||||
|
|
||||||
Элементы.ФлажокПодписьИПечать.Видимость = ЕстьПечатныеФормыСПодписьюИПечатью() И ЕстьПодписиИПечатиДляОбъектовПечати();
|
Элементы.ФлажокПодписьИПечать.Видимость = ЕстьПечатныеФормыСПодписьюИПечатью() И ЕстьПодписиИПечатиДляОбъектовПечати();
|
||||||
|
|
||||||
@@ -1122,6 +1124,37 @@
|
|||||||
|
|
||||||
Элементы.Язык.Доступность = НастройкаПечатнойФормы.ДоступенВыводНаДругихЯзыках;
|
Элементы.Язык.Доступность = НастройкаПечатнойФормы.ДоступенВыводНаДругихЯзыках;
|
||||||
|
|
||||||
|
ВозниклоИсключениеПриФормировании = Не ПечатнаяФормаДоступна И НастройкаПечатнойФормы <> Неопределено
|
||||||
|
И ЗначениеЗаполнено(НастройкаПечатнойФормы.ТекстОшибкиФормирования);
|
||||||
|
|
||||||
|
Если ВозниклоИсключениеПриФормировании И ИспользуетсяПользовательскийМакет(НастройкаПечатнойФормы.ПутьКМакету) Тогда
|
||||||
|
ТекстВопроса = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
|
||||||
|
НСтр("ru = 'Не удалось сформировать печатную форму по причине:
|
||||||
|
|%1
|
||||||
|
|
|
||||||
|
|Подробности см. в журнале регистрации.
|
||||||
|
|
|
||||||
|
|Используется измененный макет, переключить на использование стандартного?'"),
|
||||||
|
НастройкаПечатнойФормы.ТекстОшибкиФормирования);
|
||||||
|
|
||||||
|
Кнопки = Новый СписокЗначений;
|
||||||
|
Кнопки.Добавить(КодВозвратаДиалога.Да, НСтр("ru = 'Использовать стандартный'"));
|
||||||
|
Кнопки.Добавить(КодВозвратаДиалога.Отмена);
|
||||||
|
|
||||||
|
ОписаниеОповещения = Новый ОписаниеОповещения("ПриПолученииОтвета", ЭтотОбъект, НастройкаПечатнойФормы);
|
||||||
|
ПоказатьВопрос(ОписаниеОповещения, ТекстВопроса, Кнопки, , КодВозвратаДиалога.Да);
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
КонецПроцедуры
|
||||||
|
|
||||||
|
&НаКлиенте
|
||||||
|
Процедура ПриПолученииОтвета(Ответ, НастройкаПечатнойФормы) Экспорт
|
||||||
|
|
||||||
|
Если Ответ = КодВозвратаДиалога.Да Тогда
|
||||||
|
ОтключитьПользовательскийМакет(НастройкаПечатнойФормы.ПутьКМакету);
|
||||||
|
ПодключитьОбработчикОжидания("ОбновитьТекущуюПечатнуюФорму", 0.1, Истина);
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
&НаСервере
|
&НаСервере
|
||||||
@@ -1885,7 +1918,7 @@
|
|||||||
Процедура УстановитьДоступностьИзмененияМакета()
|
Процедура УстановитьДоступностьИзмененияМакета()
|
||||||
ПечатнаяФормаДоступна = Элементы.Страницы.ТекущаяСтраница <> Элементы.СтраницаПечатнаяФормаНедоступна;
|
ПечатнаяФормаДоступна = Элементы.Страницы.ТекущаяСтраница <> Элементы.СтраницаПечатнаяФормаНедоступна;
|
||||||
НастройкаПечатнойФормы = НастройкаТекущейПечатнойФормы();
|
НастройкаПечатнойФормы = НастройкаТекущейПечатнойФормы();
|
||||||
Элементы.КнопкаИзменитьМакет.Доступность = ПечатнаяФормаДоступна И Не ПустаяСтрока(НастройкаПечатнойФормы.ПутьКМакету);
|
Элементы.КнопкаИзменитьМакет.Доступность = Не ПустаяСтрока(НастройкаПечатнойФормы.ПутьКМакету);
|
||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
&НаКлиенте
|
&НаКлиенте
|
||||||
@@ -1917,16 +1950,21 @@
|
|||||||
Возврат;
|
Возврат;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
ПереформироватьПечатнуюФорму(НастройкаПечатнойФормы.ИмяМакета, НастройкаПечатнойФормы.ИмяРеквизита);
|
НастройкаПечатнойФормы.ТекстОшибкиФормирования =
|
||||||
|
ПереформироватьПечатнуюФорму(НастройкаПечатнойФормы.ИмяМакета, НастройкаПечатнойФормы.ИмяРеквизита);
|
||||||
|
|
||||||
НастройкаПечатнойФормы.ТекущийЯзык = ТекущийЯзык;
|
НастройкаПечатнойФормы.ТекущийЯзык = ТекущийЯзык;
|
||||||
|
|
||||||
ДобавитьУдалитьПодписьПечать();
|
ДобавитьУдалитьПодписьПечать();
|
||||||
ОтобразитьСостояниеТекущейПечатнойФормы();
|
ОтобразитьСостояниеТекущейПечатнойФормы();
|
||||||
|
|
||||||
|
УстановитьТекущуюСтраницу();
|
||||||
|
НастроитьВидимостьЭлементовФормы();
|
||||||
|
|
||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
&НаСервере
|
&НаСервере
|
||||||
Процедура ПереформироватьПечатнуюФорму(ИмяМакета, ИмяРеквизита)
|
Функция ПереформироватьПечатнуюФорму(ИмяМакета, ИмяРеквизита)
|
||||||
|
|
||||||
Отказ = Ложь;
|
Отказ = Ложь;
|
||||||
КоллекцияПечатныхФорм = СформироватьПечатныеФормы(ИмяМакета, Отказ);
|
КоллекцияПечатныхФорм = СформироватьПечатныеФормы(ИмяМакета, Отказ);
|
||||||
@@ -1934,15 +1972,19 @@
|
|||||||
ВызватьИсключение НСтр("ru = 'Печатная форма не была переформирована.'");
|
ВызватьИсключение НСтр("ru = 'Печатная форма не была переформирована.'");
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
|
ТекстОшибкиФормирования = "";
|
||||||
Для Каждого ПечатнаяФорма Из КоллекцияПечатныхФорм Цикл
|
Для Каждого ПечатнаяФорма Из КоллекцияПечатныхФорм Цикл
|
||||||
Если ПечатнаяФорма.ИмяМакета = ИмяМакета Тогда
|
Если ПечатнаяФорма.ИмяМакета = ИмяМакета Тогда
|
||||||
ЭтотОбъект[ИмяРеквизита] = ПечатнаяФорма.ТабличныйДокумент;
|
ЭтотОбъект[ИмяРеквизита] = ПечатнаяФорма.ТабличныйДокумент;
|
||||||
|
ТекстОшибкиФормирования = ПечатнаяФорма.ТекстОшибкиФормирования;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
КонецЦикла;
|
КонецЦикла;
|
||||||
|
|
||||||
УстановитьТекущийТабличныйДокумент(ИмяРеквизита);
|
УстановитьТекущийТабличныйДокумент(ИмяРеквизита);
|
||||||
|
|
||||||
КонецПроцедуры
|
Возврат ТекстОшибкиФормирования;
|
||||||
|
|
||||||
|
КонецФункции
|
||||||
|
|
||||||
&НаКлиенте
|
&НаКлиенте
|
||||||
Функция НастройкаТекущейПечатнойФормы()
|
Функция НастройкаТекущейПечатнойФормы()
|
||||||
@@ -2380,6 +2422,19 @@
|
|||||||
Возврат Ложь;
|
Возврат Ложь;
|
||||||
КонецФункции
|
КонецФункции
|
||||||
|
|
||||||
|
&НаСервереБезКонтекста
|
||||||
|
Процедура ОтключитьПользовательскийМакет(ПутьКМакету)
|
||||||
|
|
||||||
|
УправлениеПечатью.ОтключитьПользовательскийМакет(ПутьКМакету);
|
||||||
|
|
||||||
|
КонецПроцедуры
|
||||||
|
|
||||||
|
&НаСервереБезКонтекста
|
||||||
|
Функция ИспользуетсяПользовательскийМакет(ПутьКМакету)
|
||||||
|
|
||||||
|
Возврат УправлениеПечатью.ИспользуетсяПользовательскийМакет(ПутьКМакету);
|
||||||
|
|
||||||
|
КонецФункции
|
||||||
|
|
||||||
#КонецОбласти
|
#КонецОбласти
|
||||||
|
|
||||||
|
|||||||
@@ -124,7 +124,7 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Группа1</value>
|
<value>Управление флажками</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ГруппаУправлениеФлажкамиРасширеннаяПодсказка</name>
|
<name>ГруппаУправлениеФлажкамиРасширеннаяПодсказка</name>
|
||||||
@@ -204,7 +204,7 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Группа1</value>
|
<value>Управление строками</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ГруппаУправлениеСтрокамиРасширеннаяПодсказка</name>
|
<name>ГруппаУправлениеСтрокамиРасширеннаяПодсказка</name>
|
||||||
@@ -227,7 +227,7 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Печатные формы группа1</value>
|
<value>Группа управления списком документов</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ГруппаУправленияСпискомДокументовРасширеннаяПодсказка</name>
|
<name>ГруппаУправленияСпискомДокументовРасширеннаяПодсказка</name>
|
||||||
@@ -1172,7 +1172,7 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Печатные формы группа1</value>
|
<value>Картинка</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>КартинкаПредставлениеРасширеннаяПодсказка</name>
|
<name>КартинкаПредставлениеРасширеннаяПодсказка</name>
|
||||||
|
|||||||
@@ -44,6 +44,13 @@
|
|||||||
Если ТипЗнч(Параметры.Подпись) = Тип("Структура") Тогда
|
Если ТипЗнч(Параметры.Подпись) = Тип("Структура") Тогда
|
||||||
Если ЗначениеЗаполнено(Параметры.Подпись.ПодписанныйОбъект) Тогда
|
Если ЗначениеЗаполнено(Параметры.Подпись.ПодписанныйОбъект) Тогда
|
||||||
ПодписанныйОбъект = Параметры.Подпись.ПодписанныйОбъект;
|
ПодписанныйОбъект = Параметры.Подпись.ПодписанныйОбъект;
|
||||||
|
|
||||||
|
Если Не Пользователи.ЭтоПолноправныйПользователь()
|
||||||
|
И ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.УправлениеДоступом") Тогда
|
||||||
|
МодульУправлениеДоступом = ОбщегоНазначения.ОбщийМодуль("УправлениеДоступом");
|
||||||
|
МодульУправлениеДоступом.ПроверитьИзменениеРазрешено(ПодписанныйОбъект);
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
ПорядковыйНомер = Параметры.Подпись.ПорядковыйНомер;
|
ПорядковыйНомер = Параметры.Подпись.ПорядковыйНомер;
|
||||||
Элементы.ПодписанныйОбъект.Видимость = Истина;
|
Элементы.ПодписанныйОбъект.Видимость = Истина;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
@@ -308,7 +315,15 @@
|
|||||||
КонецЦикла;
|
КонецЦикла;
|
||||||
|
|
||||||
Если ЕстьАрхивнаяПодпись Тогда
|
Если ЕстьАрхивнаяПодпись Тогда
|
||||||
Элементы.ДобавитьАрхивнуюМеткуВремени.Видимость = Истина;
|
Если Не ЕстьБазоваяПодпись И Не ЕстьПодписьСМеткойВремени Тогда
|
||||||
|
Элементы.ДобавитьАрхивнуюМеткуВремени.Видимость = Ложь;
|
||||||
|
Элементы.ДекорацияДобавлениеМетокВремени.Видимость = Истина;
|
||||||
|
Элементы.ДекорацияДобавлениеМетокВремени.Заголовок = НСтр("ru='В подписи будут добавлены архивные метки времени'");
|
||||||
|
Элементы.ТипПодписи.Видимость = Ложь;
|
||||||
|
ДобавитьАрхивнуюМеткуВремени = Истина;
|
||||||
|
Иначе
|
||||||
|
Элементы.ДобавитьАрхивнуюМеткуВремени.Видимость = Истина;
|
||||||
|
КонецЕсли;
|
||||||
ИначеЕсли ЕстьПодписьСМеткойВремени Или ЕстьБазоваяПодпись Тогда
|
ИначеЕсли ЕстьПодписьСМеткойВремени Или ЕстьБазоваяПодпись Тогда
|
||||||
Элементы.ДобавитьАрхивнуюМеткуВремени.Видимость = Ложь;
|
Элементы.ДобавитьАрхивнуюМеткуВремени.Видимость = Ложь;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|||||||
@@ -819,21 +819,21 @@
|
|||||||
<items xsi:type="form:FormGroup">
|
<items xsi:type="form:FormGroup">
|
||||||
<name>ВозможныеПричины</name>
|
<name>ВозможныеПричины</name>
|
||||||
<id>86</id>
|
<id>86</id>
|
||||||
<items xsi:type="form:Decoration">
|
<items xsi:type="form:FormField">
|
||||||
<name>ПричиныТекст</name>
|
<name>ПричиныТекст</name>
|
||||||
<id>88</id>
|
<id>101</id>
|
||||||
<title>
|
|
||||||
<key>ru</key>
|
|
||||||
<value>Возможные причины </value>
|
|
||||||
</title>
|
|
||||||
<visible>true</visible>
|
<visible>true</visible>
|
||||||
<enabled>true</enabled>
|
<enabled>true</enabled>
|
||||||
<userVisible>
|
<userVisible>
|
||||||
<common>true</common>
|
<common>true</common>
|
||||||
</userVisible>
|
</userVisible>
|
||||||
|
<dataPath xsi:type="form:DataPath">
|
||||||
|
<segments>ПричиныТекст</segments>
|
||||||
|
</dataPath>
|
||||||
|
<titleLocation>None</titleLocation>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ПричиныТекстРасширеннаяПодсказка</name>
|
<name>ПричиныТекстРасширеннаяПодсказка</name>
|
||||||
<id>90</id>
|
<id>103</id>
|
||||||
<type>Label</type>
|
<type>Label</type>
|
||||||
<autoMaxWidth>true</autoMaxWidth>
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
<autoMaxHeight>true</autoMaxHeight>
|
<autoMaxHeight>true</autoMaxHeight>
|
||||||
@@ -843,17 +843,22 @@
|
|||||||
</extendedTooltip>
|
</extendedTooltip>
|
||||||
<contextMenu>
|
<contextMenu>
|
||||||
<name>ПричиныТекстКонтекстноеМеню</name>
|
<name>ПричиныТекстКонтекстноеМеню</name>
|
||||||
<id>89</id>
|
<id>102</id>
|
||||||
<autoFill>true</autoFill>
|
<autoFill>true</autoFill>
|
||||||
</contextMenu>
|
</contextMenu>
|
||||||
<type>Label</type>
|
<type>InputField</type>
|
||||||
<autoMaxHeight>true</autoMaxHeight>
|
<editMode>Enter</editMode>
|
||||||
<extInfo xsi:type="form:LabelDecorationExtInfo">
|
<showInHeader>true</showInHeader>
|
||||||
<handlers>
|
<headerHorizontalAlign>Left</headerHorizontalAlign>
|
||||||
<event>URLProcessing</event>
|
<showInFooter>true</showInFooter>
|
||||||
<name>ПричиныКлиентТекстОбработкаНавигационнойСсылки</name>
|
<extInfo xsi:type="form:InputFieldExtInfo">
|
||||||
</handlers>
|
<autoMaxHeight>true</autoMaxHeight>
|
||||||
<horizontalAlign>Left</horizontalAlign>
|
<wrap>true</wrap>
|
||||||
|
<multiLine>true</multiLine>
|
||||||
|
<chooseType>true</chooseType>
|
||||||
|
<typeDomainEnabled>true</typeDomainEnabled>
|
||||||
|
<textEdit>true</textEdit>
|
||||||
|
<textSize>Normal</textSize>
|
||||||
</extInfo>
|
</extInfo>
|
||||||
</items>
|
</items>
|
||||||
<visible>true</visible>
|
<visible>true</visible>
|
||||||
@@ -1492,6 +1497,24 @@
|
|||||||
<common>true</common>
|
<common>true</common>
|
||||||
</edit>
|
</edit>
|
||||||
</attributes>
|
</attributes>
|
||||||
|
<attributes>
|
||||||
|
<name>ПричиныТекст</name>
|
||||||
|
<title>
|
||||||
|
<key>ru</key>
|
||||||
|
<value>Причины текст</value>
|
||||||
|
</title>
|
||||||
|
<id>9</id>
|
||||||
|
<valueType>
|
||||||
|
<types>String</types>
|
||||||
|
<stringQualifiers/>
|
||||||
|
</valueType>
|
||||||
|
<view>
|
||||||
|
<common>true</common>
|
||||||
|
</view>
|
||||||
|
<edit>
|
||||||
|
<common>true</common>
|
||||||
|
</edit>
|
||||||
|
</attributes>
|
||||||
<formCommands>
|
<formCommands>
|
||||||
<name>ПерейтиКНастройкеПрограмм</name>
|
<name>ПерейтиКНастройкеПрограмм</name>
|
||||||
<title>
|
<title>
|
||||||
|
|||||||
@@ -234,8 +234,12 @@
|
|||||||
ЭлементИнструкция.Имя, "Заголовок", НСтр("ru = 'Подробнее'"));
|
ЭлементИнструкция.Имя, "Заголовок", НСтр("ru = 'Подробнее'"));
|
||||||
|
|
||||||
Если ЗначениеЗаполнено(ОшибкаПоКлассификатору.Причина) Тогда
|
Если ЗначениеЗаполнено(ОшибкаПоКлассификатору.Причина) Тогда
|
||||||
ОбщегоНазначенияКлиентСервер.УстановитьСвойствоЭлементаФормы(Элементы,
|
Если ТипЗнч(ЭлементПричиныТекст) = Тип("ДекорацияФормы") Тогда
|
||||||
ЭлементПричиныТекст.Имя, "Заголовок", ОшибкаПоКлассификатору.Причина);
|
ОбщегоНазначенияКлиентСервер.УстановитьСвойствоЭлементаФормы(Элементы,
|
||||||
|
ЭлементПричиныТекст.Имя, "Заголовок", ОшибкаПоКлассификатору.Причина);
|
||||||
|
Иначе
|
||||||
|
ЭтотОбъект[ЭлементПричиныТекст.ПутьКДанным] = ОшибкаПоКлассификатору.Причина;
|
||||||
|
КонецЕсли;
|
||||||
Иначе
|
Иначе
|
||||||
ОбщегоНазначенияКлиентСервер.УстановитьСвойствоЭлементаФормы(Элементы,
|
ОбщегоНазначенияКлиентСервер.УстановитьСвойствоЭлементаФормы(Элементы,
|
||||||
ЭлементПричиныТекст.Имя, "Видимость", Ложь);
|
ЭлементПричиныТекст.Имя, "Видимость", Ложь);
|
||||||
|
|||||||
@@ -62,7 +62,7 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Группа1</value>
|
<value>Группа инструкций</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ГруппаЛеваяРасширеннаяПодсказка</name>
|
<name>ГруппаЛеваяРасширеннаяПодсказка</name>
|
||||||
@@ -205,7 +205,7 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Группа1</value>
|
<value>Действия с макетом</value>
|
||||||
</title>
|
</title>
|
||||||
<horizontalStretch>false</horizontalStretch>
|
<horizontalStretch>false</horizontalStretch>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
@@ -239,7 +239,7 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Группа8</value>
|
<value>Перевод</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ДобавляемыеЯзыкиРасширеннаяПодсказка</name>
|
<name>ДобавляемыеЯзыкиРасширеннаяПодсказка</name>
|
||||||
@@ -532,7 +532,7 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Группа1</value>
|
<value>Импорт экспорт</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ИмпортЭкспортРасширеннаяПодсказка</name>
|
<name>ИмпортЭкспортРасширеннаяПодсказка</name>
|
||||||
@@ -553,7 +553,7 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Группа1</value>
|
<value>Команды редактирования</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>КомандыРедактированияРасширеннаяПодсказка</name>
|
<name>КомандыРедактированияРасширеннаяПодсказка</name>
|
||||||
@@ -607,7 +607,7 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Группа1</value>
|
<value>Группа справки</value>
|
||||||
</title>
|
</title>
|
||||||
<width>3</width>
|
<width>3</width>
|
||||||
<horizontalStretch>false</horizontalStretch>
|
<horizontalStretch>false</horizontalStretch>
|
||||||
@@ -634,7 +634,7 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Группа1</value>
|
<value>Инструкция редактора</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ГруппаИнструкцияРедакторРасширеннаяПодсказка</name>
|
<name>ГруппаИнструкцияРедакторРасширеннаяПодсказка</name>
|
||||||
@@ -1214,7 +1214,7 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Группа1</value>
|
<value>Страница для тонкого клиента</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>СтраницаТонкийКлиентРасширеннаяПодсказка</name>
|
<name>СтраницаТонкийКлиентРасширеннаяПодсказка</name>
|
||||||
@@ -1295,7 +1295,7 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Группа1</value>
|
<value>Страница для веб-клиента</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>СтраницаWebКлиентРасширеннаяПодсказка</name>
|
<name>СтраницаWebКлиентРасширеннаяПодсказка</name>
|
||||||
@@ -1321,7 +1321,7 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Группа1</value>
|
<value>Страницы HTML</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ГруппаСтраницыHTMLРасширеннаяПодсказка</name>
|
<name>ГруппаСтраницыHTMLРасширеннаяПодсказка</name>
|
||||||
@@ -1378,7 +1378,7 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Группа1</value>
|
<value>Группа редактора</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ГруппаПраваяРасширеннаяПодсказка</name>
|
<name>ГруппаПраваяРасширеннаяПодсказка</name>
|
||||||
@@ -1406,7 +1406,7 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Группа1</value>
|
<value>Основная группа</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ГруппаВертикальнаяРасширеннаяПодсказка</name>
|
<name>ГруппаВертикальнаяРасширеннаяПодсказка</name>
|
||||||
|
|||||||
@@ -121,7 +121,7 @@
|
|||||||
ПараметрыДобавления = МодульКонструкторФормул.ПараметрыДобавленияСпискаПолей();
|
ПараметрыДобавления = МодульКонструкторФормул.ПараметрыДобавленияСпискаПолей();
|
||||||
ПараметрыДобавления.ИмяСписка = ИмяСпискаПолей();
|
ПараметрыДобавления.ИмяСписка = ИмяСпискаПолей();
|
||||||
ПараметрыДобавления.МестоРазмещенияСписка = Элементы.ГруппаДоступныеПоля;
|
ПараметрыДобавления.МестоРазмещенияСписка = Элементы.ГруппаДоступныеПоля;
|
||||||
ПараметрыДобавления.КоллекцииПолей = КоллекцииПолей(ИсточникиДанных.ВыгрузитьЗначения());
|
ПараметрыДобавления.КоллекцииПолей = КоллекцииПолей(ИсточникиДанных.ВыгрузитьЗначения(), ПараметрыРедактирования());
|
||||||
ПараметрыДобавления.ПодсказкаВводаСтрокиПоиска = ПодсказкаВводаСтрокиПоискаСпискаПолей();
|
ПараметрыДобавления.ПодсказкаВводаСтрокиПоиска = ПодсказкаВводаСтрокиПоискаСпискаПолей();
|
||||||
ПараметрыДобавления.ПриОпределенииИсточниковДоступныхПолей = "УправлениеПечатью";
|
ПараметрыДобавления.ПриОпределенииИсточниковДоступныхПолей = "УправлениеПечатью";
|
||||||
ПараметрыДобавления.ОбработчикиСписка.Вставить("Выбор", "Подключаемый_СписокПолейВыбор");
|
ПараметрыДобавления.ОбработчикиСписка.Вставить("Выбор", "Подключаемый_СписокПолейВыбор");
|
||||||
@@ -1747,7 +1747,12 @@
|
|||||||
Объекты = ОбщегоНазначенияКлиентСервер.ЗначениеВМассиве(Образец);
|
Объекты = ОбщегоНазначенияКлиентСервер.ЗначениеВМассиве(Образец);
|
||||||
ОтображаемыеПоля = ЗаполнитьСписокОтображаемыхПолей(КоллекцияПолей);
|
ОтображаемыеПоля = ЗаполнитьСписокОтображаемыхПолей(КоллекцияПолей);
|
||||||
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.Печать") Тогда
|
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.Печать") Тогда
|
||||||
ДанныеПечати = МодульУправлениеПечатью.ДанныеПечати(Объекты, ОтображаемыеПоля, ТекущийЯзык);
|
Попытка
|
||||||
|
ДанныеПечати = МодульУправлениеПечатью.ДанныеПечати(Объекты, ОтображаемыеПоля, ТекущийЯзык);
|
||||||
|
Исключение
|
||||||
|
РазблокироватьДанныеДляРедактирования(КлючОбъектаРедактирования, УникальныйИдентификатор);
|
||||||
|
ВызватьИсключение ОбработкаОшибок.ПодробноеПредставлениеОшибки(ИнформацияОбОшибке());
|
||||||
|
КонецПопытки;
|
||||||
ПолучитьСообщенияПользователю(Истина);
|
ПолучитьСообщенияПользователю(Истина);
|
||||||
Иначе
|
Иначе
|
||||||
Возврат;
|
Возврат;
|
||||||
@@ -1846,11 +1851,16 @@
|
|||||||
КонецФункции
|
КонецФункции
|
||||||
|
|
||||||
&НаСервереБезКонтекста
|
&НаСервереБезКонтекста
|
||||||
Функция КоллекцииПолей(ИсточникиДанных)
|
Функция КоллекцииПолей(ИсточникиДанных, ПараметрыРедактирования)
|
||||||
|
|
||||||
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.Печать") Тогда
|
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.Печать") Тогда
|
||||||
МодульУправлениеПечатью = ОбщегоНазначения.ОбщийМодуль("УправлениеПечатью");
|
МодульУправлениеПечатью = ОбщегоНазначения.ОбщийМодуль("УправлениеПечатью");
|
||||||
Возврат МодульУправлениеПечатью.КоллекцииПолейИсточниковДанных(ИсточникиДанных);
|
Попытка
|
||||||
|
Возврат МодульУправлениеПечатью.КоллекцииПолейИсточниковДанных(ИсточникиДанных);
|
||||||
|
Исключение
|
||||||
|
РазблокироватьДанныеДляРедактирования(ПараметрыРедактирования.КлючОбъектаРедактирования, ПараметрыРедактирования.УникальныйИдентификатор);
|
||||||
|
ВызватьИсключение ОбработкаОшибок.ПодробноеПредставлениеОшибки(ИнформацияОбОшибке());
|
||||||
|
КонецПопытки
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
Возврат Новый Массив;
|
Возврат Новый Массив;
|
||||||
@@ -2223,9 +2233,9 @@
|
|||||||
ПараметрыПеретаскивания.Значение = МодульКонструкторФормулКлиент.ВыражениеДляВставки(Оператор);
|
ПараметрыПеретаскивания.Значение = МодульКонструкторФормулКлиент.ВыражениеДляВставки(Оператор);
|
||||||
|
|
||||||
Если Оператор.ПутьКДанным = "УправлениеПечатью_КоличествоСтрок" Тогда
|
Если Оператор.ПутьКДанным = "УправлениеПечатью_КоличествоСтрок" Тогда
|
||||||
ИмяТекущейТаблицы = ПолучитьИмяТекущейТаблицы();
|
ПредставлениеТекущейТаблицы = ПредставлениеТекущейТаблицы();
|
||||||
Выполнение = ИмяТекущейТаблицы <> Неопределено;
|
Выполнение = ПредставлениеТекущейТаблицы <> Неопределено;
|
||||||
ПараметрыПеретаскивания.Значение = СтрЗаменить(ПараметрыПеретаскивания.Значение, "()", "(["+ИмяТекущейТаблицы+"])");
|
ПараметрыПеретаскивания.Значение = СтрЗаменить(ПараметрыПеретаскивания.Значение, "()", "(["+ПредставлениеТекущейТаблицы+"])");
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
@@ -2301,12 +2311,12 @@
|
|||||||
КонецФункции
|
КонецФункции
|
||||||
|
|
||||||
&НаКлиенте
|
&НаКлиенте
|
||||||
Функция ПолучитьИмяТекущейТаблицы()
|
Функция ПредставлениеТекущейТаблицы()
|
||||||
Для Каждого ПодключенныйСписокПолей Из ЭтотОбъект["ПодключенныеСпискиПолей"] Цикл
|
Для Каждого ПодключенныйСписокПолей Из ЭтотОбъект["ПодключенныеСпискиПолей"] Цикл
|
||||||
Если ПодключенныйСписокПолей.ИмяСпискаПолей <> ИмяСпискаОператоров() Тогда
|
Если ПодключенныйСписокПолей.ИмяСпискаПолей <> ИмяСпискаОператоров() Тогда
|
||||||
Если Элементы[ПодключенныйСписокПолей.ИмяСпискаПолей].ТекущиеДанные <> Неопределено
|
Если Элементы[ПодключенныйСписокПолей.ИмяСпискаПолей].ТекущиеДанные <> Неопределено
|
||||||
И Элементы[ПодключенныйСписокПолей.ИмяСпискаПолей].ТекущиеДанные.Таблица Тогда
|
И Элементы[ПодключенныйСписокПолей.ИмяСпискаПолей].ТекущиеДанные.Таблица Тогда
|
||||||
Возврат Элементы[ПодключенныйСписокПолей.ИмяСпискаПолей].ТекущиеДанные.ПутьКДанным;
|
Возврат Элементы[ПодключенныйСписокПолей.ИмяСпискаПолей].ТекущиеДанные.ПредставлениеПутиКДанным;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
КонецЦикла;
|
КонецЦикла;
|
||||||
@@ -2379,7 +2389,7 @@
|
|||||||
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.Печать") Тогда
|
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.Печать") Тогда
|
||||||
МодульУправлениеПечатью = ОбщегоНазначения.ОбщийМодуль("УправлениеПечатью");
|
МодульУправлениеПечатью = ОбщегоНазначения.ОбщийМодуль("УправлениеПечатью");
|
||||||
МодульУправлениеПечатью.ОбновитьСписокДоступныхПолей(ЭтотОбъект,
|
МодульУправлениеПечатью.ОбновитьСписокДоступныхПолей(ЭтотОбъект,
|
||||||
КоллекцииПолей(ИсточникиДанных.ВыгрузитьЗначения()), ИмяСпискаПолей());
|
КоллекцииПолей(ИсточникиДанных.ВыгрузитьЗначения(), ПараметрыРедактирования()), ИмяСпискаПолей());
|
||||||
|
|
||||||
НастроитьПолеОбразец();
|
НастроитьПолеОбразец();
|
||||||
ОтметитьОбщиеПоля();
|
ОтметитьОбщиеПоля();
|
||||||
@@ -2501,6 +2511,14 @@
|
|||||||
КонецЦикла;
|
КонецЦикла;
|
||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
|
&НаСервере
|
||||||
|
Функция ПараметрыРедактирования()
|
||||||
|
Результат = Новый Структура;
|
||||||
|
Результат.Вставить("КлючОбъектаРедактирования", КлючОбъектаРедактирования);
|
||||||
|
Результат.Вставить("УникальныйИдентификатор", УникальныйИдентификатор);
|
||||||
|
Возврат Результат;
|
||||||
|
КонецФункции
|
||||||
|
|
||||||
#КонецОбласти
|
#КонецОбласти
|
||||||
|
|
||||||
|
|
||||||
|
|||||||
@@ -139,6 +139,14 @@
|
|||||||
<horizontalAlign>Left</horizontalAlign>
|
<horizontalAlign>Left</horizontalAlign>
|
||||||
<autoFill>true</autoFill>
|
<autoFill>true</autoFill>
|
||||||
</autoCommandBar>
|
</autoCommandBar>
|
||||||
|
<handlers>
|
||||||
|
<event>BeforeAddRow</event>
|
||||||
|
<name>МеткиПередНачаломДобавления</name>
|
||||||
|
</handlers>
|
||||||
|
<handlers>
|
||||||
|
<event>BeforeDeleteRow</event>
|
||||||
|
<name>МеткиПередУдалением</name>
|
||||||
|
</handlers>
|
||||||
<handlers>
|
<handlers>
|
||||||
<event>OnChange</event>
|
<event>OnChange</event>
|
||||||
<name>МеткиПриИзменении</name>
|
<name>МеткиПриИзменении</name>
|
||||||
|
|||||||
@@ -71,6 +71,21 @@
|
|||||||
|
|
||||||
#Область ОбработчикиКомандФормы
|
#Область ОбработчикиКомандФормы
|
||||||
|
|
||||||
|
&НаКлиенте
|
||||||
|
Процедура МеткиПередУдалением(Элемент, Отказ)
|
||||||
|
|
||||||
|
Отказ = Истина;
|
||||||
|
|
||||||
|
КонецПроцедуры
|
||||||
|
|
||||||
|
&НаКлиенте
|
||||||
|
Процедура МеткиПередНачаломДобавления(Элемент, Отказ, Копирование, Родитель, ЭтоГруппа, Параметр)
|
||||||
|
|
||||||
|
Отказ = Истина;
|
||||||
|
ОткрытьФормуСозданияМетки();
|
||||||
|
|
||||||
|
КонецПроцедуры
|
||||||
|
|
||||||
&НаКлиенте
|
&НаКлиенте
|
||||||
Процедура ЗавершитьРедактирование(Команда)
|
Процедура ЗавершитьРедактирование(Команда)
|
||||||
|
|
||||||
@@ -93,23 +108,7 @@
|
|||||||
&НаКлиенте
|
&НаКлиенте
|
||||||
Процедура Создать(Команда)
|
Процедура Создать(Команда)
|
||||||
|
|
||||||
ТекущиеДанные = Элементы.Метки.ТекущиеДанные;
|
ОткрытьФормуСозданияМетки()
|
||||||
Если ТекущиеДанные = Неопределено Тогда
|
|
||||||
Если ДоступныеНаборыСвойств.Количество() = 0 Тогда
|
|
||||||
Возврат;
|
|
||||||
КонецЕсли;
|
|
||||||
НаборСвойств = ДоступныеНаборыСвойств[0].Значение;
|
|
||||||
Иначе
|
|
||||||
НаборСвойств = ТекущиеДанные.Набор;
|
|
||||||
КонецЕсли;
|
|
||||||
|
|
||||||
ПараметрыФормы = Новый Структура;
|
|
||||||
ПараметрыФормы.Вставить("НаборСвойств", НаборСвойств);
|
|
||||||
ПараметрыФормы.Вставить("ВидСвойств", ПредопределенноеЗначение("Перечисление.ВидыСвойств.Метки"));
|
|
||||||
ПараметрыФормы.Вставить("ТекущийНаборСвойств", НаборСвойств);
|
|
||||||
|
|
||||||
ОткрытьФорму("ПланВидовХарактеристик.ДополнительныеРеквизитыИСведения.ФормаОбъекта",
|
|
||||||
ПараметрыФормы, ЭтотОбъект);
|
|
||||||
|
|
||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
@@ -148,6 +147,29 @@
|
|||||||
|
|
||||||
#Область СлужебныеПроцедурыИФункции
|
#Область СлужебныеПроцедурыИФункции
|
||||||
|
|
||||||
|
&НаКлиенте
|
||||||
|
Процедура ОткрытьФормуСозданияМетки()
|
||||||
|
|
||||||
|
ТекущиеДанные = Элементы.Метки.ТекущиеДанные;
|
||||||
|
Если ТекущиеДанные = Неопределено Тогда
|
||||||
|
Если ДоступныеНаборыСвойств.Количество() = 0 Тогда
|
||||||
|
Возврат;
|
||||||
|
КонецЕсли;
|
||||||
|
НаборСвойств = ДоступныеНаборыСвойств[0].Значение;
|
||||||
|
Иначе
|
||||||
|
НаборСвойств = ТекущиеДанные.Набор;
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
ПараметрыФормы = Новый Структура;
|
||||||
|
ПараметрыФормы.Вставить("НаборСвойств", НаборСвойств);
|
||||||
|
ПараметрыФормы.Вставить("ВидСвойств", ПредопределенноеЗначение("Перечисление.ВидыСвойств.Метки"));
|
||||||
|
ПараметрыФормы.Вставить("ТекущийНаборСвойств", НаборСвойств);
|
||||||
|
|
||||||
|
ОткрытьФорму("ПланВидовХарактеристик.ДополнительныеРеквизитыИСведения.ФормаОбъекта",
|
||||||
|
ПараметрыФормы, ЭтотОбъект);
|
||||||
|
|
||||||
|
КонецПроцедуры
|
||||||
|
|
||||||
&НаСервере
|
&НаСервере
|
||||||
Процедура ЗаполнитьМетки()
|
Процедура ЗаполнитьМетки()
|
||||||
|
|
||||||
|
|||||||
@@ -261,7 +261,7 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Группа7</value>
|
<value>Повторять на каждой странице</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ПовторятьНаКаждойСтраницеРасширеннаяПодсказка</name>
|
<name>ПовторятьНаКаждойСтраницеРасширеннаяПодсказка</name>
|
||||||
@@ -293,7 +293,7 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Группа8</value>
|
<value>Добавляемые языки</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ДобавляемыеЯзыкиРасширеннаяПодсказка</name>
|
<name>ДобавляемыеЯзыкиРасширеннаяПодсказка</name>
|
||||||
@@ -525,7 +525,7 @@
|
|||||||
</extInfo>
|
</extInfo>
|
||||||
</items>
|
</items>
|
||||||
<items xsi:type="form:FormGroup">
|
<items xsi:type="form:FormGroup">
|
||||||
<name>КоманднаяПанель2</name>
|
<name>ВтораяКоманднаяПанель</name>
|
||||||
<id>392</id>
|
<id>392</id>
|
||||||
<items xsi:type="form:FormGroup">
|
<items xsi:type="form:FormGroup">
|
||||||
<name>КомандыРедактирования</name>
|
<name>КомандыРедактирования</name>
|
||||||
@@ -1160,7 +1160,7 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Группа7</value>
|
<value>Вертикальное выравнивание</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ВертикальноеВыравниваниеРасширеннаяПодсказка</name>
|
<name>ВертикальноеВыравниваниеРасширеннаяПодсказка</name>
|
||||||
@@ -1805,7 +1805,7 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Группа7</value>
|
<value>Вертикальное выравнивание все действия</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ВертикальноеВыравниваниеВсеДействияРасширеннаяПодсказка</name>
|
<name>ВертикальноеВыравниваниеВсеДействияРасширеннаяПодсказка</name>
|
||||||
@@ -2345,7 +2345,7 @@
|
|||||||
<locationInCommandBar>InCommandBarAndInAdditionalSubmenu</locationInCommandBar>
|
<locationInCommandBar>InCommandBarAndInAdditionalSubmenu</locationInCommandBar>
|
||||||
</items>
|
</items>
|
||||||
<items xsi:type="form:FormGroup">
|
<items xsi:type="form:FormGroup">
|
||||||
<name>ТабличныйДокументГруппа1</name>
|
<name>ТабличныйДокументГруппаОбъединить</name>
|
||||||
<id>424</id>
|
<id>424</id>
|
||||||
<items xsi:type="form:Button">
|
<items xsi:type="form:Button">
|
||||||
<name>ТабличныйДокументОбъединить</name>
|
<name>ТабличныйДокументОбъединить</name>
|
||||||
@@ -2384,7 +2384,7 @@
|
|||||||
<value>Объединение ячеек</value>
|
<value>Объединение ячеек</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ТабличныйДокументГруппа1РасширеннаяПодсказка</name>
|
<name>ТабличныйДокументГруппаОбъединитьРасширеннаяПодсказка</name>
|
||||||
<id>425</id>
|
<id>425</id>
|
||||||
<type>Label</type>
|
<type>Label</type>
|
||||||
<autoMaxWidth>true</autoMaxWidth>
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
@@ -2396,7 +2396,7 @@
|
|||||||
<extInfo xsi:type="form:ButtonGroupExtInfo"/>
|
<extInfo xsi:type="form:ButtonGroupExtInfo"/>
|
||||||
</items>
|
</items>
|
||||||
<items xsi:type="form:FormGroup">
|
<items xsi:type="form:FormGroup">
|
||||||
<name>ТабличныйДокументГруппа3</name>
|
<name>ТабличныйДокументГруппаРаздвинуть</name>
|
||||||
<id>428</id>
|
<id>428</id>
|
||||||
<items xsi:type="form:Button">
|
<items xsi:type="form:Button">
|
||||||
<name>ТабличныйДокументРаздвинуть</name>
|
<name>ТабличныйДокументРаздвинуть</name>
|
||||||
@@ -2462,7 +2462,7 @@
|
|||||||
<value>Раздвинуть/разбить ячейку</value>
|
<value>Раздвинуть/разбить ячейку</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ТабличныйДокументГруппа3РасширеннаяПодсказка</name>
|
<name>ТабличныйДокументГруппаРаздвинутьРасширеннаяПодсказка</name>
|
||||||
<id>429</id>
|
<id>429</id>
|
||||||
<type>Label</type>
|
<type>Label</type>
|
||||||
<autoMaxWidth>true</autoMaxWidth>
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
@@ -2474,7 +2474,7 @@
|
|||||||
<extInfo xsi:type="form:ButtonGroupExtInfo"/>
|
<extInfo xsi:type="form:ButtonGroupExtInfo"/>
|
||||||
</items>
|
</items>
|
||||||
<items xsi:type="form:FormGroup">
|
<items xsi:type="form:FormGroup">
|
||||||
<name>ТабличныйДокументГруппа2</name>
|
<name>ТабличныйДокументГруппаВставкаСтрок</name>
|
||||||
<id>426</id>
|
<id>426</id>
|
||||||
<items xsi:type="form:Button">
|
<items xsi:type="form:Button">
|
||||||
<name>ТабличныйДокументВставитьСтрокиСверху</name>
|
<name>ТабличныйДокументВставитьСтрокиСверху</name>
|
||||||
@@ -2570,10 +2570,10 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Вставка строк</value>
|
<value>Вставка/удаление строк</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ТабличныйДокументГруппа2РасширеннаяПодсказка</name>
|
<name>ТабличныйДокументГруппаВставкаСтрокРасширеннаяПодсказка</name>
|
||||||
<id>427</id>
|
<id>427</id>
|
||||||
<type>Label</type>
|
<type>Label</type>
|
||||||
<autoMaxWidth>true</autoMaxWidth>
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
@@ -2585,7 +2585,7 @@
|
|||||||
<extInfo xsi:type="form:ButtonGroupExtInfo"/>
|
<extInfo xsi:type="form:ButtonGroupExtInfo"/>
|
||||||
</items>
|
</items>
|
||||||
<items xsi:type="form:FormGroup">
|
<items xsi:type="form:FormGroup">
|
||||||
<name>ТабличныйДокументГруппа4</name>
|
<name>ТабличныйДокументГруппаВставкаКолонок</name>
|
||||||
<id>430</id>
|
<id>430</id>
|
||||||
<items xsi:type="form:Button">
|
<items xsi:type="form:Button">
|
||||||
<name>ТабличныйДокументВставитьКолонкиСлева</name>
|
<name>ТабличныйДокументВставитьКолонкиСлева</name>
|
||||||
@@ -2681,10 +2681,10 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Вставка колонок</value>
|
<value>Вставка/удаление колонок</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ТабличныйДокументГруппа4РасширеннаяПодсказка</name>
|
<name>ТабличныйДокументГруппаВставкаКолонокРасширеннаяПодсказка</name>
|
||||||
<id>431</id>
|
<id>431</id>
|
||||||
<type>Label</type>
|
<type>Label</type>
|
||||||
<autoMaxWidth>true</autoMaxWidth>
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
@@ -2696,7 +2696,7 @@
|
|||||||
<extInfo xsi:type="form:ButtonGroupExtInfo"/>
|
<extInfo xsi:type="form:ButtonGroupExtInfo"/>
|
||||||
</items>
|
</items>
|
||||||
<items xsi:type="form:FormGroup">
|
<items xsi:type="form:FormGroup">
|
||||||
<name>ТабличныйДокументГруппа5</name>
|
<name>ТабличныйДокументГруппаОчистка</name>
|
||||||
<id>432</id>
|
<id>432</id>
|
||||||
<items xsi:type="form:Button">
|
<items xsi:type="form:Button">
|
||||||
<name>ТабличныйДокументОчиститьВсе</name>
|
<name>ТабличныйДокументОчиститьВсе</name>
|
||||||
@@ -2762,7 +2762,7 @@
|
|||||||
<value>Очистка ячеек</value>
|
<value>Очистка ячеек</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ТабличныйДокументГруппа5РасширеннаяПодсказка</name>
|
<name>ТабличныйДокументГруппаОчисткаРасширеннаяПодсказка</name>
|
||||||
<id>433</id>
|
<id>433</id>
|
||||||
<type>Label</type>
|
<type>Label</type>
|
||||||
<autoMaxWidth>true</autoMaxWidth>
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
@@ -2778,7 +2778,7 @@
|
|||||||
</extInfo>
|
</extInfo>
|
||||||
</items>
|
</items>
|
||||||
<items xsi:type="form:FormGroup">
|
<items xsi:type="form:FormGroup">
|
||||||
<name>ТабличныйДокументГруппа6</name>
|
<name>ТабличныйДокументГруппаСкрытьОтобразить</name>
|
||||||
<id>434</id>
|
<id>434</id>
|
||||||
<items xsi:type="form:Button">
|
<items xsi:type="form:Button">
|
||||||
<name>ТабличныйДокументСкрыть</name>
|
<name>ТабличныйДокументСкрыть</name>
|
||||||
@@ -2844,7 +2844,7 @@
|
|||||||
<value>Скрытие/отображение ячеек</value>
|
<value>Скрытие/отображение ячеек</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ТабличныйДокументГруппа6РасширеннаяПодсказка</name>
|
<name>ТабличныйДокументГруппаСкрытьОтобразитьРасширеннаяПодсказка</name>
|
||||||
<id>435</id>
|
<id>435</id>
|
||||||
<type>Label</type>
|
<type>Label</type>
|
||||||
<autoMaxWidth>true</autoMaxWidth>
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
@@ -2856,7 +2856,7 @@
|
|||||||
<extInfo xsi:type="form:ButtonGroupExtInfo"/>
|
<extInfo xsi:type="form:ButtonGroupExtInfo"/>
|
||||||
</items>
|
</items>
|
||||||
<items xsi:type="form:FormGroup">
|
<items xsi:type="form:FormGroup">
|
||||||
<name>ТабличныйДокументГруппа7</name>
|
<name>ТабличныйДокументГруппаВысотаШирина</name>
|
||||||
<id>436</id>
|
<id>436</id>
|
||||||
<items xsi:type="form:Button">
|
<items xsi:type="form:Button">
|
||||||
<name>ТабличныйДокументВысотаСтрок</name>
|
<name>ТабличныйДокументВысотаСтрок</name>
|
||||||
@@ -2928,7 +2928,7 @@
|
|||||||
<value>Высота строк и ширина колонок</value>
|
<value>Высота строк и ширина колонок</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ТабличныйДокументГруппа7РасширеннаяПодсказка</name>
|
<name>ТабличныйДокументГруппаВысотаШиринаРасширеннаяПодсказка</name>
|
||||||
<id>437</id>
|
<id>437</id>
|
||||||
<type>Label</type>
|
<type>Label</type>
|
||||||
<autoMaxWidth>true</autoMaxWidth>
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
@@ -3710,7 +3710,7 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Группа7</value>
|
<value>Импорт экспорт</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ИмпортЭкспортРасширеннаяПодсказка</name>
|
<name>ИмпортЭкспортРасширеннаяПодсказка</name>
|
||||||
@@ -3812,7 +3812,7 @@
|
|||||||
<value>Командная панель редактирование</value>
|
<value>Командная панель редактирование</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>КоманднаяПанель2РасширеннаяПодсказка</name>
|
<name>ВтораяКоманднаяПанельРасширеннаяПодсказка</name>
|
||||||
<id>393</id>
|
<id>393</id>
|
||||||
<type>Label</type>
|
<type>Label</type>
|
||||||
<autoMaxWidth>true</autoMaxWidth>
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
@@ -4721,7 +4721,7 @@
|
|||||||
</extInfo>
|
</extInfo>
|
||||||
</items>
|
</items>
|
||||||
<items xsi:type="form:FormGroup">
|
<items xsi:type="form:FormGroup">
|
||||||
<name>Группа4</name>
|
<name>ГруппаТекстВыбраннойЯчейки</name>
|
||||||
<id>520</id>
|
<id>520</id>
|
||||||
<items xsi:type="form:FormField">
|
<items xsi:type="form:FormField">
|
||||||
<name>ТекущееЗначение</name>
|
<name>ТекущееЗначение</name>
|
||||||
@@ -4782,7 +4782,7 @@
|
|||||||
<value>Текст выбранной ячейки</value>
|
<value>Текст выбранной ячейки</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>Группа4РасширеннаяПодсказка</name>
|
<name>ГруппаТекстВыбраннойЯчейкиРасширеннаяПодсказка</name>
|
||||||
<id>521</id>
|
<id>521</id>
|
||||||
<type>Label</type>
|
<type>Label</type>
|
||||||
<autoMaxWidth>true</autoMaxWidth>
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
@@ -4801,7 +4801,7 @@
|
|||||||
</extInfo>
|
</extInfo>
|
||||||
</items>
|
</items>
|
||||||
<items xsi:type="form:FormGroup">
|
<items xsi:type="form:FormGroup">
|
||||||
<name>Группа1</name>
|
<name>ГруппаУсловиеВывода</name>
|
||||||
<id>518</id>
|
<id>518</id>
|
||||||
<items xsi:type="form:FormField">
|
<items xsi:type="form:FormField">
|
||||||
<name>УсловиеВывода</name>
|
<name>УсловиеВывода</name>
|
||||||
@@ -4857,7 +4857,7 @@
|
|||||||
<value>Условие вывода</value>
|
<value>Условие вывода</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>Группа1РасширеннаяПодсказка</name>
|
<name>ГруппаУсловиеВыводаРасширеннаяПодсказка</name>
|
||||||
<id>519</id>
|
<id>519</id>
|
||||||
<type>Label</type>
|
<type>Label</type>
|
||||||
<autoMaxWidth>true</autoMaxWidth>
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
|
|||||||
@@ -140,7 +140,7 @@
|
|||||||
ПараметрыДобавления = МодульКонструкторФормул.ПараметрыДобавленияСпискаПолей();
|
ПараметрыДобавления = МодульКонструкторФормул.ПараметрыДобавленияСпискаПолей();
|
||||||
ПараметрыДобавления.ИмяСписка = ИмяСпискаПолей();
|
ПараметрыДобавления.ИмяСписка = ИмяСпискаПолей();
|
||||||
ПараметрыДобавления.МестоРазмещенияСписка = Элементы.ГруппаДоступныеПоля;
|
ПараметрыДобавления.МестоРазмещенияСписка = Элементы.ГруппаДоступныеПоля;
|
||||||
ПараметрыДобавления.КоллекцииПолей = КоллекцииПолей(ИсточникиДанных.ВыгрузитьЗначения());
|
ПараметрыДобавления.КоллекцииПолей = КоллекцииПолей(ИсточникиДанных.ВыгрузитьЗначения(), ПараметрыРедактирования());
|
||||||
ПараметрыДобавления.ПодсказкаВводаСтрокиПоиска = ПодсказкаВводаСтрокиПоискаСпискаПолей();
|
ПараметрыДобавления.ПодсказкаВводаСтрокиПоиска = ПодсказкаВводаСтрокиПоискаСпискаПолей();
|
||||||
ПараметрыДобавления.ПриОпределенииИсточниковДоступныхПолей = "УправлениеПечатью";
|
ПараметрыДобавления.ПриОпределенииИсточниковДоступныхПолей = "УправлениеПечатью";
|
||||||
ПараметрыДобавления.ОбработчикиСписка.Вставить("Выбор", "Подключаемый_СписокПолейВыбор");
|
ПараметрыДобавления.ОбработчикиСписка.Вставить("Выбор", "Подключаемый_СписокПолейВыбор");
|
||||||
@@ -1302,6 +1302,12 @@
|
|||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
РазместитьРисунокВТабличномДокументе(ВыбранноеПоле, СтандартнаяОбработка, Область.Лево, Область.Верх);
|
РазместитьРисунокВТабличномДокументе(ВыбранноеПоле, СтандартнаяОбработка, Область.Лево, Область.Верх);
|
||||||
|
|
||||||
|
Если СтандартнаяОбработка Тогда
|
||||||
|
СтандартнаяОбработка = Ложь;
|
||||||
|
Область = ТабличныйДокумент.Область(Область.Верх, Область.Лево); // Получение области объединенных ячеек.
|
||||||
|
Область.Текст = ?(ЗначениеЗаполнено(Область.Текст), СокрП(Область.Текст) + " ", "") + ПараметрыПеретаскивания.Значение;
|
||||||
|
КонецЕсли;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
ПолучательПеретаскиваемогоЗначения = Элемент;
|
ПолучательПеретаскиваемогоЗначения = Элемент;
|
||||||
|
|
||||||
@@ -1603,7 +1609,12 @@
|
|||||||
Объекты = ОбщегоНазначенияКлиентСервер.ЗначениеВМассиве(Образец);
|
Объекты = ОбщегоНазначенияКлиентСервер.ЗначениеВМассиве(Образец);
|
||||||
ОтображаемыеПоля = ЗаполнитьСписокОтображаемыхПолей(КоллекцияПолей);
|
ОтображаемыеПоля = ЗаполнитьСписокОтображаемыхПолей(КоллекцияПолей);
|
||||||
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.Печать") Тогда
|
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.Печать") Тогда
|
||||||
ДанныеПечати = МодульУправлениеПечатью.ДанныеПечати(Объекты, ОтображаемыеПоля, ТекущийЯзык);
|
Попытка
|
||||||
|
ДанныеПечати = МодульУправлениеПечатью.ДанныеПечати(Объекты, ОтображаемыеПоля, ТекущийЯзык);
|
||||||
|
Исключение
|
||||||
|
РазблокироватьДанныеДляРедактирования(КлючОбъектаРедактирования, УникальныйИдентификатор);
|
||||||
|
ВызватьИсключение ОбработкаОшибок.ПодробноеПредставлениеОшибки(ИнформацияОбОшибке());
|
||||||
|
КонецПопытки;
|
||||||
ПолучитьСообщенияПользователю(Истина);
|
ПолучитьСообщенияПользователю(Истина);
|
||||||
Иначе
|
Иначе
|
||||||
Возврат;
|
Возврат;
|
||||||
@@ -1793,11 +1804,16 @@
|
|||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
&НаСервереБезКонтекста
|
&НаСервереБезКонтекста
|
||||||
Функция КоллекцииПолей(ИсточникиДанных)
|
Функция КоллекцииПолей(ИсточникиДанных, ПараметрыРедактирования)
|
||||||
|
|
||||||
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.Печать") Тогда
|
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.Печать") Тогда
|
||||||
МодульУправлениеПечатью = ОбщегоНазначения.ОбщийМодуль("УправлениеПечатью");
|
МодульУправлениеПечатью = ОбщегоНазначения.ОбщийМодуль("УправлениеПечатью");
|
||||||
Возврат МодульУправлениеПечатью.КоллекцииПолейИсточниковДанных(ИсточникиДанных);
|
Попытка
|
||||||
|
Возврат МодульУправлениеПечатью.КоллекцииПолейИсточниковДанных(ИсточникиДанных);
|
||||||
|
Исключение
|
||||||
|
РазблокироватьДанныеДляРедактирования(ПараметрыРедактирования.КлючОбъектаРедактирования, ПараметрыРедактирования.УникальныйИдентификатор);
|
||||||
|
ВызватьИсключение ОбработкаОшибок.ПодробноеПредставлениеОшибки(ИнформацияОбОшибке());
|
||||||
|
КонецПопытки
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
Возврат Новый Массив;
|
Возврат Новый Массив;
|
||||||
@@ -2028,9 +2044,9 @@
|
|||||||
Оператор = МодульКонструкторФормулКлиент.ВыбранноеПолеВСпискеПолей(ЭтотОбъект, ИмяСпискаОператоров());
|
Оператор = МодульКонструкторФормулКлиент.ВыбранноеПолеВСпискеПолей(ЭтотОбъект, ИмяСпискаОператоров());
|
||||||
ПараметрыПеретаскивания.Значение = МодульКонструкторФормулКлиент.ВыражениеДляВставки(Оператор);
|
ПараметрыПеретаскивания.Значение = МодульКонструкторФормулКлиент.ВыражениеДляВставки(Оператор);
|
||||||
Если Оператор.ПутьКДанным = "УправлениеПечатью_КоличествоСтрок" Тогда
|
Если Оператор.ПутьКДанным = "УправлениеПечатью_КоличествоСтрок" Тогда
|
||||||
ИмяТекущейТаблицы = ПолучитьИмяТекущейТаблицы();
|
ПредставлениеТекущейТаблицы = ПредставлениеТекущейТаблицы();
|
||||||
Выполнение = ИмяТекущейТаблицы <> Неопределено;
|
Выполнение = ПредставлениеТекущейТаблицы <> Неопределено;
|
||||||
ПараметрыПеретаскивания.Значение = СтрЗаменить(ПараметрыПеретаскивания.Значение, "()", "(["+ИмяТекущейТаблицы+"])");
|
ПараметрыПеретаскивания.Значение = СтрЗаменить(ПараметрыПеретаскивания.Значение, "()", "(["+ПредставлениеТекущейТаблицы+"])");
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
@@ -2104,12 +2120,12 @@
|
|||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
&НаКлиенте
|
&НаКлиенте
|
||||||
Функция ПолучитьИмяТекущейТаблицы()
|
Функция ПредставлениеТекущейТаблицы()
|
||||||
Для Каждого ПодключенныйСписокПолей Из ЭтотОбъект["ПодключенныеСпискиПолей"] Цикл
|
Для Каждого ПодключенныйСписокПолей Из ЭтотОбъект["ПодключенныеСпискиПолей"] Цикл
|
||||||
Если ПодключенныйСписокПолей.ИмяСпискаПолей <> ИмяСпискаОператоров() Тогда
|
Если ПодключенныйСписокПолей.ИмяСпискаПолей <> ИмяСпискаОператоров() Тогда
|
||||||
Если Элементы[ПодключенныйСписокПолей.ИмяСпискаПолей].ТекущиеДанные <> Неопределено
|
Если Элементы[ПодключенныйСписокПолей.ИмяСпискаПолей].ТекущиеДанные <> Неопределено
|
||||||
И Элементы[ПодключенныйСписокПолей.ИмяСпискаПолей].ТекущиеДанные.Таблица Тогда
|
И Элементы[ПодключенныйСписокПолей.ИмяСпискаПолей].ТекущиеДанные.Таблица Тогда
|
||||||
Возврат Элементы[ПодключенныйСписокПолей.ИмяСпискаПолей].ТекущиеДанные.ПутьКДанным;
|
Возврат Элементы[ПодключенныйСписокПолей.ИмяСпискаПолей].ТекущиеДанные.ПредставлениеПутиКДанным;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
КонецЦикла;
|
КонецЦикла;
|
||||||
@@ -2757,7 +2773,7 @@
|
|||||||
|
|
||||||
Элементы.ПосмотретьПечатнуюФорму.Пометка = Не Элементы.ПосмотретьПечатнуюФорму.Пометка;
|
Элементы.ПосмотретьПечатнуюФорму.Пометка = Не Элементы.ПосмотретьПечатнуюФорму.Пометка;
|
||||||
Элементы.НастройкиТекущейОбласти.Видимость = Не Элементы.ПосмотретьПечатнуюФорму.Пометка;
|
Элементы.НастройкиТекущейОбласти.Видимость = Не Элементы.ПосмотретьПечатнуюФорму.Пометка;
|
||||||
Элементы.КоманднаяПанель2.Доступность = Не Элементы.ПосмотретьПечатнуюФорму.Пометка;
|
Элементы.ВтораяКоманднаяПанель.Доступность = Не Элементы.ПосмотретьПечатнуюФорму.Пометка;
|
||||||
Элементы.ПоказыватьКолонтитулы.Доступность = Не Элементы.ПосмотретьПечатнуюФорму.Пометка;
|
Элементы.ПоказыватьКолонтитулы.Доступность = Не Элементы.ПосмотретьПечатнуюФорму.Пометка;
|
||||||
Элементы.ДействияСДокументом.Доступность = Не Элементы.ПосмотретьПечатнуюФорму.Пометка;
|
Элементы.ДействияСДокументом.Доступность = Не Элементы.ПосмотретьПечатнуюФорму.Пометка;
|
||||||
Элементы.Язык.Доступность = Не Элементы.ПосмотретьПечатнуюФорму.Пометка;
|
Элементы.Язык.Доступность = Не Элементы.ПосмотретьПечатнуюФорму.Пометка;
|
||||||
@@ -2969,7 +2985,7 @@
|
|||||||
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.Печать") Тогда
|
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.Печать") Тогда
|
||||||
МодульУправлениеПечатью = ОбщегоНазначения.ОбщийМодуль("УправлениеПечатью");
|
МодульУправлениеПечатью = ОбщегоНазначения.ОбщийМодуль("УправлениеПечатью");
|
||||||
МодульУправлениеПечатью.ОбновитьСписокДоступныхПолей(ЭтотОбъект,
|
МодульУправлениеПечатью.ОбновитьСписокДоступныхПолей(ЭтотОбъект,
|
||||||
КоллекцииПолей(ИсточникиДанных.ВыгрузитьЗначения()), ИмяСпискаПолей());
|
КоллекцииПолей(ИсточникиДанных.ВыгрузитьЗначения(), ПараметрыРедактирования()), ИмяСпискаПолей());
|
||||||
|
|
||||||
НастроитьПолеОбразец();
|
НастроитьПолеОбразец();
|
||||||
ОтметитьОбщиеПоля();
|
ОтметитьОбщиеПоля();
|
||||||
@@ -3077,5 +3093,13 @@
|
|||||||
КонецЦикла;
|
КонецЦикла;
|
||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
|
&НаСервере
|
||||||
|
Функция ПараметрыРедактирования()
|
||||||
|
Результат = Новый Структура;
|
||||||
|
Результат.Вставить("КлючОбъектаРедактирования", КлючОбъектаРедактирования);
|
||||||
|
Результат.Вставить("УникальныйИдентификатор", УникальныйИдентификатор);
|
||||||
|
Возврат Результат;
|
||||||
|
КонецФункции
|
||||||
|
|
||||||
#КонецОбласти
|
#КонецОбласти
|
||||||
|
|
||||||
@@ -283,7 +283,7 @@
|
|||||||
<name>ЗаполнитьПараметрыСервернойБазы</name>
|
<name>ЗаполнитьПараметрыСервернойБазы</name>
|
||||||
<id>6</id>
|
<id>6</id>
|
||||||
<items xsi:type="form:FormGroup">
|
<items xsi:type="form:FormGroup">
|
||||||
<name>ВертикальнаяГруппа1</name>
|
<name>ОсновныеПараметрыСервернойБазы</name>
|
||||||
<id>75</id>
|
<id>75</id>
|
||||||
<items xsi:type="form:FormField">
|
<items xsi:type="form:FormField">
|
||||||
<name>Сервер</name>
|
<name>Сервер</name>
|
||||||
@@ -600,10 +600,10 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Вертикальная группа 1</value>
|
<value>Основные параметры серверной базы</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ВертикальнаяГруппа1РасширеннаяПодсказка</name>
|
<name>ОсновныеПараметрыСервернойБазыРасширеннаяПодсказка</name>
|
||||||
<id>76</id>
|
<id>76</id>
|
||||||
<type>Label</type>
|
<type>Label</type>
|
||||||
<autoMaxWidth>true</autoMaxWidth>
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
@@ -622,7 +622,7 @@
|
|||||||
</extInfo>
|
</extInfo>
|
||||||
</items>
|
</items>
|
||||||
<items xsi:type="form:FormGroup">
|
<items xsi:type="form:FormGroup">
|
||||||
<name>ВертикальнаяГруппа2</name>
|
<name>ДополнительныеПараметрыСервернойБазы</name>
|
||||||
<id>77</id>
|
<id>77</id>
|
||||||
<items xsi:type="form:FormField">
|
<items xsi:type="form:FormField">
|
||||||
<name>ТипСУБД</name>
|
<name>ТипСУБД</name>
|
||||||
@@ -933,10 +933,10 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Вертикальная группа 2</value>
|
<value>Дополнительные параметры серверной базы</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ВертикальнаяГруппа2РасширеннаяПодсказка</name>
|
<name>ДополнительныеПараметрыСервернойБазыРасширеннаяПодсказка</name>
|
||||||
<id>78</id>
|
<id>78</id>
|
||||||
<type>Label</type>
|
<type>Label</type>
|
||||||
<autoMaxWidth>true</autoMaxWidth>
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
|
|||||||
@@ -48,8 +48,11 @@
|
|||||||
ЕстьВозможностьПрисоединения = Ложь;
|
ЕстьВозможностьПрисоединения = Ложь;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
|
ЭлементПрисоединения = Элементы.ВариантСохранения.СписокВыбора.НайтиПоЗначению("Присоединить");
|
||||||
|
|
||||||
Если Не ЕстьВозможностьПрисоединения Тогда
|
Если Не ЕстьВозможностьПрисоединения Тогда
|
||||||
Элементы.ВариантСохранения.СписокВыбора.Удалить(1);
|
Элементы.ВариантСохранения.СписокВыбора.Удалить(ЭлементПрисоединения);
|
||||||
|
ЭлементПрисоединения = Неопределено;
|
||||||
ВариантСохранения = "СохранитьВПапку";
|
ВариантСохранения = "СохранитьВПапку";
|
||||||
Элементы.ВариантСохранения.ТолькоПросмотр = Истина;
|
Элементы.ВариантСохранения.ТолькоПросмотр = Истина;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
@@ -62,9 +65,9 @@
|
|||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
Элементы.ПапкаДляСохраненияФайлов.Видимость = Параметры.РасширениеДляРаботыСФайламиПодключено;
|
Элементы.ПапкаДляСохраненияФайлов.Видимость = Параметры.РасширениеДляРаботыСФайламиПодключено;
|
||||||
|
|
||||||
Если Параметры.ОбъектыПечати.Количество() > 1 Тогда
|
Если Параметры.ОбъектыПечати.Количество() > 1 И ЭлементПрисоединения <> Неопределено Тогда
|
||||||
Элементы.ВариантСохранения.СписокВыбора[1].Представление = НСтр("ru='Присоединить к документам'")
|
ЭлементПрисоединения.Представление = НСтр("ru='Присоединить к документам'")
|
||||||
+ " (" + Формат(Параметры.ОбъектыПечати.Количество(), "ЧДЦ=0;") + ")";
|
+ " (" + Формат(Параметры.ОбъектыПечати.Количество(), "ЧДЦ=0;") + ")";
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
Если ОбщегоНазначения.ЭтоМобильныйКлиент() Тогда
|
Если ОбщегоНазначения.ЭтоМобильныйКлиент() Тогда
|
||||||
|
|||||||
@@ -304,7 +304,7 @@
|
|||||||
<excludedCommands>SortListDesc</excludedCommands>
|
<excludedCommands>SortListDesc</excludedCommands>
|
||||||
<excludedCommands>Tree</excludedCommands>
|
<excludedCommands>Tree</excludedCommands>
|
||||||
<items xsi:type="form:FormGroup">
|
<items xsi:type="form:FormGroup">
|
||||||
<name>СоставГруппировкиГруппа1</name>
|
<name>СоставГруппировкиОсновное</name>
|
||||||
<id>643</id>
|
<id>643</id>
|
||||||
<items xsi:type="form:FormField">
|
<items xsi:type="form:FormField">
|
||||||
<name>СоставГруппировкиИспользование</name>
|
<name>СоставГруппировкиИспользование</name>
|
||||||
@@ -392,10 +392,10 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Состав группировки группа 1</value>
|
<value>Основное</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>СоставГруппировкиГруппа1РасширеннаяПодсказка</name>
|
<name>СоставГруппировкиОсновноеРасширеннаяПодсказка</name>
|
||||||
<id>644</id>
|
<id>644</id>
|
||||||
<type>Label</type>
|
<type>Label</type>
|
||||||
<autoMaxWidth>true</autoMaxWidth>
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
@@ -412,7 +412,7 @@
|
|||||||
</extInfo>
|
</extInfo>
|
||||||
</items>
|
</items>
|
||||||
<items xsi:type="form:FormGroup">
|
<items xsi:type="form:FormGroup">
|
||||||
<name>СоставГруппировкиГруппа2</name>
|
<name>СоставГруппировкиДополнительно</name>
|
||||||
<id>817</id>
|
<id>817</id>
|
||||||
<items xsi:type="form:FormField">
|
<items xsi:type="form:FormField">
|
||||||
<name>СоставГруппировкиТипГруппировки</name>
|
<name>СоставГруппировкиТипГруппировки</name>
|
||||||
@@ -511,10 +511,10 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Состав группировки группа 2</value>
|
<value>Дополнительно</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>СоставГруппировкиГруппа2РасширеннаяПодсказка</name>
|
<name>СоставГруппировкиДополнительноРасширеннаяПодсказка</name>
|
||||||
<id>818</id>
|
<id>818</id>
|
||||||
<type>Label</type>
|
<type>Label</type>
|
||||||
<autoMaxWidth>true</autoMaxWidth>
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
@@ -3204,7 +3204,7 @@
|
|||||||
<excludedCommands>SortListDesc</excludedCommands>
|
<excludedCommands>SortListDesc</excludedCommands>
|
||||||
<excludedCommands>Tree</excludedCommands>
|
<excludedCommands>Tree</excludedCommands>
|
||||||
<items xsi:type="form:FormGroup">
|
<items xsi:type="form:FormGroup">
|
||||||
<name>ВыбранныеПоляГруппа1</name>
|
<name>ВыбранныеПоляГруппа</name>
|
||||||
<id>257</id>
|
<id>257</id>
|
||||||
<items xsi:type="form:FormField">
|
<items xsi:type="form:FormField">
|
||||||
<name>ВыбранныеПоляИспользование</name>
|
<name>ВыбранныеПоляИспользование</name>
|
||||||
@@ -3291,10 +3291,10 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Выбранные поля группа 1</value>
|
<value>Группа</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>ВыбранныеПоляГруппа1РасширеннаяПодсказка</name>
|
<name>ВыбранныеПоляГруппаРасширеннаяПодсказка</name>
|
||||||
<id>258</id>
|
<id>258</id>
|
||||||
<type>Label</type>
|
<type>Label</type>
|
||||||
<autoMaxWidth>true</autoMaxWidth>
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
@@ -4371,7 +4371,7 @@
|
|||||||
<excludedCommands>SortListAsc</excludedCommands>
|
<excludedCommands>SortListAsc</excludedCommands>
|
||||||
<excludedCommands>SortListDesc</excludedCommands>
|
<excludedCommands>SortListDesc</excludedCommands>
|
||||||
<items xsi:type="form:FormGroup">
|
<items xsi:type="form:FormGroup">
|
||||||
<name>СортировкаГруппа1</name>
|
<name>СортировкаГруппа</name>
|
||||||
<id>163</id>
|
<id>163</id>
|
||||||
<items xsi:type="form:FormField">
|
<items xsi:type="form:FormField">
|
||||||
<name>СортировкаИспользование</name>
|
<name>СортировкаИспользование</name>
|
||||||
@@ -4459,10 +4459,10 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Сортировка группа 1</value>
|
<value>Группа</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>СортировкаГруппа1РасширеннаяПодсказка</name>
|
<name>СортировкаГруппаРасширеннаяПодсказка</name>
|
||||||
<id>164</id>
|
<id>164</id>
|
||||||
<type>Label</type>
|
<type>Label</type>
|
||||||
<autoMaxWidth>true</autoMaxWidth>
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
@@ -6366,7 +6366,7 @@
|
|||||||
<excludedCommands>SortListDesc</excludedCommands>
|
<excludedCommands>SortListDesc</excludedCommands>
|
||||||
<excludedCommands>Tree</excludedCommands>
|
<excludedCommands>Tree</excludedCommands>
|
||||||
<items xsi:type="form:FormGroup">
|
<items xsi:type="form:FormGroup">
|
||||||
<name>СтруктураВариантаГруппа2</name>
|
<name>СтруктураВариантаГруппа</name>
|
||||||
<id>448</id>
|
<id>448</id>
|
||||||
<items xsi:type="form:FormField">
|
<items xsi:type="form:FormField">
|
||||||
<name>СтруктураВариантаИспользование</name>
|
<name>СтруктураВариантаИспользование</name>
|
||||||
@@ -6452,10 +6452,10 @@
|
|||||||
</userVisible>
|
</userVisible>
|
||||||
<title>
|
<title>
|
||||||
<key>ru</key>
|
<key>ru</key>
|
||||||
<value>Структура варианта группа 2</value>
|
<value>Группа</value>
|
||||||
</title>
|
</title>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>СтруктураВариантаГруппа2РасширеннаяПодсказка</name>
|
<name>СтруктураВариантаГруппаРасширеннаяПодсказка</name>
|
||||||
<id>449</id>
|
<id>449</id>
|
||||||
<type>Label</type>
|
<type>Label</type>
|
||||||
<autoMaxWidth>true</autoMaxWidth>
|
<autoMaxWidth>true</autoMaxWidth>
|
||||||
|
|||||||
@@ -1547,7 +1547,9 @@
|
|||||||
Если ФоновоеЗаданиеИдентификатор <> ПараметрыФормирования.ИдентификаторЗадания Или Не Открыта() Тогда
|
Если ФоновоеЗаданиеИдентификатор <> ПараметрыФормирования.ИдентификаторЗадания Или Не Открыта() Тогда
|
||||||
Возврат;
|
Возврат;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
|
ФоновоеЗаданиеИдентификатор = Неопределено;
|
||||||
|
|
||||||
Если Результат = Неопределено Тогда
|
Если Результат = Неопределено Тогда
|
||||||
|
|
||||||
ПоказатьОшибкиФормирования(НСтр("ru = 'Формирование отчета прервано администратором'"));
|
ПоказатьОшибкиФормирования(НСтр("ru = 'Формирование отчета прервано администратором'"));
|
||||||
@@ -1722,7 +1724,6 @@
|
|||||||
|
|
||||||
УдалитьИзВременногоХранилища(ФоновоеЗаданиеАдресХранилища);
|
УдалитьИзВременногоХранилища(ФоновоеЗаданиеАдресХранилища);
|
||||||
ФоновоеЗаданиеАдресХранилища = Неопределено;
|
ФоновоеЗаданиеАдресХранилища = Неопределено;
|
||||||
ФоновоеЗаданиеИдентификатор = Неопределено;
|
|
||||||
|
|
||||||
Если Результат = Неопределено Тогда
|
Если Результат = Неопределено Тогда
|
||||||
ПоказатьОшибкиФормирования(НСтр("ru = 'Не удалось сформировать отчет (пустой результат)'"));
|
ПоказатьОшибкиФормирования(НСтр("ru = 'Не удалось сформировать отчет (пустой результат)'"));
|
||||||
@@ -2436,10 +2437,13 @@
|
|||||||
РеквизитПоля = Новый ПолеКомпоновкиДанных(ПутьКДанным);
|
РеквизитПоля = Новый ПолеКомпоновкиДанных(ПутьКДанным);
|
||||||
СвойстваПоиска = СвойстваУниверсальногоПоиска(
|
СвойстваПоиска = СвойстваУниверсальногоПоиска(
|
||||||
РеквизитПоля, ПараметрыПоиска.СтрокаПоиска, ПараметрыПоиска.УправляющиеСимволы);
|
РеквизитПоля, ПараметрыПоиска.СтрокаПоиска, ПараметрыПоиска.УправляющиеСимволы);
|
||||||
|
|
||||||
|
ПутьКДаннымПредставление = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
|
||||||
|
"%1.%2", ПолеПоиска.Значение, Выборка.ПолеПоУсловию);
|
||||||
|
|
||||||
ВариантыПоиска = Новый Массив;
|
ВариантыПоиска = Новый Массив;
|
||||||
ВариантыПоиска.Добавить(СвойстваПоиска);
|
ВариантыПоиска.Добавить(СвойстваПоиска);
|
||||||
ДополнительныеЗначения.Добавить(ВариантыПоиска, ПредставлениеРезультатПоиска(ПутьКДанным,
|
ДополнительныеЗначения.Добавить(ВариантыПоиска, ПредставлениеРезультатПоиска(ПутьКДаннымПредставление,
|
||||||
СвойстваПоиска.ВидСравнения, ПараметрыПоиска.СтрокаПоиска));
|
СвойстваПоиска.ВидСравнения, ПараметрыПоиска.СтрокаПоиска));
|
||||||
|
|
||||||
ИндексДополнительныхЗначений.Вставить(ПолеПоиска.Ключ, Истина);
|
ИндексДополнительныхЗначений.Вставить(ПолеПоиска.Ключ, Истина);
|
||||||
@@ -2657,11 +2661,11 @@
|
|||||||
Если Не ТипРеквизита.СодержитТип(Тип("Строка")) Тогда
|
Если Не ТипРеквизита.СодержитТип(Тип("Строка")) Тогда
|
||||||
Продолжить;
|
Продолжить;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
ПолеПоУсловию = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
|
ПолеПоУсловию = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
|
||||||
"КОГДА ВЫРАЗИТЬ(%1 КАК СТРОКА(150)) ПОДОБНО %2 СПЕЦСИМВОЛ ""~"" ТОГДА ""%3""", Поле.Имя, """%"
|
"КОГДА ВЫРАЗИТЬ(%1 КАК СТРОКА(150)) ПОДОБНО %2 СПЕЦСИМВОЛ ""~"" ТОГДА ""%3""", Поле.Имя, """%"
|
||||||
+ ОбщегоНазначения.СформироватьСтрокуДляПоискаВЗапросе(ПараметрыПоиска.СтрокаПоискаНормализованная) + "%""",
|
+ ОбщегоНазначения.СформироватьСтрокуДляПоискаВЗапросе(ПараметрыПоиска.СтрокаПоискаНормализованная) + "%""",
|
||||||
Поле.Имя);
|
ПредставлениеПоля(Поле.Имя, Объект));
|
||||||
ОписаниеПоляПоУсловию.Добавить(ПолеПоУсловию);
|
ОписаниеПоляПоУсловию.Добавить(ПолеПоУсловию);
|
||||||
|
|
||||||
КонецЦикла;
|
КонецЦикла;
|
||||||
@@ -2678,6 +2682,29 @@
|
|||||||
|
|
||||||
КонецФункции
|
КонецФункции
|
||||||
|
|
||||||
|
&НаСервереБезКонтекста
|
||||||
|
Функция ПредставлениеПоля(ИмяПоля, Объект)
|
||||||
|
|
||||||
|
РеквизитОбъекта = Объект.Реквизиты.Найти(ИмяПоля);
|
||||||
|
|
||||||
|
Если РеквизитОбъекта = Неопределено Тогда
|
||||||
|
Для каждого СтандартныйРеквизит Из Объект.СтандартныеРеквизиты Цикл
|
||||||
|
Если СтрСравнить(СтандартныйРеквизит.Имя, ИмяПоля) = 0 Тогда
|
||||||
|
РеквизитОбъекта = СтандартныйРеквизит;
|
||||||
|
Прервать;
|
||||||
|
КонецЕсли;
|
||||||
|
КонецЦикла;
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
Если РеквизитОбъекта <> Неопределено Тогда
|
||||||
|
Возврат РеквизитОбъекта.Представление();
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
|
||||||
|
Возврат ИмяПоля;
|
||||||
|
|
||||||
|
КонецФункции
|
||||||
|
|
||||||
// Параметры:
|
// Параметры:
|
||||||
// Объект - ОбъектМетаданных
|
// Объект - ОбъектМетаданных
|
||||||
// ПараметрыПоиска - Структура:
|
// ПараметрыПоиска - Структура:
|
||||||
@@ -2751,8 +2778,8 @@
|
|||||||
ДополнительныеДанные = Новый Массив;
|
ДополнительныеДанные = Новый Массив;
|
||||||
|
|
||||||
Исключения = Новый Массив;
|
Исключения = Новый Массив;
|
||||||
Исключения.Добавить(НСтр("ru = 'Наименование'"));
|
Исключения.Добавить("Наименование");
|
||||||
Исключения.Добавить(НСтр("ru = 'Номер'"));
|
Исключения.Добавить("Номер");
|
||||||
|
|
||||||
Поля = Объект.ВводПоСтроке; // СписокПолей
|
Поля = Объект.ВводПоСтроке; // СписокПолей
|
||||||
|
|
||||||
@@ -2768,7 +2795,7 @@
|
|||||||
Продолжить;
|
Продолжить;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
Данные = """" + Поле.Имя + ": "" + " + Поле.Имя;
|
Данные = """" + ПредставлениеПоля(Поле.Имя, Объект) + ": "" + " + Поле.Имя;
|
||||||
ДополнительныеДанные.Добавить(Данные);
|
ДополнительныеДанные.Добавить(Данные);
|
||||||
|
|
||||||
КонецЦикла;
|
КонецЦикла;
|
||||||
|
|||||||
@@ -412,6 +412,7 @@
|
|||||||
<dataPath xsi:type="form:DataPath">
|
<dataPath xsi:type="form:DataPath">
|
||||||
<segments>СрокДействияПоследнейМеткиВремени</segments>
|
<segments>СрокДействияПоследнейМеткиВремени</segments>
|
||||||
</dataPath>
|
</dataPath>
|
||||||
|
<titleHeight>2</titleHeight>
|
||||||
<extendedTooltip>
|
<extendedTooltip>
|
||||||
<name>СрокДействияПоследнейМеткиВремениРасширеннаяПодсказка</name>
|
<name>СрокДействияПоследнейМеткиВремениРасширеннаяПодсказка</name>
|
||||||
<id>51</id>
|
<id>51</id>
|
||||||
|
|||||||
@@ -75,11 +75,10 @@
|
|||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
// Локализация
|
// Локализация
|
||||||
|
|
||||||
&НаКлиенте
|
&НаКлиенте
|
||||||
Процедура Подключаемый_КомандаОтметитьВручную(Элемент)
|
Процедура Подключаемый_КомандаОтметитьВручную(Элемент)
|
||||||
|
|
||||||
СтандартнаяОбработка = Ложь;
|
|
||||||
|
|
||||||
Если ОбщегоНазначенияКлиент.ПодсистемаСуществует("СтандартныеПодсистемы.МашиночитаемыеДоверенности") Тогда
|
Если ОбщегоНазначенияКлиент.ПодсистемаСуществует("СтандартныеПодсистемы.МашиночитаемыеДоверенности") Тогда
|
||||||
МодульМашиночитаемыеДоверенностиФНССлужебныйКлиент = ОбщегоНазначенияКлиент.ОбщийМодуль(
|
МодульМашиночитаемыеДоверенностиФНССлужебныйКлиент = ОбщегоНазначенияКлиент.ОбщийМодуль(
|
||||||
"МашиночитаемыеДоверенностиФНССлужебныйКлиент");
|
"МашиночитаемыеДоверенностиФНССлужебныйКлиент");
|
||||||
@@ -88,6 +87,17 @@
|
|||||||
|
|
||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
|
&НаКлиенте
|
||||||
|
Процедура Подключаемый_ОбработкаНавигационнойСсылки(Элемент, НавигационнаяСсылкаФорматированнойСтроки, СтандартнаяОбработка)
|
||||||
|
|
||||||
|
Если ОбщегоНазначенияКлиент.ПодсистемаСуществует("СтандартныеПодсистемы.МашиночитаемыеДоверенности") Тогда
|
||||||
|
МодульМашиночитаемыеДоверенностиФНССлужебныйКлиент = ОбщегоНазначенияКлиент.ОбщийМодуль(
|
||||||
|
"МашиночитаемыеДоверенностиФНССлужебныйКлиент");
|
||||||
|
МодульМашиночитаемыеДоверенностиФНССлужебныйКлиент.ПриОбработкеНавигационнойСсылкиОшибкиПроверкиПодписи(ЭтотОбъект, НавигационнаяСсылкаФорматированнойСтроки, СтандартнаяОбработка);
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
КонецПроцедуры
|
||||||
|
|
||||||
// Конец Локализация
|
// Конец Локализация
|
||||||
|
|
||||||
#КонецОбласти
|
#КонецОбласти
|
||||||
|
|||||||
@@ -933,8 +933,8 @@
|
|||||||
Результат.Отказ = Истина;
|
Результат.Отказ = Истина;
|
||||||
Возврат Результат;
|
Возврат Результат;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
ЗаполнитьАктуальныеАдресныеСведенияСервис1С(Результат, СведенияОбАдресномОбъекте.Идентификатор,
|
ЗаполнитьАктуальныеАдресныеСведенияСервис1С(Результат, СведенияОбАдресномОбъекте,
|
||||||
ЭтоМуниципальныйАдрес);
|
ЭтоМуниципальныйАдрес);
|
||||||
|
|
||||||
Если АдресПустой(Результат.Данные) Тогда
|
Если АдресПустой(Результат.Данные) Тогда
|
||||||
@@ -6749,18 +6749,31 @@
|
|||||||
// Заполнение актуальных данных адресного объекта или ориентира по данным сервиса 1С.
|
// Заполнение актуальных данных адресного объекта или ориентира по данным сервиса 1С.
|
||||||
// Пример: GET /selectByCode?code=111111&codeType=ID.
|
// Пример: GET /selectByCode?code=111111&codeType=ID.
|
||||||
//
|
//
|
||||||
Процедура ЗаполнитьАктуальныеАдресныеСведенияСервис1С(Результат, Идентификатор, ЭтоМуниципальныйАдрес = Истина)
|
Процедура ЗаполнитьАктуальныеАдресныеСведенияСервис1С(Результат, СведенияОбАдресномОбъекте, ЭтоМуниципальныйАдрес = Истина)
|
||||||
|
|
||||||
|
Идентификатор = СведенияОбАдресномОбъекте.Идентификатор;
|
||||||
|
|
||||||
РезультатВебСервис = АдресныеСведенияСервис1СПоКоду(Результат, Идентификатор, "ID");
|
РезультатВебСервис = АдресныеСведенияСервис1СПоКоду(Результат, Идентификатор, "ID");
|
||||||
|
|
||||||
Если РезультатВебСервис.Отказ Тогда
|
Если РезультатВебСервис.Отказ Или РезультатВебСервис.Данные.Количество() = 0 Тогда
|
||||||
Возврат;
|
Возврат;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
Если РезультатВебСервис.Данные.Количество() > 0 Тогда
|
Если РезультатВебСервис.Данные.Количество() = 1 Тогда
|
||||||
Результат.Данные = АдресДляСохраненияВБазе(РезультатВебСервис.Данные[0], ЭтоМуниципальныйАдрес);
|
Результат.Данные = АдресДляСохраненияВБазе(РезультатВебСервис.Данные[0], ЭтоМуниципальныйАдрес);
|
||||||
|
Иначе
|
||||||
|
// Для городов содержащих несколько вн.р-н внутри города и нужно выбрать ранее введенный.
|
||||||
|
ВыбранныйАдрес = РезультатВебСервис.Данные[0];
|
||||||
|
Для каждого АдресИзВебСервиса Из РезультатВебСервис.Данные Цикл
|
||||||
|
Если СтрСравнить(АдресИзВебСервиса.settlement, СведенияОбАдресномОбъекте.Адрес.settlement) = 0
|
||||||
|
И СтрСравнить(АдресИзВебСервиса.settlementType, СведенияОбАдресномОбъекте.Адрес.settlementType) =0 Тогда
|
||||||
|
ВыбранныйАдрес = АдресИзВебСервиса;
|
||||||
|
Прервать;
|
||||||
|
КонецЕсли;
|
||||||
|
КонецЦикла;
|
||||||
|
Результат.Данные = АдресДляСохраненияВБазе(ВыбранныйАдрес, ЭтоМуниципальныйАдрес);
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
Функция АдресныеСведенияСервис1СПоКоду(Результат, Знач Идентификатор, Знач ИмяКода)
|
Функция АдресныеСведенияСервис1СПоКоду(Результат, Знач Идентификатор, Знач ИмяКода)
|
||||||
|
|||||||
@@ -579,7 +579,7 @@
|
|||||||
|
|
||||||
ПараметрыОбработчика = Новый Структура;
|
ПараметрыОбработчика = Новый Структура;
|
||||||
ПараметрыОбработчика.Вставить("Форма", Форма);
|
ПараметрыОбработчика.Вставить("Форма", Форма);
|
||||||
ПараметрыОбработчика.Вставить("Команда", Команда);
|
ПараметрыОбработчика.Вставить("ДействиеКоманды", ДействиеКоманды(Команда));
|
||||||
ПараметрыОбработчика.Вставить("СвойстваЗаголовка", СвойстваЗаголовка);
|
ПараметрыОбработчика.Вставить("СвойстваЗаголовка", СвойстваЗаголовка);
|
||||||
|
|
||||||
Обработчик = Новый ОписаниеОповещения("ПослеИзмененияЭлементаОформленияГруппировкиОтчета", ЭтотОбъект, ПараметрыОбработчика);
|
Обработчик = Новый ОписаниеОповещения("ПослеИзмененияЭлементаОформленияГруппировкиОтчета", ЭтотОбъект, ПараметрыОбработчика);
|
||||||
@@ -2139,7 +2139,6 @@
|
|||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
Форма = ДополнительныеПараметры.Форма;
|
Форма = ДополнительныеПараметры.Форма;
|
||||||
Команда = ДополнительныеПараметры.Команда;
|
|
||||||
СвойстваЗаголовка = ДополнительныеПараметры.СвойстваЗаголовка;
|
СвойстваЗаголовка = ДополнительныеПараметры.СвойстваЗаголовка;
|
||||||
|
|
||||||
Настройки = ИспользуемыеНастройки(Форма);
|
Настройки = ИспользуемыеНастройки(Форма);
|
||||||
@@ -2164,7 +2163,7 @@
|
|||||||
ОформитьГруппировкуРазделаОтчета(Раздел, Раздел2, Результат.ЭлементКД, СвойстваЗаголовка);
|
ОформитьГруппировкуРазделаОтчета(Раздел, Раздел2, Результат.ЭлементКД, СвойстваЗаголовка);
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
ОповеститьОЗавершенииКонтекстнойНастройки(Форма, ДействиеКоманды(Команда));
|
ОповеститьОЗавершенииКонтекстнойНастройки(Форма, ДополнительныеПараметры.ДействиеКоманды);
|
||||||
|
|
||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
@@ -2348,7 +2347,7 @@
|
|||||||
Действие = ДополнительныеПараметры.Действие;
|
Действие = ДополнительныеПараметры.Действие;
|
||||||
РолиПолей = Форма.НастройкиОтчета.СвойстваРезультата.РолиПолей;
|
РолиПолей = Форма.НастройкиОтчета.СвойстваРезультата.РолиПолей;
|
||||||
|
|
||||||
Если СтрНачинаетсяС(Действие, "ВставитьПоле") Тогда
|
Если СтрСравнить(Действие, "ВставитьПолеСлева") = 0 Или СтрСравнить(Действие, "ВставитьПолеСправа") = 0 Тогда
|
||||||
|
|
||||||
ДобавитьФормулу(Настройки, Настройки.ДоступныеПоляВыбора, Поле);
|
ДобавитьФормулу(Настройки, Настройки.ДоступныеПоляВыбора, Поле);
|
||||||
ВставитьПоле(Настройки, Настройки2, Поле, Действие, СвойстваЗаголовка, РолиПолей);
|
ВставитьПоле(Настройки, Настройки2, Поле, Действие, СвойстваЗаголовка, РолиПолей);
|
||||||
|
|||||||
@@ -7526,7 +7526,6 @@
|
|||||||
БлокировкаДанных = Новый БлокировкаДанных;
|
БлокировкаДанных = Новый БлокировкаДанных;
|
||||||
ЭлементБлокировкиДанных = БлокировкаДанных.Добавить("РегистрСведений.КонтактыВзаимодействий");
|
ЭлементБлокировкиДанных = БлокировкаДанных.Добавить("РегистрСведений.КонтактыВзаимодействий");
|
||||||
ЭлементБлокировкиДанных.УстановитьЗначение("Взаимодействие", ДокументОбъект.Ссылка);
|
ЭлементБлокировкиДанных.УстановитьЗначение("Взаимодействие", ДокументОбъект.Ссылка);
|
||||||
ЭлементБлокировкиДанных.Режим = РежимБлокировкиДанных.Исключительный;
|
|
||||||
БлокировкаДанных.Заблокировать();
|
БлокировкаДанных.Заблокировать();
|
||||||
|
|
||||||
НаборЗаписей = РегистрыСведений.КонтактыВзаимодействий.СоздатьНаборЗаписей();
|
НаборЗаписей = РегистрыСведений.КонтактыВзаимодействий.СоздатьНаборЗаписей();
|
||||||
|
|||||||
@@ -0,0 +1,46 @@
|
|||||||
|
///////////////////////////////////////////////////////////////////////////////////////////////////////
|
||||||
|
// Copyright (c) 2023, ООО 1С-Софт
|
||||||
|
// Все права защищены. Эта программа и сопроводительные материалы предоставляются
|
||||||
|
// в соответствии с условиями лицензии Attribution 4.0 International (CC BY 4.0)
|
||||||
|
// Текст лицензии доступен по ссылке:
|
||||||
|
// https://creativecommons.org/licenses/by/4.0/legalcode
|
||||||
|
///////////////////////////////////////////////////////////////////////////////////////////////////////
|
||||||
|
|
||||||
|
#Область СлужебныйПрограммныйИнтерфейс
|
||||||
|
|
||||||
|
// Параметры:
|
||||||
|
// Оповещение - ОписаниеОповещения
|
||||||
|
// Контекст - Структура:
|
||||||
|
// * ТекстПояснения - Строка
|
||||||
|
// * Идентификатор - Строка
|
||||||
|
// * Версия - Строка
|
||||||
|
// - Неопределено
|
||||||
|
// * ОбновлятьАвтоматически - Булево
|
||||||
|
//
|
||||||
|
Процедура ПоискКомпонентыНаПортале(Оповещение, Контекст) Экспорт
|
||||||
|
|
||||||
|
// Локализация
|
||||||
|
ПараметрыФормы = Новый Структура;
|
||||||
|
ПараметрыФормы.Вставить("ТекстПояснения", Контекст.ТекстПояснения);
|
||||||
|
ПараметрыФормы.Вставить("Идентификатор", Контекст.Идентификатор);
|
||||||
|
ПараметрыФормы.Вставить("Версия", Контекст.Версия);
|
||||||
|
ПараметрыФормы.Вставить("ОбновлятьАвтоматически", Контекст.ОбновлятьАвтоматически);
|
||||||
|
|
||||||
|
ОткрытьФорму("Справочник.ВнешниеКомпоненты.Форма.ПоискКомпонентыНаПортале1СИТС",
|
||||||
|
ПараметрыФормы,,,,, Оповещение)
|
||||||
|
// Конец Локализация
|
||||||
|
|
||||||
|
КонецПроцедуры
|
||||||
|
|
||||||
|
Процедура ОбновитьКомпонентыСПортала(Оповещение, ОбновляемыеКомпоненты) Экспорт
|
||||||
|
|
||||||
|
// Локализация
|
||||||
|
ПараметрыФормы = Новый Структура;
|
||||||
|
ПараметрыФормы.Вставить("ОбновляемыеКомпоненты", ОбновляемыеКомпоненты);
|
||||||
|
ОткрытьФорму("Справочник.ВнешниеКомпоненты.Форма.ОбновлениеКомпонентСПортала1СИТС",
|
||||||
|
ПараметрыФормы,,,,, Оповещение);
|
||||||
|
// Конец Локализация
|
||||||
|
|
||||||
|
КонецПроцедуры
|
||||||
|
|
||||||
|
#КонецОбласти
|
||||||
+10
@@ -0,0 +1,10 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<mdclass:CommonModule xmlns:mdclass="http://g5.1c.ru/v8/dt/metadata/mdclass" uuid="c96b58a2-db6e-4a0f-82fd-fc115a169b18">
|
||||||
|
<name>ВнешниеКомпонентыКлиентЛокализация</name>
|
||||||
|
<synonym>
|
||||||
|
<key>ru</key>
|
||||||
|
<value>Внешние компоненты клиент локализация</value>
|
||||||
|
</synonym>
|
||||||
|
<clientManagedApplication>true</clientManagedApplication>
|
||||||
|
<clientOrdinaryApplication>true</clientOrdinaryApplication>
|
||||||
|
</mdclass:CommonModule>
|
||||||
@@ -471,11 +471,12 @@
|
|||||||
Процедура ПриДобавленииОбработчиковОбновления(Обработчики) Экспорт
|
Процедура ПриДобавленииОбработчиковОбновления(Обработчики) Экспорт
|
||||||
|
|
||||||
Обработчик = Обработчики.Добавить();
|
Обработчик = Обработчики.Добавить();
|
||||||
Обработчик.Версия = "3.1.6.48";
|
Обработчик.Версия = "3.1.9.163";
|
||||||
Обработчик.Идентификатор = Новый УникальныйИдентификатор("cb3e8653-f1d2-4439-afdd-b1d27f6dcc2f");
|
Обработчик.Идентификатор = Новый УникальныйИдентификатор("cb3e8653-f1d2-4439-afdd-b1d27f6dcc2f");
|
||||||
Обработчик.Процедура = "Справочники.ВнешниеКомпоненты.ОбработатьДанныеДляПереходаНаНовуюВерсию";
|
Обработчик.Процедура = "Справочники.ВнешниеКомпоненты.ОбработатьДанныеДляПереходаНаНовуюВерсию";
|
||||||
|
Обработчик.НачальноеЗаполнение = Истина;
|
||||||
Обработчик.Комментарий = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
|
Обработчик.Комментарий = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
|
||||||
НСтр("ru = 'Заполнение реквизитов ""%1"", ""%2"", ""%3"", которые ранее ошибочно были не заполнены'"),
|
НСтр("ru = 'Заполнение реквизитов ""%1"", ""%2"", ""%3"", которые ранее ошибочно были не заполнены, а также регистрация стандартных компонент для их автоматического обновления.'"),
|
||||||
"MacOS_x86_64_Safari", "MacOS_x86_64_Chrome", "MacOS_x86_64_Firefox");
|
"MacOS_x86_64_Safari", "MacOS_x86_64_Chrome", "MacOS_x86_64_Firefox");
|
||||||
Обработчик.РежимВыполнения = "Отложенно";
|
Обработчик.РежимВыполнения = "Отложенно";
|
||||||
Обработчик.ПроцедураЗаполненияДанныхОбновления = "Справочники.ВнешниеКомпоненты.ЗарегистрироватьДанныеКОбработкеДляПереходаНаНовуюВерсию";
|
Обработчик.ПроцедураЗаполненияДанныхОбновления = "Справочники.ВнешниеКомпоненты.ЗарегистрироватьДанныеКОбработкеДляПереходаНаНовуюВерсию";
|
||||||
|
|||||||
@@ -75,8 +75,9 @@
|
|||||||
"ПроверитьДоступностьКомпонентыПослеПоискаКомпонентыНаПортале",
|
"ПроверитьДоступностьКомпонентыПослеПоискаКомпонентыНаПортале",
|
||||||
ЭтотОбъект,
|
ЭтотОбъект,
|
||||||
КонтекстПоиска);
|
КонтекстПоиска);
|
||||||
|
|
||||||
ПоискКомпонентыНаПортале(ОповещениеФормы, Контекст);
|
Оповещение = Новый ОписаниеОповещения("ПоискКомпонентыНаПорталеПриФормированииРезультата", ЭтотОбъект, ОповещениеФормы);
|
||||||
|
ВнешниеКомпонентыКлиентЛокализация.ПоискКомпонентыНаПортале(Оповещение, Контекст);
|
||||||
|
|
||||||
Иначе
|
Иначе
|
||||||
Результат.ОписаниеОшибки = НСтр("ru = 'Компонента отсутствует в списке разрешенных внешних компонент.'");
|
Результат.ОписаниеОшибки = НСтр("ru = 'Компонента отсутствует в списке разрешенных внешних компонент.'");
|
||||||
@@ -951,30 +952,6 @@
|
|||||||
|
|
||||||
#Область ПоискКомпонентыНаПортале
|
#Область ПоискКомпонентыНаПортале
|
||||||
|
|
||||||
// Параметры:
|
|
||||||
// Оповещение - ОписаниеОповещения
|
|
||||||
// Контекст - Структура:
|
|
||||||
// * ТекстПояснения - Строка
|
|
||||||
// * Идентификатор - Строка
|
|
||||||
// * Версия - Строка
|
|
||||||
// - Неопределено
|
|
||||||
// * ОбновлятьАвтоматически - Булево
|
|
||||||
//
|
|
||||||
Процедура ПоискКомпонентыНаПортале(Оповещение, Контекст)
|
|
||||||
|
|
||||||
ПараметрыФормы = Новый Структура;
|
|
||||||
ПараметрыФормы.Вставить("ТекстПояснения", Контекст.ТекстПояснения);
|
|
||||||
ПараметрыФормы.Вставить("Идентификатор", Контекст.Идентификатор);
|
|
||||||
ПараметрыФормы.Вставить("Версия", Контекст.Версия);
|
|
||||||
ПараметрыФормы.Вставить("ОбновлятьАвтоматически", Контекст.ОбновлятьАвтоматически);
|
|
||||||
|
|
||||||
ОповещениеФормы = Новый ОписаниеОповещения("ПоискКомпонентыНаПорталеПриФормированииРезультата", ЭтотОбъект, Оповещение);
|
|
||||||
|
|
||||||
ОткрытьФорму("Справочник.ВнешниеКомпоненты.Форма.ПоискКомпонентыНаПортале1СИТС",
|
|
||||||
ПараметрыФормы,,,,, ОповещениеФормы)
|
|
||||||
|
|
||||||
КонецПроцедуры
|
|
||||||
|
|
||||||
Процедура ПоискКомпонентыНаПорталеПриФормированииРезультата(Результат, Оповещение) Экспорт
|
Процедура ПоискКомпонентыНаПорталеПриФормированииРезультата(Результат, Оповещение) Экспорт
|
||||||
|
|
||||||
Загружена = (Результат = Истина); // При закрытии формы будет Неопределено.
|
Загружена = (Результат = Истина); // При закрытии формы будет Неопределено.
|
||||||
@@ -992,11 +969,8 @@
|
|||||||
//
|
//
|
||||||
Процедура ОбновитьКомпонентыСПортала(Оповещение, ОбновляемыеКомпоненты) Экспорт
|
Процедура ОбновитьКомпонентыСПортала(Оповещение, ОбновляемыеКомпоненты) Экспорт
|
||||||
|
|
||||||
ПараметрыФормы = Новый Структура;
|
|
||||||
ПараметрыФормы.Вставить("ОбновляемыеКомпоненты", ОбновляемыеКомпоненты);
|
|
||||||
ОповещениеФормы = Новый ОписаниеОповещения("ОбновитьКомпонентыСПорталаПриФормированииРезультата", ЭтотОбъект, Оповещение);
|
ОповещениеФормы = Новый ОписаниеОповещения("ОбновитьКомпонентыСПорталаПриФормированииРезультата", ЭтотОбъект, Оповещение);
|
||||||
ОткрытьФорму("Справочник.ВнешниеКомпоненты.Форма.ОбновлениеКомпонентСПортала1СИТС",
|
ВнешниеКомпонентыКлиентЛокализация.ОбновитьКомпонентыСПортала(ОповещениеФормы, ОбновляемыеКомпоненты);
|
||||||
ПараметрыФормы,,,,, ОповещениеФормы);
|
|
||||||
|
|
||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
|
|||||||
@@ -764,10 +764,6 @@
|
|||||||
//
|
//
|
||||||
Процедура ПеренестиЗащищаемыеОбластиПерсональныхДанных(ПараметрыОбновления) Экспорт
|
Процедура ПеренестиЗащищаемыеОбластиПерсональныхДанных(ПараметрыОбновления) Экспорт
|
||||||
|
|
||||||
Если Не ОбщегоНазначения.ДоступноИспользованиеРазделенныхДанных() Тогда
|
|
||||||
Возврат;
|
|
||||||
КонецЕсли;
|
|
||||||
|
|
||||||
ПараметрыОбновления.ОбработкаЗавершена = Ложь;
|
ПараметрыОбновления.ОбработкаЗавершена = Ложь;
|
||||||
|
|
||||||
Блокировка = Новый БлокировкаДанных();
|
Блокировка = Новый БлокировкаДанных();
|
||||||
|
|||||||
@@ -1962,6 +1962,11 @@
|
|||||||
МодульНапоминанияПользователяСлужебный.ПриДобавленииСерверныхОповещений(Оповещения);
|
МодульНапоминанияПользователяСлужебный.ПриДобавленииСерверныхОповещений(Оповещения);
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
|
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.МашиночитаемыеДоверенности") Тогда
|
||||||
|
МодульМашиночитаемыеДоверенностиФНССлужебный = ОбщегоНазначения.ОбщийМодуль("МашиночитаемыеДоверенностиФНССлужебный");
|
||||||
|
МодульМашиночитаемыеДоверенностиФНССлужебный.ПриДобавленииСерверныхОповещений(Оповещения);
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
Если ИнтеграцияПодсистемБСППовтИсп.ПодпискиБТС().ПриДобавленииСерверныхОповещений Тогда
|
Если ИнтеграцияПодсистемБСППовтИсп.ПодпискиБТС().ПриДобавленииСерверныхОповещений Тогда
|
||||||
МодульИнтеграцияПодсистемБТС = ОбщегоНазначения.ОбщийМодуль("ИнтеграцияПодсистемБТС");
|
МодульИнтеграцияПодсистемБТС = ОбщегоНазначения.ОбщийМодуль("ИнтеграцияПодсистемБТС");
|
||||||
МодульИнтеграцияПодсистемБТС.ПриДобавленииСерверныхОповещений(Оповещения);
|
МодульИнтеграцияПодсистемБТС.ПриДобавленииСерверныхОповещений(Оповещения);
|
||||||
|
|||||||
@@ -793,7 +793,8 @@
|
|||||||
|Версия календарей
|
|Версия календарей
|
||||||
|- полученного классификатора %1,
|
|- полученного классификатора %1,
|
||||||
|- встроенных в конфигурацию %2,
|
|- встроенных в конфигурацию %2,
|
||||||
|- загруженного ранее классификатора %3.'"),
|
|- загруженного ранее классификатора %3.
|
||||||
|
|Рекомендуется выполнить обновление классификаторов.'"),
|
||||||
СведенияФайла.Версия,
|
СведенияФайла.Версия,
|
||||||
ВерсияКалендарей(),
|
ВерсияКалендарей(),
|
||||||
ВерсияЗагруженныхКалендарей());
|
ВерсияЗагруженныхКалендарей());
|
||||||
|
|||||||
@@ -56,7 +56,7 @@
|
|||||||
// - ДвоичныеДанные
|
// - ДвоичныеДанные
|
||||||
// - Строка - адрес двоичных данных сертификата во временном хранилище.
|
// - Строка - адрес двоичных данных сертификата во временном хранилище.
|
||||||
// - СправочникСсылка.СертификатыКлючейЭлектроннойПодписиИШифрования.
|
// - СправочникСсылка.СертификатыКлючейЭлектроннойПодписиИШифрования.
|
||||||
// Префикс - см. ДоверенностиСОтбором.
|
// Префикс - см. ДоверенностиСОтбором.
|
||||||
//
|
//
|
||||||
// Возвращаемое значение:
|
// Возвращаемое значение:
|
||||||
// Структура
|
// Структура
|
||||||
@@ -101,14 +101,14 @@
|
|||||||
// "ДоверительИНН", "ДоверительКПП", "ДоверительОрганизация", "ДоверительФизическоеЛицо" и т.п.
|
// "ДоверительИНН", "ДоверительКПП", "ДоверительОрганизация", "ДоверительФизическоеЛицо" и т.п.
|
||||||
// По умолчанию будут подобраны доверенности с признаками Верна, Подписана и статусом Действует.
|
// По умолчанию будут подобраны доверенности с признаками Верна, Подписана и статусом Действует.
|
||||||
// Если значение отбора Неопределено, отбор по полю не производится.
|
// Если значение отбора Неопределено, отбор по полю не производится.
|
||||||
// ВыбранныеПоля - Массив из Строка - поля, которые нужно возвращать.
|
// ВыбранныеПоля - Массив из Строка, Строка - массив строк или строка через запятую: поля, которые нужно возвращать.
|
||||||
// НаДату - Дата - по умолчанию - текущая дата сеанса: дата, на которую определяется действительность доверенности.
|
// НаДату - Дата - по умолчанию - текущая дата сеанса: дата, на которую определяется действительность доверенности.
|
||||||
// Если передана пустая дата, отбор по периоду действия не будет использоваться.
|
// Если передана пустая дата, отбор по периоду действия не будет использоваться.
|
||||||
//
|
//
|
||||||
// Возвращаемое значение:
|
// Возвращаемое значение:
|
||||||
// ТаблицаЗначений
|
// ТаблицаЗначений
|
||||||
//
|
//
|
||||||
Функция ДоверенностиСОтбором(Отбор, ВыбранныеПоля, Знач НаДату = Неопределено) Экспорт
|
Функция ДоверенностиСОтбором(Отбор, Знач ВыбранныеПоля, Знач НаДату = Неопределено) Экспорт
|
||||||
|
|
||||||
СтруктураОтборов = Новый Структура;
|
СтруктураОтборов = Новый Структура;
|
||||||
СтруктураОтборов.Вставить("Верна", Истина);
|
СтруктураОтборов.Вставить("Верна", Истина);
|
||||||
@@ -127,6 +127,8 @@
|
|||||||
ВыбранныеПоля.Добавить("НомерДоверенности");
|
ВыбранныеПоля.Добавить("НомерДоверенности");
|
||||||
ВыбранныеПоля.Добавить("Наименование");
|
ВыбранныеПоля.Добавить("Наименование");
|
||||||
ВыбранныеПоля.Добавить("ДатаВыдачи");
|
ВыбранныеПоля.Добавить("ДатаВыдачи");
|
||||||
|
ИначеЕсли ТипЗнч(ВыбранныеПоля) = Тип("Строка") Тогда
|
||||||
|
ВыбранныеПоля = СтрРазделить(ВыбранныеПоля, ", ", Ложь);
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
Если НаДату = Неопределено Тогда
|
Если НаДату = Неопределено Тогда
|
||||||
@@ -313,7 +315,7 @@
|
|||||||
ВидУчастника = ?(ЭтоИндивидуальныйПредприниматель, "ИндивидуальныйПредприниматель", "ДолжностноеЛицо");
|
ВидУчастника = ?(ЭтоИндивидуальныйПредприниматель, "ИндивидуальныйПредприниматель", "ДолжностноеЛицо");
|
||||||
Реквизиты = МашиночитаемыеДоверенностиФНССлужебныйКлиентСервер.РеквизитыУчастника(ТипЭлемента, ФизическоеЛицо, ВидУчастника);
|
Реквизиты = МашиночитаемыеДоверенностиФНССлужебныйКлиентСервер.РеквизитыУчастника(ТипЭлемента, ФизическоеЛицо, ВидУчастника);
|
||||||
Если Не ЭтоИндивидуальныйПредприниматель И ЗначениеЗаполнено(Должность) Тогда
|
Если Не ЭтоИндивидуальныйПредприниматель И ЗначениеЗаполнено(Должность) Тогда
|
||||||
Реквизиты.ДолжностьЛицаБезДоверенности = Должность;
|
Реквизиты.ДолжностьЛицаДоверителя = Должность;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
Возврат Реквизиты;
|
Возврат Реквизиты;
|
||||||
@@ -352,7 +354,7 @@
|
|||||||
|
|
||||||
КонецФункции
|
КонецФункции
|
||||||
|
|
||||||
// Результат проверки подписи по МЧД.
|
// Проверяет записанную в базу подпись на соответствие подписанту, документу, действие доверенности на дату подписи.
|
||||||
//
|
//
|
||||||
// Параметры:
|
// Параметры:
|
||||||
// ПодписанныйОбъект - ОпределяемыйТип.ПодписанныйОбъект - ссылка на подписанный объект.
|
// ПодписанныйОбъект - ОпределяемыйТип.ПодписанныйОбъект - ссылка на подписанный объект.
|
||||||
@@ -383,6 +385,7 @@
|
|||||||
Запрос.Текст =
|
Запрос.Текст =
|
||||||
"ВЫБРАТЬ
|
"ВЫБРАТЬ
|
||||||
| ЭлектронныеПодписиМЧД.МашиночитаемаяДоверенность КАК Ссылка,
|
| ЭлектронныеПодписиМЧД.МашиночитаемаяДоверенность КАК Ссылка,
|
||||||
|
| ПРЕДСТАВЛЕНИЕ(ЭлектронныеПодписиМЧД.МашиночитаемаяДоверенность) КАК Представление,
|
||||||
| МашиночитаемыеДоверенности.ФайлДоверенности КАК ФайлДоверенности,
|
| МашиночитаемыеДоверенности.ФайлДоверенности КАК ФайлДоверенности,
|
||||||
| МашиночитаемыеДоверенности.Статус КАК Статус,
|
| МашиночитаемыеДоверенности.Статус КАК Статус,
|
||||||
| МашиночитаемыеДоверенности.Верна КАК Верна,
|
| МашиночитаемыеДоверенности.Верна КАК Верна,
|
||||||
|
|||||||
@@ -87,7 +87,15 @@
|
|||||||
// # ЕстьВсеПодписи - Булево - есть все подписи доверителей.
|
// # ЕстьВсеПодписи - Булево - есть все подписи доверителей.
|
||||||
// # Статус - ПеречислениеСсылка.СтатусыМЧД
|
// # Статус - ПеречислениеСсылка.СтатусыМЧД
|
||||||
// # ЕстьВРеестреФНС - Булево
|
// # ЕстьВРеестреФНС - Булево
|
||||||
// # ТекстОшибки - Строка
|
// # ТекстОшибки - Строка - ошибки строкой
|
||||||
|
// # ОписаниеОшибок - Структура - содержит ошибки выполнения проверок:
|
||||||
|
// ## ОписаниеОшибки - Строка - полное описание ошибки, когда оно возвращается строкой.
|
||||||
|
// ## ЗаголовокОшибки - Строка - заголовок ошибки, который соответствует операции
|
||||||
|
// когда операция одна (не заполнен, когда операций несколько).
|
||||||
|
// ## Ошибки - Массив из Структура:
|
||||||
|
// ### ЗаголовокОшибки - Строка - заголовок ошибки, который соответствует операции
|
||||||
|
// когда операций несколько (не заполнен, когда операция одна).
|
||||||
|
// ### Описание - Строка - краткое представление ошибки.
|
||||||
// # РезультатыПроверкиПодписей - Массив из Структура:
|
// # РезультатыПроверкиПодписей - Массив из Структура:
|
||||||
// ## Верна - Булево
|
// ## Верна - Булево
|
||||||
// ## КомуВыданСертификат - Строка
|
// ## КомуВыданСертификат - Строка
|
||||||
|
|||||||
@@ -71,6 +71,35 @@
|
|||||||
//
|
//
|
||||||
Процедура ПриПроверкеДоверенности(Оповещение, Доверенность, ИдентификаторФормы, СтандартнаяОбработка) Экспорт
|
Процедура ПриПроверкеДоверенности(Оповещение, Доверенность, ИдентификаторФормы, СтандартнаяОбработка) Экспорт
|
||||||
|
|
||||||
|
КонецПроцедуры
|
||||||
|
|
||||||
|
// При обработке навигационной ссылки состояния в другом реестре в форме машиночитаемой доверенности,
|
||||||
|
// сформированной в МашиночитаемыеДоверенностиФНСПереопределяемый.ПриПолученииСтатусаРегистрации
|
||||||
|
//
|
||||||
|
// Параметры:
|
||||||
|
// Доверенность - СправочникОбъект.МашиночитаемыеДоверенности
|
||||||
|
// НавигационнаяСсылкаФорматированнойСтроки - Строка
|
||||||
|
// СтандартнаяОбработка - Булево
|
||||||
|
//
|
||||||
|
Процедура ПриОбработкеНавигационнойСсылки(Доверенность, НавигационнаяСсылкаФорматированнойСтроки, СтандартнаяОбработка) Экспорт
|
||||||
|
|
||||||
|
КонецПроцедуры
|
||||||
|
|
||||||
|
// Вызывается при изменении статуса доверенности, например, когда статус обновляется из реестра ФНС, для обработки
|
||||||
|
// изменившегося статуса доверенности. К примеру, в процедуре можно сообщить о том, что доверенность готова и
|
||||||
|
// можно продолжить отправку отчетности или документов по ЭДО.
|
||||||
|
//
|
||||||
|
// Параметры:
|
||||||
|
// СтатусыДоверенностей - Соответствие из КлючИЗначение:
|
||||||
|
// * Ключ - СправочникСсылка.МашиночитаемыеДоверенности - доверенность с изменившимся статусом
|
||||||
|
// * Значение - Структура:
|
||||||
|
// ** СтатусДоИзменения - ПеречислениеСсылка.ТехническиеСтатусыМЧД
|
||||||
|
// ** НовыйСтатус - ПеречислениеСсылка.ТехническиеСтатусыМЧД
|
||||||
|
//
|
||||||
|
Процедура ПриИзмененииСтатусаДоверенности(СтатусыДоверенностей) Экспорт
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
#КонецОбласти
|
#КонецОбласти
|
||||||
@@ -124,20 +124,6 @@
|
|||||||
|
|
||||||
|
|
||||||
|
|
||||||
КонецПроцедуры
|
|
||||||
|
|
||||||
// Вызывается при изменении статуса доверенности, например, когда статус обновляется из реестра ФНС, для обработки
|
|
||||||
// изменившегося статуса доверенности.
|
|
||||||
//
|
|
||||||
// Параметры:
|
|
||||||
// СтатусыДоверенностей - Соответствие из КлючИЗначение:
|
|
||||||
// * Ключ - СправочникСсылка.МашиночитаемыеДоверенности - доверенность с изменившимся статусом
|
|
||||||
// * Значение - Структура:
|
|
||||||
// ** СтатусДоИзменения - ПеречислениеСсылка.ТехническиеСтатусыМЧД
|
|
||||||
// ** НовыйСтатус - ПеречислениеСсылка.ТехническиеСтатусыМЧД
|
|
||||||
//
|
|
||||||
Процедура ПриИзмененииСтатусаДоверенности(СтатусыДоверенностей) Экспорт
|
|
||||||
|
|
||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
// Для выполнения прикладной проверки подписи по доверенности. Например, проверка соответствия реквизитов доверителя
|
// Для выполнения прикладной проверки подписи по доверенности. Например, проверка соответствия реквизитов доверителя
|
||||||
@@ -147,8 +133,8 @@
|
|||||||
// ДанныеДоверенности - Структура, ВыборкаИзРезультатаЗапроса:
|
// ДанныеДоверенности - Структура, ВыборкаИзРезультатаЗапроса:
|
||||||
// * Ссылка - СправочникСсылка.МашиночитаемыеДоверенности
|
// * Ссылка - СправочникСсылка.МашиночитаемыеДоверенности
|
||||||
// * ПодписанныйОбъект - ОпределяемыйТип.ПодписанныйОбъект - ссылка на подписанный объект.
|
// * ПодписанныйОбъект - ОпределяемыйТип.ПодписанныйОбъект - ссылка на подписанный объект.
|
||||||
// * Полномочия - ТаблицаЗначений - содержит реквизиты табличной части Полномочия справочника МашиночитаемыеДоверенности.
|
// * Полномочия - ТаблицаЗначений, РезультатЗапроса - содержит реквизиты табличной части Полномочия справочника МашиночитаемыеДоверенности.
|
||||||
// * Ограничения - ТаблицаЗначений - содержит реквизиты табличной части Ограничения справочника МашиночитаемыеДоверенности.
|
// * Ограничения - ТаблицаЗначений, РезультатЗапроса - содержит реквизиты табличной части Ограничения справочника МашиночитаемыеДоверенности.
|
||||||
// Сертификат - см. МашиночитаемыеДоверенностиФНС.ОтборДляДоверенностейПоСертификату.Сертификат
|
// Сертификат - см. МашиночитаемыеДоверенностиФНС.ОтборДляДоверенностейПоСертификату.Сертификат
|
||||||
// ПротоколПроверки - Соответствие из КлючИЗначение:
|
// ПротоколПроверки - Соответствие из КлючИЗначение:
|
||||||
// * Ключ - Строка - ключ проверки, для проверки полномочий и документа в протокол добавлены значения
|
// * Ключ - Строка - ключ проверки, для проверки полномочий и документа в протокол добавлены значения
|
||||||
@@ -157,6 +143,39 @@
|
|||||||
//
|
//
|
||||||
Процедура ПриПроверкеДоверенностиПодписи(ДанныеДоверенности, Сертификат, ПротоколПроверки) Экспорт
|
Процедура ПриПроверкеДоверенностиПодписи(ДанныеДоверенности, Сертификат, ПротоколПроверки) Экспорт
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
КонецПроцедуры
|
||||||
|
|
||||||
|
// Переопределяет описание состояния доверенности в реестре Федеральной таможенной службы или другом.
|
||||||
|
//
|
||||||
|
// Параметры:
|
||||||
|
// Доверенность - СправочникСсылка.МашиночитаемыеДоверенности
|
||||||
|
// РегистрацияВРеестре - Структура:
|
||||||
|
// *ПоказыватьРегистрироватьВРеестре - Булево - показывать флажок Регистрировать в реестре
|
||||||
|
// *ЗарегистрированаВРеестре - Булево
|
||||||
|
// *СостояниеРегистрации - Строка, ФорматированнаяСтрока - если ЗарегистрированаВРеестре = Истина,
|
||||||
|
// тогда отображается в шапке, иначе около флажка регистрации.
|
||||||
|
// *ЗаголовокФлажкаРегистрации - Строка - заголовок флажка
|
||||||
|
// *ПолномочияПриОткрытии - Неопределено, Массив из Строка - список кодов полномочий, переданных в параметре при открытии
|
||||||
|
// формы. Можно анализировать и не отображать флажок регистрации, если полномочия относятся к другой подсистеме.
|
||||||
|
// *ВыбранныеПолномочия - Структура:
|
||||||
|
// ** Полномочия - ТаблицаЗначений
|
||||||
|
// ** Ограничения - ТаблицаЗначений
|
||||||
|
// *КодыПолномочийДляДобавления - Массив из Строка - коды полномочий, которые предлагать добавить при выборе флажка регистрации.
|
||||||
|
// Если одно из них уже выбрано, предложение о добавлении не выводится.
|
||||||
|
//
|
||||||
|
Процедура ПриПолученииСтатусаРегистрации(Доверенность, РегистрацияВРеестре) Экспорт
|
||||||
|
|
||||||
|
КонецПроцедуры
|
||||||
|
|
||||||
|
// Переопределяет процедуру регистрации в реестре Федеральной таможенной службы или другом.
|
||||||
|
//
|
||||||
|
// Параметры:
|
||||||
|
// Доверенность - СправочникСсылка.МашиночитаемыеДоверенности
|
||||||
|
//
|
||||||
|
Процедура ПриРегистрацииДоверенности(Доверенность) Экспорт
|
||||||
|
|
||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
#КонецОбласти
|
#КонецОбласти
|
||||||
@@ -24,6 +24,7 @@
|
|||||||
"ВЫБРАТЬ
|
"ВЫБРАТЬ
|
||||||
| ЭлектронныеПодписиМЧД.ИдентификаторПодписи КАК ИдентификаторПодписи,
|
| ЭлектронныеПодписиМЧД.ИдентификаторПодписи КАК ИдентификаторПодписи,
|
||||||
| ЭлектронныеПодписиМЧД.МашиночитаемаяДоверенность КАК МашиночитаемаяДоверенность,
|
| ЭлектронныеПодписиМЧД.МашиночитаемаяДоверенность КАК МашиночитаемаяДоверенность,
|
||||||
|
| ПРЕДСТАВЛЕНИЕ(ЭлектронныеПодписиМЧД.МашиночитаемаяДоверенность) КАК Представление,
|
||||||
| ЭлектронныеПодписиМЧД.ТребуетсяПроверка КАК ТребуетсяПроверка,
|
| ЭлектронныеПодписиМЧД.ТребуетсяПроверка КАК ТребуетсяПроверка,
|
||||||
| ЭлектронныеПодписиМЧД.ДатаПроверки КАК ДатаПроверки,
|
| ЭлектронныеПодписиМЧД.ДатаПроверки КАК ДатаПроверки,
|
||||||
| ЭлектронныеПодписиМЧД.Верна КАК Верна,
|
| ЭлектронныеПодписиМЧД.Верна КАК Верна,
|
||||||
@@ -96,7 +97,7 @@
|
|||||||
Массив.Добавить(СтроковыеФункции.ФорматированнаяСтрока(НСтр("ru = '%1 <a href=%2>%3</a>'"),
|
Массив.Добавить(СтроковыеФункции.ФорматированнаяСтрока(НСтр("ru = '%1 <a href=%2>%3</a>'"),
|
||||||
Проверка,
|
Проверка,
|
||||||
ПолучитьНавигационнуюСсылку(Результат.МашиночитаемаяДоверенность),
|
ПолучитьНавигационнуюСсылку(Результат.МашиночитаемаяДоверенность),
|
||||||
Результат.МашиночитаемаяДоверенность));
|
Результат.Представление));
|
||||||
Массив.Добавить(Символы.ПС);
|
Массив.Добавить(Символы.ПС);
|
||||||
|
|
||||||
КонецЦикла;
|
КонецЦикла;
|
||||||
@@ -144,7 +145,7 @@
|
|||||||
Элемент = Форма.Элементы.Добавить("СсылкаНаМЧД" + Индекс, Тип("ДекорацияФормы"), ГруппаПротоколПроверки);
|
Элемент = Форма.Элементы.Добавить("СсылкаНаМЧД" + Индекс, Тип("ДекорацияФормы"), ГруппаПротоколПроверки);
|
||||||
Элемент.Заголовок = СтроковыеФункции.ФорматированнаяСтрока(НСтр("ru = '<a href=%1>%2</a>'"),
|
Элемент.Заголовок = СтроковыеФункции.ФорматированнаяСтрока(НСтр("ru = '<a href=%1>%2</a>'"),
|
||||||
ПолучитьНавигационнуюСсылку(Результат.МашиночитаемаяДоверенность),
|
ПолучитьНавигационнуюСсылку(Результат.МашиночитаемаяДоверенность),
|
||||||
Результат.МашиночитаемаяДоверенность);
|
Результат.Представление);
|
||||||
Элемент.АвтоМаксимальнаяШирина = Ложь;
|
Элемент.АвтоМаксимальнаяШирина = Ложь;
|
||||||
|
|
||||||
ГруппаАвтоматическиеПроверки = Форма.Элементы.Добавить("ГруппаАвтоматическиеПроверки" + Индекс, Тип("ГруппаФормы"), ГруппаПротоколПроверки);
|
ГруппаАвтоматическиеПроверки = Форма.Элементы.Добавить("ГруппаАвтоматическиеПроверки" + Индекс, Тип("ГруппаФормы"), ГруппаПротоколПроверки);
|
||||||
@@ -218,16 +219,24 @@
|
|||||||
Элемент.Картинка = ?(Проверка.Верна, БиблиотекаКартинок.ПроверкаСертификатаУспех, БиблиотекаКартинок.ПроверкаСертификатаОшибка);
|
Элемент.Картинка = ?(Проверка.Верна, БиблиотекаКартинок.ПроверкаСертификатаУспех, БиблиотекаКартинок.ПроверкаСертификатаОшибка);
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
Если ЗначениеЗаполнено(Проверка.ТекстПроверки) И Не Результат.СтатусВернаУстановленВручную Тогда
|
Элемент = Форма.Элементы.Добавить("ЗаголовокПроверки" + ПолеВывода + Индекс, Тип("ДекорацияФормы"), ГруппаПроверкаЗаголовок);
|
||||||
Элемент = Форма.Элементы.Добавить("ТекстПроверки" + ПолеВывода + Индекс, Тип("ДекорацияФормы"), ГруппаПроверкаЗаголовок);
|
Элемент.Вид = ВидДекорацииФормы.Надпись;
|
||||||
|
Элемент.АвтоМаксимальнаяШирина = Ложь;
|
||||||
|
Элемент.МаксимальнаяШирина = 50;
|
||||||
|
|
||||||
|
Если Проверка.Верна <> Истина И ЗначениеЗаполнено(Проверка.ТекстПроверки) И Не Результат.СтатусВернаУстановленВручную Тогда
|
||||||
|
|
||||||
|
Элемент.УстановитьДействие("ОбработкаНавигационнойСсылки", "Подключаемый_ОбработкаНавигационнойСсылки");
|
||||||
|
Элемент.Заголовок = СтроковыеФункции.ФорматированнаяСтрока("<a href = ""%1"">%2</a>", Проверка.ТекстПроверки, Проверка.ЗаголовокПроверки);
|
||||||
|
|
||||||
|
Элемент = Форма.Элементы.Добавить("ТекстПроверки" + ПолеВывода + Индекс, Тип("ДекорацияФормы"), ГруппаПроверка);
|
||||||
Элемент.Вид = ВидДекорацииФормы.Надпись;
|
Элемент.Вид = ВидДекорацииФормы.Надпись;
|
||||||
Элемент.Заголовок = СтроковыеФункции.ФорматированнаяСтрока(Проверка.ТекстПроверки);
|
Элемент.Заголовок = СтроковыеФункции.ФорматированнаяСтрока(Проверка.ТекстПроверки);
|
||||||
Элемент.АвтоМаксимальнаяШирина = Ложь;
|
Элемент.АвтоМаксимальнаяШирина = Ложь;
|
||||||
|
Элемент.МаксимальнаяШирина = 60;
|
||||||
|
|
||||||
Иначе
|
Иначе
|
||||||
Элемент = Форма.Элементы.Добавить("ЗаголовокПроверки" + ПолеВывода + Индекс, Тип("ДекорацияФормы"), ГруппаПроверкаЗаголовок);
|
Элемент.Заголовок = Проверка.ЗаголовокПроверки;
|
||||||
Элемент.Вид = ВидДекорацииФормы.Надпись;
|
|
||||||
Элемент.Заголовок = СтроковыеФункции.ФорматированнаяСтрока(Проверка.ЗаголовокПроверки);
|
|
||||||
Элемент.АвтоМаксимальнаяШирина = Ложь;
|
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
КонецЦикла;
|
КонецЦикла;
|
||||||
@@ -398,15 +407,15 @@
|
|||||||
НаборЗаписей = РегистрыСведений.ЭлектронныеПодписиМЧД.СоздатьНаборЗаписей();
|
НаборЗаписей = РегистрыСведений.ЭлектронныеПодписиМЧД.СоздатьНаборЗаписей();
|
||||||
НаборЗаписей.Отбор.ПодписанныйОбъект.Установить(ПодписанныйОбъект);
|
НаборЗаписей.Отбор.ПодписанныйОбъект.Установить(ПодписанныйОбъект);
|
||||||
НаборЗаписей.Отбор.ИдентификаторПодписи.Установить(ИдентификаторПодписи);
|
НаборЗаписей.Отбор.ИдентификаторПодписи.Установить(ИдентификаторПодписи);
|
||||||
НаборЗаписей.Отбор.МашиночитаемаяДоверенность.Установить(РезультатПроверкиПодписиПоМЧД.МашиночитаемаяДоверенность);
|
НаборЗаписей.Отбор.МашиночитаемаяДоверенность.Установить(Результат.МашиночитаемаяДоверенность);
|
||||||
НаборЗаписей.Прочитать();
|
НаборЗаписей.Прочитать();
|
||||||
НаборЗаписей.Очистить();
|
НаборЗаписей.Очистить();
|
||||||
НоваяЗапись = НаборЗаписей.Добавить();
|
НоваяЗапись = НаборЗаписей.Добавить();
|
||||||
|
|
||||||
ЗаполнитьЗначенияСвойств(НоваяЗапись, РезультатПроверкиПодписиПоМЧД);
|
ЗаполнитьЗначенияСвойств(НоваяЗапись, Результат);
|
||||||
|
|
||||||
Если ЗначениеЗаполнено(РезультатПроверкиПодписиПоМЧД.ПротоколПроверки) Тогда
|
Если ЗначениеЗаполнено(Результат.ПротоколПроверки) Тогда
|
||||||
НоваяЗапись.ПротоколПроверки = Новый ХранилищеЗначения(РезультатПроверкиПодписиПоМЧД.ПротоколПроверки);
|
НоваяЗапись.ПротоколПроверки = Новый ХранилищеЗначения(Результат.ПротоколПроверки);
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
НоваяЗапись.ПодписанныйОбъект = ПодписанныйОбъект;
|
НоваяЗапись.ПодписанныйОбъект = ПодписанныйОбъект;
|
||||||
@@ -536,11 +545,7 @@
|
|||||||
|
|
||||||
Функция РезультатПроверкиПодписиПоМЧД(Доверенность, ПодписанныйОбъект, Сертификат, НаДату = Неопределено, Знач ГотовыеПроверки = Неопределено) Экспорт
|
Функция РезультатПроверкиПодписиПоМЧД(Доверенность, ПодписанныйОбъект, Сертификат, НаДату = Неопределено, Знач ГотовыеПроверки = Неопределено) Экспорт
|
||||||
|
|
||||||
РеквизитыДоверенности = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(Доверенность,
|
Возврат РезультатПроверкиПодписиПоДаннымМЧД(ДанныеМЧД(Доверенность, ПодписанныйОбъект), Сертификат, НаДату, ГотовыеПроверки);
|
||||||
"ФайлДоверенности, РегистрироватьВРеестре, НомерДоверенности, Статус, Ссылка, Верна, СтатусВернаУстановленВручную, УстановившийСтатусВерна, Полномочия, Ограничения, СовместныеПолномочия");
|
|
||||||
РеквизитыДоверенности.Вставить("ПодписанныйОбъект", ПодписанныйОбъект);
|
|
||||||
|
|
||||||
Возврат РезультатПроверкиПодписиПоДаннымМЧД(РеквизитыДоверенности, Сертификат, НаДату, ГотовыеПроверки);
|
|
||||||
|
|
||||||
КонецФункции
|
КонецФункции
|
||||||
|
|
||||||
@@ -549,6 +554,7 @@
|
|||||||
// Параметры:
|
// Параметры:
|
||||||
// ДанныеМЧД - Структура, ВыборкаИзРезультатаЗапроса:
|
// ДанныеМЧД - Структура, ВыборкаИзРезультатаЗапроса:
|
||||||
// * ПодписанныйОбъект
|
// * ПодписанныйОбъект
|
||||||
|
// * Представление
|
||||||
// * ФайлДоверенности
|
// * ФайлДоверенности
|
||||||
// * РегистрироватьВРеестре
|
// * РегистрироватьВРеестре
|
||||||
// * НомерДоверенности
|
// * НомерДоверенности
|
||||||
@@ -576,6 +582,7 @@
|
|||||||
ДатаПроверки = ТекущаяДатаСеанса();
|
ДатаПроверки = ТекущаяДатаСеанса();
|
||||||
РезультатПроверкиПодписиПоМЧД = МашиночитаемыеДоверенностиФНССлужебныйКлиентСервер.РезультатПроверкиПодписиПоМЧД(
|
РезультатПроверкиПодписиПоМЧД = МашиночитаемыеДоверенностиФНССлужебныйКлиентСервер.РезультатПроверкиПодписиПоМЧД(
|
||||||
ДанныеМЧД.Ссылка);
|
ДанныеМЧД.Ссылка);
|
||||||
|
РезультатПроверкиПодписиПоМЧД.Представление = ДанныеМЧД.Представление;
|
||||||
|
|
||||||
Если ГотовыеПроверки = Неопределено Или ГотовыеПроверки.ПроверкаДоверенности = Неопределено Тогда
|
Если ГотовыеПроверки = Неопределено Или ГотовыеПроверки.ПроверкаДоверенности = Неопределено Тогда
|
||||||
ПроверкаДоверенности = МашиночитаемыеДоверенностиФНССлужебныйКлиентСервер.РезультатПроверкиДоверенности(
|
ПроверкаДоверенности = МашиночитаемыеДоверенностиФНССлужебныйКлиентСервер.РезультатПроверкиДоверенности(
|
||||||
@@ -634,10 +641,51 @@
|
|||||||
|
|
||||||
КонецФункции
|
КонецФункции
|
||||||
|
|
||||||
|
// См. ОбщегоНазначенияПереопределяемый.ПриДобавленииСерверныхОповещений
|
||||||
|
Процедура ПриДобавленииСерверныхОповещений(Оповещения) Экспорт
|
||||||
|
|
||||||
|
Оповещение = СерверныеОповещения.НовоеСерверноеОповещение(
|
||||||
|
"СтандартныеПодсистемы.МашиночитаемыеДоверенности");
|
||||||
|
|
||||||
|
Оповещение.ИмяМодуляОтправки = "";
|
||||||
|
Оповещение.ИмяМодуляПолучения = "МашиночитаемыеДоверенностиФНССлужебныйКлиент";
|
||||||
|
|
||||||
|
Оповещения.Вставить(Оповещение.Имя, Оповещение);
|
||||||
|
|
||||||
|
КонецПроцедуры
|
||||||
|
|
||||||
#КонецОбласти
|
#КонецОбласти
|
||||||
|
|
||||||
#Область СлужебныеПроцедурыИФункции
|
#Область СлужебныеПроцедурыИФункции
|
||||||
|
|
||||||
|
Функция ПолномочияПоКодам(КодыПолномочий) Экспорт
|
||||||
|
|
||||||
|
МассивПолномочий = Новый Массив;
|
||||||
|
КлассификаторПолномочий = МашиночитаемыеДоверенностиФНСПовтИсп.КлассификаторПолномочий(); // ДеревоЗначений
|
||||||
|
Для Каждого КодПолномочия Из КодыПолномочий Цикл
|
||||||
|
Найдено = КлассификаторПолномочий.Строки.Найти(КодПолномочия,"Код", Истина);
|
||||||
|
Если Найдено = Неопределено Тогда
|
||||||
|
Продолжить;
|
||||||
|
КонецЕсли;
|
||||||
|
ДобавитьСтрокиПолномочий(Найдено, МассивПолномочий);
|
||||||
|
КонецЦикла;
|
||||||
|
Возврат МассивПолномочий;
|
||||||
|
|
||||||
|
КонецФункции
|
||||||
|
|
||||||
|
Процедура ДобавитьСтрокиПолномочий(Строка, МассивПолномочий)
|
||||||
|
|
||||||
|
Если Строка.Строки.Количество() > 0 Тогда
|
||||||
|
Для Каждого Подстрока Из Строка.Строки Цикл
|
||||||
|
ДобавитьСтрокиПолномочий(Подстрока, МассивПолномочий)
|
||||||
|
КонецЦикла;
|
||||||
|
Возврат;
|
||||||
|
КонецЕсли;
|
||||||
|
МассивПолномочий.Добавить(Новый Структура("Код, Наименование, ИдентификаторПолномочия",
|
||||||
|
Строка.Код, Строка.Наименование,Новый УникальныйИдентификатор));
|
||||||
|
|
||||||
|
КонецПроцедуры
|
||||||
|
|
||||||
Процедура ДобавитьВПротоколПроверкуДоверенности(ПротоколПроверки, ПроверкаДоверенности, ДатаПроверки) Экспорт
|
Процедура ДобавитьВПротоколПроверкуДоверенности(ПротоколПроверки, ПроверкаДоверенности, ДатаПроверки) Экспорт
|
||||||
|
|
||||||
РезультатПроверки = МашиночитаемыеДоверенностиФНС.РезультатПроверкиДляПротокола();
|
РезультатПроверки = МашиночитаемыеДоверенностиФНС.РезультатПроверкиДляПротокола();
|
||||||
@@ -664,14 +712,33 @@
|
|||||||
|
|
||||||
Функция РезультатПроверкиДоверенности(Доверенность, ПроверятьВРеестреФНС = Неопределено, ИдентификаторФормы = Неопределено) Экспорт
|
Функция РезультатПроверкиДоверенности(Доверенность, ПроверятьВРеестреФНС = Неопределено, ИдентификаторФормы = Неопределено) Экспорт
|
||||||
|
|
||||||
РеквизитыДоверенности = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(Доверенность,
|
Результат = РезультатПроверкиДанныхДоверенности(ДанныеМЧД(Доверенность), ПроверятьВРеестреФНС, ИдентификаторФормы);
|
||||||
"ФайлДоверенности, РегистрироватьВРеестре, НомерДоверенности, Статус, Ссылка, Верна, СтатусВернаУстановленВручную, УстановившийСтатусВерна");
|
|
||||||
|
|
||||||
Результат = РезультатПроверкиДанныхДоверенности(РеквизитыДоверенности, ПроверятьВРеестреФНС, ИдентификаторФормы);
|
|
||||||
Возврат МашиночитаемыеДоверенностиФНССлужебныйКлиентСервер.РезультатПроверкиДоверенности(Результат);
|
Возврат МашиночитаемыеДоверенностиФНССлужебныйКлиентСервер.РезультатПроверкиДоверенности(Результат);
|
||||||
|
|
||||||
КонецФункции
|
КонецФункции
|
||||||
|
|
||||||
|
// Возвращает промежуточный результат проверки данных доверенности, чтобы недостающие проверки подписей можно было
|
||||||
|
// выполнить на клиенте.
|
||||||
|
//
|
||||||
|
// Параметры:
|
||||||
|
// ДанныеДоверенности - ВыборкаИзРезультатаЗапроса - данные доверенности
|
||||||
|
// ПроверятьВРеестреФНС - Неопределено, Булево - проверять в реестре ФНС, если Неопределено - будет выполнена проверка,
|
||||||
|
// если установлен признак РегистрироватьВРеестре
|
||||||
|
// ИдентификаторФормы - Неопределено - идентификатор формы, если заполнен и не удалось проверить подпись на сервере,
|
||||||
|
// в результатах проверки подписи будет заполнен адрес данных файла и подписи для проверки на клиенте.
|
||||||
|
//
|
||||||
|
// Возвращаемое значение:
|
||||||
|
// Структура - результат проверки данных доверенности:
|
||||||
|
// * СтатусВернаУстановленВручную - Булево
|
||||||
|
// * УстановившийСтатусВерна - СправочникСсылка.Пользователи
|
||||||
|
// * ЕстьВРеестреФНС - Булево
|
||||||
|
// * ОшибкаПроверкиВРеестреФНС - Строка
|
||||||
|
// * Статус - ПеречислениеСсылка.СтатусыМЧД
|
||||||
|
// * РезультатПроверкиПодписей - Массив из Структура
|
||||||
|
// * ВыполненаПроверкаПодписей - см. СтатусВернаИзДанныхДоверенности.
|
||||||
|
// * СтатусВернаИзДанныхДоверенности - Булево - статус Верна, записанный в базу.
|
||||||
|
// * ДатаПроверкиИзДанныхДоверенности - Дата - дата проверки доверенности из базы.
|
||||||
|
//
|
||||||
Функция РезультатПроверкиДанныхДоверенности(ДанныеДоверенности, ПроверятьВРеестреФНС = Неопределено, ИдентификаторФормы = Неопределено) Экспорт
|
Функция РезультатПроверкиДанныхДоверенности(ДанныеДоверенности, ПроверятьВРеестреФНС = Неопределено, ИдентификаторФормы = Неопределено) Экспорт
|
||||||
|
|
||||||
РезультатПроверкиДоверенности = Новый Структура;
|
РезультатПроверкиДоверенности = Новый Структура;
|
||||||
@@ -689,20 +756,25 @@
|
|||||||
РезультатПроверкиДоверенности.Вставить("ОшибкаПроверкиВРеестреФНС");
|
РезультатПроверкиДоверенности.Вставить("ОшибкаПроверкиВРеестреФНС");
|
||||||
РезультатПроверкиДоверенности.Вставить("Статус");
|
РезультатПроверкиДоверенности.Вставить("Статус");
|
||||||
РезультатПроверкиДоверенности.Вставить("РезультатПроверкиПодписей");
|
РезультатПроверкиДоверенности.Вставить("РезультатПроверкиПодписей");
|
||||||
|
РезультатПроверкиДоверенности.Вставить("ВыполненаПроверкаПодписей", Ложь);
|
||||||
|
РезультатПроверкиДоверенности.Вставить("СтатусВернаИзДанныхДоверенности", ДанныеДоверенности.Верна);
|
||||||
|
РезультатПроверкиДоверенности.Вставить("ДатаПроверкиИзДанныхДоверенности", ДанныеДоверенности.ДатаПроверки);
|
||||||
|
|
||||||
|
Если ПравоДоступа("Чтение", Метаданные.Справочники.МашиночитаемыеДоверенности) Тогда
|
||||||
|
РезультатПроверкиДоверенности.ВыполненаПроверкаПодписей = Истина;
|
||||||
|
РезультатПроверкиПодписей = РезультатПроверкиПодписейДоверенности(
|
||||||
|
ДанныеДоверенности.Ссылка, ДанныеДоверенности.ФайлДоверенности, ИдентификаторФормы);
|
||||||
|
РезультатПроверкиДоверенности.РезультатПроверкиПодписей = РезультатПроверкиПодписей;
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
Статус = ДанныеДоверенности.Статус;
|
Статус = ДанныеДоверенности.Статус;
|
||||||
|
|
||||||
РезультатПроверкиПодписей = РезультатПроверкиПодписейДоверенности(
|
|
||||||
ДанныеДоверенности.Ссылка, ДанныеДоверенности.ФайлДоверенности, ИдентификаторФормы);
|
|
||||||
|
|
||||||
РезультатПроверкиДоверенности.РезультатПроверкиПодписей = РезультатПроверкиПодписей;
|
|
||||||
|
|
||||||
ЕстьВРеестреФНС = ДанныеДоверенности.РегистрироватьВРеестре;
|
ЕстьВРеестреФНС = ДанныеДоверенности.РегистрироватьВРеестре;
|
||||||
|
|
||||||
Если ЗначениеЗаполнено(ДанныеДоверенности.НомерДоверенности)
|
Если ЗначениеЗаполнено(ДанныеДоверенности.НомерДоверенности)
|
||||||
И (ПроверятьВРеестреФНС = Истина Или ПроверятьВРеестреФНС = Неопределено И ЕстьВРеестреФНС) Тогда
|
И (ПроверятьВРеестреФНС = Истина Или ПроверятьВРеестреФНС = Неопределено И ЕстьВРеестреФНС) Тогда
|
||||||
РезультатПроверкиВРеестреФНС = ПолучитьЧастичныеДанныеДоверенностиМЧДРР(
|
РезультатПроверкиВРеестреФНС = ПолучитьЧастичныеДанныеДоверенностиМЧДРР(
|
||||||
ДанныеДоверенности.НомерДоверенности);
|
ДанныеДоверенности.НомерДоверенности,,НСтр("ru='Не удалось проверить доверенность'"));
|
||||||
Если ЗначениеЗаполнено(РезультатПроверкиВРеестреФНС.СтатусДоверенности) Тогда
|
Если ЗначениеЗаполнено(РезультатПроверкиВРеестреФНС.СтатусДоверенности) Тогда
|
||||||
ЕстьВРеестреФНС = Истина;
|
ЕстьВРеестреФНС = Истина;
|
||||||
ТехническийСтатус = ПолучитьЗначениеСтатуса(РезультатПроверкиВРеестреФНС.СтатусДоверенности);
|
ТехническийСтатус = ПолучитьЗначениеСтатуса(РезультатПроверкиВРеестреФНС.СтатусДоверенности);
|
||||||
@@ -721,6 +793,60 @@
|
|||||||
|
|
||||||
КонецФункции
|
КонецФункции
|
||||||
|
|
||||||
|
Функция ДанныеМЧД(Доверенность, ПодписанныйОбъект = Неопределено) Экспорт
|
||||||
|
|
||||||
|
УстановитьПривилегированныйРежим(Истина);
|
||||||
|
Запрос = Новый Запрос;
|
||||||
|
Запрос.Текст =
|
||||||
|
"ВЫБРАТЬ
|
||||||
|
| МашиночитаемыеДоверенности.ФайлДоверенности КАК ФайлДоверенности,
|
||||||
|
| МашиночитаемыеДоверенности.Статус КАК Статус,
|
||||||
|
| МашиночитаемыеДоверенности.Верна КАК Верна,
|
||||||
|
| МашиночитаемыеДоверенности.НомерДоверенности КАК НомерДоверенности,
|
||||||
|
| МашиночитаемыеДоверенности.СтатусВернаУстановленВручную КАК СтатусВернаУстановленВручную,
|
||||||
|
| МашиночитаемыеДоверенности.УстановившийСтатусВерна КАК УстановившийСтатусВерна,
|
||||||
|
| МашиночитаемыеДоверенности.ДатаПроверки КАК ДатаПроверки,
|
||||||
|
| МашиночитаемыеДоверенности.ДатаОтмены КАК ДатаОтмены,
|
||||||
|
| МашиночитаемыеДоверенности.ТекстПолномочий КАК ТекстПолномочий,
|
||||||
|
| МашиночитаемыеДоверенности.Полномочия.(
|
||||||
|
| Ссылка КАК Ссылка,
|
||||||
|
| НомерСтроки КАК НомерСтроки,
|
||||||
|
| Код КАК Код,
|
||||||
|
| ИдентификаторПолномочия КАК ИдентификаторПолномочия,
|
||||||
|
| Мнемокод КАК Мнемокод,
|
||||||
|
| Наименование КАК Наименование) КАК Полномочия,
|
||||||
|
| МашиночитаемыеДоверенности.Ограничения.(
|
||||||
|
| Ссылка КАК Ссылка,
|
||||||
|
| НомерСтроки КАК НомерСтроки,
|
||||||
|
| ИдентификаторПолномочия КАК ИдентификаторПолномочия,
|
||||||
|
| Код КАК Код,
|
||||||
|
| Наименование КАК Наименование,
|
||||||
|
| НаименованиеЗначения КАК НаименованиеЗначения,
|
||||||
|
| КодЗначения КАК КодЗначения,
|
||||||
|
| ТекстовоеЗначение КАК ТекстовоеЗначение) КАК Ограничения,
|
||||||
|
| МашиночитаемыеДоверенности.ПолномочияВТекстовомВиде КАК ПолномочияВТекстовомВиде,
|
||||||
|
| МашиночитаемыеДоверенности.ПометкаУдаления,
|
||||||
|
| МашиночитаемыеДоверенности.РегистрироватьВРеестре,
|
||||||
|
| МашиночитаемыеДоверенности.СовместныеПолномочия,
|
||||||
|
| ПРЕДСТАВЛЕНИЕ(МашиночитаемыеДоверенности.Ссылка) КАК Представление,
|
||||||
|
| МашиночитаемыеДоверенности.Ссылка,
|
||||||
|
| &ПодписанныйОбъект КАК ПодписанныйОбъект
|
||||||
|
|ИЗ
|
||||||
|
| Справочник.МашиночитаемыеДоверенности КАК МашиночитаемыеДоверенности
|
||||||
|
|ГДЕ
|
||||||
|
| МашиночитаемыеДоверенности.Ссылка = &Ссылка";
|
||||||
|
|
||||||
|
Запрос.УстановитьПараметр("Ссылка", Доверенность);
|
||||||
|
Запрос.УстановитьПараметр("ПодписанныйОбъект", ПодписанныйОбъект);
|
||||||
|
|
||||||
|
РезультатЗапроса = Запрос.Выполнить();
|
||||||
|
|
||||||
|
Выборка = РезультатЗапроса.Выбрать();
|
||||||
|
Выборка.Следующий();
|
||||||
|
Возврат Выборка;
|
||||||
|
|
||||||
|
КонецФункции
|
||||||
|
|
||||||
// Проверить сертификат доверителя.
|
// Проверить сертификат доверителя.
|
||||||
//
|
//
|
||||||
// Параметры:
|
// Параметры:
|
||||||
@@ -729,13 +855,14 @@
|
|||||||
// Сертификат - СертификатКриптографии
|
// Сертификат - СертификатКриптографии
|
||||||
// - ДвоичныеДанные
|
// - ДвоичныеДанные
|
||||||
// - Строка
|
// - Строка
|
||||||
|
// ПроверятьДублиПодписей - Булево
|
||||||
//
|
//
|
||||||
//
|
//
|
||||||
// Возвращаемое значение:
|
// Возвращаемое значение:
|
||||||
// Булево - доверенность подписана всеми доверителями.
|
// Булево - доверенность подписана всеми доверителями.
|
||||||
// Строка - ошибка, сертификат не совпадает с доверителями или подпись уже приложена.
|
// Строка - ошибка, сертификат не совпадает с доверителями или подпись уже приложена.
|
||||||
//
|
//
|
||||||
Функция ПроверитьСертификатДоверителя(Доверенность, ФайлДоверенности, Сертификат) Экспорт
|
Функция ПроверитьСертификатДоверителя(Доверенность, ФайлДоверенности, Сертификат, ПроверятьНаличиеИДублиПодписи = Истина) Экспорт
|
||||||
|
|
||||||
ДанныеДоверенности = ДанныеДоверителей(Доверенность);
|
ДанныеДоверенности = ДанныеДоверителей(Доверенность);
|
||||||
ДанныеДоверенности.Колонки.Добавить("СертификатПодходит", ОбщегоНазначения.ОписаниеТипаЧисло(2));
|
ДанныеДоверенности.Колонки.Добавить("СертификатПодходит", ОбщегоНазначения.ОписаниеТипаЧисло(2));
|
||||||
@@ -746,7 +873,7 @@
|
|||||||
Совпадает = Истина;
|
Совпадает = Истина;
|
||||||
Для Каждого Строка Из ДанныеДоверенности Цикл
|
Для Каждого Строка Из ДанныеДоверенности Цикл
|
||||||
|
|
||||||
Если Строка.Подписана Тогда
|
Если ПроверятьНаличиеИДублиПодписи И Строка.Подписана Тогда
|
||||||
Возврат НСтр("ru='Доверенность уже подписана, удалите подпись, чтобы добавить снова.'");
|
Возврат НСтр("ru='Доверенность уже подписана, удалите подпись, чтобы добавить снова.'");
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
@@ -800,20 +927,22 @@
|
|||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
ДанныеДоверенности.Колонки.Добавить("СертификатПодписиПодходит", ОбщегоНазначения.ОписаниеТипаЧисло(2));
|
ДанныеДоверенности.Колонки.Добавить("СертификатПодписиПодходит", ОбщегоНазначения.ОписаниеТипаЧисло(2));
|
||||||
УстановленныеПодписи = ЭлектроннаяПодпись.УстановленныеПодписи(ФайлДоверенности);
|
Если ПроверятьНаличиеИДублиПодписи Тогда
|
||||||
|
УстановленныеПодписи = ЭлектроннаяПодпись.УстановленныеПодписи(ФайлДоверенности);
|
||||||
Для Каждого Подпись Из УстановленныеПодписи Цикл
|
|
||||||
Сертификат = Новый СертификатКриптографии(Подпись.Сертификат.Получить());
|
Для Каждого Подпись Из УстановленныеПодписи Цикл
|
||||||
ОтборПоСертификату = МашиночитаемыеДоверенностиФНС.ОтборДляДоверенностейПоСертификату(Сертификат, "");
|
Сертификат = Новый СертификатКриптографии(Подпись.Сертификат.Получить());
|
||||||
ОтборПоСертификату.Вставить("СертификатПодписиПодходит", 0);
|
ОтборПоСертификату = МашиночитаемыеДоверенностиФНС.ОтборДляДоверенностейПоСертификату(Сертификат, "");
|
||||||
Найдено = ДанныеДоверенности.НайтиСтроки(ОтборПоСертификату);
|
ОтборПоСертификату.Вставить("СертификатПодписиПодходит", 0);
|
||||||
Если Найдено.Количество() > 0 Тогда
|
Найдено = ДанныеДоверенности.НайтиСтроки(ОтборПоСертификату);
|
||||||
Если Найдено[0].СертификатПодходит Тогда
|
Если Найдено.Количество() > 0 Тогда
|
||||||
Возврат НСтр("ru='Доверенность уже подписана аналогичным сертификатом, удалите подпись, чтобы добавить снова.'");
|
Если Найдено[0].СертификатПодходит Тогда
|
||||||
|
Возврат НСтр("ru='Доверенность уже подписана аналогичным сертификатом, удалите подпись, чтобы добавить снова.'");
|
||||||
|
КонецЕсли;
|
||||||
|
Найдено[0].СертификатПодписиПодходит = 1;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
Найдено[0].СертификатПодписиПодходит = 1;
|
КонецЦикла;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
КонецЦикла;
|
|
||||||
|
|
||||||
ДанныеДоверенности.Свернуть("Подписана", "СертификатПодписиПодходит");
|
ДанныеДоверенности.Свернуть("Подписана", "СертификатПодписиПодходит");
|
||||||
|
|
||||||
@@ -1023,6 +1152,7 @@
|
|||||||
|
|
||||||
Функция ПроверитьСертификатПредставителя(Доверенность, Сертификат, Знач НаДату = Неопределено) Экспорт
|
Функция ПроверитьСертификатПредставителя(Доверенность, Сертификат, Знач НаДату = Неопределено) Экспорт
|
||||||
|
|
||||||
|
УстановитьПривилегированныйРежим(Истина);
|
||||||
ОтборПоСертификату = МашиночитаемыеДоверенностиФНС.ОтборДляДоверенностейПоСертификату(Сертификат, "");
|
ОтборПоСертификату = МашиночитаемыеДоверенностиФНС.ОтборДляДоверенностейПоСертификату(Сертификат, "");
|
||||||
|
|
||||||
Запрос = Новый Запрос;
|
Запрос = Новый Запрос;
|
||||||
@@ -1058,6 +1188,7 @@
|
|||||||
|
|
||||||
Запрос.Текст = Запрос.Текст + Символы.ПС + "И " + СтрСоединить(МассивУсловий, Символы.ПС + "И ");
|
Запрос.Текст = Запрос.Текст + Символы.ПС + "И " + СтрСоединить(МассивУсловий, Символы.ПС + "И ");
|
||||||
Результат = Запрос.Выполнить();
|
Результат = Запрос.Выполнить();
|
||||||
|
УстановитьПривилегированныйРежим(Ложь);
|
||||||
|
|
||||||
ТекстОшибки = "";
|
ТекстОшибки = "";
|
||||||
Если Результат.Пустой() Тогда
|
Если Результат.Пустой() Тогда
|
||||||
@@ -1247,9 +1378,35 @@
|
|||||||
|
|
||||||
КонецФункции
|
КонецФункции
|
||||||
|
|
||||||
Функция ЗаголовокДекорации(Реквизиты, ИмяЭлементаОрганизация = Неопределено, ТолькоОбязательные = Ложь) Экспорт
|
Функция РеквизитыУчастникаПоСсылке(СторонаМЧД) Экспорт
|
||||||
|
|
||||||
|
ТипСсылки = ТипЗнч(СторонаМЧД);
|
||||||
|
ТипУчастникаСтрока = Неопределено;
|
||||||
|
Если ОписаниеТиповОрганизации().СодержитТип(ТипСсылки) Тогда
|
||||||
|
ТипУчастникаСтрока = "Организация";
|
||||||
|
ИначеЕсли ОписаниеТиповКонтрагента().СодержитТип(ТипСсылки) Тогда
|
||||||
|
ТипУчастникаСтрока = "Контрагент";
|
||||||
|
ИначеЕсли ОписаниеТиповФизическогоЛица().СодержитТип(ТипСсылки) Тогда
|
||||||
|
ТипУчастникаСтрока = "ФизическоеЛицо";
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
Если ТипУчастникаСтрока = Неопределено Тогда
|
||||||
|
ВызватьИсключение СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
|
||||||
|
НСтр("ru = 'Не определен тип участника: %1 (%2)'"), СторонаМЧД, ТипСсылки);
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
Реквизиты = МашиночитаемыеДоверенностиФНССлужебныйКлиентСервер.РеквизитыУчастника(
|
||||||
|
ТипУчастникаСтрока, СторонаМЧД, Неопределено);
|
||||||
|
Реквизиты.Вставить("ТипСсылки", ТипСсылки);
|
||||||
|
|
||||||
|
ПриЗаполненииРеквизитовОрганизации(Реквизиты);
|
||||||
|
Возврат Реквизиты;
|
||||||
|
|
||||||
|
КонецФункции
|
||||||
|
|
||||||
Результат = СтруктураЗаголовкаДекорации(Реквизиты, ИмяЭлементаОрганизация, ТолькоОбязательные, Ложь);
|
Функция ЗаголовокДекорации(Реквизиты, ИмяЭлементаОрганизация = Неопределено, ТолькоОбязательные = Ложь, ПоказыватьПерсональныеДанные = Истина) Экспорт
|
||||||
|
|
||||||
|
Результат = СтруктураЗаголовкаДекорации(Реквизиты, ПоказыватьПерсональныеДанные, ИмяЭлементаОрганизация, ТолькоОбязательные, Ложь);
|
||||||
|
|
||||||
Если Результат.ЗаголовокДекорацииОшибки.Количество() > 0 Тогда
|
Если Результат.ЗаголовокДекорацииОшибки.Количество() > 0 Тогда
|
||||||
Результат.ЗаголовокДекорации.Добавить(СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(НСтр("ru = 'Не заполнены: %1'"),
|
Результат.ЗаголовокДекорации.Добавить(СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(НСтр("ru = 'Не заполнены: %1'"),
|
||||||
@@ -1262,9 +1419,9 @@
|
|||||||
|
|
||||||
КонецФункции
|
КонецФункции
|
||||||
|
|
||||||
Функция ЗаголовокДекорацииДляТаблицы(Реквизиты, ИмяЭлементаОрганизация = Неопределено, ТолькоОбязательные = Ложь) Экспорт
|
Функция ЗаголовокДекорацииДляТаблицы(Реквизиты, ИмяЭлементаОрганизация = Неопределено, ТолькоОбязательные = Ложь, ПоказыватьПерсональныеДанные = Истина) Экспорт
|
||||||
|
|
||||||
Результат = СтруктураЗаголовкаДекорации(Реквизиты, ИмяЭлементаОрганизация, ТолькоОбязательные, Истина);
|
Результат = СтруктураЗаголовкаДекорации(Реквизиты, ПоказыватьПерсональныеДанные, ИмяЭлементаОрганизация, ТолькоОбязательные, Истина);
|
||||||
|
|
||||||
ЗаголовокДекорацииСтрока = СтрСоединить(Результат.ЗаголовокДекорации, Символы.ПС);
|
ЗаголовокДекорацииСтрока = СтрСоединить(Результат.ЗаголовокДекорации, Символы.ПС);
|
||||||
|
|
||||||
@@ -1276,7 +1433,7 @@
|
|||||||
|
|
||||||
КонецФункции
|
КонецФункции
|
||||||
|
|
||||||
Функция СтруктураЗаголовкаДекорации(Реквизиты, ИмяЭлементаОрганизация = Неопределено, ТолькоОбязательные = Ложь, ДляТаблицы = Ложь)
|
Функция СтруктураЗаголовкаДекорации(Реквизиты, ПоказыватьПерсональныеДанные, ИмяЭлементаОрганизация = Неопределено, ТолькоОбязательные = Ложь, ДляТаблицы = Ложь)
|
||||||
|
|
||||||
ВидУчастника = МашиночитаемыеДоверенностиФНССлужебныйКлиентСервер.ОпределитьВидУчастника(Реквизиты);
|
ВидУчастника = МашиночитаемыеДоверенностиФНССлужебныйКлиентСервер.ОпределитьВидУчастника(Реквизиты);
|
||||||
|
|
||||||
@@ -1298,6 +1455,10 @@
|
|||||||
ЗаголовокДекорацииОшибки = Новый Массив;
|
ЗаголовокДекорацииОшибки = Новый Массив;
|
||||||
НаименованиеДокумента = "";
|
НаименованиеДокумента = "";
|
||||||
|
|
||||||
|
Если Не ПоказыватьПерсональныеДанные Тогда
|
||||||
|
ПерсональныеДанные = МашиночитаемыеДоверенностиФНССлужебныйКлиентСервер.ПерсональныеДанные();
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
Для Каждого Реквизит Из Реквизиты Цикл
|
Для Каждого Реквизит Из Реквизиты Цикл
|
||||||
|
|
||||||
Если Реквизит.Ключ = "ЭтоИндивидуальныйПредприниматель"
|
Если Реквизит.Ключ = "ЭтоИндивидуальныйПредприниматель"
|
||||||
@@ -1317,6 +1478,10 @@
|
|||||||
Продолжить;
|
Продолжить;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
|
Если Реквизиты.ЭтоФизическоеЛицо И Не ПоказыватьПерсональныеДанные И ПерсональныеДанные.Найти(Реквизит.Ключ) <> Неопределено Тогда
|
||||||
|
Продолжить;
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
Найдено = СписокРеквизитов.НайтиПоЗначению(Реквизит.Ключ);
|
Найдено = СписокРеквизитов.НайтиПоЗначению(Реквизит.Ключ);
|
||||||
|
|
||||||
Если Найдено <> Неопределено Тогда
|
Если Найдено <> Неопределено Тогда
|
||||||
@@ -1351,7 +1516,7 @@
|
|||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
Если Реквизит.Ключ = "НаименованиеПолное"
|
Если Реквизит.Ключ = "НаименованиеПолное"
|
||||||
Или Реквизит.Ключ = "ДолжностьЛицаБезДоверенности"
|
Или Реквизит.Ключ = "ДолжностьЛицаДоверителя"
|
||||||
Или Реквизит.Ключ = "Фамилия"
|
Или Реквизит.Ключ = "Фамилия"
|
||||||
Или Реквизит.Ключ = "Имя"
|
Или Реквизит.Ключ = "Имя"
|
||||||
Или Реквизит.Ключ = "Отчество" Тогда
|
Или Реквизит.Ключ = "Отчество" Тогда
|
||||||
@@ -1906,11 +2071,11 @@
|
|||||||
|
|
||||||
ЭлементОтбора = ЭлементУсловногоОформления.Отбор.Элементы.Добавить(
|
ЭлементОтбора = ЭлементУсловногоОформления.Отбор.Элементы.Добавить(
|
||||||
Тип("ЭлементОтбораКомпоновкиДанных"));
|
Тип("ЭлементОтбораКомпоновкиДанных"));
|
||||||
ЭлементОтбора.ЛевоеЗначение = Новый ПолеКомпоновкиДанных("ТаблицаПредставительНесколько.ПредставительФЛ");
|
ЭлементОтбора.ЛевоеЗначение = Новый ПолеКомпоновкиДанных("ТаблицаПредставительНесколько.ЛицоПредставителя");
|
||||||
ЭлементОтбора.ВидСравнения = ВидСравненияКомпоновкиДанных.НеЗаполнено;
|
ЭлементОтбора.ВидСравнения = ВидСравненияКомпоновкиДанных.НеЗаполнено;
|
||||||
|
|
||||||
ОформляемоеПоле = ЭлементУсловногоОформления.Поля.Элементы.Добавить();
|
ОформляемоеПоле = ЭлементУсловногоОформления.Поля.Элементы.Добавить();
|
||||||
ОформляемоеПоле.Поле = Новый ПолеКомпоновкиДанных("ТаблицаПредставительНесколькоПредставительФЛ");
|
ОформляемоеПоле.Поле = Новый ПолеКомпоновкиДанных("ТаблицаПредставительНесколькоЛицоПредставителя");
|
||||||
|
|
||||||
ЭлементУсловногоОформления = Форма.УсловноеОформление.Элементы.Добавить();
|
ЭлементУсловногоОформления = Форма.УсловноеОформление.Элементы.Добавить();
|
||||||
ЭлементУсловногоОформления.Оформление.УстановитьЗначениеПараметра("Видимость", Ложь);
|
ЭлементУсловногоОформления.Оформление.УстановитьЗначениеПараметра("Видимость", Ложь);
|
||||||
@@ -2066,7 +2231,7 @@
|
|||||||
|
|
||||||
КонецФункции
|
КонецФункции
|
||||||
|
|
||||||
Функция ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, СтруктураОтвета, ДополнительныеФайлы, ЗаголовокОшибки = "", ТекстОшибки = "")
|
Функция ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, СтруктураОтвета, ДополнительныеФайлы, ЗаголовокОшибки = "", ТекстОшибки = "") Экспорт
|
||||||
Результат = Новый Структура;
|
Результат = Новый Структура;
|
||||||
Результат.Вставить("ЗаголовокОшибки", ЗаголовокОшибки);
|
Результат.Вставить("ЗаголовокОшибки", ЗаголовокОшибки);
|
||||||
Результат.Вставить("ЗапросHTTP", ЗапросHTTP);
|
Результат.Вставить("ЗапросHTTP", ЗапросHTTP);
|
||||||
@@ -2078,7 +2243,7 @@
|
|||||||
Возврат Результат;
|
Возврат Результат;
|
||||||
КонецФункции
|
КонецФункции
|
||||||
|
|
||||||
Функция ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибки)
|
Функция ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибки) Экспорт
|
||||||
ЗаголовокОшибки = ПараметрыОшибки.ЗаголовокОшибки;
|
ЗаголовокОшибки = ПараметрыОшибки.ЗаголовокОшибки;
|
||||||
ЗапросHTTP = ПараметрыОшибки.ЗапросHTTP;
|
ЗапросHTTP = ПараметрыОшибки.ЗапросHTTP;
|
||||||
ПараметрыТекстаОшибки = ПараметрыОшибки.ПараметрыТекстаОшибки;
|
ПараметрыТекстаОшибки = ПараметрыОшибки.ПараметрыТекстаОшибки;
|
||||||
@@ -2517,8 +2682,8 @@
|
|||||||
СтатусыБезПодробностей = Новый Массив;
|
СтатусыБезПодробностей = Новый Массив;
|
||||||
СтатусыБезПодробностей.Добавить(Перечисления.ТехническиеСтатусыМЧД.Создание);
|
СтатусыБезПодробностей.Добавить(Перечисления.ТехническиеСтатусыМЧД.Создание);
|
||||||
СтатусыБезПодробностей.Добавить(Перечисления.ТехническиеСтатусыМЧД.Подписание);
|
СтатусыБезПодробностей.Добавить(Перечисления.ТехническиеСтатусыМЧД.Подписание);
|
||||||
СтатусыБезПодробностей.Добавить(Перечисления.ТехническиеСтатусыМЧД.Подписан);
|
СтатусыБезПодробностей.Добавить(Перечисления.ТехническиеСтатусыМЧД.Подписана);
|
||||||
СтатусыБезПодробностей.Добавить(Перечисления.ТехническиеСтатусыМЧД.Просрочено);
|
СтатусыБезПодробностей.Добавить(Перечисления.ТехническиеСтатусыМЧД.Просрочена);
|
||||||
СтатусыБезПодробностей.Добавить(Перечисления.ТехническиеСтатусыМЧД.Отменена);
|
СтатусыБезПодробностей.Добавить(Перечисления.ТехническиеСтатусыМЧД.Отменена);
|
||||||
|
|
||||||
Запрос.УстановитьПараметр("СтатусыБезПодробностей", СтатусыБезПодробностей);
|
Запрос.УстановитьПараметр("СтатусыБезПодробностей", СтатусыБезПодробностей);
|
||||||
@@ -2576,6 +2741,10 @@
|
|||||||
ИначеЕсли ЗначениеЗаполнено(Выборка.ДатаТранзакции) И Выборка.СтатусТранзакции = Перечисления.СтатусыТранзакцииСРеестромМЧД.Ошибка Тогда
|
ИначеЕсли ЗначениеЗаполнено(Выборка.ДатаТранзакции) И Выборка.СтатусТранзакции = Перечисления.СтатусыТранзакцииСРеестромМЧД.Ошибка Тогда
|
||||||
ОписаниеСобытия = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
|
ОписаниеСобытия = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
|
||||||
НСтр("ru='<span style=""color: %1"">: <a href = ""%2"">Не удалось получить статус</a>'"), "ПоясняющийТекст", "ПоказатьОшибку");
|
НСтр("ru='<span style=""color: %1"">: <a href = ""%2"">Не удалось получить статус</a>'"), "ПоясняющийТекст", "ПоказатьОшибку");
|
||||||
|
ИначеЕсли Выборка.ТехническийСтатус = Перечисления.ТехническиеСтатусыМЧД.Регистрация
|
||||||
|
И Выборка.СтатусТранзакции = Перечисления.СтатусыТранзакцииСРеестромМЧД.ПустаяСсылка() Тогда
|
||||||
|
ОписаниеСобытия = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
|
||||||
|
НСтр("ru='<span style=""color: %1"">: <a href = ""%2"">Ошибка регистрации</a>'"), "ПоясняющийТекст", "ПоказатьОшибку");
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
ОписаниеСостояния = Новый ФорматированнаяСтрока(ОписаниеСостояния,
|
ОписаниеСостояния = Новый ФорматированнаяСтрока(ОписаниеСостояния,
|
||||||
@@ -2642,7 +2811,7 @@
|
|||||||
Если Не ЭтоВнешнийСтатус Тогда
|
Если Не ЭтоВнешнийСтатус Тогда
|
||||||
Если Запись.Подписана Тогда
|
Если Запись.Подписана Тогда
|
||||||
Если РегистрироватьВРеестре Тогда
|
Если РегистрироватьВРеестре Тогда
|
||||||
ТехническийСтатус = Перечисления.ТехническиеСтатусыМЧД.Подписан;
|
ТехническийСтатус = Перечисления.ТехническиеСтатусыМЧД.Подписана;
|
||||||
Иначе
|
Иначе
|
||||||
ТехническийСтатус = Перечисления.ТехническиеСтатусыМЧД.Активна;
|
ТехническийСтатус = Перечисления.ТехническиеСтатусыМЧД.Активна;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
@@ -2674,13 +2843,13 @@
|
|||||||
СтатусДоверенности = СокрЛП(ВРег(СтатусСтрокой));
|
СтатусДоверенности = СокрЛП(ВРег(СтатусСтрокой));
|
||||||
|
|
||||||
Если СтатусДоверенности = "ACTIVE" Тогда
|
Если СтатусДоверенности = "ACTIVE" Тогда
|
||||||
ТехническийСтатус = Перечисления.ТехническиеСтатусыМЧД.Зарегистрировано;
|
ТехническийСтатус = Перечисления.ТехническиеСтатусыМЧД.Зарегистрирована;
|
||||||
ИначеЕсли СтатусДоверенности = "REJECTED" Тогда
|
ИначеЕсли СтатусДоверенности = "REJECTED" Тогда
|
||||||
ТехническийСтатус = Перечисления.ТехническиеСтатусыМЧД.ОшибкаРегистрации;
|
ТехническийСтатус = Перечисления.ТехническиеСтатусыМЧД.ОшибкаРегистрации;
|
||||||
ИначеЕсли СтатусДоверенности = "PROCESSING" Тогда
|
ИначеЕсли СтатусДоверенности = "PROCESSING" Тогда
|
||||||
ТехническийСтатус = Перечисления.ТехническиеСтатусыМЧД.Регистрация;
|
ТехническийСтатус = Перечисления.ТехническиеСтатусыМЧД.Регистрация;
|
||||||
ИначеЕсли СтатусДоверенности = "EXPIRED" Тогда
|
ИначеЕсли СтатусДоверенности = "EXPIRED" Тогда
|
||||||
ТехническийСтатус = Перечисления.ТехническиеСтатусыМЧД.Просрочено;
|
ТехническийСтатус = Перечисления.ТехническиеСтатусыМЧД.Просрочена;
|
||||||
ИначеЕсли СтатусДоверенности = "REVOKED" Тогда
|
ИначеЕсли СтатусДоверенности = "REVOKED" Тогда
|
||||||
ТехническийСтатус = Перечисления.ТехническиеСтатусыМЧД.Отменена;
|
ТехническийСтатус = Перечисления.ТехническиеСтатусыМЧД.Отменена;
|
||||||
ИначеЕсли СтатусДоверенности = "CREATED" Тогда
|
ИначеЕсли СтатусДоверенности = "CREATED" Тогда
|
||||||
@@ -2695,8 +2864,9 @@
|
|||||||
|
|
||||||
#Область ИнтерфейсРаботаСРаспределеннымРеестром
|
#Область ИнтерфейсРаботаСРаспределеннымРеестром
|
||||||
|
|
||||||
Функция АвторизоватьсяНаСервереМЧДРР() Экспорт
|
Функция АвторизоватьсяНаСервереМЧДРР(ЦельАвторизации = "") Экспорт
|
||||||
|
|
||||||
|
УстановитьПривилегированныйРежим(Истина);
|
||||||
ПараметрыРезультатаАвторизации = ПараметрыСеанса.ПараметрыАвторизацииВРаспределенномРеестре;
|
ПараметрыРезультатаАвторизации = ПараметрыСеанса.ПараметрыАвторизацииВРаспределенномРеестре;
|
||||||
Если ПараметрыРезультатаАвторизации <> Неопределено И ПараметрыРезультатаАвторизации.ДатаСеанса <> Неопределено
|
Если ПараметрыРезультатаАвторизации <> Неопределено И ПараметрыРезультатаАвторизации.ДатаСеанса <> Неопределено
|
||||||
И ПараметрыРезультатаАвторизации.РезультатАвторизации <> Неопределено Тогда
|
И ПараметрыРезультатаАвторизации.РезультатАвторизации <> Неопределено Тогда
|
||||||
@@ -2724,7 +2894,8 @@
|
|||||||
ТикетАутентификацииИлиДанныеПользователя = ТикетАутентификацииИлиДанныеПользователяНаПорталеПоддержки();
|
ТикетАутентификацииИлиДанныеПользователя = ТикетАутентификацииИлиДанныеПользователяНаПорталеПоддержки();
|
||||||
|
|
||||||
Если ТикетАутентификацииИлиДанныеПользователя = Неопределено Тогда
|
Если ТикетАутентификацииИлиДанныеПользователя = Неопределено Тогда
|
||||||
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(, , , , НСтр("ru='Не удается авторизоваться на сайте интернет поддержки'"), НСтр("ru='Не удается авторизоваться на сайте интернет поддержки'"));
|
ЗаголовокОшибки = ?(ЦельАвторизации = "", НСтр("ru='Не удается авторизоваться на сайте интернет поддержки'"), ЦельАвторизации);
|
||||||
|
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(, , , , ЗаголовокОшибки, НСтр("ru='Не удается получить тикет аутентификации или данные пользователя.'"));
|
||||||
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
||||||
Возврат Результат;
|
Возврат Результат;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
@@ -2777,7 +2948,9 @@
|
|||||||
ПараметрыФайловДляРасследования.Запрос = ЗапросHTTP;
|
ПараметрыФайловДляРасследования.Запрос = ЗапросHTTP;
|
||||||
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
||||||
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
||||||
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, , ДополнительныеФайлы, НСтр("ru='Не удается соединиться с сервером реестра'"), ПредставлениеОшибки);
|
ЗаголовокОшибки = ?(ЦельАвторизации = "", НСтр("ru='Не удается авторизоваться на сервере Распределенного реестра ФНС России'"), ЦельАвторизации);
|
||||||
|
|
||||||
|
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, , ДополнительныеФайлы, ЗаголовокОшибки, ПредставлениеОшибки);
|
||||||
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
||||||
Возврат Результат;
|
Возврат Результат;
|
||||||
КонецПопытки;
|
КонецПопытки;
|
||||||
@@ -2799,7 +2972,8 @@
|
|||||||
ПараметрыФайловДляРасследования.Запрос = ЗапросHTTP;
|
ПараметрыФайловДляРасследования.Запрос = ЗапросHTTP;
|
||||||
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
||||||
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
||||||
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, СтруктураОтвета, ДополнительныеФайлы, НСтр("ru='Не удается соединиться с сервером реестра'"), ПредставлениеОшибки);
|
ЗаголовокОшибки = ?(ЦельАвторизации = "", НСтр("ru='Отказ при получении токена доступа на сервере Распределенного реестра ФНС России'"), ЦельАвторизации);
|
||||||
|
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, СтруктураОтвета, ДополнительныеФайлы, ЗаголовокОшибки, ПредставлениеОшибки);
|
||||||
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
||||||
Возврат Результат;
|
Возврат Результат;
|
||||||
КонецПопытки;
|
КонецПопытки;
|
||||||
@@ -2810,8 +2984,9 @@
|
|||||||
ПараметрыФайловДляРасследования.Запрос = ЗапросHTTP;
|
ПараметрыФайловДляРасследования.Запрос = ЗапросHTTP;
|
||||||
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
||||||
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
||||||
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, СтруктураОтвета, ДополнительныеФайлы, НСтр("ru='Не удается авторизоваться'"),
|
ЗаголовокОшибки = ?(ЦельАвторизации = "", НСтр("ru='Распределенный реестр ФНС России не предоставил токен для авторизации'"), ЦельАвторизации);
|
||||||
НСтр("ru='Распределенный реестр ФНС России не предоставил данные для авторизации.'"));
|
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, СтруктураОтвета, ДополнительныеФайлы, ЗаголовокОшибки,
|
||||||
|
НСтр("ru='Распределенный реестр ФНС России не предоставил токен для авторизации.'"));
|
||||||
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
||||||
Возврат Результат;
|
Возврат Результат;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
@@ -2835,8 +3010,10 @@
|
|||||||
Результат.Вставить("ТекстОтвета", "");
|
Результат.Вставить("ТекстОтвета", "");
|
||||||
Результат.Вставить("Ошибка");
|
Результат.Вставить("Ошибка");
|
||||||
|
|
||||||
|
ЗаголовокОшибки = НСтр("ru='Не удалось получить номер доверенности'");
|
||||||
|
|
||||||
Если НЕ ЗначениеЗаполнено(ТокенДоступа) Тогда
|
Если НЕ ЗначениеЗаполнено(ТокенДоступа) Тогда
|
||||||
РезультатАвторизации = АвторизоватьсяНаСервереМЧДРР();
|
РезультатАвторизации = АвторизоватьсяНаСервереМЧДРР(ЗаголовокОшибки);
|
||||||
Если РезультатАвторизации.Ошибка <> Неопределено Тогда
|
Если РезультатАвторизации.Ошибка <> Неопределено Тогда
|
||||||
Результат.Ошибка = РезультатАвторизации.Ошибка;
|
Результат.Ошибка = РезультатАвторизации.Ошибка;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
@@ -2873,13 +3050,12 @@
|
|||||||
ОтветHTTP = СоединениеHTTP.Получить(ЗапросHTTP);
|
ОтветHTTP = СоединениеHTTP.Получить(ЗапросHTTP);
|
||||||
Исключение
|
Исключение
|
||||||
ПредставлениеОшибки = ОбработкаОшибок.ПодробноеПредставлениеОшибки(ИнформацияОбОшибке());
|
ПредставлениеОшибки = ОбработкаОшибок.ПодробноеПредставлениеОшибки(ИнформацияОбОшибке());
|
||||||
Результат.ПовторятьСоединение = НЕ ОбщегоНазначения.РазделениеВключено();
|
|
||||||
ПараметрыФайловДляРасследования = ПараметрыФайловДляРасследования();
|
ПараметрыФайловДляРасследования = ПараметрыФайловДляРасследования();
|
||||||
ПараметрыФайловДляРасследования.СоединениеHTTP = СоединениеHTTP;
|
ПараметрыФайловДляРасследования.СоединениеHTTP = СоединениеHTTP;
|
||||||
ПараметрыФайловДляРасследования.Запрос = ЗапросHTTP;
|
ПараметрыФайловДляРасследования.Запрос = ЗапросHTTP;
|
||||||
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
||||||
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
||||||
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, , ДополнительныеФайлы, НСтр("ru='Не удается получить номер доверенности'"),
|
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, , ДополнительныеФайлы, ЗаголовокОшибки,
|
||||||
ПредставлениеОшибки);
|
ПредставлениеОшибки);
|
||||||
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
||||||
|
|
||||||
@@ -2911,7 +3087,7 @@
|
|||||||
ПараметрыФайловДляРасследования.Запрос = ЗапросHTTP;
|
ПараметрыФайловДляРасследования.Запрос = ЗапросHTTP;
|
||||||
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
||||||
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
||||||
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, СтруктураОтвета, ДополнительныеФайлы, НСтр("ru='Не удается получить номер доверенности'"),
|
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, СтруктураОтвета, ДополнительныеФайлы, ЗаголовокОшибки,
|
||||||
НСтр("ru='Распределенный реестр ФНС России не выдал номер доверенности.'"));
|
НСтр("ru='Распределенный реестр ФНС России не выдал номер доверенности.'"));
|
||||||
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
||||||
Возврат Результат;
|
Возврат Результат;
|
||||||
@@ -2946,17 +3122,12 @@
|
|||||||
Результат.Вставить("ТекстОтвета", "");
|
Результат.Вставить("ТекстОтвета", "");
|
||||||
Результат.Вставить("Ошибка");
|
Результат.Вставить("Ошибка");
|
||||||
|
|
||||||
|
ЗаголовокОшибки = НСтр("ru='Не удалось зарегистрировать доверенность'");
|
||||||
|
|
||||||
Если НЕ ЗначениеЗаполнено(ТокенДоступа) Тогда
|
Если НЕ ЗначениеЗаполнено(ТокенДоступа) Тогда
|
||||||
РезультатАвторизации = АвторизоватьсяНаСервереМЧДРР();
|
РезультатАвторизации = АвторизоватьсяНаСервереМЧДРР(ЗаголовокОшибки);
|
||||||
Если РезультатАвторизации.Ошибка <> Неопределено Тогда
|
Если РезультатАвторизации.Ошибка <> Неопределено Тогда
|
||||||
Результат.Ошибка = РезультатАвторизации.Ошибка;
|
Результат.Ошибка = РезультатАвторизации.Ошибка;
|
||||||
КонецЕсли;
|
|
||||||
|
|
||||||
Если РезультатАвторизации.ПовторятьСоединение Тогда
|
|
||||||
Результат.ПовторятьСоединение = Истина;
|
|
||||||
КонецЕсли;
|
|
||||||
|
|
||||||
Если Результат.Ошибка <> Неопределено Или Результат.ПовторятьСоединение Тогда
|
|
||||||
Возврат Результат;
|
Возврат Результат;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
@@ -3035,7 +3206,7 @@
|
|||||||
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
||||||
ПараметрыФайловДляРасследования.СоединениеHTTP = СоединениеHTTP;
|
ПараметрыФайловДляРасследования.СоединениеHTTP = СоединениеHTTP;
|
||||||
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
||||||
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, , ДополнительныеФайлы, НСтр("ru='Не удается зарегистрировать доверенность'"), ПредставлениеОшибки);
|
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, , ДополнительныеФайлы, ЗаголовокОшибки, ПредставлениеОшибки);
|
||||||
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
||||||
Возврат Результат;
|
Возврат Результат;
|
||||||
КонецПопытки;
|
КонецПопытки;
|
||||||
@@ -3057,7 +3228,7 @@
|
|||||||
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
||||||
ПараметрыФайловДляРасследования.СоединениеHTTP = СоединениеHTTP;
|
ПараметрыФайловДляРасследования.СоединениеHTTP = СоединениеHTTP;
|
||||||
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
||||||
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, СтруктураОтвета, ДополнительныеФайлы, НСтр("ru='Не удается зарегистрировать доверенность'"), ПредставлениеОшибки);
|
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, СтруктураОтвета, ДополнительныеФайлы, ЗаголовокОшибки, ПредставлениеОшибки);
|
||||||
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
||||||
|
|
||||||
Возврат Результат;
|
Возврат Результат;
|
||||||
@@ -3069,7 +3240,7 @@
|
|||||||
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
||||||
ПараметрыФайловДляРасследования.СоединениеHTTP = СоединениеHTTP;
|
ПараметрыФайловДляРасследования.СоединениеHTTP = СоединениеHTTP;
|
||||||
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
||||||
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, СтруктураОтвета, ДополнительныеФайлы, НСтр("ru='Не удается зарегистрировать доверенность'"),
|
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, СтруктураОтвета, ДополнительныеФайлы, ЗаголовокОшибки,
|
||||||
НСтр("ru='Распределенный реестр ФНС России не предоставил идентификационные данные.'"));
|
НСтр("ru='Распределенный реестр ФНС России не предоставил идентификационные данные.'"));
|
||||||
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
||||||
|
|
||||||
@@ -3080,7 +3251,7 @@
|
|||||||
|
|
||||||
КонецФункции
|
КонецФункции
|
||||||
|
|
||||||
Функция ПолучитьСтатусТранзакцииМЧДРР(ИдентификаторТранзакции, ТокенДоступа = "", НомерДоверенности = "") Экспорт
|
Функция ПолучитьСтатусТранзакцииМЧДРР(ИдентификаторТранзакции, ТокенДоступа = "", НомерДоверенности = "", ЦельПолучения = "") Экспорт
|
||||||
|
|
||||||
СвойстваСервераМЧДРР = СвойстваСервераМЧДРР();
|
СвойстваСервераМЧДРР = СвойстваСервераМЧДРР();
|
||||||
|
|
||||||
@@ -3092,8 +3263,10 @@
|
|||||||
Результат.Вставить("ТекстОтвета", "");
|
Результат.Вставить("ТекстОтвета", "");
|
||||||
Результат.Вставить("Ошибка");
|
Результат.Вставить("Ошибка");
|
||||||
|
|
||||||
|
ЗаголовокОшибки = ?(ЦельПолучения = "", НСтр("ru='Не удалось обновить статус транзакции'"), ЦельПолучения);
|
||||||
|
|
||||||
Если НЕ ЗначениеЗаполнено(ТокенДоступа) Тогда
|
Если НЕ ЗначениеЗаполнено(ТокенДоступа) Тогда
|
||||||
РезультатАвторизации = АвторизоватьсяНаСервереМЧДРР();
|
РезультатАвторизации = АвторизоватьсяНаСервереМЧДРР(ЗаголовокОшибки);
|
||||||
Если РезультатАвторизации.Ошибка <> Неопределено Тогда
|
Если РезультатАвторизации.Ошибка <> Неопределено Тогда
|
||||||
Результат.Ошибка = РезультатАвторизации.Ошибка;
|
Результат.Ошибка = РезультатАвторизации.Ошибка;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
@@ -3129,13 +3302,12 @@
|
|||||||
ОтветHTTP = СоединениеHTTP.Получить(ЗапросHTTP);
|
ОтветHTTP = СоединениеHTTP.Получить(ЗапросHTTP);
|
||||||
Исключение
|
Исключение
|
||||||
ПредставлениеОшибки = ОбработкаОшибок.ПодробноеПредставлениеОшибки(ИнформацияОбОшибке());
|
ПредставлениеОшибки = ОбработкаОшибок.ПодробноеПредставлениеОшибки(ИнформацияОбОшибке());
|
||||||
Результат.ПовторятьСоединение = НЕ ОбщегоНазначения.РазделениеВключено();
|
|
||||||
ПараметрыФайловДляРасследования = ПараметрыФайловДляРасследования();
|
ПараметрыФайловДляРасследования = ПараметрыФайловДляРасследования();
|
||||||
ПараметрыФайловДляРасследования.СоединениеHTTP = СоединениеHTTP;
|
ПараметрыФайловДляРасследования.СоединениеHTTP = СоединениеHTTP;
|
||||||
ПараметрыФайловДляРасследования.Запрос = ЗапросHTTP;
|
ПараметрыФайловДляРасследования.Запрос = ЗапросHTTP;
|
||||||
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
||||||
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
||||||
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, , ДополнительныеФайлы, НСтр("ru='Не удалось обновить статус заявления'"), ПредставлениеОшибки);
|
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, , ДополнительныеФайлы, ЗаголовокОшибки, ПредставлениеОшибки);
|
||||||
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
||||||
Возврат Результат;
|
Возврат Результат;
|
||||||
КонецПопытки;
|
КонецПопытки;
|
||||||
@@ -3158,7 +3330,7 @@
|
|||||||
ПараметрыФайловДляРасследования.Запрос = ЗапросHTTP;
|
ПараметрыФайловДляРасследования.Запрос = ЗапросHTTP;
|
||||||
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
||||||
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
||||||
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, СтруктураОтвета, ДополнительныеФайлы, НСтр("ru='Не удалось обновить статус заявления'"), ПредставлениеОшибки);
|
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, СтруктураОтвета, ДополнительныеФайлы, ЗаголовокОшибки, ПредставлениеОшибки);
|
||||||
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
||||||
Возврат Результат;
|
Возврат Результат;
|
||||||
КонецПопытки;
|
КонецПопытки;
|
||||||
@@ -3170,8 +3342,8 @@
|
|||||||
ПараметрыФайловДляРасследования.Запрос = ЗапросHTTP;
|
ПараметрыФайловДляРасследования.Запрос = ЗапросHTTP;
|
||||||
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
||||||
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
||||||
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, СтруктураОтвета, ДополнительныеФайлы, НСтр("ru='Не удалось обновить статус заявления'"),
|
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, СтруктураОтвета, ДополнительныеФайлы, ЗаголовокОшибки,
|
||||||
НСтр("ru='Распределенный реестр ФНС России не вернул данные о статусе заявления.'"));
|
НСтр("ru='Распределенный реестр ФНС России не вернул данные о статусе транзакции.'"));
|
||||||
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
||||||
Возврат Результат;
|
Возврат Результат;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
@@ -3180,7 +3352,7 @@
|
|||||||
|
|
||||||
КонецФункции
|
КонецФункции
|
||||||
|
|
||||||
Функция ПолучитьЧастичныеДанныеДоверенностиМЧДРР(НомерДоверенности, ТокенДоступа = "") Экспорт
|
Функция ПолучитьЧастичныеДанныеДоверенностиМЧДРР(НомерДоверенности, ТокенДоступа = "", ЦельПолучения = "") Экспорт
|
||||||
|
|
||||||
СвойстваСервераМЧДРР = СвойстваСервераМЧДРР();
|
СвойстваСервераМЧДРР = СвойстваСервераМЧДРР();
|
||||||
|
|
||||||
@@ -3197,8 +3369,10 @@
|
|||||||
Результат.Вставить("ТекстОтвета", "");
|
Результат.Вставить("ТекстОтвета", "");
|
||||||
Результат.Вставить("Ошибка");
|
Результат.Вставить("Ошибка");
|
||||||
|
|
||||||
|
ЗаголовокОшибки = ?(ЦельПолучения = "", НСтр("ru='Не удалось получить частичные данные доверенности'"), ЦельПолучения);
|
||||||
|
|
||||||
Если НЕ ЗначениеЗаполнено(ТокенДоступа) Тогда
|
Если НЕ ЗначениеЗаполнено(ТокенДоступа) Тогда
|
||||||
РезультатАвторизации = АвторизоватьсяНаСервереМЧДРР();
|
РезультатАвторизации = АвторизоватьсяНаСервереМЧДРР(ЗаголовокОшибки);
|
||||||
Если РезультатАвторизации.Ошибка <> Неопределено Тогда
|
Если РезультатАвторизации.Ошибка <> Неопределено Тогда
|
||||||
Результат.Ошибка = РезультатАвторизации.Ошибка;
|
Результат.Ошибка = РезультатАвторизации.Ошибка;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
@@ -3233,13 +3407,12 @@
|
|||||||
ОтветHTTP = СоединениеHTTP.Получить(ЗапросHTTP);
|
ОтветHTTP = СоединениеHTTP.Получить(ЗапросHTTP);
|
||||||
Исключение
|
Исключение
|
||||||
ПредставлениеОшибки = ОбработкаОшибок.ПодробноеПредставлениеОшибки(ИнформацияОбОшибке());
|
ПредставлениеОшибки = ОбработкаОшибок.ПодробноеПредставлениеОшибки(ИнформацияОбОшибке());
|
||||||
Результат.ПовторятьСоединение = НЕ ОбщегоНазначения.РазделениеВключено();
|
|
||||||
ПараметрыФайловДляРасследования = ПараметрыФайловДляРасследования();
|
ПараметрыФайловДляРасследования = ПараметрыФайловДляРасследования();
|
||||||
ПараметрыФайловДляРасследования.Запрос = ЗапросHTTP;
|
ПараметрыФайловДляРасследования.Запрос = ЗапросHTTP;
|
||||||
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
||||||
ПараметрыФайловДляРасследования.СоединениеHTTP = СоединениеHTTP;
|
ПараметрыФайловДляРасследования.СоединениеHTTP = СоединениеHTTP;
|
||||||
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
||||||
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, , ДополнительныеФайлы, НСтр("ru='Не удается получить частичные данные доверенности'"), ПредставлениеОшибки);
|
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, , ДополнительныеФайлы, ЗаголовокОшибки, ПредставлениеОшибки);
|
||||||
ПараметрыОшибкиМЧДРР.ПараметрыТекстаОшибки.Вставить("НомерДоверенности", НомерДоверенности);
|
ПараметрыОшибкиМЧДРР.ПараметрыТекстаОшибки.Вставить("НомерДоверенности", НомерДоверенности);
|
||||||
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
||||||
Возврат Результат;
|
Возврат Результат;
|
||||||
@@ -3280,7 +3453,7 @@
|
|||||||
ПараметрыФайловДляРасследования.Запрос = ЗапросHTTP;
|
ПараметрыФайловДляРасследования.Запрос = ЗапросHTTP;
|
||||||
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
||||||
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
||||||
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, , ДополнительныеФайлы, НСтр("ru='Не удается получить частичные данные доверенности'"), ПредставлениеОшибки);
|
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, , ДополнительныеФайлы, ЗаголовокОшибки, ПредставлениеОшибки);
|
||||||
ПараметрыОшибкиМЧДРР.ПараметрыТекстаОшибки.Вставить("НомерДоверенности", НомерДоверенности);
|
ПараметрыОшибкиМЧДРР.ПараметрыТекстаОшибки.Вставить("НомерДоверенности", НомерДоверенности);
|
||||||
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
||||||
Возврат Результат;
|
Возврат Результат;
|
||||||
@@ -3293,7 +3466,7 @@
|
|||||||
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
||||||
ПараметрыФайловДляРасследования.СоединениеHTTP = СоединениеHTTP;
|
ПараметрыФайловДляРасследования.СоединениеHTTP = СоединениеHTTP;
|
||||||
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
||||||
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, СтруктураОтвета , ДополнительныеФайлы, НСтр("ru='Не удается получить частичные данные доверенности'"),
|
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, СтруктураОтвета , ДополнительныеФайлы, ЗаголовокОшибки,
|
||||||
НСтр("ru='Распределенный реестр ФНС России не предоставил частичных данных доверенности.'"));
|
НСтр("ru='Распределенный реестр ФНС России не предоставил частичных данных доверенности.'"));
|
||||||
ПараметрыОшибкиМЧДРР.ПараметрыТекстаОшибки.Вставить("НомерДоверенности", НомерДоверенности);
|
ПараметрыОшибкиМЧДРР.ПараметрыТекстаОшибки.Вставить("НомерДоверенности", НомерДоверенности);
|
||||||
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
||||||
@@ -3304,7 +3477,7 @@
|
|||||||
|
|
||||||
КонецФункции
|
КонецФункции
|
||||||
|
|
||||||
Функция ПолучитьПолныеДанныеДоверенностиМЧДРР(НомерДоверенности, ИННДоверителя, ТокенДоступа = "") Экспорт
|
Функция ПолучитьПолныеДанныеДоверенностиМЧДРР(НомерДоверенности, ИННДоверителя, ТокенДоступа = "", ЦельПолучения = "") Экспорт
|
||||||
|
|
||||||
СвойстваСервераМЧДРР = СвойстваСервераМЧДРР();
|
СвойстваСервераМЧДРР = СвойстваСервераМЧДРР();
|
||||||
|
|
||||||
@@ -3319,8 +3492,10 @@
|
|||||||
Результат.Вставить("ТекстОтвета", "");
|
Результат.Вставить("ТекстОтвета", "");
|
||||||
Результат.Вставить("Ошибка");
|
Результат.Вставить("Ошибка");
|
||||||
|
|
||||||
|
ЗаголовокОшибки = ?(ЦельПолучения = "", НСтр("ru='Не удалось получить полные данные доверенности'"), ЦельПолучения);
|
||||||
|
|
||||||
Если НЕ ЗначениеЗаполнено(ТокенДоступа) Тогда
|
Если НЕ ЗначениеЗаполнено(ТокенДоступа) Тогда
|
||||||
РезультатАвторизации = АвторизоватьсяНаСервереМЧДРР();
|
РезультатАвторизации = АвторизоватьсяНаСервереМЧДРР(ЗаголовокОшибки);
|
||||||
Если РезультатАвторизации.Ошибка <> Неопределено Тогда
|
Если РезультатАвторизации.Ошибка <> Неопределено Тогда
|
||||||
Результат.Ошибка = РезультатАвторизации.Ошибка;
|
Результат.Ошибка = РезультатАвторизации.Ошибка;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
@@ -3356,13 +3531,12 @@
|
|||||||
ОтветHTTP = СоединениеHTTP.Получить(ЗапросHTTP);
|
ОтветHTTP = СоединениеHTTP.Получить(ЗапросHTTP);
|
||||||
Исключение
|
Исключение
|
||||||
ПредставлениеОшибки = ОбработкаОшибок.ПодробноеПредставлениеОшибки(ИнформацияОбОшибке());
|
ПредставлениеОшибки = ОбработкаОшибок.ПодробноеПредставлениеОшибки(ИнформацияОбОшибке());
|
||||||
Результат.ПовторятьСоединение = НЕ ОбщегоНазначения.РазделениеВключено();
|
|
||||||
ПараметрыФайловДляРасследования = ПараметрыФайловДляРасследования();
|
ПараметрыФайловДляРасследования = ПараметрыФайловДляРасследования();
|
||||||
ПараметрыФайловДляРасследования.СоединениеHTTP = СоединениеHTTP;
|
ПараметрыФайловДляРасследования.СоединениеHTTP = СоединениеHTTP;
|
||||||
ПараметрыФайловДляРасследования.Запрос = ЗапросHTTP;
|
ПараметрыФайловДляРасследования.Запрос = ЗапросHTTP;
|
||||||
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
||||||
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
||||||
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, , ДополнительныеФайлы, НСтр("ru='Не удается получить полные данные доверенности'"), ПредставлениеОшибки);
|
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, , ДополнительныеФайлы, ЗаголовокОшибки, ПредставлениеОшибки);
|
||||||
ПараметрыОшибкиМЧДРР.ПараметрыТекстаОшибки.Вставить("НомерДоверенности", НомерДоверенности);
|
ПараметрыОшибкиМЧДРР.ПараметрыТекстаОшибки.Вставить("НомерДоверенности", НомерДоверенности);
|
||||||
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
||||||
Возврат Результат;
|
Возврат Результат;
|
||||||
@@ -3384,7 +3558,7 @@
|
|||||||
ПараметрыФайловДляРасследования.Запрос = ЗапросHTTP;
|
ПараметрыФайловДляРасследования.Запрос = ЗапросHTTP;
|
||||||
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
||||||
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
||||||
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, , ДополнительныеФайлы, НСтр("ru='Не удается получить архив полных данных'"), ПредставлениеОшибки);
|
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, , ДополнительныеФайлы, ЗаголовокОшибки, ПредставлениеОшибки);
|
||||||
ПараметрыОшибкиМЧДРР.ПараметрыТекстаОшибки.Вставить("НомерДоверенности", НомерДоверенности);
|
ПараметрыОшибкиМЧДРР.ПараметрыТекстаОшибки.Вставить("НомерДоверенности", НомерДоверенности);
|
||||||
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
||||||
Возврат Результат;
|
Возврат Результат;
|
||||||
@@ -3406,7 +3580,7 @@
|
|||||||
ПараметрыФайловДляРасследования.Запрос = ЗапросHTTP;
|
ПараметрыФайловДляРасследования.Запрос = ЗапросHTTP;
|
||||||
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
||||||
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
||||||
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, СтруктураОтвета, ДополнительныеФайлы, НСтр("ru='Не удается получить полные данные доверенности'"), ПредставлениеОшибки);
|
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, СтруктураОтвета, ДополнительныеФайлы, ЗаголовокОшибки, ПредставлениеОшибки);
|
||||||
ПараметрыОшибкиМЧДРР.ПараметрыТекстаОшибки.Вставить("НомерДоверенности", НомерДоверенности);
|
ПараметрыОшибкиМЧДРР.ПараметрыТекстаОшибки.Вставить("НомерДоверенности", НомерДоверенности);
|
||||||
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
||||||
Возврат Результат;
|
Возврат Результат;
|
||||||
@@ -3418,7 +3592,7 @@
|
|||||||
ПараметрыФайловДляРасследования.Запрос = ЗапросHTTP;
|
ПараметрыФайловДляРасследования.Запрос = ЗапросHTTP;
|
||||||
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
||||||
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
||||||
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, СтруктураОтвета, ДополнительныеФайлы, НСтр("ru='Не удается получить полные данные доверенности'"),
|
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, СтруктураОтвета, ДополнительныеФайлы, ЗаголовокОшибки,
|
||||||
НСтр("ru='Распределенный реестр ФНС России не предоставил полных данных доверенности и не сообщил о статусе запроса данных.'"));
|
НСтр("ru='Распределенный реестр ФНС России не предоставил полных данных доверенности и не сообщил о статусе запроса данных.'"));
|
||||||
ПараметрыОшибкиМЧДРР.ПараметрыТекстаОшибки.Вставить("НомерДоверенности", НомерДоверенности);
|
ПараметрыОшибкиМЧДРР.ПараметрыТекстаОшибки.Вставить("НомерДоверенности", НомерДоверенности);
|
||||||
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
||||||
@@ -3430,7 +3604,10 @@
|
|||||||
КонецФункции
|
КонецФункции
|
||||||
|
|
||||||
Функция ЗагрузитьДоверенностьИзРеестра(НомерДоверенности, ИННДоверителя, ТокенДоступа = "") Экспорт
|
Функция ЗагрузитьДоверенностьИзРеестра(НомерДоверенности, ИННДоверителя, ТокенДоступа = "") Экспорт
|
||||||
РезультатПолучения = ПолучитьПолныеДанныеДоверенностиМЧДРР(НомерДоверенности, ИННДоверителя, ТокенДоступа);
|
|
||||||
|
ЗаголовокОшибки = НСтр("ru='Не удалось загрузить доверенность'");
|
||||||
|
|
||||||
|
РезультатПолучения = ПолучитьПолныеДанныеДоверенностиМЧДРР(НомерДоверенности, ИННДоверителя, ТокенДоступа, ЗаголовокОшибки);
|
||||||
ПолныеДанныеДоверенности = Новый Структура;
|
ПолныеДанныеДоверенности = Новый Структура;
|
||||||
ПолныеДанныеДоверенности.Вставить("Ошибка", РезультатПолучения.Ошибка);
|
ПолныеДанныеДоверенности.Вставить("Ошибка", РезультатПолучения.Ошибка);
|
||||||
Если ЗначениеЗаполнено(РезультатПолучения.Ошибка) Тогда
|
Если ЗначениеЗаполнено(РезультатПолучения.Ошибка) Тогда
|
||||||
@@ -3456,7 +3633,7 @@
|
|||||||
РезультатЗагрузки = Справочники.МашиночитаемыеДоверенности.ЗагрузитьДоверенностиВИнформационнуюБазу(ФайлыДляЗагрузки);
|
РезультатЗагрузки = Справочники.МашиночитаемыеДоверенности.ЗагрузитьДоверенностиВИнформационнуюБазу(ФайлыДляЗагрузки);
|
||||||
|
|
||||||
Если ЗначениеЗаполнено(РезультатЗагрузки.ТекстОшибки) Тогда
|
Если ЗначениеЗаполнено(РезультатЗагрузки.ТекстОшибки) Тогда
|
||||||
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(, , , , НСтр("ru='Не удалось загрузить доверенность из реестра'"), РезультатЗагрузки.ТекстОшибки);
|
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(, , , , ЗаголовокОшибки, РезультатЗагрузки.ТекстОшибки);
|
||||||
ПолныеДанныеДоверенности.Вставить("Ошибка", ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР));
|
ПолныеДанныеДоверенности.Вставить("Ошибка", ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР));
|
||||||
Возврат ПолныеДанныеДоверенности;
|
Возврат ПолныеДанныеДоверенности;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
@@ -3470,6 +3647,8 @@
|
|||||||
|
|
||||||
Функция ОтменитьМЧДРР(ИмяФайлаВыгрузки, ДанныеИлиАдресВыгрузки, ДанныеИлиАдресПодписи, Доверенность, ТокенДоступа = "") Экспорт
|
Функция ОтменитьМЧДРР(ИмяФайлаВыгрузки, ДанныеИлиАдресВыгрузки, ДанныеИлиАдресПодписи, Доверенность, ТокенДоступа = "") Экспорт
|
||||||
|
|
||||||
|
ЗаголовокОшибки = НСтр("ru='Не удалось отменить доверенность'");
|
||||||
|
|
||||||
ДанныеВыгрузки = ?(ТипЗнч(ДанныеИлиАдресВыгрузки) = Тип("Строка")
|
ДанныеВыгрузки = ?(ТипЗнч(ДанныеИлиАдресВыгрузки) = Тип("Строка")
|
||||||
И ЭтоАдресВременногоХранилища(ДанныеИлиАдресВыгрузки), ПолучитьИзВременногоХранилища(ДанныеИлиАдресВыгрузки),
|
И ЭтоАдресВременногоХранилища(ДанныеИлиАдресВыгрузки), ПолучитьИзВременногоХранилища(ДанныеИлиАдресВыгрузки),
|
||||||
ДанныеИлиАдресВыгрузки);
|
ДанныеИлиАдресВыгрузки);
|
||||||
@@ -3559,7 +3738,7 @@
|
|||||||
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
||||||
ПараметрыФайловДляРасследования.СоединениеHTTP = СоединениеHTTP;
|
ПараметрыФайловДляРасследования.СоединениеHTTP = СоединениеHTTP;
|
||||||
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
||||||
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, , ДополнительныеФайлы, НСтр("ru='Не удалось разобрать ответ при отмене доверенности на сервере МЧД'"), ПредставлениеОшибки);
|
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, , ДополнительныеФайлы, ЗаголовокОшибки, ПредставлениеОшибки);
|
||||||
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
||||||
Возврат Результат;
|
Возврат Результат;
|
||||||
КонецПопытки;
|
КонецПопытки;
|
||||||
@@ -3578,7 +3757,7 @@
|
|||||||
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
||||||
ПараметрыФайловДляРасследования.СоединениеHTTP = СоединениеHTTP;
|
ПараметрыФайловДляРасследования.СоединениеHTTP = СоединениеHTTP;
|
||||||
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
||||||
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, , ДополнительныеФайлы, НСтр("ru='Не удалось разобрать ответ при отмене доверенности на сервере МЧД'"), ПредставлениеОшибки);
|
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, , ДополнительныеФайлы, ЗаголовокОшибки, ПредставлениеОшибки);
|
||||||
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
||||||
|
|
||||||
Возврат Результат;
|
Возврат Результат;
|
||||||
@@ -3591,7 +3770,7 @@
|
|||||||
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
ПараметрыФайловДляРасследования.Ответ = ОтветHTTP;
|
||||||
ПараметрыФайловДляРасследования.СоединениеHTTP = СоединениеHTTP;
|
ПараметрыФайловДляРасследования.СоединениеHTTP = СоединениеHTTP;
|
||||||
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
ДополнительныеФайлы = ФайлыДляРасследования(ПараметрыФайловДляРасследования);
|
||||||
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, СтруктураОтвета, ДополнительныеФайлы, НСтр("ru='Сервер МЧД не вернул номер транзакции отмены'"), ПредставлениеОшибки);
|
ПараметрыОшибкиМЧДРР = ПараметрыОшибкиМЧДРР(ЗапросHTTP, ОтветHTTP, СтруктураОтвета, ДополнительныеФайлы, ЗаголовокОшибки, ПредставлениеОшибки);
|
||||||
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
Результат.Ошибка = ПолучитьИЗаписатьОшибкуМЧДРР(ПараметрыОшибкиМЧДРР);
|
||||||
Возврат Результат;
|
Возврат Результат;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
@@ -3694,9 +3873,41 @@
|
|||||||
ЗаписьXML.ЗаписатьКонецЭлемента();
|
ЗаписьXML.ЗаписатьКонецЭлемента();
|
||||||
ЗаписьXML.ЗаписатьКонецЭлемента();
|
ЗаписьXML.ЗаписатьКонецЭлемента();
|
||||||
|
|
||||||
|
|
||||||
|
Если Доверенность.ДляНалоговыхОрганов Тогда
|
||||||
|
|
||||||
|
Префикс = "ON_OFFDOVER";
|
||||||
|
ДатаФормирования = Формат(ТекущаяДатаСеанса(), "ДФ=yyyyMMdd;");
|
||||||
|
ИдентификационныйНомер = Доверенность.НомерДоверенности;
|
||||||
|
|
||||||
|
Получатель = XMLСтрока(Доверенность.КодНалоговогоОрганаПредставления);
|
||||||
|
КонечныйПолучатель = Получатель;
|
||||||
|
Если Доверенность.НалоговыеОрганыДействия.Количество() = 1 Тогда
|
||||||
|
КонечныйПолучатель = XMLСтрока(Доверенность.НалоговыеОрганыДействия[0].КодНалоговогоОргана);
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
ОписанияДоверителей = Доверенность.Доверители.НайтиСтроки(Новый Структура("ИдентификаторРодителя",
|
||||||
|
Новый УникальныйИдентификатор("00000000-0000-0000-0000-000000000000")));
|
||||||
|
|
||||||
|
Отправитель = "";
|
||||||
|
Для Каждого ОписаниеДоверителя Из ОписанияДоверителей Цикл
|
||||||
|
РеквизитыДоверителя = ОписаниеДоверителя.ДоверительРеквизиты.Получить();
|
||||||
|
Отправитель = XMLСтрока(РеквизитыДоверителя.ИНН);
|
||||||
|
Если Не РеквизитыДоверителя.ЭтоИндивидуальныйПредприниматель И Не РеквизитыДоверителя.ЭтоФизическоеЛицо Тогда
|
||||||
|
Отправитель = Отправитель + XMLСтрока(РеквизитыДоверителя.КПП);
|
||||||
|
КонецЕсли;
|
||||||
|
Прервать;
|
||||||
|
КонецЦикла;
|
||||||
|
|
||||||
|
|
||||||
|
ИмяФайла = СтрШаблон("%1_%2_%3_%4_%5_%6.xml", Префикс, Получатель, КонечныйПолучатель, Отправитель, ДатаФормирования, ИдентификационныйНомер);
|
||||||
|
Иначе
|
||||||
|
ИмяФайла = "revoke.xml";
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
Результат = Новый Структура;
|
Результат = Новый Структура;
|
||||||
Результат.Вставить("Содержимое", ПоместитьВоВременноеХранилище(ПолучитьДвоичныеДанныеИзСтроки(ЗаписьXML.Закрыть(), "windows-1251"), Новый УникальныйИдентификатор));
|
Результат.Вставить("Содержимое", ПоместитьВоВременноеХранилище(ПолучитьДвоичныеДанныеИзСтроки(ЗаписьXML.Закрыть(), "windows-1251"), Новый УникальныйИдентификатор));
|
||||||
Результат.Вставить("ИмяФайла", "revoke.xml");
|
Результат.Вставить("ИмяФайла", ИмяФайла);
|
||||||
Результат.Вставить("НомерДоверенности", НомерДоверенности);
|
Результат.Вставить("НомерДоверенности", НомерДоверенности);
|
||||||
Результат.Вставить("Доверенность", Доверенность);
|
Результат.Вставить("Доверенность", Доверенность);
|
||||||
Возврат Результат;
|
Возврат Результат;
|
||||||
@@ -3771,6 +3982,13 @@
|
|||||||
ЗаписьСтатуса.Записать();
|
ЗаписьСтатуса.Записать();
|
||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
|
Процедура ПриИзмененииСтатусаДоверенности(ИзменившиесяСтатусы) Экспорт
|
||||||
|
Результат = Новый Структура;
|
||||||
|
Результат.Вставить("ИмяСобытия", "ПриИзмененииСтатусаДоверенности");
|
||||||
|
Результат.Вставить("Контекст", ИзменившиесяСтатусы);
|
||||||
|
СерверныеОповещения.ОтправитьСерверноеОповещение("СтандартныеПодсистемы.МашиночитаемыеДоверенности", Результат, Неопределено);
|
||||||
|
КонецПроцедуры
|
||||||
|
|
||||||
#КонецОбласти
|
#КонецОбласти
|
||||||
|
|
||||||
#КонецОбласти
|
#КонецОбласти
|
||||||
@@ -24,16 +24,16 @@
|
|||||||
|
|
||||||
КонецФункции
|
КонецФункции
|
||||||
|
|
||||||
Функция ПолучитьСтатусТранзакцииМЧДРР(ИдентификаторТранзакции, ТокенДоступа = "", НомерДоверенности = "") Экспорт
|
Функция ПолучитьСтатусТранзакцииМЧДРР(ИдентификаторТранзакции, ТокенДоступа = "", НомерДоверенности = "", ЦельПолучения = "") Экспорт
|
||||||
Возврат МашиночитаемыеДоверенностиФНССлужебный.ПолучитьСтатусТранзакцииМЧДРР(ИдентификаторТранзакции, ТокенДоступа, НомерДоверенности);
|
Возврат МашиночитаемыеДоверенностиФНССлужебный.ПолучитьСтатусТранзакцииМЧДРР(ИдентификаторТранзакции, ТокенДоступа, НомерДоверенности, ЦельПолучения);
|
||||||
КонецФункции
|
КонецФункции
|
||||||
|
|
||||||
Функция ПолучитьЧастичныеДанныеДоверенностиМЧДРР(НомерДоверенности, ТокенДоступа = "") Экспорт
|
Функция ПолучитьЧастичныеДанныеДоверенностиМЧДРР(НомерДоверенности, ТокенДоступа = "", ЦельПолучения = "") Экспорт
|
||||||
Возврат МашиночитаемыеДоверенностиФНССлужебный.ПолучитьЧастичныеДанныеДоверенностиМЧДРР(НомерДоверенности, ТокенДоступа);
|
Возврат МашиночитаемыеДоверенностиФНССлужебный.ПолучитьЧастичныеДанныеДоверенностиМЧДРР(НомерДоверенности, ТокенДоступа, ЦельПолучения);
|
||||||
КонецФункции
|
КонецФункции
|
||||||
|
|
||||||
Функция ПолучитьПолныеДанныеДоверенностиМЧДРР(НомерДоверенности, ИННДоверителя, ТокенДоступа = "") Экспорт
|
Функция ПолучитьПолныеДанныеДоверенностиМЧДРР(НомерДоверенности, ИННДоверителя, ТокенДоступа = "", ЦельПолучения = "") Экспорт
|
||||||
Возврат МашиночитаемыеДоверенностиФНССлужебный.ПолучитьПолныеДанныеДоверенностиМЧДРР(НомерДоверенности, ИННДоверителя, ТокенДоступа);
|
Возврат МашиночитаемыеДоверенностиФНССлужебный.ПолучитьПолныеДанныеДоверенностиМЧДРР(НомерДоверенности, ИННДоверителя, ТокенДоступа, ЦельПолучения);
|
||||||
КонецФункции
|
КонецФункции
|
||||||
|
|
||||||
Функция ЗагрузитьДоверенностьИзРеестра(НомерДоверенности, ИННДоверителя, ТокенДоступа = "") Экспорт
|
Функция ЗагрузитьДоверенностьИзРеестра(НомерДоверенности, ИННДоверителя, ТокенДоступа = "") Экспорт
|
||||||
@@ -82,9 +82,8 @@
|
|||||||
|
|
||||||
Функция РезультатПроверкиДоверенности(Знач Доверенность, Знач ПроверятьВРеестреФНС = Неопределено, Знач ИдентификаторФормы = Неопределено) Экспорт
|
Функция РезультатПроверкиДоверенности(Знач Доверенность, Знач ПроверятьВРеестреФНС = Неопределено, Знач ИдентификаторФормы = Неопределено) Экспорт
|
||||||
|
|
||||||
РеквизитыДоверенности = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(Доверенность,
|
Возврат МашиночитаемыеДоверенностиФНССлужебный.РезультатПроверкиДанныхДоверенности(МашиночитаемыеДоверенностиФНССлужебный.ДанныеМЧД(Доверенность),
|
||||||
"ФайлДоверенности, РегистрироватьВРеестре, НомерДоверенности, Статус, Ссылка, Верна, СтатусВернаУстановленВручную, УстановившийСтатусВерна");
|
ПроверятьВРеестреФНС, ИдентификаторФормы);
|
||||||
Возврат МашиночитаемыеДоверенностиФНССлужебный.РезультатПроверкиДанныхДоверенности(РеквизитыДоверенности, ПроверятьВРеестреФНС, ИдентификаторФормы);
|
|
||||||
|
|
||||||
КонецФункции
|
КонецФункции
|
||||||
|
|
||||||
|
|||||||
@@ -83,6 +83,21 @@
|
|||||||
|
|
||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
|
Процедура ПриОбработкеНавигационнойСсылкиОшибкиПроверкиПодписи(Форма, НавигационнаяСсылкаФорматированнойСтроки, СтандартнаяОбработка) Экспорт
|
||||||
|
|
||||||
|
СтандартнаяОбработка = Ложь;
|
||||||
|
|
||||||
|
Если ЗначениеЗаполнено(НавигационнаяСсылкаФорматированнойСтроки) Тогда
|
||||||
|
|
||||||
|
Ошибка = Новый Структура;
|
||||||
|
Ошибка.Вставить("ОписаниеОшибки", НавигационнаяСсылкаФорматированнойСтроки);
|
||||||
|
|
||||||
|
ЭлектроннаяПодписьСлужебныйКлиент.ПоказатьОшибкуОбращенияКПрограмме(
|
||||||
|
НСтр("ru='Проверка доверенности подписи'"), "", Ошибка, Новый Структура);
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
КонецПроцедуры
|
||||||
|
|
||||||
Функция ИнформацияМЧД(РезультатПроверкиПодписиПоМЧД) Экспорт
|
Функция ИнформацияМЧД(РезультатПроверкиПодписиПоМЧД) Экспорт
|
||||||
|
|
||||||
РезультатПроверки = ПолучитьИзВременногоХранилища(РезультатПроверкиПодписиПоМЧД);
|
РезультатПроверки = ПолучитьИзВременногоХранилища(РезультатПроверкиПодписиПоМЧД);
|
||||||
@@ -97,7 +112,7 @@
|
|||||||
Массив.Добавить(СтроковыеФункцииКлиент.ФорматированнаяСтрока(НСтр("ru = '%1 <a href=%2>%3</a>'"),
|
Массив.Добавить(СтроковыеФункцииКлиент.ФорматированнаяСтрока(НСтр("ru = '%1 <a href=%2>%3</a>'"),
|
||||||
Проверка,
|
Проверка,
|
||||||
ПолучитьНавигационнуюСсылку(Результат.МашиночитаемаяДоверенность),
|
ПолучитьНавигационнуюСсылку(Результат.МашиночитаемаяДоверенность),
|
||||||
Результат.МашиночитаемаяДоверенность));
|
Результат.Представление));
|
||||||
Массив.Добавить(Символы.ПС);
|
Массив.Добавить(Символы.ПС);
|
||||||
|
|
||||||
КонецЦикла;
|
КонецЦикла;
|
||||||
@@ -109,6 +124,19 @@
|
|||||||
|
|
||||||
КонецФункции
|
КонецФункции
|
||||||
|
|
||||||
|
// См. СтандартныеПодсистемыКлиент.ПриПолученииСерверногоОповещения
|
||||||
|
Процедура ПриПолученииСерверногоОповещения(ИмяОповещения, Результат) Экспорт
|
||||||
|
|
||||||
|
Если ИмяОповещения <> "СтандартныеПодсистемы.МашиночитаемыеДоверенности" Тогда
|
||||||
|
Возврат;
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
Если Результат.ИмяСобытия = "ПриИзмененииСтатусаДоверенности" Тогда
|
||||||
|
МашиночитаемыеДоверенностиФНСКлиентПереопределяемый.ПриИзмененииСтатусаДоверенности(Результат.Контекст);
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
КонецПроцедуры
|
||||||
|
|
||||||
#КонецОбласти
|
#КонецОбласти
|
||||||
|
|
||||||
#Область СлужебныеПроцедурыИФункции
|
#Область СлужебныеПроцедурыИФункции
|
||||||
@@ -122,6 +150,7 @@
|
|||||||
Структура.Вставить("Представители", Новый Массив);
|
Структура.Вставить("Представители", Новый Массив);
|
||||||
Структура.Вставить("РедактированиеТаблицы", РедактированиеТаблицы);
|
Структура.Вставить("РедактированиеТаблицы", РедактированиеТаблицы);
|
||||||
Структура.Вставить("Поле");
|
Структура.Вставить("Поле");
|
||||||
|
Структура.Вставить("ПоказыватьПерсональныеДанные", Истина);
|
||||||
|
|
||||||
Если Представитель Тогда
|
Если Представитель Тогда
|
||||||
Структура.Вставить("ТипУчастникаМЧД", ПредопределенноеЗначение("Перечисление.ТипыУчастниковМЧД.Представитель"));
|
Структура.Вставить("ТипУчастникаМЧД", ПредопределенноеЗначение("Перечисление.ТипыУчастниковМЧД.Представитель"));
|
||||||
@@ -325,7 +354,7 @@
|
|||||||
РезультатПолучения = МашиночитаемыеДоверенностиФНССлужебныйВызовСервера.ЗагрузитьДоверенностьИзРеестра(НомерДоверенности, ИННДоверителя);
|
РезультатПолучения = МашиночитаемыеДоверенностиФНССлужебныйВызовСервера.ЗагрузитьДоверенностьИзРеестра(НомерДоверенности, ИННДоверителя);
|
||||||
Если ЗначениеЗаполнено(РезультатПолучения.Ошибка) Тогда
|
Если ЗначениеЗаполнено(РезультатПолучения.Ошибка) Тогда
|
||||||
КонтекстОшибки = КонтекстДляОбработкиОшибкиРР();
|
КонтекстОшибки = КонтекстДляОбработкиОшибкиРР();
|
||||||
КонтекстОшибки.ЗаголовокПредупреждения = НСтр("ru='Не удалось получить полные данные доверенности'");
|
КонтекстОшибки.ЗаголовокПредупреждения = РезультатПолучения.Ошибка.ЗаголовокОшибки;
|
||||||
ОбработатьОшибкуВзаимодействияРР(РезультатПолучения.Ошибка, КонтекстОшибки);
|
ОбработатьОшибкуВзаимодействияРР(РезультатПолучения.Ошибка, КонтекстОшибки);
|
||||||
Возврат;
|
Возврат;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|||||||
+168
-45
@@ -16,6 +16,7 @@
|
|||||||
// Возвращаемое значение:
|
// Возвращаемое значение:
|
||||||
// Структура:
|
// Структура:
|
||||||
// * МашиночитаемаяДоверенность - СправочникСсылка.МашиночитаемыеДоверенности
|
// * МашиночитаемаяДоверенность - СправочникСсылка.МашиночитаемыеДоверенности
|
||||||
|
// * Представление - Строка - представление доверенности для отображения пользователям, т.к. может не быть прав на чтение.
|
||||||
// * ТребуетсяПроверка - Булево
|
// * ТребуетсяПроверка - Булево
|
||||||
// * ДатаПроверки - Дата
|
// * ДатаПроверки - Дата
|
||||||
// * Верна - Булево
|
// * Верна - Булево
|
||||||
@@ -31,6 +32,7 @@
|
|||||||
Функция РезультатПроверкиПодписиПоМЧД(Доверенность) Экспорт
|
Функция РезультатПроверкиПодписиПоМЧД(Доверенность) Экспорт
|
||||||
|
|
||||||
Структура = Новый Структура;
|
Структура = Новый Структура;
|
||||||
|
Структура.Вставить("Представление");
|
||||||
Структура.Вставить("МашиночитаемаяДоверенность", Доверенность);
|
Структура.Вставить("МашиночитаемаяДоверенность", Доверенность);
|
||||||
Структура.Вставить("ТребуетсяПроверка", Истина);
|
Структура.Вставить("ТребуетсяПроверка", Истина);
|
||||||
Структура.Вставить("ДатаПроверки");
|
Структура.Вставить("ДатаПроверки");
|
||||||
@@ -50,9 +52,32 @@
|
|||||||
|
|
||||||
#Область СлужебныеПроцедурыИФункции
|
#Область СлужебныеПроцедурыИФункции
|
||||||
|
|
||||||
|
Функция ПерсональныеДанные() Экспорт
|
||||||
|
|
||||||
|
ПерсональныеДанные = Новый Массив;
|
||||||
|
ПерсональныеДанные.Добавить("ДатаРождения");
|
||||||
|
ПерсональныеДанные.Добавить("МестоРождения");
|
||||||
|
ПерсональныеДанные.Добавить("АдресРегистрации");
|
||||||
|
ПерсональныеДанные.Добавить("ДокументНомер");
|
||||||
|
ПерсональныеДанные.Добавить("ДокументКемВыдан");
|
||||||
|
ПерсональныеДанные.Добавить("ДокументДатаВыдачи");
|
||||||
|
ПерсональныеДанные.Добавить("ДокументКодПодразделения");
|
||||||
|
ПерсональныеДанные.Добавить("ДокументСрокДействия");
|
||||||
|
ПерсональныеДанные.Добавить("СтраховойНомерПФР");
|
||||||
|
ПерсональныеДанные.Добавить("НомерЗаписиЕдиногоРегистраНаселения");
|
||||||
|
|
||||||
|
Возврат ПерсональныеДанные;
|
||||||
|
|
||||||
|
КонецФункции
|
||||||
|
|
||||||
|
Функция ЭтоПолномочиеФНС(КодПолномочия) Экспорт
|
||||||
|
Возврат СтрНачинаетсяС(КодПолномочия, "1_FNS")
|
||||||
|
Или СтрНачинаетсяС(КодПолномочия, "FNS_");
|
||||||
|
КонецФункции
|
||||||
|
|
||||||
Функция РасчетныйСтатусДокумента(ТехническийСтатус, Верна) Экспорт
|
Функция РасчетныйСтатусДокумента(ТехническийСтатус, Верна) Экспорт
|
||||||
|
|
||||||
Если ТехническийСтатус = ПредопределенноеЗначение("Перечисление.ТехническиеСтатусыМЧД.Зарегистрировано")
|
Если ТехническийСтатус = ПредопределенноеЗначение("Перечисление.ТехническиеСтатусыМЧД.Зарегистрирована")
|
||||||
Или ТехническийСтатус = ПредопределенноеЗначение("Перечисление.ТехническиеСтатусыМЧД.РегистрацияОтмены")
|
Или ТехническийСтатус = ПредопределенноеЗначение("Перечисление.ТехническиеСтатусыМЧД.РегистрацияОтмены")
|
||||||
Или ТехническийСтатус = ПредопределенноеЗначение("Перечисление.ТехническиеСтатусыМЧД.Активна") Тогда
|
Или ТехническийСтатус = ПредопределенноеЗначение("Перечисление.ТехническиеСтатусыМЧД.Активна") Тогда
|
||||||
Если Верна Тогда
|
Если Верна Тогда
|
||||||
@@ -62,7 +87,7 @@
|
|||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
ИначеЕсли ТехническийСтатус = ПредопределенноеЗначение("Перечисление.ТехническиеСтатусыМЧД.Создание")
|
ИначеЕсли ТехническийСтатус = ПредопределенноеЗначение("Перечисление.ТехническиеСтатусыМЧД.Создание")
|
||||||
Или ТехническийСтатус = ПредопределенноеЗначение("Перечисление.ТехническиеСтатусыМЧД.Подписание")
|
Или ТехническийСтатус = ПредопределенноеЗначение("Перечисление.ТехническиеСтатусыМЧД.Подписание")
|
||||||
Или ТехническийСтатус = ПредопределенноеЗначение("Перечисление.ТехническиеСтатусыМЧД.Подписан")
|
Или ТехническийСтатус = ПредопределенноеЗначение("Перечисление.ТехническиеСтатусыМЧД.Подписана")
|
||||||
Или ТехническийСтатус = ПредопределенноеЗначение("Перечисление.ТехническиеСтатусыМЧД.Регистрация") Тогда
|
Или ТехническийСтатус = ПредопределенноеЗначение("Перечисление.ТехническиеСтатусыМЧД.Регистрация") Тогда
|
||||||
РасчетныйСтатусДокумента = ПредопределенноеЗначение("Перечисление.СтатусыМЧД.Черновик");
|
РасчетныйСтатусДокумента = ПредопределенноеЗначение("Перечисление.СтатусыМЧД.Черновик");
|
||||||
Иначе
|
Иначе
|
||||||
@@ -77,11 +102,11 @@
|
|||||||
|
|
||||||
ВнешниеСтатусы = Новый Соответствие;
|
ВнешниеСтатусы = Новый Соответствие;
|
||||||
ВнешниеСтатусы.Вставить(ПредопределенноеЗначение("Перечисление.ТехническиеСтатусыМЧД.Регистрация"), Истина);
|
ВнешниеСтатусы.Вставить(ПредопределенноеЗначение("Перечисление.ТехническиеСтатусыМЧД.Регистрация"), Истина);
|
||||||
ВнешниеСтатусы.Вставить(ПредопределенноеЗначение("Перечисление.ТехническиеСтатусыМЧД.Зарегистрировано"), Истина);
|
ВнешниеСтатусы.Вставить(ПредопределенноеЗначение("Перечисление.ТехническиеСтатусыМЧД.Зарегистрирована"), Истина);
|
||||||
ВнешниеСтатусы.Вставить(ПредопределенноеЗначение("Перечисление.ТехническиеСтатусыМЧД.РегистрацияОтмены"), Истина);
|
ВнешниеСтатусы.Вставить(ПредопределенноеЗначение("Перечисление.ТехническиеСтатусыМЧД.РегистрацияОтмены"), Истина);
|
||||||
ВнешниеСтатусы.Вставить(ПредопределенноеЗначение("Перечисление.ТехническиеСтатусыМЧД.Отменена"), Истина);
|
ВнешниеСтатусы.Вставить(ПредопределенноеЗначение("Перечисление.ТехническиеСтатусыМЧД.Отменена"), Истина);
|
||||||
ВнешниеСтатусы.Вставить(ПредопределенноеЗначение("Перечисление.ТехническиеСтатусыМЧД.ОшибкаРегистрации"), Истина);
|
ВнешниеСтатусы.Вставить(ПредопределенноеЗначение("Перечисление.ТехническиеСтатусыМЧД.ОшибкаРегистрации"), Истина);
|
||||||
ВнешниеСтатусы.Вставить(ПредопределенноеЗначение("Перечисление.ТехническиеСтатусыМЧД.Просрочено"), Истина);
|
ВнешниеСтатусы.Вставить(ПредопределенноеЗначение("Перечисление.ТехническиеСтатусыМЧД.Просрочена"), Истина);
|
||||||
ВнешниеСтатусы.Вставить(ПредопределенноеЗначение("Перечисление.ТехническиеСтатусыМЧД.ДатаНачалаДействияНеНаступила"), Истина);
|
ВнешниеСтатусы.Вставить(ПредопределенноеЗначение("Перечисление.ТехническиеСтатусыМЧД.ДатаНачалаДействияНеНаступила"), Истина);
|
||||||
|
|
||||||
Возврат ВнешниеСтатусы;
|
Возврат ВнешниеСтатусы;
|
||||||
@@ -131,7 +156,7 @@
|
|||||||
Реквизиты.Добавить("КодНалогоплательщикаВСтранеРегистрации", НСтр("ru = 'Код налогоплательщика в стране регистрации (инкорпорации) или аналог'"));
|
Реквизиты.Добавить("КодНалогоплательщикаВСтранеРегистрации", НСтр("ru = 'Код налогоплательщика в стране регистрации (инкорпорации) или аналог'"));
|
||||||
Реквизиты.Добавить("ФактическийАдрес", НСтр("ru = 'Фактический адрес местонахождения'"));
|
Реквизиты.Добавить("ФактическийАдрес", НСтр("ru = 'Фактический адрес местонахождения'"));
|
||||||
Реквизиты.Добавить("ФактическийАдресЗначение", НСтр("ru = 'Фактический адрес местонахождения'"), Истина);
|
Реквизиты.Добавить("ФактическийАдресЗначение", НСтр("ru = 'Фактический адрес местонахождения'"), Истина);
|
||||||
Реквизиты.Добавить("ЮридическийАдресВСтранеРегистрации", НСтр("ru = 'Адрес юридического лица на территории государства, в котором оно зарегистрировано'"));
|
Реквизиты.Добавить("ЮридическийАдресВСтранеРегистрации", НСтр("ru = 'Адрес юридического лица на территории государства, в котором оно Зарегистрирована'"));
|
||||||
Реквизиты.Добавить("ЮридическийАдресВСтранеРегистрацииЗначение", НСтр("ru = 'Адрес юридического лица на территории государства'"), Истина);
|
Реквизиты.Добавить("ЮридическийАдресВСтранеРегистрацииЗначение", НСтр("ru = 'Адрес юридического лица на территории государства'"), Истина);
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
@@ -195,7 +220,7 @@
|
|||||||
Реквизиты.Добавить("ЭтоДолжностноеЛицо", НСтр("ru = 'Это должностное лицо'"), Истина);
|
Реквизиты.Добавить("ЭтоДолжностноеЛицо", НСтр("ru = 'Это должностное лицо'"), Истина);
|
||||||
|
|
||||||
Если ДляЗаполнения Или ВидФизическогоЛица <> "ИндивидуальныйПредприниматель" Тогда
|
Если ДляЗаполнения Или ВидФизическогоЛица <> "ИндивидуальныйПредприниматель" Тогда
|
||||||
Реквизиты.Добавить("ДолжностьЛицаБезДоверенности", НСтр("ru = 'Должность'"));
|
Реквизиты.Добавить("ДолжностьЛицаДоверителя", НСтр("ru = 'Должность'"));
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
Реквизиты.Добавить("Фамилия", НСтр("ru = 'Фамилия'"));
|
Реквизиты.Добавить("Фамилия", НСтр("ru = 'Фамилия'"));
|
||||||
@@ -232,7 +257,7 @@
|
|||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
Если ВидФизическогоЛица = "ФизическоеЛицо" Тогда
|
Если ВидФизическогоЛица = "ФизическоеЛицо" Тогда
|
||||||
Реквизиты.НайтиПоЗначению("ДолжностьЛицаБезДоверенности").Пометка = Истина;
|
Реквизиты.НайтиПоЗначению("ДолжностьЛицаДоверителя").Пометка = Истина;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
Если ВидФизическогоЛица = "ДолжностноеЛицо" Тогда
|
Если ВидФизическогоЛица = "ДолжностноеЛицо" Тогда
|
||||||
@@ -243,7 +268,7 @@
|
|||||||
Реквизиты.НайтиПоЗначению("ДокументДатаВыдачи").Пометка = Истина;
|
Реквизиты.НайтиПоЗначению("ДокументДатаВыдачи").Пометка = Истина;
|
||||||
Реквизиты.НайтиПоЗначению("ДокументКодПодразделения").Пометка = Истина;
|
Реквизиты.НайтиПоЗначению("ДокументКодПодразделения").Пометка = Истина;
|
||||||
ИначеЕсли ДляЗаполнения Тогда
|
ИначеЕсли ДляЗаполнения Тогда
|
||||||
Реквизиты.НайтиПоЗначению("ДолжностьЛицаБезДоверенности").Пометка = Истина;
|
Реквизиты.НайтиПоЗначению("ДолжностьЛицаДоверителя").Пометка = Истина;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
Возврат Реквизиты;
|
Возврат Реквизиты;
|
||||||
@@ -355,7 +380,7 @@
|
|||||||
Проверка = НСтр("ru = 'Требуется проверка подписи по МЧД'");
|
Проверка = НСтр("ru = 'Требуется проверка подписи по МЧД'");
|
||||||
Верна = Ложь;
|
Верна = Ложь;
|
||||||
Иначе
|
Иначе
|
||||||
Проверка = НСтр("ru = 'Не верна подпись по МДЧ'");
|
Проверка = НСтр("ru = 'Не верна подпись по МЧД'");
|
||||||
Верна = Ложь;
|
Верна = Ложь;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
@@ -396,6 +421,7 @@
|
|||||||
// * Статус - ПеречислениеСсылка.СтатусыМЧД
|
// * Статус - ПеречислениеСсылка.СтатусыМЧД
|
||||||
// * ТребуетсяПроверка - Булево
|
// * ТребуетсяПроверка - Булево
|
||||||
// * РезультатыПроверкиПодписей - Массив из Структура
|
// * РезультатыПроверкиПодписей - Массив из Структура
|
||||||
|
// * ОписаниеОшибок - см. НовоеОписаниеОшибок
|
||||||
//
|
//
|
||||||
Функция РезультатПроверкиДоверенности(Результат) Экспорт
|
Функция РезультатПроверкиДоверенности(Результат) Экспорт
|
||||||
|
|
||||||
@@ -405,34 +431,49 @@
|
|||||||
РезультатПроверкиДоверенности = Новый Структура;
|
РезультатПроверкиДоверенности = Новый Структура;
|
||||||
РезультатПроверкиДоверенности.Вставить("Верна");
|
РезультатПроверкиДоверенности.Вставить("Верна");
|
||||||
РезультатПроверкиДоверенности.Вставить("ТекстОшибки", "");
|
РезультатПроверкиДоверенности.Вставить("ТекстОшибки", "");
|
||||||
РезультатПроверкиДоверенности.Вставить("ЕстьВсеПодписи", РезультатПроверкиПодписей.ЕстьВсеПодписи);
|
РезультатПроверкиДоверенности.Вставить("ОписаниеОшибок");
|
||||||
|
РезультатПроверкиДоверенности.Вставить("ЕстьВсеПодписи", Ложь);
|
||||||
РезультатПроверкиДоверенности.Вставить("ЕстьВРеестреФНС", Результат.ЕстьВРеестреФНС);
|
РезультатПроверкиДоверенности.Вставить("ЕстьВРеестреФНС", Результат.ЕстьВРеестреФНС);
|
||||||
РезультатПроверкиДоверенности.Вставить("Статус");
|
РезультатПроверкиДоверенности.Вставить("Статус");
|
||||||
РезультатПроверкиДоверенности.Вставить("ТребуетсяПроверка", Ложь);
|
РезультатПроверкиДоверенности.Вставить("ТребуетсяПроверка", Ложь);
|
||||||
РезультатПроверкиДоверенности.Вставить("РезультатыПроверкиПодписей",
|
РезультатПроверкиДоверенности.Вставить("РезультатыПроверкиПодписей", Новый Массив);
|
||||||
РезультатПроверкиПодписей.РезультатыПроверкиПодписей);
|
|
||||||
|
|
||||||
ПодписиВерны = Истина; ПодписиСоответствуют = Истина; ПодписиТребуютПроверки = Ложь;
|
|
||||||
|
|
||||||
Для Каждого РезультатПроверкиПодписи Из РезультатПроверкиПодписей.РезультатыПроверкиПодписей Цикл
|
|
||||||
|
|
||||||
Если РезультатПроверкиПодписи.ТребуетсяПроверка Тогда
|
|
||||||
ПодписиТребуютПроверки = Истина;
|
|
||||||
ИначеЕсли Не РезультатПроверкиПодписи.ПодписьВерна Тогда
|
|
||||||
ПодписиВерны = Ложь;
|
|
||||||
КонецЕсли;
|
|
||||||
|
|
||||||
Если Не РезультатПроверкиПодписи.Соответствует Тогда
|
|
||||||
ПодписиСоответствуют = Ложь;
|
|
||||||
КонецЕсли;
|
|
||||||
КонецЦикла;
|
|
||||||
|
|
||||||
РезультатПроверкиДоверенности.Верна = (СтатусВернаУстановленВручную
|
|
||||||
Или ПодписиВерны И ПодписиСоответствуют И Не ПодписиТребуютПроверки И РезультатПроверкиПодписей.ЕстьВсеПодписи)
|
|
||||||
И Не ЗначениеЗаполнено(Результат.ОшибкаПроверкиВРеестреФНС);
|
|
||||||
|
|
||||||
РезультатПроверкиДоверенности.ТребуетсяПроверка = Не СтатусВернаУстановленВручную И ПодписиТребуютПроверки
|
ОписаниеОшибок = НовоеОписаниеОшибок();
|
||||||
Или ЗначениеЗаполнено(Результат.ОшибкаПроверкиВРеестреФНС);
|
|
||||||
|
Если Результат.ВыполненаПроверкаПодписей Тогда
|
||||||
|
|
||||||
|
РезультатПроверкиДоверенности.РезультатыПроверкиПодписей = РезультатПроверкиПодписей.РезультатыПроверкиПодписей;
|
||||||
|
РезультатПроверкиДоверенности.ЕстьВсеПодписи = РезультатПроверкиПодписей.ЕстьВсеПодписи;
|
||||||
|
|
||||||
|
ПодписиВерны = Истина; ПодписиСоответствуют = Истина; ПодписиТребуютПроверки = Ложь;
|
||||||
|
|
||||||
|
Для Каждого РезультатПроверкиПодписи Из РезультатПроверкиПодписей.РезультатыПроверкиПодписей Цикл
|
||||||
|
|
||||||
|
Если РезультатПроверкиПодписи.ТребуетсяПроверка Тогда
|
||||||
|
ПодписиТребуютПроверки = Истина;
|
||||||
|
ИначеЕсли Не РезультатПроверкиПодписи.ПодписьВерна Тогда
|
||||||
|
ПодписиВерны = Ложь;
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
Если Не РезультатПроверкиПодписи.Соответствует Тогда
|
||||||
|
ПодписиСоответствуют = Ложь;
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
КонецЦикла;
|
||||||
|
|
||||||
|
РезультатПроверкиДоверенности.Верна = (СтатусВернаУстановленВручную
|
||||||
|
Или ПодписиВерны И ПодписиСоответствуют И Не ПодписиТребуютПроверки И РезультатПроверкиПодписей.ЕстьВсеПодписи)
|
||||||
|
И Не ЗначениеЗаполнено(Результат.ОшибкаПроверкиВРеестреФНС);
|
||||||
|
|
||||||
|
РезультатПроверкиДоверенности.ТребуетсяПроверка = Не СтатусВернаУстановленВручную И ПодписиТребуютПроверки
|
||||||
|
Или ЗначениеЗаполнено(Результат.ОшибкаПроверкиВРеестреФНС);
|
||||||
|
Иначе
|
||||||
|
|
||||||
|
РезультатПроверкиДоверенности.Верна = Результат.СтатусВернаИзДанныхДоверенности;
|
||||||
|
РезультатПроверкиДоверенности.ТребуетсяПроверка = Не ЗначениеЗаполнено(Результат.ДатаПроверкиИзДанныхДоверенности)
|
||||||
|
Или ЗначениеЗаполнено(Результат.ОшибкаПроверкиВРеестреФНС);
|
||||||
|
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
Если Результат.Статус = ПредопределенноеЗначение("Перечисление.СтатусыМЧД.Действует")
|
Если Результат.Статус = ПредопределенноеЗначение("Перечисление.СтатусыМЧД.Действует")
|
||||||
И Не РезультатПроверкиДоверенности.Верна Тогда
|
И Не РезультатПроверкиДоверенности.Верна Тогда
|
||||||
@@ -442,37 +483,119 @@
|
|||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
Если Не РезультатПроверкиДоверенности.Верна Или СтатусВернаУстановленВручную Тогда
|
Если Не РезультатПроверкиДоверенности.Верна Или СтатусВернаУстановленВручную Тогда
|
||||||
|
|
||||||
Ошибки = Новый Массив;
|
Ошибки = Новый Массив;
|
||||||
|
|
||||||
Если СтатусВернаУстановленВручную Тогда
|
Если СтатусВернаУстановленВручную Тогда
|
||||||
Ошибки.Добавить(СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
|
|
||||||
НСтр("ru='Статус Верна установлен вручную (%1)'"), Результат.УстановившийСтатусВерна));
|
ОписаниеОшибки = НовыеСвойстваОшибки();
|
||||||
Иначе
|
ОписаниеОшибки.Описание = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
|
||||||
|
НСтр("ru='Статус Верна установлен вручную (%1)'"), Результат.УстановившийСтатусВерна);
|
||||||
|
ОписаниеОшибок.Ошибки.Добавить(ОписаниеОшибки);
|
||||||
|
|
||||||
|
Ошибки.Добавить(ОписаниеОшибки.Описание);
|
||||||
|
|
||||||
|
ИначеЕсли Результат.ВыполненаПроверкаПодписей Тогда
|
||||||
|
|
||||||
Если ПодписиТребуютПроверки Тогда
|
Если ПодписиТребуютПроверки Тогда
|
||||||
Ошибки.Добавить(НСтр("ru='Есть подписи доверителей, требующие проверки'"));
|
|
||||||
|
ОписаниеОшибки = НовыеСвойстваОшибки();
|
||||||
|
ОписаниеОшибки.Описание = НСтр("ru='Есть подписи доверителей, требующие проверки'");
|
||||||
|
ОписаниеОшибок.Ошибки.Добавить(ОписаниеОшибки);
|
||||||
|
Ошибки.Добавить(ОписаниеОшибки.Описание);
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
Если Не ПодписиВерны Тогда
|
Если Не ПодписиВерны Тогда
|
||||||
Ошибки.Добавить(НСтр("ru='Есть недействительные подписи доверителей'"));
|
|
||||||
|
ОписаниеОшибки = НовыеСвойстваОшибки();
|
||||||
|
ОписаниеОшибки.Описание = НСтр("ru='Есть недействительные подписи доверителей'");
|
||||||
|
ОписаниеОшибок.Ошибки.Добавить(ОписаниеОшибки);
|
||||||
|
Ошибки.Добавить(ОписаниеОшибки.Описание);
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
Если Не ПодписиСоответствуют Тогда
|
Если Не ПодписиСоответствуют Тогда
|
||||||
Ошибки.Добавить(НСтр("ru='Есть подписи доверителей, не соответствующие доверенности'"));
|
|
||||||
|
ОписаниеОшибки = НовыеСвойстваОшибки();
|
||||||
|
ОписаниеОшибки.Описание = НСтр("ru='Есть подписи доверителей, не соответствующие доверенности'");
|
||||||
|
ОписаниеОшибок.Ошибки.Добавить(ОписаниеОшибки);
|
||||||
|
Ошибки.Добавить(ОписаниеОшибки.Описание);
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
Если Не РезультатПроверкиПодписей.ЕстьВсеПодписи Тогда
|
Если Не РезультатПроверкиПодписей.ЕстьВсеПодписи Тогда
|
||||||
Ошибки.Добавить(РезультатПроверкиПодписей.ТекстОшибки);
|
|
||||||
|
ОписаниеОшибки = НовыеСвойстваОшибки();
|
||||||
|
ОписаниеОшибки.Описание = РезультатПроверкиПодписей.ТекстОшибки;
|
||||||
|
ОписаниеОшибок.Ошибки.Добавить(ОписаниеОшибки);
|
||||||
|
Ошибки.Добавить(ОписаниеОшибки.Описание);
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
|
ИначеЕсли Не ЗначениеЗаполнено(Результат.ДатаПроверкиИзДанныхДоверенности) Тогда
|
||||||
|
|
||||||
|
ОписаниеОшибки = НовыеСвойстваОшибки();
|
||||||
|
ОписаниеОшибки.Описание = НСтр("ru='Статус доверенности в программе - требуется проверка'");
|
||||||
|
ОписаниеОшибок.Ошибки.Добавить(ОписаниеОшибки);
|
||||||
|
Ошибки.Добавить(ОписаниеОшибки.Описание);
|
||||||
|
Иначе
|
||||||
|
|
||||||
|
ОписаниеОшибки = НовыеСвойстваОшибки();
|
||||||
|
ОписаниеОшибки.Описание = НСтр("ru='Статус доверенности в программе - не верна'");
|
||||||
|
ОписаниеОшибок.Ошибки.Добавить(ОписаниеОшибки);
|
||||||
|
Ошибки.Добавить(ОписаниеОшибки.Описание);
|
||||||
|
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
Если ЗначениеЗаполнено(Результат.ОшибкаПроверкиВРеестреФНС) Тогда
|
Если ЗначениеЗаполнено(Результат.ОшибкаПроверкиВРеестреФНС) Тогда
|
||||||
Ошибки.Добавить(СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
|
|
||||||
НСтр("ru='Не удалось проверить доверенность в реестре ФНС: %1'"),
|
ОписаниеОшибки = НовыеСвойстваОшибки();
|
||||||
Результат.ОшибкаПроверкиВРеестреФНС));
|
ОписаниеОшибки.Описание = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
|
||||||
|
НСтр("ru='Не удалось проверить доверенность в реестре ФНС: %1'"), Результат.ОшибкаПроверкиВРеестреФНС);
|
||||||
|
ОписаниеОшибок.Ошибки.Добавить(ОписаниеОшибки);
|
||||||
|
Ошибки.Добавить(ОписаниеОшибки.Описание);
|
||||||
|
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
РезультатПроверкиДоверенности.ТекстОшибки = СтрСоединить(Ошибки, Символы.ПС);
|
|
||||||
|
РезультатПроверкиДоверенности.ОписаниеОшибок = ОписаниеОшибок;
|
||||||
|
РезультатПроверкиДоверенности.ТекстОшибки = СтрСоединить(Ошибки, "; ");
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
Возврат РезультатПроверкиДоверенности;
|
Возврат РезультатПроверкиДоверенности;
|
||||||
|
|
||||||
КонецФункции
|
КонецФункции
|
||||||
|
|
||||||
|
// Возвращаемое значение:
|
||||||
|
// Структура - содержит ошибки выполнения проверок:
|
||||||
|
// * ОписаниеОшибки - Строка - полное описание ошибки, когда оно возвращается строкой.
|
||||||
|
// * ЗаголовокОшибки - Строка - заголовок ошибки, который соответствует операции
|
||||||
|
// когда операция одна (не заполнен, когда операций несколько).
|
||||||
|
// * Ошибки - Массив из см. НовыеСвойстваОшибки
|
||||||
|
//
|
||||||
|
Функция НовоеОписаниеОшибок() Экспорт
|
||||||
|
|
||||||
|
Описание = Новый Структура;
|
||||||
|
Описание.Вставить("ОписаниеОшибки", "");
|
||||||
|
Описание.Вставить("ЗаголовокОшибки", "");
|
||||||
|
Описание.Вставить("Ошибки", Новый Массив);
|
||||||
|
|
||||||
|
Возврат Описание;
|
||||||
|
|
||||||
|
КонецФункции
|
||||||
|
|
||||||
|
// Возвращает свойства ошибки выполнения одной проверки.
|
||||||
|
//
|
||||||
|
// Возвращаемое значение:
|
||||||
|
// Структура:
|
||||||
|
// * ЗаголовокОшибки - Строка - заголовок ошибки, который соответствует операции
|
||||||
|
// когда операций несколько (не заполнен, когда операция одна).
|
||||||
|
// * Описание - Строка - краткое представление ошибки.
|
||||||
|
//
|
||||||
|
Функция НовыеСвойстваОшибки() Экспорт
|
||||||
|
|
||||||
|
СвойстваОшибки = Новый Структура;
|
||||||
|
СвойстваОшибки.Вставить("ЗаголовокОшибки", "");
|
||||||
|
СвойстваОшибки.Вставить("Описание", "");
|
||||||
|
|
||||||
|
Возврат СвойстваОшибки;
|
||||||
|
|
||||||
|
КонецФункции
|
||||||
|
|
||||||
#КонецОбласти
|
#КонецОбласти
|
||||||
@@ -1079,7 +1079,7 @@
|
|||||||
Если ПолноеИмяДокумента = Неопределено Тогда
|
Если ПолноеИмяДокумента = Неопределено Тогда
|
||||||
Если ДополнительныеПараметры.ВыбиратьПорциями Тогда
|
Если ДополнительныеПараметры.ВыбиратьПорциями Тогда
|
||||||
ТекстЗапроса =
|
ТекстЗапроса =
|
||||||
"ВЫБРАТЬ ПЕРВЫЕ 10000
|
"ВЫБРАТЬ ПЕРВЫЕ 1000
|
||||||
| ТаблицаРегистраИзменения.Регистратор КАК Регистратор,
|
| ТаблицаРегистраИзменения.Регистратор КАК Регистратор,
|
||||||
| МАКСИМУМ(ЕСТЬNULL(ТаблицаРегистра.Период, ДАТАВРЕМЯ(3000, 1, 1))) КАК Период
|
| МАКСИМУМ(ЕСТЬNULL(ТаблицаРегистра.Период, ДАТАВРЕМЯ(3000, 1, 1))) КАК Период
|
||||||
|ПОМЕСТИТЬ #ВТДляОбработкиРегистратор
|
|ПОМЕСТИТЬ #ВТДляОбработкиРегистратор
|
||||||
@@ -1141,7 +1141,7 @@
|
|||||||
Иначе
|
Иначе
|
||||||
ФрагментыЗапроса = Новый Массив;
|
ФрагментыЗапроса = Новый Массив;
|
||||||
ФрагментЗапроса =
|
ФрагментЗапроса =
|
||||||
"ВЫБРАТЬ ПЕРВЫЕ 10000
|
"ВЫБРАТЬ ПЕРВЫЕ 1000
|
||||||
| ТаблицаДокумента.Ссылка КАК Регистратор
|
| ТаблицаДокумента.Ссылка КАК Регистратор
|
||||||
|ПОМЕСТИТЬ #ВТДляОбработкиРегистратор
|
|ПОМЕСТИТЬ #ВТДляОбработкиРегистратор
|
||||||
|ИЗ
|
|ИЗ
|
||||||
@@ -1275,7 +1275,7 @@
|
|||||||
ЕстьФильтр = Ложь;
|
ЕстьФильтр = Ложь;
|
||||||
Если ПолноеИмяДокумента = Неопределено Тогда
|
Если ПолноеИмяДокумента = Неопределено Тогда
|
||||||
ТекстЗапроса =
|
ТекстЗапроса =
|
||||||
"ВЫБРАТЬ ПЕРВЫЕ 10000
|
"ВЫБРАТЬ ПЕРВЫЕ 1000
|
||||||
| &ВыбираемыеПоля
|
| &ВыбираемыеПоля
|
||||||
|ИЗ
|
|ИЗ
|
||||||
| #ТаблицаРегистраИзменения КАК ТаблицаРегистраИзменения
|
| #ТаблицаРегистраИзменения КАК ТаблицаРегистраИзменения
|
||||||
@@ -1310,7 +1310,7 @@
|
|||||||
УстановитьПоляУпорядочиванияРегистра(ПараметрыПостроения);
|
УстановитьПоляУпорядочиванияРегистра(ПараметрыПостроения);
|
||||||
Иначе
|
Иначе
|
||||||
ТекстЗапроса =
|
ТекстЗапроса =
|
||||||
"ВЫБРАТЬ ПЕРВЫЕ 10000
|
"ВЫБРАТЬ ПЕРВЫЕ 1000
|
||||||
| &ВыбираемыеПоля
|
| &ВыбираемыеПоля
|
||||||
|ИЗ
|
|ИЗ
|
||||||
| #ТаблицаРегистраИзменения КАК ТаблицаРегистраИзменения
|
| #ТаблицаРегистраИзменения КАК ТаблицаРегистраИзменения
|
||||||
@@ -1439,7 +1439,7 @@
|
|||||||
ПараметрыПостроения = ПараметрыПостроенияВыборки(ДополнительныеПараметры);
|
ПараметрыПостроения = ПараметрыПостроенияВыборки(ДополнительныеПараметры);
|
||||||
|
|
||||||
ТекстЗапроса =
|
ТекстЗапроса =
|
||||||
"ВЫБРАТЬ ПЕРВЫЕ 10000
|
"ВЫБРАТЬ ПЕРВЫЕ 1000
|
||||||
| &ВыбираемыеПоля
|
| &ВыбираемыеПоля
|
||||||
|ИЗ
|
|ИЗ
|
||||||
| #ТаблицаОбъектаИзменения КАК ТаблицаИзменений
|
| #ТаблицаОбъектаИзменения КАК ТаблицаИзменений
|
||||||
@@ -1555,7 +1555,7 @@
|
|||||||
ФрагментыЗапроса = Новый Массив;
|
ФрагментыЗапроса = Новый Массив;
|
||||||
|
|
||||||
ФрагментЗапроса =
|
ФрагментЗапроса =
|
||||||
"ВЫБРАТЬ ПЕРВЫЕ 10000
|
"ВЫБРАТЬ ПЕРВЫЕ 1000
|
||||||
| ТаблицаОбъекта.Ссылка КАК Ссылка
|
| ТаблицаОбъекта.Ссылка КАК Ссылка
|
||||||
|ПОМЕСТИТЬ #ВТДляОбработкиСсылка
|
|ПОМЕСТИТЬ #ВТДляОбработкиСсылка
|
||||||
|ИЗ
|
|ИЗ
|
||||||
@@ -1576,7 +1576,7 @@
|
|||||||
| И &УсловиеАктуальныеДанные";
|
| И &УсловиеАктуальныеДанные";
|
||||||
|
|
||||||
Если Не ДополнительныеПараметры.ВыбиратьПорциями Тогда
|
Если Не ДополнительныеПараметры.ВыбиратьПорциями Тогда
|
||||||
ФрагментЗапроса = СтрЗаменить(ФрагментЗапроса, "ВЫБРАТЬ ПЕРВЫЕ 10000", "ВЫБРАТЬ"); // @query-part-1 @query-part-2
|
ФрагментЗапроса = СтрЗаменить(ФрагментЗапроса, "ВЫБРАТЬ ПЕРВЫЕ 1000", "ВЫБРАТЬ"); // @query-part-1 @query-part-2
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
ФильтрАктуальныхДанных = ОбновлениеИнформационнойБазыСлужебный.ФильтрАктуальныхДанных(Неопределено, "ТаблицаОбъекта");
|
ФильтрАктуальныхДанных = ОбновлениеИнформационнойБазыСлужебный.ФильтрАктуальныхДанных(Неопределено, "ТаблицаОбъекта");
|
||||||
@@ -1693,7 +1693,7 @@
|
|||||||
|
|
||||||
Запрос = Новый Запрос;
|
Запрос = Новый Запрос;
|
||||||
ТекстЗапроса =
|
ТекстЗапроса =
|
||||||
"ВЫБРАТЬ ПЕРВЫЕ 10000
|
"ВЫБРАТЬ ПЕРВЫЕ 1000
|
||||||
| &ВыбираемыеПоля
|
| &ВыбираемыеПоля
|
||||||
|ИЗ
|
|ИЗ
|
||||||
| #ТаблицаОбъектаИзменения КАК ТаблицаИзменений
|
| #ТаблицаОбъектаИзменения КАК ТаблицаИзменений
|
||||||
@@ -1819,7 +1819,7 @@
|
|||||||
|
|
||||||
Запрос = Новый Запрос;
|
Запрос = Новый Запрос;
|
||||||
ТекстЗапроса =
|
ТекстЗапроса =
|
||||||
"ВЫБРАТЬ ПЕРВЫЕ 10000
|
"ВЫБРАТЬ ПЕРВЫЕ 1000
|
||||||
| &ТекстВыборкиИзмерений
|
| &ТекстВыборкиИзмерений
|
||||||
|ПОМЕСТИТЬ #ВТДляОбработкиИзмерения
|
|ПОМЕСТИТЬ #ВТДляОбработкиИзмерения
|
||||||
|ИЗ
|
|ИЗ
|
||||||
@@ -1836,7 +1836,7 @@
|
|||||||
|УНИЧТОЖИТЬ #ВТЗаблокированоИзмерения";
|
|УНИЧТОЖИТЬ #ВТЗаблокированоИзмерения";
|
||||||
|
|
||||||
Если Не ДополнительныеПараметры.ВыбиратьПорциями Тогда
|
Если Не ДополнительныеПараметры.ВыбиратьПорциями Тогда
|
||||||
ТекстЗапроса = СтрЗаменить(ТекстЗапроса, "ВЫБРАТЬ ПЕРВЫЕ 10000", "ВЫБРАТЬ"); // @query-part-1 @query-part-2
|
ТекстЗапроса = СтрЗаменить(ТекстЗапроса, "ВЫБРАТЬ ПЕРВЫЕ 1000", "ВЫБРАТЬ"); // @query-part-1 @query-part-2
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
ИзмеренияСОсновнымОтбором = Новый Массив;
|
ИзмеренияСОсновнымОтбором = Новый Массив;
|
||||||
@@ -3319,11 +3319,11 @@
|
|||||||
// Максимальное количество записей в выборке данных для обновления.
|
// Максимальное количество записей в выборке данных для обновления.
|
||||||
//
|
//
|
||||||
// Возвращаемое значение:
|
// Возвращаемое значение:
|
||||||
// Число - константа 10000.
|
// Число - константа 1000.
|
||||||
//
|
//
|
||||||
Функция МаксимальноеКоличествоЗаписейВВыборке() Экспорт
|
Функция МаксимальноеКоличествоЗаписейВВыборке() Экспорт
|
||||||
|
|
||||||
Возврат 10000;
|
Возврат 1000;
|
||||||
|
|
||||||
КонецФункции
|
КонецФункции
|
||||||
|
|
||||||
@@ -3346,7 +3346,16 @@
|
|||||||
НаборДанных = Параметры.ОбновляемыеДанные.НаборДанных;
|
НаборДанных = Параметры.ОбновляемыеДанные.НаборДанных;
|
||||||
|
|
||||||
Если НаборДанных.Количество() > 0 Тогда
|
Если НаборДанных.Количество() > 0 Тогда
|
||||||
Данные = НаборДанных[0].Данные;
|
Данные = НаборДанных[0].Данные.Скопировать();
|
||||||
|
|
||||||
|
Для Индекс = 1 По НаборДанных.Количество() - 1 Цикл
|
||||||
|
Набор = НаборДанных[Индекс];
|
||||||
|
|
||||||
|
Для Каждого ДанныеНабора Из Набор.Данные Цикл
|
||||||
|
СтрокаДанных = Данные.Добавить();
|
||||||
|
ЗаполнитьЗначенияСвойств(СтрокаДанных, ДанныеНабора);
|
||||||
|
КонецЦикла;
|
||||||
|
КонецЦикла;
|
||||||
|
|
||||||
Если Данные.Количество() > 0 Тогда
|
Если Данные.Количество() > 0 Тогда
|
||||||
Возврат Данные;
|
Возврат Данные;
|
||||||
@@ -6023,7 +6032,7 @@
|
|||||||
Процедура УстановитьРазмерВыборки(ТекстЗапроса, Параметры)
|
Процедура УстановитьРазмерВыборки(ТекстЗапроса, Параметры)
|
||||||
|
|
||||||
РазмерВыборки = ?(Параметры.ВыбиратьПорциями, Параметры.МаксимумВыборки, Неопределено);
|
РазмерВыборки = ?(Параметры.ВыбиратьПорциями, Параметры.МаксимумВыборки, Неопределено);
|
||||||
ИзменитьМаксимумВыборки(ТекстЗапроса, 10000, РазмерВыборки);
|
ИзменитьМаксимумВыборки(ТекстЗапроса, 1000, РазмерВыборки);
|
||||||
|
|
||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
|
|||||||
@@ -45,7 +45,7 @@
|
|||||||
Процедура ПриДобавленииПодсистемы(Описание) Экспорт
|
Процедура ПриДобавленииПодсистемы(Описание) Экспорт
|
||||||
|
|
||||||
Описание.Имя = "СтандартныеПодсистемы";
|
Описание.Имя = "СтандартныеПодсистемы";
|
||||||
Описание.Версия = "3.1.9.162";
|
Описание.Версия = "3.1.9.179";
|
||||||
Описание.ИдентификаторИнтернетПоддержки = "SSL";
|
Описание.ИдентификаторИнтернетПоддержки = "SSL";
|
||||||
Описание.РежимВыполненияОтложенныхОбработчиков = "Параллельно";
|
Описание.РежимВыполненияОтложенныхОбработчиков = "Параллельно";
|
||||||
Описание.ПараллельноеОтложенноеОбновлениеСВерсии = "2.3.3.0";
|
Описание.ПараллельноеОтложенноеОбновлениеСВерсии = "2.3.3.0";
|
||||||
|
|||||||
@@ -587,7 +587,6 @@
|
|||||||
ОбработчикиВыполнялись = ВыполнитьОтложенныйОбработчикОбновления(ПараметрыОбновления); // @skip-check query-in-loop - выполнение отложенных обработчиков.
|
ОбработчикиВыполнялись = ВыполнитьОтложенныйОбработчикОбновления(ПараметрыОбновления); // @skip-check query-in-loop - выполнение отложенных обработчиков.
|
||||||
|
|
||||||
ОчередиДляОчистки = ОчередиДляОчистки(Обработанные); // @skip-check query-in-loop - получение актуальных данных об обработанных очередях.
|
ОчередиДляОчистки = ОчередиДляОчистки(Обработанные); // @skip-check query-in-loop - получение актуальных данных об обработанных очередях.
|
||||||
ОбщегоНазначенияКлиентСервер.РазностьМассивов(ОчередиДляОчистки, Обработанные);
|
|
||||||
ОчиститьОбработанныеОчереди(ОчередиДляОчистки, Обработанные, СведенияОбОбновлении);
|
ОчиститьОбработанныеОчереди(ОчередиДляОчистки, Обработанные, СведенияОбОбновлении);
|
||||||
|
|
||||||
Если ОбработчикиВыполнялись Тогда
|
Если ОбработчикиВыполнялись Тогда
|
||||||
@@ -3696,7 +3695,6 @@
|
|||||||
Поток = ДобавитьПотокОбработчикаОтложенногоОбновления(СведенияОбОбновлении); // @skip-check query-in-loop - многопоточное обновление.
|
Поток = ДобавитьПотокОбработчикаОтложенногоОбновления(СведенияОбОбновлении); // @skip-check query-in-loop - многопоточное обновление.
|
||||||
|
|
||||||
ОчередиДляОчистки = ОчередиДляОчистки(Обработанные); // @skip-check query-in-loop - получение актуальных данных об обработанных очередях.
|
ОчередиДляОчистки = ОчередиДляОчистки(Обработанные); // @skip-check query-in-loop - получение актуальных данных об обработанных очередях.
|
||||||
ОбщегоНазначенияКлиентСервер.РазностьМассивов(ОчередиДляОчистки, Обработанные);
|
|
||||||
ОчиститьОбработанныеОчереди(ОчередиДляОчистки, Обработанные, СведенияОбОбновлении);
|
ОчиститьОбработанныеОчереди(ОчередиДляОчистки, Обработанные, СведенияОбОбновлении);
|
||||||
|
|
||||||
Если ТипЗнч(Поток) = Тип("СтрокаТаблицыЗначений") Тогда
|
Если ТипЗнч(Поток) = Тип("СтрокаТаблицыЗначений") Тогда
|
||||||
@@ -5636,6 +5634,12 @@
|
|||||||
ПараметрыВыборки.ОптимизироватьВыборкуПоСтраницам = Не ЕстьУпорядочиваниеПоВнешнимТаблицам(ПоляУпорядочивания);
|
ПараметрыВыборки.ОптимизироватьВыборкуПоСтраницам = Не ЕстьУпорядочиваниеПоВнешнимТаблицам(ПоляУпорядочивания);
|
||||||
Максимум = ОбновлениеИнформационнойБазы.МаксимальноеКоличествоЗаписейВВыборке();
|
Максимум = ОбновлениеИнформационнойБазы.МаксимальноеКоличествоЗаписейВВыборке();
|
||||||
ПараметрыОбхода = ПараметрыОбходаДанныхДляОбновления(ПараметрыПоиска);
|
ПараметрыОбхода = ПараметрыОбходаДанныхДляОбновления(ПараметрыПоиска);
|
||||||
|
ПоискСНачала = ПараметрыПоиска.ПоследняяВыбраннаяЗапись = Неопределено И ПараметрыПоиска.ПерваяЗапись = Неопределено;
|
||||||
|
|
||||||
|
Если Не ПоискСНачала Тогда
|
||||||
|
СледующиеПараметрыОбхода(ПараметрыОбхода, Ложь);
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
ИтераторОбхода = ТекущиеПараметрыОбхода(ПараметрыОбхода);
|
ИтераторОбхода = ТекущиеПараметрыОбхода(ПараметрыОбхода);
|
||||||
РезультатПоиска = НовыйРезультатПоискаПорции();
|
РезультатПоиска = НовыйРезультатПоискаПорции();
|
||||||
НаборДанных = НовыйНаборДанныхДляОбновления();
|
НаборДанных = НовыйНаборДанныхДляОбновления();
|
||||||
@@ -6289,7 +6293,7 @@
|
|||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
КонецЦикла;
|
КонецЦикла;
|
||||||
|
|
||||||
Фрагмент.ПерваяЗапись = КлючЗаписиПервойСтрокиНабораДанных(Фрагмент.НаборДанных);
|
Фрагмент.ПерваяЗапись = КлючЗаписиПоследнейСтрокиНабораДанных(Фрагмент.НаборДанных);
|
||||||
КонецЦикла;
|
КонецЦикла;
|
||||||
|
|
||||||
Возврат Фрагменты;
|
Возврат Фрагменты;
|
||||||
@@ -10321,6 +10325,8 @@
|
|||||||
ИтераторОбхода = ТекущиеПараметрыОбхода(ПараметрыОбхода);
|
ИтераторОбхода = ТекущиеПараметрыОбхода(ПараметрыОбхода);
|
||||||
ДополнительныеИсточникиДанных = ПараметрыВыборки.ДополнительныеИсточникиДанных;
|
ДополнительныеИсточникиДанных = ПараметрыВыборки.ДополнительныеИсточникиДанных;
|
||||||
|
|
||||||
|
ИсходныеПараметрыОбработчика = КонтекстОбработчика.ПараметрыОбработчикаОбновления;
|
||||||
|
|
||||||
Пока ИтераторОбхода <> Неопределено Цикл
|
Пока ИтераторОбхода <> Неопределено Цикл
|
||||||
ОбработчикВыполнилсяБезОшибок = Ложь;
|
ОбработчикВыполнилсяБезОшибок = Ложь;
|
||||||
СсылочныйОбъект = ИтераторОбхода.СсылочныйОбъект;
|
СсылочныйОбъект = ИтераторОбхода.СсылочныйОбъект;
|
||||||
@@ -10364,6 +10370,9 @@
|
|||||||
Прервать;
|
Прервать;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
|
// Сброс параметров обработчика перед выполнением следующей порции.
|
||||||
|
КонтекстОбработчика.ПараметрыОбработчикаОбновления = ИсходныеПараметрыОбработчика;
|
||||||
|
|
||||||
Если Количество > 0 Тогда
|
Если Количество > 0 Тогда
|
||||||
ОбрабатываемыеДанные.ПоследняяВыбраннаяЗапись = КлючЗаписиПоследнейСтрокиНабораДанных(НаборДанных);
|
ОбрабатываемыеДанные.ПоследняяВыбраннаяЗапись = КлючЗаписиПоследнейСтрокиНабораДанных(НаборДанных);
|
||||||
Иначе
|
Иначе
|
||||||
@@ -11843,6 +11852,7 @@
|
|||||||
Запрос.УстановитьПараметр("РежимВыполнения", Перечисления.РежимыВыполненияОбработчиков.Отложенно);
|
Запрос.УстановитьПараметр("РежимВыполнения", Перечисления.РежимыВыполненияОбработчиков.Отложенно);
|
||||||
Запрос.УстановитьПараметр("Статус", Перечисления.СтатусыОбработчиковОбновления.Выполнен);
|
Запрос.УстановитьПараметр("Статус", Перечисления.СтатусыОбработчиковОбновления.Выполнен);
|
||||||
Запрос.УстановитьПараметр("РежимВыполненияОтложенногоОбработчика", Перечисления.РежимыВыполненияОтложенныхОбработчиков.Параллельно);
|
Запрос.УстановитьПараметр("РежимВыполненияОтложенногоОбработчика", Перечисления.РежимыВыполненияОтложенныхОбработчиков.Параллельно);
|
||||||
|
Запрос.УстановитьПараметр("Обработанные", Обработанные);
|
||||||
Запрос.Текст =
|
Запрос.Текст =
|
||||||
"ВЫБРАТЬ РАЗЛИЧНЫЕ
|
"ВЫБРАТЬ РАЗЛИЧНЫЕ
|
||||||
| ОбработчикиОбновления.ОчередьОтложеннойОбработки КАК Очередь
|
| ОбработчикиОбновления.ОчередьОтложеннойОбработки КАК Очередь
|
||||||
@@ -11852,6 +11862,7 @@
|
|||||||
| ОбработчикиОбновления.РежимВыполнения = &РежимВыполнения
|
| ОбработчикиОбновления.РежимВыполнения = &РежимВыполнения
|
||||||
| И ОбработчикиОбновления.РежимВыполненияОтложенногоОбработчика = &РежимВыполненияОтложенногоОбработчика
|
| И ОбработчикиОбновления.РежимВыполненияОтложенногоОбработчика = &РежимВыполненияОтложенногоОбработчика
|
||||||
| И ОбработчикиОбновления.Статус = &Статус
|
| И ОбработчикиОбновления.Статус = &Статус
|
||||||
|
| И НЕ ОбработчикиОбновления.ОчередьОтложеннойОбработки В (&Обработанные)
|
||||||
| И НЕ ИСТИНА В
|
| И НЕ ИСТИНА В
|
||||||
| (ВЫБРАТЬ ПЕРВЫЕ 1
|
| (ВЫБРАТЬ ПЕРВЫЕ 1
|
||||||
| ИСТИНА
|
| ИСТИНА
|
||||||
|
|||||||
@@ -2250,69 +2250,9 @@
|
|||||||
ОбщиеПараметры.МинимальнаяВерсияПлатформы = НомерСборкиПоТекущейВерсииПлатформы(ОбщиеПараметры.МинимальнаяВерсияПлатформы);
|
ОбщиеПараметры.МинимальнаяВерсияПлатформы = НомерСборкиПоТекущейВерсииПлатформы(ОбщиеПараметры.МинимальнаяВерсияПлатформы);
|
||||||
ОбщиеПараметры.РекомендуемаяВерсияПлатформы = НомерСборкиПоТекущейВерсииПлатформы(ОбщиеПараметры.РекомендуемаяВерсияПлатформы);
|
ОбщиеПараметры.РекомендуемаяВерсияПлатформы = НомерСборкиПоТекущейВерсииПлатформы(ОбщиеПараметры.РекомендуемаяВерсияПлатформы);
|
||||||
|
|
||||||
// Обновление минимальной и рекомендуемой версии платформы по данным сервиса
|
// Локализация
|
||||||
Если ПодсистемаСуществует("ИнтернетПоддержкаПользователей.ПолучениеОбновленийПрограммы") Тогда
|
УточнитьМинимальнуюВерсиюПлатформыИзСервиса(ОбщиеПараметры);
|
||||||
|
// Конец Локализация
|
||||||
// Проверка версии БИП начиная с которой появился программный интерфейс
|
|
||||||
МодульИнтернетПоддержкаПользователейКлиентСервер = ОбщийМодуль("ИнтернетПоддержкаПользователейКлиентСервер");
|
|
||||||
ВерсияБИП = МодульИнтернетПоддержкаПользователейКлиентСервер.ВерсияБиблиотеки();
|
|
||||||
|
|
||||||
Если ОбщегоНазначенияКлиентСервер.СравнитьВерсии(ВерсияБИП, "2.7.1.35") > 0 Тогда
|
|
||||||
|
|
||||||
// Попытка получить данные версий платформы из кеша и переопределить их
|
|
||||||
Попытка
|
|
||||||
|
|
||||||
МодульПолучениеОбновленийПрограммы = ОбщийМодуль("ПолучениеОбновленийПрограммы");
|
|
||||||
ИнформацияОВерсияхПлатформы = МодульПолучениеОбновленийПрограммы.ИнформацияОВерсияхПлатформы();
|
|
||||||
|
|
||||||
// Контроль заполнения версий платформы по данным сервиса
|
|
||||||
Если Не ПустаяСтрока(ИнформацияОВерсияхПлатформы.МинимальнаяВерсияПлатформы)
|
|
||||||
Или Не ПустаяСтрока(ИнформацияОВерсияхПлатформы.РекомендуемаяВерсияПлатформы) Тогда
|
|
||||||
|
|
||||||
Минимальная = НомерСборкиПоТекущейВерсииПлатформы(ИнформацияОВерсияхПлатформы.МинимальнаяВерсияПлатформы);
|
|
||||||
Рекомендуемая = НомерСборкиПоТекущейВерсииПлатформы(ИнформацияОВерсияхПлатформы.РекомендуемаяВерсияПлатформы);
|
|
||||||
|
|
||||||
Если МинимальнаяИРекомендуемаяВерсияПлатформыЗаполненаНеПравильно(Минимальная, Рекомендуемая) Тогда
|
|
||||||
|
|
||||||
МодульПолучениеОбновленийПрограммы.УдалитьИнформациюОВерсияхПлатформы();
|
|
||||||
ТекстСообщения = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
|
|
||||||
НСтр("ru = 'Минимальная и рекомендуемая версии платформы ""1С:Предприятие"", полученные с сервиса обновления программ, не соответствуют следующим требованиям:
|
|
||||||
| - минимальная версия должна быть заполнена;
|
|
||||||
| - минимальная версия не должна быть меньше минимальной версии БСП (см. %1);
|
|
||||||
| - минимальная версия не должна быть меньше рекомендуемой версии.
|
|
||||||
|Минимальная версия сервиса обновления программ: %2
|
|
||||||
|Минимальная версия БСП: %3
|
|
||||||
|Рекомендуемая версия сервиса обновления программ: %4
|
|
||||||
|
|
|
||||||
|Минимальная и рекомендуемая версия платформы ""1С:Предприятие"" установлена по данным см. %5.
|
|
||||||
|Минимальная версия: %6
|
|
||||||
|Рекомендуемая версия: %7'",
|
|
||||||
КодОсновногоЯзыка()),
|
|
||||||
"ОбщегоНазначения.МинимальнаяВерсияПлатформы", Минимальная, НомерСборкиПоТекущейВерсииПлатформы(МинимальнаяВерсияПлатформы()),
|
|
||||||
Рекомендуемая, "ОбщегоНазначенияПереопределяемый.ПриОпределенииОбщихПараметровБазовойФункциональности",
|
|
||||||
ОбщиеПараметры.МинимальнаяВерсияПлатформы, ОбщиеПараметры.РекомендуемаяВерсияПлатформы);
|
|
||||||
ЗаписьЖурналаРегистрации(НСтр("ru = 'Базовая функциональность'", КодОсновногоЯзыка()), УровеньЖурналаРегистрации.Предупреждение,,,
|
|
||||||
ТекстСообщения);
|
|
||||||
|
|
||||||
Иначе
|
|
||||||
ОбщиеПараметры.МинимальнаяВерсияПлатформы = Минимальная;
|
|
||||||
ОбщиеПараметры.РекомендуемаяВерсияПлатформы = Рекомендуемая;
|
|
||||||
КонецЕсли;
|
|
||||||
|
|
||||||
КонецЕсли;
|
|
||||||
|
|
||||||
Исключение
|
|
||||||
ТекстСообщения = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
|
|
||||||
НСтр("ru = 'Не удалось изменить минимальную и рекомендуемую версию платформы ""1С:Предприятие"", полученную с сервиса обновления программ, по причине:
|
|
||||||
|%1'",
|
|
||||||
КодОсновногоЯзыка()), ОбработкаОшибок.ПодробноеПредставлениеОшибки(ИнформацияОбОшибке()));
|
|
||||||
ЗаписьЖурналаРегистрации(НСтр("ru = 'Базовая функциональность'", КодОсновногоЯзыка()), УровеньЖурналаРегистрации.Предупреждение,,,
|
|
||||||
ТекстСообщения);
|
|
||||||
КонецПопытки;
|
|
||||||
|
|
||||||
КонецЕсли;
|
|
||||||
|
|
||||||
КонецЕсли;
|
|
||||||
|
|
||||||
СистемнаяИнформация = Новый СистемнаяИнформация;
|
СистемнаяИнформация = Новый СистемнаяИнформация;
|
||||||
Если ОбщегоНазначенияКлиентСервер.СравнитьВерсии(СистемнаяИнформация.ВерсияПриложения, ОбщиеПараметры.МинимальнаяВерсияПлатформы) < 0
|
Если ОбщегоНазначенияКлиентСервер.СравнитьВерсии(СистемнаяИнформация.ВерсияПриложения, ОбщиеПараметры.МинимальнаяВерсияПлатформы) < 0
|
||||||
@@ -2332,10 +2272,12 @@
|
|||||||
|Минимальная версия БСП: %4
|
|Минимальная версия БСП: %4
|
||||||
|Рекомендуемая версия: %5'",
|
|Рекомендуемая версия: %5'",
|
||||||
КодОсновногоЯзыка());
|
КодОсновногоЯзыка());
|
||||||
ВызватьИсключение СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(ТекстСообщения,
|
ТекстСообщения = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(ТекстСообщения,
|
||||||
"ОбщегоНазначенияПереопределяемый.ПриОпределенииОбщихПараметровБазовойФункциональности",
|
"ОбщегоНазначенияПереопределяемый.ПриОпределенииОбщихПараметровБазовойФункциональности",
|
||||||
"ОбщегоНазначения.МинимальнаяВерсияПлатформы",
|
"ОбщегоНазначения.МинимальнаяВерсияПлатформы",
|
||||||
Минимальная, НомерСборкиПоТекущейВерсииПлатформы(МинимальнаяВерсияПлатформы()), Рекомендуемая);
|
Минимальная, НомерСборкиПоТекущейВерсииПлатформы(МинимальнаяВерсияПлатформы()), Рекомендуемая);
|
||||||
|
ЗаписьЖурналаРегистрации(НСтр("ru = 'Базовая функциональность'", КодОсновногоЯзыка()), УровеньЖурналаРегистрации.Предупреждение,,,
|
||||||
|
ТекстСообщения);
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
// Обратная совместимость.
|
// Обратная совместимость.
|
||||||
@@ -10072,6 +10014,77 @@
|
|||||||
|
|
||||||
КонецФункции
|
КонецФункции
|
||||||
|
|
||||||
|
// Локализация
|
||||||
|
|
||||||
|
// Параметры:
|
||||||
|
// ОбщиеПараметры - см. ОбщиеПараметрыБазовойФункциональности
|
||||||
|
//
|
||||||
|
Процедура УточнитьМинимальнуюВерсиюПлатформыИзСервиса(ОбщиеПараметры)
|
||||||
|
|
||||||
|
Если Не ПодсистемаСуществует("ИнтернетПоддержкаПользователей.ПолучениеОбновленийПрограммы") Тогда
|
||||||
|
Возврат;
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
// Проверка версии БИП начиная с которой появился программный интерфейс
|
||||||
|
МодульИнтернетПоддержкаПользователейКлиентСервер = ОбщийМодуль("ИнтернетПоддержкаПользователейКлиентСервер");
|
||||||
|
ВерсияБИП = МодульИнтернетПоддержкаПользователейКлиентСервер.ВерсияБиблиотеки();
|
||||||
|
|
||||||
|
Если ОбщегоНазначенияКлиентСервер.СравнитьВерсии(ВерсияБИП, "2.7.1.35") <= 0 Тогда
|
||||||
|
Возврат;
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
Попытка
|
||||||
|
МодульПолучениеОбновленийПрограммы = ОбщийМодуль("ПолучениеОбновленийПрограммы");
|
||||||
|
ИнформацияОВерсияхПлатформы = МодульПолучениеОбновленийПрограммы.ИнформацияОВерсияхПлатформы();
|
||||||
|
|
||||||
|
// Контроль заполнения версий платформы по данным сервиса
|
||||||
|
Если ПустаяСтрока(ИнформацияОВерсияхПлатформы.МинимальнаяВерсияПлатформы)
|
||||||
|
И ПустаяСтрока(ИнформацияОВерсияхПлатформы.РекомендуемаяВерсияПлатформы) Тогда
|
||||||
|
Возврат;
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
Минимальная = НомерСборкиПоТекущейВерсииПлатформы(ИнформацияОВерсияхПлатформы.МинимальнаяВерсияПлатформы);
|
||||||
|
Рекомендуемая = НомерСборкиПоТекущейВерсииПлатформы(ИнформацияОВерсияхПлатформы.РекомендуемаяВерсияПлатформы);
|
||||||
|
|
||||||
|
Если МинимальнаяИРекомендуемаяВерсияПлатформыЗаполненаНеПравильно(Минимальная, Рекомендуемая) Тогда
|
||||||
|
|
||||||
|
МодульПолучениеОбновленийПрограммы.УдалитьИнформациюОВерсияхПлатформы();
|
||||||
|
ТекстСообщения = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
|
||||||
|
НСтр("ru = 'Минимальная и рекомендуемая версии платформы ""1С:Предприятие"", полученные с сервиса обновления программ, не соответствуют следующим требованиям:
|
||||||
|
| - минимальная версия должна быть заполнена;
|
||||||
|
| - минимальная версия не должна быть меньше минимальной версии БСП (см. %1);
|
||||||
|
| - минимальная версия не должна быть меньше рекомендуемой версии.
|
||||||
|
|Минимальная версия сервиса обновления программ: %2
|
||||||
|
|Минимальная версия БСП: %3
|
||||||
|
|Рекомендуемая версия сервиса обновления программ: %4
|
||||||
|
|
|
||||||
|
|Минимальная и рекомендуемая версия платформы ""1С:Предприятие"" установлена по данным см. %5.
|
||||||
|
|Минимальная версия: %6
|
||||||
|
|Рекомендуемая версия: %7'",
|
||||||
|
КодОсновногоЯзыка()),
|
||||||
|
"ОбщегоНазначения.МинимальнаяВерсияПлатформы", Минимальная, НомерСборкиПоТекущейВерсииПлатформы(МинимальнаяВерсияПлатформы()),
|
||||||
|
Рекомендуемая, "ОбщегоНазначенияПереопределяемый.ПриОпределенииОбщихПараметровБазовойФункциональности",
|
||||||
|
ОбщиеПараметры.МинимальнаяВерсияПлатформы, ОбщиеПараметры.РекомендуемаяВерсияПлатформы);
|
||||||
|
ЗаписьЖурналаРегистрации(НСтр("ru = 'Базовая функциональность'", КодОсновногоЯзыка()), УровеньЖурналаРегистрации.Предупреждение,,,
|
||||||
|
ТекстСообщения);
|
||||||
|
Возврат;
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
ОбщиеПараметры.МинимальнаяВерсияПлатформы = Минимальная;
|
||||||
|
ОбщиеПараметры.РекомендуемаяВерсияПлатформы = Рекомендуемая;
|
||||||
|
|
||||||
|
Исключение
|
||||||
|
ТекстСообщения = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
|
||||||
|
НСтр("ru = 'Не удалось изменить минимальную и рекомендуемую версию платформы ""1С:Предприятие"", полученную с сервиса обновления программ, по причине:
|
||||||
|
|%1'",
|
||||||
|
КодОсновногоЯзыка()), ОбработкаОшибок.ПодробноеПредставлениеОшибки(ИнформацияОбОшибке()));
|
||||||
|
ЗаписьЖурналаРегистрации(НСтр("ru = 'Базовая функциональность'", КодОсновногоЯзыка()), УровеньЖурналаРегистрации.Предупреждение,,,
|
||||||
|
ТекстСообщения);
|
||||||
|
КонецПопытки;
|
||||||
|
|
||||||
|
КонецПроцедуры
|
||||||
|
// Конец Локализация
|
||||||
|
|
||||||
#КонецОбласти
|
#КонецОбласти
|
||||||
|
|
||||||
#КонецОбласти
|
#КонецОбласти
|
||||||
|
|||||||
@@ -188,7 +188,6 @@
|
|||||||
Блокировка = Новый БлокировкаДанных;
|
Блокировка = Новый БлокировкаДанных;
|
||||||
Для Каждого КлючеваяОперация Из КлючевыеОперации Цикл
|
Для Каждого КлючеваяОперация Из КлючевыеОперации Цикл
|
||||||
ЭлементБлокировки = Блокировка.Добавить("Справочник.КлючевыеОперации");
|
ЭлементБлокировки = Блокировка.Добавить("Справочник.КлючевыеОперации");
|
||||||
ЭлементБлокировки.Режим = РежимБлокировкиДанных.Исключительный;
|
|
||||||
ЭлементБлокировки.УстановитьЗначение("Имя", КлючеваяОперация.ИмяКлючевойОперации);
|
ЭлементБлокировки.УстановитьЗначение("Имя", КлючеваяОперация.ИмяКлючевойОперации);
|
||||||
КонецЦикла;
|
КонецЦикла;
|
||||||
Блокировка.Заблокировать();
|
Блокировка.Заблокировать();
|
||||||
@@ -266,10 +265,9 @@
|
|||||||
Блокировка = Новый БлокировкаДанных;
|
Блокировка = Новый БлокировкаДанных;
|
||||||
Для Каждого КлючеваяОперация Из КлючевыеОперации Цикл
|
Для Каждого КлючеваяОперация Из КлючевыеОперации Цикл
|
||||||
ЭлементБлокировки = Блокировка.Добавить("Справочник.КлючевыеОперации");
|
ЭлементБлокировки = Блокировка.Добавить("Справочник.КлючевыеОперации");
|
||||||
ЭлементБлокировки.Режим = РежимБлокировкиДанных.Исключительный;
|
|
||||||
ЭлементБлокировки.УстановитьЗначение("Имя", КлючеваяОперация.ИмяКлючевойОперацииСтарое);
|
ЭлементБлокировки.УстановитьЗначение("Имя", КлючеваяОперация.ИмяКлючевойОперацииСтарое);
|
||||||
|
|
||||||
ЭлементБлокировки = Блокировка.Добавить("Справочник.КлючевыеОперации");
|
ЭлементБлокировки = Блокировка.Добавить("Справочник.КлючевыеОперации");
|
||||||
ЭлементБлокировки.Режим = РежимБлокировкиДанных.Исключительный;
|
|
||||||
ЭлементБлокировки.УстановитьЗначение("Имя", КлючеваяОперация.ИмяКлючевойОперацииНовое);
|
ЭлементБлокировки.УстановитьЗначение("Имя", КлючеваяОперация.ИмяКлючевойОперацииНовое);
|
||||||
КонецЦикла;
|
КонецЦикла;
|
||||||
Блокировка.Заблокировать();
|
Блокировка.Заблокировать();
|
||||||
@@ -487,7 +485,6 @@
|
|||||||
Блокировка = Новый БлокировкаДанных;
|
Блокировка = Новый БлокировкаДанных;
|
||||||
Для Каждого КлючеваяОперация Из КлючевыеОперации Цикл
|
Для Каждого КлючеваяОперация Из КлючевыеОперации Цикл
|
||||||
ЭлементБлокировки = Блокировка.Добавить("Справочник.КлючевыеОперации");
|
ЭлементБлокировки = Блокировка.Добавить("Справочник.КлючевыеОперации");
|
||||||
ЭлементБлокировки.Режим = РежимБлокировкиДанных.Исключительный;
|
|
||||||
ЭлементБлокировки.УстановитьЗначение("Имя", КлючеваяОперация.ИмяКлючевойОперации);
|
ЭлементБлокировки.УстановитьЗначение("Имя", КлючеваяОперация.ИмяКлючевойОперации);
|
||||||
КонецЦикла;
|
КонецЦикла;
|
||||||
Блокировка.Заблокировать();
|
Блокировка.Заблокировать();
|
||||||
|
|||||||
@@ -254,6 +254,18 @@
|
|||||||
|
|
||||||
КонецФункции
|
КонецФункции
|
||||||
|
|
||||||
|
Функция ВажностьИнтернетПочтовогоСообщенияИзСтроки(Важность) Экспорт
|
||||||
|
|
||||||
|
Если СтрСравнить(Важность, РаботаСПочтовымиСообщениямиСлужебныйКлиентСервер.ВысокаяВажностьИнтернетПочтовогоСообщения()) = 0 Тогда
|
||||||
|
Возврат ВажностьИнтернетПочтовогоСообщения.Высокая;
|
||||||
|
ИначеЕсли СтрСравнить(Важность, РаботаСПочтовымиСообщениямиСлужебныйКлиентСервер.НизкаяВажностьИнтернетПочтовогоСообщения()) = 0 Тогда
|
||||||
|
Возврат ВажностьИнтернетПочтовогоСообщения.Низкая;
|
||||||
|
Иначе
|
||||||
|
Возврат ВажностьИнтернетПочтовогоСообщения.Обычная;
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
КонецФункции
|
||||||
|
|
||||||
// Восстановление пароля
|
// Восстановление пароля
|
||||||
|
|
||||||
Процедура ОбновитьНастройкиСервераВосстановленияПочты(Ссылка) Экспорт
|
Процедура ОбновитьНастройкиСервераВосстановленияПочты(Ссылка) Экспорт
|
||||||
|
|||||||
@@ -0,0 +1,23 @@
|
|||||||
|
///////////////////////////////////////////////////////////////////////////////////////////////////////
|
||||||
|
// Copyright (c) 2023, ООО 1С-Софт
|
||||||
|
// Все права защищены. Эта программа и сопроводительные материалы предоставляются
|
||||||
|
// в соответствии с условиями лицензии Attribution 4.0 International (CC BY 4.0)
|
||||||
|
// Текст лицензии доступен по ссылке:
|
||||||
|
// https://creativecommons.org/licenses/by/4.0/legalcode
|
||||||
|
///////////////////////////////////////////////////////////////////////////////////////////////////////
|
||||||
|
|
||||||
|
#Область СлужебныйПрограммныйИнтерфейс
|
||||||
|
|
||||||
|
Функция ВысокаяВажностьИнтернетПочтовогоСообщения() Экспорт
|
||||||
|
Возврат "Высокая";
|
||||||
|
КонецФункции
|
||||||
|
|
||||||
|
Функция НизкаяВажностьИнтернетПочтовогоСообщения() Экспорт
|
||||||
|
Возврат "Низкая";
|
||||||
|
КонецФункции
|
||||||
|
|
||||||
|
Функция ОбычнаяВажностьИнтернетПочтовогоСообщения() Экспорт
|
||||||
|
Возврат "Обычная";
|
||||||
|
КонецФункции
|
||||||
|
|
||||||
|
#КонецОбласти
|
||||||
+12
@@ -0,0 +1,12 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<mdclass:CommonModule xmlns:mdclass="http://g5.1c.ru/v8/dt/metadata/mdclass" uuid="2caee148-4962-4947-bca7-9477741b8c1a">
|
||||||
|
<name>РаботаСПочтовымиСообщениямиСлужебныйКлиентСервер</name>
|
||||||
|
<synonym>
|
||||||
|
<key>ru</key>
|
||||||
|
<value>Работа с почтовыми сообщениями служебный клиент сервер</value>
|
||||||
|
</synonym>
|
||||||
|
<clientManagedApplication>true</clientManagedApplication>
|
||||||
|
<server>true</server>
|
||||||
|
<externalConnection>true</externalConnection>
|
||||||
|
<clientOrdinaryApplication>true</clientOrdinaryApplication>
|
||||||
|
</mdclass:CommonModule>
|
||||||
@@ -5752,6 +5752,7 @@
|
|||||||
ИменаКоманд.Добавить("ДобавитьЭПИзФайла");
|
ИменаКоманд.Добавить("ДобавитьЭПИзФайла");
|
||||||
|
|
||||||
ИменаКоманд.Добавить("УдалитьЭП");
|
ИменаКоманд.Добавить("УдалитьЭП");
|
||||||
|
ИменаКоманд.Добавить("ПродлитьДействиеПодписей");
|
||||||
|
|
||||||
ИменаКоманд.Добавить("Редактировать");
|
ИменаКоманд.Добавить("Редактировать");
|
||||||
ИменаКоманд.Добавить("СохранитьИзменения");
|
ИменаКоманд.Добавить("СохранитьИзменения");
|
||||||
|
|||||||
@@ -2407,6 +2407,36 @@
|
|||||||
|
|
||||||
КонецФункции
|
КонецФункции
|
||||||
|
|
||||||
|
Функция РезультатУдаленияФайлов(ФайлыИлиВерсии, УникальныйИдентификатор) Экспорт
|
||||||
|
|
||||||
|
УстановитьПривилегированныйРежим(Истина);
|
||||||
|
|
||||||
|
РезультатУдаления = Новый Соответствие;
|
||||||
|
|
||||||
|
Для Каждого ФайлИлиВерсия Из ФайлыИлиВерсии Цикл
|
||||||
|
|
||||||
|
Результат = Новый Структура("ТекстПредупреждения, Файлы", "", Новый Массив);
|
||||||
|
|
||||||
|
АвторизованныйПользователь = Пользователи.АвторизованныйПользователь();
|
||||||
|
Если ОбщегоНазначения.ЗначениеРеквизитаОбъекта(ФайлИлиВерсия, "Автор") <> АвторизованныйПользователь Тогда
|
||||||
|
|
||||||
|
Результат.ТекстПредупреждения = НСтр("ru = 'Только автор может удалить версию файла.'");
|
||||||
|
|
||||||
|
Продолжить;
|
||||||
|
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
УдалитьДанныеФайла(ФайлИлиВерсия, УникальныйИдентификатор, Результат, АвторизованныйПользователь);
|
||||||
|
|
||||||
|
РезультатУдаления.Вставить(ФайлИлиВерсия, Результат);
|
||||||
|
|
||||||
|
КонецЦикла;
|
||||||
|
|
||||||
|
Возврат РезультатУдаления;
|
||||||
|
|
||||||
|
КонецФункции
|
||||||
|
|
||||||
|
|
||||||
Процедура УдалитьДанныеВерсии(ФайлИлиВерсия, УникальныйИдентификатор, Результат)
|
Процедура УдалитьДанныеВерсии(ФайлИлиВерсия, УникальныйИдентификатор, Результат)
|
||||||
|
|
||||||
Запрос = Новый Запрос;
|
Запрос = Новый Запрос;
|
||||||
|
|||||||
@@ -10622,7 +10622,7 @@
|
|||||||
|
|
||||||
КонецФункции
|
КонецФункции
|
||||||
|
|
||||||
// Возвращает устройства TWAIN (массив строк).
|
// Возвращает устройства сканирования (массив строк).
|
||||||
Функция ПолучитьУстройства(ПодключаемыйМодуль) Экспорт
|
Функция ПолучитьУстройства(ПодключаемыйМодуль) Экспорт
|
||||||
|
|
||||||
Массив = Новый Массив;
|
Массив = Новый Массив;
|
||||||
@@ -11101,6 +11101,71 @@
|
|||||||
|
|
||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
|
Процедура УдалитьДанныеФайлов(ОбработчикЗавершения, ФайлыИлиВерсии, УникальныйИдентификатор) Экспорт
|
||||||
|
|
||||||
|
Если ФайлыИлиВерсии.Количество() = 0 Тогда
|
||||||
|
ВыполнитьОбработкуОповещения(ОбработчикЗавершения, Неопределено);
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
Контекст = Новый Структура;
|
||||||
|
Контекст.Вставить("ФайлыИлиВерсии", ФайлыИлиВерсии);
|
||||||
|
Контекст.Вставить("ОбработчикЗавершения", ОбработчикЗавершения);
|
||||||
|
Контекст.Вставить("УникальныйИдентификатор", УникальныйИдентификатор);
|
||||||
|
|
||||||
|
ФайлИлиВерсия = ФайлыИлиВерсии[0];
|
||||||
|
Если ФайлыИлиВерсии.Количество() = 1 Тогда
|
||||||
|
ТекстВопроса = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(НСтр("ru = 'Удалить файл %1 без возможности восстановления?'"),
|
||||||
|
Строка(ФайлИлиВерсия));
|
||||||
|
ТекстЗаголовка = НСтр("ru = 'Удаление файла'");
|
||||||
|
Иначе
|
||||||
|
ТекстВопроса = НСтр("ru = 'Удалить файлы без возможности восстановления?'");
|
||||||
|
ТекстЗаголовка = НСтр("ru = 'Удаление файлов'");
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
ПоказатьВопрос(Новый ОписаниеОповещения("УдалитьДанныеФайловПослеОтветаНаВопрос", ЭтотОбъект, Контекст),
|
||||||
|
ТекстВопроса, РежимДиалогаВопрос.ДаНет,, КодВозвратаДиалога.Нет, ТекстЗаголовка, КодВозвратаДиалога.Нет);
|
||||||
|
КонецПроцедуры
|
||||||
|
|
||||||
|
Процедура УдалитьДанныеФайловПослеОтветаНаВопрос(Ответ, Контекст) Экспорт
|
||||||
|
|
||||||
|
Если Ответ <> КодВозвратаДиалога.Да Тогда
|
||||||
|
Возврат;
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
РезультатыУдаления = РаботаСФайламиСлужебныйВызовСервера.РезультатУдаленияФайлов(
|
||||||
|
Контекст.ФайлыИлиВерсии, Контекст.УникальныйИдентификатор);
|
||||||
|
|
||||||
|
Предупреждения = Новый Соответствие;
|
||||||
|
Результат = Новый Структура("Файлы,ИндексУдаляемогоФайла,ОбработчикЗавершения,ТекстПредупреждения", Новый Массив, 0);
|
||||||
|
|
||||||
|
Для Каждого РезультатУдаления Из РезультатыУдаления Цикл
|
||||||
|
Если РезультатУдаления.Значение.Файлы.Количество() > 0 Тогда
|
||||||
|
ОбщегоНазначенияКлиентСервер.ДополнитьМассив(Результат.Файлы, РезультатУдаления.Значение.Файлы);
|
||||||
|
Иначе
|
||||||
|
Предупреждения.Вставить(РезультатУдаления.Ключ, РезультатУдаления.Значение.ТекстПредупреждения);
|
||||||
|
КонецЕсли;
|
||||||
|
КонецЦикла;
|
||||||
|
|
||||||
|
Если Результат.Файлы.Количество() > 0 Тогда
|
||||||
|
|
||||||
|
Результат.Вставить("ИндексУдаляемогоФайла", 0);
|
||||||
|
Результат.Вставить("ОбработчикЗавершения", Контекст.ОбработчикЗавершения);
|
||||||
|
|
||||||
|
НачатьУдалениеФайлаИзКеша(Результат);
|
||||||
|
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
Если Предупреждения.Количество() > 0 Тогда
|
||||||
|
ТекстПредупреждения = "";
|
||||||
|
Для Каждого Предупреждение Из Предупреждения Цикл
|
||||||
|
ТекстПредупреждения = ?(ТекстПредупреждения = "", "", Символы.ПС)
|
||||||
|
+ СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(НСтр("ru='%1: %2'"), Предупреждение.Ключ, Предупреждение.Значение);
|
||||||
|
КонецЦикла;
|
||||||
|
ОповеститьОбУдаленииДанных(Контекст.ОбработчикЗавершения, ТекстПредупреждения);
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
КонецПроцедуры
|
||||||
|
|
||||||
#КонецОбласти
|
#КонецОбласти
|
||||||
|
|
||||||
#КонецОбласти
|
#КонецОбласти
|
||||||
@@ -365,6 +365,22 @@
|
|||||||
|
|
||||||
КонецФункции
|
КонецФункции
|
||||||
|
|
||||||
|
// Описание подключения внешней компоненты сканирования.
|
||||||
|
//
|
||||||
|
// Возвращаемое значение:
|
||||||
|
// Структура:
|
||||||
|
// * ПолноеИмяМакета - Строка
|
||||||
|
// * ИмяОбъекта - Строка
|
||||||
|
//
|
||||||
|
Функция ОписаниеКомпоненты() Экспорт
|
||||||
|
|
||||||
|
Параметры = Новый Структура;
|
||||||
|
Параметры.Вставить("ИмяОбъекта", "ImageScan");
|
||||||
|
Параметры.Вставить("ПолноеИмяМакета", "ОбщийМакет.КомпонентаСканированияДокументов");
|
||||||
|
Возврат Параметры;
|
||||||
|
|
||||||
|
КонецФункции
|
||||||
|
|
||||||
#Область ИзвлечениеТекста
|
#Область ИзвлечениеТекста
|
||||||
|
|
||||||
// Извлекает текст в соответствии с кодировкой.
|
// Извлекает текст в соответствии с кодировкой.
|
||||||
@@ -913,20 +929,4 @@
|
|||||||
|
|
||||||
КонецФункции
|
КонецФункции
|
||||||
|
|
||||||
// Описание подключения внешней компоненты (AddInNativeExtension).
|
|
||||||
//
|
|
||||||
// Возвращаемое значение:
|
|
||||||
// Структура:
|
|
||||||
// * ПолноеИмяМакета - Строка
|
|
||||||
// * ИмяОбъекта - Строка
|
|
||||||
//
|
|
||||||
Функция ОписаниеКомпоненты() Экспорт
|
|
||||||
|
|
||||||
Параметры = Новый Структура;
|
|
||||||
Параметры.Вставить("ИмяОбъекта", "AddInNativeExtension");
|
|
||||||
Параметры.Вставить("ПолноеИмяМакета", "ОбщийМакет.КомпонентаTWAIN");
|
|
||||||
Возврат Параметры;
|
|
||||||
|
|
||||||
КонецФункции
|
|
||||||
|
|
||||||
#КонецОбласти
|
#КонецОбласти
|
||||||
@@ -187,7 +187,7 @@
|
|||||||
ПараметрыДоставки.ПараметрыПисьма.ТипТекста = ?(РассылкаОбъект.ПисьмоВФорматеHTML, "HTML", "ПростойТекст");
|
ПараметрыДоставки.ПараметрыПисьма.ТипТекста = ?(РассылкаОбъект.ПисьмоВФорматеHTML, "HTML", "ПростойТекст");
|
||||||
ПараметрыДоставки.ПараметрыПисьма.АдресОтвета = РассылкаОбъект.АдресОтвета;
|
ПараметрыДоставки.ПараметрыПисьма.АдресОтвета = РассылкаОбъект.АдресОтвета;
|
||||||
ПараметрыДоставки.ПараметрыПисьма.Важность = ?(ЗначениеЗаполнено(РассылкаОбъект.ВажностьПисьма),
|
ПараметрыДоставки.ПараметрыПисьма.Важность = ?(ЗначениеЗаполнено(РассылкаОбъект.ВажностьПисьма),
|
||||||
ВажностьИнтернетПочтовогоСообщенияИзСтроки(РассылкаОбъект.ВажностьПисьма),
|
РаботаСПочтовымиСообщениямиСлужебный.ВажностьИнтернетПочтовогоСообщенияИзСтроки(РассылкаОбъект.ВажностьПисьма),
|
||||||
ВажностьИнтернетПочтовогоСообщения.Обычная);
|
ВажностьИнтернетПочтовогоСообщения.Обычная);
|
||||||
|
|
||||||
Если Рассылка.ПисьмоВФорматеHTML Тогда
|
Если Рассылка.ПисьмоВФорматеHTML Тогда
|
||||||
@@ -4866,18 +4866,6 @@
|
|||||||
|
|
||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
Функция ВажностьИнтернетПочтовогоСообщенияИзСтроки(Важность)
|
|
||||||
|
|
||||||
Если СтрСравнить(Важность, РассылкаОтчетовКлиентСервер.ВысокаяВажностьИнтернетПочтовогоСообщения()) = 0 Тогда
|
|
||||||
Возврат ВажностьИнтернетПочтовогоСообщения.Высокая;
|
|
||||||
ИначеЕсли СтрСравнить(Важность, РассылкаОтчетовКлиентСервер.НизкаяВажностьИнтернетПочтовогоСообщения()) = 0 Тогда
|
|
||||||
Возврат ВажностьИнтернетПочтовогоСообщения.Низкая;
|
|
||||||
Иначе
|
|
||||||
Возврат ВажностьИнтернетПочтовогоСообщения.Обычная;
|
|
||||||
КонецЕсли;
|
|
||||||
|
|
||||||
КонецФункции
|
|
||||||
|
|
||||||
#Область ФормированиеОтчетовВНесколькоПотоков
|
#Область ФормированиеОтчетовВНесколькоПотоков
|
||||||
|
|
||||||
Функция ВыполнитьФормированиеОтчетовВНесколькоПотоков(Отчеты, ПараметрыДоставки, НаименованиеРассылки, ПараметрыЖурнала)
|
Функция ВыполнитьФормированиеОтчетовВНесколькоПотоков(Отчеты, ПараметрыДоставки, НаименованиеРассылки, ПараметрыЖурнала)
|
||||||
|
|||||||
@@ -468,22 +468,4 @@
|
|||||||
|
|
||||||
КонецФункции
|
КонецФункции
|
||||||
|
|
||||||
Функция ВысокаяВажностьИнтернетПочтовогоСообщения() Экспорт
|
|
||||||
|
|
||||||
Возврат "Высокая";
|
|
||||||
|
|
||||||
КонецФункции
|
|
||||||
|
|
||||||
Функция НизкаяВажностьИнтернетПочтовогоСообщения() Экспорт
|
|
||||||
|
|
||||||
Возврат "Низкая";
|
|
||||||
|
|
||||||
КонецФункции
|
|
||||||
|
|
||||||
Функция ОбычнаяВажностьИнтернетПочтовогоСообщения() Экспорт
|
|
||||||
|
|
||||||
Возврат "Обычная";
|
|
||||||
|
|
||||||
КонецФункции
|
|
||||||
|
|
||||||
#КонецОбласти
|
#КонецОбласти
|
||||||
@@ -530,6 +530,28 @@
|
|||||||
Возврат Результат;
|
Возврат Результат;
|
||||||
КонецФункции
|
КонецФункции
|
||||||
|
|
||||||
|
Функция ЕстьАктуальныеЗаблокированныеОбъекты()
|
||||||
|
|
||||||
|
ВремяЖизниБлокировки = ВремяЖизниБлокировки();
|
||||||
|
ВремяСнятияБлокировки = ТекущаяДатаСеанса() - ВремяЖизниБлокировки;
|
||||||
|
|
||||||
|
Запрос = Новый Запрос();
|
||||||
|
Запрос.Текст =
|
||||||
|
"ВЫБРАТЬ РАЗЛИЧНЫЕ ПЕРВЫЕ 1
|
||||||
|
| УдаляемыеОбъекты.ИдентификаторСеанса КАК ИдентификаторСеанса,
|
||||||
|
| УдаляемыеОбъекты.Период КАК ВремяБлокировки
|
||||||
|
|ИЗ
|
||||||
|
| РегистрСведений.УдаляемыеОбъекты КАК УдаляемыеОбъекты
|
||||||
|
|ГДЕ
|
||||||
|
| УдаляемыеОбъекты.Период > &ВремяСнятияБлокировки";
|
||||||
|
|
||||||
|
Запрос.УстановитьПараметр("ВремяСнятияБлокировки", ВремяСнятияБлокировки);
|
||||||
|
РезультатЗапроса = Запрос.Выполнить();
|
||||||
|
|
||||||
|
Возврат Не РезультатЗапроса.Пустой();
|
||||||
|
|
||||||
|
КонецФункции
|
||||||
|
|
||||||
#Область ОбработчикиКомандФормыУдаленияПомеченных
|
#Область ОбработчикиКомандФормыУдаленияПомеченных
|
||||||
|
|
||||||
Функция ПомеченныеНаУдаление(ОтборМетаданных, Настройки, ДеревоПомеченныхНаУдаление) Экспорт
|
Функция ПомеченныеНаУдаление(ОтборМетаданных, Настройки, ДеревоПомеченныхНаУдаление) Экспорт
|
||||||
@@ -616,7 +638,9 @@
|
|||||||
//
|
//
|
||||||
Функция УдалитьПомеченныеОбъекты(Знач ИсточникУдаляемыхОбъектов, РежимУдаления, НастройкиДополнительныхРеквизитов,
|
Функция УдалитьПомеченныеОбъекты(Знач ИсточникУдаляемыхОбъектов, РежимУдаления, НастройкиДополнительныхРеквизитов,
|
||||||
РезультатПредыдущегоШага, ИдентификаторЗадания) Экспорт
|
РезультатПредыдущегоШага, ИдентификаторЗадания) Экспорт
|
||||||
|
|
||||||
|
КонтрольУдаленияПомеченныхОбъектов();
|
||||||
|
|
||||||
Если ТипЗнч(ИсточникУдаляемыхОбъектов) = Тип("СписокЗначений") Тогда
|
Если ТипЗнч(ИсточникУдаляемыхОбъектов) = Тип("СписокЗначений") Тогда
|
||||||
ИсточникУдаляемыхОбъектов = ДеревоПомеченныхНаУдаление(ИсточникУдаляемыхОбъектов.ВыгрузитьЗначения(),
|
ИсточникУдаляемыхОбъектов = ДеревоПомеченныхНаУдаление(ИсточникУдаляемыхОбъектов.ВыгрузитьЗначения(),
|
||||||
НастройкиДополнительныхРеквизитов, Новый Массив);
|
НастройкиДополнительныхРеквизитов, Новый Массив);
|
||||||
@@ -1039,6 +1063,10 @@
|
|||||||
Если Не ПроверятьИспользованиеУдаляемыхОбъектов() Тогда
|
Если Не ПроверятьИспользованиеУдаляемыхОбъектов() Тогда
|
||||||
Возврат;
|
Возврат;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
|
Если Не ЕстьАктуальныеЗаблокированныеОбъекты() Тогда
|
||||||
|
Возврат;
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
Если ИсключенияПоискаСсылокРазрешающихУдаление().Найти(Источник.Метаданные()) <> Неопределено Тогда
|
Если ИсключенияПоискаСсылокРазрешающихУдаление().Найти(Источник.Метаданные()) <> Неопределено Тогда
|
||||||
Возврат;
|
Возврат;
|
||||||
@@ -1247,17 +1275,31 @@
|
|||||||
|
|
||||||
Функция ДеревоПомеченныхНаУдалениеБезУдаленных(ПомеченныеНаУдаление, Удаленные)
|
Функция ДеревоПомеченныхНаУдалениеБезУдаленных(ПомеченныеНаУдаление, Удаленные)
|
||||||
Результат = ПомеченныеНаУдаление.Скопировать();
|
Результат = ПомеченныеНаУдаление.Скопировать();
|
||||||
|
|
||||||
|
УдаленныеЭлементы = Новый Соответствие();
|
||||||
|
Для Каждого Элемент Из Удаленные Цикл
|
||||||
|
УдаленныеЭлементы.Вставить(Элемент, Истина);
|
||||||
|
КонецЦикла;
|
||||||
|
|
||||||
МодифицированныеРодители = Новый Соответствие;
|
МодифицированныеРодители = Новый Соответствие;
|
||||||
УдаляемыеОбъекты = Результат.Строки.НайтиСтроки(Новый Структура("Пометка", 1), Истина);
|
УдаляемыеОбъекты = Результат.Строки.НайтиСтроки(Новый Структура("Пометка", 1), Истина);
|
||||||
Для Каждого Элемент Из УдаляемыеОбъекты Цикл
|
Для Каждого Элемент Из УдаляемыеОбъекты Цикл
|
||||||
Если Элемент.Родитель <> Неопределено И (Удаленные.Найти(Элемент.УдаляемыйСсылка) <> Неопределено
|
Если Элемент.Родитель <> Неопределено И (Элемент.Технический И Не Элемент.ЭтоОписаниеОбъектаМетаданных
|
||||||
Или Не Элемент.ЭтоОписаниеОбъектаМетаданных И Элемент.Технический) Тогда
|
Или УдаленныеЭлементы[Элемент.УдаляемыйСсылка] <> Неопределено) Тогда
|
||||||
|
МодифицированныеРодители.Вставить(Элемент.Родитель);
|
||||||
|
УдаленныеЭлементы.Удалить(Элемент.УдаляемыйСсылка);
|
||||||
|
Элемент.Родитель.Строки.Удалить(Элемент);
|
||||||
|
КонецЕсли;
|
||||||
|
КонецЦикла;
|
||||||
|
|
||||||
|
Для Каждого УдаленныйЭлемент Из УдаленныеЭлементы Цикл
|
||||||
|
Элемент = Результат.Строки.Найти(УдаленныйЭлемент.Ключ, "УдаляемыйСсылка", Истина);
|
||||||
|
Если Элемент <> Неопределено Тогда
|
||||||
МодифицированныеРодители.Вставить(Элемент.Родитель);
|
МодифицированныеРодители.Вставить(Элемент.Родитель);
|
||||||
Элемент.Родитель.Строки.Удалить(Элемент);
|
Элемент.Родитель.Строки.Удалить(Элемент);
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
КонецЦикла;
|
КонецЦикла;
|
||||||
|
|
||||||
Для Каждого ЗначениеРодитель Из МодифицированныеРодители Цикл
|
Для Каждого ЗначениеРодитель Из МодифицированныеРодители Цикл
|
||||||
Родитель = ЗначениеРодитель.Ключ;
|
Родитель = ЗначениеРодитель.Ключ;
|
||||||
Если Родитель.Строки.Количество() = 0 Тогда
|
Если Родитель.Строки.Количество() = 0 Тогда
|
||||||
|
|||||||
@@ -2328,35 +2328,47 @@
|
|||||||
//
|
//
|
||||||
// Для файловой ИБ обработчик не добавляется (кроме начального заполнения).
|
// Для файловой ИБ обработчик не добавляется (кроме начального заполнения).
|
||||||
// Соответственно, в клиент-серверных базах с РИБ (кроме модели сервиса) обработчик тоже не добавляется,
|
// Соответственно, в клиент-серверных базах с РИБ (кроме модели сервиса) обработчик тоже не добавляется,
|
||||||
// так как в РИБ могут быть файловые ИБ.
|
// так как в РИБ могут быть файловые ИБ (если известно обратное, поведение можно переопределить).
|
||||||
//
|
//
|
||||||
// Параметры:
|
// Параметры:
|
||||||
// Версия - Строка - версия для таблицы ОбновлениеИнформационнойБазы.НоваяТаблицаОбработчиковОбновления.
|
// Версия - Строка - версия для таблицы ОбновлениеИнформационнойБазы.НоваяТаблицаОбработчиковОбновления.
|
||||||
|
// Указать пустую строку, если параметр ТолькоНачальноеЗаполнение указан Истина.
|
||||||
// Обработчики - см. ОбновлениеИнформационнойБазы.НоваяТаблицаОбработчиковОбновления
|
// Обработчики - см. ОбновлениеИнформационнойБазы.НоваяТаблицаОбработчиковОбновления
|
||||||
|
// ТолькоНачальноеЗаполнение - Булево - добавить только обработчик начального заполнения.
|
||||||
|
// Требуется, если пока не планируется переключать все базы на производительный вариант,
|
||||||
|
// а планируется переключать только новые созданные базы.
|
||||||
|
// БезУчетаРИБ - Булево - добавить обработчик обновления без учета наличия РИБ.
|
||||||
|
// Требуется, если планируется переключать клиент-серверные базы на производительный вариант,
|
||||||
|
// которые участвуют в РИБ, так как известно, что в РИБ не участвуют файловые базы или среди
|
||||||
|
// них нет файловых баз со значительным количеством активных пользователей, одновременно
|
||||||
|
// изменяющих данные для которых настроены ограничения на уровне записей.
|
||||||
//
|
//
|
||||||
// Пример:
|
// Пример:
|
||||||
// Процедура ПриДобавленииОбработчиковОбновления(Обработчики) Экспорт
|
// Процедура ПриДобавленииОбработчиковОбновления(Обработчики) Экспорт
|
||||||
// УправлениеДоступом.ДобавитьОбработчикОбновленияДляВключенияУниверсальногоОграничения("3.0.3.7", Обработчики);
|
// УправлениеДоступом.ДобавитьОбработчикОбновленияДляВключенияУниверсальногоОграничения("3.0.3.7", Обработчики);
|
||||||
// КонецПроцедуры
|
// КонецПроцедуры
|
||||||
//
|
//
|
||||||
Процедура ДобавитьОбработчикОбновленияДляВключенияУниверсальногоОграничения(Версия, Обработчики) Экспорт
|
Процедура ДобавитьОбработчикОбновленияДляВключенияУниверсальногоОграничения(Версия, Обработчики,
|
||||||
|
ТолькоНачальноеЗаполнение = Ложь, БезУчетаРИБ = Ложь) Экспорт
|
||||||
|
|
||||||
Если ОбщегоНазначения.ДоступноИспользованиеРазделенныхДанных()
|
Если ОбщегоНазначения.ДоступноИспользованиеРазделенныхДанных()
|
||||||
И УправлениеДоступомСлужебный.ОграничиватьДоступНаУровнеЗаписейУниверсально(Истина) Тогда
|
И УправлениеДоступомСлужебный.ОграничиватьДоступНаУровнеЗаписейУниверсально(Истина) Тогда
|
||||||
Возврат;
|
Возврат;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
Если ОбщегоНазначения.ИнформационнаяБазаФайловая() Тогда
|
|
||||||
Возврат;
|
|
||||||
КонецЕсли;
|
|
||||||
|
|
||||||
Обработчик = Обработчики.Добавить();
|
Обработчик = Обработчики.Добавить();
|
||||||
Обработчик.НачальноеЗаполнение = Истина;
|
Обработчик.НачальноеЗаполнение = Истина;
|
||||||
Обработчик.Процедура = "РегистрыСведений.ПараметрыОграниченияДоступа.ВключитьОграничениеДоступаНаУровнеЗаписейУниверсально";
|
Обработчик.Процедура = "РегистрыСведений.ПараметрыОграниченияДоступа.ВключитьОграничениеДоступаНаУровнеЗаписейУниверсально";
|
||||||
Обработчик.РежимВыполнения = "Оперативно";
|
Обработчик.РежимВыполнения = "Оперативно";
|
||||||
|
|
||||||
|
Если ТолькоНачальноеЗаполнение
|
||||||
|
Или ОбщегоНазначения.ИнформационнаяБазаФайловая() Тогда
|
||||||
|
Возврат;
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
ВключенРИБ = Ложь;
|
ВключенРИБ = Ложь;
|
||||||
Если Не ОбщегоНазначения.РазделениеВключено()
|
Если Не БезУчетаРИБ
|
||||||
|
И Не ОбщегоНазначения.РазделениеВключено()
|
||||||
И ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.ОбменДанными") Тогда
|
И ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.ОбменДанными") Тогда
|
||||||
|
|
||||||
ИменаПлановОбмена = Новый Массив;
|
ИменаПлановОбмена = Новый Массив;
|
||||||
|
|||||||
@@ -3042,6 +3042,10 @@
|
|||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
ЗначениеИспользуетсяУГруппы = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Объект.Родитель, "Используется");
|
ЗначениеИспользуетсяУГруппы = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Объект.Родитель, "Используется");
|
||||||
|
Если ПустаяСтрока(Объект.ИдентификаторДляФормул) Тогда
|
||||||
|
Объект.ИдентификаторДляФормул = Справочники.ВидыКонтактнойИнформации.УникальныйИдентификаторДляФормул(
|
||||||
|
НаименованиеДляФормированияИдентификатора(Объект), Объект.Ссылка, Объект.Родитель);
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
Если ЗначениеИспользуетсяУГруппы = Ложь И Объект.Используется Тогда
|
Если ЗначениеИспользуетсяУГруппы = Ложь И Объект.Используется Тогда
|
||||||
|
|
||||||
@@ -5071,6 +5075,23 @@
|
|||||||
|
|
||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
|
Функция НаименованиеДляФормированияИдентификатора(Объект) Экспорт
|
||||||
|
|
||||||
|
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.Мультиязычность") Тогда
|
||||||
|
|
||||||
|
МодульМультиязычностьСервер = ОбщегоНазначения.ОбщийМодуль("МультиязычностьСервер");
|
||||||
|
СуффиксТекущегоЯзыка = МодульМультиязычностьСервер.СуффиксТекущегоЯзыка();
|
||||||
|
|
||||||
|
Возврат ?(ЗначениеЗаполнено(СуффиксТекущегоЯзыка),
|
||||||
|
Объект["Наименование"+ СуффиксТекущегоЯзыка],
|
||||||
|
Объект.Наименование);
|
||||||
|
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
Возврат Объект.Наименование;
|
||||||
|
|
||||||
|
КонецФункции
|
||||||
|
|
||||||
Процедура ДобавитьРеквизитВОписание(Форма, СтрокаКонтактнойИнформации, ДанныеВидаКонтактнойИнформации, ЭтоНовыйВидКИ,
|
Процедура ДобавитьРеквизитВОписание(Форма, СтрокаКонтактнойИнформации, ДанныеВидаКонтактнойИнформации, ЭтоНовыйВидКИ,
|
||||||
ЭтоРеквизитТабличнойЧасти = Ложь, ЗаполнятьЗначениеРеквизита = Истина, ИмяЭлементаДляРазмещения = "ГруппаКонтактнаяИнформация")
|
ЭтоРеквизитТабличнойЧасти = Ложь, ЗаполнятьЗначениеРеквизита = Истина, ИмяЭлементаДляРазмещения = "ГруппаКонтактнаяИнформация")
|
||||||
|
|
||||||
@@ -5392,6 +5413,24 @@
|
|||||||
|
|
||||||
КонецФункции
|
КонецФункции
|
||||||
|
|
||||||
|
Функция БазовыеСведенияКонтактнойИнформации(КонтактнаяИнформация = Неопределено) Экспорт
|
||||||
|
|
||||||
|
Результат = УправлениеКонтактнойИнформациейКлиентСервер.БазовыеПоляКонтактнойИнформации();
|
||||||
|
Если КонтактнаяИнформация = Неопределено Тогда
|
||||||
|
Возврат Результат;
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
ПоляКонтактнойИнформации = УправлениеКонтактнойИнформациейСлужебный.КонтактнаяИнформацияВСтруктуруJSON(КонтактнаяИнформация);
|
||||||
|
ТипКонтактнойИнформации = ТипКонтактнойИнформации(КонтактнаяИнформация);
|
||||||
|
|
||||||
|
Результат.Представление = Строка(ПоляКонтактнойИнформации.Value);
|
||||||
|
Результат.Комментарий = Строка(ПоляКонтактнойИнформации.Comment);
|
||||||
|
Результат.ТипКонтактнойИнформации = ТипКонтактнойИнформации;
|
||||||
|
|
||||||
|
Возврат Результат;
|
||||||
|
|
||||||
|
КонецФункции
|
||||||
|
|
||||||
Процедура СоздатьЭлементыТабличнойЧасти(Знач Форма, Знач ИмяОбъекта, ИмяЭлементаДляРазмещения,
|
Процедура СоздатьЭлементыТабличнойЧасти(Знач Форма, Знач ИмяОбъекта, ИмяЭлементаДляРазмещения,
|
||||||
Знач СтрокаКонтактнойИнформации, Знач ДанныеВидаКонтактнойИнформации)
|
Знач СтрокаКонтактнойИнформации, Знач ДанныеВидаКонтактнойИнформации)
|
||||||
|
|
||||||
|
|||||||
@@ -330,30 +330,49 @@
|
|||||||
//
|
//
|
||||||
Процедура СоздатьЭлектронноеПисьмо(Знач ЗначенияПолей, Знач Представление = "", ОжидаемыйВид = Неопределено, ИсточникКонтактнойИнформации = Неопределено, ИмяРеквизита = "") Экспорт
|
Процедура СоздатьЭлектронноеПисьмо(Знач ЗначенияПолей, Знач Представление = "", ОжидаемыйВид = Неопределено, ИсточникКонтактнойИнформации = Неопределено, ИмяРеквизита = "") Экспорт
|
||||||
|
|
||||||
ОписаниеКонтактнойИнформации = УправлениеКонтактнойИнформациейКлиентСервер.ОписаниеКонтактнойИнформации(
|
АдресПочты = "";
|
||||||
ЗначенияПолей, Представление, ОжидаемыйВид);
|
Если ЗначениеЗаполнено(Представление) Тогда
|
||||||
|
|
||||||
КонтактнаяИнформация = УправлениеКонтактнойИнформациейСлужебныйВызовСервера.ПривестиКонтактнуюИнформациюXML(ОписаниеКонтактнойИнформации);
|
|
||||||
|
|
||||||
ТипИнформации = КонтактнаяИнформация.ТипКонтактнойИнформации;
|
Если ОбщегоНазначенияКлиентСервер.АдресЭлектроннойПочтыСоответствуетТребованиям(Представление, Истина) Тогда
|
||||||
Если ТипИнформации <> ПредопределенноеЗначение("Перечисление.ТипыКонтактнойИнформации.АдресЭлектроннойПочты") Тогда
|
АдресПочты = Представление;
|
||||||
ВызватьИсключение СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(НСтр("ru = 'Нельзя создать письмо по контактной информацию с типом ""%1""'"), ТипИнформации);
|
|
||||||
КонецЕсли;
|
|
||||||
|
|
||||||
Если ЗначенияПолей = "" И ПустаяСтрока(Представление) Тогда
|
|
||||||
Если ЗначениеЗаполнено(ИмяРеквизита) Тогда
|
|
||||||
ОбщегоНазначенияКлиент.СообщитьПользователю(
|
|
||||||
НСтр("ru = 'Для отправки письма введите адрес электронной почты.'"), , ИмяРеквизита);
|
|
||||||
Иначе
|
|
||||||
ПоказатьПредупреждение( , НСтр("ru = 'Для отправки письма введите адрес электронной почты.'"));
|
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
Возврат;
|
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
XMLДанные = КонтактнаяИнформация.ДанныеXML;
|
Если ПустаяСтрока(АдресПочты) Тогда
|
||||||
АдресПочты = УправлениеКонтактнойИнформациейСлужебныйВызовСервера.СтрокаСоставаКонтактнойИнформации(XMLДанные);
|
|
||||||
Если ТипЗнч(АдресПочты) <> Тип("Строка") Тогда
|
ОписаниеКонтактнойИнформации = УправлениеКонтактнойИнформациейКлиентСервер.ОписаниеКонтактнойИнформации(
|
||||||
ВызватьИсключение НСтр("ru = 'Ошибка получения адреса электронной почты, неверный тип контактной информации'");
|
ЗначенияПолей, Представление, ОжидаемыйВид);
|
||||||
|
|
||||||
|
КонтактнаяИнформация = УправлениеКонтактнойИнформациейСлужебныйВызовСервера.ПривестиКонтактнуюИнформациюXML(ОписаниеКонтактнойИнформации);
|
||||||
|
|
||||||
|
Если ЗначениеЗаполнено( КонтактнаяИнформация.Представление) Тогда
|
||||||
|
АдресПочты = КонтактнаяИнформация.Представление;
|
||||||
|
Иначе
|
||||||
|
АдресПочты = УправлениеКонтактнойИнформациейСлужебныйВызовСервера.СтрокаСоставаКонтактнойИнформации(КонтактнаяИнформация.ДанныеXML);
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
ТекстОшибки = "";
|
||||||
|
ТипИнформации = КонтактнаяИнформация.ТипКонтактнойИнформации;
|
||||||
|
Если ПустаяСтрока(АдресПочты)
|
||||||
|
Или Не ОбщегоНазначенияКлиентСервер.АдресЭлектроннойПочтыСоответствуетТребованиям(Представление, Истина) Тогда
|
||||||
|
ТекстОшибки= НСтр("ru = 'Для отправки письма введите адрес электронной почты.'");
|
||||||
|
ИначеЕсли ТипЗнч(АдресПочты) <> Тип("Строка") Или ТипИнформации = Неопределено Тогда
|
||||||
|
ТекстОшибки = НСтр("ru = 'Ошибка получения адреса электронной почты, неверный тип контактной информации'");
|
||||||
|
ИначеЕсли ТипИнформации <> ПредопределенноеЗначение("Перечисление.ТипыКонтактнойИнформации.АдресЭлектроннойПочты") Тогда
|
||||||
|
ТекстОшибки = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
|
||||||
|
НСтр("ru = 'Нельзя создать письмо по контактной информацию с типом ""%1""'"), ТипИнформации);
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
Если ЗначениеЗаполнено(ТекстОшибки) Тогда
|
||||||
|
Если ЗначениеЗаполнено(ИмяРеквизита) Тогда
|
||||||
|
ОбщегоНазначенияКлиент.СообщитьПользователю(ТекстОшибки,, ИмяРеквизита);
|
||||||
|
Иначе
|
||||||
|
ПоказатьПредупреждение(, ТекстОшибки );
|
||||||
|
КонецЕсли;
|
||||||
|
Возврат
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
Если ОбщегоНазначенияКлиент.ПодсистемаСуществует("СтандартныеПодсистемы.РаботаСПочтовымиСообщениями") Тогда
|
Если ОбщегоНазначенияКлиент.ПодсистемаСуществует("СтандартныеПодсистемы.РаботаСПочтовымиСообщениями") Тогда
|
||||||
|
|||||||
@@ -313,6 +313,41 @@
|
|||||||
|
|
||||||
КонецФункции
|
КонецФункции
|
||||||
|
|
||||||
|
// Возвращаемое значение:
|
||||||
|
// Структура:
|
||||||
|
// * Представление - Строка
|
||||||
|
// * ТипКонтактнойИнформации - ПеречислениеСсылка.ТипыКонтактнойИнформации
|
||||||
|
// - Неопределено
|
||||||
|
// * Комментарий - Строка
|
||||||
|
//
|
||||||
|
Функция БазовыеПоляКонтактнойИнформации() Экспорт
|
||||||
|
|
||||||
|
ПоляКонтактнойИнформации = Новый Структура;
|
||||||
|
ПоляКонтактнойИнформации.Вставить("Представление", "");
|
||||||
|
ПоляКонтактнойИнформации.Вставить("ТипКонтактнойИнформации", Неопределено);
|
||||||
|
ПоляКонтактнойИнформации.Вставить("Комментарий", "");
|
||||||
|
|
||||||
|
Возврат ПоляКонтактнойИнформации;
|
||||||
|
|
||||||
|
КонецФункции
|
||||||
|
|
||||||
|
// Возвращаемое значение:
|
||||||
|
// Структура - поля контактной информации для преобразования:
|
||||||
|
// * ТипКонтактнойИнформации - ПеречислениеСсылка.ТипыКонтактнойИнформации
|
||||||
|
// - Неопределено
|
||||||
|
// * ДанныеXML - Строка
|
||||||
|
// * Представление - Строка
|
||||||
|
//
|
||||||
|
Функция ПоляКонтактнойИнформацииДляПреобразования() Экспорт
|
||||||
|
|
||||||
|
Результат = Новый Структура;
|
||||||
|
Результат.Вставить("ТипКонтактнойИнформации", Неопределено);
|
||||||
|
Результат.Вставить("ДанныеXML", "");
|
||||||
|
Результат.Вставить("Представление", "");
|
||||||
|
|
||||||
|
Возврат Результат;
|
||||||
|
|
||||||
|
КонецФункции
|
||||||
|
|
||||||
Функция ТипКонтактнойИнформацииВСтроку(Знач ТипКонтактнойИнформации)
|
Функция ТипКонтактнойИнформацииВСтроку(Знач ТипКонтактнойИнформации)
|
||||||
|
|
||||||
|
|||||||
@@ -906,6 +906,8 @@
|
|||||||
Комментарий = Неопределено;
|
Комментарий = Неопределено;
|
||||||
ТипКонтактнойИнформации = Неопределено;
|
ТипКонтактнойИнформации = Неопределено;
|
||||||
|
|
||||||
|
Результат = УправлениеКонтактнойИнформациейКлиентСервер.ПоляКонтактнойИнформацииДляПреобразования();
|
||||||
|
|
||||||
Если ТипЗнч(Данные) = Тип("ОбъектXDTO") Тогда
|
Если ТипЗнч(Данные) = Тип("ОбъектXDTO") Тогда
|
||||||
XMLСтрока = КонтактнаяИнформацияXDTOВXML(Данные);
|
XMLСтрока = КонтактнаяИнформацияXDTOВXML(Данные);
|
||||||
ТипКонтактнойИнформации = ЗначениеИзСтрокиXML(XSLT_ТипКонтактнойИнформацииПоСтрокеXML(XMLСтрока));
|
ТипКонтактнойИнформации = ЗначениеИзСтрокиXML(XSLT_ТипКонтактнойИнформацииПоСтрокеXML(XMLСтрока));
|
||||||
@@ -946,13 +948,17 @@
|
|||||||
|
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
|
Результат.ТипКонтактнойИнформации = ТипКонтактнойИнформации;
|
||||||
|
|
||||||
Если ЗначениеЗаполнено(XMLСтрока) Тогда
|
Если ЗначениеЗаполнено(XMLСтрока) Тогда
|
||||||
|
|
||||||
Если Не ПустаяСтрока(Комментарий) Тогда
|
Если Не ПустаяСтрока(Комментарий) Тогда
|
||||||
УправлениеКонтактнойИнформацией.УстановитьКомментарийКонтактнойИнформации(ЗначенияПолей, Комментарий);
|
УправлениеКонтактнойИнформацией.УстановитьКомментарийКонтактнойИнформации(ЗначенияПолей, Комментарий);
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
Возврат Новый Структура("ДанныеXML, ТипКонтактнойИнформации", XMLСтрока, ТипКонтактнойИнформации);
|
Результат.ДанныеXML = XMLСтрока;
|
||||||
|
Возврат Результат;
|
||||||
|
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
// Разбираем по ЗначенияПолей, ВидКонтактнойИнформации, Представление.
|
// Разбираем по ЗначенияПолей, ВидКонтактнойИнформации, Представление.
|
||||||
@@ -985,8 +991,6 @@
|
|||||||
|
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
Результат = Новый Структура("ТипКонтактнойИнформации, ДанныеXML", ТипКонтактнойИнформации);
|
|
||||||
|
|
||||||
ВсеТипы = Перечисления.ТипыКонтактнойИнформации;
|
ВсеТипы = Перечисления.ТипыКонтактнойИнформации;
|
||||||
Если ТипКонтактнойИнформации = ВсеТипы.Адрес Тогда
|
Если ТипКонтактнойИнформации = ВсеТипы.Адрес Тогда
|
||||||
Результат.ДанныеXML = XSLT_СтруктураВАдрес(СтрокаXMLСтруктуры, Данные.Представление, Комментарий);
|
Результат.ДанныеXML = XSLT_СтруктураВАдрес(СтрокаXMLСтруктуры, Данные.Представление, Комментарий);
|
||||||
@@ -1013,6 +1017,7 @@
|
|||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
Возврат Результат;
|
Возврат Результат;
|
||||||
|
|
||||||
КонецФункции
|
КонецФункции
|
||||||
|
|
||||||
Функция КонтактнаяИнформацияXDTOВXML(ОбъектXDTOИнформации) Экспорт
|
Функция КонтактнаяИнформацияXDTOВXML(ОбъектXDTOИнформации) Экспорт
|
||||||
|
|||||||
@@ -389,7 +389,6 @@
|
|||||||
Блокировка = Новый БлокировкаДанных;
|
Блокировка = Новый БлокировкаДанных;
|
||||||
ЭлементБлокировки = Блокировка.Добавить(ОбъектМетаданных.ПолноеИмя());
|
ЭлементБлокировки = Блокировка.Добавить(ОбъектМетаданных.ПолноеИмя());
|
||||||
ЭлементБлокировки.УстановитьЗначение("Ссылка", Ссылка);
|
ЭлементБлокировки.УстановитьЗначение("Ссылка", Ссылка);
|
||||||
ЭлементБлокировки.Режим = РежимБлокировкиДанных.Исключительный;
|
|
||||||
|
|
||||||
НачатьТранзакцию();
|
НачатьТранзакцию();
|
||||||
Попытка
|
Попытка
|
||||||
@@ -2085,7 +2084,6 @@
|
|||||||
Блокировка = Новый БлокировкаДанных;
|
Блокировка = Новый БлокировкаДанных;
|
||||||
ЭлементБлокировки = Блокировка.Добавить(ОбъектМетаданных.ПолноеИмя());
|
ЭлементБлокировки = Блокировка.Добавить(ОбъектМетаданных.ПолноеИмя());
|
||||||
ЭлементБлокировки.УстановитьЗначение("Ссылка", Ссылка);
|
ЭлементБлокировки.УстановитьЗначение("Ссылка", Ссылка);
|
||||||
ЭлементБлокировки.Режим = РежимБлокировкиДанных.Исключительный;
|
|
||||||
|
|
||||||
НачатьТранзакцию();
|
НачатьТранзакцию();
|
||||||
Попытка
|
Попытка
|
||||||
@@ -2277,7 +2275,6 @@
|
|||||||
Блокировка = Новый БлокировкаДанных;
|
Блокировка = Новый БлокировкаДанных;
|
||||||
ЭлементБлокировки = Блокировка.Добавить(ОбъектМетаданных.ПолноеИмя());
|
ЭлементБлокировки = Блокировка.Добавить(ОбъектМетаданных.ПолноеИмя());
|
||||||
ЭлементБлокировки.УстановитьЗначение("Ссылка", Ссылка);
|
ЭлементБлокировки.УстановитьЗначение("Ссылка", Ссылка);
|
||||||
ЭлементБлокировки.Режим = РежимБлокировкиДанных.Исключительный;
|
|
||||||
|
|
||||||
НачатьТранзакцию();
|
НачатьТранзакцию();
|
||||||
Попытка
|
Попытка
|
||||||
@@ -2310,7 +2307,6 @@
|
|||||||
Блокировка = Новый БлокировкаДанных;
|
Блокировка = Новый БлокировкаДанных;
|
||||||
ЭлементБлокировки = Блокировка.Добавить(ОбъектМетаданных.ПолноеИмя());
|
ЭлементБлокировки = Блокировка.Добавить(ОбъектМетаданных.ПолноеИмя());
|
||||||
ЭлементБлокировки.УстановитьЗначение("Ссылка", Ссылка);
|
ЭлементБлокировки.УстановитьЗначение("Ссылка", Ссылка);
|
||||||
ЭлементБлокировки.Режим = РежимБлокировкиДанных.Исключительный;
|
|
||||||
|
|
||||||
НачатьТранзакцию();
|
НачатьТранзакцию();
|
||||||
Попытка
|
Попытка
|
||||||
|
|||||||
+9
-1
@@ -54,12 +54,20 @@
|
|||||||
//
|
//
|
||||||
Функция ПривестиКонтактнуюИнформациюXML(Знач Данные) Экспорт
|
Функция ПривестиКонтактнуюИнформациюXML(Знач Данные) Экспорт
|
||||||
|
|
||||||
|
Результат = УправлениеКонтактнойИнформациейКлиентСервер.ПоляКонтактнойИнформацииДляПреобразования();
|
||||||
|
|
||||||
Если УправлениеКонтактнойИнформациейСлужебныйПовтИсп.ДоступенМодульЛокализации() Тогда
|
Если УправлениеКонтактнойИнформациейСлужебныйПовтИсп.ДоступенМодульЛокализации() Тогда
|
||||||
МодульУправлениеКонтактнойИнформациейЛокализация = ОбщегоНазначения.ОбщийМодуль("УправлениеКонтактнойИнформациейЛокализация");
|
МодульУправлениеКонтактнойИнформациейЛокализация = ОбщегоНазначения.ОбщийМодуль("УправлениеКонтактнойИнформациейЛокализация");
|
||||||
Возврат МодульУправлениеКонтактнойИнформациейЛокализация.ПривестиКонтактнуюИнформациюXML(Данные);
|
Возврат МодульУправлениеКонтактнойИнформациейЛокализация.ПривестиКонтактнуюИнформациюXML(Данные);
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
Возврат Новый Структура("ТипКонтактнойИнформации, ДанныеXML", Неопределено, "");
|
Если УправлениеКонтактнойИнформациейКлиентСервер.ЭтоКонтактнаяИнформацияВJSON(Данные.ЗначенияПолей) Тогда
|
||||||
|
ПоляКонтактнойИнформации = УправлениеКонтактнойИнформацией.БазовыеСведенияКонтактнойИнформации(Данные.ЗначенияПолей);
|
||||||
|
ЗаполнитьЗначенияСвойств(Результат, ПоляКонтактнойИнформации);
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
Возврат Результат;
|
||||||
|
|
||||||
|
|
||||||
КонецФункции
|
КонецФункции
|
||||||
|
|
||||||
|
|||||||
@@ -748,6 +748,8 @@
|
|||||||
КодЯзыка = СтрРазделить(КодЯзыка, "_", Истина)[0];
|
КодЯзыка = СтрРазделить(КодЯзыка, "_", Истина)[0];
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
|
ЗапомнитьПоследнийИспользованныйМакет(ПутьКМакету);
|
||||||
|
|
||||||
Возврат НайтиМакет(ПутьКМакету, КодЯзыка);
|
Возврат НайтиМакет(ПутьКМакету, КодЯзыка);
|
||||||
|
|
||||||
КонецФункции
|
КонецФункции
|
||||||
@@ -915,52 +917,8 @@
|
|||||||
//
|
//
|
||||||
Процедура ОтключитьПользовательскийМакет(ПутьКМакету) Экспорт
|
Процедура ОтключитьПользовательскийМакет(ПутьКМакету) Экспорт
|
||||||
|
|
||||||
ЧастиСтроки = СтрРазделить(ПутьКМакету, ".", Истина);
|
Макеты = ОбщегоНазначенияКлиентСервер.ЗначениеВМассиве(ПутьКМакету);
|
||||||
Если ЧастиСтроки.Количество() <> 2 И ЧастиСтроки.Количество() <> 3 Тогда
|
РегистрыСведений.ПользовательскиеМакетыПечати.УстановитьИспользованиеИзмененныхМакетов(Макеты, Ложь);
|
||||||
ВызватьИсключение СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(НСтр("ru = 'Макет ""%1"" не существует.'"), ПутьКМакету);
|
|
||||||
КонецЕсли;
|
|
||||||
|
|
||||||
ИмяМакета = ЧастиСтроки[ЧастиСтроки.ВГраница()];
|
|
||||||
ЧастиСтроки.Удалить(ЧастиСтроки.ВГраница());
|
|
||||||
ИмяВладельца = СтрСоединить(ЧастиСтроки, ".");
|
|
||||||
|
|
||||||
НаборЗаписей = РегистрыСведений.ПользовательскиеМакетыПечати.СоздатьНаборЗаписей();
|
|
||||||
НаборЗаписей.Отбор.Объект.Установить(ИмяВладельца);
|
|
||||||
НаборЗаписей.Отбор.ИмяМакета.Установить(ИмяМакета);
|
|
||||||
|
|
||||||
Блокировка = Новый БлокировкаДанных;
|
|
||||||
ЭлементБлокировки = Блокировка.Добавить("РегистрСведений.ПользовательскиеМакетыПечати");
|
|
||||||
ЭлементБлокировки.УстановитьЗначение("Объект", ИмяВладельца);
|
|
||||||
ЭлементБлокировки.УстановитьЗначение("ИмяМакета", ИмяМакета);
|
|
||||||
|
|
||||||
НачатьТранзакцию();
|
|
||||||
Попытка
|
|
||||||
Блокировка.Заблокировать();
|
|
||||||
|
|
||||||
НаборЗаписей.Прочитать();
|
|
||||||
Для Каждого Запись Из НаборЗаписей Цикл
|
|
||||||
Запись.Использование = Ложь;
|
|
||||||
КонецЦикла;
|
|
||||||
|
|
||||||
Если НаборЗаписей.Количество() > 0 Тогда
|
|
||||||
Если ОбновлениеИнформационнойБазы.ЭтоВызовИзОбработчикаОбновления() Тогда
|
|
||||||
ОбновлениеИнформационнойБазы.ЗаписатьНаборЗаписей(НаборЗаписей);
|
|
||||||
Иначе
|
|
||||||
УстановитьОтключениеБезопасногоРежима(Истина);
|
|
||||||
УстановитьПривилегированныйРежим(Истина);
|
|
||||||
|
|
||||||
НаборЗаписей.Записать();
|
|
||||||
|
|
||||||
УстановитьПривилегированныйРежим(Ложь);
|
|
||||||
УстановитьОтключениеБезопасногоРежима(Ложь);
|
|
||||||
КонецЕсли;
|
|
||||||
КонецЕсли;
|
|
||||||
|
|
||||||
ЗафиксироватьТранзакцию();
|
|
||||||
Исключение
|
|
||||||
ОтменитьТранзакцию();
|
|
||||||
ВызватьИсключение;
|
|
||||||
КонецПопытки;
|
|
||||||
|
|
||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
@@ -3405,10 +3363,32 @@
|
|||||||
// @skip-check query-in-loop - Малый цикл
|
// @skip-check query-in-loop - Малый цикл
|
||||||
Печать(ОбъектыСоответствующиеПечатнойФорме, ПараметрыПечати, ВременнаяКоллекцияДляОднойПечатнойФормы,
|
Печать(ОбъектыСоответствующиеПечатнойФорме, ПараметрыПечати, ВременнаяКоллекцияДляОднойПечатнойФормы,
|
||||||
ОбъектыПечати, ПараметрыВывода);
|
ОбъектыПечати, ПараметрыВывода);
|
||||||
Иначе
|
Иначе
|
||||||
|
ОчиститьПоследнийИспользованныйМакет();
|
||||||
МенеджерПечати = ОбщегоНазначения.МенеджерОбъектаПоПолномуИмени(ИспользуемыйМенеджерПечати);
|
МенеджерПечати = ОбщегоНазначения.МенеджерОбъектаПоПолномуИмени(ИспользуемыйМенеджерПечати);
|
||||||
МенеджерПечати.Печать(ОбъектыСоответствующиеПечатнойФорме, ПараметрыПечати, ВременнаяКоллекцияДляОднойПечатнойФормы,
|
Попытка
|
||||||
ОбъектыПечати, ПараметрыВывода);
|
МенеджерПечати.Печать(ОбъектыСоответствующиеПечатнойФорме, ПараметрыПечати, ВременнаяКоллекцияДляОднойПечатнойФормы,
|
||||||
|
ОбъектыПечати, ПараметрыВывода);
|
||||||
|
Исключение
|
||||||
|
Если ВременнаяКоллекцияДляОднойПечатнойФормы.Количество() <> 1 Тогда
|
||||||
|
ВызватьИсключение;
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
ЗаписьЖурналаРегистрации(НСтр("ru = 'Печать'", ОбщегоНазначения.КодОсновногоЯзыка()), УровеньЖурналаРегистрации.Ошибка, , ,
|
||||||
|
ОбработкаОшибок.ПодробноеПредставлениеОшибки(ИнформацияОбОшибке()));
|
||||||
|
|
||||||
|
Если Не ПравоДоступа("Изменение", Метаданные.РегистрыСведений.ПользовательскиеМакетыПечати) Тогда
|
||||||
|
ВызватьИсключение НСтр("ru = 'Не удалось сформировать печатную форму.
|
||||||
|
|Обратитесь к администратору.'");
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
ВременнаяКоллекцияДляОднойПечатнойФормы[0].ТабличныйДокумент = Новый ТабличныйДокумент;
|
||||||
|
ВременнаяКоллекцияДляОднойПечатнойФормы[0].ТекстОшибкиФормирования = ОбработкаОшибок.КраткоеПредставлениеОшибки(ИнформацияОбОшибке());
|
||||||
|
|
||||||
|
Если Не ЗначениеЗаполнено(ВременнаяКоллекцияДляОднойПечатнойФормы[0].ПолныйПутьКМакету) Тогда
|
||||||
|
ВременнаяКоллекцияДляОднойПечатнойФормы[0].ПолныйПутьКМакету = ПоследнийИспользованныйМакет();
|
||||||
|
КонецЕсли;
|
||||||
|
КонецПопытки;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
Иначе
|
Иначе
|
||||||
ВременнаяКоллекцияДляОднойПечатнойФормы[0].ТабличныйДокумент = Новый ТабличныйДокумент;
|
ВременнаяКоллекцияДляОднойПечатнойФормы[0].ТабличныйДокумент = Новый ТабличныйДокумент;
|
||||||
@@ -5760,18 +5740,27 @@
|
|||||||
ПредыдущаяТаблица = "";
|
ПредыдущаяТаблица = "";
|
||||||
|
|
||||||
Для НомерСтроки = Область.Верх По Область.Низ Цикл
|
Для НомерСтроки = Область.Верх По Область.Низ Цикл
|
||||||
ОбластьСтроки = Макет.Область(НомерСтроки, , НомерСтроки);
|
Верх = НомерСтроки;
|
||||||
|
Низ = НомерСтроки;
|
||||||
|
|
||||||
|
Для НомерКолонки = 1 По Макет.ШиринаТаблицы Цикл
|
||||||
|
ОбластьЯчейки = Макет.Область(НомерСтроки, НомерКолонки);
|
||||||
|
Низ = Макс(Низ, ОбластьЯчейки.Низ);
|
||||||
|
КонецЦикла;
|
||||||
|
|
||||||
|
НомерСтроки = Низ;
|
||||||
|
ОбластьСтроки = Макет.Область(Верх, , Низ);
|
||||||
ТекущаяТаблица = ИмяТаблицыВОбластиМакета(Макет, ОбластьСтроки, Таблицы);
|
ТекущаяТаблица = ИмяТаблицыВОбластиМакета(Макет, ОбластьСтроки, Таблицы);
|
||||||
|
|
||||||
Если ПредыдущаяТаблица <> ТекущаяТаблица И НомерСтроки > НачалоОбласти Тогда
|
Если ПредыдущаяТаблица <> ТекущаяТаблица И Верх > НачалоОбласти Тогда
|
||||||
ИдентификаторОбласти = "R" + XMLСтрока(НачалоОбласти) + ":R" + XMLСтрока(НомерСтроки - 1);
|
ИдентификаторОбласти = "R" + XMLСтрока(НачалоОбласти) + ":R" + XMLСтрока(Верх - 1);
|
||||||
ВсеОбласти.Добавить(ИдентификаторОбласти);
|
ВсеОбласти.Добавить(ИдентификаторОбласти);
|
||||||
|
|
||||||
Если ЗначениеЗаполнено(ПредыдущаяТаблица) Тогда
|
Если ЗначениеЗаполнено(ПредыдущаяТаблица) Тогда
|
||||||
ОбластиТаблиц.Вставить(ИдентификаторОбласти, ПредыдущаяТаблица);
|
ОбластиТаблиц.Вставить(ИдентификаторОбласти, ПредыдущаяТаблица);
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
НачалоОбласти = НомерСтроки;
|
НачалоОбласти = Верх;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
|
|
||||||
ПредыдущаяТаблица = ТекущаяТаблица;
|
ПредыдущаяТаблица = ТекущаяТаблица;
|
||||||
@@ -5793,15 +5782,23 @@
|
|||||||
КонецФункции
|
КонецФункции
|
||||||
|
|
||||||
Функция ИмяТаблицыВОбластиМакета(Макет, Область, Таблицы)
|
Функция ИмяТаблицыВОбластиМакета(Макет, Область, Таблицы)
|
||||||
|
|
||||||
|
ОбработанныеЯчейки = Новый Соответствие;
|
||||||
|
|
||||||
ИмяТаблицы = "";
|
ИмяТаблицы = "";
|
||||||
Для НомерСтроки = Область.Верх По Область.Низ Цикл
|
Для НомерСтроки = Область.Верх По Область.Низ Цикл
|
||||||
Для НомерСтолбца = 1 По Макет.ШиринаТаблицы Цикл
|
Для НомерСтолбца = 1 По Макет.ШиринаТаблицы Цикл
|
||||||
Область = Макет.Область(НомерСтроки, НомерСтолбца, НомерСтроки, НомерСтолбца);
|
ОбластьЯчейки = Макет.Область(НомерСтроки, НомерСтолбца, НомерСтроки, НомерСтолбца);
|
||||||
|
|
||||||
|
ИдентификаторОбласти = ИдентификаторОбласти(ОбластьЯчейки);
|
||||||
|
Если ОбработанныеЯчейки[ИдентификаторОбласти] <> Неопределено Тогда
|
||||||
|
Продолжить;
|
||||||
|
КонецЕсли;
|
||||||
|
ОбработанныеЯчейки[ИдентификаторОбласти] = Истина;
|
||||||
|
|
||||||
Для Каждого Таблица Из Таблицы Цикл
|
Для Каждого Таблица Из Таблицы Цикл
|
||||||
СтрокаПоиска = "[" + Таблица + ".";
|
СтрокаПоиска = "[" + Таблица + ".";
|
||||||
Если СтрНайти(Область.Текст, СтрокаПоиска) Тогда
|
Если СтрНайти(ОбластьЯчейки.Текст, СтрокаПоиска) Тогда
|
||||||
ИмяТаблицы = Таблица;
|
ИмяТаблицы = Таблица;
|
||||||
Прервать;
|
Прервать;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
@@ -7217,4 +7214,31 @@
|
|||||||
|
|
||||||
КонецПроцедуры
|
КонецПроцедуры
|
||||||
|
|
||||||
|
Процедура ЗапомнитьПоследнийИспользованныйМакет(ПутьКМакету)
|
||||||
|
|
||||||
|
УстановитьОтключениеБезопасногоРежима(Истина);
|
||||||
|
УстановитьПривилегированныйРежим(Истина);
|
||||||
|
|
||||||
|
ОбщегоНазначения.ХранилищеОбщихНастроекСохранить("Печать", "ПоследнийИспользованныйМакет", ПутьКМакету);
|
||||||
|
|
||||||
|
КонецПроцедуры
|
||||||
|
|
||||||
|
Функция ПоследнийИспользованныйМакет()
|
||||||
|
|
||||||
|
УстановитьОтключениеБезопасногоРежима(Истина);
|
||||||
|
УстановитьПривилегированныйРежим(Истина);
|
||||||
|
|
||||||
|
Возврат ОбщегоНазначения.ХранилищеОбщихНастроекЗагрузить("Печать", "ПоследнийИспользованныйМакет", Неопределено);
|
||||||
|
|
||||||
|
КонецФункции
|
||||||
|
|
||||||
|
Процедура ОчиститьПоследнийИспользованныйМакет()
|
||||||
|
|
||||||
|
УстановитьОтключениеБезопасногоРежима(Истина);
|
||||||
|
УстановитьПривилегированныйРежим(Истина);
|
||||||
|
|
||||||
|
ОбщегоНазначения.ХранилищеОбщихНастроекУдалить("Печать", "ПоследнийИспользованныйМакет", Неопределено);
|
||||||
|
|
||||||
|
КонецПроцедуры
|
||||||
|
|
||||||
#КонецОбласти
|
#КонецОбласти
|
||||||
Loaded 100 of 212 files, more files were not shown because too many files have changed in this diff.
Show more
Reference in new issue
Block a user