httemplate/browse/router.cgi

   1 <%= header('Routers', menubar('Main Menu'   => $p)) %>
   2 <%
   3
   4 my @router = qsearch('router', {});
   5 my $p2 = popurl(2);
   6
   7 %>
   8
   9 <% if ($cgi->param('error')) { %>
  10    <FONT SIZE="+1" COLOR="#ff0000">Error: <%=$cgi->param('error')%></FONT>
  11    <BR><BR>
  12 <% } %>
  13
  14 <A HREF="<%=$p2%>edit/router.cgi"><I>Add a new router</I></A><BR><BR>
  15
  16 <%=table()%>
  17 <!-- <TH><TD>Field name</TD><TD>Field value</TD></TH> -->
  18 <% foreach $router (sort {$a->routernum <=> $b->routernum} @router) { %>
  19   <TR>
  20 <!--    <TD ROWSPAN="<%=scalar($router->router_field) + 2%>"> -->
  21     <TD>
  22       <A HREF="<%=$p2%>edit/router.cgi?<%=$router->routernum%>"><%=$router->routername%></A>
  23     </TD>
  24   <!--
  25   <% foreach (sort { $a->part_router_field->name cmp $b->part_router_field->name } $router->router_field )  { %>
  26   <TR>
  27     <TD BGCOLOR="#cccccc" ALIGN="right"><%=$_->part_router_field->name%></TD>
  28     <TD BGCOLOR="#ffffff"><%=$_->value%></TD>
  29   </TR>
  30   <% } %>
  31   -->
  32   </TR>
  33 <% } %>
  34 </TABLE>
  35 </BODY>
  36 </HTML>
  37