пер ИдОбсуждения: Ууид
пер ИдСообщения: Ууид
попытка
знч НазваниеОбсуждения = "Название обсуждения"
знч КлючОбсуждения = "Ключ обсуждения"
ИдОбсуждения = СистемаВзаимодействия.СоздатьОбсуждение([ИдПользователяСВ1, ИдПользователяСВ2],
НазваниеОбсуждения, КлючОбсуждения)
поймать Исключение : ИсключениеСистемыВзаимодействия
;
попытка
пер МассивПолучателейСообщения: Массив<Ууид> = новый Массив<Ууид>()
МассивПолучателейСообщения.Добавить(ИдПользователяСВ2)
знч ТекстСообщения = "Привет, пользователь!"
ИдСообщения = СистемаВзаимодействия.СоздатьСообщение(ИдОбсуждения,
МассивПолучателейСообщения, ТекстСообщения)
поймать Исключение : ИсключениеСистемыВзаимодействия
;
попытка
пер МассивНовыхСообщений = СистемаВзаимодействия.ПолучитьНепрочитанныеСообщения(ИдОбсуждения)
для Сообщение из МассивНовыхСообщений
;
поймать Исключение : ИсключениеСистемыВзаимодействия
;