Программное формирование обсуждения через систему взаимодействия

buketoff 181 3 4 8
 НавигационнаяСсыылка   = ПолучитьНавигационнуюСсылку(СсылкаНаДокументОбсуждения);
 КонтекстОбсуждения     = Новый КонтекстОбсужденияСистемыВзаимодействия(НавигационнаяСсыылка);
 МенеджерВзаимодействия = Новый МенеджерСистемыВзаимодействия;
 	
 Отбор = Новый ОтборОбсужденийСистемыВзаимодействия;
 Отбор.КонтекстноеОбсуждение = Истина;
 Отбор.ТекущийПользовательЯвляетсяУчастником = Ложь;
 Отбор.КонтекстОбсуждения = КонтекстОбсуждения;
 Обсуждение = МенеджерВзаимодействия.ПолучитьОбсуждения(Отбор);
 	
 Если Обсуждение.Количество() = 0 Тогда
 		Обсуждение = МенеджерВзаимодействия.СоздатьОбсуждение();
 		Обсуждение.КонтекстОбсуждения = КонтекстОбсуждения;
 		Обсуждение.Ключ = Строка(СсылкаНаДокументОбсуждения.УникальныйИдентификатор());
 		Обсуждение.Записать();
 	Иначе
 		Обсуждение = Обсуждение[0];
 	КонецЕсли; 
 	
 Автор = ПараметрыСеанса.ТекущийПользователь;
 	
 СообщениеДляОбсуждения = МенеджерВзаимодействия.СоздатьСообщение(Обсуждение.Идентификатор);
 СообщениеДляОбсуждения.Дата  = ТекущаяДата();
 СообщениеДляОбсуждения.Автор = ПолучитьИД(Автор);
 СообщениеДляОбсуждения.Получатели.Добавить(ПолучитьИД(ПолучательОповещенияВСистемеВзаимодействия));
 СообщениеДляОбсуждения.Текст = Новый ФорматированнаяСтрока("текст обсуждения");
 СообщениеДляОбсуждения.Записать();
0

См. также

Шаблон ПриКомпоновкеРезультата Программное формирование

СобытиеЖурналаРегистрацииДобавлениеФайлаОбменЧерезФС (БСП)

СобытиеЖурналаРегистрацииДобавлениеФайлаОбменНеЧерезФС (БСП)

ПредлагатьОбсужденияЗавершение (БСП)

ПоляАдреса (БСП)

ПриОпределенииПоддерживаемыхВерсийПрограммныхИнтерфейсов (БСП)

ПолучитьВерсииИнтерфейсаЧерезВнешнееСоединение (БСП)

ПолучитьВерсииИнтерфейса (БСП)

Стандартное формирование выборок

Модератору