1с 8.2. УТП 1.2.
Создаю документ из некой формы:
док = Документы.ПеремещениеТоваров.СоздатьДокумент();
док.ВидОперации = Перечисления.ВидыОперацийПеремещениеТоваров.ТоварыПродукцияПоОрдерам;
док.ПолучитьФорму().Открыть();
Если Товары.Количество() = 0 Тогда
Ответ = Вопрос("В документе нет товаров. Закрыть документ без записи? 'Да'-документ будет закрыт, 'Нет' - продолжить редактирование",РежимДиалогаВопрос.ДаНет);
Если Ответ = КодВозвратаДиалога.Да Тогда
ЭтаФорма.Закрыть();
Иначе
Отказ = Истина;
КонецЕсли;
КонецЕсли;
Если Товары.Количество() = 0 Тогда
Ответ = Вопрос("В документе нет товаров. Закрыть документ без записи? 'Да'-документ будет закрыт, 'Нет' - продолжить редактирование",РежимДиалогаВопрос.ДаНет);
Если Ответ = КодВозвратаДиалога.Да Тогда
ЭтаФорма.Модифицированность() = Ложь;
ЭтаФорма.Закрыть();
Иначе
Отказ = Истина;
КонецЕсли;
КонецЕсли;
Если Товары.Количество() = 0 Тогда
Ответ = Вопрос("В документе нет товаров. Закрыть документ без записи? 'Да'-документ будет закрыт, 'Нет' - продолжить редактирование",РежимДиалогаВопрос.ДаНет);
Если Ответ = КодВозвратаДиалога.Да Тогда
ЭтаФорма.Модифицированность() = Ложь;
ЭтаФорма.Закрыть();
Отказ = Истина;
Иначе
Отказ = Истина;
КонецЕсли;
КонецЕсли;
Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7
https://pro1c.org.ua