|
Lines 1200-1215
sub ModReserveAffect {
Link Here
|
| 1200 |
} else { |
1200 |
} else { |
| 1201 |
$hold->set_waiting($desk_id); |
1201 |
$hold->set_waiting($desk_id); |
| 1202 |
_koha_notify_reserve( $hold->reserve_id ) unless $already_on_shelf; |
1202 |
_koha_notify_reserve( $hold->reserve_id ) unless $already_on_shelf; |
| 1203 |
my $transfers = Koha::Item::Transfers->search({ |
1203 |
# Complete transfer if one exists |
| 1204 |
itemnumber => $itemnumber, |
1204 |
my $transfer = $hold->item->get_transfer; |
| 1205 |
datearrived => undef |
1205 |
$transfer->receive if $transfer; |
| 1206 |
}); |
|
|
| 1207 |
while( my $transfer = $transfers->next ){ |
| 1208 |
$transfer->datearrived( dt_from_string() )->store; |
| 1209 |
}; |
| 1210 |
} |
1206 |
} |
| 1211 |
|
1207 |
|
| 1212 |
|
|
|
| 1213 |
_FixPriority( { biblionumber => $biblionumber } ); |
1208 |
_FixPriority( { biblionumber => $biblionumber } ); |
| 1214 |
my $item = Koha::Items->find($itemnumber); |
1209 |
my $item = Koha::Items->find($itemnumber); |
| 1215 |
if ( $item->location && $item->location eq 'CART' |
1210 |
if ( $item->location && $item->location eq 'CART' |
| 1216 |
- |
|
|