Исправление ошибок по Sonarqube. #121 Добавление метода удаления файл…

…ов на SFTP. Содержит исправления для #124 и #125
firstBitSportivnaya · Oct 16, 2024 · c563d42 · c563d42
1 parent 293f478
commit c563d42
Show file tree

Hide file tree

Showing 9 changed files with 350 additions and 160 deletions.
diff --git a/.bsl-language-server.json b/.bsl-language-server.json
@@ -10,7 +10,7 @@
         "userWordsToIgnore": "пбп"
       },
       "LatinAndCyrillicSymbolInWord": {
-        "excludeWords": "ЧтениеXML, ЧтениеJSON, ЗаписьXML, ЗаписьJSON, ComОбъект, ФабрикаXDTO, ОбъектXDTO, СоединениеFTP, HTTPСоединение, HTTPЗапрос, HTTPСервисОтвет, SMSСообщение, WSПрокси, ИмяCOMОбъекта, ЭтоWindowsКлиент",
+        "excludeWords": "ЧтениеXML, ЧтениеJSON, ЗаписьXML, ЗаписьJSON, ComОбъект, ФабрикаXDTO, ОбъектXDTO, СоединениеFTP, HTTPСоединение, HTTPЗапрос, HTTPСервисОтвет, SMSСообщение, WSПрокси, ИмяCOMОбъекта, ЭтоWindowsКлиент, ЭтоLinuxСервер, ВыполнитьПодключениеКFTPСерверуДляИнтеграционногоПотока, ЗаполнитьПараметрыПодключенияКSFTPСерверу, ПолучитьТаблицуФайловСодержимогоSFTPСервера",
         "allowTrailingPartsInAnotherLanguage": true
 }
     }

diff --git a/src/cf/Catalogs/пбп_ИсторияИнтеграции/Ext/ObjectModule.bsl b/src/cf/Catalogs/пбп_ИсторияИнтеграции/Ext/ObjectModule.bsl
@@ -20,12 +20,16 @@
 
 #Если Сервер Или ТолстыйКлиентОбычноеПриложение Или ВнешнееСоединение Тогда
 
+#Область СлужебныйПрограммныйИнтерфейс
+
 Функция ПолучитьДанныеФайлаСообщения() Экспорт
 
 	Возврат ФайлСообщения.Получить();
 
 КонецФункции
 
+#КонецОбласти // СлужебныйПрограммныйИнтерфейс
+
 #Область ОбработчикиСобытий
 
 Процедура ПередУдалением(Отказ)

diff --git a/src/cf/Catalogs/пбп_ИсторияИнтеграции/Forms/ФормаЭлемента/Ext/Form/Module.bsl b/src/cf/Catalogs/пбп_ИсторияИнтеграции/Forms/ФормаЭлемента/Ext/Form/Module.bsl
@@ -47,8 +47,10 @@
 		Элементы.ВидОтображенияЗапроса.Видимость = Объект.ФорматИнтеграции = Перечисления.пбп_ФорматыИнтеграций.JSON;
 		Элементы.ИсходящееСообщение.Вид = ВидПоляФормы.ПолеHTMLДокумента;
 		Элементы.ВходящееСообщение.Вид = ВидПоляФормы.ПолеHTMLДокумента;
-		Элементы.ИсходящееСообщение.УстановитьДействие("ДокументСформирован", "ЗапросИсходящийДокументСформирован_Подключаемый");
-		Элементы.ВходящееСообщение.УстановитьДействие("ДокументСформирован", "ЗапросВходящийДокументСформирован_Подключаемый");
+		Элементы.ИсходящееСообщение.УстановитьДействие("ДокументСформирован",
+			"ЗапросИсходящийДокументСформирован_Подключаемый");
+		Элементы.ВходящееСообщение.УстановитьДействие("ДокументСформирован",
+			"ЗапросВходящийДокументСформирован_Подключаемый");
 	Иначе
 		Элементы.ГруппаФорматированиеТекстаЗапроса.Видимость = Ложь;
 		Если ЗначениеЗаполнено(Объект.ВходящееСообщение) Тогда
@@ -120,8 +122,8 @@
 
 	Предопределенный = "Перечисление.пбп_ФорматыИнтеграций.XML";
 	Если Объект.ФорматИнтеграции = пбп_ОбщегоНазначенияСлужебныйКлиент.ПредопределенныйЭлемент(Предопределенный) Тогда
