- Добавил оформление областей в общих модулях

- Декомпозиция процедур и функций общих модулей

src/cf/CommonModules/ТелеграмРаботаСКлавиатурой/Ext/Module.bsl

@@ -1,4 +1,6 @@
-Функция КлавиатураОтвета(Клавиатура, Компактная = Ложь, Одноразовая = Ложь) Экспорт
+#Область ПрограммныйИнтерфейс
+
+Функция КлавиатураОтвета(Клавиатура, Компактная = Ложь, Одноразовая = Ложь) Экспорт
 	
 	СоответствиеКлавиатуры = Новый Соответствие();
 	
@@ -26,7 +28,6 @@
 	
 КонецФункции
 
-
 Функция КнопкаКлавиатурыВстроенной(Надпись, Url = Неопределено, CallbackData = Неопределено) Экспорт
 	
 	СоответствиеКнопка = Новый Соответствие;
@@ -69,5 +70,33 @@
 
 КонецФункции
 
+Функция МассивРядовСоСпискомКонфигураций(ИдЧата, Команда, Подписка = Неопределено) Экспорт
+	
+	СписокКонфигураций = РаботаСОбновлениямиВызовСервера.СписокКонфигураций(ИдЧата);
+	
+	Если СписокКонфигураций.Количество() = 0 Тогда
+		Возврат Неопределено;
+	Иначе
+		МассивРядов = Новый Массив;
+		Для каждого ПунктМенюПодписки Из СписокКонфигураций Цикл
+			Если Подписка = Неопределено 
+					ИЛИ (Подписка И ПунктМенюПодписки.Подписка)
+					ИЛИ (НЕ Подписка И НЕ ПунктМенюПодписки.Подписка) Тогда
+				МассивКнопок = Новый Массив;
+				МассивКнопок.Добавить(ТелеграмРаботаСКлавиатурой.КнопкаКлавиатурыВстроенной(
+				ПунктМенюПодписки.Наименование
+				,
+				,
+				СтрШаблон("%1 %2", Команда, ПунктМенюПодписки.Имя)
+				));
+				МассивРядов.Добавить(МассивКнопок);
+			КонецЕсли;
+		КонецЦикла;
+		Возврат МассивРядов;
+	КонецЕсли;
+
+КонецФункции
+
+#КонецОбласти