my $ctx = $self->ctx;
$ctx->{"fines"} = {
"circulation" => [],
- "grocery" => []
+ "grocery" => [],
+ "total_paid" => 0,
+ "total_owed" => 0,
+ "balance_owed" => 0
};
my $limit = $self->cgi->param('limit') || 0;
$last_billing = pop(@billings);
}
+ # XXX TODO switch to some money-safe non-fp library for math
+ $ctx->{"fines"}->{$_} += $mobts->$_ for (
+ qw/total_paid total_owed balance_owed/
+ );
+
push(
@{$ctx->{"fines"}->{$mobts->grocery ? "grocery" : "circulation"}},
{
[% END %]
[% PROCESS 'default/opac/marc_attrs.tt2' %]
-
-
+[% USE date %]
+[% USE money = format('$%.2f') %]
[% PROCESS "default/opac/common.tt2" %]
[% WRAPPER "default/opac/base.tt2" %]
[% INCLUDE "default/opac/myopac/_links.tt2" myopac_page = "circs" %]
-[% USE date %]
-
<form method='POST' id='circ-form'>
<div id='action_div'>
</style>
[% END %]
-[% USE date %]
-[% USE money = format('$%.2f') %]
[% PROCESS "default/opac/common.tt2" %]
[% WRAPPER "default/opac/base.tt2" %]
[% INCLUDE "default/opac/myopac/_links.tt2" myopac_page = "fines" %]
</thead>
<tbody>
<tr>
- <td colspan="3"><em>XXX TODO</em></td>
+ <td>[% money(ctx.fines.total_owed) %]</td>
+ <td>[% money(ctx.fines.total_paid) %]</td>
+ <td>[% money(ctx.fines.balance_owed) %]</td>
</tr>
</tbody>
</table>
</style>
[% END %]
-[% USE date %]
[% PROCESS "default/opac/common.tt2" %]
[% WRAPPER "default/opac/base.tt2" %]
[% INCLUDE "default/opac/myopac/_links.tt2" myopac_page = "holds" %]