Отправка сообщений в чат (обсуждения)

&НаСервереБезКонтекста
Процедура ОтправитьСообщенияПоСписку(ТекстСообщения, Отправитель, СписокПолучатеелей)

    Сообщение = Обсуждения.ОписаниеСообщения(ТекстСообщения);

    Для Каждого Пользователь Из СписокПользователей Цикл

        ПолучательВМассиве = ОбщегоНазначенияКлиентСервер.ЗначениеВМассиве(Пользователь);
        Попытка
          Обсуждения.ОтправитьСообщение(Отправитель, ПолучательВМассиве, Сообщение, Неопределено);
        Исключение
          ЗаписьЖурналаРегистрации(...);
        КонецПопытки;

    КонецЦикла;

КонецПроцедуры