Lines 2565-2571
sub AddRenewal {
Link Here
|
2565 |
|
2565 |
|
2566 |
# Update the renewal count on the item, and tell zebra to reindex |
2566 |
# Update the renewal count on the item, and tell zebra to reindex |
2567 |
$renews = $biblio->{'renewals'} + 1; |
2567 |
$renews = $biblio->{'renewals'} + 1; |
2568 |
ModItem({ renewals => $renews, onloan => $datedue->strftime('%Y-%m-%d %H:%M')}, $biblio->{'biblionumber'}, $itemnumber); |
2568 |
ModItem( |
|
|
2569 |
{ |
2570 |
renewals => $renews, |
2571 |
onloan => $datedue->strftime('%Y-%m-%d %H:%M'), |
2572 |
itemlost => 0, |
2573 |
}, |
2574 |
$biblio->{'biblionumber'}, |
2575 |
$itemnumber |
2576 |
); |
2569 |
|
2577 |
|
2570 |
# Charge a new rental fee, if applicable? |
2578 |
# Charge a new rental fee, if applicable? |
2571 |
my ( $charge, $type ) = GetIssuingCharges( $itemnumber, $borrowernumber ); |
2579 |
my ( $charge, $type ) = GetIssuingCharges( $itemnumber, $borrowernumber ); |
2572 |
- |
|
|