my ($itemnumber,$categorycode)=@_;
my $dbh = C4::Context->dbh();
my $query=qq|SELECT *
- FROM items
- LEFT JOIN biblioitems ON items.biblioitemnumber=biblioitems.biblioitemnumber
- LEFT JOIN itemtypes ON biblioitems.itemtype=itemtypes.itemtype
- LEFT JOIN issuingrules ON issuingrules.itemtype=itemtypes.itemtype
+ FROM items,biblioitems,itemtypes,issuingrules
WHERE items.itemnumber=?
+ AND items.biblioitemnumber=biblioitems.biblioitemnumber
+ AND biblioitems.itemtype=itemtypes.itemtype
+ AND issuingrules.itemtype=itemtypes.itemtype
AND issuingrules.categorycode=?
AND (items.itemlost <> 1
OR items.itemlost is NULL)|;