Добавил работу с общими формами отчетов #682 #683

+ теперь показывается правильное имя формы
+ общая форма отчета вызывается без ошибок и для нужного отчета

Author: artbear

Tests/Smoke/тесты_ОткрытиеФормКонфигурации.epf

@@ -70,7 +70,7 @@
 {0}
 },
 {0}
-},266,134,1,0,1,4,4,52,266,134,96},
+},266,134,1,0,1,4,4,53,266,134,96},
 {
 {-1},1,
 {0},

src/Tests/Smoke/тесты_ОткрытиеФормКонфигурации/Form/ПолучениеФорм/form

@@ -361,9 +361,17 @@
 		МетаФормы = ОсновнойОбъект.ПолучитьМетаФормыОбъектаДляПроверки(МетаОбъект, ИменаОсновныхФорм);
 
 		Для каждого МетаФорма Из МетаФормы Цикл
+
 			МетаФорма_ПолноеИмя = МетаФорма.ПолноеИмя();
-			//Сообщить("МетаФорма_ПолноеИмя <"+МетаФорма_ПолноеИмя+"> ");
+			Если Метаданные.ОсновнаяФормаОтчета = МетаФорма Тогда
+				МетаФорма_ПолноеИмя = МетаОбъект.ПолноеИмя() + ".Форма";
+			ИначеЕсли Метаданные.ОсновнаяФормаНастроекОтчета = МетаФорма Тогда
+				МетаФорма_ПолноеИмя = МетаОбъект.ПолноеИмя() + ".ФормаНастроек";
+			КонецЕсли;
 
+			//МетаОбъект.Имя <Отчет1>, МетаФорма_ПолноеИмя <Отчет.Отчет1.Форма.УправляемаяФормаОтчета> 
+			//МетаОбъект.Имя <Отчет2>, МетаФорма_ПолноеИмя <ОбщаяФорма.ФормаОтчета> // в ОФ Отчет.Отчет2.Форма
+
 			Если ТолькоУправляемыеФормы Тогда
 				//Сообщить("МетаФорма.ТипФормы <"+МетаФорма.ТипФормы+"> ");
 				Если Не ЭтоУправляемаяФорма(МетаФорма) Тогда

src/Tests/Smoke/тесты_ОткрытиеФормКонфигурации/Form/УправляемаяФорма/Форма.bsl

@@ -289,10 +289,20 @@
 	Возврат Ложь;
 КонецФункции
 
+// Функция - Получить мета формы объекта для проверки
+//
+// Параметры:
+//  МетаОбъект			 - 	 - 
+//  ИменаОсновныхФорм	 - 	 - 
+// 
+// Возвращаемое значение:
+//  Массив структур - с полями "Имя,МетаФорма", где "Имя" - это ИмяОсновнойФормы, "МетаФорма" - сама мета-форма
+//
 Функция ПолучитьМетаФормыОбъектаДляПроверки(МетаОбъект, ИменаОсновныхФорм) Экспорт
 
 	ИспользоватьУФ = Метаданные.ИспользоватьУправляемыеФормыВОбычномПриложении ИЛИ (ТекущийРежимЗапуска() <> РежимЗапускаКлиентскогоПриложения.ОбычноеПриложение);
 	МетаФормы = Новый Массив();
+	
 	Для Каждого ИмяОсновнойФормы Из ИменаОсновныхФорм Цикл
 		Попытка
 			МетаФорма = МетаОбъект[ИмяОсновнойФормы];
@@ -310,6 +320,7 @@
 		КонецЕсли;
 		МетаФормы.Добавить(МетаФорма);
 	КонецЦикла;
+	
 	Возврат МетаФормы;
 
 КонецФункции
@@ -386,11 +397,16 @@
 		МетаФормы = ПолучитьМетаФормыОбъектаДляПроверки(МетаОбъект, ИменаОсновныхФорм);
 
 		Для каждого МетаФорма Из МетаФормы Цикл
+
 			МетаФорма_ПолноеИмя = МетаФорма.ПолноеИмя();
 
 			Если Метаданные.ОсновнаяФормаОтчета = МетаФорма Тогда
 				МетаФорма_ПолноеИмя = МетаОбъект.ПолноеИмя() + ".Форма";
+			ИначеЕсли Метаданные.ОсновнаяФормаНастроекОтчета = МетаФорма Тогда
+				МетаФорма_ПолноеИмя = МетаОбъект.ПолноеИмя() + ".ФормаНастроек";
 			КонецЕсли;
+			//МетаОбъект.Имя <Отчет1>, МетаФорма_ПолноеИмя <Отчет.Отчет1.Форма.ФормаОтчета> 
+			//МетаОбъект.Имя <Отчет2>, МетаФорма_ПолноеИмя <Отчет.Отчет2.Форма> // в УФ ОбщаяФорма.ФормаОтчета
 
 			ПредставлениеТеста = МетаФорма_ПолноеИмя;
 			ЕстьТранзакция = Истина;
@@ -434,6 +450,7 @@
 		//Тогда
 			МетаФормы = ПолучитьМетаФормыОбъектаДляПроверки(МетаОбъект, ИменаОсновныхФорм);
 			Для каждого МетаФорма Из МетаФормы Цикл
+				
 				МетаФорма_ПолноеИмя = МетаФорма.ПолноеИмя();
 				ПредставлениеТеста = ПрефиксПредставленияТеста + " : " + МетаФорма_ПолноеИмя;
 				ЕстьТранзакция = Истина;

src/Tests/Smoke/тесты_ОткрытиеФормКонфигурации/ObjectModule.bsl

@@ -1,2 +1,2 @@
-Form\УправляемаяФорма\Форма.bsl-->45cb56ba-09f2-4931-88c4-1e63a1a8f37c.0 (50, 509)
+Form\УправляемаяФорма\Форма.bsl-->45cb56ba-09f2-4931-88c4-1e63a1a8f37c.0 (50, 517)
 Макеты\СозданиеОдногоПользователяИБ.mxl-->724d5548-5d6b-4e19-98cf-0ea3ae12c0a7.0

src/Tests/Smoke/тесты_ОткрытиеФормКонфигурации/maps.txt

@@ -410,9 +410,17 @@
 		МетаФормы = ОсновнойОбъект.ПолучитьМетаФормыОбъектаДляПроверки(МетаОбъект, ИменаОсновныхФорм);
 
 		Для каждого МетаФорма Из МетаФормы Цикл
+
 			МетаФорма_ПолноеИмя = МетаФорма.ПолноеИмя();
-			//Сообщить(""МетаФорма_ПолноеИмя <""+МетаФорма_ПолноеИмя+""> "");
+			Если Метаданные.ОсновнаяФормаОтчета = МетаФорма Тогда
+				МетаФорма_ПолноеИмя = МетаОбъект.ПолноеИмя() + "".Форма"";
+			ИначеЕсли Метаданные.ОсновнаяФормаНастроекОтчета = МетаФорма Тогда
+				МетаФорма_ПолноеИмя = МетаОбъект.ПолноеИмя() + "".ФормаНастроек"";
+			КонецЕсли;
 
+			//МетаОбъект.Имя <Отчет1>, МетаФорма_ПолноеИмя <Отчет.Отчет1.Форма.УправляемаяФормаОтчета> 
+			//МетаОбъект.Имя <Отчет2>, МетаФорма_ПолноеИмя <ОбщаяФорма.ФормаОтчета> // в ОФ Отчет.Отчет2.Форма
+
 			Если ТолькоУправляемыеФормы Тогда
 				//Сообщить(""МетаФорма.ТипФормы <""+МетаФорма.ТипФормы+""> "");
 				Если Не ЭтоУправляемаяФорма(МетаФорма) Тогда

src/Tests/Smoke/тесты_ОткрытиеФормКонфигурации/und/45cb56ba-09f2-4931-88c4-1e63a1a8f37c.0

@@ -1 +1 @@
-{1,15,"",7130acd1-ce31-4a8a-8519-975f74935f0c,"45cb56ba-09f2-4931-88c4-1e63a1a8f37c",37478a77-4718-4464-add6-8f797ef30315,"45cb56ba-09f2-4931-88c4-1e63a1a8f37c.0",ef220e48-67b8-4b85-a4de-83e4f4f4d3b0,"724d5548-5d6b-4e19-98cf-0ea3ae12c0a7",54f93ab3-070b-4d92-bada-e69436ac6113,"724d5548-5d6b-4e19-98cf-0ea3ae12c0a7.0",d6619661-2946-4259-a7cd-503e115e059f,"be1492ab-bedd-4e13-8827-ed025cda688a",7be6a300-4541-4de6-9f40-26d1c77bcad7,"be1492ab-bedd-4e13-8827-ed025cda688a.0",ca8e2a3b-859a-4ee9-bd44-4a2bea924114,"be1492ab-bedd-4e13-8827-ed025cda688a.1",0e88792e-dd94-4a89-986a-1d559f2cafdc,"copyinfo",99705e81-38ac-4f41-9b32-6fa1a823279e,"df099fc3-03ed-44c9-a8dd-e95a1e8978ff",950cbccd-96c4-452a-960d-5052c58af474,"df099fc3-03ed-44c9-a8dd-e95a1e8978ff.0",46918311-0f74-4299-9aca-c9cd66665b27,"eb6420d9-ff9e-4c68-b025-2c1608cec69f",6bca12c2-8409-4da9-adb9-16cbb003d0b9,"root",7fad9b20-be88-45a8-aea2-44c89d6ac77c,"version",f14d226c-9100-424c-9016-64b84889f09b,"versions",2fed6f0a-a58d-431d-98a5-e9f0d67a0231}
+{1,15,"",ffb0ce8e-a105-4ec1-bb72-15f684b0962f,"45cb56ba-09f2-4931-88c4-1e63a1a8f37c",53fe7493-142d-4169-a318-eaefcdcd7957,"45cb56ba-09f2-4931-88c4-1e63a1a8f37c.0",544f8cdb-1672-47ea-be52-f8a45ddc6246,"724d5548-5d6b-4e19-98cf-0ea3ae12c0a7",594ff2f7-0e29-45ac-b187-4f084af5bbdd,"724d5548-5d6b-4e19-98cf-0ea3ae12c0a7.0",10a2b675-6038-4adf-9f5b-60844b05f40e,"be1492ab-bedd-4e13-8827-ed025cda688a",accc16b8-094f-4fdd-a6a8-48501707056e,"be1492ab-bedd-4e13-8827-ed025cda688a.0",67411057-2609-4caa-a39a-9595884b4472,"be1492ab-bedd-4e13-8827-ed025cda688a.1",0e88792e-dd94-4a89-986a-1d559f2cafdc,"copyinfo",b9ab9844-9dd4-4575-bee7-aefa0555a818,"df099fc3-03ed-44c9-a8dd-e95a1e8978ff",950cbccd-96c4-452a-960d-5052c58af474,"df099fc3-03ed-44c9-a8dd-e95a1e8978ff.0",f7fa09dd-7c4d-4c8f-990f-a3970da3ca06,"eb6420d9-ff9e-4c68-b025-2c1608cec69f",e4cc64b9-bbf1-4deb-b66a-56467bac4507,"root",219818d6-467f-4c42-b6d5-bd3a4e507d51,"version",2b3d70f2-7465-40f7-a752-d20214b4978c,"versions",4a1db144-4b0f-45b0-9074-219091457581}