---

Компонента = кор_HTTPКоннектор.СоздатьКомпонентуКафкаКлиент();

СистИнфо = Новый СистемнаяИнформация;
Строки = Новый Массив;
Строки.Добавить("Компьютер: " + ИмяКомпьютера());
Строки.Добавить("Платформа: " + СистИнфо.ВерсияПриложения);
Строки.Добавить("ОС: " + СистИнфо.ВерсияОС);
Строки.Добавить("Тип платформы: " + Строка(СистИнфо.ТипПлатформы));

Методы = Новый Массив;
Методы.Добавить("ОтправитьПакетСРезультатом");
Методы.Добавить("УстановитьТаймаутОчисткиПродюсера");
Методы.Добавить("ПолучитьМетрикиПродюсера");

Для Каждого ИмяМетода Из Методы Цикл
	Попытка
		Выполнить("Компонента." + ИмяМетода + "()");
		Строки.Добавить(ИмяМетода + ": есть");
	Исключение
		Текст = КраткоеПредставлениеОшибки(ИнформацияОбОшибке());
		// "Метод объекта не обнаружен" — метода нет.
		// Любая другая ошибка (мало параметров, продюсер не инициализирован) — метод есть.
		Строки.Добавить(ИмяМетода + ": "
			+ ?(Найти(Текст, "не обнаружен") > 0, "НЕТ", "есть (" + Текст + ")"));
	КонецПопытки;
КонецЦикла;

// Процедура или функция
Попытка
	Р = Компонента.ОстановитьПродюсера();
	Строки.Добавить("ОстановитьПродюсера: функция");
Исключение
	Строки.Добавить("ОстановитьПродюсера: " + КраткоеПредставлениеОшибки(ИнформацияОбОшибке()));
КонецПопытки;

ЗаписьЖурналаРегистрации("Kafka. Диагностика", УровеньЖурналаРегистрации.Информация,
	, , СтрСоединить(Строки, Символы.ПС));