// *** было: ***
//Продолжение писали отдельной процедурой
//и передавали через ОписаниеОповещения
&НаКлиенте
Процедура Проверить(Команда)
Оповещение = Новый ОписаниеОповещения(
"ПроверитьЗавершение", ЭтотОбъект);
ПоказатьВопрос(Оповещение, "Продолжить?",
РежимДиалогаВопрос.ДаНет);
КонецПроцедуры
&НаКлиенте
Процедура ПроверитьЗавершение(Ответ,
ДопПараметры) Экспорт
Если Ответ = КодВозвратаДиалога.Да Тогда
Сообщить("Продолжаем");
Иначе
Сообщить("Отменено");
КонецЕсли;
КонецПроцедуры
// *** in version 8.3.18: ***
//Код читается сверху вниз одной процедурой
&НаКлиенте
Асинх Процедура Проверить(Команда)
Ответ = Ждать ВопросАсинх("Продолжить?",
РежимДиалогаВопрос.ДаНет);
//Строки ниже выполнятся после ответа,
//интерфейс при ожидании не блокируется
Если Ответ = КодВозвратаДиалога.Да Тогда
Сообщить("Продолжаем");
Иначе
Сообщить("Отменено");
КонецЕсли;
КонецПроцедуры