Записать одну учебную цену и доказать откат транзакции

Только новая пустая учебная база с пустыми модулями. Уникальный код, запись без замещения чужого ключа, чтение своей строки и намеренный откат.

Подготовка

1. Создайте НОВУЮ пустую файловую базу. В Конфигураторе корню задайте имя Учебная85; не добавляйте учебные регистры в рабочую УТ/КА2/УНФ/БП.

2. Регистры сведений → Добавить: УчебныеЦены. Режим записи Независимый, периодичность Непериодический. Измерение КодТовара: Строка, длина 50, индексировать. Ресурс Цена: Число, 12 цифр, 2 дробных, неотрицательное.

3. Проверку заполнения измерения установите Показывать ошибку. Модуль набора записей оставьте ПУСТЫМ; обработчики записи, обмена, фоновые задания и внешние сервисы для урока не создавайте.

4. Обновите конфигурацию базы данных. Создайте серверный общий модуль УчебныеЗадачи и команду учебной обработки для вызова ВыполнитьПример() Экспорт.

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

6. Для этого урока выполняется настоящая кратковременная запись в СОБСТВЕННУЮ учебную базу. Не используйте рабочую базу или чужую транзакцию.

7. Длина КодТовара 50 обязательна: TRAIN- + UUID занимает 42 символа. В регистрах не должно быть обработчиков, выполняющих внешние действия.

Описание = Метаданные.РегистрыСведений.Найти("УчебныеЦены");
Если Описание = Неопределено Тогда
    ВызватьИсключение "Сначала подготовьте собственный учебный регистр";
КонецЕсли;
Если Описание.РежимЗаписи <> Метаданные.СвойстваОбъектов.РежимЗаписиРегистра.Независимый
    Или Описание.ПериодичностьРегистраСведений <> Метаданные.СвойстваОбъектов.ПериодичностьРегистраСведений.Непериодический Тогда
    ВызватьИсключение "Настройки учебного регистра не соответствуют подготовке";
КонецЕсли;
Если Описание.Измерения.Количество() <> 1
    Или Описание.Измерения.Найти("КодТовара") = Неопределено
    Или Описание.Ресурсы.Найти("Цена") = Неопределено Тогда
    ВызватьИсключение "Нужны одно измерение КодТовара и ресурс Цена";
КонецЕсли;
Если ТранзакцияАктивна() Тогда
    ВызватьИсключение "Урок не выполняется внутри чужой транзакции";
КонецЕсли;
Код = "TRAIN-" + Строка(Новый УникальныйИдентификатор);
Менеджер = РегистрыСведений.УчебныеЦены;
ПроверкаДо = Менеджер.СоздатьМенеджерЗаписи();
ПроверкаДо.КодТовара = Код;
ПроверкаДо.Прочитать();
Если ПроверкаДо.Выбран() Тогда
    ВызватьИсключение "Неожиданно найден занятый учебный ключ";
КонецЕсли;
НачатьТранзакцию();
Попытка
    Запись = Менеджер.СоздатьМенеджерЗаписи();
    Запись.КодТовара = Код;
    Запись.Цена = 250;
    Запись.Записать(Ложь);
    Прочитанная = Менеджер.СоздатьМенеджерЗаписи();
    Прочитанная.КодТовара = Код;
    Прочитанная.Прочитать();
    Если Не Прочитанная.Выбран() Или Прочитанная.Цена <> 250 Тогда
        ВызватьИсключение "Своя запись не прочитана с ожидаемой ценой";
    КонецЕсли;
    Ресурсы = Менеджер.Получить(Новый Структура("КодТовара", Код));
    Сообщить(Ресурсы.Цена = 250);
    Выборка = Менеджер.Выбрать(Новый Структура("КодТовара", Код));
    Если Не Выборка.Следующий() Тогда
        ВызватьИсключение "Своя запись не найдена в выборке";
    КонецЕсли;
    ИзВыборки = Выборка.ПолучитьМенеджерЗаписи();
    Сообщить(ИзВыборки.Выбран());
    Сообщить(ИзВыборки.Цена = 250);
    Сообщить(Не Выборка.Следующий());
    ОтменитьТранзакцию();
Исключение
    Если ТранзакцияАктивна() Тогда
        ОтменитьТранзакцию();
    КонецЕсли;
    ВызватьИсключение;
КонецПопытки;
После = Менеджер.СоздатьМенеджерЗаписи();
После.КодТовара = Код;
После.Прочитать();
Если После.Выбран() Тогда
    ВызватьИсключение "После отката учебная запись всё ещё существует";
КонецЕсли;
Сообщить("Откат подтверждён: своя учебная цена отсутствует.");

Разбор по шагам

1. Отказываемся работать внутри существующей транзакции. Не отменяем чужие незавершённые изменения.

2. Создаём уникальный учебный ключ и до записи подтверждаем отсутствие строки через менеджер записи.

3. Записать(Ложь) не замещает другую существующую запись с тем же ключом. Это не универсальная защита от ошибок бизнес-обработчиков.

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

5. ПолучитьМенеджерЗаписи вызывается только после успешного Следующий: выборка позиционирована на строке.

6. Намеренно отменяем, а не фиксируем транзакцию. После отката читаем новым менеджером и требуем отсутствие строки.

Как проверить результат

1. Четыре проверки внутри транзакции Истина: цена, выбранность менеджера, цена из выборки, отсутствие второй строки.

2. После отката сообщение о подтверждённом отсутствии учебной цены.

3. В списке регистра не остаётся нового кода TRAIN-…, ФиксироватьТранзакцию нигде не вызывается.

Ожидаемый результат

Новичок наблюдает запись, несколько способов чтения и проверяемый откат своей транзакции.

На что обратить внимание

1. Откат базы не отменяет письма, HTTP-запросы и запись файлов из обработчиков. Поэтому регистр должен иметь пустой модуль и база быть новой.

2. После отката старый объект в памяти может хранить прежние поля; состояние базы проверяем новым экземпляром.

3. Получить возвращает структуру ресурсов, не полный объект записи с ключом.

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