httemplate/browse/part_sb_field.cgi

   1 <%= header('svc_broadband extended fields', menubar('Main Menu'   => $p)) %>
   2 <%
   3
   4 my @psf = qsearch('part_sb_field', {});
   5 my $block;
   6 my $p2 = popurl(2);
   7
   8 %>
   9
  10 <% if ($cgi->param('error')) { %>
  11    <FONT SIZE="+1" COLOR="#ff0000">Error: <%=$cgi->param('error')%></FONT>
  12    <BR><BR>
  13 <% } %>
  14
  15 <A HREF="<%=$p2%>edit/part_sb_field.cgi"><I>Add a new field</I></A><BR><BR>
  16
  17 <%=table()%>
  18 <TH><TD>Field name</TD><TD>Service type</TD></TH>
  19 <% foreach $psf (sort {$a->name cmp $b->name} @psf) { %>
  20   <TR>
  21     <TD></TD>
  22     <TD>
  23       <A HREF="<%=$p2%>edit/part_sb_field.cgi?<%=$psf->sbfieldpart%>">
  24         <%=$psf->name%></A></TD>
  25     <TD><%=$psf->part_svc->svc%></TD>
  26   </TR>
  27 <% } %>
  28 </TABLE>
  29 </BODY>
  30 </HTML>
  31