Доброго времени суток!

Хочется вытащить всю номенклатуру в текстовый файл в таком виде:
- Код
- Наименование
и для каждого товара все его цены:
- Категория цены
- Цена

Попробовал сделать вот такую обработку

Т = СоздатьОбъект("Текст");
Спр= СоздатьОбъект("Справочник.Номенклатура");
Спр2= СоздатьОбъект("Справочник.Цены");
Спр.ВыбратьЭлементы();
Пока Спр.ПолучитьЭлемент() = 1 Цикл
    Т.ДобавитьСтроку(Спр.Код);
    Т.ДобавитьСтроку(Спр.Наименование);
    Спр2.ВыбратьЭлементы();
    Пока Спр2.ПолучитьЭлемент() = 1 Цикл
    Т.ДобавитьСтроку(Спр2.КатегорияЦены);
    Т.ДобавитьСтроку(Спр2.Цена);
    КонецЦикла;
КонецЦикла;
Т.Записать("D:\1234");

Но вытаскивается в файл только Код и Наименование товара

Подскажите, плиз, где ошибка? Понимаю, что надо объявить подчиненность , но не знаю как (

Спр2.ИспользоватьВладельца(Спр.ТекущийЭлемент())

ну и открой для себя универсальную печать справочников - там может быть нужное безо всякого колинга.

цена точно не периодическая?

Спасибо, помогло.
Но к сожалению лишь наполовину

Вот такая процедура:
Т = СоздатьОбъект("Текст");
Спр= СоздатьОбъект("Справочник.Номенклатура");
Спр2= СоздатьОбъект("Справочник.Цены");
Спр.ВыбратьЭлементы();
Пока Спр.ПолучитьЭлемент() = 1 Цикл
    Т.ДобавитьСтроку(Спр.Код);
    Т.ДобавитьСтроку(Спр.Наименование);
    Спр2.ИспользоватьВладельца(Спр.ТекущийЭлемент());
    Спр2.ВыбратьЭлементы();
    Пока Спр2.ПолучитьЭлемент() = 1 Цикл
     Т.ДобавитьСтроку(Спр2.КатегорияЦены);
        Т.ДобавитьСтроку(Спр2.Цена);
    КонецЦикла;
КонецЦикла;
Т.Записать("D:\1234");

теперь еще вытаскивается код КатегорииЦены

Но не вытаскивается сама цена (

(2) не поможет нифига - проверил.

(0)прайс типовой посмотри

Т=СоздатьОбъект("Текст");
   Спр=СоздатьОбъект("Справочник.Номенклатура");
   Спр2=СоздатьОбъект("Справочник.Цены");
   Спр.ВыбратьЭлементы(0);
   Пока Спр.ПолучитьЭлемент()=1 Цикл
       Состояние(Спр.Наименование);
       Если Спр.ЭтоГруппа()=1 Тогда
           Продолжить;
       КонецЕсли;
       Т.ДобавитьСтроку(Спр.Код);
       Т.ДобавитьСтроку(Спр.Наименование);
       Спр2.ИспользоватьВладельца(Спр.ТекущийЭлемент());
       Спр2.ВыбратьЭлементы();
       Пока Спр2.ПолучитьЭлемент()=1 Цикл
           Т.ДобавитьСтроку(Спр2.КатегорияЦены);
           Т.ДобавитьСтроку(Спр2.Цена.Получить(РабочаяДата()));
       КонецЦикла;
   КонецЦикла;
   Т.Записать("D:\1234.txt");

(7) Спасибо, работает!!!

(8) пожалуйста!

"Рвем шаблон" ТС?
http://yandex.ru/yandsearch?text=выгрузка%20загрузка%20Tranref.ert&lr=11231