httemplate/view/svc_Status.html

   1 <& /elements/header-popup.html,
   2      {
   3        'title'   => '',
   4        'nobr'    => 1,  #1 for no <BR><BR> after the title
   5      }
   6 &>
   7 <% $html %>
   8 <%init>
   9
  10 $cgi->param('svcnum') =~ /^(\d+)$/ or die 'illegal svcnum';
  11 my $svcnum = $1;
  12
  13 my $cust_svc = qsearchs( 'cust_svc', { 'svcnum' => $svcnum } );
  14 die "Unknown svcnum" unless $cust_svc;
  15 my $svc_x = $cust_svc->svc_x;
  16
  17 my $html = $svc_x->getstatus_html;
  18
  19 </%init>