По управлемым формам ещё собирается информация (пока указаны только подписки на события), изучаю механизм. Надеюсь, вскоре последует обновление статьи.
Код разнесён по формам в зависимости от типа объекта и вида форм, в которых собраны все процедуры, участвующие в процессе нумерации.
Расмотрим на примере документа с обычными формами, необходимые монипуляции с конфигурацией:
// 1.
// Длина номера объекта соответствует длине номеров большинства документов, учитываем ещё и префиксацию
// платформа 1С стандартно ставит длину 9 символов, в стандартных конфигурациях 11 символов
// 2.
// Установить в подписках на события
// Общие -> Подписки на события -> ПриУстановкеНовогоНомераДокумента
// В свойстве Источник отметить свой новый вид документов
// 3.
// У поля ввода "Номер" на форме устанавливаем свойство "ТолькоПросмотр" в состояние Истина
// 4.
// В свойствах формы объекта Поменять свойство "Автонумерация" с "Авто" на "Не использовать"
На панели свойств в группе событий создадим необходимые, затем вставим код:
Перем мТекущаяДатаДокумента;
Процедура ПриОткрытии()
мТекущаяДатаДокумента = Дата;
//ЭлементыФормы.ДействияФормы.Кнопки.Подменю
//Это элемент подменю верхней панели в который будет добавлена коменда "Редактировать номер"
МеханизмНумерацииОбъектов.ДобавитьВМенюДействияКнопкуРедактированияНомера(ЭлементыФормы.ДействияФормы.Кнопки.Подменю);
МеханизмНумерацииОбъектов.УстановитьДоступностьПоляВводаНомера(Метаданные(), ЭтаФорма, ЭлементыФормы.ДействияФормы.Кнопки.Подменю,ЭлементыФормы.Номер);
КонецПроцедуры
Процедура ПослеЗаписи()
МеханизмНумерацииОбъектов.ОбновитьПодсказкуКодНомерОбъекта(ЭтотОбъект.Метаданные(), ЭлементыФормы.ДействияФормы.Кнопки.Подменю, ЭлементыФормы.Номер);
КонецПроцедуры
//Эта процедура назначается коменде "Редактировать номер"
Процедура ДействияФормыРедактироватьНомер(Кнопка)
МеханизмНумерацииОбъектов.ИзменениеВозможностиРедактированияНомера(ЭтотОбъект.Метаданные(), ЭтаФорма, ЭлементыФормы.ДействияФормы.Кнопки.Подменю, ЭлементыФормы.Номер);
КонецПроцедуры
//Процедуры при изменении ведущих элементов
Процедура ДатаПриИзменении(Элемент)
РаботаСДиалогами.ПроверитьНомерДокумента(ЭтотОбъект, мТекущаяДатаДокумента);
МеханизмНумерацииОбъектов.ОбновитьПодсказкуКодНомерОбъекта(ЭтотОбъект.Метаданные(), ЭлементыФормы.ДействияФормы.Кнопки.Подменю, ЭлементыФормы.Номер);
мТекущаяДатаДокумента = Дата; // запомним текущую дату документа для контроля номера документа
КонецПроцедуры
Процедура ОрганизацияПриИзменении(Элемент)
Если Не ПустаяСтрока(Номер) Тогда
МеханизмНумерацииОбъектов.СброситьУстановленныйКодНомерОбъекта(ЭтотОбъект, "Номер", ЭлементыФормы.ДействияФормы.Кнопки.Подменю, ЭлементыФормы.Номер);
КонецЕсли;
КонецПроцедуры
