This commit is contained in:
Компания 1С committed 2017-04-27 18:34:00 +03:00
1 parent 16320d876b
commit 5a5e75c7ad
41 files changed
+528 -298

No files matched your search

@@ -11,6 +11,12 @@
БизнесПроцессыИЗадачиПереопределяемый.ПриЗаполненииНаборовЗначенийДоступа(ЭтотОбъект, Таблица); БизнесПроцессыИЗадачиПереопределяемый.ПриЗаполненииНаборовЗначенийДоступа(ЭтотОбъект, Таблица);
Если Таблица.Количество() > 0 Тогда
Возврат;
КонецЕсли;
ЗаполнитьНаборыЗначенийДоступаПоУмолчанию(Таблица);
КонецПроцедуры КонецПроцедуры
// Конец СтандартныеПодсистемы.УправлениеДоступом // Конец СтандартныеПодсистемы.УправлениеДоступом
@@ -345,7 +351,7 @@
КонецФункции КонецФункции
Функция РезультатВыполненияТочкиПроверить(Знач ЗадачаСсылка) Функция РезультатВыполненияТочкиПроверить(Знач ЗадачаСсылка)
Если НЕ Подтверждено Тогда Если НЕ Подтверждено Тогда
СтрокаФормат = "%1, %2 " + НСтр("ru = 'вернул(а) задачу на доработку'") + ": СтрокаФормат = "%1, %2 " + НСтр("ru = 'вернул(а) задачу на доработку'") + ":
@@ -370,6 +376,35 @@
КонецФункции КонецФункции
Процедура ЗаполнитьНаборыЗначенийДоступаПоУмолчанию(Таблица)
// Логика ограничения по умолчанию для
// - чтения: Автор ИЛИ Исполнитель (с учетом адресации) ИЛИ Проверяющий (с учетом адресации)
// - изменения: Автор.
// Если предмет не задан (т.е. бизнес-процесс без основания), тогда предмет не участвует в логике ограничения.
// Чтение, Изменение: набор № 1.
Строка = Таблица.Добавить();
Строка.НомерНабора = 1;
Строка.Чтение = Истина;
Строка.Изменение = Истина;
Строка.ЗначениеДоступа = ЭтотОбъект.Автор;
// Чтение: набор № 2.
Строка = Таблица.Добавить();
Строка.НомерНабора = 2;
Строка.Чтение = Истина;
Строка.ЗначениеДоступа = ЭтотОбъект.ГруппаИсполнителейЗадач;
// Чтение: набор № 3.
Строка = Таблица.Добавить();
Строка.НомерНабора = 3;
Строка.Чтение = Истина;
Строка.ЗначениеДоступа = ЭтотОбъект.ГруппаИсполнителейЗадачПроверяющий;
КонецПроцедуры
#КонецОбласти #КонецОбласти
#КонецЕсли #КонецЕсли
@@ -354,6 +354,10 @@
<value>Поле контактной информации хранит не только текущее значение, но и его историю изменений на указанную дату. Для просмотра истории необходимо в контекстном меню элемента контактной информации выбрать пункт «История изменений».</value> <value>Поле контактной информации хранит не только текущее значение, но и его историю изменений на указанную дату. Для просмотра истории необходимо в контекстном меню элемента контактной информации выбрать пункт «История изменений».</value>
</toolTip> </toolTip>
<toolTipRepresentation>Button</toolTipRepresentation> <toolTipRepresentation>Button</toolTipRepresentation>
<handlers>
<event>OnChange</event>
<name>ХранитьИсториюИзмененийПриИзменении</name>
</handlers>
<extendedTooltip> <extendedTooltip>
<name>ХранитьИсториюИзмененийРасширеннаяПодсказка</name> <name>ХранитьИсториюИзмененийРасширеннаяПодсказка</name>
<id>164</id> <id>164</id>
@@ -420,6 +424,10 @@
<key>ru</key> <key>ru</key>
<value>Разрешить ввод нескольких значений одного вида</value> <value>Разрешить ввод нескольких значений одного вида</value>
</toolTip> </toolTip>
<handlers>
<event>OnChange</event>
<name>РазрешитьВводНесколькихЗначенийПриИзменении</name>
</handlers>
<extendedTooltip> <extendedTooltip>
<name>РазрешитьВводНесколькихЗначенийExtendedTooltip</name> <name>РазрешитьВводНесколькихЗначенийExtendedTooltip</name>
<id>94</id> <id>94</id>
@@ -27,7 +27,8 @@
КонецЕсли; КонецЕсли;
СсылкаРодителя = Объект.Родитель; СсылкаРодителя = Объект.Родитель;
Элементы.ХранитьИсториюИзменений.Доступность = Объект.РедактированиеТолькоВДиалоге; Элементы.ХранитьИсториюИзменений.Доступность = Объект.РедактированиеТолькоВДиалоге;
Элементы.РазрешитьВводНесколькихЗначений.Доступность = НЕ Объект.ХранитьИсториюИзменений;
Если Не Объект.МожноИзменятьСпособРедактирования Тогда Если Не Объект.МожноИзменятьСпособРедактирования Тогда
Элементы.РедактированиеТолькоВДиалоге.Доступность = Ложь; Элементы.РедактированиеТолькоВДиалоге.Доступность = Ложь;
@@ -130,8 +131,31 @@
Элементы.ХранитьИсториюИзменений.Доступность = Истина; Элементы.ХранитьИсториюИзменений.Доступность = Истина;
Иначе Иначе
Элементы.ХранитьИсториюИзменений.Доступность = Ложь; Элементы.ХранитьИсториюИзменений.Доступность = Ложь;
Объект.ХранитьИсториюИзменений = Ложь;
КонецЕсли;
Элементы.РазрешитьВводНесколькихЗначений.Доступность = НЕ Объект.ХранитьИсториюИзменений;
КонецПроцедуры
&НаКлиенте
Процедура ХранитьИсториюИзмененийПриИзменении(Элемент)
Если Объект.ХранитьИсториюИзменений Тогда
Объект.РазрешитьВводНесколькихЗначений = Ложь;
КонецЕсли;
Элементы.РазрешитьВводНесколькихЗначений.Доступность = Не Объект.ХранитьИсториюИзменений;
КонецПроцедуры
&НаКлиенте
Процедура РазрешитьВводНесколькихЗначенийПриИзменении(Элемент)
Если Объект.РазрешитьВводНесколькихЗначений Тогда
Объект.ХранитьИсториюИзменений = Ложь; Объект.ХранитьИсториюИзменений = Ложь;
КонецЕсли; КонецЕсли;
КонецПроцедуры КонецПроцедуры
#КонецОбласти #КонецОбласти
@@ -216,5 +240,6 @@
КонецЕсли; КонецЕсли;
КонецПроцедуры КонецПроцедуры
#КонецОбласти #КонецОбласти
@@ -4,6 +4,15 @@
Процедура ОбработкаПроверкиЗаполнения(Отказ, ПроверяемыеРеквизиты) Процедура ОбработкаПроверкиЗаполнения(Отказ, ПроверяемыеРеквизиты)
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.ПрофилиБезопасности") Тогда
МодульРаботаВБезопасномРежиме = ОбщегоНазначения.ОбщийМодуль("РаботаВБезопасномРежиме");
ИспользуютсяПрофилиБезопасности = МодульРаботаВБезопасномРежиме.ИспользуютсяПрофилиБезопасности();
Иначе
ИспользуютсяПрофилиБезопасности = Ложь;
КонецЕсли;
Если Не ДополнительныеСвойства.Свойство("ПропуститьОсновнуюПроверкуЗаполнения") Тогда Если Не ДополнительныеСвойства.Свойство("ПропуститьОсновнуюПроверкуЗаполнения") Тогда
Если Не НомерПорядкаУникален(ПорядокЗаполнения, Ссылка) Тогда Если Не НомерПорядкаУникален(ПорядокЗаполнения, Ссылка) Тогда
@@ -31,7 +40,7 @@
Возврат; Возврат;
КонецЕсли; КонецЕсли;
Если Не ПолучитьФункциональнуюОпцию("ИспользуютсяПрофилиБезопасности") Если Не ИспользуютсяПрофилиБезопасности
И Не ПустаяСтрока(ПолныйПутьWindows) И Не ПустаяСтрока(ПолныйПутьWindows)
И ( Лев(ПолныйПутьWindows, 2) <> "\\" И ( Лев(ПолныйПутьWindows, 2) <> "\\"
ИЛИ СтрНайти(ПолныйПутьWindows, ":") <> 0 ) Тогда ИЛИ СтрНайти(ПолныйПутьWindows, ":") <> 0 ) Тогда
@@ -66,7 +75,7 @@
Исключение Исключение
ИнформацияОбОшибке = ИнформацияОбОшибке(); ИнформацияОбОшибке = ИнформацияОбОшибке();
Если ПолучитьФункциональнуюОпцию("ИспользуютсяПрофилиБезопасности") Тогда Если ИспользуютсяПрофилиБезопасности Тогда
ШаблонОшибки = ШаблонОшибки =
НСтр("ru = 'Путь к тому некорректен. НСтр("ru = 'Путь к тому некорректен.
|Возможно не настроены разрешения в профилях безопасности, |Возможно не настроены разрешения в профилях безопасности,
@@ -904,11 +904,11 @@
Элементы.ГруппаДоступ.Видимость = Ложь; Элементы.ГруппаДоступ.Видимость = Ложь;
КонецЕсли; КонецЕсли;
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.ДополнительныеОтчетыИОбработки") Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.ДополнительныеОтчетыИОбработки") Тогда
И ПолучитьФункциональнуюОпцию("ИспользоватьДополнительныеОтчетыИОбработки") Тогда МодульДополнительныеОтчетыИОбработки = ОбщегоНазначения.ОбщийМодуль("ДополнительныеОтчетыИОбработки");
Элементы.ФормаГруппаСообщениеФормируется.Видимость = Истина; Элементы.ФормаГруппаСообщениеФормируется.Видимость = МодульДополнительныеОтчетыИОбработки.ИспользуютсяДополнительныеОтчетыИОбработки();
Иначе Иначе
Элементы.ФормаГруппаСообщениеФормируется.Видимость = Ложь; Элементы.ФормаГруппаСообщениеФормируется.Видимость = Ложь;
КонецЕсли; КонецЕсли;
Если НЕ ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.Печать") Тогда Если НЕ ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.Печать") Тогда
@@ -46,6 +46,12 @@
ЗаполнитьЗначенияСвойств(ЭтотОбъект, ПараметрыШаблона); ЗаполнитьЗначенияСвойств(ЭтотОбъект, ПараметрыШаблона);
Если ТипЗнч(ДанныеЗаполнения) = Тип("Структура")
И ДанныеЗаполнения.Свойство("ПредназначенДляSMS")
И ДанныеЗаполнения.ПредназначенДляSMS Тогда
ПараметрыШаблона.ТипШаблона = "SMS";
КонецЕсли;
Если ЗначениеЗаполнено(ПараметрыШаблона.ВнешняяОбработка) Тогда Если ЗначениеЗаполнено(ПараметрыШаблона.ВнешняяОбработка) Тогда
ЭтотОбъект.ШаблонПоВнешнейОбработке = Истина; ЭтотОбъект.ШаблонПоВнешнейОбработке = Истина;
КонецЕсли; КонецЕсли;
@@ -58,25 +64,31 @@
КонецЕсли; КонецЕсли;
Если ПараметрыШаблона.ТипШаблона = "Письмо" Тогда Если ПараметрыШаблона.ТипШаблона = "Письмо" Тогда
ЭтотОбъект.ПредназначенДляSMS = Ложь;
ЭтотОбъект.ПредназначенДляSMS = Ложь;
ЭтотОбъект.ПредназначенДляЭлектронныхПисем = Истина; ЭтотОбъект.ПредназначенДляЭлектронныхПисем = Истина;
ЭтотОбъект.ТемаПисьма = ПараметрыШаблона.Тема; ЭтотОбъект.ТемаПисьма = ПараметрыШаблона.Тема;
Если ПараметрыШаблона.ФорматПисьма = Перечисления.СпособыРедактированияЭлектронныхПисем.HTML Тогда Если ПараметрыШаблона.ФорматПисьма = Перечисления.СпособыРедактированияЭлектронныхПисем.HTML Тогда
ЭтотОбъект.ТекстШаблонаПисьмаHTML = ПараметрыШаблона.Текст; ЭтотОбъект.ТекстШаблонаПисьмаHTML = ПараметрыШаблона.Текст;
ЭтотОбъект.ТипТекстаПисьма = Перечисления.СпособыРедактированияЭлектронныхПисем.HTML; ЭтотОбъект.ТипТекстаПисьма = Перечисления.СпособыРедактированияЭлектронныхПисем.HTML;
Иначе Иначе
ЭтотОбъект.ТекстШаблонаПисьма = ПараметрыШаблона.Текст; ЭтотОбъект.ТекстШаблонаПисьма = ПараметрыШаблона.Текст;
ЭтотОбъект.ТипТекстаПисьма = Перечисления.СпособыРедактированияЭлектронныхПисем.ОбычныйТекст; ЭтотОбъект.ТипТекстаПисьма = Перечисления.СпособыРедактированияЭлектронныхПисем.ОбычныйТекст;
КонецЕсли; КонецЕсли;
ИначеЕсли ПараметрыШаблона.ТипШаблона = "SMS" Тогда ИначеЕсли ПараметрыШаблона.ТипШаблона = "SMS" Тогда
ЭтотОбъект.ПредназначенДляSMS = Истина;
ЭтотОбъект.ПредназначенДляSMS = Истина;
ЭтотОбъект.ПредназначенДляЭлектронныхПисем = Ложь; ЭтотОбъект.ПредназначенДляЭлектронныхПисем = Ложь;
ЭтотОбъект.ТекстШаблонаSMS = ПараметрыШаблона.Текст; ЭтотОбъект.ТекстШаблонаSMS = ПараметрыШаблона.Текст;
ЭтотОбъект.ОтправлятьВТранслите = ПараметрыШаблона.ПеревестиВТранслит; ЭтотОбъект.ОтправлятьВТранслите = ПараметрыШаблона.ПеревестиВТранслит;
ИначеЕсли ПараметрыШаблона.ТипШаблона = "Общий" Тогда ИначеЕсли ПараметрыШаблона.ТипШаблона = "Общий" Тогда
ЭтотОбъект.ПредназначенДляSMS = Ложь;
ЭтотОбъект.ПредназначенДляSMS = Ложь;
ЭтотОбъект.ПредназначенДляЭлектронныхПисем = Ложь; ЭтотОбъект.ПредназначенДляЭлектронныхПисем = Ложь;
КонецЕсли; КонецЕсли;
КонецПроцедуры КонецПроцедуры
@@ -27,7 +27,7 @@
При этом работа со всеми внешними ресурсами (синхронизация данных, отправка почты и т.п.), выполняемая по расписанию, При этом работа со всеми внешними ресурсами (синхронизация данных, отправка почты и т.п.), выполняемая по расписанию,
будет заблокирована для предотвращения конфликтов с основой информационной базой. будет заблокирована для предотвращения конфликтов с основой информационной базой.
Блокировку также можно снять позднее в разделе &lt;b>Администрирование&lt;/>&lt;b> - &lt;/>&lt;b>Поддержка и обслуживание&lt;/>.</value> Блокировку также можно снять позднее в разделе &lt;b>Администрирование&lt;/>&lt;b> - &lt;/>&lt;b>Обслуживание&lt;/>.</value>
</title> </title>
<visible>true</visible> <visible>true</visible>
<enabled>true</enabled> <enabled>true</enabled>
@@ -160,16 +160,16 @@
// СтандартныеПодсистемы.ШаблоныСообщений // СтандартныеПодсистемы.ШаблоныСообщений
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.ШаблоныСообщений") Элементы.ФормаСформироватьПоШаблону.Видимость = Ложь;
И ПолучитьФункциональнуюОпцию("ИспользоватьШаблоныСообщений") Тогда Элементы.ФормаСохранитьКакШаблон.Видимость = Ложь;
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.ШаблоныСообщений")Тогда
МодульШаблоныСообщенийСлужебный = ОбщегоНазначения.ОбщийМодуль("ШаблоныСообщенийСлужебный");
МодульШаблоныСообщенийСлужебный = ОбщегоНазначения.ОбщийМодуль("ШаблоныСообщенийСлужебный"); Если МодульШаблоныСообщенийСлужебный.ИспользуютсяШаблоныСообщений() Тогда
Элементы.ФормаСформироватьПоШаблону.Видимость = МодульШаблоныСообщенийСлужебный.ЕстьДоступныеШаблоны("Письмо"); Элементы.ФормаСформироватьПоШаблону.Видимость = МодульШаблоныСообщенийСлужебный.ЕстьДоступныеШаблоны("Письмо");
Элементы.ФормаСохранитьКакШаблон.Видимость = Истина; Элементы.ФормаСохранитьКакШаблон.Видимость = Истина;
КонецЕсли;
Иначе
Элементы.ФормаСформироватьПоШаблону.Видимость = Ложь;
Элементы.ФормаСохранитьКакШаблон.Видимость = Ложь;
КонецЕсли; КонецЕсли;
@@ -74,7 +74,17 @@
КонецПроцедуры КонецПроцедуры
// См. УправлениеДоступом.ЗаполнитьНаборыЗначенийДоступа. // Вызывается из модулей объектов подсистемы Взаимодействия для
// возможности настройки логики ограничения в прикладном решении.
//
// Пример заполнения наборов значений доступа см. в комментарии
// к процедуре УправлениеДоступом.ЗаполнитьНаборыЗначенийДоступа.
//
// Параметры:
// Объект - БизнесПроцессОбъект.Задание - объект, для которого нужно заполнить наборы.
//
// Таблица - ТаблицаЗначений - возвращаемая функцией УправлениеДоступом.ТаблицаНаборыЗначенийДоступа.
//
Процедура ПриЗаполненииНаборовЗначенийДоступа(Объект, Таблица) Экспорт Процедура ПриЗаполненииНаборовЗначенийДоступа(Объект, Таблица) Экспорт
@@ -56,7 +56,31 @@
// Заполним участников // Заполним участников
Если ЗначениеЗаполнено(Контакты) И (Контакты.Количество() > 0) Тогда Если ЗначениеЗаполнено(Контакты) И (Контакты.Количество() > 0) Тогда
Если ТипЗнч(Объект) = Тип("ДокументОбъект.ТелефонныйЗвонок")
Или ТипЗнч(Объект) = Тип("ДокументОбъект.СообщениеSMS") Тогда
Если ТипЗнч(ДанныеЗаполнения) = Тип("ДокументСсылка.ЭлектронноеПисьмоВходящее")
Или ТипЗнч(ДанныеЗаполнения) = Тип("ДокументСсылка.ЭлектронноеПисьмоИсходящее") Тогда
Для Каждого СтрокаКонтакт Из Контакты Цикл
Если ТипЗнч(СтрокаКонтакт) = Тип("Структура") Тогда
Если Не ЗначениеЗаполнено(СтрокаКонтакт.Контакт) Тогда
СтрокаКонтакт.Адрес = "";
КонецЕсли;
КонецЕсли;
КонецЦикла;
КонецЕсли;
КонецЕсли;
Объект.ЗаполнитьКонтакты(Контакты); Объект.ЗаполнитьКонтакты(Контакты);
КонецЕсли; КонецЕсли;
КонецПроцедуры КонецПроцедуры
@@ -224,6 +248,14 @@
КонецПроцедуры КонецПроцедуры
Функция ИспользуетсяПочтовыйКлиент() Экспорт
Возврат ПолучитьФункциональнуюОпцию("ИспользоватьПочтовыйКлиент");
КонецФункции
Функция ОтправлятьПисьмаВФорматеHTML() Экспорт
Возврат ПолучитьФункциональнуюОпцию("ОтправлятьПисьмаВФорматеHTML");
КонецФункции
//////////////////////////////////////////////////////////////////////////////// ////////////////////////////////////////////////////////////////////////////////
// Обработчики событий подсистем конфигурации. // Обработчики событий подсистем конфигурации.
@@ -41,7 +41,22 @@
КонецФункции КонецФункции
// См. УправлениеДоступом.ЗаполнитьНаборыЗначенийДоступа. // Вызывается из модулей объектов подсистемы Взаимодействия для
// возможности настройки логики ограничения в прикладном решении.
//
// Пример заполнения наборов значений доступа см. в комментарии
// к процедуре УправлениеДоступом.ЗаполнитьНаборыЗначенийДоступа.
//
// Параметры:
// Объект - ДокументОбъект.Встреча,
// ДокументОбъект.ЗапланированноеВзаимодействие,
// ДокументОбъект.СообщениеSMS,
// ДокументОбъект.ТелефонныйЗвонок,
// ДокументОбъект.ЭлектронноеПисьмоВходящее,
// ДокументОбъект.ЭлектронноеПисьмоИсходящее - объект, для которого нужно заполнить наборы.
//
// Таблица - ТаблицаЗначений - возвращаемая функцией УправлениеДоступом.ТаблицаНаборыЗначенийДоступа.
//
Процедура ПриЗаполненииНаборовЗначенийДоступа(Объект, Таблица) Экспорт Процедура ПриЗаполненииНаборовЗначенийДоступа(Объект, Таблица) Экспорт
@@ -1540,7 +1540,7 @@
Таблицы.Свернуть("Таблица"); Таблицы.Свернуть("Таблица");
ЗаголовокОшибки = ЗаголовокОшибки =
НСтр("ru = 'Ошибка в процедуре ПриЗаполненииИсточниковДанныхДляПроверкиЗапретаИзменения НСтр("ru = 'Ошибка в процедуре ЗаполнитьИсточникиДанныхДляПроверкиЗапретаИзменения
|общего модуля ДатыЗапретаИзмененияПереопределяемый.'") |общего модуля ДатыЗапретаИзмененияПереопределяемый.'")
+ Символы.ПС + Символы.ПС
+ Символы.ПС; + Символы.ПС;
@@ -527,15 +527,7 @@
КлючФоновогоЗадания = ПараметрыВыполнения.КлючФоновогоЗадания; КлючФоновогоЗадания = ПараметрыВыполнения.КлючФоновогоЗадания;
НаименованиеФоновогоЗадания = ?(ПустаяСтрока(ПараметрыВыполнения.НаименованиеФоновогоЗадания), НаименованиеФоновогоЗадания = ?(ПустаяСтрока(ПараметрыВыполнения.НаименованиеФоновогоЗадания),
ИмяПроцедуры, ПараметрыВыполнения.НаименованиеФоновогоЗадания); ИмяПроцедуры, ПараметрыВыполнения.НаименованиеФоновогоЗадания);
Если ТекущийРежимЗапуска() = Неопределено Тогда
Возврат ВыполнитьФоновоеЗадание(ПараметрыВыполнения,
ИмяПроцедуры, ПараметрыПроцедуры,
КлючФоновогоЗадания, НаименованиеФоновогоЗадания)
КонецЕсли;
ВсеПараметры = Новый Структура; ВсеПараметры = Новый Структура;
ВсеПараметры.Вставить("ИмяПроцедуры", ИмяПроцедуры); ВсеПараметры.Вставить("ИмяПроцедуры", ИмяПроцедуры);
ВсеПараметры.Вставить("ПараметрыПроцедуры", ПараметрыПроцедуры); ВсеПараметры.Вставить("ПараметрыПроцедуры", ПараметрыПроцедуры);
@@ -784,6 +784,10 @@
ВыполнитьКомандуВнешнегоОбъекта(ВнешнийОбъект, ВыполняемаяКоманда.Идентификатор, ПараметрыКоманды, Неопределено); ВыполнитьКомандуВнешнегоОбъекта(ВнешнийОбъект, ВыполняемаяКоманда.Идентификатор, ПараметрыКоманды, Неопределено);
КонецПроцедуры КонецПроцедуры
Функция ИспользуютсяДополнительныеОтчетыИОбработки() Экспорт
Возврат ПолучитьФункциональнуюОпцию("ИспользоватьДополнительныеОтчетыИОбработки");
КонецФункции
//////////////////////////////////////////////////////////////////////////////// ////////////////////////////////////////////////////////////////////////////////
// Обработчики подписок на события. // Обработчики подписок на события.
@@ -3518,17 +3518,13 @@
КонецФункции КонецФункции
Процедура ПолучитьЗначениеВложенныхСвойств(ИсточникСвойства, ВложенныеСвойства, ЗначениеСвойства) Процедура ПолучитьЗначениеВложенныхСвойств(ИсточникСвойства, ВложенныеСвойства, ЗначениеСвойства)
ИмяКонечногоСвойства = ВложенныеСвойства[ВложенныеСвойства.Количество()-1];
Если ИсточникСвойства.Свойство(ИмяКонечногоСвойства, ЗначениеСвойства) Тогда
Возврат;
КонецЕсли;
ТекущийИсточникСвойства = ИсточникСвойства; ТекущийИсточникСвойства = ИсточникСвойства;
ТекущееЗначениеСвойства = Неопределено; ТекущееЗначениеСвойства = Неопределено;
Для Уровень = 0 По ВложенныеСвойства.Количество()-2 Цикл Для Уровень = 0 По ВложенныеСвойства.Количество()-1 Цикл
Если НЕ ТекущийИсточникСвойства.Свойство(ВложенныеСвойства[Уровень], ТекущееЗначениеСвойства) Тогда Если НЕ ТекущийИсточникСвойства.Свойство(ВложенныеСвойства[Уровень], ТекущееЗначениеСвойства) Тогда
Прервать; Прервать;
КонецЕсли; КонецЕсли;
Если Уровень = ВложенныеСвойства.Количество()-2 Тогда Если Уровень = ВложенныеСвойства.Количество()-1 Тогда
ЗначениеСвойства = ТекущееЗначениеСвойства; ЗначениеСвойства = ТекущееЗначениеСвойства;
ИначеЕсли ТипЗнч(ТекущееЗначениеСвойства) <> Тип("Структура") Тогда ИначеЕсли ТипЗнч(ТекущееЗначениеСвойства) <> Тип("Структура") Тогда
Прервать; Прервать;
@@ -32,7 +32,7 @@
Процедура ПриДобавленииПодсистемы(Описание) Экспорт Процедура ПриДобавленииПодсистемы(Описание) Экспорт
Описание.Имя = "СтандартныеПодсистемы"; Описание.Имя = "СтандартныеПодсистемы";
Описание.Версия = "2.4.1.80"; Описание.Версия = "2.4.1.84";
Описание.РежимВыполненияОтложенныхОбработчиков = "Параллельно"; Описание.РежимВыполненияОтложенныхОбработчиков = "Параллельно";
Описание.ПараллельноеОтложенноеОбновлениеСВерсии = "2.3.3.0"; Описание.ПараллельноеОтложенноеОбновлениеСВерсии = "2.3.3.0";
@@ -150,7 +150,7 @@
// //
// Параметры: // Параметры:
// МассивСсылок - Массив - массив ссылок на объекты одного типа. // МассивСсылок - Массив - массив ссылок на объекты одного типа.
// ВАЖНО! Значения массива должны быть ссылками на объекты ОДНОГО типа! // Значения массива должны быть ссылками на объекты одного типа.
// ИменаРеквизитов - Строка - имена реквизитов перечисленные через запятую, в формате требований к свойствам структуры. // ИменаРеквизитов - Строка - имена реквизитов перечисленные через запятую, в формате требований к свойствам структуры.
// Например, "Код, Наименование, Родитель". // Например, "Код, Наименование, Родитель".
// //
@@ -209,7 +209,7 @@
// //
// Параметры: // Параметры:
// МассивСсылок - Массив - массив ссылок на объекты одного типа. // МассивСсылок - Массив - массив ссылок на объекты одного типа.
// ВАЖНО! Значения массива должны быть ссылками на объекты ОДНОГО типа! // Значения массива должны быть ссылками на объекты одного типа.
// ИмяРеквизита - Строка - например, "Код". // ИмяРеквизита - Строка - например, "Код".
// ВыбратьРазрешенные - Булево - если Истина, то запрос к объектам выполняется с учетом прав пользователя, и в случае, // ВыбратьРазрешенные - Булево - если Истина, то запрос к объектам выполняется с учетом прав пользователя, и в случае,
// если какой-либо объект будет исключен из выборки по правам, то значение реквизита // если какой-либо объект будет исключен из выборки по правам, то значение реквизита
@@ -2408,8 +2408,7 @@
КонецЕсли; КонецЕсли;
#Если Сервер Или ТолстыйКлиентОбычноеПриложение Или ВнешнееСоединение Тогда #Если Сервер Или ТолстыйКлиентОбычноеПриложение Или ВнешнееСоединение Тогда
// Выполнение без кэширования. Возврат СтандартныеПодсистемыВызовСервера.ПредопределенныйЭлемент(ПолноеИмяПредопределенного);
Возврат СтандартныеПодсистемыСервер.ПредопределенныйЭлемент(ПолноеИмяПредопределенного);
#Иначе #Иначе
Возврат СтандартныеПодсистемыКлиентПовтИсп.ПредопределенныйЭлемент(ПолноеИмяПредопределенного); Возврат СтандартныеПодсистемыКлиентПовтИсп.ПредопределенныйЭлемент(ПолноеИмяПредопределенного);
#КонецЕсли #КонецЕсли
@@ -2767,6 +2766,26 @@
КонецФункции КонецФункции
// Возвращает объем оперативной памяти, доступной клиентскому приложению.
//
// Возвращаемое значение:
// Число - количество гигабайт оперативной памяти с точностью до десятых долей.
// Неопределено - нет клиентского приложения, то есть ТекущийРежимЗапуска() = Неопределено.
//
Функция ОперативнаяПамятьДоступнаяКлиентскомуПриложению() Экспорт
#Если Сервер Или ТолстыйКлиентОбычноеПриложение Или ВнешнееСоединение Тогда
УстановитьПривилегированныйРежим(Истина);
ДоступныйОбъем = ПараметрыСеанса.ПараметрыКлиентаНаСервере.Получить("ОперативнаяПамять");
#Иначе
СистемнаяИнформация = Новый СистемнаяИнформация;
ДоступныйОбъем = Окр(СистемнаяИнформация.ОперативнаяПамять / 1024, 1);
#КонецЕсли
Возврат ДоступныйОбъем;
КонецФункции
// Возвращает Истина, если включен режим отладки. // Возвращает Истина, если включен режим отладки.
// //
// Возвращаемое значение: // Возвращаемое значение:
@@ -76,14 +76,32 @@
// Возвращаемое значение: // Возвращаемое значение:
// Строка - статус доставки. См. описание функции ОтправкаSMS.СтатусДоставки. // Строка - статус доставки. См. описание функции ОтправкаSMS.СтатусДоставки.
Функция СтатусДоставки(ИдентификаторСообщения, НастройкиОтправкиSMS) Экспорт Функция СтатусДоставки(ИдентификаторСообщения, НастройкиОтправкиSMS) Экспорт
Результат = "Ошибка";
Логин = НастройкиОтправкиSMS.Логин; Логин = НастройкиОтправкиSMS.Логин;
Пароль = ОбщегоНазначения.КонтрольнаяСуммаСтрокой(НастройкиОтправкиSMS.Пароль); Пароль = ОбщегоНазначения.КонтрольнаяСуммаСтрокой(НастройкиОтправкиSMS.Пароль);
ВебСервис = ПодключитьВебСервис(); ВебСервис = ПодключитьВебСервис();
ArrayOfDeliveryInfo = ВебСервис.GetMessageStatus(ИдентификаторСообщения, Логин, Пароль); Попытка
ArrayOfDeliveryInfo = ВебСервис.GetMessageStatus(ИдентификаторСообщения, Логин, Пароль);
Исключение
ИнформацияОбОшибке = ИнформацияОбОшибке();
КодОшибки = КодОшибкиИзОписания(ПодробноеПредставлениеОшибки(ИнформацияОбОшибке));
ТекстОшибки = ОписаниеОшибкиПоКоду(КодОшибки);
ЗаписьЖурналаРегистрации(
НСтр("ru = 'Отправка SMS'", ОбщегоНазначенияКлиентСервер.КодОсновногоЯзыка()),
УровеньЖурналаРегистрации.Ошибка,
,
,
ТекстОшибки + Символы.ПС + ПодробноеПредставлениеОшибки(ИнформацияОбОшибке));
Возврат Результат;
КонецПопытки;
Для Каждого DeliveryInfo Из ArrayOfDeliveryInfo.DeliveryInfo Цикл Для Каждого DeliveryInfo Из ArrayOfDeliveryInfo.DeliveryInfo Цикл
Возврат СтатусДоставкиSMS(DeliveryInfo.DeliveryStatus); Результат = СтатусДоставкиSMS(DeliveryInfo.DeliveryStatus);
КонецЦикла; КонецЦикла;
Возврат "Ошибка";
Возврат Результат;
КонецФункции КонецФункции
Функция ФорматироватьНомер(Номер) Функция ФорматироватьНомер(Номер)
@@ -106,6 +124,7 @@
СоответствиеСтатусов.Вставить("NotSent", "НеОтправлено"); СоответствиеСтатусов.Вставить("NotSent", "НеОтправлено");
СоответствиеСтатусов.Вставить("Delivered", "Доставлено"); СоответствиеСтатусов.Вставить("Delivered", "Доставлено");
СоответствиеСтатусов.Вставить("NotDelivered", "НеДоставлено"); СоответствиеСтатусов.Вставить("NotDelivered", "НеДоставлено");
СоответствиеСтатусов.Вставить("TimedOut", "НеДоставлено");
Результат = СоответствиеСтатусов[СтатусСтрокой]; Результат = СоответствиеСтатусов[СтатусСтрокой];
Возврат ?(Результат = Неопределено, "Ошибка", Результат); Возврат ?(Результат = Неопределено, "Ошибка", Результат);
@@ -130,8 +149,8 @@
ОписанияОшибок.Вставить("TOO_MANY_PARAMETERS", НСтр("ru = 'Превышено максимальное число параметров.'")); ОписанияОшибок.Вставить("TOO_MANY_PARAMETERS", НСтр("ru = 'Превышено максимальное число параметров.'"));
ОписанияОшибок.Вставить("INCORRECT_PASSWORD", НСтр("ru = 'Предоставленные логин/пароль не верны.'")); ОписанияОшибок.Вставить("INCORRECT_PASSWORD", НСтр("ru = 'Предоставленные логин/пароль не верны.'"));
ОписанияОшибок.Вставить("MSID_FORMAT_ERROR", НСтр("ru = 'Формат номера неверный.'")); ОписанияОшибок.Вставить("MSID_FORMAT_ERROR", НСтр("ru = 'Формат номера неверный.'"));
ОписанияОшибок.Вставить("MESSAGE_FORMAT_ERROR", НСтр("ru = 'Ошибка в формате сообщения'")); ОписанияОшибок.Вставить("MESSAGE_FORMAT_ERROR", НСтр("ru = 'Ошибка в формате сообщения.'"));
ОписанияОшибок.Вставить("WRONG_ID", НСтр("ru = 'Передан неверный идентификатор'")); ОписанияОшибок.Вставить("WRONG_ID", НСтр("ru = 'Передан неверный идентификатор.'"));
ОписанияОшибок.Вставить("MESSAGE_HANDLING_ERROR", НСтр("ru = 'Ошибка в обработке сообщения'")); ОписанияОшибок.Вставить("MESSAGE_HANDLING_ERROR", НСтр("ru = 'Ошибка в обработке сообщения'"));
ОписанияОшибок.Вставить("NO_SUCH_SUBSCRIBER", НСтр("ru = 'Данный абонент не зарегистрирован в Услуге в учетной записи клиента (или еще не дал подтверждение).'")); ОписанияОшибок.Вставить("NO_SUCH_SUBSCRIBER", НСтр("ru = 'Данный абонент не зарегистрирован в Услуге в учетной записи клиента (или еще не дал подтверждение).'"));
ОписанияОшибок.Вставить("TEST_LIMIT_EXCEEDED", НСтр("ru = 'Превышен лимит по количеству сообщений в тестовой эксплуатации.'")); ОписанияОшибок.Вставить("TEST_LIMIT_EXCEEDED", НСтр("ru = 'Превышен лимит по количеству сообщений в тестовой эксплуатации.'"));
@@ -2354,6 +2354,12 @@
НаЧтение, НаЧтение,
ВРабочемКаталогеВладельца) ВРабочемКаталогеВладельца)
ЕстьПраваНаОбъект = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(Файл, "Ссылка", Истина);
Если ЕстьПраваНаОбъект = Неопределено Тогда
Возврат;
КонецЕсли;
УстановитьПривилегированныйРежим(Истина); УстановитьПривилегированныйРежим(Истина);
// Создать набор записей // Создать набор записей
@@ -2570,6 +2576,12 @@
// //
Процедура УдалитьИзРегистра(Файл) Экспорт Процедура УдалитьИзРегистра(Файл) Экспорт
ЕстьПраваНаОбъект = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(Файл, "Ссылка", Истина);
Если ЕстьПраваНаОбъект = Неопределено Тогда
Возврат;
КонецЕсли;
УстановитьПривилегированныйРежим(Истина); УстановитьПривилегированныйРежим(Истина);
НаборЗаписей = РегистрыСведений.ФайлыВРабочемКаталоге.СоздатьНаборЗаписей(); НаборЗаписей = РегистрыСведений.ФайлыВРабочемКаталоге.СоздатьНаборЗаписей();
@@ -2678,6 +2690,12 @@
КонецЕсли; КонецЕсли;
КонецЕсли; КонецЕсли;
ЕстьПраваНаОбъект = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(Версия, "Ссылка", Истина);
Если ЕстьПраваНаОбъект = Неопределено Тогда
Возврат;
КонецЕсли;
УстановитьПривилегированныйРежим(Истина); УстановитьПривилегированныйРежим(Истина);
// Создать набор записей // Создать набор записей
@@ -497,7 +497,7 @@
НастройкиПодсистемы = Новый Структура; НастройкиПодсистемы = Новый Структура;
НастройкиПодсистемы.Вставить("РасположениеКомандыСнятияБлокировки", НастройкиПодсистемы.Вставить("РасположениеКомандыСнятияБлокировки",
НСтр("ru = 'Блокировку также можно снять позднее в разделе <b>Администрирование - Поддержка и обслуживание</b>.'")); НСтр("ru = 'Блокировку также можно снять позднее в разделе <b>Администрирование - Обслуживание</b>.'"));
Возврат НастройкиПодсистемы; Возврат НастройкиПодсистемы;
@@ -275,7 +275,7 @@
// //
Функция ПредопределенныйЭлемент(Знач ПолноеИмяПредопределенного) Экспорт Функция ПредопределенныйЭлемент(Знач ПолноеИмяПредопределенного) Экспорт
Возврат СтандартныеПодсистемыСервер.ПредопределенныйЭлемент(ПолноеИмяПредопределенного); Возврат СтандартныеПодсистемыПовтИсп.ПредопределенныйЭлемент(ПолноеИмяПредопределенного, ПривилегированныйРежим());
КонецФункции КонецФункции
@@ -924,25 +924,19 @@
// Используется только для Windows. // Используется только для Windows.
Функция ПапкаСистемныхПриложений() Экспорт Функция ПапкаСистемныхПриложений() Экспорт
Попытка Shell = Новый COMОбъект("Shell.Application");
Shell = Новый COMОбъект("Shell.Application"); СистемнаяИнформация = Новый СистемнаяИнформация;
Если СистемнаяИнформация.ТипПлатформы = ТипПлатформы.Windows_x86 Тогда
СистемнаяИнформация = Новый СистемнаяИнформация; // Для 32-битной системы "C:\Windows\System32".
Если СистемнаяИнформация.ТипПлатформы = ТипПлатформы.Windows_x86 Тогда // Для 64-битной системы "C:\Windows\SysWOW64".
// Для 32-битной системы "C:\Windows\SysWOW64". Folder = Shell.Namespace(41);
// Для 64-битной системы "C:\Windows\System32". Возврат Folder.Self.Path + "\";
Folder = Shell.Namespace(41); ИначеЕсли СистемнаяИнформация.ТипПлатформы = ТипПлатформы.Windows_x86_64 Тогда
Возврат Folder.Self.Path + "\"; // Для любой системы "C:\Windows\System32".
ИначеЕсли СистемнаяИнформация.ТипПлатформы = ТипПлатформы.Windows_x86_64 Тогда Folder = Shell.Namespace(37);
// Для любой системы "C:\Windows\System32". Возврат Folder.Self.Path + "\";
Folder = Shell.Namespace(37); КонецЕсли;
Возврат Folder.Self.Path + "\";
КонецЕсли;
Исключение
Возврат "";
КонецПопытки;
КонецФункции КонецФункции
@@ -471,6 +471,39 @@
КонецФункции КонецФункции
////////////////////////////////////////////////////////////////////////////////
// Работа с предопределенными данными.
// Получает ссылку предопределенного элемента по его полному имени.
// Подробнее - см. ОбщегоНазначенияКлиентСервер.ПредопределенныйЭлемент();
//
Функция ПредопределенныйЭлемент(Знач ПолноеИмяПредопределенного, ПривилегированныйРежим) Экспорт
ИмяПредопределенного = ВРег(ПолноеИмяПредопределенного);
Точка = СтрНайти(ИмяПредопределенного, ".");
ИмяКоллекции = Лев(ИмяПредопределенного, Точка - 1);
ИмяПредопределенного = Сред(ИмяПредопределенного, Точка + 1);
Точка = СтрНайти(ИмяПредопределенного, ".");
ИмяТаблицы = Лев(ИмяПредопределенного, Точка - 1);
ИмяПредопределенного = Сред(ИмяПредопределенного, Точка + 1);
ТекстЗапроса = "ВЫБРАТЬ РАЗРЕШЕННЫЕ ПЕРВЫЕ 1 Ссылка ИЗ &ПолноеИмяТаблицы ГДЕ ИмяПредопределенныхДанных = &ИмяПредопределенного";
ТекстЗапроса = СтрЗаменить(ТекстЗапроса, "&ПолноеИмяТаблицы", ИмяКоллекции + "." + ИмяТаблицы);
Запрос = Новый Запрос(ТекстЗапроса);
Запрос.УстановитьПараметр("ИмяПредопределенного", ИмяПредопределенного);
Результат = Запрос.Выполнить();
Если Не Результат.Пустой() Тогда
Возврат Результат.Выгрузить()[0].Ссылка;
КонецЕсли;
Возврат Неопределено;
КонецФункции
//////////////////////////////////////////////////////////////////////////////// ////////////////////////////////////////////////////////////////////////////////
// ВСПОМОГАТЕЛЬНЫЕ ПРОЦЕДУРЫ И ФУНКЦИИ // ВСПОМОГАТЕЛЬНЫЕ ПРОЦЕДУРЫ И ФУНКЦИИ
@@ -2394,37 +2394,6 @@
КонецПроцедуры КонецПроцедуры
////////////////////////////////////////////////////////////////////////////////
// Работа с предопределенными данными.
// См. ОбщегоНазначенияКлиентСервер.ПредопределенныйЭлемент.
Функция ПредопределенныйЭлемент(Знач ПолноеИмяПредопределенного) Экспорт
ИмяПредопределенного = ВРег(ПолноеИмяПредопределенного);
Точка = СтрНайти(ИмяПредопределенного, ".");
ИмяКоллекции = Лев(ИмяПредопределенного, Точка - 1);
ИмяПредопределенного = Сред(ИмяПредопределенного, Точка + 1);
Точка = СтрНайти(ИмяПредопределенного, ".");
ИмяТаблицы = Лев(ИмяПредопределенного, Точка - 1);
ИмяПредопределенного = Сред(ИмяПредопределенного, Точка + 1);
ТекстЗапроса = "ВЫБРАТЬ РАЗРЕШЕННЫЕ ПЕРВЫЕ 1 Ссылка ИЗ &ПолноеИмяТаблицы ГДЕ ИмяПредопределенныхДанных = &ИмяПредопределенного";
ТекстЗапроса = СтрЗаменить(ТекстЗапроса, "&ПолноеИмяТаблицы", ИмяКоллекции + "." + ИмяТаблицы);
Запрос = Новый Запрос(ТекстЗапроса);
Запрос.УстановитьПараметр("ИмяПредопределенного", ИмяПредопределенного);
Результат = Запрос.Выполнить();
Если Не Результат.Пустой() Тогда
Возврат Результат.Выгрузить()[0].Ссылка;
КонецЕсли;
Возврат Неопределено;
КонецФункции
//////////////////////////////////////////////////////////////////////////////// ////////////////////////////////////////////////////////////////////////////////
// ВСПОМОГАТЕЛЬНЫЕ ПРОЦЕДУРЫ И ФУНКЦИИ // ВСПОМОГАТЕЛЬНЫЕ ПРОЦЕДУРЫ И ФУНКЦИИ
@@ -1722,8 +1722,10 @@
// Представление с приоритетами. // Представление с приоритетами.
Если Не ПустаяСтрока(Представление) Тогда Если Не ПустаяСтрока(Представление) Тогда
Результат.Представление = Представление; Результат.Представление = Представление;
Иначе ИначеЕсли ЗначениеЗаполнено(ПолеПредставления) Тогда
Результат.Представление = ПолеПредставления; Результат.Представление = ПолеПредставления;
Иначе
Результат.Представление = ПредставлениеТелефона(Данные);
КонецЕсли; КонецЕсли;
Возврат Результат; Возврат Результат;
@@ -187,6 +187,10 @@
КонецФункции КонецФункции
Функция ИспользуютсяШаблоныСообщений() Экспорт
Возврат ПолучитьФункциональнуюОпцию("ИспользоватьШаблоныСообщений");
КонецФункции
//////////////////////////////////////////////////////////////////////////////// ////////////////////////////////////////////////////////////////////////////////
// Обработчики событий подсистем конфигурации. // Обработчики событий подсистем конфигурации.
@@ -2028,30 +2032,40 @@
ПараметрыПисьма.Вставить("Получатель", Сообщение.Получатель); ПараметрыПисьма.Вставить("Получатель", Сообщение.Получатель);
КонецЕсли; КонецЕсли;
Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.Взаимодействия") Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.Взаимодействия") Тогда
И ПолучитьФункциональнуюОпцию("ИспользоватьПочтовыйКлиент") Тогда
Если ПолучитьФункциональнуюОпцию("ОтправлятьПисьмаВФорматеHTML") Тогда МодульВзаимодействия = ОбщегоНазначения.ОбщийМодуль("Взаимодействия");
СтруктураВложений = Новый Структура(); Если МодульВзаимодействия.ИспользуетсяПочтовыйКлиент() Тогда
Индекс = Сообщение.Вложения.Количество() - 1; Если МодульВзаимодействия.ОтправлятьПисьмаВФорматеHTML() Тогда
Пока Индекс >= 0 Цикл СтруктураВложений = Новый Структура();
Вложение = Сообщение.Вложения[Индекс];
Если ЗначениеЗаполнено(Вложение.Идентификатор) Тогда Индекс = Сообщение.Вложения.Количество() - 1;
Картинка = Новый Картинка(ПолучитьИзВременногоХранилища(Вложение.АдресВоВременномХранилище));
СтруктураВложений.Вставить(Вложение.Представление, Картинка); Пока Индекс >= 0 Цикл
Сообщение.Вложения.Удалить(Индекс); Вложение = Сообщение.Вложения[Индекс];
Если ЗначениеЗаполнено(Вложение.Идентификатор) Тогда
Картинка = Новый Картинка(ПолучитьИзВременногоХранилища(Вложение.АдресВоВременномХранилище));
СтруктураВложений.Вставить(Вложение.Представление, Картинка);
Сообщение.Вложения.Удалить(Индекс);
КонецЕсли;
Индекс = Индекс - 1;
КонецЦикла;
ПараметрыПисьма.Текст = Новый Структура("ТекстHTML, СтруктураВложений", ПараметрыПисьма.Текст, СтруктураВложений);
Иначе
Если СтрНачинаетсяС(ПараметрыПисьма.Текст, "<!DOCTYPE html") Тогда
ВременныйФорматированныйДокумент = Новый ФорматированныйДокумент;
КартинкиПисьма = Новый Структура;
ВременныйФорматированныйДокумент.УстановитьHTML(ПараметрыПисьма.Текст, КартинкиПисьма);
ПараметрыПисьма.Текст = ВременныйФорматированныйДокумент.ПолучитьТекст();
КонецЕсли; КонецЕсли;
Индекс = Индекс - 1;
КонецЦикла;
ПараметрыПисьма.Текст = Новый Структура("ТекстHTML, СтруктураВложений", ПараметрыПисьма.Текст, СтруктураВложений);
Иначе
Если СтрНачинаетсяС(ПараметрыПисьма.Текст, "<!DOCTYPE html") Тогда
ВременныйФорматированныйДокумент = Новый ФорматированныйДокумент;
КартинкиПисьма = Новый Структура;
ВременныйФорматированныйДокумент.УстановитьHTML(ПараметрыПисьма.Текст, КартинкиПисьма);
ПараметрыПисьма.Текст = ВременныйФорматированныйДокумент.ПолучитьТекст();
КонецЕсли; КонецЕсли;
КонецЕсли; КонецЕсли;
КонецЕсли; КонецЕсли;
МассивВложений = Новый Массив; МассивВложений = Новый Массив;
+9 -9
View File
@@ -1,17 +1,17 @@
<?xml version="1.0" encoding="UTF-8"?> <?xml version="1.0" encoding="UTF-8"?>
<mdclass:Configuration xmlns:mdclass="http://g5.1c.ru/v8/dt/metadata/mdclass" uuid="a427fd94-6727-4f83-8da1-4a4e50e49906"> <mdclass:Configuration xmlns:mdclass="http://g5.1c.ru/v8/dt/metadata/mdclass" uuid="ea07e431-1b62-43a1-b2ff-56f9be07f914">
<name>БиблиотекаСтандартныхПодсистем</name> <name>БиблиотекаСтандартныхПодсистем</name>
<synonym> <synonym>
<key>ru</key> <key>ru</key>
<value>Библиотека стандартных подсистем, редакция 2.3</value> <value>Библиотека стандартных подсистем, редакция 2.3</value>
</synonym> </synonym>
<containedObjects classId="9cd510cd-abfc-11d4-9434-004095e12fc7" objectId="ce24c001-c562-42bc-81c0-695d23cff585"/> <containedObjects classId="9cd510cd-abfc-11d4-9434-004095e12fc7" objectId="3b374e1b-0338-4e3f-85d8-06ffdb2617f7"/>
<containedObjects classId="9fcd25a0-4822-11d4-9414-008048da11f9" objectId="88d22657-e988-4baf-959d-3a147c6c5771"/> <containedObjects classId="9fcd25a0-4822-11d4-9414-008048da11f9" objectId="4b537697-a3a2-46b6-b089-1daebc0f723a"/>
<containedObjects classId="e3687481-0a87-462c-a166-9f34594f9bba" objectId="67787027-1be0-4b3e-86f6-5b3f10899314"/> <containedObjects classId="e3687481-0a87-462c-a166-9f34594f9bba" objectId="ead4b583-0dbd-4a35-b075-cc7aa39a19ab"/>
<containedObjects classId="9de14907-ec23-4a07-96f0-85521cb6b53b" objectId="f3da97f2-e53a-4187-8e6d-281a1d2dee5d"/> <containedObjects classId="9de14907-ec23-4a07-96f0-85521cb6b53b" objectId="82226be1-5f55-469a-8594-2bd4cadd6a5a"/>
<containedObjects classId="51f2d5d8-ea4d-4064-8892-82951750031e" objectId="a2cefd67-65e8-4549-b37a-ef143fe0f3b2"/> <containedObjects classId="51f2d5d8-ea4d-4064-8892-82951750031e" objectId="87fd8263-b6c1-4a20-a04d-8b4700680369"/>
<containedObjects classId="e68182ea-4237-4383-967f-90c1e3370bc7" objectId="e4e565a7-8b98-4d50-9e07-b27047760426"/> <containedObjects classId="e68182ea-4237-4383-967f-90c1e3370bc7" objectId="5418c8a3-1339-4dd6-a037-9a66e1a5f355"/>
<containedObjects classId="fb282519-d103-4dd3-bc12-cb271d631dfc" objectId="f7a6212c-6fe8-4c4a-a693-030630526178"/> <containedObjects classId="fb282519-d103-4dd3-bc12-cb271d631dfc" objectId="b2023762-0e71-4954-8ead-ffa36aa394e6"/>
<defaultRunMode>ManagedApplication</defaultRunMode> <defaultRunMode>ManagedApplication</defaultRunMode>
<usePurposes>PersonalComputer</usePurposes> <usePurposes>PersonalComputer</usePurposes>
<scriptVariant>Russian</scriptVariant> <scriptVariant>Russian</scriptVariant>
@@ -19,7 +19,7 @@
<defaultRoles>Role.АдминистраторСистемы</defaultRoles> <defaultRoles>Role.АдминистраторСистемы</defaultRoles>
<defaultRoles>Role.ИнтерактивноеОткрытиеВнешнихОтчетовИОбработок</defaultRoles> <defaultRoles>Role.ИнтерактивноеОткрытиеВнешнихОтчетовИОбработок</defaultRoles>
<vendor>Фирма &quot;1С&quot;</vendor> <vendor>Фирма &quot;1С&quot;</vendor>
<version>2.4.1.80</version> <version>2.4.1.84</version>
<updateCatalogAddress>http://downloads.v8.1c.ru/tmplts/</updateCatalogAddress> <updateCatalogAddress>http://downloads.v8.1c.ru/tmplts/</updateCatalogAddress>
<includeHelpInContents>true</includeHelpInContents> <includeHelpInContents>true</includeHelpInContents>
<usedMobileApplicationFunctionalities> <usedMobileApplicationFunctionalities>
@@ -1 +1 @@
{6,1,1,f96399c9-7810-444a-9731-58d4308090de,1,26c64b5d-4b8f-4439-ab75-0987bcc6544d,"2.4.1.80","Фирма ""1С""","БиблиотекаСтандартныхПодсистем",5491,1,0,a427fd94-6727-4f83-8da1-4a4e50e49906,a427fd94-6727-4f83-8da1-4a4e50e49906,1,0,db4a9ccb-9ef5-4b3c-8577-b6fe5db1b62e,db4a9ccb-9ef5-4b3c-8577-b6fe5db1b62e,1,0,9233322b-dfdb-4c66-91fe-1299292d40a5,9233322b-dfdb-4c66-91fe-1299292d40a5,1,0,7795348b-2f52-47f7-bf00-e11e5e795a43,7795348b-2f52-47f7-bf00-e11e5e795a43,1,0,0421b67e-ed26-491d-ab98-ec59002ed4ce,0421b67e-ed26-491d-ab98-ec59002ed4ce,1,0,bb47ced2-31f9-4870-8633-20b986e53ccc,bb47ced2-31f9-4870-8633-20b986e53ccc,1,0,7d8acec9-f5a9-411e-921c-446ed0dd3332,7d8acec9-f5a9-411e-921c-446ed0dd3332,1,0,739c01a9-1125-45ef-ab4e-8c73af4eeff0,739c01a9-1125-45ef-ab4e-8c73af4eeff0,1,0,cdbd26b1-9583-46e8-adf7-8cc705639892,cdbd26b1-9583-46e8-adf7-8cc705639892,1,0,c0e38c3e-7088-4e35-9d84-2d0ab9655402,c0e38c3e-7088-4e35-9d84-2d0ab9655402,1,0,1098786f-dd24-4cce-b212-be0cb5f01735,1098786f-dd24-4cce-b212-be0cb5f01735,1,0,3c0037f3-4422-4836-b116-8c72e32bdd55,3c0037f3-4422-4836-b116-8c72e32bdd55,1,0,6f7c6c31-206b-4010-bdad-1ad2e304f154,6f7c6c31-206b-4010-bdad-1ad2e304f154,1,0,a8659e53-8c6b-4b0c-9736-fe93a91e4d69,a8659e53-8c6b-4b0c-9736-fe93a91e4d69,1,0,fe9a1d1a-19c0-499f-8e1b-09cadabe882f,fe9a1d1a-19c0-499f-8e1b-09cadabe882f,1,0,5b68d479-7880-44de-84e3-7f578b43f0dc,5b68d479-7880-44de-84e3-7f578b43f0dc,1,0,bf9ca98c-5c95-4cfb-9181-8c1d847f9fbb,bf9ca98c-5c95-4cfb-9181-8c1d847f9fbb,1,0,b4629308-42de-4ce8-8591-cf0c2399a9a2,b4629308-42de-4ce8-8591-cf0c2399a9a2,1,0,c7e984ae-1dbb-4041-b18a-bfd0d63a002f,c7e984ae-1dbb-4041-b18a-bfd0d63a002f,1,0,bb0424b8-dfd1-4a27-bd66-9dea3ffc77c4,bb0424b8-dfd1-4a27-bd66-9dea3ffc77c4,1,0,a4ac0a50-ee39-4dc1-b84f-eec8fe485f03,a4ac0a50-ee39-4dc1-b84f-eec8fe485f03,1,0,1861ee4f-fd8c-4afa-8441-c074bf51f67e,1861ee4f-fd8c-4afa-8441-c074bf51f67e,1,0,de7ed8f7-3c02-47e0-aea8-4747ac68a5d5,de7ed8f7-3c02-47e0-aea8-4747ac68a5d5,1,0,b93b8760-6200-40ee-8bdc-875ba80a6155,b93b8760-6200-40ee-8bdc-875ba80a6155,1,0,c27472ee-879a-4746-9d21-122738ec80b7,c27472ee-879a-4746-9d21-122738ec80b7,1,0,e8b248d9-9049-456a-9c7d-7a0462cc67ab,e8b248d9-9049-456a-9c7d-7a0462cc67ab,1,0,d4562287-440d-4462-9de2-7097ccbf3764,d4562287-440d-4462-9de2-7097ccbf3764,1,0,ec797c75-02c5-4cf5-9dd4-26cd46c99519,ec797c75-02c5-4cf5-9dd4-26cd46c99519,1,0,6fccdf59-fc99-4a2b-a144-fffe438a147c,6fccdf59-fc99-4a2b-a144-fffe438a147c,1,0,af8bd73a-d8e8-487d-8f36-d835ab10ea3a,af8bd73a-d8e8-487d-8f36-d835ab10ea3a,1,0,da9b32e6-5b93-45a6-84b2-238d57541e18,da9b32e6-5b93-45a6-84b2-238d57541e18,1,0,e43d69c8-b284-47da-b236-611bc94a15b6,e43d69c8-b284-47da-b236-611bc94a15b6,1,0,31eeaa05-6c49-41fe-b840-1edbad4ccac7,31eeaa05-6c49-41fe-b840-1edbad4ccac7,1,0,842c8662-8f39-405e-9665-cbdabc116159,842c8662-8f39-405e-9665-cbdabc116159,1,0,fca4b033-02c4-4d61-9e51-87783c3cef1a,fca4b033-02c4-4d61-9e51-87783c3cef1a,1,0,396ef757-d7f6-411f-8c4c-1acb1106a009,396ef757-d7f6-411f-8c4c-1acb1106a009,1,0,9aecf4f5-46ed-4d1c-a584-cd028e467895,9aecf4f5-46ed-4d1c-a584-cd028e467895,1,0,a1c379be-43d3-4e02-83bb-d2e7de2d4ae3,a1c379be-43d3-4e02-83bb-d2e7de2d4ae3,1,0,a1f10624-22e9-4a04-b370-fd085bdd0f67,a1f10624-22e9-4a04-b370-fd085bdd0f67,1,0,2a4b10be-3cd7-4755-905f-7b4d02ff6a22,2a4b10be-3cd7-4755-905f-7b4d02ff6a22,1,0,3cffb795-2a28-4beb-92f4-5813f5994022,3cffb795-2a28-4beb-92f4-5813f5994022,1,0,3323ca68-1382-4710-a933-23fc56588935,3323ca68-1382-4710-a933-23fc56588935,1,0,d6b12775-3255-42b8-88b2-62684f873e7d,d6b12775-3255-42b8-88b2-62684f873e7d,1,0,cc23d903-ccc5-42f4-862f-5e7278c4e346,cc23d903-ccc5-42f4-862f-5e7278c4e346,1,0,98f033e0-fa40-46e0-b51a-87a066749a35,98f033e0-fa40-46e0-b51a-87a066749a35,1,0,e8b4cb2d-1180-4101-954a-4cb5464f198c,e8b4cb2d-1180-4101-954a-4cb5464f198c,1,0,a379287d-1ce8-460d-a503-910e728e28f1,a379287d-1ce8-460d-a503-910e728e28f1,1,0,f765c4ba-c677-42ac-8d0c-43bb485405b9,f765c4ba-c677-42ac-8d0c-43bb485405b9,1,0,83192b3e-e7a9-4595-8887-24cda84457a9,83192b3e-e7a9-4595-8887-24cda84457a9,1,0,2fd1287d-d96d-4480-baf7-8815ae5ffbfb,2fd1287d-d96d-4480-baf7-8815ae5ffbfb,1,0,c8a4c5da-bc88-4f6e-9787-1c22c2f41be7,c8a4c5da-bc88-4f6e-9787-1c22c2f41be7,1,0,08eeb8f1-944f-4450-83f6-ef20aaab7d86,08eeb8f1-944f-4450-83f6-ef20aaab7d86,1,0,8d77dd4a-e646-4105-8dcf-8ce8fc3da0b4,8d77dd4a-e646-4105-8dcf-8ce8fc3da0b4,1,0,2fd12dba-5311-4f31-949c-f6b15decc0cc,2fd12dba-5311-4f31-949c-f6b15decc0cc,1,0,d7cf3981-cf63-4a21-868b-8175a7704a8f,d7cf3981-cf63-4a21-868b-8175a7704a8f,1,0,35895e12-52b6-49a1-acdf-6d828a948af0,35895e12-52b6-49a1-acdf-6d828a948af0,1,0,0ae93712-74e8-41c7-8f2d-4dfc8983697d,0ae93712-74e8-41c7-8f2d-4dfc8983697d,1,0,060b6f18-538c-4ea1-9748-00efe0b1ab57,060b6f18-538c-4ea1-9748-00efe0b1ab57,1,0,307b6821-fd82-4a1c-9fdb-a26293d4f713,307b6821-fd82-4a1c-9fdb-a26293d4f713,1,0,a952960b-be1b-4ec4-bd76-80915065a60b,a952960b-be1b-4ec4-bd76-80915065a60b,1,0,64f548c8-c1fc-434e-b3ee-5be367ead1db,64f548c8-c1fc-434e-b3ee-5be367ead1db,1,0,9e4dfdfa-ec05-4c9e-89bd-fc24f60f2678,9e4dfdfa-ec05-Line truncated {6,1,1,234c5934-88a6-4365-9582-aed98b069865,1,7e28aa09-5285-4901-a54c-afacca3d9d97,"2.4.1.84","Фирма ""1С""","БиблиотекаСтандартныхПодсистем",5491,1,0,ea07e431-1b62-43a1-b2ff-56f9be07f914,ea07e431-1b62-43a1-b2ff-56f9be07f914,1,0,db4a9ccb-9ef5-4b3c-8577-b6fe5db1b62e,db4a9ccb-9ef5-4b3c-8577-b6fe5db1b62e,1,0,9233322b-dfdb-4c66-91fe-1299292d40a5,9233322b-dfdb-4c66-91fe-1299292d40a5,1,0,7795348b-2f52-47f7-bf00-e11e5e795a43,7795348b-2f52-47f7-bf00-e11e5e795a43,1,0,0421b67e-ed26-491d-ab98-ec59002ed4ce,0421b67e-ed26-491d-ab98-ec59002ed4ce,1,0,bb47ced2-31f9-4870-8633-20b986e53ccc,bb47ced2-31f9-4870-8633-20b986e53ccc,1,0,7d8acec9-f5a9-411e-921c-446ed0dd3332,7d8acec9-f5a9-411e-921c-446ed0dd3332,1,0,739c01a9-1125-45ef-ab4e-8c73af4eeff0,739c01a9-1125-45ef-ab4e-8c73af4eeff0,1,0,cdbd26b1-9583-46e8-adf7-8cc705639892,cdbd26b1-9583-46e8-adf7-8cc705639892,1,0,c0e38c3e-7088-4e35-9d84-2d0ab9655402,c0e38c3e-7088-4e35-9d84-2d0ab9655402,1,0,1098786f-dd24-4cce-b212-be0cb5f01735,1098786f-dd24-4cce-b212-be0cb5f01735,1,0,3c0037f3-4422-4836-b116-8c72e32bdd55,3c0037f3-4422-4836-b116-8c72e32bdd55,1,0,6f7c6c31-206b-4010-bdad-1ad2e304f154,6f7c6c31-206b-4010-bdad-1ad2e304f154,1,0,a8659e53-8c6b-4b0c-9736-fe93a91e4d69,a8659e53-8c6b-4b0c-9736-fe93a91e4d69,1,0,fe9a1d1a-19c0-499f-8e1b-09cadabe882f,fe9a1d1a-19c0-499f-8e1b-09cadabe882f,1,0,5b68d479-7880-44de-84e3-7f578b43f0dc,5b68d479-7880-44de-84e3-7f578b43f0dc,1,0,bf9ca98c-5c95-4cfb-9181-8c1d847f9fbb,bf9ca98c-5c95-4cfb-9181-8c1d847f9fbb,1,0,b4629308-42de-4ce8-8591-cf0c2399a9a2,b4629308-42de-4ce8-8591-cf0c2399a9a2,1,0,c7e984ae-1dbb-4041-b18a-bfd0d63a002f,c7e984ae-1dbb-4041-b18a-bfd0d63a002f,1,0,bb0424b8-dfd1-4a27-bd66-9dea3ffc77c4,bb0424b8-dfd1-4a27-bd66-9dea3ffc77c4,1,0,a4ac0a50-ee39-4dc1-b84f-eec8fe485f03,a4ac0a50-ee39-4dc1-b84f-eec8fe485f03,1,0,1861ee4f-fd8c-4afa-8441-c074bf51f67e,1861ee4f-fd8c-4afa-8441-c074bf51f67e,1,0,de7ed8f7-3c02-47e0-aea8-4747ac68a5d5,de7ed8f7-3c02-47e0-aea8-4747ac68a5d5,1,0,b93b8760-6200-40ee-8bdc-875ba80a6155,b93b8760-6200-40ee-8bdc-875ba80a6155,1,0,c27472ee-879a-4746-9d21-122738ec80b7,c27472ee-879a-4746-9d21-122738ec80b7,1,0,e8b248d9-9049-456a-9c7d-7a0462cc67ab,e8b248d9-9049-456a-9c7d-7a0462cc67ab,1,0,d4562287-440d-4462-9de2-7097ccbf3764,d4562287-440d-4462-9de2-7097ccbf3764,1,0,ec797c75-02c5-4cf5-9dd4-26cd46c99519,ec797c75-02c5-4cf5-9dd4-26cd46c99519,1,0,6fccdf59-fc99-4a2b-a144-fffe438a147c,6fccdf59-fc99-4a2b-a144-fffe438a147c,1,0,af8bd73a-d8e8-487d-8f36-d835ab10ea3a,af8bd73a-d8e8-487d-8f36-d835ab10ea3a,1,0,da9b32e6-5b93-45a6-84b2-238d57541e18,da9b32e6-5b93-45a6-84b2-238d57541e18,1,0,e43d69c8-b284-47da-b236-611bc94a15b6,e43d69c8-b284-47da-b236-611bc94a15b6,1,0,31eeaa05-6c49-41fe-b840-1edbad4ccac7,31eeaa05-6c49-41fe-b840-1edbad4ccac7,1,0,842c8662-8f39-405e-9665-cbdabc116159,842c8662-8f39-405e-9665-cbdabc116159,1,0,fca4b033-02c4-4d61-9e51-87783c3cef1a,fca4b033-02c4-4d61-9e51-87783c3cef1a,1,0,396ef757-d7f6-411f-8c4c-1acb1106a009,396ef757-d7f6-411f-8c4c-1acb1106a009,1,0,9aecf4f5-46ed-4d1c-a584-cd028e467895,9aecf4f5-46ed-4d1c-a584-cd028e467895,1,0,a1c379be-43d3-4e02-83bb-d2e7de2d4ae3,a1c379be-43d3-4e02-83bb-d2e7de2d4ae3,1,0,a1f10624-22e9-4a04-b370-fd085bdd0f67,a1f10624-22e9-4a04-b370-fd085bdd0f67,1,0,2a4b10be-3cd7-4755-905f-7b4d02ff6a22,2a4b10be-3cd7-4755-905f-7b4d02ff6a22,1,0,3cffb795-2a28-4beb-92f4-5813f5994022,3cffb795-2a28-4beb-92f4-5813f5994022,1,0,3323ca68-1382-4710-a933-23fc56588935,3323ca68-1382-4710-a933-23fc56588935,1,0,d6b12775-3255-42b8-88b2-62684f873e7d,d6b12775-3255-42b8-88b2-62684f873e7d,1,0,cc23d903-ccc5-42f4-862f-5e7278c4e346,cc23d903-ccc5-42f4-862f-5e7278c4e346,1,0,98f033e0-fa40-46e0-b51a-87a066749a35,98f033e0-fa40-46e0-b51a-87a066749a35,1,0,e8b4cb2d-1180-4101-954a-4cb5464f198c,e8b4cb2d-1180-4101-954a-4cb5464f198c,1,0,a379287d-1ce8-460d-a503-910e728e28f1,a379287d-1ce8-460d-a503-910e728e28f1,1,0,f765c4ba-c677-42ac-8d0c-43bb485405b9,f765c4ba-c677-42ac-8d0c-43bb485405b9,1,0,83192b3e-e7a9-4595-8887-24cda84457a9,83192b3e-e7a9-4595-8887-24cda84457a9,1,0,2fd1287d-d96d-4480-baf7-8815ae5ffbfb,2fd1287d-d96d-4480-baf7-8815ae5ffbfb,1,0,c8a4c5da-bc88-4f6e-9787-1c22c2f41be7,c8a4c5da-bc88-4f6e-9787-1c22c2f41be7,1,0,08eeb8f1-944f-4450-83f6-ef20aaab7d86,08eeb8f1-944f-4450-83f6-ef20aaab7d86,1,0,8d77dd4a-e646-4105-8dcf-8ce8fc3da0b4,8d77dd4a-e646-4105-8dcf-8ce8fc3da0b4,1,0,2fd12dba-5311-4f31-949c-f6b15decc0cc,2fd12dba-5311-4f31-949c-f6b15decc0cc,1,0,d7cf3981-cf63-4a21-868b-8175a7704a8f,d7cf3981-cf63-4a21-868b-8175a7704a8f,1,0,35895e12-52b6-49a1-acdf-6d828a948af0,35895e12-52b6-49a1-acdf-6d828a948af0,1,0,0ae93712-74e8-41c7-8f2d-4dfc8983697d,0ae93712-74e8-41c7-8f2d-4dfc8983697d,1,0,060b6f18-538c-4ea1-9748-00efe0b1ab57,060b6f18-538c-4ea1-9748-00efe0b1ab57,1,0,307b6821-fd82-4a1c-9fdb-a26293d4f713,307b6821-fd82-4a1c-9fdb-a26293d4f713,1,0,a952960b-be1b-4ec4-bd76-80915065a60b,a952960b-be1b-4ec4-bd76-80915065a60b,1,0,64f548c8-c1fc-434e-b3ee-5be367ead1db,64f548c8-c1fc-434e-b3ee-5be367ead1db,1,0,9e4dfdfa-ec05-4c9e-89bd-fc24f60f2678,9e4dfdfa-ec05-Line truncated
@@ -714,20 +714,43 @@
КонецЕсли; КонецЕсли;
ВерсияБСП = МодульСтандартныеПодсистемыСервер.ВерсияБиблиотеки(); ВерсияБСП = МодульСтандартныеПодсистемыСервер.ВерсияБиблиотеки();
Возврат НомерВерсииВЧисло(ВерсияБСП) >= НомерВерсииВЧисло("2.3.3.9"); Возврат СравнитьВерсии(ВерсияБСП, "2.3.3.9") >= 0;
КонецФункции КонецФункции
Функция НомерВерсииВЧисло(НомерВерсии) // Сравнить две строки версий.
ЧастиНомера = СтрРазделить(НомерВерсии, ".", Ложь); //
Если ЧастиНомера.Количество() <> 4 Тогда // Параметры:
Возврат 0; // СтрокаВерсии1 - Строка - номер версии в формате РР.{П|ПП}.ЗЗ.СС.
// СтрокаВерсии2 - Строка - второй сравниваемый номер версии.
//
// Возвращаемое значение:
// Число - больше 0, если СтрокаВерсии1 > СтрокаВерсии2; 0, если версии равны.
//
Функция СравнитьВерсии(Знач СтрокаВерсии1, Знач СтрокаВерсии2) Экспорт
Строка1 = ?(ПустаяСтрока(СтрокаВерсии1), "0.0.0.0", СтрокаВерсии1);
Строка2 = ?(ПустаяСтрока(СтрокаВерсии2), "0.0.0.0", СтрокаВерсии2);
Версия1 = СтрРазделить(Строка1, ".");
Если Версия1.Количество() <> 4 Тогда
ВызватьИсключение ПодставитьПараметрыВСтроку(
НСтр("ru = 'Неправильный формат параметра СтрокаВерсии1: %1'"), СтрокаВерсии1);
КонецЕсли; КонецЕсли;
Версия2 = СтрРазделить(Строка2, ".");
Если Версия2.Количество() <> 4 Тогда
ВызватьИсключение ПодставитьПараметрыВСтроку(
НСтр("ru = 'Неправильный формат параметра СтрокаВерсии2: %1'"), СтрокаВерсии2);
КонецЕсли;
Результат = 0; Результат = 0;
Для Каждого ЧастьНомера Из ЧастиНомера Цикл Для Разряд = 0 По 3 Цикл
Результат = Результат * 1000 + Число(ЧастьНомера); Результат = Число(Версия1[Разряд]) - Число(Версия2[Разряд]);
Если Результат <> 0 Тогда
Возврат Результат;
КонецЕсли;
КонецЦикла; КонецЦикла;
Возврат Результат; Возврат Результат;
КонецФункции КонецФункции
Функция МенеджерОбъектаПоПолномуИмени(ПолноеИмя) Функция МенеджерОбъектаПоПолномуИмени(ПолноеИмя)
@@ -776,10 +776,6 @@
</attributes> </attributes>
<attributes> <attributes>
<name>ИБФайловая</name> <name>ИБФайловая</name>
<title>
<key>ru</key>
<value>ИБФайловая</value>
</title>
<id>17</id> <id>17</id>
<valueType> <valueType>
<types>Boolean</types> <types>Boolean</types>
@@ -2440,9 +2440,9 @@
Минимум = Дельта + 1; Минимум = Дельта + 1;
ТекущаяСтрока = СтрокаИстория; ТекущаяСтрока = СтрокаИстория;
КонецЕсли; КонецЕсли;
Если Дельта > 0 И Дельта < Минимум Тогда Если Дельта > 0 И МодульЧисла(Дельта) < МодульЧисла(Минимум) Тогда
ДействуетПо = СтрокаИстория.ДействуетС; ДействуетПо = СтрокаИстория.ДействуетС;
Минимум = Дельта; Минимум = МодульЧисла(Дельта);
КонецЕсли; КонецЕсли;
КонецЦикла; КонецЦикла;
@@ -2453,6 +2453,11 @@
Возврат Результат; Возврат Результат;
КонецФункции КонецФункции
&НаКлиентеНаСервереБезКонтекста
Функция МодульЧисла(Число)
Возврат Макс(Число, -Число);
КонецФункции
&НаКлиенте &НаКлиенте
Процедура Подключаемый_ТипСтроенияПриИзменении(Элемент) Процедура Подключаемый_ТипСтроенияПриИзменении(Элемент)
НомерСтроки = Сред(Элемент.Имя, 1 + СтрДлина("ТипСтроения")); НомерСтроки = Сред(Элемент.Имя, 1 + СтрДлина("ТипСтроения"));
@@ -1491,7 +1491,7 @@
<title> <title>
<key>ru</key> <key>ru</key>
<value>Сведения о результатах обновления версии программы можно также открыть <value>Сведения о результатах обновления версии программы можно также открыть
из раздела &lt;b>Администрирование &lt;/>- &lt;b>Поддержка и обслуживание&lt;/>.</value> из раздела &lt;b>Администрирование &lt;/>- &lt;b>Обслуживание&lt;/>.</value>
</title> </title>
<visible>true</visible> <visible>true</visible>
<enabled>true</enabled> <enabled>true</enabled>
@@ -113,7 +113,7 @@
<title> <title>
<key>ru</key> <key>ru</key>
<value>Посмотреть статус выполнения дополнительных процедур обработки данных <value>Посмотреть статус выполнения дополнительных процедур обработки данных
можно в разделе &lt;b>Администрирование &lt;/>- &lt;b>Поддержка и обслуживание&lt;/>.</value> можно в разделе &lt;b>Администрирование &lt;/>- &lt;b>Обслуживание&lt;/>.</value>
</title> </title>
<visible>true</visible> <visible>true</visible>
<enabled>true</enabled> <enabled>true</enabled>
@@ -74,8 +74,6 @@
|ПОМЕСТИТЬ ИнформацияОКонтактах |ПОМЕСТИТЬ ИнформацияОКонтактах
|ИЗ |ИЗ
| Документ.Встреча.Участники КАК ВстречаУчастники | Документ.Встреча.Участники КАК ВстречаУчастники
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КонтактыВзаимодействий КАК КонтактыВзаимодействий
| ПО ВстречаУчастники.Ссылка = КонтактыВзаимодействий.Взаимодействие
|ГДЕ |ГДЕ
| ВстречаУчастники.Ссылка В | ВстречаУчастники.Ссылка В
| (ВЫБРАТЬ | (ВЫБРАТЬ
@@ -91,8 +89,6 @@
| ЗапланированноеВзаимодействиеУчастники.ПредставлениеКонтакта | ЗапланированноеВзаимодействиеУчастники.ПредставлениеКонтакта
|ИЗ |ИЗ
| Документ.ЗапланированноеВзаимодействие.Участники КАК ЗапланированноеВзаимодействиеУчастники | Документ.ЗапланированноеВзаимодействие.Участники КАК ЗапланированноеВзаимодействиеУчастники
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КонтактыВзаимодействий КАК КонтактыВзаимодействий
| ПО ЗапланированноеВзаимодействиеУчастники.Ссылка = КонтактыВзаимодействий.Взаимодействие
|ГДЕ |ГДЕ
| ЗапланированноеВзаимодействиеУчастники.Ссылка В | ЗапланированноеВзаимодействиеУчастники.Ссылка В
| (ВЫБРАТЬ | (ВЫБРАТЬ
@@ -108,8 +104,6 @@
| ТелефонныйЗвонок.АбонентПредставление | ТелефонныйЗвонок.АбонентПредставление
|ИЗ |ИЗ
| Документ.ТелефонныйЗвонок КАК ТелефонныйЗвонок | Документ.ТелефонныйЗвонок КАК ТелефонныйЗвонок
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КонтактыВзаимодействий КАК КонтактыВзаимодействий
| ПО (КонтактыВзаимодействий.Взаимодействие = ТелефонныйЗвонок.Ссылка)
|ГДЕ |ГДЕ
| ТелефонныйЗвонок.Ссылка В | ТелефонныйЗвонок.Ссылка В
| (ВЫБРАТЬ | (ВЫБРАТЬ
@@ -125,8 +119,6 @@
| СообщениеSMSАдресаты.ПредставлениеКонтакта | СообщениеSMSАдресаты.ПредставлениеКонтакта
|ИЗ |ИЗ
| Документ.СообщениеSMS.Адресаты КАК СообщениеSMSАдресаты | Документ.СообщениеSMS.Адресаты КАК СообщениеSMSАдресаты
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КонтактыВзаимодействий КАК КонтактыВзаимодействий
| ПО СообщениеSMSАдресаты.Ссылка = КонтактыВзаимодействий.Взаимодействие
|ГДЕ |ГДЕ
| СообщениеSMSАдресаты.Ссылка В | СообщениеSMSАдресаты.Ссылка В
| (ВЫБРАТЬ | (ВЫБРАТЬ
@@ -142,8 +134,6 @@
| ЭлектронноеПисьмоВходящее.ОтправительПредставление | ЭлектронноеПисьмоВходящее.ОтправительПредставление
|ИЗ |ИЗ
| Документ.ЭлектронноеПисьмоВходящее КАК ЭлектронноеПисьмоВходящее | Документ.ЭлектронноеПисьмоВходящее КАК ЭлектронноеПисьмоВходящее
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КонтактыВзаимодействий КАК КонтактыВзаимодействий
| ПО (КонтактыВзаимодействий.Взаимодействие = ЭлектронноеПисьмоВходящее.Ссылка)
|ГДЕ |ГДЕ
| ЭлектронноеПисьмоВходящее.Ссылка В | ЭлектронноеПисьмоВходящее.Ссылка В
| (ВЫБРАТЬ | (ВЫБРАТЬ
@@ -158,8 +148,7 @@
| ЭлектронноеПисьмоИсходящееПолучателиПисьма.Контакт, | ЭлектронноеПисьмоИсходящееПолучателиПисьма.Контакт,
| ЭлектронноеПисьмоИсходящееПолучателиПисьма.Представление | ЭлектронноеПисьмоИсходящееПолучателиПисьма.Представление
|ИЗ |ИЗ
| Документ.ЭлектронноеПисьмоИсходящее.ПолучателиПисьма КАК ЭлектронноеПисьмоИсходящееПолучателиПисьма, | Документ.ЭлектронноеПисьмоИсходящее.ПолучателиПисьма КАК ЭлектронноеПисьмоИсходящееПолучателиПисьма
| РегистрСведений.КонтактыВзаимодействий КАК КонтактыВзаимодействий
|ГДЕ |ГДЕ
| ЭлектронноеПисьмоИсходящееПолучателиПисьма.Ссылка В | ЭлектронноеПисьмоИсходящееПолучателиПисьма.Ссылка В
| (ВЫБРАТЬ | (ВЫБРАТЬ
@@ -190,8 +179,6 @@
| ЭлектронноеПисьмоИсходящееПолучателиСкрытыхКопий.Представление | ЭлектронноеПисьмоИсходящееПолучателиСкрытыхКопий.Представление
|ИЗ |ИЗ
| Документ.ЭлектронноеПисьмоИсходящее.ПолучателиСкрытыхКопий КАК ЭлектронноеПисьмоИсходящееПолучателиСкрытыхКопий | Документ.ЭлектронноеПисьмоИсходящее.ПолучателиСкрытыхКопий КАК ЭлектронноеПисьмоИсходящееПолучателиСкрытыхКопий
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КонтактыВзаимодействий КАК КонтактыВзаимодействий
| ПО ЭлектронноеПисьмоИсходящееПолучателиСкрытыхКопий.Ссылка = КонтактыВзаимодействий.Взаимодействие
|ГДЕ |ГДЕ
| ЭлектронноеПисьмоИсходящееПолучателиСкрытыхКопий.Ссылка В | ЭлектронноеПисьмоИсходящееПолучателиСкрытыхКопий.Ссылка В
| (ВЫБРАТЬ | (ВЫБРАТЬ
@@ -681,6 +681,8 @@
КонецЕсли; КонецЕсли;
КонецЦикла; КонецЦикла;
Возврат Ложь;
КонецФункции КонецФункции
#КонецОбласти #КонецОбласти
@@ -2102,93 +2102,6 @@
<value>true</value> <value>true</value>
</right> </right>
</object> </object>
<object>
<name>Configuration.БиблиотекаСтандартныхПодсистем</name>
<right>
<name>Administration</name>
<value>true</value>
</right>
<right>
<name>DataAdministration</name>
<value>true</value>
</right>
<right>
<name>UpdateDataBaseConfiguration</name>
<value>true</value>
</right>
<right>
<name>ExclusiveMode</name>
<value>true</value>
</right>
<right>
<name>ActiveUsers</name>
<value>true</value>
</right>
<right>
<name>EventLog</name>
<value>true</value>
</right>
<right>
<name>ThinClient</name>
<value>true</value>
</right>
<right>
<name>WebClient</name>
<value>true</value>
</right>
<right>
<name>ThickClient</name>
<value>true</value>
</right>
<right>
<name>ExternalConnection</name>
<value>true</value>
</right>
<right>
<name>Automation</name>
<value>true</value>
</right>
<right>
<name>TechnicalSpecialistMode</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeNormal</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeWorkplace</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeEmbeddedWorkplace</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeFullscreenWorkplace</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeKiosk</name>
<value>true</value>
</right>
<right>
<name>AnalyticsSystemClient</name>
<value>true</value>
</right>
<right>
<name>SaveUserData</name>
<value>true</value>
</right>
<right>
<name>ConfigurationExtensionsAdministration</name>
<value>true</value>
</right>
<right>
<name>Output</name>
<value>true</value>
</right>
</object>
<object> <object>
<name>Constant.БлокировкаОтправкиБыстрыхСообщений</name> <name>Constant.БлокировкаОтправкиБыстрыхСообщений</name>
<right> <right>
@@ -3152,6 +3065,93 @@
<value>true</value> <value>true</value>
</right> </right>
</object> </object>
<object>
<name>Configuration.БиблиотекаСтандартныхПодсистем</name>
<right>
<name>Administration</name>
<value>true</value>
</right>
<right>
<name>DataAdministration</name>
<value>true</value>
</right>
<right>
<name>UpdateDataBaseConfiguration</name>
<value>true</value>
</right>
<right>
<name>ExclusiveMode</name>
<value>true</value>
</right>
<right>
<name>ActiveUsers</name>
<value>true</value>
</right>
<right>
<name>EventLog</name>
<value>true</value>
</right>
<right>
<name>ThinClient</name>
<value>true</value>
</right>
<right>
<name>WebClient</name>
<value>true</value>
</right>
<right>
<name>ThickClient</name>
<value>true</value>
</right>
<right>
<name>ExternalConnection</name>
<value>true</value>
</right>
<right>
<name>Automation</name>
<value>true</value>
</right>
<right>
<name>TechnicalSpecialistMode</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeNormal</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeWorkplace</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeEmbeddedWorkplace</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeFullscreenWorkplace</name>
<value>true</value>
</right>
<right>
<name>MainWindowModeKiosk</name>
<value>true</value>
</right>
<right>
<name>AnalyticsSystemClient</name>
<value>true</value>
</right>
<right>
<name>SaveUserData</name>
<value>true</value>
</right>
<right>
<name>ConfigurationExtensionsAdministration</name>
<value>true</value>
</right>
<right>
<name>Output</name>
<value>true</value>
</right>
</object>
<object> <object>
<name>Constant.ВыполнитьРезервноеКопированиеОбластиДанных</name> <name>Constant.ВыполнитьРезервноеКопированиеОбластиДанных</name>
<right> <right>
@@ -883,6 +883,17 @@
<value>true</value> <value>true</value>
</right> </right>
</object> </object>
<object>
<name>InformationRegister.ДатыПоследнейЗагрузкиПочтовыхСообщений</name>
<right>
<name>Read</name>
<value>true</value>
</right>
<right>
<name>View</name>
<value>true</value>
</right>
</object>
<object> <object>
<name>Catalog.СообщениеSMSПрисоединенныеФайлы</name> <name>Catalog.СообщениеSMSПрисоединенныеФайлы</name>
<right> <right>
@@ -3903,45 +3903,6 @@
<value>false</value> <value>false</value>
</right> </right>
</object> </object>
<object>
<name>Configuration.БиблиотекаСтандартныхПодсистем</name>
<right>
<name>Administration</name>
<value>false</value>
</right>
<right>
<name>UpdateDataBaseConfiguration</name>
<value>false</value>
</right>
<right>
<name>ThickClient</name>
<value>false</value>
</right>
<right>
<name>ExternalConnection</name>
<value>false</value>
</right>
<right>
<name>Automation</name>
<value>false</value>
</right>
<right>
<name>TechnicalSpecialistMode</name>
<value>false</value>
</right>
<right>
<name>ConfigurationExtensionsAdministration</name>
<value>false</value>
</right>
<right>
<name>InteractiveOpenExtDataProcessors</name>
<value>false</value>
</right>
<right>
<name>InteractiveOpenExtReports</name>
<value>false</value>
</right>
</object>
<object> <object>
<name>Constant.БлокировкаОтправкиБыстрыхСообщений</name> <name>Constant.БлокировкаОтправкиБыстрыхСообщений</name>
<right> <right>
@@ -5761,6 +5722,45 @@
<value>false</value> <value>false</value>
</right> </right>
</object> </object>
<object>
<name>Configuration.БиблиотекаСтандартныхПодсистем</name>
<right>
<name>Administration</name>
<value>false</value>
</right>
<right>
<name>UpdateDataBaseConfiguration</name>
<value>false</value>
</right>
<right>
<name>ThickClient</name>
<value>false</value>
</right>
<right>
<name>ExternalConnection</name>
<value>false</value>
</right>
<right>
<name>Automation</name>
<value>false</value>
</right>
<right>
<name>TechnicalSpecialistMode</name>
<value>false</value>
</right>
<right>
<name>ConfigurationExtensionsAdministration</name>
<value>false</value>
</right>
<right>
<name>InteractiveOpenExtDataProcessors</name>
<value>false</value>
</right>
<right>
<name>InteractiveOpenExtReports</name>
<value>false</value>
</right>
</object>
<object> <object>
<name>Constant.ВыполнитьРезервноеКопированиеОбластиДанных</name> <name>Constant.ВыполнитьРезервноеКопированиеОбластиДанных</name>
<right> <right>
@@ -3,6 +3,13 @@
<setForNewObjects>false</setForNewObjects> <setForNewObjects>false</setForNewObjects>
<setForAttributesByDefault>true</setForAttributesByDefault> <setForAttributesByDefault>true</setForAttributesByDefault>
<independentRightsOfChildObjects>false</independentRightsOfChildObjects> <independentRightsOfChildObjects>false</independentRightsOfChildObjects>
<object>
<name>DataProcessor.ЖурналРегистрации.Command.ЖурналРегистрации</name>
<right>
<name>View</name>
<value>true</value>
</right>
</object>
<object> <object>
<name>Configuration.БиблиотекаСтандартныхПодсистем</name> <name>Configuration.БиблиотекаСтандартныхПодсистем</name>
<right> <right>
@@ -34,13 +41,6 @@
<value>true</value> <value>true</value>
</right> </right>
</object> </object>
<object>
<name>DataProcessor.ЖурналРегистрации.Command.ЖурналРегистрации</name>
<right>
<name>View</name>
<value>true</value>
</right>
</object>
<object> <object>
<name>DataProcessor.ЖурналРегистрации</name> <name>DataProcessor.ЖурналРегистрации</name>
<right> <right>