    // Сервер
    Порт          = 5555;
    ОбъектСервера = OPI_ZeroMQ.ОткрытьПортPub(Порт);

    Если Не OPI_ZeroMQ.ЭтоОбъектКоннектора(ОбъектСервера) Тогда
        ВызватьИсключение OPI_Инструменты.JSONСтрокой(ОбъектСервера);
    КонецЕсли;

    // Клиент
    Адрес         = "tcp://127.0.0.1:5555";
    ОбъектКлиента = OPI_ZeroMQ.СоздатьСоединениеSub(Адрес);

    Если Не OPI_ZeroMQ.ЭтоОбъектКоннектора(ОбъектКлиента) Тогда
        ВызватьИсключение OPI_Инструменты.JSONСтрокой(ОбъектКлиента);
    КонецЕсли;

    Префикс = "topic.";
    Сообщение = СтрШаблон("%1ZeroMQ_SUB_%2", Префикс, Формат(ТекущаяДата(), "ДФ=yyyyMMddhhmmss"));
    Данные  = ПолучитьДвоичныеДанныеИзСтроки(Сообщение);

    Результат   = OPI_ZeroMQ.Подписаться(ОбъектКлиента, Префикс);