-		Элементы.ИсходящееСообщение.Документ.defaultView.Xonomy.plusminus("xonomy1", true);
-		Элементы.ВходящееСообщение.Документ.defaultView.Xonomy.plusminus("xonomy1", true);
+		Элементы.ИсходящееСообщение.Документ.defaultView.Xonomy.plusminus("xonomy1", True);
+		Элементы.ВходящееСообщение.Документ.defaultView.Xonomy.plusminus("xonomy1", True);
 	Иначе
 		Если ВидОтображенияЗапроса Тогда
 			ДокументВнешнийОбъектИсходящий.expandAll();
@@ -139,8 +141,8 @@
 
 	Предопределенный = "Перечисление.пбп_ФорматыИнтеграций.XML";
 	Если Объект.ФорматИнтеграции = пбп_ОбщегоНазначенияСлужебныйКлиент.ПредопределенныйЭлемент(Предопределенный) Тогда
-		Элементы.ИсходящееСообщение.Документ.defaultView.Xonomy.plusminus("xonomy1", false);
-		Элементы.ВходящееСообщение.Документ.defaultView.Xonomy.plusminus("xonomy1", false);
+		Элементы.ИсходящееСообщение.Документ.defaultView.Xonomy.plusminus("xonomy1", False);
+		Элементы.ВходящееСообщение.Документ.defaultView.Xonomy.plusminus("xonomy1", False);
 	Иначе
 		Если ВидОтображенияЗапроса Тогда
 			ДокументВнешнийОбъектИсходящий.collapseAll();
@@ -224,23 +226,7 @@
 
 		Если ЭлементНаследования = Справочники.пбп_ТипыИнтеграций.Каталог
 			Или ЭлементНаследования = Справочники.пбп_ТипыИнтеграций.FTPРесурсы Тогда
-			ЗаголовокЗаписываемыйФайл = НСтр("ru = 'Содержимое записываемого файла';");
-			ЗаголовокЧитаемыйФайл = НСтр("ru = 'Содержимое читаемого файла';");
-
-			Если ТипИнтеграции = Справочники.пбп_ТипыИнтеграций.SFTP Тогда
-				Элементы.ГруппаЗапросИсходящий.Заголовок = НСтр("ru = 'Исполняемая команда';");
-				Если ЭтоВыгрузка Тогда
-					Элементы.ГруппаЗапросВходящий.Заголовок = ЗаголовокЗаписываемыйФайл;
-				Иначе
-					Элементы.ГруппаЗапросВходящий.Заголовок = ЗаголовокЧитаемыйФайл;
-				КонецЕсли;
-			Иначе
-				Элементы.ГруппаЗапросИсходящий.Заголовок = ЗаголовокЗаписываемыйФайл;
-				Элементы.ГруппаЗапросВходящий.Заголовок = ЗаголовокЧитаемыйФайл;
-
-				Элементы.ГруппаЗапросИсходящий.Видимость = ЭтоВыгрузка;
-				Элементы.ГруппаЗапросВходящий.Видимость = Не ЭтоВыгрузка;
-			КонецЕсли;
+			УстановитьСвойстваЭлементовФайловогоОбмена(ТипИнтеграции, ЭтоВыгрузка);
 		ИначеЕсли ЭлементНаследования = Справочники.пбп_ТипыИнтеграций.ПочтовыйКлиент Тогда
 			Элементы.ГруппаЗапросИсходящий.Заголовок = НСтр("ru = 'Содержимое тела письма';");
 			Элементы.ГруппаЗапросИсходящий.Видимость = Истина;
@@ -266,6 +252,29 @@
 
 КонецПроцедуры
 
+&НаСервере
+Процедура УстановитьСвойстваЭлементовФайловогоОбмена(ТипИнтеграции, ЭтоВыгрузка)
+
+	ЗаголовокЗаписываемыйФайл = НСтр("ru = 'Содержимое записываемого файла';");
+	ЗаголовокЧитаемыйФайл = НСтр("ru = 'Содержимое читаемого файла';");
+
+	Если ТипИнтеграции = Справочники.пбп_ТипыИнтеграций.SFTP Тогда
+		Элементы.ГруппаЗапросИсходящий.Заголовок = НСтр("ru = 'Исполняемая команда';");
+		Если ЭтоВыгрузка Тогда
+			Элементы.ГруппаЗапросВходящий.Заголовок = ЗаголовокЗаписываемыйФайл;
+		Иначе
+			Элементы.ГруппаЗапросВходящий.Заголовок = ЗаголовокЧитаемыйФайл;
+		КонецЕсли;
+	Иначе
+		Элементы.ГруппаЗапросИсходящий.Заголовок = ЗаголовокЗаписываемыйФайл;
+		Элементы.ГруппаЗапросВходящий.Заголовок = ЗаголовокЧитаемыйФайл;
+
+		Элементы.ГруппаЗапросИсходящий.Видимость = ЭтоВыгрузка;
+		Элементы.ГруппаЗапросВходящий.Видимость = Не ЭтоВыгрузка;
+	КонецЕсли;
+
+КонецПроцедуры
+
 &НаСервереБезКонтекста
 Функция НаправлениеИнтеграцииВыгружено(СтатусОбмена)
 
