Сводные таблицы не работает механизм Drag-n-Drop

Запрос = Новый Запрос;  

ТекстЗапроса    = "ВЫБРАТЬ
                  |	Продажи.Номенклатура КАК Номенклатура,
                  |	Продажи.Количество КАК Количество,
                  |	Продажи.Период КАК Период
                  |ИЗ
                  |	РегистрНакопления.Продажи КАК Продажи
                  |ИТОГИ
                  |	СУММА(Количество)
                  |ПО
                  |	Номенклатура,
                  |	Период";    



Запрос.Текст = ТекстЗапроса;          

РезультатЗапроса         = Запрос.Выполнить(); 


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

СводнаяТаб                 = ТабличныйДокумент.ВстроенныеТаблицы.Найти("СводнаяТаблица1");
СводнаяТаб.ИсточникДанных  = РезультатЗапроса;
СводнаяТаб.Строки.Добавить(СводнаяТаб.Поля.Номенклатура);
СводнаяТаб.Колонки.Добавить(СводнаяТаб.Поля.Период);
СводнаяТаб.Данные.Добавить(СводнаяТаб.Поля.Количество);

СводнаяТаб.Обновление     = Истина;
СводнаяТаб.ОтображатьПоля = Истина;  
ТабличныйДокумент.ТолькоПросмотр = ЛОЖЬ;

Объект.РезультатОтчета.Вывести(ТабличныйДокумент);
Объект.РезультатОтчета.ТолькоПросмотр =ЛОЖЬ;