my $dbh = C4::Context->dbh;
+ warn "inventura barcode: $barcode ",dump($barcode);
+
my $sql = qq{
select
itemnumber,
from items
join biblio on items.biblionumber = biblio.biblionumber
join biblioitems on items.biblionumber = biblioitems.biblionumber
- where barcode = ?
+ where barcode = ? + 0
};
#warn "# sql $sql\n";