1 <& /elements/header.html, mt($title) &>
3 <FORM ACTION="sqlradius_usage.html" METHOD="GET">
5 <TABLE BGCOLOR="#cccccc" CELLSPACING=0>
7 <& /elements/tr-select-agent.html,
8 'empty_label' => 'all',
11 %#more future-proof to actually ask all exports if they ->can('usage_sessions')
12 % my @exporttypes = qw( sqlradius sqlradius_withdomain broadband_sqlradius
13 % phone_sqlradius radiator
15 <& /elements/tr-select-table.html,
17 'table' => 'part_export',
18 'name_col' => 'label',
20 'extra_sql' => ' WHERE exporttype IN ( '.
21 join(',', map "'$_'", @exporttypes).
24 'order_by' => 'ORDER BY exportnum',
27 <& /elements/tr-input-beginning_ending.html &>
32 <INPUT TYPE="submit" VALUE="<% mt('Get Report') |h %>">
36 <& /elements/footer.html &>
40 unless $FS::CurrentUser::CurrentUser->access_right('Usage: RADIUS sessions');
43 my $title = 'Data Usage Report';