From fba915e911a3b50ff9a0ea96d25a464836471073 Mon Sep 17 00:00:00 2001 From: Jonathan Druart Date: Wed, 2 Aug 2017 12:00:00 -0300 Subject: [PATCH] Bug 19057: Remove C4::Reserves::GetReserve MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit Signed-off-by: Marc Véron Signed-off-by: Kyle M Hall Signed-off-by: Jonathan Druart --- C4/Reserves.pm | 20 -------------------- 1 file changed, 20 deletions(-) diff --git a/C4/Reserves.pm b/C4/Reserves.pm index e1b322718c..575e4863bc 100644 --- a/C4/Reserves.pm +++ b/C4/Reserves.pm @@ -104,7 +104,6 @@ BEGIN { @EXPORT = qw( &AddReserve - &GetReserve &GetReservesForBranch &GetReserveStatus @@ -257,25 +256,6 @@ sub AddReserve { return $reserve_id; } -=head2 GetReserve - - $res = GetReserve( $reserve_id ); - - Return the current reserve. - -=cut - -sub GetReserve { - my ($reserve_id) = @_; - - my $dbh = C4::Context->dbh; - - my $query = "SELECT * FROM reserves WHERE reserve_id = ?"; - my $sth = $dbh->prepare( $query ); - $sth->execute( $reserve_id ); - return $sth->fetchrow_hashref(); -} - =head2 CanBookBeReserved $canReserve = &CanBookBeReserved($borrowernumber, $biblionumber) -- 2.39.5