|
Lines 246-288
sub to_api_mapping {
Link Here
|
| 246 |
|
246 |
|
| 247 |
=head3 delete |
247 |
=head3 delete |
| 248 |
|
248 |
|
| 249 |
$booking->delete(); |
249 |
my $deleted = $booking->delete(); |
| 250 |
|
250 |
|
| 251 |
=cut |
251 |
=cut |
| 252 |
|
252 |
|
| 253 |
sub delete { |
253 |
sub delete { |
| 254 |
my ( $self ) = @_; |
254 |
my ($self) = @_; |
| 255 |
|
255 |
|
| 256 |
my $deleted = $self->SUPER::delete($self); |
256 |
my $patron = $self->patron; |
| 257 |
my $patron = Koha::Patrons->find( $self->patron_id ); |
257 |
my $pickup_library = $self->pickup_library; |
| 258 |
my $item = Koha::Items->find( $self->item_id ); |
|
|
| 259 |
my $library = Koha::Libraries->find( $self->pickup_library_id ); |
| 260 |
|
258 |
|
| 261 |
my $letter = C4::Letters::GetPreparedLetter( |
259 |
my $letter = C4::Letters::GetPreparedLetter( |
| 262 |
module => 'bookings', |
260 |
module => 'bookings', |
| 263 |
letter_code => 'BOOKING_CANCELLATION', |
261 |
letter_code => 'BOOKING_CANCELLATION', |
| 264 |
message_transport_type => 'email', |
262 |
message_transport_type => 'email', |
| 265 |
branchcode => $patron->branchcode, |
263 |
branchcode => $pickup_library->branchcode, |
| 266 |
lang => $patron->lang, |
264 |
lang => $patron->lang, |
| 267 |
tables => { |
265 |
objects => { booking => $self } |
| 268 |
branches => $library->branchcode, |
266 |
); |
| 269 |
borrowers => $patron->borrowernumber, |
267 |
|
| 270 |
items => $item->itemnumber, |
268 |
if ($letter) { |
| 271 |
biblio => $item->biblionumber, |
269 |
C4::Letters::EnqueueLetter( |
| 272 |
biblioitems => $item->biblionumber, |
270 |
{ |
| 273 |
bookings => $self->unblessed, |
271 |
letter => $letter, |
|
|
272 |
borrowernumber => $patron->borrowernumber, |
| 273 |
message_transport_type => 'email', |
| 274 |
} |
274 |
} |
| 275 |
); |
275 |
); |
|
|
276 |
} |
| 276 |
|
277 |
|
| 277 |
if ($letter) { |
278 |
my $deleted = $self->SUPER::delete($self); |
| 278 |
C4::Letters::EnqueueLetter( |
|
|
| 279 |
{ |
| 280 |
letter => $letter, |
| 281 |
borrowernumber => $patron->borrowernumber, |
| 282 |
message_transport_type => 'email', |
| 283 |
} |
| 284 |
); |
| 285 |
} |
| 286 |
return $deleted; |
279 |
return $deleted; |
| 287 |
} |
280 |
} |
| 288 |
|
281 |
|
| 289 |
- |
|
|