Сколько должна "весить" база с 20000 позиций номенклатуры

&НаСервереБезКонтекста
Процедура ВыбериФайлНачалоВыбораНаСервере(Наименование, Штрихкод)
	
	   	
	
	Запрос = Новый Запрос;
	Запрос.Текст = 
		"ВЫБРАТЬ
		|	Штрихкоды.Владелец,
		|	Штрихкоды.Штрихкод
		|ИЗ
		|	РегистрСведений.Штрихкоды КАК Штрихкоды
		|ГДЕ
		|	Штрихкоды.Штрихкод = &Штрихкод";
	
	Запрос.УстановитьПараметр("Штрихкод", Штрихкод);
	
	РезультатЗапроса = Запрос.Выполнить();
	
	Если РезультатЗапроса.Пустой() Тогда
		НоваяНоменклатура = Справочники.Номенклатура.СоздатьЭлемент();
		НоваяНоменклатура.Наименование = Наименование;
		НоваяНоменклатура.НаименованиеПолное = Наименование;
		НоваяНоменклатура.ВидНоменклатуры = Справочники.ВидыНоменклатуры.НайтиПоНаименованию("Товар");
		НоваяНоменклатура.СтавкаНДС = Справочники.СтавкиНДС.НайтиПоНаименованию("БезНДС");
		НоваяНоменклатура.Записать();
		
		Набор = РегистрыСведений.Штрихкоды.СоздатьНаборЗаписей();
		
		Набор.Прочитать();
		НовыйШтрихКод = Набор.Добавить();
		
		НовыйШтрихКод.Владелец = НоваяНоменклатура.Ссылка;
		НовыйШтрихКод.Штрихкод = Штрихкод;
		НовыйШтрихКод.ТипШтрихкода = ПланыВидовХарактеристик.ТипыШтрихкодов.EAN13;
		Набор.Записать();
	КонецЕсли;
	
	
	

	
	
	
КонецПроцедуры

&НаКлиенте
Процедура ВыбериФайлНачалоВыбора(Элемент, ДанныеВыбора, СтандартнаяОбработка)
	СтандартнаяОбработка = Ложь;
	
	Режим = РежимДиалогаВыбораФайла.Открытие;
	
	ДиалогОткрытия = Новый ДиалогВыбораФайла(Режим);
	Фильтр = "Таблица, *.xlsx|*.xlsx";
	ДиалогОткрытия.Фильтр = Фильтр;
	ДиалогОткрытия.МножественныйВыбор = ЛОЖЬ;
	ДиалогОткрытия.Заголовок = "выбери файл";
	
	Если ДиалогОткрытия.Выбрать() Тогда
		ИмяФайла = ДиалогОткрытия.ПолноеИмяФайла;
	КонецЕсли;
	
	
	
	Попытка
		Excel = Новый COMОбъект("Excel.Application");
		Excel.WorkBooks.Open(ИмяФайла);
		Состояние("Обработка файла Microsoft Excel...");
		Исключение
		Сообщить("Ошибка при открытии файла с помощью Excel! Загрузка не будет произведена!");
		Сообщить(ОписаниеОшибки());
		Возврат;
	КонецПопытки;

	Попытка
		//Открываем необходимый лист
		Excel.Sheets(1).Select(); // лист 1, по умолчанию
		Исключение
		//Закрываем Excel
		Excel.ActiveWorkbook.Close();
		Excel = 0;
		Сообщить("Файл "+Строка(ИмяФайла)+" не соответствует необходимому формату! Первый лист не найден!");
		//ОтменитьТранзакцию();
		Возврат;
	КонецПопытки;

	//Получим количество строк и колонок.
	//В разных версиях Excel получаются по-разному, поэтому сначала определим версию Excel
	Версия = Лев(Excel.Version,Найти(Excel.Version,".")-1);
	Если Версия = "8" тогда
		ФайлСтрок = Excel.Cells.CurrentRegion.Rows.Count;
		ФайлКолонок = Макс(Excel.Cells.CurrentRegion.Columns.Count, 13);
		Иначе
		ФайлСтрок = Excel.Cells(1,1).SpecialCells(11).Row;
		ФайлКолонок = Excel.Cells(1,1).SpecialCells(11).Column;
	Конецесли;
	
	
	
	Для НС = 2 по ФайлСтрок Цикл // НС указываем с какой строки начинать обработку

		Состояние("Файл "+Строка(ИмяФайла)+": Обрабатывается первый лист "+Строка(Формат(?(ФайлСтрок=0,0,((100*НС)/ФайлСтрок)),"ЧЦ=3; ЧДЦ=0"))+" %");

		ОбработкаПрерыванияПользователя(); //указав данный оператор, цикл можно прервать в любой момент нажатие ctrl+break

		ЭтоШтрихКод = Excel.Cells(НС, 4).Text;
		ЭтоНаименование = Excel.Cells(НС, 2).Text;
		ДлинаНаименования = СтрДлина(ЭтоНаименование);
		//Счетчик = ДлинаНаименования;
		НайтиРазделение = СтрНайти(ЭтоНаименование,"/", НаправлениеПоиска.СКонца);
		
		ПростоНаименование = Сред(ЭтоНаименование,НайтиРазделение+1, ДлинаНаименования - НайтиРазделение);
		
		ВыбериФайлНачалоВыбораНаСервере(ПростоНаименование, ЭтоШтрихКод);

	КонецЦикла;
	
	Excel.DisplayAlerts = 0; 
	Excel.Quit();
	Excel.DisplayAlerts = 1;
	
КонецПроцедуры