httemplate/view/svc_hardware.cgi

   1 <% include('elements/svc_Common.html',
   2             'table'        => 'svc_hardware',
   3             'labels'       => \%labels,
   4             'fields'       => \@fields,
   5           )
   6 %>
   7 <%init>
   8
   9 my $conf = new FS::Conf;
  10 my $fields = FS::svc_hardware->table_info->{'fields'};
  11 my %labels = map { $_ =>  ( ref($fields->{$_})
  12                              ? $fields->{$_}{'label'}
  13                              : $fields->{$_}
  14                          );
  15                  } keys %$fields;
  16 my $model =  { field => 'typenum',
  17                type  => 'text',
  18                value => sub { $_[0]->hardware_type->description }
  19              };
  20 my $status = { field => 'statusnum',
  21                type  => 'text',
  22                value => sub { $_[0]->status_label }
  23              };
  24 my $note =   { field => 'note',
  25                type  => 'text',
  26                value => sub { encode_entities($_[0]->note) }
  27              };
  28 my $hw_addr ={ field => 'hw_addr',
  29                type  => 'text',
  30                value => sub {
  31                 my $hw_addr = $_[0]->hw_addr;
  32                 $conf->exists('svc_hardware-check_mac_addr') ?
  33                   join(':', $hw_addr =~ /../g) : $hw_addr
  34                 },
  35               };
  36
  37 my @fields = (
  38   $model,
  39   'serial',
  40   $hw_addr,
  41   'ip_addr',
  42   'smartcard',
  43   $status,
  44   $note,
  45 );
  46 </%init>