Загрузка данных из табличного документа в справочники, документы, планы видов характеристик, планы видов расчетов, планы счетов, бизнес-процессы, задачи, в движения документов, поточная загрузка документов (EXCEL, управляемые формы, универсальная)

Процедура ПолучитьТаблицуДанныхНаСервере()
	
	СформироватьСтруктуруКолонок();
	СформироватьКолонкиТаблицыПодготовленныхДанных();
	
	ТаблицаПодготовленныхДанных.Очистить();
	
	Если ПерваяСтрокаДанныхТабличногоДокумента > ТабличныйДокумент.ВысотаТаблицы Тогда Возврат КонецЕсли;
	
	Для н = 1 По ТабличныйДокумент.ВысотаТаблицы - ПерваяСтрокаДанныхТабличногоДокумента + 1 Цикл ТаблицаПодготовленныхДанных.Добавить() КонецЦикла;
	
	Таблица = РеквизитФормыВЗначение("ТаблицаПодготовленныхДанных");
	
	ОбластьДанных = ТабличныйДокумент.ПолучитьОбласть("R" + Формат((ПерваяСтрокаДанныхТабличногоДокумента), "ЧГ=0") + "C1:R" + Формат(ТабличныйДокумент.ВысотаТаблицы, "ЧГ=0") + "C" + Формат(ТабличныйДокумент.ШиринаСтраницы, "ЧГ=0"));
		
	ТабДокумент = Новый ТабличныйДокумент;
	Для К = 1 По ТабличныйДокумент.ШиринаТаблицы Цикл ТабДокумент.Область("R1C" + Формат(К, "ЧГ=0")).Текст = "Колонка" + К КонецЦикла;
	Для Каждого Колонка Из ДополнительныеСвойства.Колонки Цикл Если Колонка.Значение.НомерКолонки <> 0 Тогда ТабДокумент.Область("R1C" + Формат(Колонка.Значение.НомерКолонки, "ЧГ=0")).Текст = Колонка.Ключ КонецЕсли КонецЦикла;
	
	ТабДокумент.Вывести(ОбластьДанных);	
		
	Построитель = Новый ПостроительЗапроса;
	Построитель.ИсточникДанных = Новый ОписаниеИсточникаДанных(ТабДокумент.Область("R1C1:R" + Формат(ТабДокумент.ВысотаТаблицы, "ЧГ=0") + "C" + Формат(ТабДокумент.ШиринаСтраницы, "ЧГ=0")));
	ТаблицаПостроитель = Построитель.Результат.Выгрузить();
	ТаблицаПостроитель.Колонки.Вставить(0);
	
	ПоискЗагружемыхОбъектПроизведен = Ложь;
	Для Каждого Колонка Из ДополнительныеСвойства.Колонки Цикл Если НЕ Колонка.Значение.КолонкаОбработана Тогда ПолучитьКолонкуТаблицыДанных(ДополнительныеСвойства.Колонки, Колонка, Таблица, ТаблицаПостроитель, ПоискЗагружемыхОбъектПроизведен) КонецЕсли КонецЦикла;	

	Если РежимЗагрузки = 0 Тогда
		Для каждого СтрокаНастрок Из ТаблицыНастроек Цикл
			Префикс = ?(СтрокаНастрок.Значение = "ТаблицаЗагружаемыхРеквизитов", "", СтрокаНастрок.Значение);
			Колонка = ДополнительныеСвойства.Колонки[Префикс + "ОбъектЗагрузки"];		
			ПолучитьСсылкиОбъектовЗагрузкиТипаСправочник(Таблица, СтрокаНастрок.Значение, СтрокаНастрок.Справочник, Префикс);
		КонецЦикла;
	КонецЕсли;
	
	ЗначениеВРеквизитФормы(Таблица, "ТаблицаПодготовленныхДанных");
	
	Если СписокОшибок.Количество() > 0 Тогда
		Сообщить("Выявлено ячеек, содержащих ошибки/неоднозначное представление: " + СписокОшибок.Количество())
	КонецЕсли
	
КонецПроцедуры

ТекСтрока[НомерКолонки-1]

ПоказатьПредупреждение(, "Не выбран табличный документ для загрузки!");

ТекстПредупреждения = "Не выбран табличный документ для загрузки!";
		Если ВерсияПлатформы83 Тогда
			Выполнить("
			|	ПоказатьПредупреждение(, ТекстПредупреждения);
		    |");
		Иначе
				Предупреждение(ТекстПредупреждения);
		КонецЕсли;