diff options
Diffstat (limited to 'httemplate/browse')
| -rwxr-xr-x | httemplate/browse/ac.cgi | 57 | ||||
| -rwxr-xr-x | httemplate/browse/ac_type.cgi | 47 | ||||
| -rwxr-xr-x | httemplate/browse/cust_main_county.cgi | 11 |
3 files changed, 1 insertions, 114 deletions
diff --git a/httemplate/browse/ac.cgi b/httemplate/browse/ac.cgi deleted file mode 100755 index 0ae138d3b..000000000 --- a/httemplate/browse/ac.cgi +++ /dev/null @@ -1,57 +0,0 @@ -<!-- mason kludge --> -<%= header('Access Concentrator Listing', menubar( - 'Main Menu' => $p, - 'Access Concentrator Types' => $p. 'browse/ac_type.cgi', -)) %> -<BR> -<A HREF="<%= $p %>edit/ac.cgi"><I>Add a new Access Concentrator</I></A><BR><BR> - -<%= table() %> -<TR> - <TH COLSPAN=2>AC</TH> - <TH>AC Type</TH> - <TH>Fields</TH> - <TH>Network/Mask</TH> -</TR> -<% - -foreach my $ac ( qsearch('ac',{}) ) { - my($hashref)=$ac->hashref; - my($actypenum)=$hashref->{actypenum}; - my($ac_type)=qsearchs('ac_type',{'actypenum'=>$actypenum}); - my($actypename)=$ac_type->getfield('actypename'); - print <<END; - <TR> - <TD><A HREF="${p}edit/ac.cgi?$hashref->{acnum}"> - $hashref->{acnum}</A></TD> - <TD><A HREF="${p}edit/ac.cgi?$hashref->{acnum}"> - $hashref->{acname}</A></TD> - <TD><A HREF="${p}edit/ac_type.cgi?$actypenum">$actypename</A></TD> - <TD> -END - - foreach my $ac_field ( qsearch('ac_field', { acnum => $hashref->{acnum} }) ) { - my $part_ac_field = qsearchs('part_ac_field', - { acfieldpart => $ac_field->getfield('acfieldpart') }); - print $part_ac_field->getfield('name') . ' '; - print $ac_field->getfield('value') . '<BR>'; - } - print '</TD><TD>'; - - foreach (qsearch('ac_block', { acnum => $hashref->{acnum} })) { - my $net_addr = new NetAddr::IP($_->getfield('ip_gateway'), - $_->getfield('ip_netmask')); - print $net_addr->network->addr . '/' . $net_addr->network->mask . '<BR>'; - } - - print "<TR>\n"; - -} - -print <<END; - </TABLE> - </BODY> -</HTML> -END - -%> diff --git a/httemplate/browse/ac_type.cgi b/httemplate/browse/ac_type.cgi deleted file mode 100755 index 0ad8271d3..000000000 --- a/httemplate/browse/ac_type.cgi +++ /dev/null @@ -1,47 +0,0 @@ -<!-- mason kludge --> -<% - -print header('Access Concentrator Types', menubar( - 'Main Menu' => $p, - 'Access Concentrators' => $p. 'browse/ac.cgi', -)) %> -<BR> -<A HREF="<%= $p %>edit/ac_type.cgi"><I>Add new AC Type</I></A><BR><BR> -<%= table() %> - <TR> - <TH></TH> - <TH>Type</TH> - <TH>Fields</TH> - </TR> - -<% -foreach my $ac_type ( qsearch('ac_type',{}) ) { - my($hashref)=$ac_type->hashref; - print <<END; - <TR> - <TD><A HREF="${p}edit/ac_type.cgi?$hashref->{actypenum}"> - $hashref->{actypenum}</A></TD> - <TD><A HREF="${p}edit/ac_type.cgi?$hashref->{actypenum}"> - $hashref->{actypename}</A></TD> - <TD> -END - - foreach ( qsearch('part_ac_field', { actypenum => $hashref->{actypenum} }) ) { - my ($part_ac_field) = $_->hashref; - print $part_ac_field->{'name'} . - ' (' . $part_ac_field->{'ut_type'} . ')<BR>'; - } - -} - -print <<END; - </TD> - </TR> - <TR> - </TR> - </TABLE> - </BODY> -</HTML> -END - -%> diff --git a/httemplate/browse/cust_main_county.cgi b/httemplate/browse/cust_main_county.cgi index c2473c4c8..991606087 100755 --- a/httemplate/browse/cust_main_county.cgi +++ b/httemplate/browse/cust_main_county.cgi @@ -21,8 +21,7 @@ print '<BR><BR>'. &table(). <<END; <TH><FONT SIZE=-1>Country</FONT></TH> <TH><FONT SIZE=-1>State</FONT></TH> <TH>County</TH> - <TH>Taxclass<BR><FONT SIZE=-1>(per-package classification)</FONT></TH> - <TH>Tax name<BR><FONT SIZE=-1>(printed on invoices)</FONT></TH> + <TH>Taxclass</TH> <TH><FONT SIZE=-1>Tax</FONT></TH> <TH><FONT SIZE=-1>Exempt<BR>per<BR>month</TH> </TR> @@ -112,14 +111,6 @@ END } print "</TD>"; - print "<TD"; - if ( $hashref->{taxname} ) { - print ' BGCOLOR="#ffffff">'. $hashref->{taxname}; - } else { - print ' BGCOLOR="#cccccc">Tax'; - } - print "</TD>"; - print "<TD BGCOLOR=\"#ffffff\">$hashref->{tax}%</TD>". '<TD BGCOLOR="#ffffff">$'. sprintf("%.2f", $hashref->{exempt_amount} || 0). '</TD>'. |