|
Lines 141-147
if ( $total_paid and $total_paid ne '0.00' ) {
Link Here
|
| 141 |
$total_paid = '0.00'; #TODO not right with pay_individual |
141 |
$total_paid = '0.00'; #TODO not right with pay_individual |
| 142 |
} |
142 |
} |
| 143 |
|
143 |
|
| 144 |
borrower_add_additional_fields($borrower); |
144 |
borrower_add_additional_fields($borrower, $template); |
| 145 |
|
145 |
|
| 146 |
$template->param(%$borrower); |
146 |
$template->param(%$borrower); |
| 147 |
|
147 |
|
|
Lines 157-163
$template->param(
Link Here
|
| 157 |
output_html_with_http_headers $input, $cookie, $template->output; |
157 |
output_html_with_http_headers $input, $cookie, $template->output; |
| 158 |
|
158 |
|
| 159 |
sub borrower_add_additional_fields { |
159 |
sub borrower_add_additional_fields { |
| 160 |
my $b_ref = shift; |
160 |
my ( $b_ref, $template ) = @_; |
| 161 |
|
161 |
|
| 162 |
# some borrower info is not returned in the standard call despite being assumed |
162 |
# some borrower info is not returned in the standard call despite being assumed |
| 163 |
# in a number of templates. It should not be the business of this script but in lieu of |
163 |
# in a number of templates. It should not be the business of this script but in lieu of |
|
Lines 176-186
sub borrower_add_additional_fields {
Link Here
|
| 176 |
$b_ref->{adultborrower} = 1; |
176 |
$b_ref->{adultborrower} = 1; |
| 177 |
} |
177 |
} |
| 178 |
|
178 |
|
| 179 |
my $patron_image = Koha::Patron::Images->find($borrower->{borrowernumber}); |
179 |
my $patron_image = Koha::Patron::Images->find($b_ref->{borrowernumber}); |
| 180 |
$template->param( picture => 1 ) if $patron_image; |
180 |
$template->param( picture => 1 ) if $patron_image; |
| 181 |
|
181 |
|
| 182 |
if (C4::Context->preference('ExtendedPatronAttributes')) { |
182 |
if (C4::Context->preference('ExtendedPatronAttributes')) { |
| 183 |
$b_ref->{extendedattributes} = GetBorrowerAttributes($borrowernumber); |
183 |
$b_ref->{extendedattributes} = GetBorrowerAttributes($b_ref->{borrowernumber}); |
| 184 |
} |
184 |
} |
| 185 |
|
185 |
|
| 186 |
$b_ref->{branchname} = GetBranchName( $b_ref->{branchcode} ); |
186 |
$b_ref->{branchname} = GetBranchName( $b_ref->{branchcode} ); |
| 187 |
- |
|
|