1 <% include('/elements/header.html', $title ) %>
3 <FORM ACTION="svc_hardware.cgi" METHOD="GET">
5 <TABLE BGCOLOR="#cccccc" CELLSPACING=0>
7 <TH CLASS="background" COLSPAN=2 ALIGN="left"><FONT SIZE="+1">Search options</FONT></TH>
11 <% include('/elements/selectlayers.html',
12 'field' => 'classnum',
14 'options' => \@classnums,
15 'labels' => \%class_labels,
16 'layer_callback' => \&layer_callback,
17 'html_between' => '</TD><TD>',
21 <% include('/elements/tr-input-text.html',
23 'label' => 'Serial #',
25 <% include('/elements/tr-input-text.html',
27 'label' => 'Hardware address',
29 <% include('/elements/tr-input-text.html',
31 'label' => 'IP address',
33 <% include('/elements/tr-select-table.html',
34 'field' => 'statusnum',
35 'label' => 'Service status',
36 'table' => 'hardware_status',
37 'name_col' => 'label',
38 'empty_label' => 'any',
44 <INPUT TYPE="submit" VALUE="Search">
48 <% include('/elements/footer.html') %>
52 unless $FS::CurrentUser::CurrentUser->access_right('List packages'); #?
54 my $title = 'Hardware Service Report';
56 my @classes = qsearch('hardware_class', {});
57 my @classnums = ('', map { $_->classnum } @classes);
58 my %class_labels = ('' => 'Select hardware class',
59 map { $_->classnum => $_->classname } @classes);
62 my $classnum = shift or return '';
63 include('/elements/select-hardware_type.html',
64 'field' => 'classnum'.$classnum.'typenum',
65 'classnum' => $classnum,
66 'empty_label' => 'any',