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