DEFINE SCRIPT  QTRECL_S_P_ DESC="[ADM] Report reclamation candidates(status,stgpool,*)"
UPDATE SCRIPT  QTRECL_S_P_ "/* tape reclamation candidates ... */"
UPDATE SCRIPT  QTRECL_S_P_ "select -"
UPDATE SCRIPT  QTRECL_S_P_ " cast(volume_name as varchar(8)) ""Volume"",-"
UPDATE SCRIPT  QTRECL_S_P_ " cast(stgpool_name as varchar(16)) ""Pool"",-"
UPDATE SCRIPT  QTRECL_S_P_ " cast(substr(status,1,8) as varchar(8)) ""Status"",-"
UPDATE SCRIPT  QTRECL_S_P_ " date(last_write_date) ""Last written"",-"
UPDATE SCRIPT  QTRECL_S_P_ " cast(((pct_utilized*est_capacity_mb)/100) as decimal(10)) ""MB used"",-"
UPDATE SCRIPT  QTRECL_S_P_ " pct_reclaim -"
UPDATE SCRIPT  QTRECL_S_P_ "from volumes -"
UPDATE SCRIPT  QTRECL_S_P_ "where -"
UPDATE SCRIPT  QTRECL_S_P_ " (status like upper('$1')) -"
UPDATE SCRIPT  QTRECL_S_P_ " and (stgpool_name like upper('$2')) $3 -"
UPDATE SCRIPT  QTRECL_S_P_ " and pct_reclaim is not null -"
UPDATE SCRIPT  QTRECL_S_P_ "order by pct_reclaim desc"