my ( $item, $barcode ) = @_;
my $dbh=C4::Context->dbh;
my $error;
$item->{permanent_location} //= $item->{location};
my $query =
"INSERT INTO items SET
biblionumber = ?,
-