<TR>
<TH COLSPAN=2>Agent</TH>
<TH>Type</TH>
- <TH><FONT SIZE=-1>Freq. (unimp.)</FONT></TH>
- <TH><FONT SIZE=-1>Prog. (unimp.)</FONT></TH>
+ <TH><FONT SIZE=-1>Freq.</FONT></TH>
+ <TH><FONT SIZE=-1>Prog.</FONT></TH>
</TR>
END
# <TH><FONT SIZE=-1>Agent #</FONT></TH>
# <TH>Agent</TH>
foreach my $agent ( sort {
- $a->getfield('agentnum') <=> $b->getfield('agentnum')
+ #$a->getfield('agentnum') <=> $b->getfield('agentnum')
+ $a->getfield('agent') cmp $b->getfield('agent')
} qsearch('agent',{}) ) {
my($hashref)=$agent->hashref;
my($typenum)=$hashref->{typenum};