Помощь - Поиск - Пользователи - Календарь
Полная версия этой страницы: Сортировка в печатной форме
Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7 > Программисту > Программирование в 1С Предприятие 7.7
bereznoy
Отчет формируется как надо, НО некоторые колонки не входят в "Группировка", собственно по ним и на
Процедура Сформировать()
    Перем Запрос, ТекстЗапроса, Таб;
    ТД=ТекущаяДата();


ЦенаРозничная = 0;    
Прибыль = 0;
Эффективность = 0;
    стр=0;
    
    Пер1 = 0;
    Пер2 = 0;
    СуммаТовара = 0;
  
    ВыбФирма=ПолучитьПустоеЗначение("Справочник.Фирмы");
    
    Запрос = СоздатьОбъект("Запрос");
    ТекстЗапроса =
    "//{{ЗАПРОС(Сформировать)
    |Обрабатывать НеПомеченныеНаУдаление;
    |Номенклатура = Регистр.ОстаткиТоваров.Товар.ТекущийЭлемент;
    |Склад = Регистр.ОстаткиТоваров.Склад.ТекущийЭлемент;
    |ОстатокТовара = Регистр.ОстаткиТоваров.ОстатокТовара;
    |Фирма = Регистр.ОстаткиТоваров.Фирма.ТекущийЭлемент;
    |Группировка Номенклатура упорядочить по Номенклатура.ПолнНаименование,Номенклатура.Артикул,Номенклатура.Наименование,Ном
енклатура.ЦенаПрих,Номенклатура.кРоз,Номенклатура.ЦенаРозница,Номенклатура.кОпт,Н
оменклатура.ЦенаОпт,Номенклатура.кКрОпт,Номенклатура.ЦенаКрупныйОпт ,Номенклатура.Артикул без групп все ВошедшиеВЗапрос;    
    |Функция ОстатокТовараКонОст = КонОст(ОстатокТовара);
    |Функция ЦенаПрихода = Сумма(Номенклатура.ЦенаПрих);

    |Условие(Номенклатура в ВыбТовар);
    |Условие(Фирма=ВыбФирма);

    |";//}}ЗАПРОС
    
    



    Наимен=ВыбТовар.ПолучитьЗначение(1);

Наимен = "Группа товаров: " + ВыбТовар.ПолучитьЗначение(1);
    
Если ВыбТовар.РазмерСписка()>1 Тогда
         Наимен = "Группа товаров: " + ВыбТовар.ПолучитьЗначение(1) + ", " +  ВыбТовар.ПолучитьЗначение(2);
КонецЕсли;
    
Если ВыбТовар.РазмерСписка()>2 Тогда
         Наимен = "Группа товаров: " + ВыбТовар.ПолучитьЗначение(1) + ", " +  ВыбТовар.ПолучитьЗначение(2) + ", " +  ВыбТовар.ПолучитьЗначение(3);
КонецЕсли;

Если ВыбТовар.РазмерСписка()>3 Тогда
         Наимен = "Группа товаров: " + ВыбТовар.ПолучитьЗначение(1) + ", " +  ВыбТовар.ПолучитьЗначение(2) + ", " +  ВыбТовар.ПолучитьЗначение(3) + ", " +  ВыбТовар.ПолучитьЗначение(4);
КонецЕсли;  

Если ВыбТовар.РазмерСписка()>4 Тогда
         Наимен = "Группа товаров: " + ВыбТовар.ПолучитьЗначение(1) + ", " +  ВыбТовар.ПолучитьЗначение(2) + ", " +  ВыбТовар.ПолучитьЗначение(3) + ", " +  ВыбТовар.ПолучитьЗначение(4) + ", " +  ВыбТовар.ПолучитьЗначение(5);
КонецЕсли;
    

    Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
        Возврат;
    КонецЕсли;

    // Подготовка к заполнению выходных форм данными запроса
    Таб = СоздатьОбъект("Таблица");
    Таб.ИсходнаяТаблица("Сформировать");
    // Заполнение полей "Заголовок"
    Таб.ВывестиСекцию("Заголовок");
    Состояние("Заполнение выходной таблицы...");
    Таб.Опции(0, 0, Таб.ВысотаТаблицы(), 0);
Итог0=0;

    Пока Запрос.Группировка(1) = 1 Цикл
        
        // Заполнение полей РасходнаяРеализатора
    стр=стр+1;    
    
//Вопрос касается этих значений
        Пер1 = Запрос.ЗначениеУпорядочивания(1,4);
    Пер2 = Запрос.ОстатокТовараКонОст;
    СуммаТовара = Пер1*Пер2;  
        ЦенаРозничная = Запрос.ЗначениеУпорядочивания(1,6);
    Прибыль =ЦенаРозничная-Пер1;
    МинОстаток = Запрос.Номенклатура.МинимальныйОстаток;
/////////////////////////////////////////////////////////////////////////////////////    
    

Итог0 = Итог0+Пер1*Пер2;

        Таб.ВывестиСекцию("РасходнаяРеализатора");
    КонецЦикла;
// Заполнение полей "Итого"
    Таб.ВывестиСекцию("Итого");
// Вывод заполненной формы
    Таб.ТолькоПросмотр(1);
    
Таб.Показать("Сформировать", "");  
    
                
КонецПроцедуры


Каким способом можно сделать сортировку по выбранным колонкам?
MATEVI
Ничего не понял...
Какие колонки куда не входят.
bereznoy
Цитата(MATEVI @ 28.08.12, 21:08) необходимо зарегистрироваться для просмотра ссылки
Ничего не понял...
Какие колонки куда не входят.


Я тегами // указал в коде, т.е. эти переменный не из запроса группировки а как переменная, так вот как по ним сделать группировку?
MATEVI
Смотреть надо сюда
 |Группировка ... упорядочить по

Или выгружать в таблицу значений и сортировать как надо
Для просмотра полной версии этой страницы, пожалуйста, пройдите по ссылке.