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>
This commit is contained in:
Jonathan Druart 2018-08-06 16:40:59 -03:00 committed by Nick Clemens
parent 02633edc7d
commit 604cc208b5

View file

@ -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);