v7: Ввести вид начисления обработкой

Нужно из dbf  вести дополнительный  вид начисление  обработку написал но выдает ощибку
ЖЗ.ВвестиРасчет(ТекСотр, ВидРасчета.ПенсионныйФонд, "01.12.2015", "31.12.2015", ПремияСотруднику);
{E:\2017\ВЕДЕМ +3000.ERT(34)}: Процедура недоступна в данном контексте!

//*******************************************
Процедура Выполнить()
Файл = создатьОбъект("XBASE");
Файл.ОткрытьФайл("E:\2017\Кадры Обнов\PST.dbf");
Сотр=СоздатьОбъект("Справочник.Сотрудники");
ЖЗ = СоздатьОбъект("ЖурналРасчетов.Зарплата");
ЖЗ.УстановитьРеквизит("Рассчитана",1);
Сотр.НайтиПоНаименованию("Расчетчик1");
Расчетчик1 = Сотр.ТекущийЭлемент();
Сотр.ИспользоватьРодителя(Расчетчик1);
Сотр.использоватьДату(Рабочаядата());

Если Файл.Открыта()=0 Тогда
Сообщить("Не удалось открыть файл!");
КонецЕсли;

Сотр.ВыбратьЭлементы();

Пока Сотр.ПолучитьЭлемент() = 1 Цикл

ТекСотр=Сотр.ТекущийЭлемент();
Файл.Первая();
Пока Файл.ВКонце()=0 Цикл

СотрудникДБФ=Файл.name;
//Сообщить(ТекСотр) ;
Если СокрЛП(ТекСотр)=СокрЛП(СотрудникДБФ) Тогда
ПремияСотруднику=Число("9999");
ЖЗ.ВвестиРасчет(ТекСотр, ВидРасчета.Фонд, "01.12.2015", "31.12.2015", ПремияСотруднику);
Сообщить("Найдден Сотр");
  Прервать;

КонецЕсли;
  Файл.Следующая();

КонецЦикла;

КонецЦикла;

КонецПроцедуры