Lines 199-204
if (@patron_attr_filter_loop) {
Link Here
|
199 |
} |
199 |
} |
200 |
|
200 |
|
201 |
|
201 |
|
|
|
202 |
# Generate letters |
203 |
|
204 |
for my $borrower (@overduedata){ |
205 |
my $letter = C4::Letters::getletter( 'circulation', 'MANUAL_ODUE' ); |
206 |
|
207 |
my $itemscontent; |
208 |
for my $overdue( @{$borrower->{overdues}} ){ |
209 |
$itemscontent .= |
210 |
"$overdue->{title} $overdue->{author} $overdue->{barcode} $overdue->{itemcallnumber} $overdue->{issuedate}\n"; |
211 |
} |
212 |
$letter->{content} =~ s/<<items.content>>/$itemscontent/g; |
213 |
|
214 |
C4::Letters::parseletter( $letter, 'borrowers', $borrower->{borrowernumber}); |
215 |
C4::Letters::parseletter( $letter, 'branches', $borrower->{'branchcode'} ); |
216 |
|
217 |
$letter->{content} =~ s/\n/%0D%0A/g; |
218 |
|
219 |
$borrower->{letter_content} = $letter->{content}; |
220 |
$borrower->{letter_title} = $letter->{title}; |
221 |
} |
222 |
|
202 |
$template->param( |
223 |
$template->param( |
203 |
patron_attr_header_loop => [ map { { header => $_->{description} } } grep { ! $_->{isclone} } @patron_attr_filter_loop ], |
224 |
patron_attr_header_loop => [ map { { header => $_->{description} } } grep { ! $_->{isclone} } @patron_attr_filter_loop ], |
204 |
branchloop => GetBranchesLoop($branchfilter, $onlymine), |
225 |
branchloop => GetBranchesLoop($branchfilter, $onlymine), |