Площади земель сельхоз назначений

select
O.CAD_NUM||O.OBJ_NUM "КадУслНо"
,O.PREV_CAD_NUM "ПредКадНо"
,O.ADR_PRN_DESC "Адрес"
,(case
    when o.TSQ_UNITS=10 then O.TOTAL_SQ
    when o.TSQ_UNITS=20 then O.TOTAL_SQ*10000
  end) "Площадь"
,R.PART "Часть"
,R.REG_NO "РегНо"
,R.S_DATE "ДатаРег"
,R.E_DATE "ДатаПрек"
,decode(r.TYPE_CODE,r.TYPE_CODE,(select RV.NAME from rt_rights_voc rv where rv.code=r.type_code)) "ТипПрава"
,RT.DOC_DESC(r.ID) "Докум"

from 
re_objects o
,rt_rights r
where
o.r_type=1
and (
     select count(RPS.ID) 
     from re_purposes rps 
     where RPS.RE_ID=o.id
     and RPS.TYPE_CODE like '11____'
    )>0
and R.RE_ID=o.id
and R.R_GROUP='П'

order by O.CAD_NUM,R.REG_NO