|
Lines 1199-1204
sub ModReserveAffect {
Link Here
|
| 1199 |
|
1199 |
|
| 1200 |
$hold->itemnumber($itemnumber); |
1200 |
$hold->itemnumber($itemnumber); |
| 1201 |
|
1201 |
|
|
|
1202 |
my @reserve_ids; |
| 1203 |
push @reserve_ids, $hold->reserve_id; |
| 1204 |
|
| 1202 |
if ($transferToDo) { |
1205 |
if ($transferToDo) { |
| 1203 |
$hold->set_transfer(); |
1206 |
$hold->set_transfer(); |
| 1204 |
} elsif (C4::Context->preference('HoldsNeedProcessingSIP') |
1207 |
} elsif (C4::Context->preference('HoldsNeedProcessingSIP') |
|
Lines 1215-1220
sub ModReserveAffect {
Link Here
|
| 1215 |
# if this hold was part of a group, cancel other holds in the group |
1218 |
# if this hold was part of a group, cancel other holds in the group |
| 1216 |
my @holds = Koha::Holds->search({ hold_group_id => $hold->hold_group_id }); |
1219 |
my @holds = Koha::Holds->search({ hold_group_id => $hold->hold_group_id }); |
| 1217 |
foreach my $h ( @holds ) { |
1220 |
foreach my $h ( @holds ) { |
|
|
1221 |
push @reserve_ids, $h->reserve_id; |
| 1218 |
$h->cancel unless $h->reserve_id == $hold->reserve_id; |
1222 |
$h->cancel unless $h->reserve_id == $hold->reserve_id; |
| 1219 |
} |
1223 |
} |
| 1220 |
} |
1224 |
} |
|
Lines 1226-1243
sub ModReserveAffect {
Link Here
|
| 1226 |
CartToShelf( $itemnumber ); |
1230 |
CartToShelf( $itemnumber ); |
| 1227 |
} |
1231 |
} |
| 1228 |
|
1232 |
|
| 1229 |
my $std = $dbh->prepare(q{ |
1233 |
foreach my $id ( @reserve_ids ) { |
| 1230 |
DELETE q, t |
1234 |
my $std = $dbh->prepare(q{ |
| 1231 |
FROM tmp_holdsqueue q |
1235 |
DELETE q, t |
| 1232 |
INNER JOIN hold_fill_targets t |
1236 |
FROM tmp_holdsqueue q |
| 1233 |
ON q.borrowernumber = t.borrowernumber |
1237 |
INNER JOIN hold_fill_targets t |
| 1234 |
AND q.biblionumber = t.biblionumber |
1238 |
ON q.borrowernumber = t.borrowernumber |
| 1235 |
AND q.itemnumber = t.itemnumber |
1239 |
AND q.biblionumber = t.biblionumber |
| 1236 |
AND q.item_level_request = t.item_level_request |
1240 |
AND q.itemnumber = t.itemnumber |
| 1237 |
AND q.holdingbranch = t.source_branchcode |
1241 |
AND q.item_level_request = t.item_level_request |
| 1238 |
WHERE t.reserve_id = ? |
1242 |
AND q.holdingbranch = t.source_branchcode |
| 1239 |
}); |
1243 |
WHERE t.reserve_id = ? |
| 1240 |
$std->execute($hold->reserve_id); |
1244 |
}); |
|
|
1245 |
$std->execute($id); |
| 1246 |
} |
| 1241 |
|
1247 |
|
| 1242 |
logaction( 'HOLDS', 'MODIFY', $hold->reserve_id, Dumper($hold->unblessed) ) |
1248 |
logaction( 'HOLDS', 'MODIFY', $hold->reserve_id, Dumper($hold->unblessed) ) |
| 1243 |
if C4::Context->preference('HoldsLog'); |
1249 |
if C4::Context->preference('HoldsLog'); |
| 1244 |
- |
|
|