RT# 82949 - changes section name from fees to pricing, better opiton

[freeside.git] / httemplate / edit / part_device.html

diff --git a/httemplate/edit/part_device.html b/httemplate/edit/part_device.html
index 146070f..75e6b0a 100644 (file)
--- a/httemplate/edit/part_device.html
+++ b/httemplate/edit/part_device.html
@@ -4,7 +4,10 @@
                  'labels' => { 
                                'devicepart' => 'Part number',
                                'devicename' => 'Device name',
+                              'inventory_classnum' => 'Inventory class',
+                               'title'      => 'External name',
                              },
+                'fields' => \@fields,
                  'viewall_dir' => 'browse',
                  'html_bottom' => $html_bottom_sub,
            )
@@ -20,6 +23,25 @@ my $extra_sql =
       );
 $extra_sql = $extra_sql ? " WHERE ( $extra_sql ) " : " WHERE 0 = 1 ";
 
+my @inventory_classnums;
+push @inventory_classnums, '';
+my %inventory_classnum_labels;
+$inventory_classnum_labels{''} = '';
+my @inventory_classes = qsearch('inventory_class', {} );
+foreach my $inventory_class ( @inventory_classes ) {
+    push @inventory_classnums, $inventory_class->classnum;
+    $inventory_classnum_labels{$inventory_class->classnum} = $inventory_class->classname;
+}
+                       
+my @fields;
+push @fields, 'devicename',
+              'title',
+             { field => 'inventory_classnum', 
+               type => 'select',
+               options => \@inventory_classnums,
+               labels => \%inventory_classnum_labels,
+             };
+
 my $html_bottom_sub = sub {
   my $part_device = shift;