View | Details | Raw Unified | Return to bug 17738
Collapse All | Expand All

(-)a/C4/Reserves.pm (-36 lines)
Lines 104-110 BEGIN { Link Here
104
        &AddReserve
104
        &AddReserve
105
105
106
        &GetReserve
106
        &GetReserve
107
        &GetReservesFromBorrowernumber
108
        &GetReservesForBranch
107
        &GetReservesForBranch
109
        &GetReservesToBranch
108
        &GetReservesToBranch
110
        &GetReserveCount
109
        &GetReserveCount
Lines 279-318 sub GetReserve { Link Here
279
    return $sth->fetchrow_hashref();
278
    return $sth->fetchrow_hashref();
280
}
279
}
281
280
282
=head2 GetReservesFromBorrowernumber
283
284
    $borrowerreserv = GetReservesFromBorrowernumber($borrowernumber,$tatus);
285
286
TODO :: Descritpion
287
288
=cut
289
290
sub GetReservesFromBorrowernumber {
291
    my ( $borrowernumber, $status ) = @_;
292
    my $dbh   = C4::Context->dbh;
293
    my $sth;
294
    if ($status) {
295
        $sth = $dbh->prepare("
296
            SELECT *
297
            FROM   reserves
298
            WHERE  borrowernumber=?
299
                AND found =?
300
            ORDER BY reservedate
301
        ");
302
        $sth->execute($borrowernumber,$status);
303
    } else {
304
        $sth = $dbh->prepare("
305
            SELECT *
306
            FROM   reserves
307
            WHERE  borrowernumber=?
308
            ORDER BY reservedate
309
        ");
310
        $sth->execute($borrowernumber);
311
    }
312
    my $data = $sth->fetchall_arrayref({});
313
    return @$data;
314
}
315
316
=head2 CanBookBeReserved
281
=head2 CanBookBeReserved
317
282
318
  $canReserve = &CanBookBeReserved($borrowernumber, $biblionumber)
283
  $canReserve = &CanBookBeReserved($borrowernumber, $biblionumber)
319
- 

Return to bug 17738