$sth = $dbh->prepare(qq{select  BIB_TEXT.BIB_ID, 
BIB_TEXT.TITLE_BRIEF,
BIB_MASTER.CREATE_DATE,
TO_CHAR(BIB_MASTER.CREATE_DATE, 'YYYYMMDDHHMISS'),         
MFHD_MASTER.DISPLAY_CALL_NO, 
BIB_MFHD.MFHD_ID,
TO_CHAR(ADD_MONTHS(SysDate, -3),'YYYYMMDDHHMISS'), 
LOCATION.LOCATION_DISPLAY_NAME,
MFHD_MASTER.LOCATION_ID,
BIB_TEXT.ISBN 
from    BIB_TEXT, MFHD_MASTER, BIB_MFHD, DUAL, LOCATION, BIB_MASTER
where   BIB_TEXT.BIB_ID = BIB_MFHD.BIB_ID
and     BIB_MFHD.MFHD_ID = MFHD_MASTER.MFHD_ID
and     BIB_TEXT.BIB_ID = BIB_MASTER.BIB_ID
and     BIB_MASTER.CREATE_DATE > ADD_MONTHS(SysDate, -3)
and     BIB_MASTER.SUPPRESS_IN_OPAC = 'N'
and     MFHD_MASTER.LOCATION_ID = LOCATION.LOCATION_ID
and LOCATION.LOCATION_ID in (
'9',
'22',
'25',
'70',
'95',
'105',
'110',
'112',
'114',
'119',
'120',
'125',
'127',
'130',
'135',
'139',
'151',
'158',
'159',
'160',
'161',
'162',
'163',
'164',
'165',
'170',
'173',
'174',
'176'
)
order by BIB_MASTER.CREATE_DATE desc	
});

# -- 
# --  execute the query
# --

$sth->execute();

$sth->bind_col( 1, \$bib_id );
$sth->bind_col( 2, \$_title_marc );
$sth->bind_col( 3, \$timedate );
$sth->bind_col( 4, \$callno );
$sth->bind_col( 5, \$item_id );
$sth->bind_col( 6, \$mfhd_id );
$sth->bind_col( 7, \$trash );
$sth->bind_col( 8, \$moretrash );
$sth->bind_col( 9, \$requestor );
$sth->bind_col( 10, \$location );
$sth->bind_col( 11, \$loca_id );
$sth->bind_col( 12, \$isbn );