<%= include("/elements/header.html","Credit card batches", menubar( 'Main Menu' => $p,)) %>

<% my %statusmap = ('I'=>'In Transit', 'O'=>'Open', 'R'=>'Resolved'); %>
<%= &table() %> Batch First Download Last Upload Item Count Amount Status <% foreach my $pay_batch ( sort { $b->batchnum <=> $a->batchnum } qsearch('pay_batch', {} ) ) { my $statement = "SELECT SUM(amount) from cust_pay_batch WHERE batchnum=" . $pay_batch->batchnum; my $sth = dbh->prepare($statement) or die dbh->errstr. "doing $statement"; $sth->execute or die "Error executing \"$statement\": ". $sth->errstr; my $total = $sth->fetchrow_arrayref->[0]; my $c_statement = "SELECT COUNT(*) from cust_pay_batch WHERE batchnum=" . $pay_batch->batchnum; my $c_sth = dbh->prepare($c_statement) or die dbh->errstr. "doing $c_statement"; $c_sth->execute or die "Error executing \"$c_statement\": ". $c_sth->errstr; my $cards = $c_sth->fetchrow_arrayref->[0]; %> <%= $pay_batch->batchnum %> <%= $pay_batch->download ? time2str("%a %b %e %T %Y", $pay_batch->download) : '' %> <%= $pay_batch->upload ? time2str("%a %b %e %T %Y", $pay_batch->upload) : '' %> <%= $cards %> <%= $total %> <%= $statusmap{$pay_batch->status} %> <% } %>