8.х Получить цену номенклатуры

Есть рабочий в 7.7 код:

Код:

Товар = СоздатьОбъект("Справочник.Номенклатура");
Товар.ВыбратьЭлементы();
Э = СоздатьОбъект("Текст");

Пока Товар.ПолучитьЭлемент() = 1 Цикл
Если Товар.ЭтоГруппа()=0 Тогда
ТекТов = Товар.ТекущийЭлемент();
ТекТов_Цена    = глПолучитьЦену(ТекТов, Константа.РозничныйТипЦен, ТекущаяДата(),ТекТов.БазоваяЕдиница);
Э.ДобавитьСтроку("    "+ТекТов_Цена+"");
КонецЕсли;  
КонецЦикла;

Переписываю его в 8.1. Ну с созданием объектов и т.д. вроде разобрался. А вот "глПолучитьЦену" не работает - во-первых, пишет "Переменная не определена (Константа)", а во-вторых, "Процедура или функция с указанным именем не определена (глПолучитьЦену)". Не подскажите как исправить?

Да понятно что бездумно. Да только вот я программирую на другом языке, а поставили задачу по 1C - вот и сиди разбирайся как хочешь...
В любом случае спасибо, разобрался