|
Lines 1020-1026
sub ModReserve {
Link Here
|
| 1020 |
'borrowers', $hold_borrowernumber |
1020 |
'borrowers', $hold_borrowernumber |
| 1021 |
} |
1021 |
} |
| 1022 |
); |
1022 |
); |
| 1023 |
C4::Message->enqueue($letter, $hold_borrower->unblessed, 'email'); |
1023 |
|
|
|
1024 |
my $messaging_preferences = C4::Members::Messaging::GetMessagingPreferences({ borrowernumber => $hold_borrowernumber, message_name => 'Hold_Manually_Cancelled' }); |
| 1025 |
|
| 1026 |
while ( my ( $transport, $letter_code ) = each %{ $messaging_preferences->{transports} } ){ |
| 1027 |
if ( $transport eq 'email' ){ |
| 1028 |
C4::Message->enqueue($letter, $hold_borrower->unblessed, 'email'); |
| 1029 |
} |
| 1030 |
} |
| 1024 |
} elsif ($rank =~ /^\d+/ and $rank > 0) { |
1031 |
} elsif ($rank =~ /^\d+/ and $rank > 0) { |
| 1025 |
logaction( 'HOLDS', 'MODIFY', $hold->reserve_id, Dumper($hold->unblessed) ) |
1032 |
logaction( 'HOLDS', 'MODIFY', $hold->reserve_id, Dumper($hold->unblessed) ) |
| 1026 |
if C4::Context->preference('HoldsLog'); |
1033 |
if C4::Context->preference('HoldsLog'); |
|
Lines 1235-1241
sub ModReserveCancelAll {
Link Here
|
| 1235 |
'borrowers', $hold_borrowernumber |
1242 |
'borrowers', $hold_borrowernumber |
| 1236 |
} |
1243 |
} |
| 1237 |
); |
1244 |
); |
| 1238 |
C4::Message->enqueue($letter, $hold_borrower->unblessed, 'email'); |
1245 |
|
|
|
1246 |
my $messaging_preferences = C4::Members::Messaging::GetMessagingPreferences({ borrowernumber => $hold_borrowernumber, message_name => 'Hold_Manually_Cancelled' }); |
| 1247 |
|
| 1248 |
while ( my ( $transport, $letter_code ) = each %{ $messaging_preferences->{transports} } ){ |
| 1249 |
if ( $transport eq 'email' ){ |
| 1250 |
C4::Message->enqueue($letter, $hold_borrower->unblessed, 'email'); |
| 1251 |
} |
| 1252 |
} |
| 1239 |
|
1253 |
|
| 1240 |
#step 2 launch the subroutine of the others reserves |
1254 |
#step 2 launch the subroutine of the others reserves |
| 1241 |
( $messages, $nextreservinfo ) = GetOtherReserves($itemnumber); |
1255 |
( $messages, $nextreservinfo ) = GetOtherReserves($itemnumber); |