Сформировать отчет с отображением состояния

//Процедура формирования статуса табличного документа&НаКлиентеНаСервереБезКонтекстаПроцедура УстановитьСостояниеПоляТабличногоДокумента(ПолеТабличногоДокумента, Состояние = "НеИспользовать") Экспорт Если ТипЗнч(ПолеТабличногоДокумента) = Тип("ПолеФормы") И ПолеТабличногоДокумента.Вид = ВидПоляФормы.ПолеТабличногоДокумента Тогда ОтображениеСостояния = ПолеТабличногоДокумента.ОтображениеСостояния; Если ВРег(Состояние) = "НЕИСПОЛЬЗОВАТЬ" Тогда ОтображениеСостояния.Видимость = Ложь; ОтображениеСостояния.ДополнительныйРежимОтображения = ДополнительныйРежимОтображения.НеИспользовать; ОтображениеСостояния.Картинка = Новый Картинка; ОтображениеСостояния.Текст = ""; ИначеЕсли ВРег(Состояние) = "НЕАКТУАЛЬНОСТЬ" Тогда ОтображениеСостояния.Видимость = Истина; ОтображениеСостояния.ДополнительныйРежимОтображения = ДополнительныйРежимОтображения.Неактуальность; ОтображениеСостояния.Картинка = Новый Картинка; ОтображениеСостояния.Текст = НСтр("ru = 'Отчет не сформирован. Нажмите ""Сформировать"" для получения отчета.'");; ИначеЕсли ВРег(Состояние) = "ФОРМИРОВАНИЕОТЧЕТА" Тогда ОтображениеСостояния.Видимость = Истина; ОтображениеСостояния.ДополнительныйРежимОтображения = ДополнительныйРежимОтображения.Неактуальность; ОтображениеСостояния.Картинка = БиблиотекаКартинок.ДлительнаяОперация48; ОтображениеСостояния.Текст = НСтр("ru = 'Отчет формируется...'"); Иначе ВызватьИсключение(НСтр("ru = 'Недопустимое значение параметра (параметр номер ''2'')'")); КонецЕсли;Иначе ВызватьИсключение(НСтр("ru = 'Недопустимое значение параметра (параметр номер ''1'')'"));КонецЕсли; КонецПроцедуры&НаКлиентеПроцедура КнопкаСформировать(Элемент) //Поменять статус табличного документа УстановитьСостояниеПоляТабличногоДокумента(Элементы.Результат, "ФормированиеОтчета"); ПодключитьОбработчикОжидания( "Подключаемый_ПроверитьВыполнениеЗадания", 0.1, Истина);КонецПроцедуры//Обработчик ожидания&НаКлиентеПроцедура Подключаемый_ПроверитьВыполнениеЗадания() //Основной обработчик команды КнопкаСформироватьНаСервере(); //Поменять статус табличного документа на обычный УстановитьСостояниеПоляТабличногоДокумента(Элементы.Результат, ); КонецПроцедуры