Смета в памяти: выбрать статус и проверить300→150 в таблице, дереве и numeric макете

Создадим три статуса сметы в собственной новой учебной конфигурации. Суммы100/150/50 хранятся только в памяти: полная сумма300, после выбора Оплачено —150. Научимся выбирать статус, сравнивать плоскую таблицу и дерево, проверять итог, сбрасывать отбор и отменять выбор без записей в базу.

Где и как запускать

Платформа8.5.1.1343 Windows, толстый клиент, обычное приложение, отдельная файловая учебная база. Код и макет описаны полностью; запуск в1С и компиляция конфигурации здесь не выполнялись.

Подготовка

Задача: научиться отличать metadata-перечисление от таблицы бизнес-данных. Статусы фиксированы в конфигурации, а суммы существуют только в памяти. Мы не создаем и не записываем документы, справочники или регистры.
Вручную создайте НОВУЮ пустую File-базу только C:\1c-labs\OwnEnumerationQuote85_5ef123f4-8b12-4e49-bc26-6d1c8a745d86\IB. UUID здесь — имя своего каталога стенда, НЕ UUID информационной базы. Не копируйте рабочую базу и не используйте путь пользователя к УТ/КА/УНФ/БП. Здесь мы не создаем каталог, базу, CF, пользователей или окна: это инструкция для будущего ручного запуска.
Платформа8.5.1.1343 Windows, толстый клиент, ОбычноеПриложение. Свойства конфигурации: Имя УчебнаяСметаСтатусов85, РежимСовместимости НеИспользовать, режимы запуска УправляемоеПриложениеИОбычноеПриложение, основной режим запуска ОбычноеПриложение. Эта отдельная настройка режимов нужна, чтобы в свойствах общего модуля были доступны флаги клиента обычного и управляемого приложения; ниже включаем только обычный клиент. Единственный пользователь Смета85Ученик с собственной полной ролью, включая право Администрирование для ПолучитьПользователей. Аутентифицируйтесь этим пользователем. Не устанавливайте расширения БД и не подключайте расширения сеанса; автоматический guard проверяет только источникБазаДанных, отсутствие session extensions — отдельное ручное prerequisite.
Перечисления→Добавить→СтатусыСметы85. В этом порядке добавьте Черновик85 (синоним Черновик), Оплачено85 (Оплачено), Отгружено85 (Отгружено). СпособВыбора=ОбоимиСпособами. Значения перечисления создаются ТОЛЬКО в metadata-конфигураторе, а не командой записи из 1С:Предприятия. В новой конфигурации не должно быть других перечислений, документов, справочников, обработок, отчетов и четырех семейств регистров.
ОбщиеМодули→СметаСтатусов85: КлиентОбычноеПриложениеДа, КлиентУправляемоеПриложениеНет, СерверНет, ВнешнееСоединениеНет, ВызовСервераНет, ГлобальныйНет, ПривилегированныйНет. COMMON_MODULE целиком вставьте в его Модуль. Это будущий клиентский in-memory код, не общий server helper.
ОбщиеФормы→Смета85→обычная форма, НЕ управляемая. HUB_MODULE целиком в Модуль. Реквизиты: Статус85 ПеречислениеСсылка.СтатусыСметы85; Таблица85 ТаблицаЗначений; Дерево85 ДеревоЗначений; Вывод85 ТабличныйДокумент; Состояние85 Строка2000. Исходная85/ПринятыйСтатус85/ОжидаемыйВыбор85/КлючВыбора85/Остановка85 — private module variables из кода, не реквизиты формы.
Смета85: ПолеВвода Статус85 Данные=Статус85, тип только собственная EnumRef. ПриИзменении→СтатусПриИзменении85(Элемент), ровно1formal по ordinary event104. ДоступныеЗначения задаются кодом только Черновик/Оплачено. Удалите стандартное изменение данных вне поля выбора; Состояние85 readonly. Не устанавливайте input/table control владельцем подчиненной формы: native extension properties тогда недоступны; owner всегда ЭтаФорма.
Смета85: ТабличноеПоле Таблица85 Данные=Таблица85. Колонки Код85/Статус85/Сумма85: их Имя и Данные совпадают с именем. Сумма85 должна иметь numeric тип из actual table. Картинка85 и Маркер85 — скрытые колонки данных, не строки картинки и не непрочитанный attachment. Native ДанныеКартинки у колонки Статус85 будет Картинка85, итоговый подвал у numeric колонки Сумма85 включается кодом. Удалите команды добавления/изменения/удаления и настройку колонок.
Смета85: ТабличноеПоле Дерево85 Данные=Дерево85. Видимые колонки Код85/Статус85/Сумма85 с соответствующими Имя/Данные, hidden data Картинка85/Маркер85. Дерево показывает группу статуса и вложенную собственную строку; это разные уровни, их суммы нельзя складывать вместе. ИзменятьПорядокСтрокFalse, readonly и запрет изменения состава задаются кодом. Раскройте собственные группы штатным плюс/стрелкой, чтобы увидеть вложенные строки; не выдаем это за проверенный renderer.
Смета85: ПолеТабличногоДокумента Вывод85 Данные=Вывод85, ТолькоПросмотрДа. Кнопки Сбросить85/Вид85/СписокСтатусов85/Выбрать85/Памятка85. Для каждой Нажатие свяжите с одноименной процедурой(Элемент), ровно1actual Кнопка по ordinary event104. Форма ПриОткрытии→ПриОткрытии(), ОбработкаВыбора→ОбработкаВыбора(ЗначениеВыбора,Источник), ровно2безElement. Не вызывайте event-handlers вручную из кода.
У СтатусыСметы85 через ФОРМЫ→Добавить мастер ordinary формы создайте Список85 типа формы списка и Выбор85 типа формы выбора. В каждой системе поручается создать main requisite типа ПеречислениеСписок.СтатусыСметы85; назовите его Список85 и установите ОсновнойРеквизитДа. Не создавайте Новый ПеречислениеСписок — native конструктора нет. ОсновнаяФормаСписка=Список85, ОсновнаяФормаДляВыбора=Выбор85. В каждой LIST_MODULE целиком в Модуль; модули независимы, не зовут друг друга.
В обеих enum формах: ТабличноеПоле Статусы85 Данные=Список85; ровно одна visible колонка ИмяСсылка/ДанныеСсылка. Это actual EnumList control: ТекущаяСтрока имеет native EnumRef, а не Структура и не row index. readonly поле Состояние85 Строка2000. Уберите стандартное изменение enum значений, команды записи и интерактивную настройку отбора. Отбор и НастройкаОтбора являются RO контейнерами; childСсылка меняется допустимыми native методами.
Обе enum формы: ПередОткрытием→ПередОткрытием(Отказ,СтандартнаяОбработка)2, ПриЗакрытии→ПриЗакрытии()0; у Статусы85 Выбор→СтатусыВыбор85(Элемент,ВыбраннаяСтрока,Колонка,СтандартнаяОбработка)4. NativeSelection35 имеет3formals, ordinaryevent104 добавляет actual первыйcontrol. СтандартнаяОбработка=False первой строкой исключает скрытый native выбор. ОповеститьОВыборе вызывается ТОЛЬКО в режиме собственной choice формы. NativeClose/X не посылает выбор; ПриЗакрытии вызывает обычную экспортную business процедуру отмены владельца, не event handler.
СтатусыСметы85→Формы→обычная произвольная Памятка85 (НЕ управляемая). MEMO_MODULE целиком в Модуль. Реквизит Вывод85 ТабличныйДокумент, одно ПолеТабличногоДокумента Вывод85 Данные=Вывод85/ТолькоПросмотрДа. ПередОткрытием2 по модулю. Памятка получает именно текущий проверенный numeric документ своей сметы из actual enum manager GetForm3, не стороннюю форму и не новый фальшивый объект.
СтатусыСметы85→Макеты→Итоги85→ТабличныйДокумент. Ровно3строки×2колонки, без объединений и ячеек внеR1C1:R3C2. Полный copyable six-cell asset CELLS ниже описывает КАЖДУЮ ячейку. Через штатный редактор внесите labels и numeric параметры: Всего85/Количество85/Отбор85, ЗаполнениеПараметр, numericЗначение0, СодержитЗначениеДа, ТипЗначенияЧисло12,0 неотрицательное, ЗащитаДа ВСЕХ6cells. JSON asset — спецификация ручной подготовки, НЕ формат импорта CF. Нельзя подменить numeric0 текстом0 или менять ContainsValue runtime, чтобы скрыть ошибку макета.
В модуль обычного приложения своей CF вставьте APPLICATION_MODULE ПриНачалеРаботыСистемы()0. Обновите конфигурацию своей учебной БД вручную и запустите именно ее в толстом обычном клиенте своим единственным пользователем. Штатный собственный app-start opens ОбщаяФорма.Смета85; не нужно меню или подсистема рабочей конфигурации.
Ручной тест1: при старте две memory views содержат3строки/3группы со своим дочерним листом, исходные100/150/50; numeric report readback поR1C2/R2C2/R3C2 равно300/3/300. Вкладка/пиксели/цвет картинки/подвал относятся к будущей manual UI проверке. Сумма дерева по группам300, по деталям300, НЕ600.
Ручной тест2: БыстрыйВыбор показывает только Черновик/Оплачено. Выберите Оплачено: actual flat1row150, tree1group+1leaf150, numeric readback300/1/150. Черновик дает300/1/100. Сбросить85 возвращает300/3/300. Вид85 переключает дерево/иерархический список без смены3или1actualrows/сумм. Памятка85 показывает те же actual numeric клетки в своем readonly поле.
Ручной тест3: СписокСтатусов85 opens own EnumList с childFilterСсылка InList двух refs и initial positionОплачено. Факт actualcurrent row после показа проверяется выбором собственной enum строки, но renderer/пиксели здесь не запускались. Выбрать85 opens own native choice; выберитеОплачено actual double-click/Enter, не прямой вызов handler. Платформа вызовет Selection4→NotifyChoice1→ownerChoiceProcessing2→новый candidate result.
Ручной тест4: открыть Выбрать85 и закрытьX без выбора. Native Close0 должен очистить только ожидаемый choice handle; предыдущие flat/tree/numeric клетки сохраняются. Foreignsource/foreignref/Отгружено/array/unknownkey/измененный источник/нечисловой макет — отказ. После исключения stickystop не позволяет продолжать текущую форму; ее надо закрыть и исправить подготовку. Последовательные присваивания не являются транзакцией и не обещают rollback/атомарность UI.

