diff options
Diffstat (limited to 'httemplate/browse/cust_class.html')
-rw-r--r-- | httemplate/browse/cust_class.html | 45 |
1 files changed, 0 insertions, 45 deletions
diff --git a/httemplate/browse/cust_class.html b/httemplate/browse/cust_class.html deleted file mode 100644 index d7c622837..000000000 --- a/httemplate/browse/cust_class.html +++ /dev/null @@ -1,45 +0,0 @@ -<% include( 'elements/browse.html', - 'title' => 'Customer classes', - 'html_init' => $html_init, - 'name' => 'customer classes', - 'disableable' => 1, - 'disabled_statuspos' => 2, - 'query' => { 'table' => 'cust_class', - 'hashref' => {}, - 'order_by' => 'ORDER BY classnum', - }, - 'count_query' => $count_query, - 'header' => $header, - 'fields' => $fields, - 'links' => $links, - ) -%> -<%init> - -die "access denied" - unless $FS::CurrentUser::CurrentUser->access_right('Configuration'); - -my $html_init = - 'Customer classes define groups of customer for reporting.<BR><BR>'. - qq!<A HREF="${p}edit/cust_class.html"><I>Add a customer class</I></A><BR><BR>!; - -my $count_query = 'SELECT COUNT(*) FROM cust_class'; - -my $link = [ $p.'edit/cust_class.html?', 'classnum' ]; - -my $header = [ '#', 'Class' ]; -my $fields = [ 'classnum', 'classname' ]; -my $links = [ $link, $link ]; - -my $cat_query = 'SELECT COUNT(*) FROM cust_class where categorynum IS NOT NULL'; -my $sth = dbh->prepare($cat_query) - or die "Error preparing $cat_query: ". dbh->errstr; -$sth->execute - or die "Error executing $cat_query: ". $sth->errstr; -if ($sth->fetchrow_arrayref->[0]) { - push @$header, 'Category'; - push @$fields, 'categoryname'; - push @$links, $link; -} - -</%init> |