Разработка в 1С 8.0



         

Код:


Запрос = Новый Запрос("

| ВЫБРАТЬ

|   ПродажиОбороты.Контрагент КАК Контрагент,

|   ПродажиОбороты.Номенклатура КАК Номенклатура,

|   ПродажиОбороты.КоличествоОборот КАК КоличествоОборот,

|   ПродажиОбороты.СуммаОборот КАК СуммаОборот

| ИЗ

|   РегистрНакопления.Продажи.Обороты(&ПериодС,&ПериодПо,

|               Месяц,,(Контрагент, Номенклатура)) КАК ПродажиОбороты


| ИТОГИ СУММА(КоличествоОборот) , СУММА(СуммаОборот) ПО

|   Контрагент ИЕРАРХИЯ,

|   Номенклатура ИЕРАРХИЯ,

|   ПродажиОбороты.Период,

|   ПродажиОбороты.Номенклатура.СтранаПроисхождения КАК Страна 

| АВТОУПОРЯДОЧИВАНИЕ") ;

Запрос.УстановитьПараметр("ПериодС", ПериодC);

Запрос.УстановитьПараметр("ПериодПо", КонецДня(ПериодПо));

 

Результат = Запрос.Выполнить();

ПолеТабДок = ЭлементыФормы.ПолеТабличногоДокумента;

СводнаяТаблица = ПолеТабДок.ВстроенныеТаблицы.СводнаяТаблица1;

СводнаяТаблица.ИсточникДанных = Результат;

СводнаяТаблица.ОтображатьПоля = Истина;

Если СводнаяТаблица.Колонки.Количество() = 0 И

СводнаяТаблица.Строки.Количество() = 0 И  

СводнаяТаблица.Данные.Количество() = 0 Тогда  

 

СводнаяТаблица.Обновление = Ложь;  

// Зададим начальное расположение измерений на осях   

СводнаяТаблица.Колонки.Добавить("Контрагент");  

СводнаяТаблица.Строки.Добавить("Номенклатура");  

СводнаяТаблица.Данные.Добавить("КоличествоОборот");  

СводнаяТаблица.Данные.Добавить("СуммаОборот");  

<


Содержание    Вперед