Разобрать старое синхронное предупреждение без изменения модального режима

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

Подготовка

1. Создайте отдельную учебную внешнюю обработку с пустой управляемой основной формой. Каждую задачу запускайте в своей копии формы.

2. Не добавляйте вручную реквизит ЗначениеПримера, поле ПолеПримера и команду УчебноеДействие: их создаст код.

3. В свойствах формы → События свяжите ПриСозданииНаСервере с одноимённой процедурой. Вставьте весь модуль, включая клиентские и серверные процедуры.

4. Сохраните учебную EPF и откройте через Файл → Открыть в тонком или толстом клиенте Windows. Рабочие данные не читаются и не записываются.

5. Используйте новую пустую учебную базу и отдельную копию EPF для каждой задачи. Команды не должны обращаться к рабочим данным, внешним сервисам или процедурам записи.

6. Основной пример выполняется в тонком/толстом клиенте Windows. Доступность веб-клиента оговаривается отдельно; наличие Асинх в имени не гарантирует веб-доступность.

7. Дополнительное условие: синхронная модальность уже разрешена в собственной учебной конфигурации. Если нет — не запускайте этот урок и не меняйте рабочую настройку.

&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
    Новые = Новый Массив;
    ТипРеквизита = Новый ОписаниеТипов("Число", Новый КвалификаторыЧисла(12, 2));
    Новые.Добавить(Новый РеквизитФормы("ЗначениеПримера", ТипРеквизита));
    ЭтаФорма.ИзменитьРеквизиты(Новые);
    ЭтаФорма.ЗначениеПримера = 3;
    Поле = Элементы.Добавить("ПолеПримера", Тип("ПолеФормы"));
    Поле.Вид = ВидПоляФормы.ПолеВвода;
    Поле.ПутьКДанным = "ЗначениеПримера";
    Поле.Заголовок = "Учебное количество";


    КомандаДействия = ЭтаФорма.Команды.Добавить("УчебноеДействие");
    КомандаДействия.Действие = "УчебноеДействие";
    КомандаДействия.Заголовок = "Проверить учебное количество";
    КомандаДействия.Подсказка = "Действие только над данными учебной формы";
    КомандаДействия.ИзменяетСохраняемыеДанные = Ложь;
    Кнопка = Элементы.Добавить("КнопкаУчебноеДействие", Тип("КнопкаФормы"));
    Кнопка.ИмяКоманды = КомандаДействия.Имя;
    Кнопка.Заголовок = КомандаДействия.Заголовок;
КонецПроцедуры

&НаКлиенте
Процедура УчебноеДействие(Команда)
    Если ЗначениеПримера < 1 Или ЗначениеПримера > 100 Тогда
        Предупреждение("Введите количество от 1 до 100.", 0, "Учебная проверка");
        Возврат;
    КонецЕсли;
    Сообщить("Сумма только в памяти: " + Строка(ЗначениеПримера * 200));
КонецПроцедуры

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

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

2. Предупреждение ожидает закрытия окна; оно не возвращает ответ Да/Нет.

3. После закрытия ошибочная ветка завершается Возврат.

4. При допустимом количестве выполняется только вычисление в памяти.

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

1. При 0 после закрытия окна расчёт не выполняется.

2. При 3 выводится 600. В конфигурации с НеИспользовать модальность этот вариант не запускайте — используйте другой урок.

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

Показано, как читать и безопасно ограничивать старый синхронный клиентский фрагмент.

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

1. Не меняйте режим модальности рабочей базы ради запуска примера.

2. Этот метод не предназначен для веб-клиента.

3. Для нового кода учитывайте поддерживаемый клиент и используйте подходящий асинхронный/callback вариант.

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