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