8.х Контроль уникальности имени справочника при записи

Подскажите пожалуйста, нужно проверять при создании нового элемента справочника "НомераТелефонов" уникальность имени, т.е. чтобы выдавалось предупреждение "Такой номер уже есть!"(номер-имя элемента спр.) и если имя совпадает, то записи не происходит даже после нажатия ОК?
Вот мой код:

Код:

Процедура ПриЗаписи(Отказ)
Номер = Справочники.НомераТелефонов.?????;-!!!!!!!!!!!!!!!
Если Номер = Справочники.НомераТелефонов.НайтиПоНаименованию("Наименование")
Тогда
Сообщить ("Такой номер уже есть!");
Отказ = истина;
Возврат;
КонецЕсли;

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

меня смущает 2 строка, т.е. как правильно обратиться к текущему имени элемента справочника?

+ ещё вопрос: этот спр. используется при заполнении документа, можно ли сделать так, чтобы изменять(добавлять) элементы справочника напрямую из документа?

Код:

Процедура ПриЗаписи(Отказ)
Номер = Справочники.НомераТелефонов.НайтиПоНаименованию("Наименование") 
Если ЗначениеЗаполнено(Номер)
Тогда
Сообщить ("Такой номер уже есть!");
Отказ = истина;
Возврат;
КонецЕсли;

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

Элементы справочника можно добавлять из документа - по умолчанию

и я бы номера в КОД справочника перенес, т.к. нужно учитывать уникальность номера и это можно сделать штатными средствами, не добавляя специальную проверку

спасибо, но Ваш код не совсем правильный, он будет выдавать предупреждение, если реквизит не заполнен.

Код:

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

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

Как-то так.

К сожалению, не пошло

Давайте смотреть, почему:
Во-первых, я контролировал только запись нового справочника: данный код не предназначен для контроля изменения уже существующих элементов справочника. (ЭтоНовый()). Впрочем, убираением условия "ЭтоНовый()" мы добьёмся немногого - находя сам себя он будет выдавать косяк.

Кстати, ещё вариант: вам вполне достаточно строчки

Код:

Код = Наименование;

В процедуре "ПередЗаписью", включёного контроля уникальности кода и обязательной установки длины кода равной длине наименования. Профит очевиден: все заботы о контроле уникальности теперь лежат на внутренних механизмах 1С. Минус тоже очевиден - длина поля "код" возрастёт.

Да это я понимаю, таких ошибок не допускал.

Хорошо, попробую. В увеличении кода в принципе не вижу ничего страшного.

Доктор Руфус Бейли, nomad irk, спасибо Вам большое за помощь!