<% my @cols = qw/cost subtotal tax aux total balance/; %> <% my @mcols = qw/cost price tax aux total/; %> <% if ($app->{'data'}) { %> <% my $d = $app->{'data'}; %>

<%= &subs::format_name($d->{'item'}) %>

<%= &subs::format_name($d->{'movement'}) %> <% foreach my $col ( @cols ) { %> <% } %> <% foreach my $col ( @mcols) { %> <% } %> <% foreach my $oc ( keys %{$d->{'options'}} ) { %> <% foreach my $o ( @{$d->{'options'}->{$oc}} ) { %> <% } %> <% } %> <% } %> <% foreach my $col ( @cols ) { %> <% } %>

Name	<%= &subs::format_name($col) %>
<%= &subs::format_name($d->{'model'}->{'name'}) %>	<% if ($col eq 'total' && $d->{'model'}->{$col} == 0) { %> <%= &subs::price_formatter($d->{'model'}->{'price'} + $d->{'model'}->{'tax'} + $d->{'model'}->{'aux'}) %> <% } else { %> <%= &subs::price_formatter($d->{'model'}->{$col}) %> <% } %>
<%= &subs::format_name($o->{'name'}) %> <% foreach my $col ( @mcols ) { %>	<% if ($col eq 'total' && $o->{$col} == 0) { %> <%= &subs::price_formatter($o->{'price'} + $o->{'tax'} + $o->{'aux'}) %> <% } else { %> <%= &subs::price_formatter($o->{$col}) %> <% } %>
<%= $d->{'id'} %>	<%= &subs::price_formatter($d->{'numbers'}->{$col}) %>

<% if ($d->{'payments'}) { %> Payments: <% foreach my $p ( @{$d->{'payments'}} ) { %> <% } %>

Account	Time	Amount
<%= &subs::format_name($p->{'account'}) %>		<%= &subs::price_formatter($p->{'amount'}) %>

<% } %> <% } %> <% if ($app->{'type'} eq 'invoice') { %> <% } %>