summaryrefslogtreecommitdiff
path: root/httemplate/browse/discount.html
blob: deb98c3c7a6a2e8bfbbd1b5c81ab50da53e9ee9e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
<% include( 'elements/browse.html',
                 'title'       => 'Discounts',
                 'name'        => 'discounts',
                 'menubar'     => \@menubar,
                 'query'       => \%query,
                 'order_by_sql' => { description => 'discountnum' },
                 'count_query' => 'SELECT COUNT(*) FROM discount',
                 'disableable' => 1,
                 'disabled_statuspos' => 1,
                 'header'      => [ 'Name', 'Class', 'Discount', ],
                 'fields'      => [ 'name',
                                    'classname',
                                    'description',
                                  ],
                 'links'       => \@links
             )
%>
<%init>

die "access denied"
  unless $FS::CurrentUser::CurrentUser->access_right('Configuration');

my @links = (
  [ "${p}edit/discount.html?", 'discountnum' ],
  [ "${p}edit/discount_class.html?", 'classnum' ],
);

my %query = (
  select => 'discount.*, discount_class.*',
  table => 'discount',
  addl_from => 'LEFT JOIN discount_class USING(classnum)',
);

my @menubar = (
  'Add a new discount' => $p.'edit/discount.html',
  'Discount classes' => $p.'browse/discount_class.html',
);

</%init>