1 <HTML><HEAD><TITLE>Reseller Main</TITLE></HEAD>
2 <BODY BGCOLOR="#eeeeee"><FONT SIZE=5>Reseller Main</FONT><BR><BR>
3 <%= $url = "$selfurl?session=$session_id;action="; ''; %>
4 <TABLE BORDER=0 CELLPADDING=4><TR><TD VALIGN="top" HEIGHT=384 BGCOLOR="#dddddd">
5 <A HREF="<%= $url %>agent_main">Reseller Main</A><BR>
6 <!-- <A HREF="<%= $url %>other">SomethingElse</A><BR> -->
11 $OUT .= '<TABLE BORDER=0 CELLSPACING=0 CELLPADDING=2 BGCOLOR="#eeeeee">'.
12 '<TR><TH BGCOLOR="#cccccc" COLSPAN=3>Customers</TH><TD>';
17 foreach my $customer ( @customers ) {
18 my $td = qq!<TD BGCOLOR="#$col">!;
19 my $a = qq!<A HREF="${url}view_customer;custnum=!.
20 $customer->{'custnum'}. '">';
23 "$td<FONT COLOR=\"". $customer->{'statuscolor'}. '">'.
24 ucfirst($customer->{'status'}). "</TD>". "$td</TD>".
25 "$td$a". $customer->{'name'}. "</A></TD>".
28 $col = $col eq $col1 ? $col2 : $col1;
32 $OUT .= 'No customers.<BR><BR>';
38 <FONT SIZE="-2">powered by <a href="http://www.sisd.com/freeside">freeside</a></FONT>