Актуализация подсистемы загрузки таб дока

#145
firstBitSportivnaya · Nov 12, 2024 · b41e123 · b41e123
1 parent 9b2965a
commit b41e123
Show file tree

Hide file tree

Showing 6 changed files with 312 additions and 77 deletions.
diff --git a/src/cf/CommonModules/пбп_ЗагрузкаФайлаЧерезТабличныйДокументВызовСервера/Ext/Module.bsl b/src/cf/CommonModules/пбп_ЗагрузкаФайлаЧерезТабличныйДокументВызовСервера/Ext/Module.bsl
@@ -38,6 +38,8 @@
 	ПараметрыЧтения.НазваниеЛиста = Параметры.НазваниеЛиста;
 	ПараметрыЧтения.НомерСтроки = Параметры.НомерПервойСтроки;
 	ПараметрыЧтения.СопоставлениеПоНаименованию = Параметры.ПоНаименованию;
+	ПараметрыЧтения.ВыдаватьОшибкуПриОтсутствииЛиста = Параметры.ВыдаватьОшибку;
+	ПараметрыЧтения.ЗначениеИстина = Параметры.БулевоЗначениеИстина;
 
 	ТаблицаДанных = пбп_ЗагрузкаФайлаЧерезТабличныйДокументСервер
 		.КонвертироватьДанныеТабличногоДокументаВТаблицуЗначений(
@@ -78,19 +80,7 @@
 //
 Функция ИнициализироватьТаблицуСоСвойствамиКолонок() Экспорт
 
-	СвойстваКолонок = Новый ТаблицаЗначений;
-	ДлинаСтроки = 150;
-	СвойстваКолонок.Колонки.Добавить("ИмяКолонки"		, пбп_ОбщегоНазначенияСервер.ОписаниеТипаСтрока(ДлинаСтроки));
-	СвойстваКолонок.Колонки.Добавить("ИмяВТабДоке"		, пбп_ОбщегоНазначенияСервер.ОписаниеТипаСтрока(ДлинаСтроки));
-	СвойстваКолонок.Колонки.Добавить("ТипЗначения"		, пбп_ОбщегоНазначенияСервер.ОписаниеТипаСтрока(ДлинаСтроки));
-	СвойстваКолонок.Колонки.Добавить("ПолеПоиска1"		, пбп_ОбщегоНазначенияСервер.ОписаниеТипаСтрока(ДлинаСтроки));
-	СвойстваКолонок.Колонки.Добавить("ПолеПоиска2"		, пбп_ОбщегоНазначенияСервер.ОписаниеТипаСтрока(ДлинаСтроки));
-	СвойстваКолонок.Колонки.Добавить("ПолеПоиска3"		, пбп_ОбщегоНазначенияСервер.ОписаниеТипаСтрока(ДлинаСтроки));
-	// BSLLS:MagicNumber-off
-	СвойстваКолонок.Колонки.Добавить("ОператорСравнения"	, пбп_ОбщегоНазначенияСервер.ОписаниеТипаСтрока(3));
-	// BSLLS:MagicNumber-on
-
-	Возврат СвойстваКолонок;
+	Возврат пбп_ЗагрузкаФайлаЧерезТабличныйДокументСервер.ИнициализироватьТаблицуСоСвойствамиКолонок();
 
 КонецФункции
 

diff --git a/src/cf/CommonModules/пбп_ЗагрузкаФайлаЧерезТабличныйДокументКлиент/Ext/Module.bsl b/src/cf/CommonModules/пбп_ЗагрузкаФайлаЧерезТабличныйДокументКлиент/Ext/Module.bsl
@@ -31,22 +31,28 @@
 //  НазваниеЛиста			 - Строка - Имя загружаемого листа (по-умолчанию не заполнено)
 //  НомерПервойСтроки		 - Число - Номер строки с которой начинается загрузка данных (по-умолчанию 1)
 //  СопоставлениеПоНаименованию - Булево - если Истина, то колонки макета сопоставляются с табличным документом по
-//  наименованию; если Ложь, то сопоставляются в последовательности колонок макета, а наименования игнорируются.
+//  наименованию; если Ложь, то сопоставляются в последовательности колонок макета, а наименования игнорируются
+//  ВыдаватьОшибку			 - Булево - при отсутствии искомого листа вернет ошибку, без продолжения парсинга
+//  БулевоЗначениеИстина	 - Строка - строковое значение, при котором значение булево будет Истина
 // 
 // Возвращаемое значение:
 //  Строка - Адрес файла во временном хранилище
 //
-Асинх Функция ЗагрузитьИзXLS(АдресСоответствияКолонок,НазваниеЛиста = "",
-	НомерПервойСтроки = 1, СопоставлениеПоНаименованию = Ложь) Экспорт
+Асинх Функция ЗагрузитьИзXLS(
+	АдресСоответствияКолонок, НазваниеЛиста = "",
+	НомерПервойСтроки = 1, СопоставлениеПоНаименованию = Ложь,
+	ВыдаватьОшибку = Ложь, БулевоЗначениеИстина = "") Экспорт
 
 	АдресПомещения = пбп_ЗагрузкаФайлаЧерезТабличныйДокументВызовСервера.ПоместитьЗаглушку(АдресСоответствияКолонок);
 
 	Параметры = ИнициализироватьСтруктуруПередачиПараметровНаСервер();
-	Параметры.АдресМакета		= АдресСоответствияКолонок;
-	Параметры.АдресПомещения	= АдресПомещения;
-	Параметры.НазваниеЛиста		= НазваниеЛиста;
-	Параметры.НомерПервойСтроки	= НомерПервойСтроки;
-	Параметры.ПоНаименованию	= СопоставлениеПоНаименованию;
+	Параметры.АдресМакета			= АдресСоответствияКолонок;
+	Параметры.АдресПомещения		= АдресПомещения;
+	Параметры.НазваниеЛиста			= НазваниеЛиста;
+	Параметры.НомерПервойСтроки		= НомерПервойСтроки;
+	Параметры.ПоНаименованию		= СопоставлениеПоНаименованию;
+	Параметры.ВыдаватьОшибку		= ВыдаватьОшибку;
+	Параметры.БулевоЗначениеИстина	= БулевоЗначениеИстина;
 
 	ПараметрыДиалога = Новый ПараметрыДиалогаПомещенияФайлов;
 	ПараметрыДиалога.Фильтр = "Документ Excel (*.xls, *.xlsx)|*.xls;*.xlsx|";
@@ -75,7 +81,8 @@
 Функция ИнициализироватьСтруктуруПередачиПараметровНаСервер()
 
 	СтруктураПараметров = Новый Структура(
-		"АдресМакета, АдресПомещения, НазваниеЛиста, НомерПервойСтроки, ПоНаименованию");
+		"АдресМакета, АдресПомещения, НазваниеЛиста, НомерПервойСтроки,"
+		+ " ПоНаименованию, ВыдаватьОшибку, БулевоЗначениеИстина");
 
 	Возврат СтруктураПараметров;