Merge pull request #2085 from ElliHas22/develop

#2084 Доработана процедура загрузки данных в ПВХ
Pr-Mex · Jan 23, 2024 · c9c9cf7 · c9c9cf7
2 parents 8693541 + 5a477fa
commit c9c9cf7
Show file tree

Hide file tree

Showing 4 changed files with 31 additions and 7 deletions.
diff --git a/VanessaAutomation/Forms/ПодготовкаИЗагрузкаДанных/Ext/Form/Module.bsl b/VanessaAutomation/Forms/ПодготовкаИЗагрузкаДанных/Ext/Form/Module.bsl
@@ -592,8 +592,21 @@ Procedure ICheckOrCreateChartOfCharacteristicTypesObjectsAtServer(ObjectName, Va
 	For Each ColumnName In ColumnsNames Do
 		ObjectAttributes.Columns.Delete(ColumnName);
 	EndDo;
+
+	IsFolder = False;
+	FoundColumn = ObjectAttributes.Columns.Find("IsFolder");
+	If FoundColumn = Undefined Then
+		FoundColumn = ObjectAttributes.Columns.Find("ЭтоГруппа");	
+	EndIf;
+
 	RefColumnName = ?(ObjectAttributes.Columns.Find("Ref") <> Undefined, "Ref", "Ссылка");
 	For Each Row In ObjectValues Do
+		If FoundColumn <> Undefined
+			And Row[FoundColumn.Name] = "True" Then
+			IsFolder = True;
+		Else
+			IsFolder = False;
+		EndIf;
 		Ref = GetObjectLinkFromObjectURL(Row[RefColumnName]);
 		If ValueIsFilled(Ref.DataVersion) Then
 			Obj = Ref.GetObject();
@@ -602,7 +615,11 @@ Procedure ICheckOrCreateChartOfCharacteristicTypesObjectsAtServer(ObjectName, Va
 			If Predefined Then
 				Continue;
 			EndIf;
-			Obj = ChartsOfCharacteristicTypes[ObjectName].CreateItem();
+			If IsFolder Then
+				Obj = ChartsOfCharacteristicTypes[ObjectName].CreateFolder();
+			Else
+				Obj = ChartsOfCharacteristicTypes[ObjectName].CreateItem();
+			EndIf;
 			Obj.SetNewObjectRef(Ref);
 		EndIf;		
 
@@ -612,13 +629,17 @@ Procedure ICheckOrCreateChartOfCharacteristicTypesObjectsAtServer(ObjectName, Va
 			EndIf;
 			If Column.Name = RefColumnName Then
 				Continue;
+			EndIf; 
+			If Column.Name = "IsFolder" Or Column.Name = "ЭтоГруппа" Then
+				Continue;
 			EndIf;
 			If (Column.Name = "DeletionMark" Or Column.Name = "ПометкаУдаления")
 				And Row[Column.Name] = "True" Then
 				Obj.DeletionMark = True;
 				Continue;
 			EndIf;
-			If Column.Name = "ValueType" Or Column.Name = "ТипЗначения" Then  
+			If (Column.Name = "ValueType" Or Column.Name = "ТипЗначения") 
+				And Not IsFolder Then  
 				StartTmpl = "<TypeDescription xmlns=""http://v8.1c.ru/8.1/data/core"" xmlns:xs=""http://www.w3.org/2001/XMLSchema"" xmlns:xsi=""http://www.w3.org/2001/XMLSchema-instance"">";
                 EndTmpl = "</TypeDescription>";
 

diff --git a/docs/JsonParams/JsonParamsRU.md b/docs/JsonParams/JsonParamsRU.md
@@ -86,16 +86,19 @@
          Каталог, в который будут записаны итоговые feature-файлы.
 
       * **ДымовыеТестыКаталогФайловИсключений {SmokeTestsDirectoryFileExceptions}**:
-         Каталог, в котором хранятся текстовые файлы с объектами-исключениям. Для каждого вида объектов метаданных или события должен быть отдельный файл ("Справочники", "Документы" и т. д.).
+         Каталог, в котором хранятся текстовые файлы с объектами-исключениями. Для каждого вида объектов метаданных или события должен быть отдельный файл ("Справочники", "Документы" и т. д.).
 
       * **ДымовыеТестыПутьКФайлуНастроекСценариев {SmokeTestsPathToFileSettingsScripts}**:
          Путь к файлу настройки сценариев (файл настройки можно сформировать на закладке "Настройка сценариев" в окне "Генератор дымовых тестов").
 
+      * **ДымовыеТестыОчищатьКаталогВыходныхФайлов {SmokeTestsCleanDirectoryOutputFiles}**:
+         Если установлен, то feature-файлы в каталоге выходных файлов будут удалены перед началом формирования тестов.
+
       * **ДымовыеТестыТолькоВведенныеОбъекты {SmokeTestsOnlyEnteredObjects}**:
          При включении данного флага в формировании feature-файлов расширенных действий будут участвовать только объекты, для которых в текущей информационной базе существует хотя бы один не помеченный на удаление элемент.
 
       * **ДымовыеТестыТолькоИзмененныеОтностительноКонфигурацииПоставщика {SmokeTestsOnlyChangedRelativeToVendorConfiguration}**:
-         При включении данного флага в формировании feature-файлов будут участвовать только объекты измененные относительно конфигурации поставщика. Для построения отчета о сравнении конфигураций будет запущен конфигуратор текущей информационной базы.
+         При включении данного флага в формировании feature-файлов будут участвовать только объекты измененные относительно конфигурации поставщика. Для построения отчета о сравнении конфигураций будет запущен конфигуратор текущей информационной базы с текущим пользователем и пустым паролем. 
 
       * **ДымовыеТестыИмяКонфигурацииПоставщика {SmokeTestsVendorConfigurationName}**:
          Имя конфигурации поставщика для сравнения конфигураций.

diff --git a/tools/MiddleCheck_8323_UF.cmd b/tools/MiddleCheck_8323_UF.cmd
@@ -1,4 +1,4 @@
 cd ..
 call compile.bat
 cd .\tools
-oscript .\onescript\run-behavior-check-session.os .\JSON\MiddleCheck_8323.json
+oscript .\onescript\run-behavior-check-session.os .\JSON\MiddleCheck_8323.json
diff --git a/tools/onescript/build-service-conf.os b/tools/onescript/build-service-conf.os
@@ -132,7 +132,7 @@
 
 массивСервисныхБаз.Добавить(Новый Структура("ПутьКИсходникам,СоздаваемаяБаза, Версия",
 	".\lib\CF\83\",".\tools\ServiceBases\v83ServiceBase8320", "8.3.20"));
-
+	
 массивСервисныхБаз.Добавить(Новый Структура("ПутьКИсходникам,СоздаваемаяБаза, Версия",
 	".\lib\CF\83\",".\tools\ServiceBases\v83ServiceBase8321", "8.3.21"));
 
@@ -144,7 +144,7 @@
 
 массивСервисныхБаз.Добавить(Новый Структура("ПутьКИсходникам,СоздаваемаяБаза, Версия",
 	".\lib\CF\83NoSync\",".\tools\ServiceBases\v83NoSyncServiceBase", "8.3.21"));
-	
+
 
 УправлениеКонфигуратором = Новый УправлениеКонфигуратором();
 УправлениеКонфигуратором.КаталогСборки(".\tools\ServiceBases\");