@@ -, +, @@ --- C4/Reserves.pm | 11 +++++++++++ 1 files changed, 11 insertions(+), 0 deletions(-) --- a/C4/Reserves.pm +++ a/C4/Reserves.pm @@ -154,6 +154,17 @@ sub AddReserve { $constraint, $bibitems, $priority, $resdate, $expdate, $notes, $title, $checkitem, $found ) = @_; + + my ($count) = C4::Context->dbh->selectrow_array( + 'SELECT COUNT(*) FROM reserves WHERE biblionumber = ? AND borrowernumber = ?', + undef, + ( $biblionumber, $borrowernumber ) + ); + if ( $count > 0 ) { + carp("AddReserve: borrower $borrowernumber already has $count holds for biblionumber $biblionumber"); + return; + } + my $fee = GetReserveFee($borrowernumber, $biblionumber, $constraint, $bibitems ); --