Имя: Пароль:
1C
1С v8
v8: помогите с отчетом СКД
0 sky_ol
 
25.07.14
12:06
В СКД в параметрах есть "ДатаОтчета" типа Дата
После добавления в Модуль следующего кода, параметр перестал работать. Дата отрабатывается только есть залезть в Отбов в настройки. Где ошибка?:

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

    
    Картинка = БиблиотекаКартинок.Логотип;
    ОбластьЛоготипа = ДокументРезультат.Область(5, 1, 8,  2);
    Изображение = ДокументРезультат.Рисунки.Добавить(ТипРисункаТабличногоДокумента.Картинка);
    Изображение.РазмерКартинки = РазмерКартинки.РеальныйРазмер;
    Индекс = ДокументРезультат.Рисунки.Индекс(Изображение);
    ДокументРезультат.Рисунки[Индекс].Картинка = Картинка;
    ДокументРезультат.Рисунки[Индекс].Расположить(ОбластьЛоготипа);
    ДокументРезультат.Рисунки[Индекс].ЦветЛинии = WebЦвета.Белый;
    
КонецПроцедуры
1 sky_ol
 
25.07.14
12:30
есть у кого какие мысли?
2 sky_ol
 
25.07.14
14:57
up
3 le_
 
25.07.14
15:07
(0) И где в этом коде параметры устанавливаются?
Пользователь не знает, чего он хочет, пока не увидит то, что он получил. Эдвард Йодан