From b507e6a9f03bc8e0ef9b72680fdcdb11b5af557b Mon Sep 17 00:00:00 2001 From: Jonathan Druart Date: Wed, 7 Dec 2016 14:43:43 +0100 Subject: [PATCH] Bug 17738: Remove C4::Reserves::GetReservesFromBorrowernumber At this point, there should not be any occurrences of GetReservesFromBorrowernumber anymore. --- C4/Reserves.pm | 35 ----------------------------------- 1 file changed, 35 deletions(-) diff --git a/C4/Reserves.pm b/C4/Reserves.pm index 5680a17..e553a3f 100644 --- a/C4/Reserves.pm +++ b/C4/Reserves.pm @@ -104,7 +104,6 @@ BEGIN { &AddReserve &GetReserve - &GetReservesFromBorrowernumber &GetReservesForBranch &GetReservesToBranch &GetReserveCount @@ -274,40 +273,6 @@ sub GetReserve { return $sth->fetchrow_hashref(); } -=head2 GetReservesFromBorrowernumber - - $borrowerreserv = GetReservesFromBorrowernumber($borrowernumber,$tatus); - -TODO :: Descritpion - -=cut - -sub GetReservesFromBorrowernumber { - my ( $borrowernumber, $status ) = @_; - my $dbh = C4::Context->dbh; - my $sth; - if ($status) { - $sth = $dbh->prepare(" - SELECT * - FROM reserves - WHERE borrowernumber=? - AND found =? - ORDER BY reservedate - "); - $sth->execute($borrowernumber,$status); - } else { - $sth = $dbh->prepare(" - SELECT * - FROM reserves - WHERE borrowernumber=? - ORDER BY reservedate - "); - $sth->execute($borrowernumber); - } - my $data = $sth->fetchall_arrayref({}); - return @$data; -} - =head2 CanBookBeReserved $canReserve = &CanBookBeReserved($borrowernumber, $biblionumber) -- 2.1.4