Перем Исходная85;
Перем ПринятыйСтатус85;
Перем ОжидаемыйВыбор85;
Перем КлючВыбора85;
Перем Остановка85;

Процедура ПриОткрытии()
    Остановка85 = Ложь;
    Попытка
        СметаСтатусов85.ПроверитьСтенд85();
        Если ТипЗнч(Перечисления) <> Тип("ПеречисленияМенеджер") Тогда
            ВызватьИсключение "Нужен собственный системный менеджер перечислений";
        КонецЕсли;
        ВсеСсылки = Перечисления.ТипВсеСсылки();
        Если ВсеСсылки.Типы().Количество() <> 1 Или Не ВсеСсылки.СодержитТип(Тип("ПеречислениеСсылка.СтатусыСметы85")) Тогда
            ВызватьИсключение "В стенде должно быть только собственное перечисление";
        КонецЕсли;
        Исходная85 = СметаСтатусов85.ИсходнаяСмета85();
        ПринятыйСтатус85 = Перечисления.СтатусыСметы85.ПустаяСсылка();
        Поле = ЭлементыФормы.Статус85;
        Если ТипЗнч(Поле) <> Тип("ПолеВвода") Или Поле.Имя <> "Статус85" Или Поле.Данные <> "Статус85"
            Или Поле.ТипЗначения.Типы().Количество() <> 1 Или Не Поле.ТипЗначения.СодержитТип(Тип("ПеречислениеСсылка.СтатусыСметы85")) Тогда
            ВызватьИсключение "Поле выбора должно быть связано только со своим enum реквизитом";
        КонецЕсли;
        Поле.БыстрыйВыбор = Истина;
        Поле.ДоступныеЗначения = СметаСтатусов85.ДоступныеСтатусы85();
        Поле = ЭлементыФормы.Статус85;
        Если Не Поле.БыстрыйВыбор Тогда
            ВызватьИсключение "Быстрый выбор не установлен";
        КонецЕсли;
        СметаСтатусов85.ПроверитьДоступные85(Поле.ДоступныеЗначения);
        ПрименитьСтатус85(ПринятыйСтатус85);
    Исключение
        Остановка85 = Истина;
        Состояние85 = "СТОП: закройте форму и проверьте подготовку стенда";
        ВызватьИсключение;
    КонецПопытки;
