Option to ignore old CDRs, RT#81480
[freeside.git] / httemplate / browse / vend_class.html
1 <& elements/browse.html,
2      'title'              => 'Vendor classes',
3      'html_init'          => $html_init,
4      'name'               => 'vendor classes',
5      'disableable'        => 1,
6      'disabled_statuspos' => 2,
7      'query'              => { 'table'     => 'vend_class',
8                                'hashref'   => {},
9                                'order_by' => 'ORDER BY classnum',
10                              },
11      'count_query'        => $count_query,
12      'header'             => $header,
13      'fields'             => $fields,
14      'links'              => $links,
15 &>
16 <%init>
17
18 die "access denied"
19   unless $FS::CurrentUser::CurrentUser->access_right('Configuration');
20
21 my $html_init =
22   'Vendor classes group vendor charges for Accounts Payable reporting.<BR><BR>'.
23   qq!<A HREF="${p}edit/vend_class.html"><I>Add a vendor class</I></A><BR><BR>!;
24
25 my $count_query = 'SELECT COUNT(*) FROM vend_class';
26
27 my $link = [ $p.'edit/vend_class.html?', 'classnum' ];
28
29 my $header = [ '#', 'Class' ];
30 my $fields = [ 'classnum', 'classname' ];
31 my $links  = [ $link, $link ];
32
33 </%init>