From f92b7ed120a39d48ab5a1e0b4d753d16ccc706c8 Mon Sep 17 00:00:00 2001 From: Jonathan Druart Date: Mon, 6 Aug 2018 16:40:59 -0300 Subject: [PATCH] Bug 21201: Remove GetItemnumbersForBiblio Content-Type: text/plain; charset=utf-8 Signed-off-by: Josef Moravec Signed-off-by: Marcel de Rooy --- C4/Items.pm | 21 --------------------- 1 file changed, 21 deletions(-) diff --git a/C4/Items.pm b/C4/Items.pm index df33f59..360378b 100644 --- a/C4/Items.pm +++ b/C4/Items.pm @@ -73,7 +73,6 @@ BEGIN { GetItemsInfo GetItemsLocationInfo GetHostItemsInfo - GetItemnumbersForBiblio get_hostitemnumbers_of GetHiddenItemnumbers ItemSafeToDelete @@ -1290,26 +1289,6 @@ sub GetLastAcquisitions { return @results; } -=head2 GetItemnumbersForBiblio - - my $itemnumbers = GetItemnumbersForBiblio($biblionumber); - -Given a single biblionumber, return an arrayref of all the corresponding itemnumbers - -=cut - -sub GetItemnumbersForBiblio { - my $biblionumber = shift; - my @items; - my $dbh = C4::Context->dbh; - my $sth = $dbh->prepare("SELECT itemnumber FROM items WHERE biblionumber = ?"); - $sth->execute($biblionumber); - while (my $result = $sth->fetchrow_hashref) { - push @items, $result->{'itemnumber'}; - } - return \@items; -} - =head2 get_hostitemnumbers_of my @itemnumbers_of = get_hostitemnumbers_of($biblionumber); -- 2.1.4