@@ -344,7 +353,7 @@
 КонецПроцедуры
 
 &НаКлиенте
-Функция СохранитьБазовыйФайлРедактора(ФорматИнтеграции, Дополнение = "")
+Процедура СохранитьБазовыйФайлРедактора(ФорматИнтеграции, Дополнение = "")
 
 	Расширение = ФорматИнтеграции + "Editor" + Дополнение;
 
@@ -357,10 +366,10 @@
 		ЭтотОбъект, ДополнительныеПараметры);
 	пбп_ФайловаяСистемаКлиентПереадресация.СоздатьВременныйКаталог(Оповещение, Расширение);
 
-КонецФункции
+КонецПроцедуры
 
 &НаКлиенте
-Функция ПослеСозданияВременногоКаталогаДляБазовогоРедактора(
+Процедура ПослеСозданияВременногоКаталогаДляБазовогоРедактора(
 	Результат, Знач ДополнительныеПараметры = Неопределено) Экспорт
 
 	#Если НЕ ВебКлиент Тогда
@@ -382,7 +391,7 @@
 		КонецЕсли;
 	#КонецЕсли
 
-КонецФункции
+КонецПроцедуры
 
 &НаКлиенте
 Процедура ИнициализироватьИЗаполнитьТекстомОбъектJSON(ВидОтображения, ТипЗапроса = "")
@@ -440,7 +449,7 @@
 КонецПроцедуры
 
 &НаСервереБезКонтекста
-Функция ДвоичныеДанныеМакета(ФорматИнтеграцииСтрокой)
+Функция ДвоичныеДанныеМакета(Знач ФорматИнтеграцииСтрокой)
 
 	Возврат ПолучитьОбщийМакет("пбп_" + ФорматИнтеграцииСтрокой + "Editor");
 
@@ -450,7 +459,8 @@
 Функция ПолучитьФорматИнтеграции(ФорматИнтеграции)
 
 	ИндексЗначенияПеречисления = Перечисления.пбп_ФорматыИнтеграций.Индекс(ФорматИнтеграции);
-	ФорматИнтеграцииСтрокой = Метаданные.Перечисления.пбп_ФорматыИнтеграций.ЗначенияПеречисления[ИндексЗначенияПеречисления].Имя;
+	ФорматИнтеграцииСтрокой = Метаданные.Перечисления.пбп_ФорматыИнтеграций
+		.ЗначенияПеречисления[ИндексЗначенияПеречисления].Имя;
 
 	Возврат ФорматИнтеграцииСтрокой;
 
@@ -466,16 +476,16 @@
 
 	ПутьКФайлу = Результат[0];
 
-	ДвоичныеДанныеФайла = ОбработчикВыбораКаталогаСохранениеЗавершениеПослеВыбораВДиалогенаСервере();
+	ДвоичныеДанныеФайла = ОбработчикВыбораКаталогаСохранениеЗавершениеПослеВыбораВДиалогаНаСервере();
 	ДвоичныеДанныеФайла.Записать(ПутьКФайлу);
 
 КонецПроцедуры
 
 &НаСервере
-Функция ОбработчикВыбораКаталогаСохранениеЗавершениеПослеВыбораВДиалогенаСервере()
+Функция ОбработчикВыбораКаталогаСохранениеЗавершениеПослеВыбораВДиалогаНаСервере()
 
-	РеквОбъект = РеквизитФормыВЗначение("Объект");
-	Возврат РеквОбъект.ПолучитьДанныеФайлаСообщения();
+	РеквизитОбъект = РеквизитФормыВЗначение("Объект");
+	Возврат РеквизитОбъект.ПолучитьДанныеФайлаСообщения();
 
 КонецФункции