<& /elements/header.html, mt($title) &>
<& /elements/tr-select-agent.html, 'curr_value' => scalar( $cgi->param('agentnum') ), 'disable_empty' => 0, &> <& /elements/tr-select-cust-fields.html &>

<% include('/elements/footer.html') %> <%init> die "access denied" unless $FS::CurrentUser::CurrentUser->access_right('List packages'); # for the page title my %cols = ( 'contract_end' => 'Contract end' ); # or let the column be selected here? my $col = $cgi->param('date'); die "invalid date column" unless $cols{$col}; my $title = 'Packages by ' . lc($cols{$col}) . ' date';