Выбрать доставку через Ждать и сохранить старый код при отмене

Учебные задачи

Полная управляемая форма с исходным pickup. Диалог возвращает элемент или Неопределено, а не код напрямую.

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

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

Подготовка

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

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

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

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

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

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

&НаКлиенте
Асинх Процедура УчебноеДействие(Команда)
    Способы = УчебныеСпособыДоставки();
    Начальный = Способы.НайтиПоЗначению(ЗначениеПримера);
    Элементы.КнопкаУчебноеДействие.Доступность = Ложь;
    Попытка
        Выбранный = Ждать Способы.ВыбратьЭлементАсинх("Учебная доставка", Начальный);
    Исключение
        Элементы.КнопкаУчебноеДействие.Доступность = Истина;
        ВызватьИсключение;
    КонецПопытки;
    Элементы.КнопкаУчебноеДействие.Доступность = Истина;
    Если Выбранный = Неопределено Тогда
        Сообщить("Отмена: прежний учебный код сохранён.");
        Возврат;
    КонецЕсли;
    ЗначениеПримера = Выбранный.Значение;
    Сообщить("Выбрано: " + Выбранный.Представление);
    Сообщить("Хранимый код: " + ЗначениеПримера);
КонецПроцедуры

&НаКлиенте
Функция УчебныеСпособыДоставки()
    Способы = Новый СписокЗначений;
    Способы.Добавить("pickup", "Самовывоз");
    Способы.Добавить("courier", "Курьер");
    Способы.Добавить("post", "Почта");
    Возврат Способы;
КонецФункции

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

  1. Список создаётся на клиенте из трёх известных кодов; начальное позиционирование ищем по текущему коду поля.

  2. Асинх Процедура позволяет Ждать результат обещания. Кнопка временно недоступна для повторного вызова.

  3. При исключении кнопка восстанавливается; при обычном закрытии — тоже.

  4. Неопределено означает отмену. Никаких свойств у него не читаем, поле не изменяем.

  5. У выбранного элемента берём Значение для хранения, Представление — только для сообщения.

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

  1. Выберите Курьер: поле courier, сообщение Курьер.

  2. Повторно нажмите и отмените: courier остаётся.

  3. После закрытия диалога кнопка снова доступна.

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

Рабочий учебный выбор одного значения с отменой, позиционированием и защитой от повторного нажатия.

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

  1. Старый синхронный ВыбратьЭлемент отличается от асинхронного API и может быть запрещён настройками модальности.

  2. Возвращается ЭлементСпискаЗначений, не Строка и не Булево.

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

Не хотите разбираться сами?

Адаптируем это решение под вашу базу. Оценка бесплатно.

Оставить задачу

1С, 1С:Предприятие — товарные знаки ООО «1С». Сайт не является официальным представительством фирмы «1С» и не аффилирован с ней.