disabled verification execute internal code in common module and fixe…

…d smells

src/cf/Catalogs/пбп_ПользовательскиеФункции/Ext/ManagerModule.bsl

@@ -130,7 +130,8 @@
 				СправочникСсылка = Неопределено;
 
 				Если ВыводитьОшибки Тогда
-					ШаблонСообщения = НСтр("ru='Не удалось найти предопределенный элемент справочника ""Пользовательские функции"" по имени %1';
+					ШаблонСообщения =
+						НСтр("ru='Не удалось найти предопределенный элемент справочника ""Пользовательские функции"" по имени %1';
 						|en='Failed to find a predefined element of the directory ""User-defined functions"" named %1'");
 					ТекстСообщения = СтрШаблон(ШаблонСообщения, ОписаниеЭлемента.ИмяПредопределенного);
 

src/cf/CommonModules/пбп_ЗагрузкаФайлаЧерезТабличныйДокументСервер/Ext/Module.bsl

@@ -178,9 +178,11 @@
 //
 Функция ПолучитьПромежуточнуюТаблицуИзCSVФайла(ПутьКФайлу, СтруктураМакета, Кодировка = "UTF8", Разделитель = "") Экспорт
 
+	ДлинаСтрокиКолонки = 300;
+
 	СыраяТаблица = Новый ТаблицаЗначений;
 	Для Каждого КолонкаТаблицы Из СтруктураМакета Цикл
-		СыраяТаблица.Колонки.Добавить(КолонкаТаблицы.ИмяКолонки, пбп_Переадресация.ОписаниеТипаСтрока(300));
+		СыраяТаблица.Колонки.Добавить(КолонкаТаблицы.ИмяКолонки, пбп_Переадресация.ОписаниеТипаСтрока(ДлинаСтрокиКолонки));
 	КонецЦикла;
 
 	ЗагружаемыйФайл = Новый ЧтениеТекста(ПутьКФайлу, Кодировка);

src/cf/CommonModules/пбп_ИнтеграцииСервер/Ext/Module.bsl

@@ -362,9 +362,12 @@
 //
 Функция ПодготовитьТаблицуКодовОтветаHTTP() Экспорт
 
+	РазрядностьКодОтвета = 3;
+	ДлинаСтрокиОписания = 150;
+
 	ТаблицаКодовОтвета = Новый ТаблицаЗначений;
-	ТаблицаКодовОтвета.Колонки.Добавить("КодОтвета"			, пбп_Переадресация.ОписаниеТипаЧисло(3));
-	ТаблицаКодовОтвета.Колонки.Добавить("КраткоеОписание"	, пбп_Переадресация.ОписаниеТипаСтрока(150));
+	ТаблицаКодовОтвета.Колонки.Добавить("КодОтвета"			, пбп_Переадресация.ОписаниеТипаЧисло(РазрядностьКодОтвета));
+	ТаблицаКодовОтвета.Колонки.Добавить("КраткоеОписание"	, пбп_Переадресация.ОписаниеТипаСтрока(ДлинаСтрокиОписания));
 
 	// Успешные
 	НоваяСтрока = ТаблицаКодовОтвета.Добавить();

src/cf/CommonModules/пбп_ОбщегоНазначенияСервер/Ext/Module.bsl

@@ -303,7 +303,7 @@
 		СправочникЗаписан = Ложь;
 
 		Если РежимыВывода.ВыводитьОшибки Тогда
-			пбп_Переадресация.СообщитьПользователю(КраткоеПредставлениеОшибки(ИнформацияОбОшибке()));
+			пбп_Переадресация.СообщитьПользователю(ОбработкаОшибок.КраткоеПредставлениеОшибки(ИнформацияОбОшибке()));
 		КонецЕсли;
 
 		ЗаписьЖурналаРегистрации("пбп_.ОшибкаЗаписиСправочника", УровеньЖурналаРегистрации.Ошибка,,,

src/cf/CommonModules/пбп_Переадресация/Ext/Module.bsl

@@ -169,8 +169,11 @@
 	КонецЕсли;
 
 	Если Метаданные.ОбщиеМодули.Найти(Имя) <> Неопределено Тогда
+		// BSLLS:ExecuteExternalCodeInCommonModule-off
+		// ВычислитьВБезопасномРежиме не используется, чтобы избежать вызова ОбщийМодуль рекурсивно.
 		УстановитьБезопасныйРежим(Истина);
 		Модуль = Вычислить(Имя);
+		// BSLLS:ExecuteExternalCodeInCommonModule-on
 	ИначеЕсли СтрЧислоВхождений(Имя, ".") = 1 Тогда
 		Возврат СерверныйМодульМенеджера(Имя);
 	Иначе
@@ -1664,7 +1667,20 @@
 
 #Область Прочее
 
-// Аналог метода БСП. Пока заглушка, см. ОбщегоНазначения.ПриНачалеВыполненияРегламентногоЗадания
+// Аналог метода БСП. Выполняет проверки перед выполнением обработчика регламентного задания и прерывает выполнение,
+// если его запуск в данный момент невозможен, например:
+//  - еще не завершено обновление программы;
+//  - запуск через консоль или другим способом, минуя включение функциональной опции 
+//    (если регламентное задание зависит от функциональных опций);
+//  - попытка выполнения задания, работающего с внешними ресурсами в копии информационной базы.
+//
+// Параметры:
+//  РегламентноеЗадание - ОбъектМетаданныхРегламентноеЗадание - регламентное задание,
+//    из которого вызывается данная процедура.
+//
+// Пример:
+// ОбщегоНазначения.ПриНачалеВыполненияРегламентногоЗадания(Метаданные.РегламентныеЗадания.<ИмяРегламентногоЗадания>);
+//
 Процедура ПриНачалеВыполненияРегламентногоЗадания(РегламентноеЗадание = Неопределено) Экспорт
 
 	Результат = ПереадресацияМодуляОбщегоНазначения();
@@ -2337,46 +2353,6 @@
 
 #КонецОбласти
 
-#Область СлужебныйПрограммныйИнтерфейс
-
-#Область ПереадресацияМетодов
-
-#Область ЖурналРегистрации
-
-// Аналог метода БСП. Записывает сообщение в журнал регистрации.
-//
-//  Параметры: 
-//   ИмяСобытия       - Строка - имя события для журнала регистрации.
-//   Уровень          - УровеньЖурналаРегистрации - уровни важности событий журнала регистрации.
-//   ОбъектМетаданных - ОбъектМетаданных - объект метаданных, к которому относится событие.
-//   Данные           - ЛюбаяСсылка
-//                    - Число
-//                    - Строка
-//                    - Дата
-//                    - Булево
-//                    - Неопределено
-//                    - Тип - данные, с которыми связано событие.
-//                      Рекомендуется указывать ссылки на объекты данных (элементы справочников, документы, к которым
-//                      относится событие).
-//   Комментарий      - Строка - комментарий для события журнала.
-//
-//Процедура Переадресация_ДобавитьСообщениеДляЖурналаРегистрации(Знач ИмяСобытия, Знач Уровень,
-//		Знач ОбъектМетаданных = Неопределено, Знач Данные = Неопределено, Знач Комментарий = "")
-//		
-//	Если ПустаяСтрока(ИмяСобытия) Тогда
-//		ИмяСобытия = "Событие"; // не локализуется, чтобы не допускать остановки запуска в частично переведенной конфигурации
-//	КонецЕсли;
-//	
-//	ЗаписьЖурналаРегистрации(ИмяСобытия, Уровень, ОбъектМетаданных, Данные, Комментарий, РежимТранзакцииЗаписиЖурналаРегистрации.Независимая);
-//	
-//КонецПроцедуры
-
-#КонецОбласти
-
-#КонецОбласти
-
-#КонецОбласти
-
 #Область СлужебныеПроцедурыИФункции
 
 #Область МодульПереадресацииПоПодсистемам
@@ -2416,6 +2392,7 @@
 #Область ФайловаяСистема
 
 // Аналог метода БСП.
+//
 Процедура УдалитьВременныеФайлы(Знач Путь)
 
 	Попытка
@@ -2434,6 +2411,7 @@
 КонецПроцедуры
 
 // Аналог метода БСП.
+//
 Функция ЭтоИмяВременногоФайла(Путь)
 
 	// Ожидается, что Путь получен методом ПолучитьИмяВременногоФайла().
@@ -2445,6 +2423,7 @@
 #Область ЗапуститьПрограмму
 
 // Аналог метода БСП.
+//
 Процедура ПроверитьТекущийКаталог(СтрокаКоманды, ТекущийКаталог)
 
 	Если Не ПустаяСтрока(ТекущийКаталог) Тогда 
@@ -2476,6 +2455,7 @@
 КонецПроцедуры
 
 // Аналог метода БСП.
+//
 Функция ПрочитатьФайлЕслиСуществует(Путь, Кодировка)
 
 	Результат = Неопределено;
@@ -2827,6 +2807,7 @@
 #Область УсловныеВызовы
 
 // Аналог метода БСП. Возвращает серверный модуль менеджера по имени объекта.
+//
 Функция СерверныйМодульМенеджера(Имя)
 	ОбъектНайден = Ложь;
 
@@ -2909,8 +2890,11 @@
 			НСтр("ru = 'Объект метаданных ""%1"" не существует.'"), Имя);
 	КонецЕсли;
 
+	// BSLLS:ExecuteExternalCodeInCommonModule-off
+	// ВычислитьВБезопасномРежиме не используется, чтобы избежать вызова ОбщийМодуль рекурсивно.
 	УстановитьБезопасныйРежим(Истина);
 	Модуль = Вычислить(Имя);
+	// BSLLS:ExecuteExternalCodeInCommonModule-on
 
 	Возврат Модуль;
 КонецФункции

src/cf/CommonModules/пбп_ПереадресацияКлиентСервер/Ext/Module.bsl

@@ -472,11 +472,6 @@
 		Или СтрНайти(Параметр7, "%")
 		Или СтрНайти(Параметр8, "%")
 		Или СтрНайти(Параметр9, "%");
-
-	Если ЕстьПараметрыСПроцентом Тогда
-		//Возврат ПодставитьПараметрыСПроцентом(ШаблонСтроки, Параметр1,
-		//	Параметр2, Параметр3, Параметр4, Параметр5, Параметр6, Параметр7, Параметр8, Параметр9);
-	КонецЕсли;
 
 	ШаблонСтроки = СтрЗаменить(ШаблонСтроки, "%1", Параметр1);
 	ШаблонСтроки = СтрЗаменить(ШаблонСтроки, "%2", Параметр2);

src/cf/CommonModules/пбп_ПредопределенныеЗначенияПереопределяемый/Ext/Module.bsl

@@ -313,14 +313,17 @@
 //
 Функция КолонкиНастройкиИнтеграции() Экспорт
 
+	ДлинаСтрокиПодключения = 200;
+	ДлинаИмениОбъекта = 100;
+
 	Колонки = Новый Структура;
 
 	// Добавление
 	Колонки.Вставить("ИнтегрируемаяСистема"	, Новый ОписаниеТипов("СправочникСсылка.пбп_ИнтегрируемыеСистемы"));
 	Колонки.Вставить("ТипИнтеграции"		, Новый ОписаниеТипов("СправочникСсылка.пбп_ТипыИнтеграций"));
-	Колонки.Вставить("СтрокаПодключения"	, пбп_Переадресация.ОписаниеТипаСтрока(200));
+	Колонки.Вставить("СтрокаПодключения"	, пбп_Переадресация.ОписаниеТипаСтрока(ДлинаСтрокиПодключения));
 	Колонки.Вставить("ТипАвторизации"		, Новый ОписаниеТипов("ПеречислениеСсылка.пбп_ТипыАвторизации"));
-	Колонки.Вставить("ИмяОбъекта"			, пбп_Переадресация.ОписаниеТипаСтрока(100));
+	Колонки.Вставить("ИмяОбъекта"			, пбп_Переадресация.ОписаниеТипаСтрока(ДлинаИмениОбъекта));
 	// КонецДобавления
 
 	Возврат Колонки;

src/cf/Subsystems/пбп_ОбщегоНазначения.xml

@@ -20,10 +20,8 @@
 			<Explanation/>
 			<Picture/>
 			<Content>
-				<xr:Item xsi:type="xr:MDObjectRef">ea239394-f82e-4130-8e72-35a5d54e904b</xr:Item>
 				<xr:Item xsi:type="xr:MDObjectRef">CommonModule.пбп_ОбщегоНазначенияПовтИсп</xr:Item>
 				<xr:Item xsi:type="xr:MDObjectRef">CommonModule.пбп_ОбщегоНазначенияСервер</xr:Item>
-				<xr:Item xsi:type="xr:MDObjectRef">037f61f2-578e-4e83-b9fb-196f0c4e321a</xr:Item>
 				<xr:Item xsi:type="xr:MDObjectRef">Role.ПолныеПрава</xr:Item>
 				<xr:Item xsi:type="xr:MDObjectRef">Role.АдминистраторСистемы</xr:Item>
 				<xr:Item xsi:type="xr:MDObjectRef">Role.ИнтерактивноеОткрытиеВнешнихОтчетовИОбработок</xr:Item>
@@ -36,17 +34,14 @@
 				<xr:Item xsi:type="xr:MDObjectRef">CommonModule.пбп_МодификацияКонфигурацииКлиентПовтИсп</xr:Item>
 				<xr:Item xsi:type="xr:MDObjectRef">CommonModule.пбп_ОбновлениеИнформационнойБазыПБП</xr:Item>
 				<xr:Item xsi:type="xr:MDObjectRef">CommonModule.пбп_ОбщегоНазначенияВызовСервера</xr:Item>
-				<xr:Item xsi:type="xr:MDObjectRef">3a5a58ec-9b8c-4c00-90df-b4fac7e8e71f</xr:Item>
-				<xr:Item xsi:type="xr:MDObjectRef">0c6b95c8-5689-4349-ad06-c6a3f985a597</xr:Item>
-				<xr:Item xsi:type="xr:MDObjectRef">813e3212-8e28-4ee1-bf6c-afd0977ac779</xr:Item>
 				<xr:Item xsi:type="xr:MDObjectRef">CommonModule.пбп_СхемыЗапросов</xr:Item>
 				<xr:Item xsi:type="xr:MDObjectRef">DefinedType.пбп_Пользователи</xr:Item>
 				<xr:Item xsi:type="xr:MDObjectRef">DefinedType.пбп_УчетныеЗаписиЭлектроннойПочты</xr:Item>
 				<xr:Item xsi:type="xr:MDObjectRef">CommonModule.пбп_Переадресация</xr:Item>
 				<xr:Item xsi:type="xr:MDObjectRef">CommonModule.пбп_ПереадресацияКлиент</xr:Item>
 				<xr:Item xsi:type="xr:MDObjectRef">CommonModule.пбп_ПереадресацияКлиентСервер</xr:Item>
-				<xr:Item xsi:type="xr:MDObjectRef">547c2772-ff81-4b4e-9654-9071ab5274da</xr:Item>
 				<xr:Item xsi:type="xr:MDObjectRef">CommonModule.пбп_ПереадресацияПовтИсп</xr:Item>
+				<xr:Item xsi:type="xr:MDObjectRef">CommonModule.пбп_ПереадресацияКлиентПовтИсп</xr:Item>
 			</Content>
 		</Properties>
 		<ChildObjects/>

src/cfe/YAXUnit/CommonModules/ОМ_ОбщегоНазаначенияСервер/Ext/Module.bsl

@@ -20,14 +20,14 @@
 
 Процедура ТестДолженСоздатьТипЧисло() Экспорт
 
-	Описание = пбп_ОбщегоНазначенияСервер.ОписаниеТипаЧисло(10, 2, ДопустимыйЗнак.Неотрицательный);
+	Описание = пбп_Переадресация.ОписаниеТипаЧисло(10, 2, ДопустимыйЗнак.Неотрицательный);
 	ЮТест.ОжидаетЧто(Тип(Описание)).Равно(Тип("Число"));
 
 КонецПроцедуры
 
 Процедура ТестДолженВернутьОписаниеЧислаСКорректнымЗнаком() Экспорт
 
-	Описание = пбп_ОбщегоНазначенияСервер.ОписаниеТипаЧисло(10, 2, ДопустимыйЗнак.Неотрицательный);
+	Описание = пбп_Переадресация.ОписаниеТипаЧисло(10, 2, ДопустимыйЗнак.Неотрицательный);
 	Проверка = Новый ОписаниеТипов("Число", Новый КвалификаторыЧисла(10, 2, ДопустимыйЗнак.Неотрицательный));
 
 	ЮТест.ОжидаетЧто(Проверка).Равно(Проверка);
@@ -36,8 +36,8 @@
 
 Процедура ТестДолженУстановитьЗнакЛюбойПриОтсутствииЯвнойУказки() Экспорт
 
-	Описание = пбп_ОбщегоНазначенияСервер.ОписаниеТипаЧисло(10, 2);
-	Проверка = пбп_ОбщегоНазначенияСервер.ОписаниеТипаЧисло(10, 2, ДопустимыйЗнак.Любой);
+	Описание = пбп_Переадресация.ОписаниеТипаЧисло(10, 2);
+	Проверка = пбп_Переадресация.ОписаниеТипаЧисло(10, 2, ДопустимыйЗнак.Любой);
 
 	ЮТест.ОжидаетЧто(Описание).Равно(Проверка);