text: -- $ID$
  -- TPC-H/TPC-R Forecasting Revenue Change Query (Q6)
  -- Functional Query Definition
  -- Approved February 1998
  :x
  :o
  select
  	sum(l_extendedprice * l_discount) as revenue
  from
  	lineitem
  where
  	l_shipdate >= date '1993-01-01'
  	and l_shipdate < date '1993-01-01' + interval '1' year
  	and l_discount between 0.04 - 0.01 and 0.04 + 0.01
  	and l_quantity < 25;
  :n -1
  