#240 Поддержка команд по новой задаче

src/cf/CommonModules/узТелеграмБотКоманды/Ext/Module.bsl

@@ -13,12 +13,15 @@
 	ЗадачаСсылка = Неопределено;
 	Если НачинаетсяСНомераЗадачи(Сообщение, ЗадачаСсылка) Тогда
 		Если ПроверитьНовыйФайл(Сообщение, ЗадачаСсылка, НастройкиБота)
+		ИЛИ ПроверитьНовуюЗадачу(Сообщение, ЗадачаСсылка)
 		ИЛИ ПроверитьНовыйВопрос(Сообщение, ЗадачаСсылка)
 		ИЛИ ПроверитьНовыйКомментарий(Сообщение, ЗадачаСсылка) Тогда
 			Возврат;
 		КонецЕсли;
 	КонецЕсли;
 	
+	ПроверитьНовуюЗадачу(Сообщение);
+	
 КонецПроцедуры
 
 // #240 Пиганов Г.В. 2020-09-08
@@ -139,6 +142,39 @@
 	
 КонецФункции
 
+Функция ПроверитьНовуюЗадачу(Сообщение, ЗадачаСсылка = Неопределено)
+	
+	//НоваяЗадача - "#ТекстОписания"
+	//НоваяПодзадача - "#НомерЗадачи #ТекстОписания"
+	
+	Если Сообщение.Обработано Тогда
+		Возврат Истина;
+	КонецЕсли;
+	
+	Если СтрНачинаетсяС(Сообщение.Текст, "#") Тогда
+		Сообщение.Текст = СокрЛ(Сред(Сообщение.Текст, 2));
+	//ИначеЕсли СтрНачинаетсяС(Сообщение.Текст, "/#") Тогда
+	//	ТекстСообщения = Сред(Сообщение.Текст, 3);
+	Иначе
+		Возврат Ложь;
+	КонецЕсли;
+	
+	ЗадачаОбъект = Справочники.узЗадачи.СоздатьЭлемент();
+	ЗадачаОбъект.Автор = Сообщение.Пользователь;
+	ЗадачаОбъект.ДатаСоздания = Сообщение.Дата;
+	ЗадачаОбъект.ТекстСодержания = Сообщение.Текст;
+	ЗадачаОбъект.Наименование = Сообщение.Текст;
+	ЗадачаОбъект.ОформлениеТекста = Перечисления.узОформлениеТекста.Текст;
+	ЗадачаОбъект.Статус = Справочники.узКонстанты.ПолучитьЗначениеКонстанты("СтатусЗадачиПоУмолчанию", Тип("СправочникСсылка.узСтатусыЗадачи"), , Ложь);
+	ЗадачаОбъект.Родитель = ЗадачаСсылка;
+	ЗадачаОбъект.Записать();
+	
+	Сообщение.Обработано = Истина;
+	
+	Возврат Истина;
+	
+КонецФункции
+
 // #240 Пиганов Г.В. 2020-09-08
 Функция ПроверитьНовыйКомментарий(Сообщение, ЗадачаСсылка)
 	
@@ -189,8 +225,9 @@
 		Для ПозЧисла = 2 По СтрДлина(ТекстСообщения) Цикл
 			КодСимволаЧисла = КодСимвола(ТекстСообщения, ПозЧисла);
 			Если КодСимволаЧисла < 48 ИЛИ КодСимволаЧисла > 57 Тогда // "0" - "9"
-				Если НЕ ПустаяСтрока(Символ(КодСимволаЧисла)) Тогда
+				Если НЕ ПустаяСтрока(Символ(КодСимволаЧисла)) ИЛИ НомерЗадачи = "" Тогда
-					// После номера найден не пробельный символ и значит начинается не с номера задачи
+					// Если после номера найден не пробельный символ или пробельный при
+					// пустом номере задачи, то сообщение начинается не с номера задачи
 					НомерЗадачи = "";
 				ИначеЕсли ПозЧисла > 1 Тогда
 					// Удаление из текста сообщения номера задачи