5
Oz11
21.01.13
✎
12:41
|
программно создаю и работаю. но не получается подставить ему свой макет.
Построитель = Новый ПостроительОтчета;
СтруктураОтбора = Новый Структура;
СтруктураОтбора.Вставить("ИмяПечатнойФормы", Отчет.ТипПечатнойФормы);
МассивСтрокТаблициРегистра = ТаблицаРегистра.НайтиСтроки(СтруктураОтбора);
Если МассивСтрокТаблициРегистра.Количество() = 0 Тогда
АТА_ОбщегоНазначенияКлиентСервер.СообщитьПользователю("Непредвиденная ошибка. Перезапустите отчет.");
Возврат;
КонецЕсли;
ИмяДокумента = МассивСтрокТаблициРегистра[0].ИмяДокумента;
ИмяРеквизита = МассивСтрокТаблициРегистра[0].РеквизитДокумента;
ТекстЗапроса = СтрЗаменить(ТекстЗапроса, "[НазваниеДокумента]", ИмяДокумента);
ТекстЗапроса = СтрЗаменить(ТекстЗапроса, "[НазваниеРеквизита]", ИмяРеквизита);
Построитель.Текст = ТекстЗапроса;
Построитель.Параметры.Вставить("НачалоПериода", ?(ЗначениеЗаполнено(СтандартныйПериод.ДатаНачала), СтандартныйПериод.ДатаНачала, Дата("00010101000001")));
Построитель.Параметры.Вставить("КонецПериода", ?(ЗначениеЗаполнено(СтандартныйПериод.ДатаОкончания), СтандартныйПериод.ДатаОкончания, Дата("39990101000000")));
Построитель.ЗаполнитьНастройки();
Построитель.Макет = Отчеты.АТА_ВозвращенныеДокументы.ПолучитьМакет("Результат");
Построитель.ОформитьМакет();
Построитель.Выполнить();
Построитель.Вывести(ТабличныйДокумент);
|
|