Как вытащить Плановая себестоимость

Кто нибудь пробывал выгружать ПлановаяСебестоимость
Никак не получается
В конфе лежит Номенклатура-ПлановаяСебестоимость и там тип значения- справочник.цены
Помогите правильно обратиться к ПлановаяСебестоимость .


[1C-CODE]
Процедура Сформировать()
xl=СоздатьОбъект("Excel.Application");
xl.Caption="ИзменНорматива";
row=1; //первая строка
Продукция = "";
Товар = СоздатьОбъект("Справочник.Номенклатура");
Цена = СоздатьОбъект("Справочник.Цены");
спрнормы=СоздатьОбъект("Справочник.НормыРасходов");

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


Товар.ВыбратьЭлементы(0);
пока Товар.получитьэлемент() =1 цикл
спрнормы.использоватьвладельца(Товар.текущийэлемент());
спрнормы.выбратьэлементы(1);
пока спрнормы.получитьэлемент(1) = 1 цикл

Цена.ИспользоватьВладельца(Товар.ТекущийЭлемент());
Цена.ВыбратьЭлементы();
Пока Цена.ПолучитьЭлемент() = 1 Цикл
Если СокрЛП(Цена.ТипЦен.Наименование) = "Покупная" Тогда
Сообщить("Элемент " + СокрЛП(Товар.Наименование) + " имеет покупную цену = " + Цена.Цена.Получить(ТекущаяДата()) );


xl.Cells(row,1).Value= Цена.Цена.Получить(ТекущаяДата());
xl.Cells(row,2).Value=спрнормы.стоимость.Получить(текущаядата());
xl.Cells(row,3).Value=Товар.Код;
xl.Cells(row,4).Value= Товар.Наименование ;
xl.Cells(row,5).Value=спрнормы.наименование;
xl.Cells(row,6).Value=Товар.ПлановаяСебестоимость.ИспользоватьРодителя(Товар.ТекущийЭлемент());

row=row+1;//переходим на следующую строку


КонецЕсли;

КонецЦикла;
КонецЦикла;

КонецЦикла;
КонецЦикла;

КонецПроцедуры
[\ CODE]