<% include( 'edit.html', 'fields' => $fields, 'labels' => { 'classnum' => 'Class number', 'classname' => 'Class name', 'categorynum' => 'Category', 'disabled' => 'Disable class', %addl_labels, }, 'viewall_dir' => 'browse', %opt, ) %> <%init> die "access denied" unless $FS::CurrentUser::CurrentUser->access_right('Configuration'); my %opt = @_; my $table = $opt{'table'}; my @category; unless ( $opt{'nocat'} ) { ( my $category_table = $table ) =~ s/class/category/ or die; @category = qsearch($category_table, { 'disabled' => '' }); } my $fields = [ 'classname', (scalar(@category) ? { field=>'categorynum', type=>'select-table', 'empty_label'=>'(none)', 'table'=>'pkg_category', 'name_col'=>'categoryname' } : { field=>'categorynum', type=>'hidden' } ), { field=>'disabled', type=>'checkbox', value=>'Y', }, ]; push @$fields, $opt{'addl_fields'} if $opt{'addl_fields'}; my %addl_labels = (); %addl_labels = %{$opt{'addl_labels'}} if $opt{'addl_labels'};