From 604cc208b5cbb82020d874b0faa861b2cf6e3329 Mon Sep 17 00:00:00 2001
From: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
Date: Mon, 6 Aug 2018 16:40:59 -0300
Subject: [PATCH] Bug 21201: Remove GetItemnumbersForBiblio

Signed-off-by: Josef Moravec <josef.moravec@gmail.com>

Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>

Signed-off-by: Nick Clemens <nick@bywatersolutions.com>
---
 C4/Items.pm | 21 ---------------------
 1 file changed, 21 deletions(-)

diff --git a/C4/Items.pm b/C4/Items.pm
index fa9c9ace57..3f683750d9 100644
--- a/C4/Items.pm
+++ b/C4/Items.pm
@@ -72,7 +72,6 @@ BEGIN {
         GetItemsInfo
 	GetItemsLocationInfo
 	GetHostItemsInfo
-        GetItemnumbersForBiblio
 	get_hostitemnumbers_of
         GetHiddenItemnumbers
         ItemSafeToDelete
@@ -1238,26 +1237,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.39.5