КонецПроцедуры

Процедура ПроверитьРаботу85()
    Если Остановка85 <> Ложь Тогда
        ВызватьИсключение "После ошибки нельзя продолжать работу этой формы";
    КонецЕсли;
    Попытка
        СметаСтатусов85.ПроверитьСтенд85();
        СметаСтатусов85.ПроверитьИсходную85(Исходная85);
        СметаСтатусов85.ПроверитьВидимую85(Таблица85, ПринятыйСтатус85);
        СметаСтатусов85.ПроверитьДерево85(Дерево85, Таблица85, ПринятыйСтатус85);
        СметаСтатусов85.ПроверитьИтоги85(Вывод85, СметаСтатусов85.Числа85(Исходная85, Таблица85, ПринятыйСтатус85));
    Исключение
        Остановка85 = Истина;
        Состояние85 = "СТОП: исходные данные или текущий результат изменены";
        ВызватьИсключение;
    КонецПопытки;
КонецПроцедуры

Процедура ПроверитьКнопку85(Элемент, Имя)
    Если ТипЗнч(Элемент) <> Тип("Кнопка") Или Элемент.Имя <> Имя Или Элемент <> ЭлементыФормы[Имя] Тогда
        ВызватьИсключение "Команда вызвана не своей кнопкой";
    КонецЕсли;
    ПроверитьРаботу85();
