РезультатПоКолонкам = ВыполнитьЗапросыИАнализ();
   
   ЭлементыФормы.Результат.Очистить();
   
   КомпоновщикМакета = Новый КомпоновщикМакетаКомпоновкиДанных;
   СхемаКД = ЭтотОбъект.СхемаКомпоновкиДанных;
   НаборДанных = СхемаКД.НаборыДанных.Добавить(Тип("НаборДанныхОбъектСхемыКомпоновкиДанных"));
   НаборДанных.Имя = "Таблица";
   НаборДанных.ИмяОбъекта = "Таблица";
   НаборДанных.ИсточникДанных = "Таблица";
   Для каждого стр из колонкиОтчета Цикл
       поле = НаборДанных.Поля.Добавить(Тип("ПолеНабораДанныхСхемыКомпоновкиДанных"));
       поле.Поле = стр.ИмяКолонки;
       поле.ПутьКДанным = стр.ИмяКолонки;
       поле.Заголовок = стр.Заголовок;
       поле.ТипЗначения = Новый ОписаниеТипов("Число");
   КонецЦикла;
   
   Настройки = ЭтотОбъект.КомпоновщикНастроек.Настройки;
   //Настройки.Структура.Очистить();
   
   МакетКомпоновкиДанных = КомпоновщикМакета.Выполнить(СхемаКД,Настройки);

чего оно ругается "ошибка генерации макета" на последней строке?

Настройки = КомпоновщикНастроек.Настройки;

(1) у меня вроде так и написано.

Поясню: пытаюсь настроить и вывести СКД с 0, программно, по ВнешнемуИсточникуДанных типа ТаблицаЗначений
материал беру отсюда http://www.gr13.ru/forum/index.php?showtopic=319 , но вот застрял ...

шо ваще такое этот макет компоновки???

(3) Скомпонованная твоя схема СКД с учетом применения твоих настроек.
ЗЫ У тебя в схеме уже что-то прописано, раз её берешь и настройки из неё? Что у тебя выводится в расшифровке "Подробно" ошибки? "Неправильно указан источник данных" ?

точно! не заметил " Ошибка в схеме компоновки данных: не найден источник данных: Таблица "

какое имя должно быть? зачем оно вообще?

как правильно сделать надо?

ап!

блин, ИсточникДанных - это родитель  в дереве слева

Ну посмотри параметры метода "Выполнить", что ли...

почитай Хрусталеву ... ) Там есть програмное заполнение

или погляди бух корп, отчет "универсальный отчет по метаданным"

v8: СКД: Программные настройки

добавил программно источник данных в СКД вот так

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


после запуска открываю настройки СКД и не вижу доступных полей кроме системных.
Что я не сделал?

ап

апп

ДоступныеПоляКомпоновкиДанных ?

????????

(18) тебеж в (1) еще подсказали... все долбишь?

   КомпоновщикНастроек.ЗагрузитьНастройки(СхемаКомпоновкиДанных.НастройкиПоУмолчанию);
   Настройки = КомпоновщикНастроек.Настройки;
   
   КомпоновщикНастроек.Инициализировать(СхемаКомпоновкиДанных.НастройкиПоУмолчанию);
   
   КомпоновщикМакета = Новый КомпоновщикМакетаКомпоновкиДанных;
   МакетКомпоновки = КомпоновщикМакета.Выполнить(СхемаКомпоновкиДанных, Настройки, );
       
   ПроцессорКомпоновки = Новый ПроцессорКомпоновкиДанных;
   ПроцессорКомпоновки.Инициализировать(МакетКомпоновки,,,);

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

   ПроцессорВывода.НачатьВывод();
   ПроцессорВывода.ОтображатьПроцентВывода = Истина;
   Пока Истина Цикл
       ЭлементРезультата = ПроцессорКомпоновки.Следующий();
       Если ЭлементРезультата = Неопределено тогда
           Прервать;
       КонецЕсли;    
       ПроцессорВывода.ВывестиЭлемент(ЭлементРезультата);
   КонецЦикла;
   ПроцессорВывода.ЗакончитьВывод();

(19) + сорри, последней строки в (0) не увидел...

смотри в отладчике

(0) возможно, у тебя СКД - неосновной макет СКД. тогда надо так:

КомпоновщикНастроек.Инициализировать(СхемаКомпоновкиДанных.НастройкиПоУмолчанию);

(21) + вместо
Настройки = ЭтотОбъект.КомпоновщикНастроек.Настройки;

КомпоновщикНастроек.Инициализировать(СхемаКД.НастройкиПоУмолчанию); - несоответствие параметров

КомпоновщикНастроек.Инициализировать(Новый ИсточникДоступныхНастроекКомпоновкиДанных(СхемаКД));

Ура! Спасибо! :) (ушел домой)

как программно добавить ресурсы и итоги ?

ап!!

ап! (25)

ап :( (25) !!

есть вот в СП

ДоступноеПолеКомпоновкиДанных.Ресурс (DataCompositionAvailableField.Resource)
ДоступноеПолеКомпоновкиДанных (DataCompositionAvailableField)
Ресурс (Resource)
Использование:
Только чтение.
Описание:
Тип: Булево. Указывает, является ли поле ресурсом.

но здесь Ресурс - только чтение. Как добавить рессурс программно? Поле, Выражение, Рассчитывать по ... ?

это та коллекция?

ПоляИтогаСхемыКомпоновкиДанных (DataCompositionSchemaTotalFields)
ПоляИтогаСхемыКомпоновкиДанных (DataCompositionSchemaTotalFields)
Элементы коллекции:
ПолеИтогаСхемыКомпоновкиДанных
Для объекта доступен обход коллекции посредством оператора Для каждого … Из … Цикл. При обходе выбираются поля.
Возможно обращение к полю посредством оператора [...]. В качестве аргумента передается индекс (нумерация с 0), имя поля.

Методы:
Вставить (Insert)
Добавить (Add)
Индекс (IndexOf)
Количество (Count)
Найти (Find)
Очистить (Clear)
Получить (Get)
Сдвинуть (Move)
Удалить (Delete)

Описание:
Коллекция полей итога.
См. также:
СхемаКомпоновкиДанных, свойство ПоляИтога

(30) оно! очень просто оказалось :)

               полеИтога = СхемаКД.ПоляИтога.Добавить();
               полеИтога.ПутьКДанным = поле.ПутьКДанным;
               полеИтога.Выражение = "Сумма("+полеИтога.ПутьКДанным+")";

как настроить условное оформление программно? Точнее как изменить шрифт ... хочу сделать жирным

ап (32)

уря, удалось :)

       уо = Неопределено;
       Если ПоляГруппировки.Количество() <> 0 Тогда
           уо = КомпоновщикНастроек.Настройки.УсловноеОформление.Элементы.Добавить();
           уо.Использование = Истина;
           х = уо.Оформление.Элементы.Найти("Font");
           х.Значение        = Новый Шрифт(х.Значение, , , Истина);
           х.Использование    = Истина;
       КонецЕсли;
....
       Для каждого стр из ПоляГруппировки Цикл
....
           поле_уо                    = уо.Поля.Элементы.Добавить();
           поле_уо.Поле            = Новый ПолеКомпоновкиДанных(поле.ПутьКДанным);
           поле_уо.Использование    = истина;
       КонецЦикла;

снова вопрос! v8: Как изменить текст шапки структуры?

(0) Вот тут все есть: http://infostart.ru/public/20437/
Качни и в асю стукни, скажу пароль.