+ <td align="right"><b><%= $dollar.$current_less_finance %></b></td>
+ </tr>
+ <%=
+ foreach my $section ( grep $_->{adjust_section}, @sections) {
+ $OUT .= '<tr><td><b>'. ($section->{'description'} ? $section->{'description'} : 'Charges' ). '</b></td>';
+ $OUT .= qq(<th align="right"><b>). $section->{'subtotal'}. "</b></th></tr>";
+ }
+ %>
+ <tr>
+ <td><b>Payments and Credits</b></td>
+ <th align="right"><b>-<%= $dollar.sprintf('%.2f', $balance_adjustments) %></b></th>