XTR Positions - Outstanding Receivables / Payables

select d.company_code hp_company,
       hr.hedge_attribute_id hp_hedge_number,
       hr.primary_code hp_deal_no,
       trunc(d.value_date)-trunc(sysdate) hp_days_remaining,
       DECODE(hedge_currency
              ,currency_sell,currency_buy
                            ,currency_sell) hp_offset_currency,
       hr.cur_reference_amt hp_amount,
	&hp_amount_dsp hp_amount_dsp
from   xtr_hedge_relationships hr,
       xtr_hedge_attributes ha,
       xtr_deals_v d
where  d.deal_no = hr.primary_code
AND    d.company_code = nvl(:P_COMPANY_CODE,d.company_code)
AND    ha.hedge_currency = :P_CURRENCY
and    ha.hedge_attribute_id = hr.hedge_attribute_id
and    ha.hedge_status = 'CURRENT'
AND    d.value_date > sysdate
AND    trunc(d.value_date)-trunc(sysdate) > 0
AND   ha.hedge_attribute_id NOT IN (select hedge_attribute_id from xtr_hedge_relationships
                  where instrument_item_flag = 'U' group by hedge_attribute_id
                  having sum(cur_reference_amt) = 0)
order by 1,4,2