astakhovp/SSL
1
0 Fork 0
Code Issues Actions Packages Projects Releases Wiki Activity

2_1_4_34

Browse Source
This commit is contained in:
Компания 1С committed 2013-07-19 14:29:00 +03:00
1 parent 39fb383848
commit b4c3b3c785
1473 files changed
+114465 -30756
Download Patch File Download Diff File Expand all files Collapse all files

No files matched your search

SSL/src/CommonModules/СтандартныеПодсистемыКлиентСервер/Module.bsl
+20
View File
@@ -66,3 +66,23 @@
КонецЦикла;
КонецЕсли;
КонецПроцедуры
// Добавляет в оповещение для динамических списков типы из массива измененных объектов.
//
// Параметры:
// Результат (Структура) См. СтандартныеПодсистемыКлиент.ПоказатьРезультатВыполнения().
// ИмяСобытия (Строка) Имя события, которое используется для первичной идентификации сообщений принимающими формами.
// Параметр (*) Набор данных, которые используются принимающей формой для обновления состава.
// Источник (*) Источник оповещения, например форма-источником.
//
Процедура РезультатВыполненияДобавитьОповещениеОткрытыхФорм(Результат, ИмяСобытия, Параметр = Неопределено, Источник = Неопределено) Экспорт
Если Не Результат.Свойство("ОповещениеФорм") Тогда
Результат.Вставить("ОповещениеФорм", Новый Массив);
ИначеЕсли ТипЗнч(Результат.ОповещениеФорм) = Тип("Структура") Тогда // Структуру в массив структур.
ОповещениеФорм = Результат.ОповещениеФорм;
Результат.ОповещениеФорм = Новый Массив;
Результат.ОповещениеФорм.Добавить(ОповещениеФорм);
КонецЕсли;
ОповещениеФорм = Новый Структура("Использование, ИмяСобытия, Параметр, Источник", Истина, ИмяСобытия, Параметр, Источник);
Результат.ОповещениеФорм.Добавить(ОповещениеФорм);
КонецПроцедуры