Bug 21183: Remove GetItemnumberFromBarcode
Test plan: git grep GetItemnumberFromBarcode should not return anything Signed-off-by: Josef Moravec <josef.moravec@gmail.com> Signed-off-by: Katrin Fischer <katrin.fischer.83@web.de> Signed-off-by: Nick Clemens <nick@bywatersolutions.com>
This commit is contained in:
parent
ac93446a89
commit
f52ba648e2
18
C4/Items.pm
18
C4/Items.pm
|
|
@ -75,7 +75,6 @@ BEGIN {
|
|||
GetHostItemsInfo
|
||||
GetItemnumbersForBiblio
|
||||
get_hostitemnumbers_of
|
||||
GetItemnumberFromBarcode
|
||||
GetBarcodeFromItemnumber
|
||||
GetHiddenItemnumbers
|
||||
ItemSafeToDelete
|
||||
|
|
@ -1367,23 +1366,6 @@ sub get_hostitemnumbers_of {
|
|||
}
|
||||
|
||||
|
||||
=head2 GetItemnumberFromBarcode
|
||||
|
||||
$result = GetItemnumberFromBarcode($barcode);
|
||||
|
||||
=cut
|
||||
|
||||
sub GetItemnumberFromBarcode {
|
||||
my ($barcode) = @_;
|
||||
my $dbh = C4::Context->dbh;
|
||||
|
||||
my $rq =
|
||||
$dbh->prepare("SELECT itemnumber FROM items WHERE items.barcode=?");
|
||||
$rq->execute($barcode);
|
||||
my ($result) = $rq->fetchrow;
|
||||
return ($result);
|
||||
}
|
||||
|
||||
=head2 GetBarcodeFromItemnumber
|
||||
|
||||
$result = GetBarcodeFromItemnumber($itemnumber);
|
||||
|
|
|
|||
Loading…
Reference in New Issue