This commit is contained in:
Компания 1С committed 2015-12-17 18:12:00 +03:00
1 parent 00b9f21404
commit 3d1db4a506
2112 files changed
+224261 -95824

No files matched your search

@@ -45,11 +45,11 @@
// СЕРВЕРНЫЕ ОБРАБОТЧИКИ.
СерверныеОбработчики[
"СтандартныеПодсистемы.БазоваяФункциональность\ПриДобавленииПараметровРаботыКлиентскойЛогикиСтандартныхПодсистемПриЗапуске"].Добавить(
"СтандартныеПодсистемы.БазоваяФункциональность\ПриДобавленииПараметровРаботыКлиентаПриЗапуске"].Добавить(
"НапоминанияПользователяСлужебный");
СерверныеОбработчики[
"СтандартныеПодсистемы.БазоваяФункциональность\ПриДобавленииПараметровРаботыКлиентскойЛогикиСтандартныхПодсистем"].Добавить(
"СтандартныеПодсистемы.БазоваяФункциональность\ПриДобавленииПараметровРаботыКлиента"].Добавить(
"НапоминанияПользователяСлужебный");
КонецПроцедуры
@@ -462,12 +462,19 @@
// Обработчик подписки на событие ПриЗаписи объекта, по поводу которого можно создавать напоминания.
Процедура ПроверитьИзмененияДатВПредметеПриЗаписи(Источник, Отказ) Экспорт
Если Не ОбщегоНазначения.ЭтоПланОбмена(Источник.Метаданные()) И Источник.ОбменДанными.Загрузка Тогда
Возврат;
Если Источник.ОбменДанными.Загрузка Тогда
Возврат;
КонецЕсли;
Если СтандартныеПодсистемыСервер.ЭтоИдентификаторОбъектаМетаданных(Источник) Тогда
Возврат;
КонецЕсли;
Если ПолучитьФункциональнуюОпцию("ИспользоватьНапоминанияПользователя") Тогда
ПроверитьИзмененияДатВПредмете(Источник.Ссылка);
КонецЕсли;
КонецПроцедуры
// Создает напоминание пользователя. Если по объекту уже есть напоминание, то перезаписывает его.
@@ -628,7 +635,7 @@
// Параметры:
// Параметры - Структура - структура параметров запуска.
//
Процедура ПриДобавленииПараметровРаботыКлиентскойЛогикиСтандартныхПодсистемПриЗапуске(Параметры) Экспорт
Процедура ПриДобавленииПараметровРаботыКлиентаПриЗапуске(Параметры) Экспорт
Параметры.Вставить("НастройкиНапоминаний",
Новый ФиксированнаяСтруктура("ИспользоватьНапоминания", ПолучитьНастройкиНапоминаний().ИспользоватьНапоминания));
@@ -641,7 +648,7 @@
// Параметры:
// Параметры - Структура - структура параметров.
//
Процедура ПриДобавленииПараметровРаботыКлиентскойЛогикиСтандартныхПодсистем(Параметры) Экспорт
Процедура ПриДобавленииПараметровРаботыКлиента(Параметры) Экспорт
Параметры.Вставить("НастройкиНапоминаний",
Новый ФиксированнаяСтруктура(ПолучитьНастройкиНапоминаний()));