КонецПроцедуры

Процедура ПрименитьСтатус85(НовыйСтатус)
    Если Остановка85 <> Ложь Тогда
        ВызватьИсключение "После ошибки работа остановлена";
    КонецЕсли;
    Попытка
        СметаСтатусов85.ПроверитьИсходную85(Исходная85);
        СметаСтатусов85.ПроверитьСтатус85(НовыйСтатус, Истина);
        Кандидат = СметаСтатусов85.ВидимаяСмета85(Исходная85, НовыйСтатус);
        ДеревоКандидата = СметаСтатусов85.ДеревоСметы85(Кандидат, НовыйСтатус);
        Числа = СметаСтатусов85.Числа85(Исходная85, Кандидат, НовыйСтатус);
        Макет = Перечисления.СтатусыСметы85.ПолучитьМакет("Итоги85");
        ДокументКандидата = СметаСтатусов85.Итоги85(Макет, Числа);
        СметаСтатусов85.ПроверитьИсходную85(Исходная85);
        Таблица85 = Кандидат;
        Дерево85 = ДеревоКандидата;
        Вывод85 = ДокументКандидата;
        Статус85 = НовыйСтатус;
        ПринятыйСтатус85 = НовыйСтатус;
        НастроитьПредставление85(Истина);
        СметаСтатусов85.ПроверитьВидимую85(Таблица85, ПринятыйСтатус85);
        СметаСтатусов85.ПроверитьДерево85(Дерево85, Таблица85, ПринятыйСтатус85);
        СметаСтатусов85.ПроверитьИтоги85(ЭлементыФормы.Вывод85.Значение, Числа);
        СметаСтатусов85.ПроверитьИсходную85(Исходная85);
        Состояние85 = "Источник: 300; видимых строк: " + Строка(Числа.Количество85) + "; сумма: " + Строка(Числа.Отбор85);
    Исключение
        Остановка85 = Истина;
        Состояние85 = "СТОП: возможен частично замененный видимый результат; закройте форму";
        ВызватьИсключение;
    КонецПопытки;
КонецПроцедуры

