7.7 Денежный счет по кассе

Проблема.. вроде все норм прописал но почему то не находит у меня кассу с гривней.Касса это тип справочника "ДенежныеСчета" денежные счета подчинены Справочнику.фирмы
по которому я ищу гривневый счет но ненахожу.... вот как делаю

Код:

Процедура ИзмКасса()
Если Касса.Выбран() = 0 Тогда
Возврат;
КонецЕсли;
Если Касса.Владелец <> Фирма Тогда
Касса = глПолучитьКассу(Фирма, Гривня);
Предупреждение("Выбранная касса принадлежит другой фирме!");
Возврат;
КонецЕсли;
Если Касса.Валюта <> Гривня Тогда
Предупреждение("Выплачивать зарплату можно только в национальной валюте!");
Касса = глПолучитьКассу(Фирма, Гривня);
КонецЕсли;
КонецПроцедуры

и в глобальном

Код:

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

Код:

Значение не представляет агрегатный объект (ТекущийЭлемент)

вот что пишет(

Зделал добавил в процедуру

Код:

Процедура  ПриНачалеРаботыСистемы()
Гривня = Константа.БазВалюта;
ПрефиксАвтонумерации("Документ.Договор","ДГ-");
ПрефиксАвтонумерации("Документ.ПриходнаяНакладная","ПН-");
ПрефиксАвтонумерации("Документ.РасходнаяНакладная","РН-");
ПрефиксАвтонумерации("Документ.Счет","СФ-");
Если глИспользуетсяРазделительУчета = 0 Тогда
ЗаголовокСистемы(СокрЛП(Константа.БазФирма.ПолноеНаименование));
КонецЕсли;
КонецПроцедуры

Все равно не видит вроде все верно Нахожу в справочнике денежные счета реквизит "валюта" в нем Гривну и делаю проверку

константа "БазВалюта" не периодический реквизит проверил)

"Гривня = "Пишет пустота;Перем Гривня Экспорт обьявлена только в глобальном модуле,больше не опряделял в модулях

Точно вот я Алень! у меня константа "основнаяВалюта)"а при работе системы Базвалюта все из за невнимательности(

Спасибо огромное то б наверно так и не заметил(