Кросс-таблица через pivot-таблицу

Материал из DRKB

Кросс-таблица через pivot-таблицу[править | править код]

Мне нужна помощь по реализации запроса кросс-таблицы в Delphi. У кого-нибудь имеется соответствующий опыт?

Использовать pivot-таблицу должен все тот-же общий механизм (относительно к любой базе данных SQL).

Предположим, что у нас есть данные продаж в таблице с полями Store, Product, Month, Sales, и вам необходимо отображать данные по продуктам за каждый месяц. (Примем, что поле 'month' для простоты имеет значения 1..12.)

Оригинальные данные примера:

Store         Product    Month   Sales
  #1            Toys       1      100
  #2            Toys       1       68
  #1            Toys       2      150
  #1            Books      1       75
 ...


Желаемый отчет должен выглядеть похожим на этот:

Product         January      February    March  .....
  Toys             168          150
  Books             75         .....


Установите pivot-таблицу с именем tblPivot и 12 строками:

pvtMonth   pvtJan  pvtFeb   pvtMar  pvtApr   ....
    1        1       0        0       0      ....
    2        0       1        0       0
    3        0       0        1       0
    4        0       0        0       1
  .....


Теперь запрос, выполненный в виде:

SELECT Product, January=SUM(Sales*pvtJan),
                February=SUM(Sales*pvtFeb),
                March=SUM(Sales*pvtMar),
                April=SUM(Sales*pvtApr), ...
WHERE Month = pvtMonth
GROUP BY Product


даст вам информацию, опубликованную выше.

Поскольку pivot-таблица имеет только 12 строк, большинство SQL-движков сохранят результат в кэшовой памяти, так что скорость выполнения запроса весьма велика.


Source: Взято с http://delphiworld.narod.ru
ID: 02603