<%= include('/elements/header.html', 'Credit report' ) %>

<% my $sth = dbh->prepare("SELECT DISTINCT otaker FROM cust_credit") or die dbh->errstr; $sth->execute or die $sth->errstr; my @otakers = map { $_->[0] } @{$sth->fetchall_arrayref}; %> <%= include( '/elements/tr-select-agent.html', $cgi->param('agentnum'), 'label' => 'for agent: ', ) %> <%= include( '/elements/tr-input-beginning_ending.html' ) %>

Credits by employee:

all <% foreach my $otaker ( @otakers ) { %> <%= $otaker %> <% } %>

<%= include('/elements/footer.html') %>