Код

Процедура Сформировать()
	Попытка
		Консоль = СоздатьОбъект("AddIn.qryConsole");
	Исключение
		ЗагрузитьВнешнююКомпоненту("qryConsole.dll");
		Консоль = СоздатьОбъект("AddIn.qryConsole");
	КонецПопытки;

	//Консоль.ConnectionString = "Provider=VFPOLEDB;Data Source=" + КаталогИБ();
	//Консоль.ПостроительКуба  = "ПостроительКуба";
	//Консоль.Отладка();

	ТекстЗапроса = "
		|select date Дата
		|	, $Обороты.ПродСтоимость Доход
		|	, $Обороты.Номенклатура as [Товар $Справочник.Номенклатура]
		|	, $Обороты.Фирма as [Фирма $Справочник.Фирмы]
		|from $Регистр.Продажи as Обороты
		|totals Sum(Доход)
		|by all
		|	, Дата periods
		|	, [Товар $Справочник.Номенклатура] hierarchy
		|	, [Фирма $Справочник.Фирмы]
		|";
	Путь = Консоль.СоздатьКуб(ТекстЗапроса);
	//Путь = Консоль.ВыполнитьИнструкцию(ТекстЗапроса);

	Если СтрДлина(Путь) > 0 Тогда
		Сводная.Объект.ConnectionString = "Provider=MSOLAP;Location=" + Путь;
		Сводная.Объект.DataMember	 = "qryConsole";
		oView = Сводная.Объект.ActiveView;
		oView.RowAxis.InsertFieldSet(oView.Fieldsets("[Товар].[По группам]"));
		oView.FilterAxis.InsertFieldSet(oView.Fieldsets("Фирма"));
		oView.ColumnAxis.InsertFieldSet(oView.Fieldsets("Дата По месяцам"));
		oView.DataAxis.InsertTotal(oView.Totals("Sum Доход"));
	КонецЕсли;
КонецПроцедуры 

Код

Путь = Консоль.СоздатьКуб(ТекстЗапроса);
{C:\КЛАССЫ\ДОКУМЕНТАЦИЯ ПО 1С++\1CPP_DOCUM\СОЗДАТЬКУБ.ERT(28)}: Поле агрегатного объекта не обнаружено (СоздатьКуб) 

Код

qryConsole : if exists(select * from tempdb..sysobjects where id = object_id('tempdb..##qryConsole_58_1