Найти открытый документ

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