Процедура НастроитьПредставление85(ПоказыватьДерево)
    ПлоскоеПоле = ЭлементыФормы.Таблица85;
    ДревовидноеПоле = ЭлементыФормы.Дерево85;
    Если ТипЗнч(ПлоскоеПоле) <> Тип("ТабличноеПоле") Или ПлоскоеПоле.Данные <> "Таблица85" Или ПлоскоеПоле.Значение <> Таблица85
        Или ТипЗнч(ДревовидноеПоле) <> Тип("ТабличноеПоле") Или ДревовидноеПоле.Данные <> "Дерево85" Или ДревовидноеПоле.Значение <> Дерево85 Тогда
        ВызватьИсключение "Нужны собственные табличные поля actual TV и actual ValueTree";
    КонецЕсли;
    Если ПлоскоеПоле.Колонки.Найти("Статус85") = Неопределено Или ПлоскоеПоле.Колонки.Найти("Сумма85") = Неопределено
        Или ДревовидноеПоле.Колонки.Найти("Статус85") = Неопределено Тогда
        ВызватьИсключение "Создайте собственные колонки Статус85 и Сумма85";
    КонецЕсли;
    Если ПлоскоеПоле.Колонки.Статус85.Данные <> "Статус85" Или ПлоскоеПоле.Колонки.Сумма85.Данные <> "Сумма85"
        Или ДревовидноеПоле.Колонки.Статус85.Данные <> "Статус85" Тогда
        ВызватьИсключение "Картинка должна относиться к статусу, а footer только к собственной numeric сумме";
    КонецЕсли;
    ПлоскоеПоле.ТолькоПросмотр = Истина;
    ПлоскоеПоле.ИзменятьСоставСтрок = Ложь;
    ПлоскоеПоле.Подвал = Истина;
    ПлоскоеПоле.Колонки.Статус85.ДанныеКартинки = "Картинка85";
    ПлоскоеПоле.Колонки.Сумма85.ОтображатьИтогиВПодвале = Истина;
    ДревовидноеПоле.ТолькоПросмотр = Истина;
    ДревовидноеПоле.ИзменятьСоставСтрок = Ложь;
    ДревовидноеПоле.Дерево = ПоказыватьДерево;
    ДревовидноеПоле.ИзменятьПорядокСтрок = Ложь;
    ДревовидноеПоле.Колонки.Статус85.ДанныеКартинки = "Картинка85";
    ЭлементыФормы.Вывод85.ТолькоПросмотр = Истина;
    ПлоскоеПоле = ЭлементыФормы.Таблица85;
    ДревовидноеПоле = ЭлементыФормы.Дерево85;
    Если ПлоскоеПоле.Значение <> Таблица85 Или Не ПлоскоеПоле.ТолькоПросмотр Или ПлоскоеПоле.ИзменятьСоставСтрок Или Не ПлоскоеПоле.Подвал
        Или ПлоскоеПоле.Колонки.Статус85.ДанныеКартинки <> "Картинка85" Или Не ПлоскоеПоле.Колонки.Сумма85.ОтображатьИтогиВПодвале
        Или ДревовидноеПоле.Значение <> Дерево85 Или Не ДревовидноеПоле.ТолькоПросмотр Или ДревовидноеПоле.ИзменятьСоставСтрок
        Или ДревовидноеПоле.Дерево <> ПоказыватьДерево Или ДревовидноеПоле.ИзменятьПорядокСтрок
        Или ДревовидноеПоле.Колонки.Статус85.ДанныеКартинки <> "Картинка85"
        Или ЭлементыФормы.Вывод85.Значение <> Вывод85 Или Не ЭлементыФормы.Вывод85.ТолькоПросмотр Тогда
        ВызватьИсключение "Фактические свойства повторно полученных собственных полей не совпали";
    КонецЕсли;
КонецПроцедуры

Процедура СтатусПриИзменении85(Элемент)
    Если Элемент <> ЭлементыФормы.Статус85 Или ТипЗнч(Элемент) <> Тип("ПолеВвода") Тогда
        ВызватьИсключение "Значение изменено не собственным enum полем";
    КонецЕсли;
    ПрименитьСтатус85(Элемент.Значение);
КонецПроцедуры

Процедура Сбросить85(Элемент)
    ПроверитьКнопку85(Элемент, "Сбросить85");
    ПрименитьСтатус85(Перечисления.СтатусыСметы85.ПустаяСсылка());
КонецПроцедуры

Процедура Вид85(Элемент)
    ПроверитьКнопку85(Элемент, "Вид85");
    Попытка
        НастроитьПредставление85(Не ЭлементыФормы.Дерево85.Дерево);
        ПроверитьРаботу85();
    Исключение
        Остановка85 = Истина;
        Состояние85 = "СТОП: не удалось проверить переключение дерева";
        ВызватьИсключение;
    КонецПопытки;
КонецПроцедуры

Процедура СписокСтатусов85(Элемент)
    ПроверитьКнопку85(Элемент, "СписокСтатусов85");
    Попытка
        Ключ = Новый УникальныйИдентификатор;
        СвойСписок = Перечисления.СтатусыСметы85.ПолучитьФормуСписка("Список85", ЭтаФорма, Ключ);
        Если ТипЗнч(СвойСписок) <> Тип("Форма") Или СвойСписок.ВладелецФормы <> ЭтаФорма Или СвойСписок.КлючУникальности <> Ключ Тогда
            ВызватьИсключение "Фабрика не вернула собственную новую форму списка";
        КонецЕсли;
        СвойСписок.Подготовить85(ЭтаФорма, Ключ, Ложь);
        СвойСписок.Открыть();
        ПроверитьРаботу85();
    Исключение
        Остановка85 = Истина;
        Состояние85 = "СТОП: не удалось подготовить собственный список статусов";
        ВызватьИсключение;
    КонецПопытки;
