BEGIN;
BEGIN
EXPLAIN
select
	cntrycode,
	count(*) as numcust,
	sum(c_acctbal) as totacctbal
from
	(
		select
			substr(c_phone, 1, 2) as cntrycode,
			c_acctbal
		from
			customer
		where
			substr(c_phone, 1, 2) in
				('21', '18', '13', '25', '11', '17', '31')
			and c_acctbal > (
				select
					avg(c_acctbal)
				from
					customer
				where
					c_acctbal > 0.00
					and substr(c_phone, 1, 2) in
						('21', '18', '13', '25', '11', '17', '31')
			)
			and not exists (
				select
					*
				from
					orders
				where
					o_custkey = c_custkey
			)
	) as vip
group by
	cntrycode
order by
	cntrycode;
                                                                   QUERY PLAN                                                                   
------------------------------------------------------------------------------------------------------------------------------------------------
 Sort  (cost=691162.45..691162.46 rows=3 width=20)
   Sort Key: (substr((public.customer.c_phone)::text, 1, 2))
   InitPlan 1 (returns $0)
     ->  Aggregate  (cost=52886.87..52886.88 rows=1 width=4)
           ->  Bitmap Heap Scan on customer  (cost=6642.16..51933.24 rows=381451 width=4)
                 Recheck Cond: ((substr((c_phone)::text, 1, 2) = ANY ('{21,18,13,25,11,17,31}'::text[])) AND (c_acctbal > 0::double precision))
                 ->  Bitmap Index Scan on customer_c_phone_idx_c_acctbal  (cost=0.00..6546.79 rows=381451 width=0)
                       Index Cond: (substr((c_phone)::text, 1, 2) = ANY ('{21,18,13,25,11,17,31}'::text[]))
   ->  HashAggregate  (cost=638275.50..638275.55 rows=3 width=20)
         ->  Hash Anti Join  (cost=594265.91..637833.38 rows=58949 width=20)
               Hash Cond: (public.customer.c_custkey = orders.o_custkey)
               ->  Bitmap Heap Scan on customer  (cost=2906.77..41854.26 rows=139790 width=24)
                     Recheck Cond: ((substr((c_phone)::text, 1, 2) = ANY ('{21,18,13,25,11,17,31}'::text[])) AND (c_acctbal > $0))
                     ->  Bitmap Index Scan on customer_c_phone_idx  (cost=0.00..2871.83 rows=139790 width=0)
                           Index Cond: ((substr((c_phone)::text, 1, 2) = ANY ('{21,18,13,25,11,17,31}'::text[])) AND (c_acctbal > $0))
               ->  Hash  (cost=403671.84..403671.84 rows=15014984 width=4)
                     ->  Seq Scan on orders  (cost=0.00..403671.84 rows=15014984 width=4)
(17 rows)

COMMIT;
COMMIT