[danie]

Точу под себя обработку импорта в справочники из екселя.

Процедура ЗагрузкаВСправочник()

	//Выбор: Новый элемент "Главного справочника"(например справочника "Модели", элементу которого 
	//подчинен справочник "СерийныеНомера") или пишем в тот, который уже есть
			
	//Пишем в подчиненный справочник
	МассивКолонкаТЗ=тзДанные.ВыгрузитьКолонку(ЭлементыФормы.ВыборКолонкиТЗДляЗагрузк
и.Значение);	
	Для Каждого н Из МассивКолонкаТЗ Цикл
		НовыйЭлементСправоч=Справочники[ЭлементыФормы.ВыборСправочника.Значение].Создать
Элемент();
		
		Если ЭлементыФормы.ВыборРеквизитКодНаименование.Значение="Код" Тогда 
			НовыйЭлементСправоч.Код=н;
		ИначеЕсли ЭлементыФормы.ВыборРеквизитКодНаименование.Значение="Наименование" Тогда
			НовыйЭлементСправоч.Наименование=н;
			Иначе
		НовыйЭлементСправоч[ЭлементыФормы.ВыборРеквизитКодНаименование.Значение]=н; 
		КонецЕсли;
	    Если ФлажокПодчиненныйСправочник=Истина Тогда
		НовыйЭлементСправоч.Владелец=ИмяЭлементаГлавногоСправочника.Ссылка;
		КонецЕсли;
	    Если ФлажокИерархическийСправочник=Истина Тогда
		НовыйЭлементСправоч.Родитель=Справочники[ЭлементыФормы.ВыборСправочника.Значение
].
		НайтиПоНаименованию(ЭлементыФормы.ВыборРодителяДляЭлементов.Значение);
		КонецЕсли;
	
		НовыйЭлементСправоч.Записать();
	КонецЦикла;
	КонецПроцедуры

Кидаю товар в номенклатуру - ругается на незаполненную "базовую единицу" измерения (обязательный реквизит для номенклатуры). Как ее вбить в код обработки по умолчанию?

[danie]

закрыто

[Vofka]