Запись в регистры

[dulingleb]

Есть такой код:

Код Выделить Развернуть

&НаКлиенте
Процедура Проверить(Команда)
    ЗаписатьДорожку();
    Записать(Новый Структура("РежимЗаписи", РежимЗаписиДокумента.Проведение));
    Закрыть();
КонецПроцедуры

&НаСервере
Процедура ЗаписатьДорожку()
НаборЗаписей = РегистрыСведений.Дорожки.СоздатьНаборЗаписей();
    НоваяЗапись = НаборЗаписей.Добавить();
    НоваяЗапись.Дорожка = Объект.НомерДорожки;
    НаборЗаписей.Записать();
КонецПроцедуры


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

[MuI_I_Ika]

Для этого надо сначала прочитать набор записей, проверить есть ли в нем записи, и дальше действовать как вам нужно.

[dulingleb]

Для этого надо сначала прочитать набор записей, проверить есть ли в нем записи, и дальше действовать как вам нужно.

Подскажете, плиз, как это реализовать

[MuI_I_Ika]

Код Выделить Развернуть

&НаКлиенте
Процедура Проверить(Команда)
    ЗаписатьДорожку();
    Записать(Новый Структура("РежимЗаписи", РежимЗаписиДокумента.Проведение));
    Закрыть();
КонецПроцедуры

&НаСервере
Процедура ЗаписатьДорожку()
НаборЗаписей = РегистрыСведений.Дорожки.СоздатьНаборЗаписей();
НаборЗаписей.Прочитать();
Если НаборЗаписей.Количество() > 0 Тогда
    Возврат;
КонецЕсли;
    НоваяЗапись = НаборЗаписей.Добавить();
    НоваяЗапись.Дорожка = Объект.НомерДорожки;
    НаборЗаписей.Записать();
КонецПроцедуры