КодГруппы = "330100"; 
ПоискПоПолномуКоду = Ложь; // значение по умолчанию 
Группа = Справочники.Номенклатура.НайтиПоКоду(КодГруппы, ПоискПоПолномуКоду); 
Если Группа.Пустая() Тогда 
	Группа = Справочники.Номенклатура.СоздатьГруппу(); 
	Группа.Код = КодГруппы; 
	Группа.Наименование = "Загруженные"; 
	Группа.Записать(); 
ИначеЕсли Не Группа.ЭтоГруппа Тогда 
	Сообщить("Найден элемент справочника с указанным кодом!"); 
	// Предусмотреть прерывание алгоритма.
КонецЕсли; 
Спр = Справочники.Номенклатура.СоздатьЭлемент(); 
Спр.Наименование = "Программно созданный"; 
// Реквизиты заполняются в соответствии с задачей.  
Спр.Родитель = Группа.Ссылка; 
Спр.Записать(); 
Группа = Справочники.Номенклатура.Загруженные; 
КодЭлемента = "330100"; 
ПоискПоПолномуКоду = Ложь; //Значение по умолчанию 
Родитель = Справочники.Номенклатура.НайтиПоКоду(КодЭлемента, ПоискПоПолномуКоду); 
Если Родитель.Пустая() Тогда 
	Родитель = Справочники.Номенклатура.СоздатьЭлемент(); 
	Родитель.Код = КодЭлемента; 
	Родитель.Наименование = "Загруженные"; 
	Родитель.Записать(); 
КонецЕсли; 
Спр = Справочники.Номенклатура.СоздатьЭлемент(); 
Спр.Наименование = "Программно созданный"; 
// Реквизиты заполняются в соотвествии с задачей. 
Спр.Родитель = Родитель.Ссылка; 
Спр.Записать();