КонецПроцедуры

Процедура Выбрать85(Элемент)
    ПроверитьКнопку85(Элемент, "Выбрать85");
    Попытка
        Если ТипЗнч(ОжидаемыйВыбор85) = Тип("Форма") И ОжидаемыйВыбор85.Открыта() Тогда
            ВызватьИсключение "Завершите или отмените уже открытый собственный выбор";
        КонецЕсли;
        КлючВыбора85 = Новый УникальныйИдентификатор;
        СвойВыбор = Перечисления.СтатусыСметы85.ПолучитьФормуВыбора("Выбор85", ЭтаФорма, КлючВыбора85);
        Если ТипЗнч(СвойВыбор) <> Тип("Форма") Или СвойВыбор.ВладелецФормы <> ЭтаФорма Или СвойВыбор.КлючУникальности <> КлючВыбора85 Тогда
            ВызватьИсключение "Фабрика не вернула собственную новую форму выбора";
        КонецЕсли;
        СвойВыбор.Подготовить85(ЭтаФорма, КлючВыбора85, Истина);
        ОжидаемыйВыбор85 = СвойВыбор;
        СвойВыбор.Открыть();
        ПроверитьРаботу85();
    Исключение
        Остановка85 = Истина;
        Состояние85 = "СТОП: форма выбора не подготовлена";
        ВызватьИсключение;
    КонецПопытки;
КонецПроцедуры

Процедура ОбработкаВыбора(ЗначениеВыбора, Источник)
    Если ТипЗнч(Источник) <> Тип("Форма") Или Источник <> ОжидаемыйВыбор85 Или Источник.ВладелецФормы <> ЭтаФорма
        Или Источник.КлючУникальности <> КлючВыбора85 Или Не Источник.РежимВыбора Или Не Источник.ЗакрыватьПриВыборе Тогда
        ВызватьИсключение "Результат пришел не из собственного ожидаемого выбора";
    КонецЕсли;
    ПроверитьРаботу85();
    СметаСтатусов85.ПроверитьСтатус85(ЗначениеВыбора);
    ПрименитьСтатус85(ЗначениеВыбора);
    ОжидаемыйВыбор85 = Неопределено;
КонецПроцедуры

Процедура ОтменитьВыбор85(Источник) Экспорт
    Если ТипЗнч(Источник) <> Тип("Форма") Или Источник.ВладелецФормы <> ЭтаФорма Тогда
        ВызватьИсключение "Закрыта не собственная подчиненная форма";
    КонецЕсли;
    Если ОжидаемыйВыбор85 = Неопределено Тогда
        Возврат;
    КонецЕсли;
    Если Источник <> ОжидаемыйВыбор85 Или Источник.КлючУникальности <> КлючВыбора85 Тогда
        ВызватьИсключение "Отмена не соответствует ожидаемой форме выбора";
    КонецЕсли;
    ПроверитьРаботу85();
    ОжидаемыйВыбор85 = Неопределено;
    Состояние85 = "Выбор отменен. Таблица, дерево и numeric результат сохранены";
КонецПроцедуры

Процедура Памятка85(Элемент)
    ПроверитьКнопку85(Элемент, "Памятка85");
    Попытка
        Ключ = Новый УникальныйИдентификатор;
        СвояПамятка = Перечисления.СтатусыСметы85.ПолучитьФорму("Памятка85", ЭтаФорма, Ключ);
        Если ТипЗнч(СвояПамятка) <> Тип("Форма") Или СвояПамятка.ВладелецФормы <> ЭтаФорма Или СвояПамятка.КлючУникальности <> Ключ Тогда
            ВызватьИсключение "Фабрика не вернула собственную новую форму памятки";
        КонецЕсли;
        СвояПамятка.Подготовить85(ЭтаФорма, Ключ, Вывод85, СметаСтатусов85.Числа85(Исходная85, Таблица85, ПринятыйСтатус85));
        СвояПамятка.Открыть();
        ПроверитьРаботу85();
    Исключение
        Остановка85 = Истина;
        Состояние85 = "СТОП: не удалось проверить собственную памятку";
        ВызватьИсключение;
    КонецПопытки;
КонецПроцедуры

Полный собственный common client module

ОбщиеМодули → СметаСтатусов85 → Модуль