RT# 31208 Fix Browse Discounts sorting error
[freeside.git] / httemplate / browse / discount.html
1 <% include( 'elements/browse.html',
2                  'title'       => 'Discounts',
3                  'name'        => 'discounts',
4                  'menubar'     => \@menubar,
5                  'query'       => \%query,
6                  'order_by_sql' => { description => 'discountnum' },
7                  'count_query' => 'SELECT COUNT(*) FROM discount',
8                  'disableable' => 1,
9                  'disabled_statuspos' => 1,
10                  'header'      => [ 'Name', 'Class', 'Discount', ],
11                  'fields'      => [ 'name',
12                                     'classname',
13                                     'description',
14                                   ],
15                  'links'       => \@links
16              )
17 %>
18 <%init>
19
20 die "access denied"
21   unless $FS::CurrentUser::CurrentUser->access_right('Configuration');
22
23 my @links = (
24   [ "${p}edit/discount.html?", 'discountnum' ],
25   [ "${p}edit/discount_class.html?", 'classnum' ],
26 );
27
28 # Fixes disableable, because discount and discount_class tables
29 # both contain a 'disabled' column
30 local $FS::Record::qsearch_qualify_columns = 1;
31
32 my %query = (
33   select => 'discount.*, discount_class.*',
34   table => 'discount',
35   addl_from => 'LEFT JOIN discount_class USING(classnum)',
36 );
37
38 my @menubar = (
39   'Add a new discount' => $p.'edit/discount.html',
40   'Discount classes' => $p.'browse/discount_class.html',
41 );
42
43 </%init>