|
Lines 306-312
UPCOMINGITEM: foreach my $upcoming ( @$upcoming_dues ) {
Link Here
|
| 306 |
itemnumber => $upcoming->{'itemnumber'}, |
306 |
itemnumber => $upcoming->{'itemnumber'}, |
| 307 |
substitute => { |
307 |
substitute => { |
| 308 |
'items.content' => $title, |
308 |
'items.content' => $title, |
| 309 |
issue => $item_info, |
309 |
checkout => $item_info, |
| 310 |
}, |
310 |
}, |
| 311 |
message_transport_type => $transport, |
311 |
message_transport_type => $transport, |
| 312 |
} ) |
312 |
} ) |
|
Lines 355-361
UPCOMINGITEM: foreach my $upcoming ( @$upcoming_dues ) {
Link Here
|
| 355 |
itemnumber => $upcoming->{'itemnumber'}, |
355 |
itemnumber => $upcoming->{'itemnumber'}, |
| 356 |
substitute => { |
356 |
substitute => { |
| 357 |
'items.content' => $title, |
357 |
'items.content' => $title, |
| 358 |
issue => $item_info, |
358 |
checkout => $item_info, |
| 359 |
}, |
359 |
}, |
| 360 |
message_transport_type => $transport, |
360 |
message_transport_type => $transport, |
| 361 |
} ) |
361 |
} ) |
|
Lines 595-604
sub send_digests {
Link Here
|
| 595 |
}); |
595 |
}); |
| 596 |
my $titles = ""; |
596 |
my $titles = ""; |
| 597 |
my @itemnumbers; |
597 |
my @itemnumbers; |
| 598 |
my @issues; |
598 |
my @checkouts; |
| 599 |
while ( my $item_info = $next_item_info->()) { |
599 |
while ( my $item_info = $next_item_info->()) { |
| 600 |
push @itemnumbers, $item_info->{itemnumber}; |
600 |
push @itemnumbers, $item_info->{itemnumber}; |
| 601 |
push( @issues, $item_info ); |
601 |
push( @checkouts, $item_info ); |
| 602 |
$titles .= C4::Letters::get_item_content( { item => $item_info, item_content_fields => \@item_content_fields } ); |
602 |
$titles .= C4::Letters::get_item_content( { item => $item_info, item_content_fields => \@item_content_fields } ); |
| 603 |
} |
603 |
} |
| 604 |
|
604 |
|
|
Lines 608-618
sub send_digests {
Link Here
|
| 608 |
{ |
608 |
{ |
| 609 |
letter_code => $params->{letter_code}, |
609 |
letter_code => $params->{letter_code}, |
| 610 |
borrowernumber => $borrowernumber, |
610 |
borrowernumber => $borrowernumber, |
| 611 |
issues => \@issues, |
611 |
checkouts => \@checkouts, |
| 612 |
substitute => { |
612 |
substitute => { |
| 613 |
count => $count, |
613 |
count => $count, |
| 614 |
'items.content' => $titles, |
614 |
'items.content' => $titles, |
| 615 |
issues => \@issues, |
615 |
checkouts => \@checkouts, |
| 616 |
%branch_info |
616 |
%branch_info |
| 617 |
}, |
617 |
}, |
| 618 |
itemnumbers => \@itemnumbers, |
618 |
itemnumbers => \@itemnumbers, |
| 619 |
- |
|
|