8.х Макет на СКД. Определить сколько строк.

Тема в разделе "Конфигурирование на платформе "1С:Предприятие 8"", создана пользователем AlenkaInt, 8 май 2014.

  1. TopicStarter Overlay
    AlenkaInt
    Offline

    AlenkaInt Опытный в 1С

    Регистрация:
    26 фев 2012
    Сообщения:
    1.008
    Симпатии:
    4
    Баллы:
    29
    Здравствуйте. Есть обработка, макет формируется на СКД. Такая задача, если в макете есть хотя бы одна строка, то надо его сохранять, если пустой, то нет. Как это можно сделать? Я подумала, что может как то выяснить сколько там строк? Или есть еще вариант?
  2. alexburn
    Online

    alexburn Модераторы Команда форума Модератор

    Регистрация:
    5 янв 2009
    Сообщения:
    14.742
    Симпатии:
    509
    Баллы:
    204
    Программно. Если пустой результат запроса - не сохранять.
  3. TopicStarter Overlay
    AlenkaInt
    Offline

    AlenkaInt Опытный в 1С

    Регистрация:
    26 фев 2012
    Сообщения:
    1.008
    Симпатии:
    4
    Баллы:
    29
    У меня запрос в СКД формируется, как к нему обратиться? Вот как он выводится.
    Код:
    ТабДокумент = Новый ТабличныйДокумент; 
        СхемаКомпоновкиДанных = ЭтотОбъект.ПолучитьМакет("Макет");
        Настройки = СхемаКомпоновкиДанных.НастройкиПоУмолчанию;
        ДатаНач = Настройки.ПараметрыДанных.НайтиЗначениеПараметра(Новый ПараметрКомпоновкиДанных("НачалоПериода"));
        ДатаНач.Использование = Истина;
        ДатаНач.Значение = НачалоМесяца(ТекущаяДата());    
        ДатаКон = настройки.ПараметрыДанных.НайтиЗначениеПараметра(Новый ПараметрКомпоновкиДанных("КонецПериода"));
        ДатаКон.Использование = Истина;
        ДатаКон.Значение = КонецМесяца(ТекущаяДата());
        КомпоновщикМакета = Новый КомпоновщикМакетаКомпоновкиДанных;
        ДанныеРасшифровки = Новый ДанныеРасшифровкиКомпоновкиДанных;
        МакетКомпоновки = КомпоновщикМакета.Выполнить(СхемаКомпоновкиДанных, Настройки, ДанныеРасшифровки); 
        ПроцессорКомпоновкиДанных = Новый ПроцессорКомпоновкиДанных;
        ПроцессорКомпоновкиДанных.Инициализировать(МакетКомпоновки,, ДанныеРасшифровки); 
        ПроцессорВывода = Новый ПроцессорВыводаРезультатаКомпоновкиДанныхВТабличныйДокумент;
        ПроцессорВывода.УстановитьДокумент(ТабДокумент); 
        ПроцессорВывода.Вывести(ПроцессорКомпоновкиДанных);
        Возврат ТабДокумент;
    
    

Поделиться этой страницей