Lines 133-139
output_html_with_http_headers $input, $cookie, $template->output;
Link Here
|
133 |
sub add_accounts_to_template { |
133 |
sub add_accounts_to_template { |
134 |
|
134 |
|
135 |
my ( $total, undef, undef ) = GetMemberAccountRecords($borrowernumber); |
135 |
my ( $total, undef, undef ) = GetMemberAccountRecords($borrowernumber); |
136 |
my $accounts = []; |
136 |
my $accounts = Koha::Account::Lines->search({ borrowernumber => $borrowernumber, }, { order_by => ['accounttype'] }); |
|
|
137 |
my @accounts; |
138 |
while ( my $account = $accounts->next ) { |
139 |
$account = $account->unblessed; |
140 |
if ( $account->{itemnumber} ) { |
141 |
my $item = Koha::Items->find( $account->{itemnumber} ); |
142 |
my $biblio = $item->biblio; |
143 |
$account->{biblionumber} = $biblio->biblionumber; |
144 |
$account->{title} = $biblio->title; |
145 |
} |
146 |
push @accounts, $account; |
147 |
} |
137 |
borrower_add_additional_fields($borrower); |
148 |
borrower_add_additional_fields($borrower); |
138 |
|
149 |
|
139 |
$template->param(%$borrower); |
150 |
$template->param(%$borrower); |
Lines 141-147
sub add_accounts_to_template {
Link Here
|
141 |
my $patron_image = Koha::Patron::Images->find($borrower->{borrowernumber}); |
152 |
my $patron_image = Koha::Patron::Images->find($borrower->{borrowernumber}); |
142 |
$template->param( picture => 1 ) if $patron_image; |
153 |
$template->param( picture => 1 ) if $patron_image; |
143 |
$template->param( |
154 |
$template->param( |
144 |
accounts => $accounts, |
155 |
accounts => \@accounts, |
145 |
borrower => $borrower, |
156 |
borrower => $borrower, |
146 |
categoryname => $borrower->{'description'}, |
157 |
categoryname => $borrower->{'description'}, |
147 |
total => $total, |
158 |
total => $total, |
148 |
- |
|
|