|
Lines 1153-1161
sub ModReserveAffect {
Link Here
|
| 1153 |
my $already_on_shelf = $hold->found && $hold->found eq 'W'; |
1153 |
my $already_on_shelf = $hold->found && $hold->found eq 'W'; |
| 1154 |
|
1154 |
|
| 1155 |
$hold->itemnumber($itemnumber); |
1155 |
$hold->itemnumber($itemnumber); |
| 1156 |
$hold->set_waiting($transferToDo); |
|
|
| 1157 |
|
1156 |
|
| 1158 |
if( !$transferToDo ){ |
1157 |
if( !$transferToDo ){ |
|
|
1158 |
$hold->set_waiting(); |
| 1159 |
_koha_notify_reserve( $hold->reserve_id ) unless $already_on_shelf; |
1159 |
_koha_notify_reserve( $hold->reserve_id ) unless $already_on_shelf; |
| 1160 |
my $transfers = Koha::Item::Transfers->search({ |
1160 |
my $transfers = Koha::Item::Transfers->search({ |
| 1161 |
itemnumber => $itemnumber, |
1161 |
itemnumber => $itemnumber, |
|
Lines 1164-1170
sub ModReserveAffect {
Link Here
|
| 1164 |
while( my $transfer = $transfers->next ){ |
1164 |
while( my $transfer = $transfers->next ){ |
| 1165 |
$transfer->datearrived( dt_from_string() )->store; |
1165 |
$transfer->datearrived( dt_from_string() )->store; |
| 1166 |
}; |
1166 |
}; |
| 1167 |
} |
1167 |
} else { |
|
|
1168 |
$hold->set_transfer(); |
| 1169 |
} |
| 1168 |
|
1170 |
|
| 1169 |
|
1171 |
|
| 1170 |
_FixPriority( { biblionumber => $biblionumber } ); |
1172 |
_FixPriority( { biblionumber => $biblionumber } ); |