|
Lines 2174-2180
sub _ShiftPriority {
Link Here
|
| 2174 |
|
2174 |
|
| 2175 |
=head2 MoveReserve |
2175 |
=head2 MoveReserve |
| 2176 |
|
2176 |
|
| 2177 |
MoveReserve( $item, $patron, $cancelreserve ) |
2177 |
my $filled_hold = MoveReserve( $item, $patron, $cancelreserve ) |
| 2178 |
|
2178 |
|
| 2179 |
Use when checking out an item to handle reserves |
2179 |
Use when checking out an item to handle reserves |
| 2180 |
If $cancelreserve boolean is set to true, it will remove existing reserve |
2180 |
If $cancelreserve boolean is set to true, it will remove existing reserve |
|
Lines 2204-2209
sub MoveReserve {
Link Here
|
| 2204 |
if ( $res && $res->{borrowernumber} == $patron->borrowernumber ) { |
2204 |
if ( $res && $res->{borrowernumber} == $patron->borrowernumber ) { |
| 2205 |
my $hold = Koha::Holds->find( $res->{reserve_id} ); |
2205 |
my $hold = Koha::Holds->find( $res->{reserve_id} ); |
| 2206 |
$hold->fill( { item_id => $item->id } ); |
2206 |
$hold->fill( { item_id => $item->id } ); |
|
|
2207 |
return $hold; |
| 2207 |
} else { |
2208 |
} else { |
| 2208 |
|
2209 |
|
| 2209 |
# The item is reserved by someone else. |
2210 |
# The item is reserved by someone else. |
|
Lines 2227-2233
sub MoveReserve {
Link Here
|
| 2227 |
if ($hold) { |
2228 |
if ($hold) { |
| 2228 |
|
2229 |
|
| 2229 |
# The item is reserved by the current patron |
2230 |
# The item is reserved by the current patron |
|
|
2231 |
# if we are filling a hold previously found we need to alert the staff |
| 2232 |
if ( $hold->found() eq 'W' ) { |
| 2233 |
$hold->add_message( { message => "W", type => 'filled_waiting' } ); |
| 2234 |
} elsif ( $hold->found() eq 'T' ) { |
| 2235 |
$hold->add_message( { message => "T", type => 'filled_transit' } ); |
| 2236 |
} |
| 2230 |
$hold->fill( { item_id => $item->id } ); |
2237 |
$hold->fill( { item_id => $item->id } ); |
|
|
2238 |
return $hold; |
| 2231 |
} |
2239 |
} |
| 2232 |
|
2240 |
|
| 2233 |
$hold = Koha::Holds->find( $res->{reserve_id} ); |
2241 |
$hold = Koha::Holds->find( $res->{reserve_id} ); |
|
Lines 2237-2242
sub MoveReserve {
Link Here
|
| 2237 |
$hold->cancel; |
2245 |
$hold->cancel; |
| 2238 |
} |
2246 |
} |
| 2239 |
} |
2247 |
} |
|
|
2248 |
return; |
| 2240 |
} |
2249 |
} |
| 2241 |
|
2250 |
|
| 2242 |
=head2 MergeHolds |
2251 |
=head2 MergeHolds |