text: -- using 1544199266 as a seed to the RNG
  -- $ID$
  -- TPC-H/TPC-R Global Sales Opportunity Query (Q22)
  -- Functional Query Definition
  -- Approved February 1998
  :x
  :o
  select
  	cntrycode,
  	count(*) as numcust,
  	sum(c_acctbal) as totacctbal
  from
  	(
  		select
  			substring(c_phone from 1 for 2) as cntrycode,
  			c_acctbal
  		from
  			customer
  		where
  			substring(c_phone from 1 for 2) in
  				(':1', ':2', ':3', ':4', ':5', ':6', ':7')
  			and c_acctbal > (
  				select
  					avg(c_acctbal)
  				from
  					customer
  				where
  					c_acctbal > 0.00
  					and substring(c_phone from 1 for 2) in
  						(':1', ':2', ':3', ':4', ':5', ':6', ':7')
  			)
  			and not exists (
  				select
  					*
  				from
  					orders
  				where
  					o_custkey = c_custkey
  			)
  	) as custsale
  group by
  	cntrycode
  order by
  	cntrycode
  :n -1
  
  
  -- QUERY1
  
  BEGIN;
  \o .sql.out
  \timing on
  select
  	l_returnflag,
  	l_linestatus,
  	sum(l_quantity) as sum_qty,
  	sum(l_extendedprice) as sum_base_price,
  	sum(l_extendedprice * (1 - l_discount)) as sum_disc_price,
  	sum(l_extendedprice * (1 - l_discount) * (1 + l_tax)) as sum_charge,
  	avg(l_quantity) as avg_qty,
  	avg(l_extendedprice) as avg_price,
  	avg(l_discount) as avg_disc,
  	count(*) as count_order
  from
  	lineitem
  where
  	l_shipdate <= date '1998-12-01' - interval '115' day (3)
  group by
  	l_returnflag,
  	l_linestatus
  order by
  	l_returnflag,
  	l_linestatus
  ;
  COMMIT;
  
  
  -- QUERY2